asm64: 6510 source code assembler
asm64: Reading source file...
asm64: Number of lines: 1925
asm64: Determining label addresses...
final address: 3000079
asm64: Building output file...
    3: ffffffff                          .lst  nova10.hdr
    4: ffffffff                          .lib  api
    5: ffffffff                          .lib  mem
    6: ffffffff                          .lib  prg
    7: ffffffff                          .lib  dev
asm64: Module name: screen
    4: 1000000           fonttype        =     dev.sc_fonttype
    5: 1000000           orgtop          =     dev.sc_orgtop
    6: 1000000           orgleft         =     dev.sc_orgleft
    7: 1000000           rows            =     dev.sc_rows
    8: 1000000           columns         =     dev.sc_columns
    9: 1000000           lastrow         =     dev.sc_lastrow
   10: 1000000           lastcol         =     dev.sc_lastcol
   11: 1000000           maxrow          =     dev.sc_maxrow
   12: 1000000           maxcol          =     dev.sc_maxcol
   13: 1000000           attrsave        =     dev.sc_attrsave
   14: 1000000           topline         =     dev.sc_topline
   15: 1000000           botline         =     dev.sc_botline
   16: 1000000           scrolltop       =     dev.sc_scrolltop
   17: 1000000           scrollbot       =     dev.sc_scrollbot
   18: 1000000           charcolor       =     dev.sc_charcolor
   19: 1000000           bordercolor     =     dev.sc_bordercolor
   20: 1000000           underline       =     dev.sc_underline
   21: 1000000           blink           =     dev.sc_blink
   22: 1000000           rvs             =     dev.sc_rvs
   23: 1000000           wrap            =     dev.sc_wrap
   24: 1000000           attrend         =     dev.sc_attrend
   25: 1000000           scrollahead     =     dev.sc_scrollahead
   26: 1000000           noprocess       =     dev.sc_noprocess
   27: 1000000           attrlen         =     attrend-attrsave
   29: 1000000           drawchar        =     dev.sc_drawchar
   30: 1000000           Dtlc            =     dev.sc_Dtlc
   31: 1000000           Dtrc            =     dev.sc_Dtrc
   32: 1000000           Dblc            =     dev.sc_Dblc
   33: 1000000           Dbrc            =     dev.sc_Dbrc
   34: 1000000           Dltee           =     dev.sc_Dltee
   35: 1000000           Drtee           =     dev.sc_Drtee
   36: 1000000           Dbtee           =     dev.sc_Dbtee
   37: 1000000           Dttee           =     dev.sc_Dttee
   38: 1000000           Dcross          =     dev.sc_Dcross
   39: 1000000           Dhorz           =     dev.sc_Dhorz
   40: 1000000           Dvert           =     dev.sc_Dvert
   41: 1000000           Dblock          =     dev.sc_Dblock
   42: 1000000           Dother          =     dev.sc_Dother
   44: 1000000           tabs            =     dev.sc_tabs
   15: 1000000           scptr           =     scrn_zp_base
   16: 1000000           scptr2          =     scrn_zp_base+2
   17: 1000000           mvlin           =     scrn_zp_base+4
   18: 1000000           nlines          =     scrn_zp_base+5
   19: 1000000           stlin           =     scrn_zp_base+6
   20: 1000000           sclin           =     scrn_zp_base+7
   21: 1000000           crsr            =     scrn_zp_base+8
   23: 1000000           MAXWIN          =     5
   24: 1000000           ROWLEN          =     $140
   26: 1000000                                 
   27: 1000000                                 
   28: 1000000                                 
   29: 1000000                                 
   30: 1000000                                 
   31: 1000000           scrn80          =     $e000
   32: 1000000           font80          =     $d800
   33: 1000000           scrn40          =     $cc00
   34: 1000000                                 
   35: 1000000           scrn80len       =     $1f40
   36: 1000000           fontlen         =     $0800
   37: 1000000           scrn40len       =     $0400
   39: 1000000                                 
   40: 1000000                                 
   41: 1000000                                 
   42: 1000000                                 
   43: 1000000                                 
   44: 1000000                                 
   45: 1000000                                 
   46: 1000000                                 
   47: 1000000           res1            =     scrn40
   48: 1000000           res1len         =     scrn40len
   49: 1000000           res2            =     font80
   50: 1000000           res2len         =     fontlen+scrn80len
   51: 1000000                                 
   53: 1000000           scbits          =     (>scrn40&$3f)/4
   54: 1000000           chbits          =     (>scrn80&$3f)/4
   55: 1000000           vcfg            =     scbits*16+chbits
   57: 1000000  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
                         lastpos         .zero 25
   59: 1000019  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
                         rowlo           .zero 26
   60: 1000033  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
                         rowhi           .zero 26
   61: 100004d  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
                         collo           .zero 25
   62: 1000066  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
                         colhi           .zero 25
   64: 100007f  00       tborder         .byte 0
   65: 1000080  00       defcolor        .byte 0
   66: 1000081  f0       cattr           .byte 240
   67: 1000082  17       minscroll       .byte 23
   68: 1000083  00       nscroll         .byte 0
   69: 1000084  00       crsrmode        .byte 0
   70: 1000085  40 01    rowlen          .word ROWLEN
   73: 1000087  00 02 05 09 06 04 03 0f 0c 0a 0d 07 0e 04 03 01
                         coltbl          .byte 0,2,5,9,6,4,3,15,12,10,13,7,14,4,3,1
   76: 1000097  00 0f 01 06 05 02 04 0b 08 03 09 0e 0d 0a 0c 07
                         invctbl         .byte 0,15,1,6,5,2,4,11,8,3,9,14,13,10,12,7
   79: 10000a7  0b 0f 0a 09 07 0d 0e 08 07 07 02 0c 0f 05 06 01
                         bolds           .byte 11,15,10,9,7,13,14,8,7,7,2,12,15,5,6,1
   82: 10000b7  90 05 1c 9f 9c 1e 1f 9e 81 95 96 97 98 99 9a 9b
                         kcoltbl         .byte 144,5,28,159,156,30,31,158,129,149,150,151,152,153,154,155
   86: 10000c7  00       nwin            .byte 0
   88: 10000c8  00 00 00 00 00
                         win_table_lo    .zero MAXWIN
   89: 10000cd  00 00 00 00 00
                         win_table_hi    .zero MAXWIN
   90: 10000d2  00 00 00 00 00
                         win_table_vhi   .zero MAXWIN
   92: 10000d7           win_info        =     *
   93: 10000d7  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
                         win_oattr       .zero ATTRLEN
   94: 10000e7  00 00 00 win_tdata       .long 0
   95: 10000ea  00 00    win_tlen        .word 0
   96: 10000ec  00 00 00 win_cdata       .long 0
   97: 10000ef  00 00    win_clen        .word 0
   98: 10000f1           win_info_end    =     *
   99: 10000f1           WIN_INFO_LEN    =     win_info_end-win_info
  101: 10000f1  20 7b 08 z_crsrplot      jsr   togcrsr
  102: 10000f4  20 49 01                 jsr   crsrplot
  103: 10000f7  4c 7b 08                 jmp   togcrsr
  105: 10000fa  20 7b 08 z_crsrupd       jsr   togcrsr
  106: 10000fd  20 45 01                 jsr   crsrupd
  107: 1000100  4c 7b 08                 jmp   togcrsr
  109: 1000103  20 7b 08 z_charatcrsr    jsr   togcrsr
  110: 1000106  20 42 01                 jsr   charatcrsr
  111: 1000109  4c 7b 08                 jmp   togcrsr
  113: 100010c  20 7b 08 z_clrtoeol      jsr   togcrsr
  114: 100010f  20 8b 0b                 jsr   clrtoeol
  115: 1000112  4c 7b 08                 jmp   togcrsr
  117: 1000115  20 7b 08 z_clrfrombol    jsr   togcrsr
  118: 1000118  20 f9 0b                 jsr   clrfrombol
  119: 100011b  4c 7b 08                 jmp   togcrsr
  121: 100011e  20 7b 08 z_erase         jsr   togcrsr
  122: 1000121  20 69 0d                 jsr   erase
  123: 1000124  4c 7b 08                 jmp   togcrsr
  125: 1000127  20 7b 08 z_insert        jsr   togcrsr
  126: 100012a  20 aa 07                 jsr   insert
  127: 100012d  4c 7b 08                 jmp   togcrsr
  129: 1000130  20 7b 08 z_delete        jsr   togcrsr
  130: 1000133  20 ab 08                 jsr   delete
  131: 1000136  4c 7b 08                 jmp   togcrsr
  133: 1000139  20 7b 08 z_rvslin        jsr   togcrsr
  134: 100013c  20 ec 06                 jsr   rvslin
  135: 100013f  4c 7b 08                 jmp   togcrsr
  137: 1000142  a9 20    charatcrsr      lda   #" "
  138: 1000144  60                       rts   
  140: 1000145  a6 81    crsrupd         ldx   crow
  141: 1000147  a4 80                    ldy   ccol
  142: 1000149  ec 5b 00 crsrplot        cpx   rows
  143: 100014c  90 03                    bcc   +
  144: 100014e  ae 55 00                 ldx   lastrow
  145: 1000151  86 81    +               stx   crow
  146: 1000153  cc 5c 00                 cpy   columns
  147: 1000156  90 03                    bcc   +
  148: 1000158  ac 56 00                 ldy   lastcol
  149: 100015b  84 80    +               sty   ccol
  150: 100015d  20 50 08                 jsr   getloc
  151: 1000160  98                       tya   
  152: 1000161  f0 11                    beq   ++
  153: 1000163  29 fe                    and   #$fe
  154: 1000165  0a                       asl   
  155: 1000166  0a                       asl   
  156: 1000167  90 03                    bcc   +
  157: 1000169  e6 84                    inc   loc+1
  158: 100016b  18                       clc   
  159: 100016c  65 83    +               adc   loc
  160: 100016e  85 83                    sta   loc
  161: 1000170  90 02                    bcc   ++
  162: 1000172  e6 84                    inc   loc+1
  163: 1000174  98       ++              tya   
  164: 1000175  4a                       lsr   
  165: 1000176  b0 03                    bcs   +
  166: 1000178  a9 f0                    lda   #$f0
  167: 100017a  2c                       .byte $2c
  168: 100017b  a9 0f    +               lda   #$0f
  169: 100017d  85 8f                    sta   crsr
  170: 100017f  18                       clc   
  171: 1000180  60                       rts   
  179: 1000181  a5 60    scrnmap         lda   arg
  180: 1000183  8d 59 00                 sta   orgtop
  181: 1000186  a5 61                    lda   arg+1
  182: 1000188  8d 5a 00                 sta   orgleft
  184: 100018b  8e 5b 00 calctable       stx   rows
  185: 100018e  ca                       dex   
  186: 100018f  8e 55 00                 stx   lastrow
  187: 1000192  8e 5e 00                 stx   botline
  188: 1000195  8e 60 00                 stx   scrollbot
  189: 1000198  8c 5c 00                 sty   columns
  190: 100019b  88                       dey   
  191: 100019c  8c 56 00                 sty   lastcol
  193: 100019f  a9 00                    lda   #0
  194: 10001a1  8d 5d 00                 sta   topline
  195: 10001a4  8d 5f 00                 sta   scrolltop
  198: 10001a7  a9 00                    lda   #<scrn80
  199: 10001a9  85 87                    sta   scptr
  200: 10001ab  a9 e0                    lda   #>scrn80
  201: 10001ad  85 88                    sta   scptr+1
  203: 10001af  ae 59 00                 ldx   orgtop
  204: 10001b2  f0 06                    beq   +
  205: 10001b4  20 44 02 -               jsr   addptr
  206: 10001b7  ca                       dex   
  207: 10001b8  d0 fa                    bne   -
  208: 10001ba  a9 00    +               lda   #0
  209: 10001bc  85 8a                    sta   scptr2+1
  210: 10001be  ad 5a 00                 lda   orgleft
  211: 10001c1  85 89                    sta   scptr2
  212: 10001c3  06 89                    asl   scptr2
  213: 10001c5  26 8a                    rol   scptr2+1
  214: 10001c7  06 89                    asl   scptr2
  215: 10001c9  26 8a                    rol   scptr2+1
  216: 10001cb  18                       clc   
  217: 10001cc  a5 87                    lda   scptr
  218: 10001ce  65 89                    adc   scptr2
  219: 10001d0  85 87                    sta   scptr
  220: 10001d2  a5 88                    lda   scptr+1
  221: 10001d4  65 8a                    adc   scptr2+1
  222: 10001d6  85 88                    sta   scptr+1
  224: 10001d8  a9 00                    lda   #0
  225: 10001da  8d 86 00                 sta   rowlen+1
  226: 10001dd  ad 5c 00                 lda   columns
  227: 10001e0  8d 85 00                 sta   rowlen
  228: 10001e3  0e 85 00                 asl   rowlen
  229: 10001e6  2e 86 00                 rol   rowlen+1
  230: 10001e9  0e 85 00                 asl   rowlen
  231: 10001ec  2e 86 00                 rol   rowlen+1
  234: 10001ef  a2 00                    ldx   #0
  235: 10001f1  a5 87    -               lda   scptr
  236: 10001f3  9d 19 00                 sta   rowlo,x
  237: 10001f6  a5 88                    lda   scptr+1
  238: 10001f8  9d 33 00                 sta   rowhi,x
  239: 10001fb  20 44 02                 jsr   addptr
  240: 10001fe  e8                       inx   
  241: 10001ff  ec 5b 00                 cpx   rows
  242: 1000202  90 ed                    bcc   -
  243: 1000204  f0 eb                    beq   -
  247: 1000206  a9 00                    lda   #<scrn40
  248: 1000208  85 87                    sta   scptr
  249: 100020a  a9 cc                    lda   #>scrn40
  250: 100020c  85 88                    sta   scptr+1
  252: 100020e  ae 59 00                 ldx   orgtop
  253: 1000211  f0 08                    beq   +
  254: 1000213  a9 28    -               lda   #40
  255: 1000215  20 3a 02                 jsr   addcptr
  256: 1000218  ca                       dex   
  257: 1000219  d0 f8                    bne   -
  259: 100021b  ad 5a 00 +               lda   orgleft
  260: 100021e  4a                       lsr   
  261: 100021f  20 3a 02                 jsr   addcptr
  264: 1000222  a2 00                    ldx   #0
  265: 1000224  a5 87    -               lda   scptr
  266: 1000226  9d 4d 00                 sta   collo,x
  267: 1000229  a5 88                    lda   scptr+1
  268: 100022b  9d 66 00                 sta   colhi,x
  269: 100022e  a9 28                    lda   #40
  270: 1000230  20 3a 02                 jsr   addcptr
  271: 1000233  e8                       inx   
  272: 1000234  ec 5b 00                 cpx   rows
  273: 1000237  90 eb                    bcc   -
  274: 1000239  60                       rts   
  276: 100023a  18       addcptr         clc   
  277: 100023b  65 87                    adc   scptr
  278: 100023d  85 87                    sta   scptr
  279: 100023f  90 02                    bcc   +
  280: 1000241  e6 88                    inc   scptr+1
  281: 1000243  60       +               rts   
  283: 1000244  18       addptr          clc   
  284: 1000245  a5 87                    lda   scptr
  285: 1000247  69 40                    adc   #<ROWLEN
  286: 1000249  85 87                    sta   scptr
  287: 100024b  a5 88                    lda   scptr+1
  288: 100024d  69 01                    adc   #>ROWLEN
  289: 100024f  85 88                    sta   scptr+1
  290: 1000251  60                       rts   
  292: 1000252  20 e3 06 closedown       jsr   blankscr
  294: 1000255  ad 7f 00                 lda   tborder
  295: 1000258  8d 20 d0                 sta   53280
  297: 100025b  ad 11 d0                 lda   53265
  298: 100025e  29 df                    and   #~$20
  299: 1000260  8d 11 d0                 sta   53265
  301: 1000263  ad 02 dd                 lda   $dd02
  302: 1000266  09 03                    ora   #3
  303: 1000268  8d 02 dd                 sta   $dd02
  304: 100026b  ad 00 dd                 lda   $dd00
  305: 100026e  09 03                    ora   #3
  306: 1000270  8d 00 dd                 sta   $dd00
  308: 1000273  a9 17                    lda   #23
  309: 1000275  8d 18 d0                 sta   53272
  310: 1000278  4c e3 06                 jmp   blankscr
  317: 100027b  00       dtrow           .byte 0
  318: 100027c  00       dtcol           .byte 0
  320: 100027d  08       drawbox         php   
  321: 100027e  86 87                    stx   scptr
  322: 1000280  84 88                    sty   scptr+1
  323: 1000282  a5 81                    lda   crow
  324: 1000284  8d 7b 02                 sta   dtrow
  325: 1000287  18                       clc   
  326: 1000288  65 87                    adc   scptr
  327: 100028a  85 89                    sta   scptr2
  328: 100028c  a5 80                    lda   ccol
  329: 100028e  8d 7c 02                 sta   dtcol
  330: 1000291  18                       clc   
  331: 1000292  65 88                    adc   scptr+1
  332: 1000294  85 8a                    sta   scptr2+1
  334: 1000296  a9 ff                    lda   #$ff
  335: 1000298  8d 68 00                 sta   noprocess
  338: 100029b  ae 7b 02                 ldx   dtrow
  339: 100029e  ac 7c 02                 ldy   dtcol
  340: 10002a1  ca                       dex   
  341: 10002a2  30 4e                    bmi   ++
  342: 10002a4  88                       dey   
  343: 10002a5  30 09                    bmi   +
  344: 10002a7  20 49 01                 jsr   crsrplot
  345: 10002aa  ad 69 00                 lda   Dtlc
  346: 10002ad  20 e3 08                 jsr   outchr
  347: 10002b0           +                     
  348: 10002b0  c8       -               iny   
  349: 10002b1  30 fd                    bmi   -
  350: 10002b3  20 49 01                 jsr   crsrplot
  352: 10002b6  ad 72 00 -               lda   Dhorz
  353: 10002b9  20 e3 08                 jsr   outchr
  354: 10002bc  c8                       iny   
  355: 10002bd  c4 8a                    cpy   scptr2+1
  356: 10002bf  90 f5                    bcc   -
  358: 10002c1  cc 5c 00                 cpy   columns
  359: 10002c4  b0 06                    bcs   +
  360: 10002c6  ad 6a 00                 lda   Dtrc
  361: 10002c9  20 e3 08                 jsr   outchr
  363: 10002cc  28       +               plp   
  364: 10002cd  08                       php   
  365: 10002ce  90 22                    bcc   ++
  367: 10002d0  ae 7b 02                 ldx   dtrow
  368: 10002d3  ca                       dex   
  369: 10002d4  ac 7c 02                 ldy   dtcol
  370: 10002d7  c8                       iny   
  371: 10002d8  20 49 01                 jsr   crsrplot
  372: 10002db  ad 6e 00                 lda   Drtee
  373: 10002de  20 e3 08                 jsr   outchr
  374: 10002e1  20 44 01                 jsr   api.outFormat
  375: 10002e4  03 01 5e 53 60 00 0f
                                         .text "\c\1^s'arg'\o"
  376: 10002eb  00                       .byte 0
  377: 10002ec  ad 6d 00                 lda   Dltee
  378: 10002ef  20 e3 08                 jsr   outchr
  381: 10002f2  a6 89    ++              ldx   scptr2
  382: 10002f4  ec 5b 00                 cpx   rows
  383: 10002f7  b0 2b                    bcs   ++
  384: 10002f9  ac 7c 02                 ldy   dtcol
  385: 10002fc  88                       dey   
  386: 10002fd  30 09                    bmi   +
  387: 10002ff  20 49 01                 jsr   crsrplot
  388: 1000302  ad 6b 00                 lda   Dblc
  389: 1000305  20 e3 08                 jsr   outchr
  390: 1000308           +                     
  391: 1000308  c8       -               iny   
  392: 1000309  30 fd                    bmi   -
  393: 100030b  20 49 01                 jsr   crsrplot
  395: 100030e  ad 72 00 -               lda   Dhorz
  396: 1000311  20 e3 08                 jsr   outchr
  397: 1000314  c8                       iny   
  398: 1000315  c4 8a                    cpy   scptr2+1
  399: 1000317  90 f5                    bcc   -
  401: 1000319  cc 5c 00                 cpy   columns
  402: 100031c  b0 06                    bcs   ++
  403: 100031e  ad 6c 00                 lda   Dbrc
  404: 1000321  20 e3 08                 jsr   outchr
  406: 1000324  ae 7b 02 ++              ldx   dtrow
  407: 1000327  ac 7c 02                 ldy   dtcol
  408: 100032a  88                       dey   
  409: 100032b  30 0e                    bmi   ++
  410: 100032d  20 49 01 -               jsr   crsrplot
  411: 1000330  ad 73 00                 lda   Dvert
  412: 1000333  20 e3 08                 jsr   outchr
  413: 1000336  e8                       inx   
  414: 1000337  e4 89                    cpx   scptr2
  415: 1000339  90 f2                    bcc   -
  417: 100033b  ae 7b 02 ++              ldx   dtrow
  418: 100033e  a4 8a                    ldy   scptr2+1
  419: 1000340  cc 5c 00                 cpy   columns
  420: 1000343  b0 0e                    bcs   ++
  421: 1000345  20 49 01 -               jsr   crsrplot
  422: 1000348  ad 73 00                 lda   Dvert
  423: 100034b  20 e3 08                 jsr   outchr
  424: 100034e  e8                       inx   
  425: 100034f  e4 89                    cpx   scptr2
  426: 1000351  90 f2                    bcc   -
  427: 1000353  28       ++              plp   
  428: 1000354  a9 00                    lda   #0
  429: 1000356  8d 68 00                 sta   noprocess
  430: 1000359  ae 7b 02                 ldx   dtrow
  431: 100035c  ac 7c 02                 ldy   dtcol
  432: 100035f  4c 49 01                 jmp   crsrplot
  443: 1000362           wtitle          =     arg
  444: 1000362           wnosave         =     arg+2
  445: 1000362           wrow            =     arg+3
  446: 1000362           wcol            =     arg+4
  448: 1000362  00       ntop            .byte 0
  449: 1000363  00       nleft           .byte 0
  450: 1000364  00       nrows           .byte 0
  451: 1000365  00       ncols           .byte 0
  452: 1000366  00       swid            .byte 0
  453: 1000367  00       shgt            .byte 0
  454: 1000368  00       nwid            .byte 0
  455: 1000369  00       nhgt            .byte 0
  456: 100036a  00 00    ntitle          .word 0
  457: 100036c  00 00 00 00
                         linhdr          .byte 0,0,0,0
  459: 1000370           wininit               
  460: 1000370  98       -               tya   
  461: 1000371  29 03                    and   #3
  462: 1000373  f0 03                    beq   +
  463: 1000375  c8                       iny   
  464: 1000376  d0 f8                    bne   -
  465: 1000378  8c 68 03 +               sty   nwid
  466: 100037b  8e 69 03                 stx   nhgt
  467: 100037e  ad c7 00                 lda   nwin
  468: 1000381  c9 05                    cmp   #MAXWIN
  469: 1000383  60                       rts   
  471: 1000384  20 70 03 wincenter       jsr   wininit
  472: 1000387  90 01                    bcc   +
  473: 1000389  60                       rts   
  474: 100038a  a9 19    +               lda   #25
  475: 100038c  38                       sec   
  476: 100038d  ed 69 03                 sbc   nhgt
  477: 1000390  4a                       lsr   
  478: 1000391  85 63                    sta   wrow
  479: 1000393  a9 50                    lda   #80
  480: 1000395  38                       sec   
  481: 1000396  ed 68 03                 sbc   nwid
  482: 1000399  4a                       lsr   
  483: 100039a  85 64                    sta   wcol
  484: 100039c  4a                       lsr   
  485: 100039d  90 0b                    bcc   +
  486: 100039f  c6 64                    dec   wcol
  487: 10003a1  4c aa 03                 jmp   +
  489: 10003a4  20 70 03 winopen         jsr   wininit
  490: 10003a7  90 01                    bcc   +
  491: 10003a9  60                       rts   
  492: 10003aa  a6 63    +               ldx   wrow
  493: 10003ac  a4 64                    ldy   wcol
  494: 10003ae  8e 62 03                 stx   ntop
  495: 10003b1  8c 63 03                 sty   nleft
  496: 10003b4  a6 60                    ldx   wtitle
  497: 10003b6  a4 61                    ldy   wtitle+1
  498: 10003b8  8e 6a 03                 stx   ntitle
  499: 10003bb  8c 6b 03                 sty   ntitle+1
  502: 10003be  a2 d7                    ldx   #<win_oattr
  503: 10003c0  a0 00                    ldy   #>win_oattr
  504: 10003c2  20 dc 0d                 jsr   saveattr
  507: 10003c5  a9 00                    lda   #0
  508: 10003c7  8d 65 00                 sta   rvs
  509: 10003ca  8d 63 00                 sta   underline
  510: 10003cd  8d 64 00                 sta   blink
  511: 10003d0  ad 80 00                 lda   defcolor
  512: 10003d3  8d 61 00                 sta   charcolor
  513: 10003d6  20 a5 0d                 jsr   setattr
  515: 10003d9  a9 00                    lda   #0
  516: 10003db  8d 59 00                 sta   orgtop
  517: 10003de  8d 5a 00                 sta   orgleft
  518: 10003e1  a2 19                    ldx   #25
  519: 10003e3  a0 50                    ldy   #80
  520: 10003e5  20 8b 01                 jsr   calctable
  522: 10003e8  ae 69 03                 ldx   nhgt
  523: 10003eb  e8                       inx   
  524: 10003ec  e8                       inx   
  525: 10003ed  e0 19                    cpx   #25
  526: 10003ef  90 02                    bcc   +
  527: 10003f1  a2 19                    ldx   #25
  528: 10003f3  8e 67 03 +               stx   shgt
  529: 10003f6  ac 68 03                 ldy   nwid
  530: 10003f9  c8                       iny   
  531: 10003fa  c8                       iny   
  532: 10003fb  c8                       iny   
  533: 10003fc  c8                       iny   
  534: 10003fd  c0 50                    cpy   #80
  535: 10003ff  90 02                    bcc   +
  536: 1000401  a0 50                    ldy   #80
  537: 1000403  8c 66 03 +               sty   swid
  539: 1000406  a9 00                    lda   #0
  540: 1000408  85 8a                    sta   scptr2+1
  541: 100040a  98                       tya   
  542: 100040b  0a                       asl   
  543: 100040c  26 8a                    rol   scptr2+1
  544: 100040e  0a                       asl   
  545: 100040f  26 8a                    rol   scptr2+1
  546: 1000411  85 89                    sta   scptr2
  548: 1000413  24 62                    bit   wnosave
  549: 1000415  30 0c                    bmi   +nosave
  550: 1000417  20 bc 05                 jsr   win_calcplus
  551: 100041a  a5 87                    lda   scptr
  552: 100041c  a4 88                    ldy   scptr+1
  553: 100041e  20 18 00                 jsr   mem.malloc
  554: 1000421  90 0d                    bcc   +
  556: 1000423  a9 00    +nosave         lda   #0
  557: 1000425  a0 04                    ldy   #4
  558: 1000427  99 e7 00 -               sta   win_tdata,y
  559: 100042a  88                       dey   
  560: 100042b  10 fa                    bpl   -
  561: 100042d  4c be 04                 jmp   +nosave
  563: 1000430  a0 02    +               ldy   #2
  564: 1000432  b9 20 00 -               lda   zp0,y
  565: 1000435  99 e7 00                 sta   win_tdata,y
  566: 1000438  88                       dey   
  567: 1000439  10 f7                    bpl   -
  569: 100043b  a5 87    +g              lda   scptr
  570: 100043d  8d ea 00                 sta   win_tlen
  571: 1000440  a5 88                    lda   scptr+1
  572: 1000442  8d eb 00                 sta   win_tlen+1
  574: 1000445  ae 62 03                 ldx   ntop
  575: 1000448  f0 01                    beq   +
  576: 100044a  ca                       dex   
  577: 100044b  ac 63 03 +               ldy   nleft
  578: 100044e  f0 01                    beq   +
  579: 1000450  88                       dey   
  580: 1000451  20 49 01 +               jsr   crsrplot
  582: 1000454  a9 19                    lda   #25
  583: 1000456  8d 6e 03                 sta   linhdr+2
  584: 1000459  a9 00                    lda   #0
  585: 100045b  8d 6f 03                 sta   linhdr+3
  586: 100045e  a2 00                    ldx   #<lastpos
  587: 1000460  a0 00                    ldy   #>lastpos
  588: 1000462  20 ee 05                 jsr   win_stashchunk
  591: 1000465  ad 67 03                 lda   shgt
  592: 1000468  85 63                    sta   arg+3
  593: 100046a  a5 89                    lda   scptr2
  594: 100046c  8d 6e 03                 sta   linhdr+2
  595: 100046f  a5 8a                    lda   scptr2+1
  596: 1000471  8d 6f 03                 sta   linhdr+3
  598: 1000474  a6 83    --              ldx   loc
  599: 1000476  a4 84                    ldy   loc+1
  600: 1000478  20 ee 05                 jsr   win_stashchunk
  602: 100047b  18                       clc   
  603: 100047c  a5 83                    lda   loc
  604: 100047e  69 40                    adc   #<ROWLEN
  605: 1000480  85 83                    sta   loc
  606: 1000482  a5 84                    lda   loc+1
  607: 1000484  69 01                    adc   #>ROWLEN
  608: 1000486  85 84                    sta   loc+1
  610: 1000488  c6 63                    dec   arg+3
  611: 100048a  d0 e8                    bne   --
  613: 100048c  a9 00                    lda   #0
  614: 100048e  a0 03                    ldy   #3
  615: 1000490  99 6c 03 -               sta   linhdr,y
  616: 1000493  88                       dey   
  617: 1000494  10 fa                    bpl   -
  618: 1000496  a9 6c                    lda   #<linhdr
  619: 1000498  85 23                    sta   zw0
  620: 100049a  a9 03                    lda   #>linhdr
  621: 100049c  85 24                    sta   zw0+1
  622: 100049e  a9 04                    lda   #4
  623: 10004a0  a0 00                    ldy   #0
  624: 10004a2  20 15 00                 jsr   mem.stash
  628: 10004a5  a9 00                    lda   #0
  629: 10004a7  85 8a                    sta   scptr2+1
  630: 10004a9  ad 66 03                 lda   swid
  631: 10004ac  4a                       lsr   
  632: 10004ad  85 89                    sta   scptr2
  634: 10004af  ae 67 03                 ldx   shgt
  635: 10004b2  20 bf 05                 jsr   win_calcsize
  636: 10004b5  a5 87                    lda   scptr
  637: 10004b7  a4 88                    ldy   scptr+1
  638: 10004b9  20 18 00                 jsr   mem.malloc
  639: 10004bc  90 0d                    bcc   +
  642: 10004be  a9 00    +nosave         lda   #0
  643: 10004c0  a0 04                    ldy   #4
  644: 10004c2  99 ec 00 -               sta   win_cdata,y
  645: 10004c5  88                       dey   
  646: 10004c6  10 fa                    bpl   -
  647: 10004c8  4c 39 05                 jmp   +n
  649: 10004cb  a0 02    +               ldy   #2
  650: 10004cd  b9 20 00 -               lda   zp0,y
  651: 10004d0  99 ec 00                 sta   win_cdata,y
  652: 10004d3  88                       dey   
  653: 10004d4  10 f7                    bpl   -
  655: 10004d6  a5 87    +g              lda   scptr
  656: 10004d8  8d ef 00                 sta   win_clen
  657: 10004db  a5 88                    lda   scptr+1
  658: 10004dd  8d f0 00                 sta   win_clen+1
  660: 10004e0  ae 62 03                 ldx   ntop
  661: 10004e3  f0 01                    beq   +
  662: 10004e5  ca                       dex   
  663: 10004e6  ac 63 03 +               ldy   nleft
  664: 10004e9  f0 01                    beq   +
  665: 10004eb  88                       dey   
  666: 10004ec  20 49 01 +               jsr   crsrplot
  667: 10004ef  a5 80                    lda   ccol
  668: 10004f1  4a                       lsr   
  669: 10004f2  18                       clc   
  670: 10004f3  65 85                    adc   coloc
  671: 10004f5  85 85                    sta   coloc
  672: 10004f7  90 02                    bcc   +
  673: 10004f9  e6 86                    inc   coloc+1
  675: 10004fb  ad 67 03 +               lda   shgt
  676: 10004fe  85 63                    sta   arg+3
  677: 1000500  a5 89                    lda   scptr2
  678: 1000502  8d 6e 03                 sta   linhdr+2
  679: 1000505  a5 8a                    lda   scptr2+1
  680: 1000507  8d 6f 03                 sta   linhdr+3
  682: 100050a  a6 85    --              ldx   coloc
  683: 100050c  a4 86                    ldy   coloc+1
  684: 100050e  20 ee 05                 jsr   win_stashchunk
  686: 1000511  18                       clc   
  687: 1000512  a5 85                    lda   coloc
  688: 1000514  69 28                    adc   #40
  689: 1000516  85 85                    sta   coloc
  690: 1000518  90 02                    bcc   +
  691: 100051a  e6 86                    inc   coloc+1
  693: 100051c  c6 63    +               dec   arg+3
  694: 100051e  d0 ea                    bne   --
  696: 1000520  a9 00                    lda   #0
  697: 1000522  a0 03                    ldy   #3
  698: 1000524  99 6c 03 -               sta   linhdr,y
  699: 1000527  88                       dey   
  700: 1000528  10 fa                    bpl   -
  701: 100052a  a9 6c                    lda   #<linhdr
  702: 100052c  85 23                    sta   zw0
  703: 100052e  a9 03                    lda   #>linhdr
  704: 1000530  85 24                    sta   zw0+1
  705: 1000532  a9 04                    lda   #4
  706: 1000534  a0 00                    ldy   #0
  707: 1000536  20 15 00                 jsr   mem.stash
  710: 1000539  a9 1a    +n              lda   #WIN_INFO_LEN
  711: 100053b  a0 00                    ldy   #0
  712: 100053d  20 18 00                 jsr   mem.malloc
  713: 1000540  b0 24                    bcs   +
  715: 1000542  ae c7 00                 ldx   nwin
  716: 1000545  a5 20                    lda   zp0
  717: 1000547  9d c8 00                 sta   win_table_lo,x
  718: 100054a  a5 21                    lda   zp0+1
  719: 100054c  9d cd 00                 sta   win_table_hi,x
  720: 100054f  a5 22                    lda   zp0+2
  721: 1000551  9d d2 00                 sta   win_table_vhi,x
  722: 1000554  a9 d7                    lda   #<win_info
  723: 1000556  85 23                    sta   zw0
  724: 1000558  a9 00                    lda   #>win_info
  725: 100055a  85 24                    sta   zw0+1
  726: 100055c  a9 1a                    lda   #WIN_INFO_LEN
  727: 100055e  a0 00                    ldy   #0
  728: 1000560  20 15 00                 jsr   mem.stash
  729: 1000563  ee c7 00                 inc   nwin
  731: 1000566  ad 62 03 +               lda   ntop
  732: 1000569  48                       pha   
  733: 100056a  ad 63 03                 lda   nleft
  734: 100056d  48                       pha   
  736: 100056e  ad 6a 03                 lda   ntitle
  737: 1000571  0d 6b 03                 ora   ntitle+1
  738: 1000574  f0 0d                    beq   +
  739: 1000576  ad 6a 03                 lda   ntitle
  740: 1000579  85 60                    sta   arg
  741: 100057b  ad 6b 03                 lda   ntitle+1
  742: 100057e  85 61                    sta   arg+1
  743: 1000580  38                       sec   
  744: 1000581  b0 01                    bcs   ++
  745: 1000583  18       +               clc   
  746: 1000584  ae 62 03 ++              ldx   ntop
  747: 1000587  ac 63 03                 ldy   nleft
  748: 100058a  86 81                    stx   crow
  749: 100058c  84 80                    sty   ccol
  750: 100058e  ae 69 03                 ldx   nhgt
  751: 1000591  ac 68 03                 ldy   nwid
  752: 1000594  20 7d 02                 jsr   drawbox
  754: 1000597  68                       pla   
  755: 1000598  8d 5a 00                 sta   orgleft
  756: 100059b  68                       pla   
  757: 100059c  8d 59 00                 sta   orgtop
  759: 100059f  ae 69 03                 ldx   nhgt
  760: 10005a2  ac 68 03                 ldy   nwid
  761: 10005a5  20 8b 01                 jsr   calctable
  763: 10005a8  a9 00                    lda   #0
  764: 10005aa  8d 5d 00                 sta   topline
  765: 10005ad  8d 5f 00                 sta   scrolltop
  766: 10005b0  ad 55 00                 lda   lastrow
  767: 10005b3  8d 5e 00                 sta   botline
  768: 10005b6  8d 60 00                 sta   scrollbot
  769: 10005b9  4c 95 08                 jmp   clear
  771: 10005bc  a9 1d    win_calcplus    lda   #25+4
  772: 10005be  2c                       .byte $2c
  773: 10005bf  a9 00    win_calcsize    lda   #0
  774: 10005c1  85 87                    sta   scptr
  775: 10005c3  a9 00                    lda   #0
  776: 10005c5  85 88                    sta   scptr+1
  777: 10005c7  18       -               clc   
  778: 10005c8  a5 87                    lda   scptr
  779: 10005ca  65 89                    adc   scptr2
  780: 10005cc  85 87                    sta   scptr
  781: 10005ce  a5 88                    lda   scptr+1
  782: 10005d0  65 8a                    adc   scptr2+1
  783: 10005d2  85 88                    sta   scptr+1
  784: 10005d4  18                       clc   
  785: 10005d5  a5 87                    lda   scptr
  786: 10005d7  69 04                    adc   #4
  787: 10005d9  85 87                    sta   scptr
  788: 10005db  90 02                    bcc   +
  789: 10005dd  e6 88                    inc   scptr+1
  790: 10005df  ca       +               dex   
  791: 10005e0  d0 e5                    bne   -
  792: 10005e2  18                       clc   
  793: 10005e3  a5 87                    lda   scptr
  794: 10005e5  69 04                    adc   #4
  795: 10005e7  85 87                    sta   scptr
  796: 10005e9  90 02                    bcc   +
  797: 10005eb  e6 88                    inc   scptr+1
  798: 10005ed  60       +               rts   
  800: 10005ee  8e 6c 03 win_stashchunk  stx   linhdr
  801: 10005f1  8c 6d 03                 sty   linhdr+1
  802: 10005f4  a9 6c                    lda   #<linhdr
  803: 10005f6  85 23                    sta   zw0
  804: 10005f8  a9 03                    lda   #>linhdr
  805: 10005fa  85 24                    sta   zw0+1
  806: 10005fc  a9 04                    lda   #4
  807: 10005fe  a0 00                    ldy   #0
  808: 1000600  20 15 00                 jsr   mem.stash
  810: 1000603  ad 6c 03                 lda   linhdr
  811: 1000606  85 23                    sta   zw0
  812: 1000608  ad 6d 03                 lda   linhdr+1
  813: 100060b  85 24                    sta   zw0+1
  814: 100060d  ad 6e 03                 lda   linhdr+2
  815: 1000610  ac 6f 03                 ldy   linhdr+3
  816: 1000613  4c 15 00                 jmp   mem.stash
  818: 1000616           win_fetchchunks =     *
  819: 1000616  a9 6c    --              lda   #<linhdr
  820: 1000618  85 23                    sta   zw0
  821: 100061a  a9 03                    lda   #>linhdr
  822: 100061c  85 24                    sta   zw0+1
  823: 100061e  a9 04                    lda   #4
  824: 1000620  a0 00                    ldy   #0
  825: 1000622  20 12 00                 jsr   mem.fetch
  826: 1000625  ad 6c 03                 lda   linhdr
  827: 1000628  85 23                    sta   zw0
  828: 100062a  ad 6d 03                 lda   linhdr+1
  829: 100062d  85 24                    sta   zw0+1
  830: 100062f  05 23                    ora   zw0
  831: 1000631  f0 0c                    beq   +
  832: 1000633  ad 6e 03                 lda   linhdr+2
  833: 1000636  ac 6f 03                 ldy   linhdr+3
  834: 1000639  20 12 00                 jsr   mem.fetch
  835: 100063c  4c 16 06                 jmp   --
  836: 100063f  60       +               rts   
  840: 1000640  ae c7 00 winclose        ldx   nwin
  841: 1000643  d0 01                    bne   +
  842: 1000645  60                       rts   
  844: 1000646  ca       +               dex   
  845: 1000647  8e c7 00                 stx   nwin
  846: 100064a  bd c8 00                 lda   win_table_lo,x
  847: 100064d  85 20                    sta   zp0
  848: 100064f  bd cd 00                 lda   win_table_hi,x
  849: 1000652  85 21                    sta   zp0+1
  850: 1000654  bd d2 00                 lda   win_table_vhi,x
  851: 1000657  85 22                    sta   zp0+2
  852: 1000659  a9 d7                    lda   #<win_info
  853: 100065b  85 23                    sta   zw0
  854: 100065d  a9 00                    lda   #>win_info
  855: 100065f  85 24                    sta   zw0+1
  856: 1000661  a9 1a                    lda   #WIN_INFO_LEN
  857: 1000663  a0 00                    ldy   #0
  858: 1000665  20 12 00                 jsr   mem.fetch
  860: 1000668  ae c7 00                 ldx   nwin
  861: 100066b  bd c8 00                 lda   win_table_lo,x
  862: 100066e  85 20                    sta   zp0
  863: 1000670  bd cd 00                 lda   win_table_hi,x
  864: 1000673  85 21                    sta   zp0+1
  865: 1000675  bd d2 00                 lda   win_table_vhi,x
  866: 1000678  85 22                    sta   zp0+2
  867: 100067a  a9 1a                    lda   #WIN_INFO_LEN
  868: 100067c  a0 00                    ldy   #0
  869: 100067e  20 24 00                 jsr   mem.free
  872: 1000681  a2 02                    ldx   #2
  873: 1000683  bd ec 00 -               lda   win_cdata,x
  874: 1000686  95 20                    sta   zp0,x
  875: 1000688  ca                       dex   
  876: 1000689  10 f8                    bpl   -
  878: 100068b  05 21                    ora   zp0+1
  879: 100068d  05 22                    ora   zp0+2
  880: 100068f  f0 16                    beq   +n
  882: 1000691  20 16 06                 jsr   win_fetchchunks
  883: 1000694  a2 02                    ldx   #2
  884: 1000696  bd ec 00 -               lda   win_cdata,x
  885: 1000699  95 20                    sta   zp0,x
  886: 100069b  ca                       dex   
  887: 100069c  10 f8                    bpl   -
  888: 100069e  ad ef 00                 lda   win_clen
  889: 10006a1  ac f0 00                 ldy   win_clen+1
  890: 10006a4  20 24 00                 jsr   mem.free
  893: 10006a7  a2 02    +n              ldx   #2
  894: 10006a9  bd e7 00 -               lda   win_tdata,x
  895: 10006ac  95 20                    sta   zp0,x
  896: 10006ae  ca                       dex   
  897: 10006af  10 f8                    bpl   -
  899: 10006b1  05 21                    ora   zp0+1
  900: 10006b3  05 22                    ora   zp0+2
  901: 10006b5  f0 16                    beq   +n
  903: 10006b7  20 16 06                 jsr   win_fetchchunks
  904: 10006ba  a2 02                    ldx   #2
  905: 10006bc  bd e7 00 -               lda   win_tdata,x
  906: 10006bf  95 20                    sta   zp0,x
  907: 10006c1  ca                       dex   
  908: 10006c2  10 f8                    bpl   -
  909: 10006c4  ad ea 00                 lda   win_tlen
  910: 10006c7  ac eb 00                 ldy   win_tlen+1
  911: 10006ca  20 24 00                 jsr   mem.free
  913: 10006cd  a2 d7    +n              ldx   #<win_oattr
  914: 10006cf  a0 00                    ldy   #>win_oattr
  915: 10006d1  20 f6 0d                 jsr   restattr
  917: 10006d4  ad e7 00                 lda   win_tdata
  918: 10006d7  0d e8 00                 ora   win_tdata+1
  919: 10006da  0d e9 00                 ora   win_tdata+2
  920: 10006dd  d0 03                    bne   +
  921: 10006df  20 95 08                 jsr   clear
  922: 10006e2  60       +               rts   
  924: 10006e3  ad 11 d0 blankscr        lda   53265
  925: 10006e6  49 10                    eor   #$10
  926: 10006e8  8d 11 d0                 sta   53265
  927: 10006eb  60                       rts   
  933: 10006ec  85 82    rvslin          sta   ctmp
  934: 10006ee  8a                       txa   
  935: 10006ef  48                       pha   
  936: 10006f0  a6 82                    ldx   ctmp
  937: 10006f2  f0 29                    beq   rvslin_end
  939: 10006f4  20 34 0e ++              jsr   ramon
  940: 10006f7  24 8f                    bit   crsr
  941: 10006f9  30 09                    bmi   +
  942: 10006fb  a9 0f                    lda   #$0f
  943: 10006fd  20 25 07                 jsr   rvschar
  944: 1000700  20 a4 09                 jsr   advloc
  945: 1000703  ca                       dex   
  946: 1000704  8a       +               txa   
  947: 1000705  4a                       lsr   
  948: 1000706  f0 0e                    beq   +
  949: 1000708  08                       php   
  950: 1000709  aa                       tax   
  951: 100070a  a9 ff    -               lda   #$ff
  952: 100070c  20 25 07                 jsr   rvschar
  953: 100070f  20 a4 09                 jsr   advloc
  954: 1000712  ca                       dex   
  955: 1000713  d0 f5                    bne   -
  956: 1000715  28                       plp   
  957: 1000716  90 05    +               bcc   rvslin_end
  958: 1000718  a9 f0                    lda   #$f0
  959: 100071a  20 25 07                 jsr   rvschar
  961: 100071d  20 39 0e rvslin_end      jsr   ramoff
  962: 1000720  68                       pla   
  963: 1000721  aa                       tax   
  964: 1000722  4c 45 01                 jmp   crsrupd
  966: 1000725  8d 2d 07 rvschar         sta   rvseor+1
  967: 1000728  a0 07                    ldy   #7
  968: 100072a  b1 83    -               lda   (loc),y
  969: 100072c  49 ff    rvseor          eor   #$ff
  970: 100072e  91 83                    sta   (loc),y
  971: 1000730  88                       dey   
  972: 1000731  10 f7                    bpl   -
  973: 1000733  60       -rts            rts   
  975: 1000734  46 4f 4e 54 38 30 2e
                         ffont80         .text "font80."
  976: 100073b  00 00 00 00 00 00 00 00 00 00
                         mfont80         .zero 10
  978: 1000745  86 6e    newfont         stx   sptr
  979: 1000747  84 6f                    sty   sptr+1
  980: 1000749  a2 3b                    ldx   #<mfont80
  981: 100074b  a0 07                    ldy   #>mfont80
  982: 100074d  20 92 01                 jsr   api.strCopy
  985: 1000750  a2 34                    ldx   #<ffont80
  986: 1000752  a0 07                    ldy   #>ffont80
  987: 1000754  20 ba 00                 jsr   api.modLoadInit
  988: 1000757  b0 da                    bcs   -rts
  989: 1000759  38                       sec   
  990: 100075a  a2 69                    ldx   #<drawchar
  991: 100075c  a0 00                    ldy   #>drawchar
  992: 100075e  20 09 00                 jsr   prg.loadataddr
  994: 1000761  a2 02                    ldx   #2
  995: 1000763  20 c6 ff                 jsr   kernChkin
  996: 1000766  20 cf ff                 jsr   kernChrin
  997: 1000769  85 74                    sta   zl
  998: 100076b  20 cf ff                 jsr   kernChrin
  999: 100076e  85 75                    sta   zl+1
 1000: 1000770  a2 00                    ldx   #<font80
 1001: 1000772  a0 d8                    ldy   #>font80
 1002: 1000774  86 23                    stx   zw0
 1003: 1000776  84 24                    sty   zw0+1
 1005: 1000778  a0 00    --              ldy   #0
 1006: 100077a  20 cf ff -               jsr   kernChrin
 1007: 100077d  99 00 05                 sta   genbuf,y
 1008: 1000780  c8                       iny   
 1009: 1000781  d0 f7                    bne   -
 1010: 1000783  20 34 0e                 jsr   ramon
 1011: 1000786  b9 00 05 -               lda   genbuf,y
 1012: 1000789  91 23                    sta   (zw0),y
 1013: 100078b  c8                       iny   
 1014: 100078c  d0 f8                    bne   -
 1015: 100078e  20 39 0e                 jsr   ramoff
 1016: 1000791  e6 24                    inc   zw0+1
 1017: 1000793  c6 75                    dec   zl+1
 1018: 1000795  d0 e1                    bne   --
 1019: 1000797  20 cc ff                 jsr   kernRestore
 1020: 100079a  a9 02                    lda   #2
 1021: 100079c  20 c3 ff                 jsr   kernClose
 1022: 100079f  18                       clc   
 1023: 10007a0  60       +rts            rts   
 1025: 10007a1  a5 83    transf          lda   loc
 1026: 10007a3  85 87                    sta   scptr
 1027: 10007a5  a5 84                    lda   loc+1
 1028: 10007a7  85 88                    sta   scptr+1
 1029: 10007a9  60       -rts            rts   
 1031: 10007aa  ec 5f 00 insert          cpx   scrolltop
 1032: 10007ad  90 fa                    bcc   -rts
 1033: 10007af  ec 60 00                 cpx   scrollbot
 1034: 10007b2  f0 02                    beq   +
 1035: 10007b4  b0 f3                    bcs   -rts
 1036: 10007b6  85 8c    +               sta   nlines
 1037: 10007b8  86 8d                    stx   stlin
 1038: 10007ba  20 d0 07                 jsr   delall
 1039: 10007bd  ae 60 00                 ldx   scrollbot
 1040: 10007c0  8a       -               txa   
 1041: 10007c1  38                       sec   
 1042: 10007c2  e5 8c                    sbc   nlines
 1043: 10007c4  20 4d 0c                 jsr   adv
 1044: 10007c7  ca                       dex   
 1045: 10007c8  c5 8d                    cmp   stlin
 1046: 10007ca  d0 f4                    bne   -
 1047: 10007cc  aa                       tax   
 1048: 10007cd  4c ce 08                 jmp   scroll3
 1050: 10007d0  8a       delall          txa   
 1051: 10007d1  18                       clc   
 1052: 10007d2  65 8c                    adc   nlines
 1053: 10007d4  cd 60 00                 cmp   scrollbot
 1054: 10007d7  90 0f                    bcc   +
 1055: 10007d9  f0 0d                    beq   +
 1056: 10007db  20 69 0d -               jsr   erase
 1057: 10007de  e8                       inx   
 1058: 10007df  ec 60 00                 cpx   scrollbot
 1059: 10007e2  90 f7                    bcc   -
 1060: 10007e4  f0 f5                    beq   -
 1061: 10007e6  68                       pla   
 1062: 10007e7  68                       pla   
 1063: 10007e8  60       +               rts   
 1065: 10007e9  a4 81    down            ldy   crow
 1066: 10007eb  cc 60 00                 cpy   scrollbot
 1067: 10007ee  f0 07                    beq   down1
 1068: 10007f0  cc 5e 00                 cpy   botline
 1069: 10007f3  90 3b                    bcc   down2
 1070: 10007f5  b0 3b                    bcs   down2b
 1071: 10007f7  a9 01    down1           lda   #1
 1072: 10007f9  2c 67 00                 bit   scrollahead
 1073: 10007fc  10 29                    bpl   down10
 1074: 10007fe  aa                       tax   
 1075: 10007ff  38                       sec   
 1076: 1000800  ad 60 00                 lda   scrollbot
 1077: 1000803  ed 5f 00                 sbc   scrolltop
 1078: 1000806  8d 83 00                 sta   nscroll
 1079: 1000809  ee 83 00                 inc   nscroll
 1080: 100080c  cd 82 00                 cmp   minscroll
 1081: 100080f  90 04                    bcc   +
 1082: 1000811  20 5a 00                 jsr   api.rsBufNewlines
 1083: 1000814  e8                       inx   
 1084: 1000815  8a       +               txa   
 1085: 1000816  c9 01                    cmp   #1
 1086: 1000818  f0 0d                    beq   down10
 1087: 100081a  c9 0c                    cmp   #12
 1088: 100081c  90 02                    bcc   +
 1089: 100081e  a9 0c                    lda   #12
 1090: 1000820  a8       +               tay   
 1091: 1000821  88                       dey   
 1092: 1000822  c6 81    -               dec   crow
 1093: 1000824  88                       dey   
 1094: 1000825  d0 fb                    bne   -
 1095: 1000827  ae 5f 00 down10          ldx   scrolltop
 1096: 100082a  20 ab 08                 jsr   scroll
 1097: 100082d  4c 32 08                 jmp   down2b
 1098: 1000830  e6 81    down2           inc   crow
 1099: 1000832  ee 3d 08 down2b          inc   nt_mline
 1100: 1000835  2c 3c 08                 bit   nt_more
 1101: 1000838  10 14                    bpl   +
 1102: 100083a  38                       sec   
 1103: 100083b  ad 60 00                 lda   scrollbot
 1104: 100083e  ed 5f 00                 sbc   scrolltop
 1105: 1000841  aa                       tax   
 1106: 1000842  ca                       dex   
 1107: 1000843  ec 3d 08                 cpx   nt_mline
 1108: 1000846  b0 06                    bcs   +
 1109: 1000848  20 45 01                 jsr   crsrupd
 1110: 100084b  20 56 01                 jsr   api.outMore
 1111: 100084e  38       +               sec   
 1112: 100084f  60       -rts            rts   
 1114: 1000850  bd 19 00 getloc          lda   rowlo,x
 1115: 1000853  85 83                    sta   loc
 1116: 1000855  bd 33 00                 lda   rowhi,x
 1117: 1000858  85 84                    sta   loc+1
 1118: 100085a  bd 4d 00 getcol          lda   collo,x
 1119: 100085d  85 85                    sta   coloc
 1120: 100085f  bd 66 00                 lda   colhi,x
 1121: 1000862  85 86                    sta   coloc+1
 1122: 1000864  60       -rts            rts   
 1124: 1000865  2c 84 00 crsron          bit   crsrmode
 1125: 1000868  30 fa                    bmi   -rts
 1126: 100086a  a9 ff                    lda   #$ff
 1127: 100086c  d0 07                    bne   +
 1128: 100086e  2c 84 00 crsroff         bit   crsrmode
 1129: 1000871  10 f1                    bpl   -rts
 1130: 1000873  a9 00                    lda   #0
 1131: 1000875  8d 84 00 +               sta   crsrmode
 1132: 1000878  4c 80 08                 jmp   blcrsr
 1134: 100087b  2c 84 00 togcrsr         bit   crsrmode
 1135: 100087e  10 e4                    bpl   -rts
 1136: 1000880  48       blcrsr          pha   
 1137: 1000881  84 ff                    sty   temp
 1138: 1000883  20 34 0e                 jsr   ramon
 1139: 1000886  a0 07                    ldy   #7
 1140: 1000888  b1 83                    lda   (loc),y
 1141: 100088a  45 8f                    eor   crsr
 1142: 100088c  91 83                    sta   (loc),y
 1143: 100088e  20 39 0e                 jsr   ramoff
 1144: 1000891  a4 ff                    ldy   temp
 1145: 1000893  68                       pla   
 1146: 1000894  60                       rts   
 1148: 1000895  ae 5e 00 clear           ldx   botline
 1149: 1000898  20 69 0d -               jsr   erase
 1150: 100089b  ec 5d 00                 cpx   topline
 1151: 100089e  f0 03                    beq   +
 1152: 10008a0  ca                       dex   
 1153: 10008a1  10 f5                    bpl   -
 1154: 10008a3  a9 00    +               lda   #0
 1155: 10008a5  8d 3d 08                 sta   nt_mline
 1156: 10008a8  4c 8a 0a                 jmp   home
 1158: 10008ab           delete          =     *
 1159: 10008ab  ec 5f 00 scroll          cpx   scrolltop
 1160: 10008ae  90 59                    bcc   scroll4
 1161: 10008b0  ec 60 00                 cpx   scrollbot
 1162: 10008b3  f0 02                    beq   +
 1163: 10008b5  b0 52                    bcs   scroll4
 1164: 10008b7  85 8c    +               sta   nlines
 1165: 10008b9  20 d0 07                 jsr   delall
 1166: 10008bc  8a       scroll0         txa   
 1167: 10008bd  18                       clc   
 1168: 10008be  65 8c                    adc   nlines
 1169: 10008c0  20 4d 0c                 jsr   adv
 1170: 10008c3  e8                       inx   
 1171: 10008c4  cd 60 00                 cmp   scrollbot
 1172: 10008c7  f0 05                    beq   scroll3
 1173: 10008c9  cd 5e 00                 cmp   botline
 1174: 10008cc  90 ee                    bcc   scroll0
 1177: 10008ce  20 69 0d scroll3         jsr   erase
 1178: 10008d1  e8                       inx   
 1179: 10008d2  c6 8c                    dec   nlines
 1180: 10008d4  d0 f8                    bne   scroll3
 1181: 10008d6  4c 45 01                 jmp   crsrupd
 1183: 10008d9  ce 68 00 outraw          dec   noprocess
 1184: 10008dc  20 e3 08                 jsr   outchr
 1185: 10008df  ee 68 00                 inc   noprocess
 1186: 10008e2  60                       rts   
 1188: 10008e3  85 82    outchr          sta   ctmp
 1189: 10008e5  48                       pha   
 1190: 10008e6  8a                       txa   
 1191: 10008e7  48                       pha   
 1192: 10008e8  98                       tya   
 1193: 10008e9  48                       pha   
 1194: 10008ea  2c 84 00                 bit   crsrmode
 1195: 10008ed  10 03                    bpl   +
 1196: 10008ef  20 80 08                 jsr   blcrsr
 1197: 10008f2  a5 82    +               lda   ctmp
 1198: 10008f4  20 0a 09                 jsr   proschr
 1199: 10008f7  90 03                    bcc   outchr1
 1200: 10008f9  20 45 01                 jsr   crsrupd
 1201: 10008fc  2c 84 00 outchr1         bit   crsrmode
 1202: 10008ff  10 03                    bpl   +
 1203: 1000901  20 80 08                 jsr   blcrsr
 1204: 1000904  68       +               pla   
 1205: 1000905  a8                       tay   
 1206: 1000906  68                       pla   
 1207: 1000907  aa                       tax   
 1208: 1000908  68                       pla   
 1209: 1000909  60       scroll4         rts   
 1211: 100090a  48       proschr         pha   
 1212: 100090b  29 7f                    and   #$7f
 1213: 100090d  c9 20                    cmp   #" "
 1214: 100090f  68                       pla   
 1215: 1000910  f0 2e                    beq   clcrts
 1216: 1000912  90 06                    bcc   outchr3
 1217: 1000914  20 25 0b nproschr        jsr   putch0
 1218: 1000917  4c 8d 09                 jmp   rtcrsr
 1220: 100091a  c9 0a    outchr3         cmp   #LF
 1221: 100091c  d0 03                    bne   chr0
 1222: 100091e  4c e9 07                 jmp   down
 1224: 1000921  c9 0d    chr0            cmp   #CR
 1225: 1000923  f0 09                    beq   return
 1226: 1000925  2c 68 00                 bit   noprocess
 1227: 1000928  30 0a                    bmi   chr1
 1228: 100092a  c9 8d                    cmp   #141
 1229: 100092c  d0 06                    bne   chr1
 1230: 100092e  a9 00    return          lda   #0
 1231: 1000930  85 80                    sta   ccol
 1232: 1000932           -                     
 1233: 1000932  38       +               sec   
 1234: 1000933  60                       rts   
 1236: 1000934  c9 09    chr1            cmp   #TAB
 1237: 1000936  d0 13                    bne   chr1g
 1238: 1000938  a6 80                    ldx   ccol
 1239: 100093a  e8       -               inx   
 1240: 100093b  ec 5c 00                 cpx   columns
 1241: 100093e  d0 02                    bne   +
 1242: 1000940  18       clcrts          clc   
 1243: 1000941  60                       rts   
 1244: 1000942  bd 79 00 +               lda   tabs,x
 1245: 1000945  f0 f3                    beq   -
 1246: 1000947  86 80                    stx   ccol
 1247: 1000949  38       secrts          sec   
 1248: 100094a  60                       rts   
 1250: 100094b  c9 07    chr1g           cmp   #BELL
 1251: 100094d  d0 05                    bne   chr1d
 1252: 100094f  20 4d 01                 jsr   api.outBell
 1253: 1000952  18                       clc   
 1254: 1000953  60                       rts   
 1256: 1000954  c9 08    chr1d           cmp   #BS
 1257: 1000956  d0 03                    bne   chr2
 1258: 1000958  4c cb 09                 jmp   cleft
 1260: 100095b  c9 0c    chr2            cmp   #12
 1261: 100095d  f0 09                    beq   chr2a
 1262: 100095f  2c 68 00                 bit   noprocess
 1263: 1000962  30 b0                    bmi   nproschr
 1264: 1000964  c9 93                    cmp   #CLR
 1265: 1000966  d0 03                    bne   chr3
 1266: 1000968  4c 95 08 chr2a           jmp   clear
 1268: 100096b  c9 11    chr3            cmp   #DOWN
 1269: 100096d  d0 15                    bne   chr4
 1270: 100096f  a6 81                    ldx   crow
 1271: 1000971  ec 60 00                 cpx   scrollbot
 1272: 1000974  f0 ca                    beq   clcrts
 1273: 1000976  ec 5e 00                 cpx   botline
 1274: 1000979  f0 c5                    beq   clcrts
 1275: 100097b  ec 55 00                 cpx   lastrow
 1276: 100097e  f0 c0                    beq   clcrts
 1277: 1000980  e6 81                    inc   crow
 1278: 1000982  d0 c5                    bne   secrts
 1280: 1000984  c9 1d    chr4            cmp   #RIGHT
 1281: 1000986  d0 29                    bne   chr5
 1282: 1000988  20 09 0b                 jsr   advdown
 1283: 100098b  b0 22                    bcs   +clc
 1284: 100098d  e6 80    rtcrsr          inc   ccol
 1285: 100098f  a5 80                    lda   ccol
 1286: 1000991  cd 5c 00                 cmp   columns
 1287: 1000994  f0 08                    beq   rtcrsr0
 1288: 1000996  24 8f                    bit   crsr
 1289: 1000998  10 06                    bpl   rtcrsr1
 1290: 100099a  a9 0f                    lda   #$0f
 1291: 100099c  85 8f                    sta   crsr
 1292: 100099e  18       rtcrsr0         clc   
 1293: 100099f  60                       rts   
 1294: 10009a0  a9 f0    rtcrsr1         lda   #$f0
 1295: 10009a2  85 8f                    sta   crsr
 1296: 10009a4  18       advloc          clc   
 1297: 10009a5  a5 83                    lda   loc
 1298: 10009a7  69 08                    adc   #8
 1299: 10009a9  85 83                    sta   loc
 1300: 10009ab  90 03                    bcc   +
 1301: 10009ad  e6 84                    inc   loc+1
 1302: 10009af  18       +clc            clc   
 1303: 10009b0  60       +               rts   
 1305: 10009b1  c9 91    chr5            cmp   #UP
 1306: 10009b3  d0 12                    bne   chr6
 1307: 10009b5  a5 81                    lda   crow
 1308: 10009b7  f0 1a                    beq   ++
 1309: 10009b9  cd 5f 00                 cmp   scrolltop
 1310: 10009bc  f0 15                    beq   ++
 1311: 10009be  cd 5d 00                 cmp   topline
 1312: 10009c1  f0 10                    beq   ++
 1313: 10009c3  c6 81                    dec   crow
 1314: 10009c5  38       +               sec   
 1315: 10009c6  60                       rts   
 1317: 10009c7  c9 9d    chr6            cmp   #LEFT
 1318: 10009c9  d0 0a                    bne   chr7
 1319: 10009cb  a5 80    cleft           lda   ccol
 1320: 10009cd  f0 04                    beq   ++
 1321: 10009cf  c6 80                    dec   ccol
 1322: 10009d1  38                       sec   
 1323: 10009d2  60                       rts   
 1324: 10009d3  18       ++              clc   
 1325: 10009d4  60                       rts   
 1327: 10009d5  a2 0f    chr7            ldx   #15
 1328: 10009d7  dd b7 00 -               cmp   kcoltbl,x
 1329: 10009da  f0 05                    beq   +
 1330: 10009dc  ca                       dex   
 1331: 10009dd  10 f8                    bpl   -
 1332: 10009df  30 0e                    bmi   chr8
 1333: 10009e1  ad 61 00 +               lda   charcolor
 1334: 10009e4  29 f0                    and   #$f0
 1335: 10009e6  1d 97 00                 ora   invctbl,x
 1336: 10009e9  8d 61 00                 sta   charcolor
 1337: 10009ec  4c a5 0d                 jmp   setattr
 1339: 10009ef  c9 12    chr8            cmp   #18
 1340: 10009f1  d0 07                    bne   chr9
 1341: 10009f3  a9 ff                    lda   #$ff
 1342: 10009f5  8d 65 00                 sta   rvs
 1343: 10009f8  18                       clc   
 1344: 10009f9  60                       rts   
 1346: 10009fa  c9 92    chr9            cmp   #146
 1347: 10009fc  d0 07                    bne   chr10
 1348: 10009fe  a9 00                    lda   #0
 1349: 1000a00  8d 65 00                 sta   rvs
 1350: 1000a03  18                       clc   
 1351: 1000a04  60                       rts   
 1353: 1000a05  c9 94    chr10           cmp   #INS
 1354: 1000a07  f0 03                    beq   +
 1355: 1000a09  4c 76 0a                 jmp   chk80
 1356: 1000a0c  a5 80    +               lda   ccol
 1357: 1000a0e  cd 56 00                 cmp   lastcol
 1358: 1000a11  b0 5c                    bcs   chr3i
 1359: 1000a13  85 8e                    sta   sclin
 1360: 1000a15  ad 56 00                 lda   lastcol
 1361: 1000a18  85 80                    sta   ccol
 1362: 1000a1a  20 45 01                 jsr   crsrupd
 1363: 1000a1d  20 a1 07                 jsr   transf
 1364: 1000a20  c6 80                    dec   ccol
 1365: 1000a22  20 45 01                 jsr   crsrupd
 1366: 1000a25  20 34 0e                 jsr   ramon
 1368: 1000a28  a6 80                    ldx   ccol
 1369: 1000a2a  a0 07    chr3b           ldy   #7
 1370: 1000a2c  b1 83    -               lda   (loc),y
 1371: 1000a2e  4a                       lsr   
 1372: 1000a2f  4a                       lsr   
 1373: 1000a30  4a                       lsr   
 1374: 1000a31  4a                       lsr   
 1375: 1000a32  91 83                    sta   (loc),y
 1376: 1000a34  88                       dey   
 1377: 1000a35  10 f5                    bpl   -
 1378: 1000a37  38                       sec   
 1379: 1000a38  a5 83                    lda   loc
 1380: 1000a3a  e9 08                    sbc   #8
 1381: 1000a3c  85 83                    sta   loc
 1382: 1000a3e  b0 02                    bcs   +
 1383: 1000a40  c6 84                    dec   loc+1
 1384: 1000a42  e4 8e    +               cpx   sclin
 1385: 1000a44  f0 21                    beq   chr3h
 1399: 1000a46  ca       +               dex   
 1400: 1000a47  a0 07                    ldy   #7
 1401: 1000a49  b1 83    -               lda   (loc),y
 1402: 1000a4b  0a                       asl   
 1403: 1000a4c  0a                       asl   
 1404: 1000a4d  0a                       asl   
 1405: 1000a4e  0a                       asl   
 1406: 1000a4f  85 ff                    sta   temp
 1407: 1000a51  b1 87                    lda   (scptr),y
 1408: 1000a53  29 0f                    and   #$0f
 1409: 1000a55  05 ff                    ora   temp
 1410: 1000a57  91 87                    sta   (scptr),y
 1411: 1000a59  88                       dey   
 1412: 1000a5a  10 ed                    bpl   -
 1413: 1000a5c  20 a1 07                 jsr   transf
 1414: 1000a5f  e4 8e                    cpx   sclin
 1415: 1000a61  f0 04                    beq   chr3h
 1416: 1000a63  ca                       dex   
 1417: 1000a64  4c 2a 0a                 jmp   chr3b
 1418: 1000a67  86 80    chr3h           stx   ccol
 1419: 1000a69  20 45 01                 jsr   crsrupd
 1420: 1000a6c  20 39 0e                 jsr   ramoff
 1422: 1000a6f  a9 20    chr3i           lda   #" "
 1423: 1000a71  20 2a 0b                 jsr   putchar
 1424: 1000a74  38                       sec   
 1425: 1000a75  60                       rts   
 1427: 1000a76  a6 80    chk80           ldx   ccol
 1428: 1000a78  ec 5c 00                 cpx   columns
 1429: 1000a7b  90 02                    bcc   chr14
 1430: 1000a7d  c6 80                    dec   ccol
 1432: 1000a7f  c9 0b    chr14           cmp   #11
 1433: 1000a81  d0 03                    bne   chr11
 1434: 1000a83  4c 8b 0b                 jmp   clrtoeol
 1436: 1000a86  c9 13    chr11           cmp   #HOME
 1437: 1000a88  d0 0c                    bne   chr12
 1438: 1000a8a  a9 00    home            lda   #0
 1439: 1000a8c  85 80                    sta   ccol
 1440: 1000a8e  ad 5d 00                 lda   topline
 1441: 1000a91  85 81                    sta   crow
 1442: 1000a93  4c 45 01                 jmp   crsrupd
 1444: 1000a96  c9 14    chr12           cmp   #DEL
 1445: 1000a98  f0 02                    beq   +
 1446: 1000a9a  18       -               clc   
 1447: 1000a9b  60                       rts   
 1449: 1000a9c  a5 80    +               lda   ccol
 1450: 1000a9e  f0 fa                    beq   -
 1451: 1000aa0  20 45 01                 jsr   crsrupd
 1452: 1000aa3  20 a1 07                 jsr   transf
 1453: 1000aa6  c6 80                    dec   ccol
 1454: 1000aa8  20 45 01                 jsr   crsrupd
 1455: 1000aab  20 34 0e                 jsr   ramon
 1456: 1000aae  a6 80                    ldx   ccol
 1457: 1000ab0  8a                       txa   
 1458: 1000ab1  4a                       lsr   
 1459: 1000ab2  90 21                    bcc   chr7e
 1461: 1000ab4  a0 07    chr7a           ldy   #7
 1462: 1000ab6  b1 87    -               lda   (scptr),y
 1463: 1000ab8  4a                       lsr   
 1464: 1000ab9  4a                       lsr   
 1465: 1000aba  4a                       lsr   
 1466: 1000abb  4a                       lsr   
 1467: 1000abc  85 ff                    sta   temp
 1468: 1000abe  b1 83                    lda   (loc),y
 1469: 1000ac0  29 f0                    and   #$f0
 1470: 1000ac2  05 ff                    ora   temp
 1471: 1000ac4  91 83                    sta   (loc),y
 1472: 1000ac6  88                       dey   
 1473: 1000ac7  10 ed                    bpl   -
 1475: 1000ac9  18                       clc   
 1476: 1000aca  a5 83                    lda   loc
 1477: 1000acc  69 08                    adc   #8
 1478: 1000ace  85 83                    sta   loc
 1479: 1000ad0  90 02                    bcc   +
 1480: 1000ad2  e6 84                    inc   loc+1
 1481: 1000ad4  e8       +               inx   
 1483: 1000ad5  a5 80    chr7e           lda   ccol
 1484: 1000ad7  4a                       lsr   
 1485: 1000ad8  b0 0c                    bcs   +
 1486: 1000ada  8a                       txa   
 1487: 1000adb  4a                       lsr   
 1488: 1000adc  a8                       tay   
 1489: 1000add  c0 28                    cpy   #40
 1490: 1000adf  b0 05                    bcs   +
 1491: 1000ae1  b1 85                    lda   (coloc),y
 1492: 1000ae3  88                       dey   
 1493: 1000ae4  91 85                    sta   (coloc),y
 1495: 1000ae6  a0 07    +               ldy   #7
 1496: 1000ae8  b1 87    -               lda   (scptr),y
 1497: 1000aea  0a                       asl   
 1498: 1000aeb  0a                       asl   
 1499: 1000aec  0a                       asl   
 1500: 1000aed  0a                       asl   
 1501: 1000aee  91 87                    sta   (scptr),y
 1502: 1000af0  88                       dey   
 1503: 1000af1  10 f5                    bpl   -
 1504: 1000af3  18                       clc   
 1505: 1000af4  a5 87                    lda   scptr
 1506: 1000af6  69 08                    adc   #8
 1507: 1000af8  85 87                    sta   scptr
 1508: 1000afa  90 02                    bcc   +
 1509: 1000afc  e6 88                    inc   scptr+1
 1510: 1000afe  e8       +               inx   
 1511: 1000aff  ec 56 00                 cpx   lastcol
 1512: 1000b02  90 b0                    bcc   chr7a
 1513: 1000b04  20 39 0e                 jsr   ramoff
 1514: 1000b07  38                       sec   
 1515: 1000b08  60                       rts   
 1517: 1000b09  a6 80    advdown         ldx   ccol
 1518: 1000b0b  ec 5c 00                 cpx   columns
 1519: 1000b0e  90 11                    bcc   advd1
 1520: 1000b10  2c 66 00                 bit   wrap
 1521: 1000b13  10 0e                    bpl   +
 1522: 1000b15  48                       pha   
 1523: 1000b16  a9 00                    lda   #0
 1524: 1000b18  85 80                    sta   ccol
 1525: 1000b1a  20 e9 07                 jsr   down
 1526: 1000b1d  20 45 01                 jsr   crsrupd
 1527: 1000b20  68                       pla   
 1528: 1000b21  18       advd1           clc   
 1529: 1000b22  60                       rts   
 1530: 1000b23  38       +               sec   
 1531: 1000b24  60       -               rts   
 1533: 1000b25  20 09 0b putch0          jsr   advdown
 1534: 1000b28  b0 f7                    bcs   advd1
 1535: 1000b2a  85 82    putchar         sta   ctmp
 1536: 1000b2c  a5 8f                    lda   crsr
 1537: 1000b2e  49 ff                    eor   #$ff
 1538: 1000b30  85 8c                    sta   nlines
 1540: 1000b32  a9 1b                    lda   #>font80/8
 1541: 1000b34  85 88                    sta   scptr+1
 1542: 1000b36  a5 82                    lda   ctmp
 1543: 1000b38  0a                       asl   
 1544: 1000b39  26 88                    rol   scptr+1
 1545: 1000b3b  0a                       asl   
 1546: 1000b3c  26 88                    rol   scptr+1
 1547: 1000b3e  0a                       asl   
 1548: 1000b3f  26 88                    rol   scptr+1
 1549: 1000b41  85 87                    sta   scptr
 1551: 1000b43  20 34 0e                 jsr   ramon
 1552: 1000b46  a0 07                    ldy   #7
 1553: 1000b48  ae 63 00                 ldx   underline
 1554: 1000b4b  f0 04                    beq   +
 1555: 1000b4d  a9 ff                    lda   #$ff
 1556: 1000b4f  d0 02                    bne   +x
 1557: 1000b51           -                     
 1558: 1000b51  b1 87    +               lda   (scptr),y
 1559: 1000b53  4d 65 00 +x              eor   rvs
 1560: 1000b56  25 8f                    and   crsr
 1561: 1000b58  85 ff                    sta   temp
 1562: 1000b5a  b1 83                    lda   (loc),y
 1563: 1000b5c  25 8c                    and   nlines
 1564: 1000b5e  05 ff                    ora   temp
 1565: 1000b60  91 83                    sta   (loc),y
 1566: 1000b62  88                       dey   
 1567: 1000b63  10 ec                    bpl   -
 1569: 1000b65  a5 80                    lda   ccol
 1570: 1000b67  4a                       lsr   
 1571: 1000b68  a8                       tay   
 1572: 1000b69  ad 81 00                 lda   cattr
 1573: 1000b6c  91 85                    sta   (coloc),y
 1574: 1000b6e  ad 65 00                 lda   rvs
 1575: 1000b71  0d 63 00                 ora   underline
 1576: 1000b74  d0 06                    bne   +
 1577: 1000b76  a5 82                    lda   ctmp
 1578: 1000b78  c9 20                    cmp   #" "
 1579: 1000b7a  f0 0c                    beq   ++
 1580: 1000b7c           +                     
 1582: 1000b7c  a6 81                    ldx   crow
 1583: 1000b7e  c8                       iny   
 1584: 1000b7f  98                       tya   
 1585: 1000b80  dd 00 00                 cmp   lastpos,x
 1586: 1000b83  90 03                    bcc   ++
 1587: 1000b85  9d 00 00                 sta   lastpos,x
 1588: 1000b88  4c 39 0e ++              jmp   ramoff
 1590: 1000b8b  a5 80    clrtoeol        lda   ccol
 1591: 1000b8d  d0 08                    bne   +
 1592: 1000b8f  a6 81    clrerase        ldx   crow
 1593: 1000b91  20 69 0d                 jsr   erase
 1594: 1000b94  4c 45 01                 jmp   crsrupd
 1595: 1000b97  cd 5c 00 +               cmp   columns
 1596: 1000b9a  90 05                    bcc   +
 1597: 1000b9c  ad 56 00                 lda   lastcol
 1598: 1000b9f  85 80                    sta   ccol
 1599: 1000ba1  48       +               pha   
 1600: 1000ba2  4a                       lsr   
 1601: 1000ba3  a6 81                    ldx   crow
 1602: 1000ba5  9d 00 00                 sta   lastpos,x
 1603: 1000ba8  ad 84 00                 lda   crsrmode
 1604: 1000bab  48                       pha   
 1605: 1000bac  ad 65 00                 lda   rvs
 1606: 1000baf  48                       pha   
 1607: 1000bb0  ad 63 00                 lda   underline
 1608: 1000bb3  48                       pha   
 1609: 1000bb4  a9 00                    lda   #0
 1610: 1000bb6  8d 63 00                 sta   underline
 1611: 1000bb9  8d 65 00                 sta   rvs
 1612: 1000bbc  8d 84 00                 sta   crsrmode
 1613: 1000bbf  a6 80                    ldx   ccol
 1614: 1000bc1  90 0b                    bcc   +
 1615: 1000bc3  a9 20                    lda   #" "
 1616: 1000bc5  20 e3 08                 jsr   outchr
 1617: 1000bc8  e8                       inx   
 1618: 1000bc9  ec 5c 00                 cpx   columns
 1619: 1000bcc  b0 6a                    bcs   clrret
 1620: 1000bce  20 34 0e +               jsr   ramon
 1622: 1000bd1  a0 07    --              ldy   #7
 1623: 1000bd3  a9 00                    lda   #0
 1624: 1000bd5  91 83    -               sta   (loc),y
 1625: 1000bd7  88                       dey   
 1626: 1000bd8  10 fb                    bpl   -
 1627: 1000bda  8a                       txa   
 1628: 1000bdb  4a                       lsr   
 1629: 1000bdc  a8                       tay   
 1630: 1000bdd  ad 81 00                 lda   cattr
 1631: 1000be0  91 85                    sta   (coloc),y
 1632: 1000be2  18                       clc   
 1633: 1000be3  a5 83                    lda   loc
 1634: 1000be5  69 08                    adc   #8
 1635: 1000be7  85 83                    sta   loc
 1636: 1000be9  90 02                    bcc   +
 1637: 1000beb  e6 84                    inc   loc+1
 1638: 1000bed  e8       +               inx   
 1639: 1000bee  e8                       inx   
 1640: 1000bef  ec 5c 00                 cpx   columns
 1641: 1000bf2  90 dd                    bcc   --
 1642: 1000bf4  4c 38 0c                 jmp   clrret
 1644: 1000bf7  00       tempy           .byte 0
 1645: 1000bf8  00       county          .byte 0
 1647: 1000bf9  a5 80    clrfrombol      lda   ccol
 1648: 1000bfb  cd 56 00                 cmp   lastcol
 1649: 1000bfe  b0 8f                    bcs   clrerase
 1650: 1000c00  48                       pha   
 1651: 1000c01  a8                       tay   
 1652: 1000c02  c8                       iny   
 1653: 1000c03  8c f7 0b                 sty   tempy
 1654: 1000c06  a6 81                    ldx   crow
 1655: 1000c08  a0 00                    ldy   #0
 1656: 1000c0a  20 49 01                 jsr   crsrplot
 1657: 1000c0d  ad 84 00                 lda   crsrmode
 1658: 1000c10  48                       pha   
 1659: 1000c11  ad 65 00                 lda   rvs
 1660: 1000c14  48                       pha   
 1661: 1000c15  ad 63 00                 lda   underline
 1662: 1000c18  48                       pha   
 1663: 1000c19  a9 00                    lda   #0
 1664: 1000c1b  8d 63 00                 sta   underline
 1665: 1000c1e  8d 65 00                 sta   rvs
 1666: 1000c21  8d 84 00                 sta   crsrmode
 1667: 1000c24  8c f8 0b -               sty   county
 1668: 1000c27  a9 20                    lda   #" "
 1669: 1000c29  20 2a 0b                 jsr   putchar
 1670: 1000c2c  20 8d 09                 jsr   rtcrsr
 1671: 1000c2f  ac f8 0b                 ldy   county
 1672: 1000c32  c8                       iny   
 1673: 1000c33  cc f7 0b                 cpy   tempy
 1674: 1000c36  d0 ec                    bne   -
 1675: 1000c38  68       clrret          pla   
 1676: 1000c39  8d 63 00                 sta   underline
 1677: 1000c3c  68                       pla   
 1678: 1000c3d  8d 65 00                 sta   rvs
 1679: 1000c40  68                       pla   
 1680: 1000c41  8d 84 00                 sta   crsrmode
 1681: 1000c44  68                       pla   
 1682: 1000c45  85 80                    sta   ccol
 1683: 1000c47  20 39 0e                 jsr   ramoff
 1684: 1000c4a  4c 45 01                 jmp   crsrupd
 1686: 1000c4d  86 8e    adv             stx   sclin
 1687: 1000c4f  85 8b                    sta   mvlin
 1688: 1000c51  bd 19 00                 lda   rowlo,x
 1689: 1000c54  85 83                    sta   loc
 1690: 1000c56  bd 33 00                 lda   rowhi,x
 1691: 1000c59  85 84                    sta   loc+1
 1692: 1000c5b  bd 00 00                 lda   lastpos,x
 1693: 1000c5e  a8                       tay   
 1694: 1000c5f  a6 8b                    ldx   mvlin
 1695: 1000c61  bd 19 00                 lda   rowlo,x
 1696: 1000c64  85 87                    sta   scptr
 1697: 1000c66  bd 33 00                 lda   rowhi,x
 1698: 1000c69  85 88                    sta   scptr+1
 1699: 1000c6b                                 
 1700: 1000c6b                                 
 1701: 1000c6b                                 
 1702: 1000c6b                                 
 1703: 1000c6b                                 
 1704: 1000c6b                                 
 1705: 1000c6b                                 
 1706: 1000c6b                                 
 1707: 1000c6b                                 
 1708: 1000c6b                                 
 1709: 1000c6b                                 
 1709: 1000c6b                                 
 1710: 1000c6b                                 
 1711: 1000c6b                                 
 1712: 1000c6b                                 
 1713: 1000c6b                                 
 1714: 1000c6b  20 34 0e +               jsr   ramon
 1715: 1000c6e  98                       tya   
 1716: 1000c6f  dd 00 00                 cmp   lastpos,x
 1717: 1000c72  b0 03                    bcs   +
 1718: 1000c74  bd 00 00                 lda   lastpos,x
 1719: 1000c77  38       +               sec   
 1720: 1000c78  e9 01                    sbc   #1
 1721: 1000c7a  10 03                    bpl   +
 1722: 1000c7c  4c 39 0d                 jmp   adv2
 1723: 1000c7f  4a       +               lsr   
 1724: 1000c80  4a                       lsr   
 1725: 1000c81  aa                       tax   
 1726: 1000c82  e8                       inx   
 1727: 1000c83  a0 00                    ldy   #0
 1728: 1000c85  90 56                    bcc   ++
 1730: 1000c87  b1 87    adv1            lda   (scptr),y
 1731: 1000c89  91 83                    sta   (loc),y
 1732: 1000c8b  c8                       iny   
 1733: 1000c8c  b1 87                    lda   (scptr),y
 1734: 1000c8e  91 83                    sta   (loc),y
 1735: 1000c90  c8                       iny   
 1736: 1000c91  b1 87                    lda   (scptr),y
 1737: 1000c93  91 83                    sta   (loc),y
 1738: 1000c95  c8                       iny   
 1739: 1000c96  b1 87                    lda   (scptr),y
 1740: 1000c98  91 83                    sta   (loc),y
 1741: 1000c9a  c8                       iny   
 1742: 1000c9b  b1 87                    lda   (scptr),y
 1743: 1000c9d  91 83                    sta   (loc),y
 1744: 1000c9f  c8                       iny   
 1745: 1000ca0  b1 87                    lda   (scptr),y
 1746: 1000ca2  91 83                    sta   (loc),y
 1747: 1000ca4  c8                       iny   
 1748: 1000ca5  b1 87                    lda   (scptr),y
 1749: 1000ca7  91 83                    sta   (loc),y
 1750: 1000ca9  c8                       iny   
 1751: 1000caa  b1 87                    lda   (scptr),y
 1752: 1000cac  91 83                    sta   (loc),y
 1753: 1000cae  c8                       iny   
 1754: 1000caf  b1 87                    lda   (scptr),y
 1755: 1000cb1  91 83                    sta   (loc),y
 1756: 1000cb3  c8                       iny   
 1757: 1000cb4  b1 87                    lda   (scptr),y
 1758: 1000cb6  91 83                    sta   (loc),y
 1759: 1000cb8  c8                       iny   
 1760: 1000cb9  b1 87                    lda   (scptr),y
 1761: 1000cbb  91 83                    sta   (loc),y
 1762: 1000cbd  c8                       iny   
 1763: 1000cbe  b1 87                    lda   (scptr),y
 1764: 1000cc0  91 83                    sta   (loc),y
 1765: 1000cc2  c8                       iny   
 1766: 1000cc3  b1 87                    lda   (scptr),y
 1767: 1000cc5  91 83                    sta   (loc),y
 1768: 1000cc7  c8                       iny   
 1769: 1000cc8  b1 87                    lda   (scptr),y
 1770: 1000cca  91 83                    sta   (loc),y
 1771: 1000ccc  c8                       iny   
 1772: 1000ccd  b1 87                    lda   (scptr),y
 1773: 1000ccf  91 83                    sta   (loc),y
 1774: 1000cd1  c8                       iny   
 1775: 1000cd2  b1 87                    lda   (scptr),y
 1776: 1000cd4  91 83                    sta   (loc),y
 1777: 1000cd6  c8                       iny   
 1778: 1000cd7  d0 04                    bne   ++
 1779: 1000cd9  e6 84                    inc   loc+1
 1780: 1000cdb  e6 88                    inc   scptr+1
 1781: 1000cdd  b1 87    ++              lda   (scptr),y
 1782: 1000cdf  91 83                    sta   (loc),y
 1783: 1000ce1  c8                       iny   
 1784: 1000ce2  b1 87                    lda   (scptr),y
 1785: 1000ce4  91 83                    sta   (loc),y
 1786: 1000ce6  c8                       iny   
 1787: 1000ce7  b1 87                    lda   (scptr),y
 1788: 1000ce9  91 83                    sta   (loc),y
 1789: 1000ceb  c8                       iny   
 1790: 1000cec  b1 87                    lda   (scptr),y
 1791: 1000cee  91 83                    sta   (loc),y
 1792: 1000cf0  c8                       iny   
 1793: 1000cf1  b1 87                    lda   (scptr),y
 1794: 1000cf3  91 83                    sta   (loc),y
 1795: 1000cf5  c8                       iny   
 1796: 1000cf6  b1 87                    lda   (scptr),y
 1797: 1000cf8  91 83                    sta   (loc),y
 1798: 1000cfa  c8                       iny   
 1799: 1000cfb  b1 87                    lda   (scptr),y
 1800: 1000cfd  91 83                    sta   (loc),y
 1801: 1000cff  c8                       iny   
 1802: 1000d00  b1 87                    lda   (scptr),y
 1803: 1000d02  91 83                    sta   (loc),y
 1804: 1000d04  c8                       iny   
 1805: 1000d05  b1 87                    lda   (scptr),y
 1806: 1000d07  91 83                    sta   (loc),y
 1807: 1000d09  c8                       iny   
 1808: 1000d0a  b1 87                    lda   (scptr),y
 1809: 1000d0c  91 83                    sta   (loc),y
 1810: 1000d0e  c8                       iny   
 1811: 1000d0f  b1 87                    lda   (scptr),y
 1812: 1000d11  91 83                    sta   (loc),y
 1813: 1000d13  c8                       iny   
 1814: 1000d14  b1 87                    lda   (scptr),y
 1815: 1000d16  91 83                    sta   (loc),y
 1816: 1000d18  c8                       iny   
 1817: 1000d19  b1 87                    lda   (scptr),y
 1818: 1000d1b  91 83                    sta   (loc),y
 1819: 1000d1d  c8                       iny   
 1820: 1000d1e  b1 87                    lda   (scptr),y
 1821: 1000d20  91 83                    sta   (loc),y
 1822: 1000d22  c8                       iny   
 1823: 1000d23  b1 87                    lda   (scptr),y
 1824: 1000d25  91 83                    sta   (loc),y
 1825: 1000d27  c8                       iny   
 1826: 1000d28  b1 87                    lda   (scptr),y
 1827: 1000d2a  91 83                    sta   (loc),y
 1828: 1000d2c  c8                       iny   
 1829: 1000d2d  d0 04                    bne   +
 1830: 1000d2f  e6 84                    inc   loc+1
 1831: 1000d31  e6 88                    inc   scptr+1
 1832: 1000d33  ca       +               dex   
 1833: 1000d34  f0 03                    beq   adv2
 1834: 1000d36  4c 87 0c                 jmp   adv1
 1835: 1000d39  a6 8b    adv2            ldx   mvlin
 1836: 1000d3b  bd 4d 00                 lda   collo,x
 1837: 1000d3e  85 87                    sta   scptr
 1838: 1000d40  bd 66 00                 lda   colhi,x
 1839: 1000d43  85 88                    sta   scptr+1
 1840: 1000d45  bd 00 00                 lda   lastpos,x
 1841: 1000d48  a6 8e                    ldx   sclin
 1842: 1000d4a  9d 00 00                 sta   lastpos,x
 1843: 1000d4d  bd 4d 00                 lda   collo,x
 1844: 1000d50  85 85                    sta   coloc
 1845: 1000d52  bd 66 00                 lda   colhi,x
 1846: 1000d55  85 86                    sta   coloc+1
 1847: 1000d57  ad 56 00                 lda   lastcol
 1848: 1000d5a  4a                       lsr   
 1849: 1000d5b  a8                       tay   
 1850: 1000d5c  b1 87    -               lda   (scptr),y
 1851: 1000d5e  91 85                    sta   (coloc),y
 1852: 1000d60  88                       dey   
 1853: 1000d61  10 f9                    bpl   -
 1854: 1000d63  20 39 0e                 jsr   ramoff
 1855: 1000d66  a5 8b                    lda   mvlin
 1856: 1000d68  60                       rts   
 1858: 1000d69  ec 5b 00 erase           cpx   rows
 1859: 1000d6c  b0 36                    bcs   +rts
 1860: 1000d6e  20 34 0e                 jsr   ramon
 1861: 1000d71  20 50 08                 jsr   getloc
 1862: 1000d74  ad 56 00                 lda   lastcol
 1863: 1000d77  4a                       lsr   
 1864: 1000d78  a8                       tay   
 1865: 1000d79  ad 81 00                 lda   cattr
 1866: 1000d7c  91 85    -               sta   (coloc),y
 1867: 1000d7e  88                       dey   
 1868: 1000d7f  10 fb                    bpl   -
 1870: 1000d81  a0 00                    ldy   #0
 1871: 1000d83  84 87                    sty   scptr
 1872: 1000d85  a9 00    --              lda   #0
 1873: 1000d87  91 83    -               sta   (loc),y
 1874: 1000d89  c8                       iny   
 1875: 1000d8a  d0 04                    bne   +
 1876: 1000d8c  e6 84                    inc   loc+1
 1877: 1000d8e  e6 87                    inc   scptr
 1878: 1000d90  cc 85 00 +               cpy   rowlen
 1879: 1000d93  d0 f2                    bne   -
 1880: 1000d95  a5 87                    lda   scptr
 1881: 1000d97  cd 86 00                 cmp   rowlen+1
 1882: 1000d9a  d0 e9                    bne   --
 1883: 1000d9c  a9 00                    lda   #0
 1884: 1000d9e  9d 00 00                 sta   lastpos,x
 1885: 1000da1  20 39 0e                 jsr   ramoff
 1886: 1000da4  60       +rts            rts   
 1888: 1000da5  ad 61 00 setattr         lda   charcolor
 1889: 1000da8  4a                       lsr   
 1890: 1000da9  4a                       lsr   
 1891: 1000daa  4a                       lsr   
 1892: 1000dab  4a                       lsr   
 1893: 1000dac  aa                       tax   
 1894: 1000dad  bd 87 00                 lda   coltbl,x
 1895: 1000db0  8d 81 00                 sta   cattr
 1896: 1000db3  ad 61 00                 lda   charcolor
 1897: 1000db6  29 0f                    and   #$0f
 1898: 1000db8  aa                       tax   
 1899: 1000db9  bd 87 00                 lda   coltbl,x
 1900: 1000dbc  0a                       asl   
 1901: 1000dbd  0a                       asl   
 1902: 1000dbe  0a                       asl   
 1903: 1000dbf  0a                       asl   
 1904: 1000dc0  0d 81 00                 ora   cattr
 1905: 1000dc3  8d 81 00 specattr        sta   cattr
 1906: 1000dc6  18                       clc   
 1907: 1000dc7  60                       rts   
 1909: 1000dc8  ad 16 08 scrattr         lda   nt_cborder
 1910: 1000dcb  8d 20 d0                 sta   53280
 1911: 1000dce  ad 15 08                 lda   nt_cscreen
 1912: 1000dd1  0a                       asl   
 1912: 1000dd2  0a                       asl   
 1912: 1000dd3  0a                       asl   
 1912: 1000dd4  0a                       asl   
 1913: 1000dd5  0d 10 08                 ora   nt_ctext
 1914: 1000dd8  8d 80 00                 sta   defcolor
 1915: 1000ddb  60                       rts   
 1917: 1000ddc  86 89    saveattr        stx   scptr2
 1918: 1000dde  84 8a                    sty   scptr2+1
 1919: 1000de0  a0 00                    ldy   #0
 1920: 1000de2  b9 59 00 -               lda   attrsave,y
 1921: 1000de5  91 89                    sta   (scptr2),y
 1922: 1000de7  c8                       iny   
 1923: 1000de8  c0 0e                    cpy   #attrlen
 1924: 1000dea  d0 f6                    bne   -
 1925: 1000dec  a5 81                    lda   crow
 1926: 1000dee  91 89                    sta   (scptr2),y
 1927: 1000df0  c8                       iny   
 1928: 1000df1  a5 80                    lda   ccol
 1929: 1000df3  91 89                    sta   (scptr2),y
 1930: 1000df5  60                       rts   
 1932: 1000df6  86 89    restattr        stx   scptr2
 1933: 1000df8  84 8a                    sty   scptr2+1
 1934: 1000dfa  a0 04                    ldy   #4
 1935: 1000dfc  b1 89    -               lda   (scptr2),y
 1936: 1000dfe  99 59 00                 sta   attrsave,y
 1937: 1000e01  c8                       iny   
 1938: 1000e02  c0 0e                    cpy   #attrlen
 1939: 1000e04  d0 f6                    bne   -
 1940: 1000e06  b1 89                    lda   (scptr2),y
 1941: 1000e08  85 81                    sta   crow
 1942: 1000e0a  c8                       iny   
 1943: 1000e0b  b1 89                    lda   (scptr2),y
 1944: 1000e0d  85 80                    sta   ccol
 1946: 1000e0f  a0 03                    ldy   #3
 1947: 1000e11  b1 89    -               lda   (scptr2),y
 1948: 1000e13  d9 59 00                 cmp   attrsave,y
 1949: 1000e16  d0 07                    bne   +
 1950: 1000e18  88                       dey   
 1951: 1000e19  10 f6                    bpl   -
 1952: 1000e1b  30 11                    bmi   ++
 1954: 1000e1d  b1 89    -               lda   (scptr2),y
 1955: 1000e1f  99 59 00 +               sta   attrsave,y
 1956: 1000e22  88                       dey   
 1957: 1000e23  10 f8                    bpl   -
 1958: 1000e25  ae 5b 00                 ldx   rows
 1959: 1000e28  ac 5c 00                 ldy   columns
 1960: 1000e2b  20 8b 01                 jsr   calctable
 1961: 1000e2e  20 fa 00 ++              jsr   z_crsrupd
 1962: 1000e31  4c a5 0d                 jmp   setattr
 1964: 1000e34                                 
 1965: 1000e34                                 
 1966: 1000e34                                 
 1967: 1000e34                                 
 1968: 1000e34                                 
 1969: 1000e34                                 
 1970: 1000e34                                 
 1971: 1000e34                                 
 1972: 1000e34                                 
 1973: 1000e34                                 
 1974: 1000e34  a9 34    ramon           lda   #rom_off
 1975: 1000e36  85 01                    sta   rom_mode
 1976: 1000e38  60                       rts   
 1977: 1000e39  a9 36    ramoff          lda   #rom_on
 1978: 1000e3b  85 01                    sta   rom_mode
 1979: 1000e3d  60                       rts   
 1980: 1000e3e                                 
asm64: Module name: init
 1986: 2000000           init                  
 1988: 2000000  a9 00                    lda   #<res1
 1989: 2000002  85 20                    sta   zp0
 1990: 2000004  a9 cc                    lda   #>res1
 1991: 2000006  85 21                    sta   zp0+1
 1992: 2000008                                 
 1993: 2000008                                 
 1994: 2000008                                 
 1995: 2000008  a9 00                    lda   #0
 1996: 200000a                                 
 1997: 200000a  85 22                    sta   zp0+2
 1998: 200000c  a9 00                    lda   #<res1len
 1999: 200000e  a0 04                    ldy   #>res1len
 2000: 2000010  20 21 00                 jsr   mem.salloc
 2002: 2000013  a9 00                    lda   #<res2
 2003: 2000015  85 20                    sta   zp0
 2004: 2000017  a9 d8                    lda   #>res2
 2005: 2000019  85 21                    sta   zp0+1
 2006: 200001b                                 
 2007: 200001b                                 
 2008: 200001b                                 
 2009: 200001b  a9 00                    lda   #0
 2010: 200001d                                 
 2011: 200001d  85 22                    sta   zp0+2
 2012: 200001f  a9 40                    lda   #<res2len
 2013: 2000021  a0 27                    ldy   #>res2len
 2014: 2000023  20 21 00                 jsr   mem.salloc
 2017: 2000026  ad 02 dd                 lda   $dd02
 2018: 2000029  09 03                    ora   #$03
 2019: 200002b  8d 02 dd                 sta   $dd02
 2020: 200002e  ad 00 dd                 lda   $dd00
 2021: 2000031  29 fc                    and   #$fc
 2022: 2000033                                 
 2023: 2000033                                 
 2024: 2000033                                 
 2025: 2000033  8d 00 dd                 sta   $dd00
 2026: 2000036                                 
 2027: 2000036                                 
 2028: 2000036                                 
 2029: 2000036                                 
 2032: 2000036  2c bc d0                 bit   scpu_test
 2033: 2000039  30 10                    bmi   +
 2034: 200003b  2c b0 d0                 bit   scpu_ver
 2035: 200003e  30 0b                    bmi   +
 2037: 2000040  8d 7e d0                 sta   scpu_on
 2038: 2000043                                 
 2039: 2000043                                 
 2040: 2000043                                 
 2041: 2000043  a9 44                    lda   #SCPU_OPTVIC3
 2042: 2000045  8d b3 d0                 sta   scpu_optv2
 2043: 2000048                                 
 2044: 2000048  8d 7f d0                 sta   scpu_off
 2046: 200004b  a9 38    +               lda   #vcfg
 2047: 200004d  8d 18 d0                 sta   53272
 2050: 2000050  ad 11 d0                 lda   53265
 2051: 2000053  09 20                    ora   #$20
 2052: 2000055  8d 11 d0                 sta   53265
 2055: 2000058  a9 00                    lda   #0
 2056: 200005a  8d 59 00                 sta   orgtop
 2057: 200005d  8d 5a 00                 sta   orgleft
 2058: 2000060  a2 19                    ldx   #25
 2059: 2000062  a0 50                    ldy   #80
 2060: 2000064  20 8b 01                 jsr   calctable
 2062: 2000067  a2 4f                    ldx   #79
 2063: 2000069  8a       -               txa   
 2064: 200006a  29 07                    and   #7
 2065: 200006c  f0 02                    beq   +
 2066: 200006e  a9 01                    lda   #1
 2067: 2000070  49 01    +               eor   #1
 2068: 2000072  9d 79 00                 sta   tabs,x
 2069: 2000075  ca                       dex   
 2070: 2000076  10 f1                    bpl   -
 2072: 2000078  20 c8 0d                 jsr   scrattr
 2073: 200007b  8d 61 00                 sta   charcolor
 2074: 200007e  20 a5 0d                 jsr   setattr
 2076: 2000081  20 95 08                 jsr   clear
 2077: 2000084  a2 8e                    ldx   #<dfont
 2078: 2000086  a0 00                    ldy   #>dfont
 2079: 2000088  20 45 07                 jsr   newfont
 2081: 200008b  4c 45 01                 jmp   crsrupd
 2083: 200008e  d0 4c 41 49 4e 00
                         dfont           .text "Plain\0"
asm64: Module name: dev.screen
    9: 3000000  4c 52 02                 jmp   closedown
   10: 3000003  4c 45 07                 jmp   newfont
   11: 3000006  4c a4 03                 jmp   winopen
   12: 3000009  4c 84 03                 jmp   wincenter
   13: 300000c  4c 40 06                 jmp   winclose
   14: 300000f  4c 7d 02                 jmp   drawbox
   15: 3000012  4c 81 01                 jmp   scrnmap
   16: 3000015  4c e3 06                 jmp   blankscr
   17: 3000018  4c e3 08                 jmp   outchr
   18: 300001b  4c d9 08                 jmp   outraw
   19: 300001e  4c 2a 0b                 jmp   putchar
   20: 3000021  4c 65 08                 jmp   crsron
   21: 3000024  4c 6e 08                 jmp   crsroff
   22: 3000027  4c 80 08                 jmp   blcrsr
   23: 300002a  4c f1 00                 jmp   z_crsrplot
   24: 300002d  4c fa 00                 jmp   z_crsrupd
   25: 3000030  4c 03 01                 jmp   z_charatcrsr
   26: 3000033  4c 30 01                 jmp   z_delete
   27: 3000036  4c 27 01                 jmp   z_insert
   28: 3000039  4c 1e 01                 jmp   z_erase
   29: 300003c  4c 0c 01                 jmp   z_clrtoeol
   30: 300003f  4c 15 01                 jmp   z_clrfrombol
   31: 3000042  4c 39 01                 jmp   z_rvslin
   32: 3000045  4c a5 0d                 jmp   setattr
   33: 3000048  4c c3 0d                 jmp   specattr
   34: 300004b  4c dc 0d                 jmp   saveattr
   35: 300004e  4c f6 0d                 jmp   restattr
   36: 3000051  4c c8 0d                 jmp   scrattr
 2088: 3000054  80       _fonttype       .byte $80
 2089: 3000055  18       _lastrow        .byte 24
 2090: 3000056  4f       _lastcol        .byte 79
 2091: 3000057  19       _maxrow         .byte 25
 2092: 3000058  50       _maxcol         .byte 80
 2094: 3000059  00       _orgtop         .byte 0
 2095: 300005a  00       _orgleft        .byte 0
 2096: 300005b  19       _rows           .byte 25
 2097: 300005c  50       _columns        .byte 80
 2098: 300005d  00       _topline        .byte 0
 2099: 300005e  18       _botline        .byte 24
 2100: 300005f  00       _scrolltop      .byte 0
 2101: 3000060  18       _scrollbot      .byte 24
 2102: 3000061  07       _charcolor      .byte 7
 2103: 3000062  00       _bordercolor    .byte 0
 2104: 3000063  00       _underline      .byte 0
 2105: 3000064  00       _blink          .byte 0
 2106: 3000065  00       _rvs            .byte 0
 2107: 3000066  ff       _wrap           .byte $ff
 2108: 3000067  00       _scrollahead    .byte 0
 2109: 3000068  00       _noprocess      .byte 0
 2111: 3000069  00       _Dtlc           .byte 0
 2112: 300006a  00       _Dtrc           .byte 0
 2113: 300006b  00       _Dblc           .byte 0
 2114: 300006c  00       _Dbrc           .byte 0
 2115: 300006d  00       _Dltee          .byte 0
 2116: 300006e  00       _Drtee          .byte 0
 2117: 300006f  00       _Dbtee          .byte 0
 2118: 3000070  00       _Dttee          .byte 0
 2119: 3000071  00       _Dcross         .byte 0
 2120: 3000072  00       _Dhorz          .byte 0
 2121: 3000073  00       _Dvert          .byte 0
 2122: 3000074  00       _Dblock         .byte 0
 2123: 3000075  00 00 00 00
                         _Dother         .zero 4
 2125: 3000079                           .tst  80col.lab
asm64: Writing file 80col.64:
asm64:  Block 1: $1000000 - $1000e3e (last: $1000e3e)
Total tables: 5
screen HI (328): f3(7b) f6(49) f9(7b) fc(7b) ff(45) 102(7b) 105(7b) 108(42) 10b(7b) 10e(7b) 111(8b) 114(7b) 117(7b) 11a(f9) 11d(7b) 120(7b) 123(69) 126(7b) 129(7b) 12c(aa) 12f(7b) 132(7b) 135(ab) 138(7b) 13b(7b) 13e(ec) 141(7b) 15f(50) 1b6(44) 1dc(86) 1e2(85) 1e5(85) 1e8(86) 1eb(85) 1ee(86) 1f5(19) 1fa(33) 1fd(44) 217(3a) 221(3a) 228(4d) 22d(66) 232(3a) 254(e3) 257(7f) 27a(e3) 286(7b) 290(7c) 29d(7b) 2a0(7c) 2a9(49) 2af(e3) 2b5(49) 2bb(e3) 2cb(e3) 2d2(7b) 2d6(7c) 2da(49) 2e0(e3) 2f1(e3) 2fb(7c) 301(49) 307(e3) 30d(49) 313(e3) 323(e3) 326(7b) 329(7c) 32f(49) 335(e3) 33d(7b) 347(49) 34d(e3) 35b(7b) 35e(7c) 361(49) 37a(68) 37d(69) 380(c7) 386(70) 38f(69) 398(68) 3a3(aa) 3a6(70) 3b0(62) 3b3(63) 3ba(6a) 3bd(6b) 3c1(d7) 3c4(dc) 3d2(80) 3d8(a5) 3e7(8b) 3ea(69) 3f5(67) 3f8(68) 405(66) 419(bc) 429(e7) 42f(be) 437(e7) 43f(ea) 444(eb) 447(62) 44d(63) 453(49) 458(6e) 45d(6f) 461(0) 464(ee) 467(67) 46e(6e) 473(6f) 47a(ee) 492(6c) 49b(6c) 4ab(66) 4b1(67) 4b4(bf) 4c4(ec) 4ca(39) 4d2(ec) 4da(ef) 4df(f0) 4e2(62) 4e8(63) 4ee(49) 4fd(67) 504(6e) 509(6f) 510(ee) 526(6c) 52f(6c) 544(c7) 549(c8) 54e(cd) 553(d2) 559(d7) 565(c7) 568(62) 56c(63) 570(6a) 573(6b) 578(6a) 57d(6b) 586(62) 589(63) 590(69) 593(68) 596(7d) 5a1(69) 5a4(68) 5a7(8b) 5bb(95) 5f0(6c) 5f3(6d) 5f9(6c) 605(6c) 60a(6d) 60f(6e) 612(6f) 61b(6c) 627(6c) 62c(6d) 635(6e) 638(6f) 63e(16) 642(c7) 649(c7) 64c(c8) 651(cd) 656(d2) 65e(d7) 66a(c7) 66d(c8) 672(cd) 677(d2) 685(ec) 693(16) 698(ec) 6a0(ef) 6a3(f0) 6ab(e7) 6b9(16) 6be(e7) 6c6(ea) 6c9(eb) 6d0(d7) 6d3(f6) 6d6(e7) 6d9(e8) 6dc(e9) 6e1(95) 6f6(34) 6ff(25) 702(a4) 70e(25) 711(a4) 71c(25) 71f(39) 724(45) 727(2d) 74c(3b) 753(34) 785(34) 790(39) 7bc(d0) 7c6(4d) 7cf(ce) 7dd(69) 808(83) 80b(83) 80e(82) 82c(ab) 82f(32) 84a(45) 852(19) 857(33) 85c(4d) 861(66) 867(84) 870(84) 877(84) 87a(80) 87d(84) 885(34) 890(39) 89a(69) 8aa(8a) 8bb(d0) 8c2(4d) 8d0(69) 8d8(45) 8de(e3) 8ec(84) 8f1(80) 8f6(a) 8fb(45) 8fe(84) 903(80) 916(25) 919(8d) 920(e9) 95a(cb) 96a(95) 98a(9) 9d9(b7) 9e8(97) 9ee(a5) a0b(76) a1c(45) a1f(a1) a24(45) a27(34) a5e(a1) a66(2a) a6b(45) a6e(39) a73(2a) a85(8b) a95(45) aa2(45) aa5(a1) aaa(45) aad(34) b06(39) b1c(e9) b1f(45) b27(9) b45(34) b6b(81) b82(0) b87(0) b8a(39) b93(69) b96(45) ba7(0) baa(84) bbe(84) bc7(e3) bd0(34) bdf(81) bf6(38) c05(f7) c0c(49) c0f(84) c23(84) c26(f8) c2b(2a) c2e(8d) c31(f8) c35(f7) c43(84) c49(39) c4c(45) c53(19) c58(33) c5d(0) c63(19) c68(33) c6d(34) c71(0) c76(0) c7e(39) d38(87) d3d(4d) d42(66) d47(0) d4c(0) d4f(4d) d54(66) d65(39) d70(34) d73(50) d7b(81) d92(85) d99(86) da0(0) da3(39) daf(87) db2(81) dbb(87) dc2(81) dc5(81) dda(80) e2d(8b) e30(fa) e33(a5)
screen LO (328): f2 f5 f8 fb fe 101 104 107 10a 10d 110 113 116 119 11c 11f 122 125 128 12b 12e 131 134 137 13a 13d 140 15e 1b5 1db 1e1 1e4 1e7 1ea 1ed 1f4 1f9 1fc 216 220 227 22c 231 253 256 279 285 28f 29c 29f 2a8 2ae 2b4 2ba 2ca 2d1 2d5 2d9 2df 2f0 2fa 300 306 30c 312 322 325 328 32e 334 33c 346 34c 35a 35d 360 379 37c 37f 385 38e 397 3a2 3a5 3af 3b2 3b9 3bc 3bf 3c3 3d1 3d7 3e6 3e9 3f4 3f7 404 418 428 42e 436 43e 443 446 44c 452 457 45c 45f 463 466 46d 472 479 491 497 4aa 4b0 4b3 4c3 4c9 4d1 4d9 4de 4e1 4e7 4ed 4fc 503 508 50f 525 52b 543 548 54d 552 555 564 567 56b 56f 572 577 57c 585 588 58f 592 595 5a0 5a3 5a6 5ba 5ef 5f2 5f5 604 609 60e 611 617 626 62b 634 637 63d 641 648 64b 650 655 65a 669 66c 671 676 684 692 697 69f 6a2 6aa 6b8 6bd 6c5 6c8 6ce 6d2 6d5 6d8 6db 6e0 6f5 6fe 701 70d 710 71b 71e 723 726 74a 751 784 78f 7bb 7c5 7ce 7dc 807 80a 80d 82b 82e 849 851 856 85b 860 866 86f 876 879 87c 884 88f 899 8a9 8ba 8c1 8cf 8d7 8dd 8eb 8f0 8f5 8fa 8fd 902 915 918 91f 959 969 989 9d8 9e7 9ed a0a a1b a1e a23 a26 a5d a65 a6a a6d a72 a84 a94 aa1 aa4 aa9 aac b05 b1b b1e b26 b44 b6a b81 b86 b89 b92 b95 ba6 ba9 bbd bc6 bcf bde bf5 c04 c0b c0e c22 c25 c2a c2d c30 c34 c42 c48 c4b c52 c57 c5c c62 c67 c6c c70 c75 c7d d37 d3c d41 d46 d4b d4e d53 d64 d6f d72 d7a d91 d98 d9f da2 dae db1 dba dc1 dc4 dd9 e2c e2f e32
dev HI (123): 14b(5b) 150(55) 155(5c) 15a(56) 185(59) 18a(5a) 18d(5b) 191(55) 194(5e) 197(60) 19a(5c) 19e(56) 1a3(5d) 1a6(5f) 1b1(59) 1c0(5a) 1df(5c) 201(5b) 210(59) 21d(5a) 236(5b) 29a(68) 2ac(69) 2b8(72) 2c3(5c) 2c8(6a) 2dd(6e) 2ee(6d) 2f6(5b) 304(6b) 310(72) 31b(5c) 320(6c) 332(73) 342(5c) 34a(73) 358(68) 3c9(65) 3cc(63) 3cf(64) 3d5(61) 3dd(59) 3e0(5a) 59a(5a) 59e(59) 5ac(5d) 5af(5f) 5b2(55) 5b5(5e) 5b8(60) 75d(69) 7ac(5f) 7b1(60) 7bf(60) 7d6(60) 7e1(60) 7ed(60) 7f2(5e) 7fb(67) 802(60) 805(5f) 829(5f) 83d(60) 840(5f) 897(5e) 89d(5d) 8ad(5f) 8b2(60) 8c6(60) 8cb(5e) 8db(68) 8e1(68) 927(68) 93d(5c) 944(79) 961(68) 973(60) 978(5e) 97d(55) 993(5c) 9bb(5f) 9c0(5d) 9e3(61) 9eb(61) 9f7(65) a02(65) a10(56) a17(56) a7a(5c) a90(5d) b01(56) b0d(5c) b12(66) b4a(63) b55(65) b70(65) b73(63) b99(5c) b9e(56) bae(65) bb2(63) bb8(63) bbb(65) bcb(5c) bf1(5c) bfd(56) c13(65) c17(63) c1d(63) c20(65) c3b(63) c3f(65) d59(56) d6b(5b) d76(56) da7(61) db5(61) de4(59) e00(59) e15(59) e21(59) e27(5b) e2a(5c)
dev LO (123): 14a 14f 154 159 184 189 18c 190 193 196 199 19d 1a2 1a5 1b0 1bf 1de 200 20f 21c 235 299 2ab 2b7 2c2 2c7 2dc 2ed 2f5 303 30f 31a 31f 331 341 349 357 3c8 3cb 3ce 3d4 3dc 3df 599 59d 5ab 5ae 5b1 5b4 5b7 75b 7ab 7b0 7be 7d5 7e0 7ec 7f1 7fa 801 804 828 83c 83f 896 89c 8ac 8b1 8c5 8ca 8da 8e0 926 93c 943 960 972 977 97c 992 9ba 9bf 9e2 9ea 9f6 a01 a0f a16 a79 a8f b00 b0c b11 b49 b54 b6f b72 b98 b9d bad bb1 bb7 bba bca bf0 bfc c12 c16 c1c c1f c3a c3e d58 d6a d75 da6 db4 de3 dff e14 e20 e26 e29
api HI (6): 2e3(44) 74f(92) 756(ba) 813(5a) 84d(56) 951(4d)
api LO (6): 2e2 74e 755 812 84c 950
mem HI (14): 420(18) 4a4(15) 4bb(18) 538(15) 53f(18) 562(15) 602(15) 615(15) 624(12) 63b(12) 667(12) 680(24) 6a6(24) 6cc(24)
mem LO (14): 41f 4a3 4ba 537 53e 561 601 614 623 63a 666 67f 6a5 6cb
prg HI (1): 760(9)
prg LO (1): 75f
Table size: 1590 ($0636) bytes
asm64:  Block 2: $2000000 - $2000094 (last: $2000094)
Total tables: 4
mem HI (2): 12(21) 25(21)
mem LO (2): 11 24
dev HI (4): 5c(59) 5f(5a) 74(79) 7d(61)
dev LO (4): 5b 5e 73 7c
screen HI (6): 66(8b) 7a(c8) 80(a5) 83(95) 8a(45) 8d(45)
screen LO (6): 65 79 7f 82 89 8c
init HI (1): 87(8e)
init LO (1): 85
Table size: 84 ($0054) bytes
asm64:  Block 3: $3000000 - $3000079 (last: $3000079)
Total tables: 1
screen HI (28): 2(52) 5(45) 8(a4) b(84) e(40) 11(7d) 14(81) 17(e3) 1a(e3) 1d(d9) 20(2a) 23(65) 26(6e) 29(80) 2c(f1) 2f(fa) 32(3) 35(30) 38(27) 3b(1e) 3e(c) 41(15) 44(39) 47(a5) 4a(c3) 4d(dc) 50(f6) 53(c8)
screen LO (28): 1 4 7 a d 10 13 16 19 1c 1f 22 25 28 2b 2e 31 34 37 3a 3d 40 43 46 49 4c 4f 52
Table size: 98 ($0062) bytes
