Listing 2: New code (new comments in lower case).

008C  31 F0     236 RESET: SRP  #RPx        ! MAKE =WORK, SO SHORT
008E  B0 FB     237        CLR  IRQ+1       ! CLEAR INTERRUPT MASK
0090  8C 96     238        LD   rP01M,#150  ! RAM, FAST, INT STK
                239                         ! (10010110)
0092  FC 68     240        LD   rSPL,#ISTAK ! STACK POINTER
0094  4C FF     241        LD   rT0R,#255   ! magic location %95 for T0
0096  5C FF     242        LD   rT0Rp1,#255 ! " " %97 for PRE0
0098  7C 41     243        LD   rP3M,#65    ! SERIAL I/O (01000001)
009A  1C 03     244        LD   rTMR,#0     ! START UART CLOCK (%03)
009C  CC 02     245        LD   rFLAGS,#2   ! SET XEQ
009E  31 10     246        SRP  #AC         ! note cleanup of low nybble
00A0  B0 03     247        CLR  PORT3
00A2  8D 00 B5  248        JP   00B5        ! jump over NOPs
00A4  FF FF     249        NOP
00A6  FF FF     250        NOP
                251
00A8  FF FF     252        NOP
00AA  FF FF     253        NOP
00AC  FF FF     254        NOP
00AE  FF FF FF  255        NOP
00B1  FF FF     256        NOP
00B3  FF FF     257        NOP
00B5  9F        258        EI              ! *&%$#@ UART
00B6  76 03 01  259        TM   PORT3,#1   ! IS BREAK SET?