ddial-analysis-final

Final Binary Output

Just a quick showoff of all the labels and comments so far..

loading extra trace file t01 - idle loop
loading extra trace file t00 - startup (no modems)
loading extra trace file t80 - startup (1 modem in line 1)
loading extra trace file t02 - show character console
loading extra trace file t11 - t4moe
loading extra trace file t81 - one modem character
    1                              *
    2                              * ddial really starts here
    3                              _setup1
    4     t00 t80                     1800 A2 FF    LDX  #$FF                  ; load #$ff
    5     t00 t80                     1802 9A       TXS                        ; initialize new 6502 stack pointer
    6     t00 t80                     1803 20 9A 18 JSR  _setup2               ; call additional setup routine
    7     t00 t80                     1806 A2 02    LDX  #$02                  ; load 2 for loop
    8     t00 t80                     1808 BD FD 5E LDA  $5EFD,X               ; table at 5efd is 10 10 34
    9     t00 t80                     180B 29 0F    AND  #$0F                  
   10     t00 t80                     180D 09 30    ORA  #$30                  
   11     t00 t80                     180F 9D 3E 22 STA  $223E,X               
   12     t00 t80                     1812 CA       DEX                        
   13     t00 t80                     1813 10 F3    BPL  $1808                 
   14     t00 t80                     1815 AD 3D 60 LDA  $603D                 
   15     t00 t80                     1818 85 00    STA  $00                   
   16     t00 t80                     181A AD 3E 60 LDA  $603E                 
   17     t00 t80                     181D 85 01    STA  $01                   
   18     t00 t80                     181F A0 00    LDY  #$00                  
   19     t00 t80                     1821 B1 00    LDA  ($00),Y               
   20     t00 t80                     1823 30 0C    BMI  $1831                 
   21     t00 t80                     1825 C9 5E    CMP  #$5E                  
   22     t00 t80                     1827 F0 08    BEQ  $1831                 
   23     t00 t80                     1829 E6 00    INC  $00                   
   24     t00 t80                     182B D0 F4    BNE  $1821                 
   25     t00 t80                     182D E6 01    INC  $01                   
   26     t00 t80                     182F D0 F0    BNE  $1821                 
   27     t00 t80                     1831 A5 00    LDA  $00                   
   28     t00 t80                     1833 8D 9B 60 STA  $609B                 
   29     t00 t80                     1836 A5 01    LDA  $01                   
   30     t00 t80                     1838 8D 9C 60 STA  $609C                 
   31     t00 t80                     183B A0 00    LDY  #$00                  
   32     t00 t80                     183D B9 00 1A LDA  $1A00,Y               ; transfer /ml and such to actual mslot memory
   33     t00 t80                     1840 F0 0E    BEQ  $1850                 
   34     t00 t80                     1842 99 00 E4 STA  $E400,Y               
   35     t00 t80                     1845 C8       INY                        
   36     t00 t80                     1846 D0 F5    BNE  $183D                 
   37     t00 t80                     1848 EE 3F 18 INC  $183F                 
   38     t00 t80                     184B EE 44 18 INC  $1844                 
   39     t00 t80                     184E D0 ED    BNE  $183D                 
   40     t00 t80                     1850 4C B1 28 JMP  $28B1                 
   41     t00 t80                     1853 46 F2    LSR  $F2                   
   42     t00 t80                     1855 24 D0    BIT  $D0                   
   43     t00 t80                     1857 30 05    BMI  $185E                 
   44     t00 t80                     1859 70 02    BVS  $185D                 
   45     t00 t80                     185B A0 8D    LDY  #$8D                  
   46     t00 t80                     185D 60       RTS                        
   47     t00 t80                     185E 24 48    BIT  $48                   
   48     t00 t80                     1860 70 F9    BVS  $185B                 
   49     t00 t80                     1862 AD 01 90 LDA  $9001                 
   50     t00 t80                     1865 F0 10    BEQ  $1877                 
   51                                 1867 C9 7E    CMP  #$7E                  
   52                                 1869 F0 1C    BEQ  $1887                 
   53                                 186B EE 63 18 INC  $1863                 
   54                                 186E D0 03    BNE  $1873                 
   55                                 1870 EE 64 18 INC  $1864                 
   56                                 1873 09 80    ORA  #$80                  
   57                                 1875 A8       TAY                        
   58                                 1876 60       RTS                        
   59     t00 t80                     1877 A0 03    LDY  #$03                  
   60     t00 t80                     1879 B9 96 18 LDA  $1896,Y               
   61     t00 t80                     187C 99 DB 50 STA  $50DB,Y               
   62     t00 t80                     187F 88       DEY                        
   63     t00 t80                     1880 D0 F7    BNE  $1879                 
   64     t00 t80                     1882 88       DEY                        
   65     t00 t80                     1883 8C FF FE STY  $FEFF                 
   66     t00 t80                     1886 60       RTS                        
   67                                 1887 A0 07    LDY  #$07                  
   68                                 1889 B9 88 7F LDA  $7F88,Y               
   69                                 188C D0 07    BNE  $1895                 
   70                                 188E 88       DEY                        
   71                                 188F D0 F8    BNE  $1889                 
   72                                 1891 A9 01    LDA  #$01                  
   73                                 1893 D0 D6    BNE  $186B                 
   74                                 1895 98       TYA                        
   75                                 1896 60       RTS                        
   76                                 1897 AC F8 7F LDY  _mdm_inbuf_tbl        
   77                              *
   78                              * some setup here?
   79                              _setup2
   80     t00 t80                     189A 78       SEI                        
   81     t00 t80                     189B A2 27    LDX  #$27                  ; clear console status area  (top 2 lines)
   82     t00 t80                     189D A9 A0    LDA  #$A0                  
   83                              _setup2_clear_loop
   84     t00 t80                     189F 9D 00 04 STA  cons_line1/cutofftime,X 
   85     t00 t80                     18A2 9D 80 04 STA  cons_line2/line0channel,X 
   86     t00 t80                     18A5 CA       DEX                        
   87     t00 t80                     18A6 10 F7    BPL  _setup2_clear_loop    
   88     t00 t80                     18A8 A9 0F    LDA  #$0F                  
   89     t00 t80                     18AA C5 08    CMP  $08                   
   90     t00 t80                     18AC 85 08    STA  $08                   
   91     t00 t80                     18AE D0 05    BNE  $18B5                 
   92                                 18B0 A9 AE    LDA  #$AE                  
   93                                 18B2 8D 88 04 STA  cons_status           
   94     t00 t80                     18B5 EE F4 03 INC  $03F4                 
   95     t00 t80                     18B8 20 00 80 JSR  _setup3               ; -- various memory checks and copies
   96     t00 t80                     18BB AD 22 F8 LDA  _and_rts              ; load debugging jsr code byte
   97     t00 t80                     18BE C9 60    CMP  #$60                  ; compare against RTS
   98     t00 t80                     18C0 F0 05    BEQ  _setup_4              ; always branch this version (that should be interesting code)
   99                                 18C2 A9 4C    LDA  #$4C                  
  100                                 18C4 8D 80 39 STA  $3980                 
  101                              _setup_4
  102     t00 t80                     18C7 A2 07    LDX  #$07                  ; use x and loop 7 to 0
  103                              _setup_4_loop
  104     t00 t80                     18C9 20 08 60 JSR  _setup_5              ; call setup_5 (modem init perhaps?)
  105     t00 t80                     18CC CA       DEX                        ; decrement
  106     t00 t80                     18CD 10 FA    BPL  _setup_4_loop         ; and loop
  107     t00 t80                     18CF A2 07    LDX  #$07                  ; init x to 7
  108     t00 t80                     18D1 D0 08    BNE  _setup_4_c0loop       ; always branch
  109                              *
  110                              * table for _setup4_loop2 - 00 80 00 90  00 A0 00 B0
  111                                 18D3 00       BRK                        
  112                                 18D4 80       ???                        
  113                                 18D5 00       BRK                        
  114                                 18D6 90 00    BCC  $18D8                 
  115                                 18D8 A0 00    LDY  #$00                  
  116                                 18DA B0 BD    BCS  $1899                 
  117                                 18DC D3       ???                        
  118                                 18DD 18       CLC                        
  119     t00 t80                     18DE 95 C0    STA  $C0,X                 ; store table in zp $c0-$c7
  120     t00 t80                     18E0 CA       DEX                        
  121     t00 t80                     18E1 10 F8    BPL  _setup_4_c0loop       
  122     t00 t80                     18E3 A9 B1    LDA  #$B1                  
  123     t00 t80                     18E5 85 FD    STA  $FD                   
  124     t00 t80                     18E7 8D 80 04 STA  cons_line2/line0channel 
  125     t00 t80                     18EA A2 06    LDX  #$06                  
  126     t00 t80                     18EC 86 E4    STX  $E4                   
  127     t00 t80                     18EE A9 00    LDA  #$00                  
  128     t00 t80                     18F0 85 E6    STA  $E6                   
  129     t00 t80                     18F2 85 E3    STA  $E3                   
  130     t00 t80                     18F4 85 E7    STA  $E7                   
  131     t00 t80                     18F6 85 F7    STA  cons_x_save           
  132     t00 t80                     18F8 85 F1    STA  $F1                   
  133     t00 t80                     18FA AC 01 90 LDY  $9001                 
  134     t00 t80                     18FD C0 0D    CPY  #$0D                  
  135     t00 t80                     18FF F0 03    BEQ  $1904                 
  136     t00 t80                     1901 8D 01 90 STA  $9001                 
  137     t00 t80                     1904 81 C0    STA  ($C0,X)               
  138     t00 t80                     1906 CA       DEX                        
  139     t00 t80                     1907 CA       DEX                        
  140     t00 t80                     1908 10 FA    BPL  $1904                 
  141     t00 t80                     190A A2 02    LDX  #$02                  
  142     t00 t80                     190C A9 B0    LDA  #$B0                  
  143     t00 t80                     190E 9D 89 04 STA  cons_callstoday1,X    
  144     t00 t80                     1911 CA       DEX                        
  145     t00 t80                     1912 10 FA    BPL  $190E                 
  146     t00 t80                     1914 A9 33    LDA  #$33                  
  147     t00 t80                     1916 8D 00 04 STA  cons_line1/cutofftime 
  148     t00 t80                     1919 A0 13    LDY  #$13                  
  149     t00 t80                     191B B9 B5 23 LDA  $23B5,Y               
  150     t00 t80                     191E 09 80    ORA  #$80                  
  151     t00 t80                     1920 99 94 04 STA  cons_line2col21,Y     
  152     t00 t80                     1923 88       DEY                        
  153     t00 t80                     1924 10 F5    BPL  $191B                 
  154     t00 t80                     1926 A0 3F    LDY  #$3F                  
  155     t00 t80                     1928 A9 00    LDA  #$00                  
  156     t00 t80                     192A 99 00 01 STA  $0100,Y               
  157     t00 t80                     192D 88       DEY                        
  158     t00 t80                     192E 10 FA    BPL  $192A                 
  159     t00 t80                     1930 A9 D0    LDA  #$D0                  
  160     t00 t80                     1932 85 04    STA  $04                   
  161     t00 t80                     1934 A0 00    LDY  #$00                  
  162     t00 t80                     1936 84 03    STY  $03                   
  163     t00 t80                     1938 B9 DB 24 LDA  $24DB,Y               
  164     t00 t80                     193B 91 03    STA  ($03),Y               
  165     t00 t80                     193D 30 03    BMI  $1942                 
  166     t00 t80                     193F C8       INY                        
  167     t00 t80                     1940 D0 F6    BNE  $1938                 
  168     t00 t80                     1942 E6 04    INC  $04                   
  169     t00 t80                     1944 A5 04    LDA  $04                   
  170     t00 t80                     1946 C9 F3    CMP  #$F3                  
  171     t00 t80                     1948 90 EA    BCC  $1934                 
  172     t00 t80                     194A AD 0C 58 LDA  $580C                 
  173     t00 t80                     194D 8D 51 60 STA  $6051                 
  174     t00 t80                     1950 AD 0D 58 LDA  $580D                 
  175     t00 t80                     1953 8D 52 60 STA  $6052                 
  176     t00 t80                     1956 A9 34    LDA  #$34                  
  177     t00 t80                     1958 8D 08 04 STA  cons_moecutoff        
  178     t00 t80                     195B 60       RTS                        
  179                                 195C 00       BRK                        
  180                                 195D 00       BRK                        
  181                                 195E 00       BRK                        
  182                                 195F 00       BRK                        
  183                                 1960 00       BRK                        
  184                                 1961 00       BRK                        
  185                                 1962 00       BRK                        
  186                                 1963 00       BRK                        
  187                                 1964 00       BRK                        
  188                                 1965 00       BRK                        
  189                                 1966 00       BRK                        
  190                                 1967 00       BRK                        
  191                                 1968 00       BRK                        
  192                                 1969 00       BRK                        
  193                                 196A 00       BRK                        
  194                                 196B 00       BRK                        
  195                                 196C 00       BRK                        
  196                                 196D 00       BRK                        
  197                                 196E 00       BRK                        
  198                                 196F 00       BRK                        
  199                                 1970 00       BRK                        
  200                                 1971 00       BRK                        
  201                                 1972 00       BRK                        
  202                                 1973 00       BRK                        
  203                                 1974 00       BRK                        
  204                                 1975 00       BRK                        
  205                                 1976 00       BRK                        
  206                                 1977 00       BRK                        
  207                                 1978 00       BRK                        
  208                                 1979 00       BRK                        
  209                                 197A 00       BRK                        
  210                                 197B 00       BRK                        
  211                                 197C 00       BRK                        
  212                                 197D 00       BRK                        
  213                                 197E 00       BRK                        
  214                                 197F 00       BRK                        
  215                                 1980 00       BRK                        
  216                                 1981 00       BRK                        
  217                                 1982 00       BRK                        
  218                                 1983 00       BRK                        
  219                                 1984 00       BRK                        
  220                                 1985 00       BRK                        
  221                                 1986 00       BRK                        
  222                                 1987 00       BRK                        
  223                                 1988 00       BRK                        
  224                                 1989 00       BRK                        
  225                                 198A 00       BRK                        
  226                                 198B 00       BRK                        
  227                                 198C 00       BRK                        
  228                                 198D 00       BRK                        
  229                                 198E 00       BRK                        
  230                                 198F 00       BRK                        
  231                                 1990 00       BRK                        
  232                                 1991 00       BRK                        
  233                                 1992 00       BRK                        
  234                                 1993 00       BRK                        
  235                                 1994 00       BRK                        
  236                                 1995 00       BRK                        
  237                                 1996 00       BRK                        
  238                                 1997 00       BRK                        
  239                                 1998 00       BRK                        
  240                                 1999 00       BRK                        
  241                                 199A 00       BRK                        
  242                                 199B 00       BRK                        
  243                                 199C 00       BRK                        
  244                                 199D 00       BRK                        
  245                                 199E 00       BRK                        
  246                                 199F 00       BRK                        
  247                                 19A0 00       BRK                        
  248                                 19A1 00       BRK                        
  249                                 19A2 00       BRK                        
  250                                 19A3 00       BRK                        
  251                                 19A4 00       BRK                        
  252                                 19A5 00       BRK                        
  253                                 19A6 00       BRK                        
  254                                 19A7 00       BRK                        
  255                                 19A8 00       BRK                        
  256                                 19A9 00       BRK                        
  257                                 19AA 00       BRK                        
  258                                 19AB 00       BRK                        
  259                                 19AC 00       BRK                        
  260                                 19AD 00       BRK                        
  261                                 19AE 00       BRK                        
  262                                 19AF 00       BRK                        
  263                                 19B0 00       BRK                        
  264                                 19B1 00       BRK                        
  265                                 19B2 00       BRK                        
  266                                 19B3 00       BRK                        
  267                                 19B4 00       BRK                        
  268                                 19B5 00       BRK                        
  269                                 19B6 00       BRK                        
  270                                 19B7 00       BRK                        
  271                                 19B8 00       BRK                        
  272                                 19B9 00       BRK                        
  273                                 19BA 00       BRK                        
  274                                 19BB 00       BRK                        
  275                                 19BC 00       BRK                        
  276                                 19BD 00       BRK                        
  277                                 19BE 00       BRK                        
  278                                 19BF 00       BRK                        
  279                                 19C0 00       BRK                        
  280                                 19C1 00       BRK                        
  281                                 19C2 00       BRK                        
  282                                 19C3 00       BRK                        
  283                                 19C4 00       BRK                        
  284                                 19C5 00       BRK                        
  285                                 19C6 00       BRK                        
  286                                 19C7 00       BRK                        
  287                                 19C8 00       BRK                        
  288                                 19C9 00       BRK                        
  289                                 19CA 00       BRK                        
  290                                 19CB 00       BRK                        
  291                                 19CC 00       BRK                        
  292                                 19CD 00       BRK                        
  293                                 19CE 00       BRK                        
  294                                 19CF 00       BRK                        
  295                                 19D0 00       BRK                        
  296                                 19D1 00       BRK                        
  297                                 19D2 00       BRK                        
  298                                 19D3 00       BRK                        
  299                                 19D4 00       BRK                        
  300                                 19D5 00       BRK                        
  301                                 19D6 00       BRK                        
  302                                 19D7 00       BRK                        
  303                                 19D8 00       BRK                        
  304                                 19D9 00       BRK                        
  305                                 19DA 00       BRK                        
  306                                 19DB 00       BRK                        
  307                                 19DC 00       BRK                        
  308                                 19DD 00       BRK                        
  309                                 19DE 00       BRK                        
  310                                 19DF 00       BRK                        
  311                                 19E0 00       BRK                        
  312                                 19E1 00       BRK                        
  313                                 19E2 00       BRK                        
  314                                 19E3 00       BRK                        
  315                                 19E4 00       BRK                        
  316                                 19E5 00       BRK                        
  317                                 19E6 00       BRK                        
  318                                 19E7 00       BRK                        
  319                                 19E8 00       BRK                        
  320                                 19E9 00       BRK                        
  321                                 19EA 00       BRK                        
  322                                 19EB 00       BRK                        
  323                                 19EC 00       BRK                        
  324                                 19ED 00       BRK                        
  325                                 19EE 00       BRK                        
  326                                 19EF 00       BRK                        
  327                                 19F0 00       BRK                        
  328                                 19F1 00       BRK                        
  329                                 19F2 00       BRK                        
  330                                 19F3 00       BRK                        
  331                                 19F4 00       BRK                        
  332                                 19F5 00       BRK                        
  333                                 19F6 00       BRK                        
  334                                 19F7 00       BRK                        
  335                                 19F8 00       BRK                        
  336                                 19F9 00       BRK                        
  337                                 19FA 00       BRK                        
  338                                 19FB 00       BRK                        
  339                                 19FC 00       BRK                        
  340                                 19FD 00       BRK                        
  341                                 19FE 00       BRK                        
  342                                 19FF 00       BRK                        
  343                                 1A00             4C 69 6E 6B 65 64 20 53 74 61 74 69 6F 6E 73 3A  Linked Stations:
  344                                 1A10             0D 0D 57 69 74 68 20 73 74 61 74 69 6F 6E 73 20  ..With stations 
  345                                 1A20             6C 69 6E 6B 65 64 2C 20 73 6F 6D 65 20 68 61 6E  linked, some han
  346                                 1A30             64 6C 65 73 20 68 61 76 65 20 65 78 74 72 61 20  dles have extra 
  347                                 1A40             64 69 67 69 74 73 2E 20 46 6F 72 20 65 78 61 6D  digits. For exam
  348                                 1A50             70 6C 65 3A 0D 0D 31 34 23 30 5B 54 32 3A 42 69  ple:..14#0[T2:Bi
  349                                 1A60             6C 6C 29 0D 37 23 34 5B 54 31 3A 4A 6F 65 29 0D  ll).7#4[T1:Joe).
  350                                 1A70             33 36 37 23 32 5B 54 34 3A 53 61 6D 29 0D 0D 54  367#2[T4:Sam)..T
  351                                 1A80             6F 20 73 65 6E 64 20 2F 50 20 6D 65 73 73 61 67  o send /P messag
  352                                 1A90             65 73 20 74 6F 20 74 68 65 73 65 20 70 65 6F 70  es to these peop
  353                                 1AA0             6C 65 2C 20 65 6E 74 65 72 3A 0D 0D 2F 50 31 34  le, enter:../P14
  354                                 1AB0             30 20 48 69 20 42 69 6C 6C 0D 2F 50 37 34 20 48  0 Hi Bill./P74 H
  355                                 1AC0             69 20 4A 6F 65 0D 2F 50 33 36 37 32 20 48 69 20  i Joe./P3672 Hi 
  356                                 1AD0             53 61 6D 0D 0D 49 66 20 79 6F 75 20 6F 6D 69 74  Sam..If you omit
  357                                 1AE0             20 74 68 65 20 6C 61 73 74 20 64 69 67 69 74 20   the last digit 
  358                                 1AF0             28 61 66 74 65 72 20 74 68 65 20 23 29 2C 20 79  (after the #), y
  359                                 1B00             6F 75 72 20 6D 65 73 73 61 67 65 20 77 69 6C 6C  our message will
  360                                 1B10             20 67 6F 20 74 6F 20 65 76 65 72 79 6F 6E 65 20   go to everyone 
  361                                 1B20             6F 6E 20 74 68 61 74 20 73 74 61 74 69 6F 6E 20  on that station 
  362                                 1B30             6F 6E 6C 79 20 28 73 74 61 74 69 6F 6E 20 70 72  only (station pr
  363                                 1B40             69 76 61 74 65 29 3A 0D 0D 2F 50 31 34 20 48 69  ivate):../P14 Hi
  364                                 1B50             20 42 69 6C 6C 27 73 20 73 74 61 74 69 6F 6E 0D   Bill's station.
  365                                 1B60             2F 70 33 36 37 20 48 69 20 53 61 6D 27 73 20 73  /p367 Hi Sam's s
  366                                 1B70             74 61 74 69 6F 6E 0D 0D 41 6E 20 27 53 27 20 69  tation..An 'S' i
  367                                 1B80             6E 20 66 72 6F 6E 74 20 6F 66 20 61 20 6D 65 73  n front of a mes
  368                                 1B90             73 61 67 65 20 6D 65 61 6E 73 20 69 74 20 69 73  sage means it is
  369                                 1BA0             20 61 20 73 74 61 74 69 6F 6E 20 70 72 69 76 61   a station priva
  370                                 1BB0             74 65 2E 20 54 6F 20 73 65 6E 64 20 61 20 73 74  te. To send a st
  371                                 1BC0             61 74 69 6F 6E 20 70 72 69 76 61 74 65 20 74 6F  ation private to
  372                                 1BD0             20 79 6F 75 72 20 6F 77 6E 20 73 74 61 74 69 6F   your own statio
  373                                 1BE0             6E 2C 20 65 6E 74 65 72 3A 0D 0D 2F 50 53 20 3C  n, enter:../PS <
  374                                 1BF0             6D 65 73 73 61 67 65 3E 0D 0D 41 74 20 72 65 67  message>..At reg
  375                                 1C00             75 6C 61 72 20 69 6E 74 65 72 76 61 6C 73 2C 20  ular intervals, 
  376                                 1C10             79 6F 75 20 77 69 6C 6C 20 73 65 65 20 63 61 6C  you will see cal
  377                                 1C20             6C 65 72 20 6C 69 73 74 73 20 66 72 6F 6D 20 74  ler lists from t
  378                                 1C30             68 65 20 72 65 6D 6F 74 65 20 73 74 61 74 69 6F  he remote statio
  379                                 1C40             6E 73 3A 0D 0D 31 34 2E 44 65 74 72 6F 69 74 20  ns:..14.Detroit 
  380                                 1C50             23 31 0D 20 23 30 3A 42 69 6C 6C 0D 20 23 31 3A  #1. #0:Bill. #1:
  381                                 1C60             53 75 65 3A 23 30 30 31 2A 0D 20 2F 32 3A 4C 65  Sue:#001*. /2:Le
  382                                 1C70             65 3A 23 30 33 32 2A 0D 0D 54 68 65 20 23 20 6D  e:#032*..The # m
  383                                 1C80             65 61 6E 73 20 42 69 6C 6C 20 61 6E 64 20 53 75  eans Bill and Su
  384                                 1C90             65 20 61 72 65 20 6F 6E 20 74 68 65 20 6C 69 6E  e are on the lin
  385                                 1CA0             6B 20 63 68 61 6E 6E 65 6C 2C 20 61 6E 64 20 63  k channel, and c
  386                                 1CB0             61 6E 20 73 65 65 20 70 75 62 6C 69 63 20 6D 65  an see public me
  387                                 1CC0             73 73 61 67 65 73 2E 20 20 4C 65 65 20 63 61 6E  ssages.  Lee can
  388                                 1CD0             20 6F 6E 6C 79 20 73 65 65 3A 0D 0D 2F 50 31 34   only see:../P14
  389                                 1CE0             32 20 48 69 20 4C 65 65 0D 0D 54 6F 20 73 65 6E  2 Hi Lee..To sen
  390                                 1CF0             64 20 45 6D 61 69 6C 20 74 6F 20 4C 65 65 2C 20  d Email to Lee, 
  391                                 1D00             65 6E 74 65 72 3A 0D 0D 2F 50 31 34 2F 45 30 33  enter:../P14/E03
  392                                 1D10             32 20 3C 6D 65 73 73 61 67 65 3E 0D 0D 59 6F 75  2 <message>..You
  393                                 1D20             20 63 61 6E 20 6C 65 61 76 65 20 45 6D 61 69 6C   can leave Email
  394                                 1D30             20 6F 6E 20 61 6E 79 20 6C 69 6E 6B 65 64 20 73   on any linked s
  395                                 1D40             74 61 74 69 6F 6E 20 74 68 69 73 20 77 61 79 2C  tation this way,
  396                                 1D50             20 75 6E 6C 65 73 73 20 79 6F 75 20 73 65 65 20   unless you see 
  397                                 1D60             61 20 27 2D 27 20 69 6E 20 74 68 65 20 73 74 61  a '-' in the sta
  398                                 1D70             74 69 6F 6E 20 6E 61 6D 65 3A 0D 0D 31 34 2D 3A  tion name:..14-:
  399                                 1D80             44 65 74 72 6F 69 74 20 23 31 0D 0D 54 68 65 20  Detroit #1..The 
  400                                 1D90             63 68 61 72 61 63 74 65 72 20 62 65 66 6F 72 65  character before
  401                                 1DA0             20 74 68 65 20 73 74 61 74 69 6F 6E 20 6E 61 6D   the station nam
  402                                 1DB0             65 20 6D 65 61 6E 73 3A 0D 0D 27 2E 27 20 55 6E  e means:..'.' Un
  403                                 1DC0             6C 6F 63 6B 65 64 0D 27 2C 27 20 4C 6F 63 6B 65  locked.',' Locke
  404                                 1DD0             64 0D 27 3A 27 20 46 75 6C 6C 2F 55 6E 6C 6F 63  d.':' Full/Unloc
  405                                 1DE0             6B 65 64 0D 27 3B 27 20 46 75 6C 6C 2F 4C 6F 63  ked.';' Full/Loc
  406                                 1DF0             6B 65 64 0D 0D 54 6F 20 73 71 75 65 6C 63 68 20  ked..To squelch 
  407                                 1E00             73 74 61 74 69 6F 6E 20 6C 69 73 74 73 20 28 53  station lists (S
  408                                 1E10             4C 29 20 61 6E 64 20 6C 6F 67 6F 6E 73 20 28 4C  L) and logons (L
  409                                 1E20             4F 29 20 65 6E 74 65 72 3A 0D 0D 2F 43 53 20 2D  O) enter:../CS -
  410                                 1E30             20 6E 6F 20 53 4C 2C 20 6E 6F 20 4C 4F 20 28 4F   no SL, no LO (O
  411                                 1E40             6E 2F 4F 66 66 29 0D 2F 43 4C 20 2D 20 6E 6F 20  n/Off)./CL - no 
  412                                 1E50             53 4C 2C 20 73 68 6F 77 20 4C 4F 0D 2F 43 4D 20  SL, show LO./CM 
  413                                 1E60             2D 20 6E 6F 20 53 4C 2C 20 73 68 6F 77 20 6D 65  - no SL, show me
  414                                 1E70             6D 62 65 72 20 4C 4F 20 6F 6E 6C 79 0D 0D 54 6F  mber LO only..To
  415                                 1E80             20 72 65 6D 6F 76 65 20 79 6F 75 72 20 68 61 6E   remove your han
  416                                 1E90             64 6C 65 20 66 72 6F 6D 20 79 6F 75 72 20 73 74  dle from your st
  417                                 1EA0             61 74 69 6F 6E 20 6C 69 73 74 2C 20 65 6E 74 65  ation list, ente
  418                                 1EB0             72 3A 0D 0D 2F 43 48 0D 0D 59 6F 75 72 20 6D 65  r:../CH..Your me
  419                                 1EC0             6D 62 65 72 20 6E 75 6D 62 65 72 20 77 69 6C 6C  mber number will
  420                                 1ED0             20 73 74 69 6C 6C 20 61 70 70 65 61 72 2C 20 62   still appear, b
  421                                 1EE0             75 74 20 77 69 74 68 20 61 6E 20 27 78 27 2E 20  ut with an 'x'. 
  422                                 1EF0             50 6C 65 61 73 65 20 44 4F 20 4E 4F 54 20 73 65  Please DO NOT se
  423                                 1F00             6E 64 20 2F 50 20 6D 65 73 73 61 67 65 73 20 74  nd /P messages t
  424                                 1F10             6F 20 61 6E 79 6F 6E 65 20 77 69 74 68 20 74 68  o anyone with th
  425                                 1F20             69 73 20 27 78 27 2E 0D 0D 49 66 20 74 68 65 20  is 'x'...If the 
  426                                 1F30             6C 69 6E 6B 20 63 68 61 6E 6E 65 6C 20 67 65 74  link channel get
  427                                 1F40             73 20 74 6F 6F 20 62 75 73 79 2C 20 67 6F 20 74  s too busy, go t
  428                                 1F50             6F 20 61 20 64 69 66 66 65 72 65 6E 74 20 63 68  o a different ch
  429                                 1F60             61 6E 6E 65 6C 20 61 6E 64 20 2F 50 20 73 6F 6D  annel and /P som
  430                                 1F70             65 6F 6E 65 20 6F 6E 20 74 68 65 20 6C 69 6E 6B  eone on the link
  431                                 1F80             3A 0D 0D 2F 50 31 34 31 2A 20 48 69 20 53 75 65  :../P141* Hi Sue
  432                                 1F90             2E 0D 0D 54 68 65 20 2A 20 61 6C 6C 6F 77 73 20  ...The * allows 
  433                                 1FA0             79 6F 75 20 74 6F 20 74 61 6C 6B 20 74 6F 20 53  you to talk to S
  434                                 1FB0             75 65 20 77 69 74 68 6F 75 74 20 65 6E 74 65 72  ue without enter
  435                                 1FC0             69 6E 67 20 2F 50 31 34 31 20 65 61 63 68 20 74  ing /P141 each t
  436                                 1FD0             69 6D 65 2E 20 48 69 74 20 3C 45 53 43 3E 20 74  ime. Hit <ESC> t
  437                                 1FE0             6F 20 63 61 6E 63 65 6C 2E 0D 0D FF 00 00 00 00  o cancel........
  438                                 1FF0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
  439                                 2000             4C 00 18 00 00 0D 57 65 6C 63 6F 6D 65 20 74 6F  L.....Welcome to
  440                                 2010             20 44 69 76 65 72 73 69 2D 44 49 41 4C 28 74 6D   Diversi-DIAL(tm
  441                                 2020             29 0D 53 74 61 74 69 6F 6E 20 23 10 10 34 0D 0D  ).Station #..4..
  442                                 2030             45 6E 74 65 72 20 50 41 53 53 57 4F 52 44 20 6F  Enter PASSWORD o
  443                                 2040             72 20 70 72 65 73 73 20 3C 72 65 74 75 72 6E 3E  r press <return>
  444                                 2050             0D 0D 07 89 00 FE 00 00 00 00 00 00 00 4C D2 3A  .............L.:
  445                                 2060             A9 00 95 10 95 D0 95 78 95 58 8A A8 0A AA BD 86  .......x.X......
  446                                 2070             20 8D 80 20 BD 87 20 8D 81 20 A2 02 BD B0 23 9D   .. .. .. ....#.
  447                                 2080             00 10 CA D0 F7 60 0B 29 0A 2B 27 2D 44 2F 61 31  .....`.).+'-D/a1
  448                                 2090 7E 33 9B ROR  $9B33,X               
  449                                 2093 35 B8    AND  $B8,X                 
  450                                 2095 37       ???                        
  451                                 2096 86 01    STX  $01                   
  452                                 2098 B5 18    LDA  $18,X                 
  453                                 209A 85 04    STA  $04                   
  454                                 209C B5 B0    LDA  $B0,X                 
  455                                 209E 85 F6    STA  $F6                   
  456                                 20A0 A9 50    LDA  #$50                  
  457                                 20A2 85 F5    STA  $F5                   
  458                                 20A4 98       TYA                        
  459                                 20A5 09 80    ORA  #$80                  
  460                                 20A7 C0 08    CPY  #$08                  
  461                                 20A9 90 18    BCC  $20C3                 
  462                                 20AB BD 70 7F LDA  $7F70,X               
  463                                 20AE 10 08    BPL  $20B8                 
  464                                 20B0 B5 A8    LDA  $A8,X                 
  465                                 20B2 AA       TAX                        
  466                                 20B3 BD A1 7F LDA  $7FA1,X               
  467                                 20B6 10 01    BPL  $20B9                 
  468                                 20B8 60       RTS                        
  469                                 20B9 A9 53    LDA  #$53                  
  470                                 20BB 85 F5    STA  $F5                   
  471                                 20BD A0 00    LDY  #$00                  
  472                                 20BF A9 A8    LDA  #$A8                  
  473                                 20C1 D0 02    BNE  $20C5                 
  474                                 20C3 B6 B0    LDX  $B0,Y                 
  475                                 20C5 48       PHA                        
  476                                 20C6 B5 C0    LDA  $C0,X                 
  477                                 20C8 8D A6 21 STA  $21A6                 
  478                                 20CB B5 C1    LDA  $C1,X                 
  479                                 20CD 8D AA 21 STA  $21AA                 
  480                                 20D0 68       PLA                        
  481                                 20D1 20 D2 3A JSR  $3AD2                 
  482                                 20D4 A9 8D    LDA  #$8D                  
  483                                 20D6 20 D2 3A JSR  $3AD2                 
  484                                 20D9 A9 00    LDA  #$00                  
  485                                 20DB 85 00    STA  $00                   
  486                                 20DD B9 B8 00 LDA  $00B8,Y               
  487                                 20E0 10 3C    BPL  $211E                 
  488                                 20E2 84 F3    STY  $F3                   
  489                                 20E4 A9 2F    LDA  #$2F                  
  490                                 20E6 A0 03    LDY  #$03                  
  491                                 20E8 D1 00    CMP  ($00),Y               
  492                                 20EA F0 6E    BEQ  $215A                 
  493                                 20EC 20 D2 3A JSR  $3AD2                 
  494                                 20EF A9 50    LDA  #$50                  
  495                                 20F1 20 D2 3A JSR  $3AD2                 
  496                                 20F4 B1 00    LDA  ($00),Y               
  497                                 20F6 C9 30    CMP  #$30                  
  498                                 20F8 90 0C    BCC  $2106                 
  499                                 20FA C9 38    CMP  #$38                  
  500                                 20FC B0 08    BCS  $2106                 
  501                                 20FE 85 F3    STA  $F3                   
  502                                 2100 20 D2 3A JSR  $3AD2                 
  503                                 2103 C8       INY                        
  504                                 2104 D0 EE    BNE  $20F4                 
  505                                 2106 C9 2F    CMP  #$2F                  
  506                                 2108 F0 50    BEQ  $215A                 
  507                                 210A C0 04    CPY  #$04                  
  508                                 210C 49 7E    EOR  #$7E                  
  509                                 210E F0 0B    BEQ  $211B                 
  510                                 2110 B0 05    BCS  $2117                 
  511                                 2112 A9 53    LDA  #$53                  
  512                                 2114 20 D2 3A JSR  $3AD2                 
  513                                 2117 A9 20    LDA  #$20                  
  514                                 2119 D0 1A    BNE  $2135                 
  515                                 211B 4C 98 21 JMP  $2198                 
  516                                 211E A0 03    LDY  #$03                  
  517                                 2120 B1 00    LDA  ($00),Y               
  518                                 2122 49 30    EOR  #$30                  
  519                                 2124 C9 0A    CMP  #$0A                  
  520                                 2126 B0 03    BCS  $212B                 
  521                                 2128 C8       INY                        
  522                                 2129 D0 F5    BNE  $2120                 
  523                                 212B C9 1F    CMP  #$1F                  
  524                                 212D F0 76    BEQ  $21A5                 
  525                                 212F C9 4E    CMP  #$4E                  
  526                                 2131 F0 64    BEQ  $2197                 
  527                                 2133 A5 F5    LDA  $F5                   
  528                                 2135 20 D2 3A JSR  $3AD2                 
  529                                 2138 B1 00    LDA  ($00),Y               
  530                                 213A C9 20    CMP  #$20                  
  531                                 213C D0 01    BNE  $213F                 
  532                                 213E C8       INY                        
  533                                 213F 84 F5    STY  $F5                   
  534                                 2141 C9 2A    CMP  #$2A                  
  535                                 2143 D0 07    BNE  $214C                 
  536                                 2145 C8       INY                        
  537                                 2146 98       TYA                        
  538                                 2147 A4 01    LDY  $01                   
  539                                 2149 99 88 7F STA  $7F88,Y               
  540                                 214C A5 F6    LDA  $F6                   
  541                                 214E 10 04    BPL  $2154                 
  542                                 2150 A0 1E    LDY  #$1E                  
  543                                 2152 D0 02    BNE  $2156                 
  544                                 2154 A0 02    LDY  #$02                  
  545                                 2156 24 90    BIT  $90                   
  546                                 2158 18       CLC                        
  547                                 2159 60       RTS                        
  548                                 215A 20 D2 3A JSR  $3AD2                 
  549                                 215D C8       INY                        
  550                                 215E B1 00    LDA  ($00),Y               
  551                                 2160 29 5F    AND  #$5F                  
  552                                 2162 C9 45    CMP  #$45                  
  553                                 2164 F0 4D    BEQ  $21B3                 
  554                                 2166 46 04    LSR  $04                   
  555                                 2168 F0 15    BEQ  $217F                 
  556                                 216A C9 53    CMP  #$53                  
  557                                 216C D0 04    BNE  $2172                 
  558                                 216E 24 F6    BIT  $F6                   
  559                                 2170 30 2D    BMI  $219F                 
  560                                 2172 C9 4A    CMP  #$4A                  
  561                                 2174 F0 29    BEQ  $219F                 
  562                                 2176 C9 4B    CMP  #$4B                  
  563                                 2178 D0 2B    BNE  $21A5                 
  564                                 217A A9 4A    LDA  #$4A                  
  565                                 217C 91 00    STA  ($00),Y               
  566                                 217E 18       CLC                        
  567                                 217F 90 10    BCC  $2191                 
  568                                 2181 C9 4B    CMP  #$4B                  
  569                                 2183 F0 1A    BEQ  $219F                 
  570                                 2185 C9 51    CMP  #$51                  
  571                                 2187 F0 16    BEQ  $219F                 
  572                                 2189 C9 54    CMP  #$54                  
  573                                 218B F0 12    BEQ  $219F                 
  574                                 218D C9 56    CMP  #$56                  
  575                                 218F D0 14    BNE  $21A5                 
  576                                 2191 C9 50    CMP  #$50                  
  577                                 2193 F0 10    BEQ  $21A5                 
  578                                 2195 D0 08    BNE  $219F                 
  579                                 2197 C8       INY                        
  580                                 2198 B0 05    BCS  $219F                 
  581                                 219A A9 53    LDA  #$53                  
  582                                 219C 20 D2 3A JSR  $3AD2                 
  583                                 219F 84 F5    STY  $F5                   
  584                                 21A1 A0 1F    LDY  #$1F                  
  585                                 21A3 D0 B1    BNE  $2156                 
  586                                 21A5 A9 00    LDA  #$00                  
  587                                 21A7 95 C0    STA  $C0,X                 
  588                                 21A9 A9 00    LDA  #$00                  
  589                                 21AB 95 C1    STA  $C1,X                 
  590                                 21AD A9 00    LDA  #$00                  
  591                                 21AF 81 C0    STA  ($C0,X)               
  592                                 21B1 38       SEC                        
  593                                 21B2 60       RTS                        
  594                                 21B3 20 D2 3A JSR  $3AD2                 
  595                                 21B6 C8       INY                        
  596                                 21B7 84 F5    STY  $F5                   
  597                                 21B9 B1 00    LDA  ($00),Y               
  598                                 21BB C9 0D    CMP  #$0D                  
  599                                 21BD D0 06    BNE  $21C5                 
  600                                 21BF A5 04    LDA  $04                   
  601                                 21C1 D0 E2    BNE  $21A5                 
  602                                 21C3 F0 DC    BEQ  $21A1                 
  603                                 21C5 C8       INY                        
  604                                 21C6 B1 00    LDA  ($00),Y               
  605                                 21C8 C9 3A    CMP  #$3A                  
  606                                 21CA B0 D9    BCS  $21A5                 
  607                                 21CC A5 F6    LDA  $F6                   
  608                                 21CE 30 D1    BMI  $21A1                 
  609                                 21D0 A5 F3    LDA  $F3                   
  610                                 21D2 CD 04 20 CMP  $2004                 
  611                                 21D5 F0 CE    BEQ  $21A5                 
  612                                 21D7 A4 F5    LDY  $F5                   
  613                                 21D9 A9 7E    LDA  #$7E                  
  614                                 21DB 20 D2 3A JSR  $3AD2                 
  615                                 21DE AD 3E 22 LDA  $223E                 
  616                                 21E1 20 D2 3A JSR  $3AD2                 
  617                                 21E4 AD 3F 22 LDA  $223F                 
  618                                 21E7 20 D2 3A JSR  $3AD2                 
  619                                 21EA AD 40 22 LDA  $2240                 
  620                                 21ED 20 D2 3A JSR  $3AD2                 
  621                                 21F0 A9 03    LDA  #$03                  
  622                                 21F2 85 04    STA  $04                   
  623                                 21F4 B1 00    LDA  ($00),Y               
  624                                 21F6 49 30    EOR  #$30                  
  625                                 21F8 C9 0A    CMP  #$0A                  
  626                                 21FA B0 A9    BCS  $21A5                 
  627                                 21FC 49 30    EOR  #$30                  
  628                                 21FE 20 D2 3A JSR  $3AD2                 
  629                                 2201 C8       INY                        
  630                                 2202 C6 04    DEC  $04                   
  631                                 2204 D0 EE    BNE  $21F4                 
  632                                 2206 B1 00    LDA  ($00),Y               
  633                                 2208 C8       INY                        
  634                                 2209 C9 2C    CMP  #$2C                  
  635                                 220B F0 E0    BEQ  $21ED                 
  636                                 220D C9 0D    CMP  #$0D                  
  637                                 220F F0 C4    BEQ  $21D5                 
  638                                 2211 88       DEY                        
  639                                 2212 84 F5    STY  $F5                   
  640                                 2214 A4 01    LDY  $01                   
  641                                 2216 C0 08    CPY  #$08                  
  642                                 2218 F0 07    BEQ  $2221                 
  643                                 221A B9 48 00 LDA  $0048,Y               
  644                                 221D 29 30    AND  #$30                  
  645                                 221F F0 B4    BEQ  $21D5                 
  646                                 2221 B9 78 7F LDA  $7F78,Y               
  647                                 2224 4A       LSR  A                     
  648                                 2225 A8       TAY                        
  649                                 2226 B9 0E 58 LDA  $580E,Y               
  650                                 2229 F0 AA    BEQ  $21D5                 
  651                                 222B A9 28    LDA  #$28                  
  652                                 222D 09 20    ORA  #$20                  
  653                                 222F 20 D2 3A JSR  $3AD2                 
  654                                 2232 C8       INY                        
  655                                 2233 B9 0F 58 LDA  $580F,Y               
  656                                 2236 D0 F5    BNE  $222D                 
  657                                 2238 A0 07    LDY  #$07                  
  658                                 223A 24 90    BIT  $90                   
  659                                 223C 18       CLC                        
  660                                 223D 60       RTS                        
  661                                 223E 30 30    BMI  $2270                 
  662                                 2240 31 C9    AND  ($C9),Y               
  663                                 2242 30 90    BMI  $21D4                 
  664                                 2244 02       ???                        
  665                                 2245 A9 2A    LDA  #$2A                  
  666                                 2247 60       RTS                        
  667                                 2248 00       BRK                        
  668                                 2249 00       BRK                        
  669                                 224A A0 04    LDY  #$04                  
  670                                 224C B5 18    LDA  $18,X                 
  671                                 224E D0 6E    BNE  $22BE                 
  672                                 2250 8E 6E 22 STX  $226E                 
  673                                 2253 8E 85 22 STX  $2285                 
  674                                 2256 8E CA 26 STX  $26CA                 
  675                                 2259 18       CLC                        
  676                                 225A A9 A0    LDA  #$A0                  
  677                                 225C 8D 27 04 STA  $0427                 
  678                                 225F 8D D6 7F STA  $7FD6                 
  679                                 2262 8D D7 7F STA  $7FD7                 
  680                                 2265 A9 4C    LDA  #$4C                  
  681                                 2267 8D 02 60 STA  $6002                 
  682                                 226A B0 52    BCS  $22BE                 
  683                                 226C AD 02 08 LDA  $0802                 
  684                                 226F C9 23    CMP  #$23                  
  685                                 2271 D0 0D    BNE  $2280                 
  686                                 2273 BD E0 7E LDA  $7EE0,X               
  687                                 2276 49 22    EOR  #$22                  
  688                                 2278 9D E0 7E STA  $7EE0,X               
  689                                 227B 49 D8    EOR  #$D8                  
  690                                 227D 4C 6D 27 JMP  $276D                 
  691                                 2280 49 30    EOR  #$30                  
  692                                 2282 AA       TAX                        
  693                                 2283 AD 03 08 LDA  $0803                 
  694                                 2286 E0 0B    CPX  #$0B                  
  695                                 2288 D0 03    BNE  $228D                 
  696                                 228A 4C C9 26 JMP  $26C9                 
  697                                 228D C9 61    CMP  #$61                  
  698                                 228F 90 02    BCC  $2293                 
  699                                 2291 29 5F    AND  #$5F                  
  700                                 2293 C9 4D    CMP  #$4D                  
  701                                 2295 F0 08    BEQ  $229F                 
  702                                 2297 E0 08    CPX  #$08                  
  703                                 2299 B0 23    BCS  $22BE                 
  704                                 229B E0 00    CPX  #$00                  
  705                                 229D F0 1F    BEQ  $22BE                 
  706                                 229F 49 30    EOR  #$30                  
  707                                 22A1 F0 1C    BEQ  $22BF                 
  708                                 22A3 C9 0A    CMP  #$0A                  
  709                                 22A5 B0 20    BCS  $22C7                 
  710                                 22A7 C9 01    CMP  #$01                  
  711                                 22A9 F0 09    BEQ  $22B4                 
  712                                 22AB 48       PHA                        
  713                                 22AC AD 6E 22 LDA  $226E                 
  714                                 22AF C9 09    CMP  #$09                  
  715                                 22B1 68       PLA                        
  716                                 22B2 B0 0A    BCS  $22BE                 
  717                                 22B4 0A       ASL  A                     
  718                                 22B5 1E 60 7F ASL  $7F60,X               
  719                                 22B8 6A       ROR  A                     
  720                                 22B9 9D 60 7F STA  $7F60,X               
  721                                 22BC A0 00    LDY  #$00                  
  722                                 22BE 60       RTS                        
  723                                 22BF A5 E6    LDA  $E6                   
  724                                 22C1 D0 FB    BNE  $22BE                 
  725                                 22C3 86 E6    STX  $E6                   
  726                                 22C5 F0 F5    BEQ  $22BC                 
  727                                 22C7 49 30    EOR  #$30                  
  728                                 22C9 C9 52    CMP  #$52                  
  729                                 22CB F0 05    BEQ  $22D2                 
  730                                 22CD C9 53    CMP  #$53                  
  731                                 22CF D0 11    BNE  $22E2                 
  732                                 22D1 88       DEY                        
  733                                 22D2 CA       DEX                        
  734                                 22D3 E0 04    CPX  #$04                  
  735                                 22D5 90 03    BCC  $22DA                 
  736                                 22D7 A0 02    LDY  #$02                  
  737                                 22D9 60       RTS                        
  738                                 22DA 8A       TXA                        
  739                                 22DB 0A       ASL  A                     
  740                                 22DC 99 AA 23 STA  $23AA,Y               
  741                                 22DF 4C BC 22 JMP  $22BC                 
  742                                 22E2 C9 4F    CMP  #$4F                  
  743                                 22E4 F0 12    BEQ  $22F8                 
  744                                 22E6 C9 41    CMP  #$41                  
  745                                 22E8 F0 0D    BEQ  $22F7                 
  746                                 22EA C9 4C    CMP  #$4C                  
  747                                 22EC D0 11    BNE  $22FF                 
  748                                 22EE BD D8 7F LDA  modem_exists,X        
  749                                 22F1 4A       LSR  A                     
  750                                 22F2 90 CA    BCC  $22BE                 
  751                                 22F4 CE DA 7E DEC  $7EDA                 
  752                                 22F7 18       CLC                        
  753                                 22F8 20 39 26 JSR  $2639                 
  754                                 22FB A9 01    LDA  #$01                  
  755                                 22FD D0 B5    BNE  $22B4                 
  756                                 22FF C9 4D    CMP  #$4D                  
  757                                 2301 D0 1C    BNE  $231F                 
  758                                 2303 AC 6E 22 LDY  $226E                 
  759                                 2306 B9 A8 00 LDA  $00A8,Y               
  760                                 2309 A8       TAY                        
  761                                 230A 8A       TXA                        
  762                                 230B C9 09    CMP  #$09                  
  763                                 230D 90 07    BCC  $2316                 
  764                                 230F D0 03    BNE  $2314                 
  765                                 2311 A9 FF    LDA  #$FF                  
  766                                 2313 2C A9 08 BIT  $08A9                 
  767                                 2316 99 A1 7F STA  $7FA1,Y               
  768                                 2319 20 98 7F JSR  $7F98                 
  769                                 231C 4C BC 22 JMP  $22BC                 
  770                                 231F C9 46    CMP  #$46                  
  771                                 2321 F0 2E    BEQ  $2351                 
  772                                 2323 C9 42    CMP  #$42                  
  773                                 2325 F0 57    BEQ  $237E                 
  774                                 2327 C9 45    CMP  #$45                  
  775                                 2329 F0 67    BEQ  $2392                 
  776                                 232B C9 58    CMP  #$58                  
  777                                 232D F0 30    BEQ  $235F                 
  778                                 232F C9 43    CMP  #$43                  
  779                                 2331 F0 2B    BEQ  $235E                 
  780                                 2333 C9 54    CMP  #$54                  
  781                                 2335 D0 87    BNE  $22BE                 
  782                                 2337 AD 6E 22 LDA  $226E                 
  783                                 233A 29 07    AND  #$07                  
  784                                 233C 8D D6 7F STA  $7FD6                 
  785                                 233F B4 B8    LDY  $B8,X                 
  786                                 2341 10 B5    BPL  $22F8                 
  787                                 2343 8E D7 7F STX  $7FD7                 
  788                                 2346 AA       TAX                        
  789                                 2347 D0 05    BNE  $234E                 
  790                                 2349 A9 60    LDA  #$60                  
  791                                 234B 8D 02 60 STA  $6002                 
  792                                 234E 4C BC 22 JMP  $22BC                 
  793                                 2351 BD 60 7F LDA  $7F60,X               
  794                                 2354 49 80    EOR  #$80                  
  795                                 2356 9D 60 7F STA  $7F60,X               
  796                                 2359 29 80    AND  #$80                  
  797                                 235B 4C 6D 27 JMP  $276D                 
  798                                 235E 18       CLC                        
  799                                 235F CA       DEX                        
  800                                 2360 8A       TXA                        
  801                                 2361 2A       ROL  A                     
  802                                 2362 AA       TAX                        
  803                                 2363 E0 08    CPX  #$08                  
  804                                 2365 90 03    BCC  $236A                 
  805                                 2367 A0 02    LDY  #$02                  
  806                                 2369 60       RTS                        
  807                                 236A 4A       LSR  A                     
  808                                 236B A9 72    LDA  #$72                  
  809                                 236D B0 02    BCS  $2371                 
  810                                 236F A9 7E    LDA  #$7E                  
  811                                 2371 5D F8 7E EOR  $7EF8,X               
  812                                 2374 9D F8 7E STA  $7EF8,X               
  813                                 2377 48       PHA                        
  814                                 2378 20 98 7F JSR  $7F98                 
  815                                 237B 68       PLA                        
  816                                 237C 10 DD    BPL  $235B                 
  817                                 237E B5 B8    LDA  $B8,X                 
  818                                 2380 30 03    BMI  $2385                 
  819                                 2382 A0 16    LDY  #$16                  
  820                                 2384 60       RTS                        
  821                                 2385 BD 3D FF LDA  $FF3D,X               
  822                                 2388 49 FF    EOR  #$FF                  
  823                                 238A 9D 3D FF STA  $FF3D,X               
  824                                 238D 9D F0 7E STA  $7EF0,X               
  825                                 2390 B0 C9    BCS  $235B                 
  826                                 2392 B5 B8    LDA  $B8,X                 
  827                                 2394 30 02    BMI  $2398                 
  828                                 2396 A2 00    LDX  #$00                  
  829                                 2398 AD 0C F8 LDA  $F80C                 
  830                                 239B 49 60    EOR  #$60                  
  831                                 239D F0 08    BEQ  $23A7                 
  832                                 239F 8A       TXA                        
  833                                 23A0 5D 45 FF EOR  $FF45,X               
  834                                 23A3 9D 45 FF STA  $FF45,X               
  835                                 23A6 AA       TAX                        
  836                                 23A7 8A       TXA                        
  837                                 23A8 8D 04 20 STA  $2004                 
  838                                 23AB B0 AE    BCS  $235B                 
  839                                 23AD 00       BRK                        
  840                                 23AE 02       ???                        
  841                                 23AF 05 20    ORA  $20                   
  842                                 23B1 B3       ???                        
  843                                 23B2 23       ???                        
  844                                 23B3 0D FF 30 ORA  $30FF                 
  845                                 23B6 34       ???                        
  846                                 23B7 2F       ???                        
  847                                 23B8 32       ???                        
  848                                 23B9 34       ???                        
  849                                 23BA 2F       ???                        
  850                                 23BB 38       SEC                        
  851                                 23BC 37       ???                        
  852                                 23BD 20 31 32 JSR  $3231                 
  853                                 23C0 3A       ???                        
  854                                 23C1 30 30    BMI  $23F3                 
  855                                 23C3 20 50 4D JSR  $4D50                 
  856                                 23C6 20 30 30 JSR  $3030                 
  857                                 23C9 0D 4C 61 ORA  $614C                 
  858                                 23CC 73       ???                        
  859                                 23CD 74       ???                        
  860                                 23CE 20 63 61 JSR  $6163                 
  861                                 23D1 6C 6C 20 JMP  ($206C)               
  862                                 23D4 31 32    AND  ($32),Y               
  863                                 23D6 3A       ???                        
  864                                 23D7 30 30    BMI  $2409                 
  865                                 23D9 20 50 4D JSR  $4D50                 
  866                                 23DC 0D 2D 2D ORA  $2D2D                 
  867                                 23DF 3E 20 78 ROL  $7820,X               
  868                                 23E2 78       SEI                        
  869                                 23E3 2F       ???                        
  870                                 23E4 78       SEI                        
  871                                 23E5 78       SEI                        
  872                                 23E6 2F       ???                        
  873                                 23E7 78       SEI                        
  874                                 23E8 78       SEI                        
  875                                 23E9 20 31 32 JSR  $3231                 
  876                                 23EC 3A       ???                        
  877                                 23ED 30 30    BMI  $241F                 
  878                                 23EF 20 50 4D JSR  $4D50                 
  879                                 23F2 20 0D FF JSR  $FF0D                 
  880                                 23F5 2D 3E 20 AND  $203E                 
  881                                 23F8 46 75    LSR  $75                   
  882                                 23FA 6C 6C 0D JMP  ($0D6C)               
  883                                 23FD FF       ???                        
  884                              *
  885                              * handle mslot!
  886                              mslot_command
  887                                 23FE 90 03    BCC  $2403                 
  888                                 2400 4C D6 53 JMP  $53D6                 
  889                                 2403 85 04    STA  $04                   
  890                                 2405 29 07    AND  #$07                  
  891                                 2407 85 00    STA  $00                   
  892                                 2409 A0 03    LDY  #$03                  ; offset +3 into command to check for /mx=
  893                                 240B B1 03    LDA  ($03),Y               ; load byte
  894                                 240D 88       DEY                        ; decrement - offset now at which msg slot
  895                                 240E C9 3D    CMP  #$3D                  ; check against =
  896                                 2410 D0 17    BNE  mslot_validate        ; branch if not equal
  897                              *
  898                              * change mslot!
  899                              mslot_change
  900                                 2412 B1 03    LDA  ($03),Y               
  901                                 2414 C9 60    CMP  #$60                  
  902                                 2416 90 02    BCC  $241A                 
  903                                 2418 29 5F    AND  #$5F                  
  904                                 241A 8D 28 24 STA  $2428                 
  905                                 241D 8A       TXA                        
  906                                 241E 18       CLC                        
  907                                 241F F0 08    BEQ  mslot_validate        
  908                                 2421 C9 60    CMP  #$60                  
  909                                 2423 90 02    BCC  $2427                 
  910                                 2425 29 5F    AND  #$5F                  
  911                                 2427 49 00    EOR  #$00                  
  912                              *
  913                              * somewhat complex math for mslot validation:
  914                              *   disallow 00..2F (nul to /)  allow 30..39 (0 to 9)  disallow 3a..40 (: to @)    allow 41..5a (a to z)
  915                              *   disallow 5b..60 ([ to `)    allow 61..7a (A to Z)  disallow 7b..ff ({ and up)
  916                              mslot_validate
  917                                 2429 08       PHP                        ; save processor flags
  918                                 242A B1 03    LDA  ($03),Y               ; get which mslot to show
  919                                 242C C9 60    CMP  #$60                  ; compare against ` (uppercase char or bad)
  920                                 242E 90 02    BCC  $2432                 ; branch & skip next instruction if less than 60 (`)
  921                                 2430 29 5F    AND  #$5F                  ; AND with 5F to drop high bits, is now lowercase (or bad)
  922                                 2432 38       SEC                        ; set carry
  923                                 2433 E9 30    SBC  #$30                  ; ??? some more checks (numerical probably)
  924                                 2435 B0 04    BCS  $243B                 ; ??? branch carry set (check this)
  925                              mslot_invalid
  926                                 2437 A0 1E    LDY  #$1E                  ; kiss of death for this command - not valid mslot
  927                                 2439 28       PLP                        
  928                                 243A 60       RTS                        
  929                                 243B C9 0A    CMP  #$0A                  
  930                                 243D 90 06    BCC  $2445                 
  931                                 243F E9 07    SBC  #$07                  
  932                                 2441 C9 0A    CMP  #$0A                  
  933                                 2443 90 F2    BCC  mslot_invalid         
  934                                 2445 C9 24    CMP  #$24                  
  935                                 2447 B0 EE    BCS  mslot_invalid         
  936                                 2449 AA       TAX                        
  937                                 244A 0A       ASL  A                     
  938                                 244B 69 40    ADC  #$40                  
  939                                 244D 28       PLP                        
  940                                 244E F0 0C    BEQ  $245C                 
  941                                 2450 A8       TAY                        
  942                                 2451 8A       TXA                        
  943                                 2452 F0 07    BEQ  $245B                 
  944                                 2454 BD 11 FF LDA  $FF11,X               
  945                                 2457 A6 00    LDX  $00                   
  946                                 2459 95 10    STA  $10,X                 
  947                                 245B 60       RTS                        
  948                                 245C 86 00    STX  $00                   
  949                                 245E AA       TAX                        
  950                                 245F BD 11 60 LDA  $6011,X               
  951                                 2462 8D 9D 24 STA  $249D                 
  952                                 2465 BD 12 60 LDA  $6012,X               
  953                                 2468 8D 9E 24 STA  $249E                 
  954                                 246B A2 00    LDX  #$00                  
  955                                 246D 86 01    STX  $01                   
  956                                 246F A0 04    LDY  #$04                  
  957                                 2471 B1 03    LDA  ($03),Y               
  958                                 2473 90 04    BCC  $2479                 
  959                                 2475 C9 3B    CMP  #$3B                  
  960                                 2477 F0 23    BEQ  $249C                 
  961                                 2479 C9 0D    CMP  #$0D                  
  962                                 247B D0 0F    BNE  $248C                 
  963                                 247D BD DB 24 LDA  $24DB,X               
  964                                 2480 91 03    STA  ($03),Y               
  965                                 2482 30 04    BMI  $2488                 
  966                                 2484 E8       INX                        
  967                                 2485 C8       INY                        
  968                                 2486 D0 F5    BNE  $247D                 
  969                                 2488 A2 00    LDX  #$00                  
  970                                 248A A0 04    LDY  #$04                  
  971                                 248C B1 03    LDA  ($03),Y               
  972                                 248E D0 02    BNE  $2492                 
  973                                 2490 A9 FF    LDA  #$FF                  
  974                                 2492 C9 07    CMP  #$07                  
  975                                 2494 F0 0E    BEQ  $24A4                 
  976                                 2496 C9 3B    CMP  #$3B                  
  977                                 2498 D0 02    BNE  $249C                 
  978                                 249A A9 0D    LDA  #$0D                  
  979                                 249C 9D 00 D0 STA  $D000,X               
  980                                 249F C9 FF    CMP  #$FF                  
  981                                 24A1 F0 06    BEQ  $24A9                 
  982                                 24A3 E8       INX                        
  983                                 24A4 C8       INY                        
  984                                 24A5 D0 E5    BNE  $248C                 
  985                                 24A7 F0 E7    BEQ  $2490                 
  986                                 24A9 E0 04    CPX  #$04                  
  987                                 24AB 90 24    BCC  $24D1                 
  988                                 24AD 88       DEY                        
  989                                 24AE 88       DEY                        
  990                                 24AF B1 03    LDA  ($03),Y               
  991                                 24B1 C9 5C    CMP  #$5C                  
  992                                 24B3 D0 1C    BNE  $24D1                 
  993                                 24B5 88       DEY                        
  994                                 24B6 B1 03    LDA  ($03),Y               
  995                                 24B8 49 30    EOR  #$30                  
  996                                 24BA D0 02    BNE  $24BE                 
  997                                 24BC A9 0A    LDA  #$0A                  
  998                                 24BE C9 0B    CMP  #$0B                  
  999                                 24C0 B0 0F    BCS  $24D1                 
 1000                                 24C2 48       PHA                        
 1001                                 24C3 65 00    ADC  $00                   
 1002                                 24C5 C9 24    CMP  #$24                  
 1003                                 24C7 68       PLA                        
 1004                                 24C8 B0 07    BCS  $24D1                 
 1005                                 24CA 85 01    STA  $01                   
 1006                                 24CC CA       DEX                        
 1007                                 24CD CA       DEX                        
 1008                                 24CE CA       DEX                        
 1009                                 24CF D0 BF    BNE  $2490                 
 1010                                 24D1 A6 00    LDX  $00                   
 1011                                 24D3 A5 01    LDA  $01                   
 1012                                 24D5 9D 11 FF STA  $FF11,X               
 1013                                 24D8 A0 00    LDY  #$00                  
 1014                                 24DA 60       RTS                        
 1015                                 24DB 4E 6F 20 LSR  $206F                 
 1016                                 24DE 4D 65 73 EOR  $7365                 
 1017                                 24E1 73       ???                        
 1018                                 24E2 61 67    ADC  ($67,X)               
 1019                                 24E4 65 0D    ADC  $0D                   
 1020                                 24E6 FF       ???                        
 1021                                 24E7 8E FB 24 STX  $24FB                 
 1022                                 24EA 8A       TXA                        
 1023                                 24EB 29 07    AND  #$07                  
 1024                                 24ED 8D 39 25 STA  $2539                 
 1025                                 24F0 B5 B0    LDA  $B0,X                 
 1026                                 24F2 85 01    STA  $01                   
 1027                                 24F4 BD 78 7F LDA  $7F78,X               
 1028                                 24F7 4A       LSR  A                     
 1029                                 24F8 A8       TAY                        
 1030                                 24F9 AD 02 08 LDA  $0802                 
 1031                                 24FC 49 30    EOR  #$30                  
 1032                                 24FE C9 08    CMP  #$08                  
 1033                                 2500 90 22    BCC  $2524                 
 1034                                 2502 BD 38 7F LDA  $7F38,X               
 1035                                 2505 49 FF    EOR  #$FF                  
 1036                                 2507 9D 38 7F STA  $7F38,X               
 1037                                 250A 99 00 01 STA  $0100,Y               
 1038                                 250D 99 01 01 STA  $0101,Y               
 1039                                 2510 99 02 01 STA  $0102,Y               
 1040                                 2513 99 03 01 STA  $0103,Y               
 1041                                 2516 99 04 01 STA  $0104,Y               
 1042                                 2519 99 05 01 STA  $0105,Y               
 1043                                 251C 99 06 01 STA  $0106,Y               
 1044                                 251F 99 07 01 STA  $0107,Y               
 1045                                 2522 B0 0E    BCS  $2532                 
 1046                                 2524 85 00    STA  $00                   
 1047                                 2526 98       TYA                        
 1048                                 2527 65 00    ADC  $00                   
 1049                                 2529 AA       TAX                        
 1050                                 252A BD 00 01 LDA  $0100,X               
 1051                                 252D 49 FF    EOR  #$FF                  
 1052                                 252F 9D 00 01 STA  $0100,X               
 1053                                 2532 24 01    BIT  $01                   
 1054                                 2534 10 05    BPL  $253B                 
 1055                                 2536 A9 FF    LDA  #$FF                  
 1056                                 2538 99 00 01 STA  $0100,Y               
 1057                                 253B D0 07    BNE  $2544                 
 1058                                 253D A0 24    LDY  #$24                  
 1059                                 253F B0 09    BCS  $254A                 
 1060                                 2541 A0 20    LDY  #$20                  
 1061                                 2543 60       RTS                        
 1062                                 2544 A0 22    LDY  #$22                  
 1063                                 2546 B0 02    BCS  $254A                 
 1064                                 2548 A0 1C    LDY  #$1C                  
 1065                                 254A 60       RTS                        
 1066                 t11             254B 29 5F    AND  #$5F                  
 1067                 t11             254D B4 B0    LDY  $B0,X                 
 1068                 t11             254F 30 04    BMI  $2555                 
 1069                 t11             2551 A0 00    LDY  #$00                  
 1070                 t11             2553 18       CLC                        
 1071                 t11             2554 60       RTS                        
 1072                                 2555 C9 53    CMP  #$53                  
 1073                                 2557 D0 13    BNE  $256C                 
 1074                                 2559 8E 5E 25 STX  $255E                 
 1075                                 255C AD 02 08 LDA  $0802                 
 1076                                 255F 29 5F    AND  #$5F                  
 1077                                 2561 A8       TAY                        
 1078                                 2562 A9 53    LDA  #$53                  
 1079                                 2564 C0 4D    CPY  #$4D                  
 1080                                 2566 F0 E9    BEQ  $2551                 
 1081                                 2568 C0 43    CPY  #$43                  
 1082                                 256A F0 E5    BEQ  $2551                 
 1083                                 256C C9 57    CMP  #$57                  
 1084                                 256E F0 22    BEQ  $2592                 
 1085                                 2570 C9 4C    CMP  #$4C                  
 1086                                 2572 F0 1E    BEQ  $2592                 
 1087                                 2574 C9 44    CMP  #$44                  
 1088                                 2576 F0 1A    BEQ  $2592                 
 1089                                 2578 C9 46    CMP  #$46                  
 1090                                 257A F0 16    BEQ  $2592                 
 1091                                 257C C9 4D    CMP  #$4D                  
 1092                                 257E F0 12    BEQ  $2592                 
 1093                                 2580 C9 43    CMP  #$43                  
 1094                                 2582 F0 0E    BEQ  $2592                 
 1095                                 2584 C9 5A    CMP  #$5A                  
 1096                                 2586 F0 0A    BEQ  $2592                 
 1097                                 2588 C9 4A    CMP  #$4A                  
 1098                                 258A D0 05    BNE  $2591                 
 1099                                 258C A9 4B    LDA  #$4B                  
 1100                                 258E 8D FF 57 STA  $57FF                 
 1101                                 2591 18       CLC                        
 1102                                 2592 A0 8C    LDY  #$8C                  
 1103                                 2594 60       RTS                        
 1104                              *
 1105                              * /h command ! set your own or someone else's handle
 1106                              *              or change the station name in /sp!
 1107                              * y offset to input buffer, using $00/$01 zp for baseline address
 1108                              * x offset to output, handle[line] memory OR 
 1109                              handle_command
 1110                                 2595 86 01    STX  $01                   ; x entry with which input page - 08-0F for lines 0-7 (save for indirect)
 1111                                 2597 A9 02    LDA  #$02                  ; offset +2 from buffer start (character after /h)
 1112                                 2599 85 00    STA  $00                   
 1113                                 259B A0 00    LDY  #$00                  ; use indirect with no index
 1114                                 259D B1 00    LDA  ($00),Y               ; load char
 1115                                 259F 49 30    EOR  #$30                  ; prepare comparison over ascii '0'-'7'
 1116                                 25A1 C9 08    CMP  #$08                  
 1117                                 25A3 B0 26    BCS  _h_calc_offset        ; branch if NOT a number
 1118                              *
 1119                              * change not your handle! (someone else, or /h0 station name)
 1120                                 25A5 A8       TAY                        ; save eor'ed victim # in y
 1121                                 25A6 B5 18    LDA  $18,X                 ; !!! $20-$27 - check sysop / permission bit?
 1122                                 25A8 D0 1F    BNE  _h_cleanup_and_start  ; branch if not sysop
 1123                                 25AA E6 00    INC  $00                   ; add 1 to input buffer offset to compensate for /h#xxx
 1124                                 25AC 98       TYA                        ; retrieve victim #
 1125                                 25AD D0 11    BNE  $25C0                 ; branch if victim is 1-7
 1126                              *
 1127                              * change station name shown in /sp
 1128                              _h_station_loop
 1129                                 25AF B1 00    LDA  ($00),Y               ; get input
 1130                                 25B1 99 F0 5E STA  station_name,Y        ; !!! store in 5ef0 station name
 1131                                 25B4 49 0D    EOR  #$0D                  ; ??? check for  illegal characters?
 1132                                 25B6 F0 F9    BEQ  $25B1                 ; ??? branch if equal (never?)
 1133                                 25B8 C8       INY                        ; increment loop counter
 1134                                 25B9 C0 10    CPY  #$10                  ; check counter
 1135                                 25BB 90 F2    BCC  _h_station_loop       ; branch if not done yet
 1136                                 25BD A0 00    LDY  #$00                  ; leave function with y = 0
 1137                                 25BF 60       RTS                        
 1138                                 25C0 B9 B8 00 LDA  $00B8,Y               
 1139                                 25C3 10 04    BPL  _h_cleanup_and_start  
 1140                                 25C5 98       TYA                        
 1141                                 25C6 09 08    ORA  #$08                  
 1142                                 25C8 AA       TAX                        
 1143                              _h_cleanup_and_start
 1144                                 25C9 A0 00    LDY  #$00                  ; done with checks - set y loop counter to 0 and rely on indirect
 1145                              _h_calc_offset
 1146                                 25CB BD 78 7F LDA  $7F78,X               ; table offset to $7f80-$7f87 points to 00, 10, 20...
 1147                                 25CE 0A       ASL  A                     ; offset now 00, 20, 40...
 1148                                 25CF AA       TAX                        ; use as offset to handle store
 1149                                 25D0 18       CLC                        
 1150                                 25D1 69 10    ADC  #$10                  
 1151                                 25D3 8D F9 25 STA  $25F9                 ; add 0x10 to loop and store for finish check later - self modifying code!
 1152                                 25D6 B1 00    LDA  ($00),Y               ; check first char after /h again
 1153                                 25D8 C9 20    CMP  #$20                  ; ??? not sure
 1154                                 25DA D0 05    BNE  _h_store              ; branch if not equal (it is a sane character)
 1155                                 25DC C8       INY                        
 1156                                 25DD D0 F7    BNE  $25D6                 
 1157                              _h_loadnext_loop
 1158                                 25DF B1 00    LDA  ($00),Y               ; load next handle byte
 1159                              _h_store
 1160                                 25E1 9D 07 02 STA  $0207,X               ; and store
 1161                                 25E4 C8       INY                        ; increment read from counter
 1162                                 25E5 C9 5E    CMP  #$5E                  ; ignore illegal character "^"
 1163                                 25E7 F0 F6    BEQ  _h_loadnext_loop      ; branch if true
 1164                                 25E9 C9 29    CMP  #$29                  ; ignore ")"
 1165                                 25EB F0 F2    BEQ  _h_loadnext_loop      ; branch if true
 1166                                 25ED C9 3A    CMP  #$3A                  ; ignore ":"
 1167                                 25EF F0 EE    BEQ  _h_loadnext_loop      ; branch if true
 1168                                 25F1 C9 0D    CMP  #$0D                  ; check for ^M or lower ????
 1169                                 25F3 90 EA    BCC  _h_loadnext_loop      ; ????  (figure out how this works)
 1170                                 25F5 F0 05    BEQ  _h_finish             ; branch if ^M (done)
 1171                                 25F7 E8       INX                        ; increment write to counter
 1172                                 25F8 E0 10    CPX  #$10                  ; loop counter compare if done -- (smc from 25d3)
 1173                                 25FA 90 E3    BCC  _h_loadnext_loop      ; branch if not done
 1174                              _h_finish
 1175                                 25FC A9 29    LDA  #$29                  
 1176                                 25FE 9D 07 02 STA  $0207,X               ; store end of handle $29
 1177                                 2601 A9 20    LDA  #$20                  
 1178                                 2603 9D 08 02 STA  $0208,X               ; store end of handle $20
 1179                                 2606 A9 00    LDA  #$00                  
 1180                                 2608 9D 09 02 STA  $0209,X               ; store end of handle $00
 1181                                 260B A8       TAY                        ; leave routine with a = y = 0
 1182                                 260C 60       RTS                        
 1183                                 260D 86 01    STX  $01                   
 1184                                 260F A9 00    LDA  #$00                  
 1185                                 2611 85 00    STA  $00                   
 1186                                 2613 A0 02    LDY  #$02                  
 1187                                 2615 B1 00    LDA  ($00),Y               
 1188                                 2617 49 30    EOR  #$30                  
 1189                                 2619 C9 02    CMP  #$02                  
 1190                                 261B 90 18    BCC  $2635                 
 1191                                 261D C9 0A    CMP  #$0A                  
 1192                                 261F B0 14    BCS  $2635                 
 1193                                 2621 AA       TAX                        
 1194                                 2622 C8       INY                        
 1195                                 2623 B1 00    LDA  ($00),Y               
 1196                                 2625 49 30    EOR  #$30                  
 1197                                 2627 C9 0A    CMP  #$0A                  
 1198                                 2629 B0 0A    BCS  $2635                 
 1199                                 262B 7D C6 57 ADC  $57C6,X               
 1200                                 262E A6 01    LDX  $01                   
 1201                                 2630 95 B0    STA  $B0,X                 
 1202                                 2632 A0 00    LDY  #$00                  
 1203                                 2634 2C A0 0C BIT  $0CA0                 
 1204                                 2637 18       CLC                        
 1205                                 2638 60       RTS                        
 1206                                 2639 4C 7F 26 JMP  $267F                 
 1207 t01 t00 t80 t02 t11 t81         263C A9 FE    LDA  #$FE                  
 1208 t01 t00 t80 t02 t11 t81         263E 85 30    STA  $30                   
 1209 t01 t00 t80 t02 t11 t81         2640 AE DC 7E LDX  $7EDC                 
 1210 t01 t00 t80 t02 t11 t81         2643 F0 35    BEQ  $267A                 
 1211                                 2645 CE 7B 26 DEC  $267B                 
 1212                                 2648 D0 30    BNE  $267A                 
 1213                                 264A EE 7B 26 INC  $267B                 
 1214                                 264D AD 7D 26 LDA  $267D                 
 1215                                 2650 49 82    EOR  #$82                  
 1216                                 2652 8D 7D 26 STA  $267D                 
 1217                                 2655 9D E8 7F STA  $7FE8,X               
 1218                                 2658 30 1D    BMI  $2677                 
 1219                                 265A CE 7E 26 DEC  $267E                 
 1220                                 265D D0 1B    BNE  $267A                 
 1221                                 265F AC 7C 26 LDY  $267C                 
 1222                                 2662 C0 0C    CPY  #$0C                  
 1223                                 2664 B0 1B    BCS  $2681                 
 1224                                 2666 38       SEC                        
 1225                                 2667 B9 DC 7E LDA  $7EDC,Y               
 1226                                 266A F0 15    BEQ  $2681                 
 1227                                 266C 8D 7E 26 STA  $267E                 
 1228                                 266F A9 17    LDA  #$17                  
 1229                                 2671 8D 7B 26 STA  $267B                 
 1230                                 2674 EE 7C 26 INC  $267C                 
 1231                                 2677 EE 7B 26 INC  $267B                 
 1232 t01 t00 t80 t02 t11 t81         267A 60       RTS                        
 1233                                 267B 3C       ???                        
 1234                                 267C 01 80    ORA  ($80,X)               
 1235                                 267E 00       BRK                        
 1236                                 267F B0 1C    BCS  $269D                 
 1237                                 2681 A9 41    LDA  #$41                  
 1238                                 2683 2A       ROL  A                     
 1239                                 2684 9D 88 7F STA  $7F88,X               
 1240                                 2687 B5 90    LDA  $90,X                 
 1241                                 2689 49 20    EOR  #$20                  
 1242                                 268B D0 02    BNE  $268F                 
 1243                                 268D 95 90    STA  $90,X                 
 1244                                 268F 2D DA 7E AND  $7EDA                 
 1245                                 2692 D0 30    BNE  $26C4                 
 1246                                 2694 8D DC 7E STA  $7EDC                 
 1247                                 2697 A9 21    LDA  #$21                  
 1248                                 2699 9D B0 7F STA  $7FB0,X               
 1249                                 269C 60       RTS                        
 1250                                 269D B5 90    LDA  $90,X                 
 1251                                 269F 49 20    EOR  #$20                  
 1252                                 26A1 F0 DE    BEQ  $2681                 
 1253                                 26A3 AD DD 7E LDA  $7EDD                 
 1254                                 26A6 F0 D9    BEQ  $2681                 
 1255                                 26A8 EC 9E 7F CPX  $7F9E                 
 1256                                 26AB B0 17    BCS  $26C4                 
 1257                                 26AD 8D 7E 26 STA  $267E                 
 1258                                 26B0 8E DC 7E STX  $7EDC                 
 1259                                 26B3 A9 3C    LDA  #$3C                  
 1260                                 26B5 8D 7B 26 STA  $267B                 
 1261                                 26B8 A9 02    LDA  #$02                  
 1262                                 26BA 8D 7C 26 STA  $267C                 
 1263                                 26BD 8D 7D 26 STA  $267D                 
 1264                                 26C0 9D E8 7F STA  $7FE8,X               
 1265                                 26C3 60       RTS                        
 1266                                 26C4 A0 16    LDY  #$16                  
 1267                                 26C6 68       PLA                        
 1268                                 26C7 68       PLA                        
 1269                                 26C8 60       RTS                        
 1270                                 26C9 A2 00    LDX  #$00                  
 1271                                 26CB 09 80    ORA  #$80                  
 1272                                 26CD A8       TAY                        
 1273                                 26CE 8A       TXA                        
 1274                                 26CF 29 07    AND  #$07                  
 1275                                 26D1 F0 15    BEQ  $26E8                 
 1276                                 26D3 0A       ASL  A                     
 1277                                 26D4 AA       TAX                        
 1278                                 26D5 BD 4F 58 LDA  $584F,X               
 1279                                 26D8 49 00    EOR  #$00                  
 1280                                 26DA 1D 4E 58 ORA  $584E,X               
 1281                                 26DD D0 06    BNE  $26E5                 
 1282                                 26DF 8C F8 7F STY  _mdm_inbuf_tbl        
 1283                                 26E2 A0 00    LDY  #$00                  
 1284                                 26E4 60       RTS                        
 1285                                 26E5 A0 04    LDY  #$04                  
 1286                                 26E7 60       RTS                        
 1287                                 26E8 A9 F4    LDA  #$F4                  
 1288                                 26EA 4D D9 26 EOR  $26D9                 
 1289                                 26ED 8D D9 26 STA  $26D9                 
 1290                                 26F0 4C 6D 27 JMP  $276D                 
 1291                                 26F3 C9 0D    CMP  #$0D                  
 1292                                 26F5 F0 20    BEQ  $2717                 
 1293                                 26F7 29 5F    AND  #$5F                  
 1294                                 26F9 C9 53    CMP  #$53                  
 1295                                 26FB F0 03    BEQ  $2700                 
 1296                                 26FD A0 04    LDY  #$04                  
 1297                                 26FF 60       RTS                        
 1298                                 2700 BD B8 7F LDA  $7FB8,X               
 1299                                 2703 49 A8    EOR  #$A8                  
 1300                                 2705 D0 03    BNE  $270A                 
 1301                                 2707 A0 08    LDY  #$08                  
 1302                                 2709 60       RTS                        
 1303                                 270A 8A       TXA                        
 1304                                 270B 09 28    ORA  #$28                  
 1305                                 270D 5D B8 7F EOR  $7FB8,X               
 1306                                 2710 9D B8 7F STA  $7FB8,X               
 1307                                 2713 49 88    EOR  #$88                  
 1308                                 2715 B0 04    BCS  $271B                 
 1309                                 2717 55 38    EOR  $38,X                 
 1310                                 2719 95 38    STA  $38,X                 
 1311                                 271B 4C 6D 27 JMP  $276D                 
 1312                                 271E 29 DF    AND  #$DF                  
 1313                                 2720 C9 52    CMP  #$52                  
 1314                                 2722 F0 16    BEQ  $273A                 
 1315                                 2724 C9 48    CMP  #$48                  
 1316                                 2726 F0 2F    BEQ  $2757                 
 1317                                 2728 A0 02    LDY  #$02                  
 1318                                 272A C9 4C    CMP  #$4C                  
 1319                                 272C F0 16    BEQ  $2744                 
 1320                                 272E 88       DEY                        
 1321                                 272F C9 4D    CMP  #$4D                  
 1322                                 2731 F0 11    BEQ  $2744                 
 1323                                 2733 88       DEY                        
 1324                                 2734 C9 53    CMP  #$53                  
 1325                                 2736 F0 0C    BEQ  $2744                 
 1326                                 2738 98       TYA                        
 1327                                 2739 60       RTS                        
 1328                                 273A BD 50 7F LDA  $7F50,X               
 1329                                 273D 49 5E    EOR  #$5E                  
 1330                                 273F 9D 50 7F STA  $7F50,X               
 1331                                 2742 B0 29    BCS  $276D                 
 1332                                 2744 98       TYA                        
 1333                                 2745 BC 30 7F LDY  $7F30,X               
 1334                                 2748 C0 03    CPY  #$03                  
 1335                                 274A F0 02    BEQ  $274E                 
 1336                                 274C A9 03    LDA  #$03                  
 1337                                 274E 9D 30 7F STA  $7F30,X               
 1338                                 2751 C9 03    CMP  #$03                  
 1339                                 2753 F0 1A    BEQ  $276F                 
 1340                                 2755 D0 1B    BNE  $2772                 
 1341                                 2757 BD 70 7F LDA  $7F70,X               
 1342                                 275A 10 05    BPL  $2761                 
 1343                                 275C 49 40    EOR  #$40                  
 1344                                 275E 9D 70 7F STA  $7F70,X               
 1345                                 2761 29 40    AND  #$40                  
 1346                                 2763 B0 08    BCS  $276D                 
 1347                                 2765 B5 E0    LDA  $E0,X                 
 1348                                 2767 49 FF    EOR  #$FF                  
 1349                                 2769 95 E0    STA  $E0,X                 
 1350                                 276B 49 FF    EOR  #$FF                  
 1351                                 276D F0 03    BEQ  $2772                 
 1352                                 276F A0 14    LDY  #$14                  
 1353                                 2771 60       RTS                        
 1354                                 2772 A0 12    LDY  #$12                  
 1355                                 2774 60       RTS                        
 1356                                 2775 BD 35 FF LDA  $FF35,X               
 1357                                 2778 D0 03    BNE  $277D                 
 1358                                 277A A0 01    LDY  #$01                  
 1359                                 277C 60       RTS                        
 1360                                 277D BD E8 7E LDA  $7EE8,X               
 1361                                 2780 8D CC 27 STA  $27CC                 
 1362                                 2783 8E F0 27 STX  $27F0                 
 1363                                 2786 8E DB 27 STX  $27DB                 
 1364                                 2789 8A       TXA                        
 1365                                 278A 49 A8    EOR  #$A8                  
 1366                                 278C 8D B3 27 STA  $27B3                 
 1367                                 278F 49 90    EOR  #$90                  
 1368                                 2791 8D C7 27 STA  $27C7                 
 1369                                 2794 B5 A8    LDA  $A8,X                 
 1370                                 2796 AA       TAX                        
 1371                                 2797 8E D6 27 STX  $27D6                 
 1372                                 279A 8C B8 27 STY  $27B8                 
 1373                                 279D A2 06    LDX  #$06                  
 1374                                 279F C0 02    CPY  #$02                  
 1375                                 27A1 D0 0A    BNE  $27AD                 
 1376                                 27A3 AA       TAX                        
 1377                                 27A4 F0 0C    BEQ  $27B2                 
 1378                                 27A6 A9 A8    LDA  #$A8                  
 1379                                 27A8 8D B3 27 STA  $27B3                 
 1380                                 27AB D0 07    BNE  $27B4                 
 1381                                 27AD BC A0 7F LDY  $7FA0,X               
 1382                                 27B0 F0 43    BEQ  $27F5                 
 1383                                 27B2 A9 A0    LDA  #$A0                  
 1384                                 27B4 20 D2 3A JSR  $3AD2                 
 1385                                 27B7 A0 03    LDY  #$03                  
 1386                                 27B9 A9 7D    LDA  #$7D                  
 1387                                 27BB 20 D2 3A JSR  $3AD2                 
 1388                                 27BE 88       DEY                        
 1389                                 27BF D0 F8    BNE  $27B9                 
 1390                                 27C1 A9 8D    LDA  #$8D                  
 1391                                 27C3 20 D2 3A JSR  $3AD2                 
 1392                                 27C6 A9 30    LDA  #$30                  
 1393                                 27C8 A0 FF    LDY  #$FF                  
 1394                                 27CA C8       INY                        
 1395                                 27CB C9 07    CMP  #$07                  
 1396                                 27CD F0 1F    BEQ  $27EE                 
 1397                                 27CF 81 C0    STA  ($C0,X)               
 1398                                 27D1 C9 5E    CMP  #$5E                  
 1399                                 27D3 D0 12    BNE  $27E7                 
 1400                                 27D5 E0 00    CPX  #$00                  
 1401                                 27D7 F0 0E    BEQ  $27E7                 
 1402                                 27D9 B9 00 08 LDA  inbuf_line0,Y         
 1403                                 27DC C9 23    CMP  #$23                  
 1404                                 27DE D0 07    BNE  $27E7                 
 1405                                 27E0 20 D4 3A JSR  $3AD4                 
 1406                                 27E3 A9 2F    LDA  #$2F                  
 1407                                 27E5 D0 E3    BNE  $27CA                 
 1408                                 27E7 F6 C0    INC  $C0,X                 
 1409                                 27E9 D0 03    BNE  $27EE                 
 1410                                 27EB 20 D8 3A JSR  $3AD8                 
 1411                                 27EE B9 00 08 LDA  inbuf_line0,Y         
 1412                                 27F1 D0 D7    BNE  $27CA                 
 1413                                 27F3 81 C0    STA  ($C0,X)               
 1414                                 27F5 CA       DEX                        
 1415                                 27F6 CA       DEX                        
 1416                                 27F7 10 B4    BPL  $27AD                 
 1417                                 27F9 A0 01    LDY  #$01                  
 1418                                 27FB 60       RTS                        
 1419                              *
 1420                              * /i --> For a list of commands, go stand on a canyon and yell!
 1421                              * uses 6011 + 2a + request offset into table
 1422                              *           7079 79e5 714d 72c3 73f4 752e 76a3 7782 7867 7929
 1423                              instructions_command
 1424                                 27FC 8E 01 28 STX  $2801                 ; self modify next instruction to load proper buffer
 1425                                 27FF AD 02 08 LDA  $0802                 ; load 3rd character in buffer  /iX   --- hi byte self-modified from above
 1426                                 2802 49 30    EOR  #$30                  ; eor with 0x30 - drop ascii '0'-'9' bits to make 0-9
 1427                                 2804 C9 0A    CMP  #$0A                  ; greater than 0x0a (any invalid)?
 1428                                 2806 90 02    BCC  _i_valid              ; branch if not
 1429                                 2808 A9 00    LDA  #$00                  ; invalid - index to 0 ("For a list of commands..") in response table
 1430                              _i_valid
 1431                                 280A 0A       ASL  A                     ; multiply by 2 for table offset (hi/lo)
 1432                                 280B 69 2A    ADC  #$2A                  ; (implied carry clear) and add 0x2a for table offset
 1433                                 280D A8       TAY                        ; table offset in y
 1434                                 280E 60       RTS                        ; done!
 1435                                 280F A9 0A    LDA  #$0A                  
 1436                                 2811 55 60    EOR  $60,X                 
 1437                                 2813 95 60    STA  $60,X                 
 1438                                 2815 4C 6D 27 JMP  $276D                 
 1439                                 2818 B5 40    LDA  $40,X                 
 1440                                 281A 49 80    EOR  #$80                  
 1441                                 281C 95 40    STA  $40,X                 
 1442                                 281E 4C 6D 27 JMP  $276D                 
 1443                              *
 1444                              * /t --> Bitch you on a channel!
 1445                              * a=channel, y=1 (bad channel)
 1446                              tune_command
 1447                                 2821 85 00    STA  $00                   ; save channel in zp $00
 1448                                 2823 A9 00    LDA  #$00                  ; a=0
 1449                                 2825 8D 9D 28 STA  $289D                 ; put in $289d ????? why (it's 0 anyway)
 1450                                 2828 B9 20 00 LDA  $0020,Y               
 1451                                 282B 4A       LSR  A                     
 1452                                 282C D0 11    BNE  $283F                 
 1453                                 282E 8A       TXA                        
 1454                                 282F 49 30    EOR  #$30                  
 1455                                 2831 F0 0C    BEQ  $283F                 
 1456                                 2833 C9 08    CMP  #$08                  
 1457                                 2835 B0 08    BCS  $283F                 
 1458                                 2837 AA       TAX                        
 1459                                 2838 B5 B8    LDA  $B8,X                 
 1460                                 283A 10 03    BPL  $283F                 
 1461                                 283C 20 60 20 JSR  $2060                 
 1462                                 283F A5 00    LDA  $00                   
 1463                                 2841 09 80    ORA  #$80                  
 1464                                 2843 49 B0    EOR  #$B0                  
 1465                                 2845 F0 5D    BEQ  $28A4                 
 1466                                 2847 C9 05    CMP  #$05                  
 1467                                 2849 B0 59    BCS  $28A4                 
 1468                                 284B E9 00    SBC  #$00                  
 1469                                 284D 0A       ASL  A                     
 1470                                 284E AA       TAX                        
 1471                                 284F BD A1 7F LDA  $7FA1,X               
 1472                                 2852 F0 53    BEQ  $28A7                 
 1473                                 2854 DD A0 7F CMP  $7FA0,X               
 1474                                 2857 90 55    BCC  $28AE                 
 1475                                 2859 F0 53    BEQ  $28AE                 
 1476                                 285B C9 09    CMP  #$09                  
 1477                                 285D 90 07    BCC  $2866                 
 1478                                 285F 48       PHA                        
 1479                                 2860 A9 8E    LDA  #$8E                  
 1480                                 2862 8D 9D 28 STA  $289D                 
 1481                                 2865 68       PLA                        
 1482                                 2866 C9 03    CMP  #$03                  
 1483                                 2868 8A       TXA                        
 1484                                 2869 D0 01    BNE  $286C                 
 1485                                 286B 38       SEC                        
 1486                                 286C 59 B0 00 EOR  $00B0,Y               
 1487                                 286F F0 2E    BEQ  $289F                 
 1488                                 2871 FE A0 7F INC  $7FA0,X               
 1489                                 2874 B6 B0    LDX  $B0,Y                 
 1490                                 2876 DE A0 7F DEC  $7FA0,X               
 1491                                 2879 59 B0 00 EOR  $00B0,Y               
 1492                                 287C 99 B0 00 STA  $00B0,Y               
 1493                                 287F A9 00    LDA  #$00                  
 1494                                 2881 99 78 00 STA  $0078,Y               
 1495                                 2884 B9 80 7F LDA  $7F80,Y               
 1496                                 2887 08       PHP                        
 1497                                 2888 0A       ASL  A                     
 1498                                 2889 28       PLP                        
 1499                                 288A AA       TAX                        
 1500                                 288B B9 80 04 LDA  cons_line2/line0channel,Y 
 1501                                 288E 29 80    AND  #$80                  
 1502                                 2890 05 00    ORA  $00                   
 1503                                 2892 99 80 04 STA  cons_line2/line0channel,Y 
 1504                                 2895 29 7F    AND  #$7F                  
 1505                                 2897 9D 05 02 STA  $0205,X               
 1506                                 289A 90 05    BCC  $28A1                 
 1507                                 289C A0 8E    LDY  #$8E                  
 1508                                 289E 60       RTS                        
 1509                                 289F B0 FB    BCS  $289C                 
 1510                                 28A1 A0 90    LDY  #$90                  
 1511                                 28A3 60       RTS                        
 1512                                 28A4 A0 02    LDY  #$02                  
 1513                                 28A6 60       RTS                        
 1514                                 28A7 B9 20 00 LDA  $0020,Y               
 1515                                 28AA C9 02    CMP  #$02                  
 1516                                 28AC 90 AD    BCC  $285B                 
 1517                                 28AE A0 1A    LDY  #$1A                  
 1518                                 28B0 60       RTS                        
 1519 t01 t00 t80 t02 t11 t81         28B1 20 D3 7F JSR  $7FD3                 
 1520 t01 t00 t80 t02 t11 t81         28B4 A5 F2    LDA  $F2                   
 1521 t01 t00 t80 t02 t11 t81         28B6 F0 03    BEQ  $28BB                 
 1522 t01 t00 t80 t02 t11 t81         28B8 4C 1D 2A JMP  $2A1D                 
 1523 t01 t00 t80 t02 t11 t81         28BB E6 F2    INC  $F2                   
 1524 t01 t00 t80 t02 t11 t81         28BD A5 A0    LDA  $A0                   
 1525 t01 t00 t80 t02 t11 t81         28BF F0 4A    BEQ  $290B                 
 1526                                 28C1 10 22    BPL  $28E5                 
 1527                                 28C3 A4 88    LDY  $88                   
 1528                                 28C5 C4 80    CPY  $80                   
 1529                                 28C7 B0 2E    BCS  $28F7                 
 1530                                 28C9 B9 00 08 LDA  inbuf_line0,Y         
 1531                                 28CC 24 48    BIT  $48                   
 1532                                 28CE 30 0F    BMI  $28DF                 
 1533                                 28D0 50 05    BVC  $28D7                 
 1534                                 28D2 A2 00    LDX  #$00                  
 1535                                 28D4 20 41 22 JSR  $2241                 
 1536                                 28D7 20 02 60 JSR  $6002                 
 1537                                 28DA E6 88    INC  $88                   
 1538                                 28DC 4C 1D 2A JMP  $2A1D                 
 1539                                 28DF 24 A0    BIT  $A0                   
 1540                                 28E1 30 F7    BMI  $28DA                 
 1541                                 28E3 10 F2    BPL  $28D7                 
 1542                                 28E5 0A       ASL  A                     
 1543                                 28E6 10 DB    BPL  $28C3                 
 1544                                 28E8 AD 90 7F LDA  $7F90                 
 1545                                 28EB 85 80    STA  $80                   
 1546                                 28ED A9 FF    LDA  #$FF                  
 1547                                 28EF 85 88    STA  $88                   
 1548                                 28F1 46 A0    LSR  $A0                   
 1549                                 28F3 A9 0D    LDA  #$0D                  
 1550                                 28F5 D0 E0    BNE  $28D7                 
 1551                                 28F7 A4 80    LDY  $80                   
 1552                                 28F9 84 88    STY  $88                   
 1553                                 28FB 66 A0    ROR  $A0                   
 1554                                 28FD A5 D8    LDA  $D8                   
 1555                                 28FF F0 07    BEQ  $2908                 
 1556                                 2901 C6 D8    DEC  $D8                   
 1557                                 2903 A9 08    LDA  #$08                  
 1558                                 2905 20 02 60 JSR  $6002                 
 1559 t01 t00 t80     t11 t81         2908 4C 1D 2A JMP  $2A1D                 
 1560                              *
 1561                              * this is where y is loaded for offset to 29a7 (char load)
 1562                              *       8008 for console
 1563 t01 t00 t80 t02 t11 t81         290B AC 05 20 LDY  $2005                 
 1564 t01 t00 t80 t02 t11 t81         290E D0 0D    BNE  $291D                 
 1565 t01 t00 t80     t11 t81         2910 A5 80    LDA  $80                   
 1566 t01 t00 t80     t11 t81         2912 F0 F4    BEQ  $2908                 
 1567                                 2914 A9 FF    LDA  #$FF                  
 1568                                 2916 85 A0    STA  $A0                   
 1569                                 2918 D0 A7    BNE  $28C1                 
 1570                                 291A 4C 98 29 JMP  $2998                 
 1571 t00 t80 t02                     291D 30 03    BMI  $2922                 
 1572     t00 t80 t02                 291F 4C 9A 29 JMP  $299A                 
 1573     t00 t80                     2922 C0 8D    CPY  #$8D                  
 1574     t00 t80                     2924 F0 F4    BEQ  $291A                 
 1575     t00 t80                     2926 A5 10    LDA  $10                   
 1576     t00 t80                     2928 D0 3E    BNE  $2968                 
 1577     t00 t80                     292A 06 58    ASL  $58                   
 1578     t00 t80                     292C AD 38 7F LDA  $7F38                 
 1579     t00 t80                     292F 8D 70 7F STA  $7F70                 
 1580     t00 t80                     2932 C0 88    CPY  #$88                  
 1581     t00 t80                     2934 F0 0A    BEQ  $2940                 
 1582     t00 t80                     2936 B0 11    BCS  $2949                 
 1583                                 2938 C0 80    CPY  #$80                  
 1584                                 293A F0 04    BEQ  $2940                 
 1585                                 293C A0 80    LDY  #$80                  
 1586                                 293E 84 58    STY  $58                   
 1587                                 2940 A5 80    LDA  $80                   
 1588                                 2942 F0 21    BEQ  $2965                 
 1589                                 2944 84 A0    STY  $A0                   
 1590                                 2946 4C 1D 2A JMP  $2A1D                 
 1591     t00 t80                     2949 C0 89    CPY  #$89                  
 1592     t00 t80                     294B D0 25    BNE  $2972                 
 1593     t00 t80                     294D A0 00    LDY  #$00                  
 1594     t00 t80                     294F 84 88    STY  $88                   
 1595     t00 t80                     2951 84 D8    STY  $D8                   
 1596     t00 t80                     2953 AD 88 7F LDA  $7F88                 
 1597     t00 t80                     2956 F0 05    BEQ  $295D                 
 1598                                 2958 A9 8D    LDA  #$8D                  
 1599                                 295A 8D F8 7F STA  _mdm_inbuf_tbl        
 1600     t00 t80                     295D 84 80    STY  $80                   
 1601     t00 t80                     295F A9 EC    LDA  #$EC                  
 1602     t00 t80                     2961 85 38    STA  $38                   
 1603     t00 t80                     2963 85 D0    STA  $D0                   
 1604     t00 t80                     2965 4C 02 2A JMP  $2A02                 
 1605                                 2968 C6 10    DEC  $10                   
 1606                                 296A AC 0D 29 LDY  $290D                 
 1607                                 296D C8       INY                        
 1608                                 296E A9 00    LDA  #$00                  
 1609                                 2970 F0 16    BEQ  $2988                 
 1610     t00 t80                     2972 C0 A0    CPY  #$A0                  
 1611     t00 t80                     2974 F0 C6    BEQ  $293C                 
 1612     t00 t80                     2976 C0 A9    CPY  #$A9                  
 1613     t00 t80                     2978 90 C6    BCC  $2940                 
 1614     t00 t80                     297A 84 D0    STY  $D0                   
 1615     t00 t80                     297C A5 70    LDA  $70                   
 1616     t00 t80                     297E A4 78    LDY  $78                   
 1617     t00 t80                     2980 D0 06    BNE  $2988                 
 1618                                 2982 A6 B0    LDX  $B0                   
 1619                                 2984 B5 C0    LDA  $C0,X                 
 1620                                 2986 B4 C1    LDY  $C1,X                 
 1621     t00 t80                     2988 8D 0C 29 STA  $290C                 
 1622     t00 t80                     298B 8C 0D 29 STY  $290D                 
 1623     t00 t80                     298E 4C 0B 29 JMP  $290B                 
 1624                                 2991 A9 00    LDA  #$00                  
 1625                                 2993 85 90    STA  $90                   
 1626                                 2995 4C 1D 2A JMP  $2A1D                 
 1627                                 2998 A4 40    LDY  $40                   
 1628     t00 t80 t02                 299A 24 58    BIT  $58                   
 1629     t00 t80 t02                 299C 30 64    BMI  $2A02                 
 1630     t00 t80 t02                 299E A9 20    LDA  #$20                  
 1631     t00 t80 t02                 29A0 C9 20    CMP  #$20                  
 1632     t00 t80 t02                 29A2 8D A1 29 STA  $29A1                 
 1633     t00 t80 t02                 29A5 D0 4B    BNE  $29F2                 
 1634                              *
 1635                              * --- next char gets loaded here
 1636     t00 t80 t02                 29A7 B9 00 F3 LDA  char_translate_tbl,Y  
 1637     t00 t80 t02                 29AA 30 56    BMI  $2A02                 
 1638     t00 t80 t02                 29AC C9 7D    CMP  #$7D                  
 1639     t00 t80 t02                 29AE 90 0B    BCC  $29BB                 
 1640                                 29B0 D0 50    BNE  $2A02                 
 1641                                 29B2 CE 70 7F DEC  $7F70                 
 1642                                 29B5 10 4B    BPL  $2A02                 
 1643                                 29B7 66 58    ROR  $58                   
 1644                                 29B9 D0 47    BNE  $2A02                 
 1645     t00 t80 t02                 29BB CD 58 7F CMP  $7F58                 
 1646     t00 t80 t02                 29BE F0 10    BEQ  $29D0                 
 1647     t00 t80 t02                 29C0 C9 20    CMP  #$20                  
 1648     t00 t80 t02                 29C2 F0 1A    BEQ  $29DE                 
 1649     t00 t80 t02                 29C4 B0 34    BCS  $29FA                 
 1650     t00 t80                     29C6 C9 0D    CMP  #$0D                  
 1651     t00 t80                     29C8 F0 0B    BEQ  $29D5                 
 1652     t00 t80                     29CA 24 E8    BIT  $E8                   
 1653     t00 t80                     29CC 10 30    BPL  $29FE                 
 1654     t00 t80                     29CE 30 32    BMI  $2A02                 
 1655                                 29D0 EE A1 29 INC  $29A1                 
 1656                                 29D3 A9 0D    LDA  #$0D                  
 1657     t00 t80                     29D5 A4 B8    LDY  $B8                   
 1658     t00 t80                     29D7 84 A8    STY  $A8                   
 1659     t00 t80                     29D9 85 60    STA  $60                   
 1660     t00 t80                     29DB 4C FE 29 JMP  $29FE                 
 1661     t00 t80                     29DE A5 A8    LDA  $A8                   
 1662     t00 t80                     29E0 E9 0A    SBC  #$0A                  
 1663     t00 t80                     29E2 B0 14    BCS  $29F8                 
 1664                                 29E4 A4 B8    LDY  $B8                   
 1665                                 29E6 D0 06    BNE  $29EE                 
 1666                                 29E8 EE A1 29 INC  $29A1                 
 1667                                 29EB A4 B8    LDY  $B8                   
 1668                                 29ED 88       DEY                        
 1669                                 29EE 84 A8    STY  $A8                   
 1670                                 29F0 A9 0D    LDA  #$0D                  
 1671                                 29F2 20 02 60 JSR  $6002                 
 1672                                 29F5 4C 1D 2A JMP  $2A1D                 
 1673     t00 t80                     29F8 A9 20    LDA  #$20                  
 1674     t00 t80 t02                 29FA C6 A8    DEC  $A8                   
 1675     t00 t80 t02                 29FC F0 EA    BEQ  $29E8                 
 1676     t00 t80 t02                 29FE 20 02 60 JSR  $6002                 
 1677     t00 t80 t02                 2A01 2C 46 F2 BIT  $F246                 
 1678                              *
 1679                              * self modifying code here - increments 290d + 1
 1680     t00 t80 t02                 2A04 EE 0C 29 INC  $290C                 
 1681     t00 t80 t02                 2A07 D0 14    BNE  $2A1D                 
 1682     t00 t80                     2A09 EE 0D 29 INC  $290D                 
 1683     t00 t80                     2A0C AD 0D 29 LDA  $290D                 
 1684     t00 t80                     2A0F 24 08    BIT  $08                   
 1685     t00 t80                     2A11 D0 0A    BNE  $2A1D                 
 1686                                 2A13 24 D0    BIT  $D0                   
 1687                                 2A15 10 06    BPL  $2A1D                 
 1688                                 2A17 38       SEC                        
 1689                                 2A18 E9 10    SBC  #$10                  
 1690                                 2A1A 8D 0D 29 STA  $290D                 
 1691 t01 t00 t80 t02 t11 t81         2A1D 20 22 F8 JSR  _and_rts              
 1692 t01 t00 t80 t02 t11 t81         2A20 AD E1 7F LDA  $7FE1                 
 1693 t01 t00 t80 t02 t11 t81         2A23 24 91    BIT  $91                   
 1694 t01 t00 t80 t02 t11 t81         2A25 30 31    BMI  $2A58                 
 1695 t01 t00     t02 t11 t81         2A27 70 26    BVS  $2A4F                 
 1696                     t81         2A29 F0 11    BEQ  $2A3C                 
 1697                     t81         2A2B A9 10    LDA  #$10                  
 1698                     t81         2A2D 85 C9    STA  $C9                   
 1699                     t81         2A2F A4 39    LDY  $39                   
 1700                     t81         2A31 F0 06    BEQ  $2A39                 
 1701                                 2A33 30 04    BMI  $2A39                 
 1702                                 2A35 C0 1F    CPY  #$1F                  
 1703                                 2A37 B0 16    BCS  $2A4F                 
 1704                     t81         2A39 4C A4 2A JMP  $2AA4                 
 1705                                 2A3C A5 91    LDA  $91                   
 1706                                 2A3E D0 0F    BNE  $2A4F                 
 1707                                 2A40 A9 A0    LDA  #$A0                  
 1708                                 2A42 8D 0D 04 STA  $040D                 
 1709                                 2A45 A9 01    LDA  #$01                  
 1710                                 2A47 A2 20    LDX  #$20                  
 1711                                 2A49 20 1D 54 JSR  $541D                 
 1712                                 2A4C 8D 16 58 STA  $5816                 
 1713 t01 t00 t80 t02 t11             2A4F 4C 3A 2C JMP  $2C3A                 
 1714                                 2A52 29 20    AND  #$20                  
 1715                                 2A54 F0 F9    BEQ  $2A4F                 
 1716                                 2A56 D0 39    BNE  $2A91                 
 1717 t80                             2A58 70 F8    BVS  $2A52                 
 1718         t80                     2A5A AD E1 7F LDA  $7FE1                 
 1719         t80                     2A5D 4A       LSR  A                     
 1720         t80                     2A5E A4 29    LDY  $29                   
 1721         t80                     2A60 D0 0A    BNE  $2A6C                 
 1722         t80                     2A62 90 EB    BCC  $2A4F                 
 1723                                 2A64 AD 61 7F LDA  $7F61                 
 1724                                 2A67 29 0F    AND  #$0F                  
 1725                                 2A69 85 31    STA  $31                   
 1726                                 2A6B 98       TYA                        
 1727                                 2A6C B0 06    BCS  $2A74                 
 1728                                 2A6E A9 01    LDA  #$01                  
 1729                                 2A70 85 29    STA  $29                   
 1730                                 2A72 D0 DB    BNE  $2A4F                 
 1731                                 2A74 30 D9    BMI  $2A4F                 
 1732                                 2A76 A9 FF    LDA  #$FF                  
 1733                                 2A78 85 29    STA  $29                   
 1734                                 2A7A 85 FF    STA  $FF                   
 1735                                 2A7C C6 31    DEC  $31                   
 1736                                 2A7E D0 CF    BNE  $2A4F                 
 1737                                 2A80 A9 02    LDA  #$02                  
 1738                                 2A82 8D E9 7F STA  $7FE9                 
 1739                                 2A85 A9 A1    LDA  #$A1                  
 1740                                 2A87 8D 0D 04 STA  $040D                 
 1741                                 2A8A A2 01    LDX  #$01                  
 1742                                 2A8C A0 20    LDY  #$20                  
 1743                                 2A8E 20 05 60 JSR  $6005                 
 1744                                 2A91 85 91    STA  $91                   
 1745                                 2A93 30 0C    BMI  $2AA1                 
 1746                                 2A95 38       SEC                        
 1747                                 2A96 A9 01    LDA  #$01                  
 1748                                 2A98 20 6C 54 JSR  $546C                 
 1749                                 2A9B 8D 0B 2B STA  $2B0B                 
 1750                                 2A9E 8C 0C 2B STY  $2B0C                 
 1751                                 2AA1 4C 3A 2C JMP  $2C3A                 
 1752                     t81         2AA4 2C F1 7F BIT  $7FF1                 
 1753                     t81         2AA7 10 5E    BPL  $2B07                 
 1754                     t81         2AA9 24 61    BIT  $61                   
 1755                     t81         2AAB 30 0D    BMI  $2ABA                 
 1756                                 2AAD A9 FF    LDA  #$FF                  
 1757                                 2AAF 85 61    STA  $61                   
 1758                                 2AB1 A5 69    LDA  $69                   
 1759                                 2AB3 F0 05    BEQ  $2ABA                 
 1760                                 2AB5 8D F1 7F STA  $7FF1                 
 1761                                 2AB8 D0 E7    BNE  $2AA1                 
 1762                     t81         2ABA A5 A1    LDA  $A1                   
 1763                     t81         2ABC F0 4C    BEQ  $2B0A                 
 1764                     t81         2ABE 10 22    BPL  $2AE2                 
 1765                     t81         2AC0 A4 89    LDY  $89                   
 1766                     t81         2AC2 C4 81    CPY  $81                   
 1767                     t81         2AC4 B0 30    BCS  $2AF6                 
 1768                     t81         2AC6 B9 00 09 LDA  inbuf_line1,Y         
 1769                     t81         2AC9 24 49    BIT  $49                   
 1770                     t81         2ACB 30 0F    BMI  $2ADC                 
 1771                     t81         2ACD 50 05    BVC  $2AD4                 
 1772                                 2ACF A2 01    LDX  #$01                  
 1773                                 2AD1 20 41 22 JSR  $2241                 
 1774                     t81         2AD4 8D F1 7F STA  $7FF1                 
 1775                     t81         2AD7 E6 89    INC  $89                   
 1776                     t81         2AD9 4C 3A 2C JMP  $2C3A                 
 1777                                 2ADC 24 A1    BIT  $A1                   
 1778                                 2ADE 30 F7    BMI  $2AD7                 
 1779                                 2AE0 10 F2    BPL  $2AD4                 
 1780                                 2AE2 0A       ASL  A                     
 1781                                 2AE3 10 DB    BPL  $2AC0                 
 1782                                 2AE5 AD 91 7F LDA  $7F91                 
 1783                                 2AE8 85 81    STA  $81                   
 1784                                 2AEA A9 FF    LDA  #$FF                  
 1785                                 2AEC 85 89    STA  $89                   
 1786                                 2AEE 46 A1    LSR  $A1                   
 1787                                 2AF0 A9 0D    LDA  #$0D                  
 1788                                 2AF2 85 61    STA  $61                   
 1789                                 2AF4 D0 DE    BNE  $2AD4                 
 1790                     t81         2AF6 A4 81    LDY  $81                   
 1791                     t81         2AF8 84 89    STY  $89                   
 1792                     t81         2AFA 66 A1    ROR  $A1                   
 1793                     t81         2AFC A5 D9    LDA  $D9                   
 1794                     t81         2AFE F0 07    BEQ  $2B07                 
 1795                                 2B00 C6 D9    DEC  $D9                   
 1796                                 2B02 A9 08    LDA  #$08                  
 1797                                 2B04 8D F1 7F STA  $7FF1                 
 1798                     t81         2B07 4C 3A 2C JMP  $2C3A                 
 1799                     t81         2B0A AC 05 20 LDY  $2005                 
 1800                     t81         2B0D D0 11    BNE  $2B20                 
 1801                     t81         2B0F A5 81    LDA  $81                   
 1802                     t81         2B11 F0 F4    BEQ  $2B07                 
 1803                     t81         2B13 A5 B9    LDA  $B9                   
 1804                     t81         2B15 30 F0    BMI  $2B07                 
 1805                     t81         2B17 A9 FF    LDA  #$FF                  
 1806                     t81         2B19 85 A1    STA  $A1                   
 1807                     t81         2B1B D0 A1    BNE  $2ABE                 
 1808                                 2B1D 4C B0 2B JMP  $2BB0                 
 1809                                 2B20 30 03    BMI  $2B25                 
 1810                                 2B22 4C B2 2B JMP  $2BB2                 
 1811                                 2B25 C0 8D    CPY  #$8D                  
 1812                                 2B27 F0 F4    BEQ  $2B1D                 
 1813                                 2B29 A5 11    LDA  $11                   
 1814                                 2B2B D0 42    BNE  $2B6F                 
 1815                                 2B2D 06 59    ASL  $59                   
 1816                                 2B2F AD 39 7F LDA  $7F39                 
 1817                                 2B32 8D 71 7F STA  $7F71                 
 1818                                 2B35 C0 88    CPY  #$88                  
 1819                                 2B37 F0 0A    BEQ  $2B43                 
 1820                                 2B39 B0 15    BCS  $2B50                 
 1821                                 2B3B C0 81    CPY  #$81                  
 1822                                 2B3D F0 04    BEQ  $2B43                 
 1823                                 2B3F A0 80    LDY  #$80                  
 1824                                 2B41 84 59    STY  $59                   
 1825                                 2B43 A5 81    LDA  $81                   
 1826                                 2B45 F0 25    BEQ  $2B6C                 
 1827                                 2B47 A5 B9    LDA  $B9                   
 1828                                 2B49 30 21    BMI  $2B6C                 
 1829                                 2B4B 84 A1    STY  $A1                   
 1830                                 2B4D 4C 3A 2C JMP  $2C3A                 
 1831                                 2B50 C0 89    CPY  #$89                  
 1832                                 2B52 D0 25    BNE  $2B79                 
 1833                                 2B54 A0 00    LDY  #$00                  
 1834                                 2B56 84 89    STY  $89                   
 1835                                 2B58 84 D9    STY  $D9                   
 1836                                 2B5A AD 89 7F LDA  $7F89                 
 1837                                 2B5D F0 05    BEQ  $2B64                 
 1838                                 2B5F A9 8D    LDA  #$8D                  
 1839                                 2B61 8D F9 7F STA  $7FF9                 
 1840                                 2B64 84 81    STY  $81                   
 1841                                 2B66 A9 EC    LDA  #$EC                  
 1842                                 2B68 85 39    STA  $39                   
 1843                                 2B6A 85 D1    STA  $D1                   
 1844                                 2B6C 4C 21 2C JMP  $2C21                 
 1845                                 2B6F C6 11    DEC  $11                   
 1846                                 2B71 AC 0C 2B LDY  $2B0C                 
 1847                                 2B74 C8       INY                        
 1848                                 2B75 A9 00    LDA  #$00                  
 1849                                 2B77 F0 27    BEQ  $2BA0                 
 1850                                 2B79 C0 A1    CPY  #$A1                  
 1851                                 2B7B F0 C2    BEQ  $2B3F                 
 1852                                 2B7D C0 A8    CPY  #$A8                  
 1853                                 2B7F 90 C2    BCC  $2B43                 
 1854                                 2B81 D0 06    BNE  $2B89                 
 1855                                 2B83 24 B9    BIT  $B9                   
 1856                                 2B85 10 BC    BPL  $2B43                 
 1857                                 2B87 30 B6    BMI  $2B3F                 
 1858                                 2B89 98       TYA                        
 1859                                 2B8A A4 99    LDY  $99                   
 1860                                 2B8C 30 04    BMI  $2B92                 
 1861                                 2B8E 49 F0    EOR  #$F0                  
 1862                                 2B90 F0 17    BEQ  $2BA9                 
 1863                                 2B92 84 D1    STY  $D1                   
 1864                                 2B94 A5 71    LDA  $71                   
 1865                                 2B96 A4 79    LDY  $79                   
 1866                                 2B98 D0 06    BNE  $2BA0                 
 1867                                 2B9A A6 B1    LDX  $B1                   
 1868                                 2B9C B5 C0    LDA  $C0,X                 
 1869                                 2B9E B4 C1    LDY  $C1,X                 
 1870                                 2BA0 8D 0B 2B STA  $2B0B                 
 1871                                 2BA3 8C 0C 2B STY  $2B0C                 
 1872                                 2BA6 4C 0A 2B JMP  $2B0A                 
 1873                                 2BA9 A9 00    LDA  #$00                  
 1874                                 2BAB 85 91    STA  $91                   
 1875                                 2BAD 4C 3A 2C JMP  $2C3A                 
 1876                                 2BB0 A4 41    LDY  $41                   
 1877                                 2BB2 24 59    BIT  $59                   
 1878                                 2BB4 30 6B    BMI  $2C21                 
 1879                                 2BB6 A9 20    LDA  #$20                  
 1880                                 2BB8 C9 20    CMP  #$20                  
 1881                                 2BBA 8D B9 2B STA  $2BB9                 
 1882                                 2BBD D0 53    BNE  $2C12                 
 1883                                 2BBF B9 00 F3 LDA  char_translate_tbl,Y  
 1884                                 2BC2 30 5D    BMI  $2C21                 
 1885                                 2BC4 24 B9    BIT  $B9                   
 1886                                 2BC6 30 56    BMI  $2C1E                 
 1887                                 2BC8 C9 7D    CMP  #$7D                  
 1888                                 2BCA 90 0B    BCC  $2BD7                 
 1889                                 2BCC D0 53    BNE  $2C21                 
 1890                                 2BCE CE 71 7F DEC  $7F71                 
 1891                                 2BD1 10 4E    BPL  $2C21                 
 1892                                 2BD3 66 59    ROR  $59                   
 1893                                 2BD5 D0 4A    BNE  $2C21                 
 1894                                 2BD7 CD 59 7F CMP  $7F59                 
 1895                                 2BDA F0 10    BEQ  $2BEC                 
 1896                                 2BDC C9 20    CMP  #$20                  
 1897                                 2BDE F0 1A    BEQ  $2BFA                 
 1898                                 2BE0 B0 38    BCS  $2C1A                 
 1899                                 2BE2 C9 0D    CMP  #$0D                  
 1900                                 2BE4 F0 0B    BEQ  $2BF1                 
 1901                                 2BE6 24 E9    BIT  $E9                   
 1902                                 2BE8 10 34    BPL  $2C1E                 
 1903                                 2BEA 30 35    BMI  $2C21                 
 1904                                 2BEC EE B9 2B INC  $2BB9                 
 1905                                 2BEF A9 0D    LDA  #$0D                  
 1906                                 2BF1 A4 B9    LDY  $B9                   
 1907                                 2BF3 84 A9    STY  $A9                   
 1908                                 2BF5 85 61    STA  $61                   
 1909                                 2BF7 4C 1E 2C JMP  $2C1E                 
 1910                                 2BFA A5 A9    LDA  $A9                   
 1911                                 2BFC E9 0A    SBC  #$0A                  
 1912                                 2BFE B0 18    BCS  $2C18                 
 1913                                 2C00 A4 B9    LDY  $B9                   
 1914                                 2C02 30 14    BMI  $2C18                 
 1915                                 2C04 D0 06    BNE  $2C0C                 
 1916                                 2C06 EE B9 2B INC  $2BB9                 
 1917                                 2C09 A4 B9    LDY  $B9                   
 1918                                 2C0B 88       DEY                        
 1919                                 2C0C 84 A9    STY  $A9                   
 1920                                 2C0E A9 0D    LDA  #$0D                  
 1921                                 2C10 85 61    STA  $61                   
 1922                                 2C12 8D F1 7F STA  $7FF1                 
 1923                                 2C15 4C 3A 2C JMP  $2C3A                 
 1924                                 2C18 A9 20    LDA  #$20                  
 1925                                 2C1A C6 A9    DEC  $A9                   
 1926                                 2C1C F0 E8    BEQ  $2C06                 
 1927                                 2C1E 8D F1 7F STA  $7FF1                 
 1928                                 2C21 EE 0B 2B INC  $2B0B                 
 1929                                 2C24 D0 14    BNE  $2C3A                 
 1930                                 2C26 EE 0C 2B INC  $2B0C                 
 1931                                 2C29 AD 0C 2B LDA  $2B0C                 
 1932                                 2C2C 24 08    BIT  $08                   
 1933                                 2C2E D0 0A    BNE  $2C3A                 
 1934                                 2C30 24 D1    BIT  $D1                   
 1935                                 2C32 10 06    BPL  $2C3A                 
 1936                                 2C34 38       SEC                        
 1937                                 2C35 E9 10    SBC  #$10                  
 1938                                 2C37 8D 0C 2B STA  $2B0C                 
 1939 t01 t00 t80 t02 t11 t81         2C3A 20 22 F8 JSR  _and_rts              
 1940 t01 t00 t80 t02 t11 t81         2C3D AD E2 7F LDA  $7FE2                 
 1941 t01 t00 t80 t02 t11 t81         2C40 24 92    BIT  $92                   
 1942 t01 t00 t80 t02 t11 t81         2C42 30 31    BMI  $2C75                 
 1943 t01 t00 t80 t02 t11 t81         2C44 70 26    BVS  $2C6C                 
 1944                 t11             2C46 F0 11    BEQ  $2C59                 
 1945                 t11             2C48 A9 10    LDA  #$10                  
 1946                 t11             2C4A 85 CA    STA  $CA                   
 1947                 t11             2C4C A4 3A    LDY  $3A                   
 1948                 t11             2C4E F0 06    BEQ  $2C56                 
 1949                                 2C50 30 04    BMI  $2C56                 
 1950                                 2C52 C0 1F    CPY  #$1F                  
 1951                                 2C54 B0 16    BCS  $2C6C                 
 1952                 t11             2C56 4C C1 2C JMP  $2CC1                 
 1953                                 2C59 A5 92    LDA  $92                   
 1954                                 2C5B D0 0F    BNE  $2C6C                 
 1955                                 2C5D A9 A0    LDA  #$A0                  
 1956                                 2C5F 8D 11 04 STA  $0411                 
 1957                                 2C62 A9 02    LDA  #$02                  
 1958                                 2C64 A2 40    LDX  #$40                  
 1959                                 2C66 20 1D 54 JSR  $541D                 
 1960                                 2C69 8D 1E 58 STA  $581E                 
 1961 t01 t00 t80 t02 t81             2C6C 4C 57 2E JMP  $2E57                 
 1962                                 2C6F 29 20    AND  #$20                  
 1963                                 2C71 F0 F9    BEQ  $2C6C                 
 1964                                 2C73 D0 39    BNE  $2CAE                 
 1965                                 2C75 70 F8    BVS  $2C6F                 
 1966                                 2C77 AD E2 7F LDA  $7FE2                 
 1967                                 2C7A 4A       LSR  A                     
 1968                                 2C7B A4 2A    LDY  $2A                   
 1969                                 2C7D D0 0A    BNE  $2C89                 
 1970                                 2C7F 90 EB    BCC  $2C6C                 
 1971                                 2C81 AD 62 7F LDA  $7F62                 
 1972                                 2C84 29 0F    AND  #$0F                  
 1973                                 2C86 85 32    STA  $32                   
 1974                                 2C88 98       TYA                        
 1975                                 2C89 B0 06    BCS  $2C91                 
 1976                                 2C8B A9 01    LDA  #$01                  
 1977                                 2C8D 85 2A    STA  $2A                   
 1978                                 2C8F D0 DB    BNE  $2C6C                 
 1979                                 2C91 30 D9    BMI  $2C6C                 
 1980                                 2C93 A9 FF    LDA  #$FF                  
 1981                                 2C95 85 2A    STA  $2A                   
 1982                                 2C97 85 FF    STA  $FF                   
 1983                                 2C99 C6 32    DEC  $32                   
 1984                                 2C9B D0 CF    BNE  $2C6C                 
 1985                                 2C9D A9 02    LDA  #$02                  
 1986                                 2C9F 8D EA 7F STA  $7FEA                 
 1987                                 2CA2 A9 A1    LDA  #$A1                  
 1988                                 2CA4 8D 11 04 STA  $0411                 
 1989                                 2CA7 A2 02    LDX  #$02                  
 1990                                 2CA9 A0 40    LDY  #$40                  
 1991                                 2CAB 20 05 60 JSR  $6005                 
 1992                                 2CAE 85 92    STA  $92                   
 1993                                 2CB0 30 0C    BMI  $2CBE                 
 1994                                 2CB2 38       SEC                        
 1995                                 2CB3 A9 02    LDA  #$02                  
 1996                                 2CB5 20 6C 54 JSR  $546C                 
 1997                                 2CB8 8D 28 2D STA  $2D28                 
 1998                                 2CBB 8C 29 2D STY  $2D29                 
 1999                 t11             2CBE 4C 57 2E JMP  $2E57                 
 2000                 t11             2CC1 2C F2 7F BIT  $7FF2                 
 2001                 t11             2CC4 10 5E    BPL  $2D24                 
 2002                 t11             2CC6 24 62    BIT  $62                   
 2003                 t11             2CC8 30 0D    BMI  $2CD7                 
 2004                 t11             2CCA A9 FF    LDA  #$FF                  
 2005                 t11             2CCC 85 62    STA  $62                   
 2006                 t11             2CCE A5 6A    LDA  $6A                   
 2007                 t11             2CD0 F0 05    BEQ  $2CD7                 
 2008                 t11             2CD2 8D F2 7F STA  $7FF2                 
 2009                 t11             2CD5 D0 E7    BNE  $2CBE                 
 2010                 t11             2CD7 A5 A2    LDA  $A2                   
 2011                 t11             2CD9 F0 4C    BEQ  $2D27                 
 2012                 t11             2CDB 10 22    BPL  $2CFF                 
 2013                 t11             2CDD A4 8A    LDY  $8A                   
 2014                 t11             2CDF C4 82    CPY  $82                   
 2015                 t11             2CE1 B0 30    BCS  $2D13                 
 2016                                 2CE3 B9 00 0A LDA  inbuf_line2,Y         
 2017                                 2CE6 24 4A    BIT  $4A                   
 2018                                 2CE8 30 0F    BMI  $2CF9                 
 2019                                 2CEA 50 05    BVC  $2CF1                 
 2020                                 2CEC A2 02    LDX  #$02                  
 2021                                 2CEE 20 41 22 JSR  $2241                 
 2022                                 2CF1 8D F2 7F STA  $7FF2                 
 2023                                 2CF4 E6 8A    INC  $8A                   
 2024                                 2CF6 4C 57 2E JMP  $2E57                 
 2025                                 2CF9 24 A2    BIT  $A2                   
 2026                                 2CFB 30 F7    BMI  $2CF4                 
 2027                                 2CFD 10 F2    BPL  $2CF1                 
 2028                                 2CFF 0A       ASL  A                     
 2029                                 2D00 10 DB    BPL  $2CDD                 
 2030                                 2D02 AD 92 7F LDA  $7F92                 
 2031                                 2D05 85 82    STA  $82                   
 2032                                 2D07 A9 FF    LDA  #$FF                  
 2033                                 2D09 85 8A    STA  $8A                   
 2034                                 2D0B 46 A2    LSR  $A2                   
 2035                                 2D0D A9 0D    LDA  #$0D                  
 2036                                 2D0F 85 62    STA  $62                   
 2037                                 2D11 D0 DE    BNE  $2CF1                 
 2038                 t11             2D13 A4 82    LDY  $82                   
 2039                 t11             2D15 84 8A    STY  $8A                   
 2040                 t11             2D17 66 A2    ROR  $A2                   
 2041                 t11             2D19 A5 DA    LDA  $DA                   
 2042                 t11             2D1B F0 07    BEQ  $2D24                 
 2043                                 2D1D C6 DA    DEC  $DA                   
 2044                                 2D1F A9 08    LDA  #$08                  
 2045                                 2D21 8D F2 7F STA  $7FF2                 
 2046                 t11             2D24 4C 57 2E JMP  $2E57                 
 2047                 t11             2D27 AC 05 20 LDY  $2005                 
 2048                 t11             2D2A D0 11    BNE  $2D3D                 
 2049                 t11             2D2C A5 82    LDA  $82                   
 2050                 t11             2D2E F0 F4    BEQ  $2D24                 
 2051                                 2D30 A5 BA    LDA  $BA                   
 2052                                 2D32 30 F0    BMI  $2D24                 
 2053                                 2D34 A9 FF    LDA  #$FF                  
 2054                                 2D36 85 A2    STA  $A2                   
 2055                                 2D38 D0 A1    BNE  $2CDB                 
 2056                                 2D3A 4C CD 2D JMP  $2DCD                 
 2057                 t11             2D3D 30 03    BMI  $2D42                 
 2058                 t11             2D3F 4C CF 2D JMP  $2DCF                 
 2059                 t11             2D42 C0 8D    CPY  #$8D                  
 2060                 t11             2D44 F0 F4    BEQ  $2D3A                 
 2061                 t11             2D46 A5 12    LDA  $12                   
 2062                 t11             2D48 D0 42    BNE  $2D8C                 
 2063                 t11             2D4A 06 5A    ASL  $5A                   
 2064                 t11             2D4C AD 3A 7F LDA  $7F3A                 
 2065                 t11             2D4F 8D 72 7F STA  $7F72                 
 2066                 t11             2D52 C0 88    CPY  #$88                  
 2067                 t11             2D54 F0 0A    BEQ  $2D60                 
 2068                 t11             2D56 B0 15    BCS  $2D6D                 
 2069                                 2D58 C0 82    CPY  #$82                  
 2070                                 2D5A F0 04    BEQ  $2D60                 
 2071                                 2D5C A0 80    LDY  #$80                  
 2072                                 2D5E 84 5A    STY  $5A                   
 2073                                 2D60 A5 82    LDA  $82                   
 2074                                 2D62 F0 25    BEQ  $2D89                 
 2075                                 2D64 A5 BA    LDA  $BA                   
 2076                                 2D66 30 21    BMI  $2D89                 
 2077                                 2D68 84 A2    STY  $A2                   
 2078                                 2D6A 4C 57 2E JMP  $2E57                 
 2079                 t11             2D6D C0 89    CPY  #$89                  
 2080                 t11             2D6F D0 25    BNE  $2D96                 
 2081                                 2D71 A0 00    LDY  #$00                  
 2082                                 2D73 84 8A    STY  $8A                   
 2083                                 2D75 84 DA    STY  $DA                   
 2084                                 2D77 AD 8A 7F LDA  $7F8A                 
 2085                                 2D7A F0 05    BEQ  $2D81                 
 2086                                 2D7C A9 8D    LDA  #$8D                  
 2087                                 2D7E 8D FA 7F STA  $7FFA                 
 2088                                 2D81 84 82    STY  $82                   
 2089                                 2D83 A9 EC    LDA  #$EC                  
 2090                                 2D85 85 3A    STA  $3A                   
 2091                                 2D87 85 D2    STA  $D2                   
 2092                                 2D89 4C 3E 2E JMP  $2E3E                 
 2093                                 2D8C C6 12    DEC  $12                   
 2094                                 2D8E AC 29 2D LDY  $2D29                 
 2095                                 2D91 C8       INY                        
 2096                                 2D92 A9 00    LDA  #$00                  
 2097                                 2D94 F0 27    BEQ  $2DBD                 
 2098                 t11             2D96 C0 A2    CPY  #$A2                  
 2099                 t11             2D98 F0 C2    BEQ  $2D5C                 
 2100                 t11             2D9A C0 A8    CPY  #$A8                  
 2101                 t11             2D9C 90 C2    BCC  $2D60                 
 2102                 t11             2D9E D0 06    BNE  $2DA6                 
 2103                                 2DA0 24 BA    BIT  $BA                   
 2104                                 2DA2 10 BC    BPL  $2D60                 
 2105                                 2DA4 30 B6    BMI  $2D5C                 
 2106                 t11             2DA6 98       TYA                        
 2107                 t11             2DA7 A4 9A    LDY  $9A                   
 2108                 t11             2DA9 30 04    BMI  $2DAF                 
 2109                                 2DAB 49 F0    EOR  #$F0                  
 2110                                 2DAD F0 17    BEQ  $2DC6                 
 2111                 t11             2DAF 84 D2    STY  $D2                   
 2112                 t11             2DB1 A5 72    LDA  $72                   
 2113                 t11             2DB3 A4 7A    LDY  $7A                   
 2114                 t11             2DB5 D0 06    BNE  $2DBD                 
 2115                                 2DB7 A6 B2    LDX  $B2                   
 2116                                 2DB9 B5 C0    LDA  $C0,X                 
 2117                                 2DBB B4 C1    LDY  $C1,X                 
 2118                 t11             2DBD 8D 28 2D STA  $2D28                 
 2119                 t11             2DC0 8C 29 2D STY  $2D29                 
 2120                 t11             2DC3 4C 27 2D JMP  $2D27                 
 2121                                 2DC6 A9 00    LDA  #$00                  
 2122                                 2DC8 85 92    STA  $92                   
 2123                                 2DCA 4C 57 2E JMP  $2E57                 
 2124                                 2DCD A4 42    LDY  $42                   
 2125                 t11             2DCF 24 5A    BIT  $5A                   
 2126                 t11             2DD1 30 6B    BMI  $2E3E                 
 2127                 t11             2DD3 A9 20    LDA  #$20                  
 2128                 t11             2DD5 C9 20    CMP  #$20                  
 2129                 t11             2DD7 8D D6 2D STA  $2DD6                 
 2130                 t11             2DDA D0 53    BNE  $2E2F                 
 2131                 t11             2DDC B9 00 F3 LDA  char_translate_tbl,Y  
 2132                 t11             2DDF 30 5D    BMI  $2E3E                 
 2133                 t11             2DE1 24 BA    BIT  $BA                   
 2134                 t11             2DE3 30 56    BMI  $2E3B                 
 2135                 t11             2DE5 C9 7D    CMP  #$7D                  
 2136                 t11             2DE7 90 0B    BCC  $2DF4                 
 2137                                 2DE9 D0 53    BNE  $2E3E                 
 2138                                 2DEB CE 72 7F DEC  $7F72                 
 2139                                 2DEE 10 4E    BPL  $2E3E                 
 2140                                 2DF0 66 5A    ROR  $5A                   
 2141                                 2DF2 D0 4A    BNE  $2E3E                 
 2142                 t11             2DF4 CD 5A 7F CMP  $7F5A                 
 2143                 t11             2DF7 F0 10    BEQ  $2E09                 
 2144                 t11             2DF9 C9 20    CMP  #$20                  
 2145                 t11             2DFB F0 1A    BEQ  $2E17                 
 2146                 t11             2DFD B0 38    BCS  $2E37                 
 2147                 t11             2DFF C9 0D    CMP  #$0D                  
 2148                 t11             2E01 F0 0B    BEQ  $2E0E                 
 2149                                 2E03 24 EA    BIT  $EA                   
 2150                                 2E05 10 34    BPL  $2E3B                 
 2151                                 2E07 30 35    BMI  $2E3E                 
 2152                                 2E09 EE D6 2D INC  $2DD6                 
 2153                                 2E0C A9 0D    LDA  #$0D                  
 2154                 t11             2E0E A4 BA    LDY  $BA                   
 2155                 t11             2E10 84 AA    STY  $AA                   
 2156                 t11             2E12 85 62    STA  $62                   
 2157                 t11             2E14 4C 3B 2E JMP  $2E3B                 
 2158                 t11             2E17 A5 AA    LDA  $AA                   
 2159                 t11             2E19 E9 0A    SBC  #$0A                  
 2160                 t11             2E1B B0 18    BCS  $2E35                 
 2161                                 2E1D A4 BA    LDY  $BA                   
 2162                                 2E1F 30 14    BMI  $2E35                 
 2163                                 2E21 D0 06    BNE  $2E29                 
 2164                                 2E23 EE D6 2D INC  $2DD6                 
 2165                                 2E26 A4 BA    LDY  $BA                   
 2166                                 2E28 88       DEY                        
 2167                                 2E29 84 AA    STY  $AA                   
 2168                                 2E2B A9 0D    LDA  #$0D                  
 2169                                 2E2D 85 62    STA  $62                   
 2170                                 2E2F 8D F2 7F STA  $7FF2                 
 2171                                 2E32 4C 57 2E JMP  $2E57                 
 2172                 t11             2E35 A9 20    LDA  #$20                  
 2173                 t11             2E37 C6 AA    DEC  $AA                   
 2174                 t11             2E39 F0 E8    BEQ  $2E23                 
 2175                 t11             2E3B 8D F2 7F STA  $7FF2                 
 2176                 t11             2E3E EE 28 2D INC  $2D28                 
 2177                 t11             2E41 D0 14    BNE  $2E57                 
 2178                                 2E43 EE 29 2D INC  $2D29                 
 2179                                 2E46 AD 29 2D LDA  $2D29                 
 2180                                 2E49 24 08    BIT  $08                   
 2181                                 2E4B D0 0A    BNE  $2E57                 
 2182                                 2E4D 24 D2    BIT  $D2                   
 2183                                 2E4F 10 06    BPL  $2E57                 
 2184                                 2E51 38       SEC                        
 2185                                 2E52 E9 10    SBC  #$10                  
 2186                                 2E54 8D 29 2D STA  $2D29                 
 2187 t01 t00 t80 t02 t11 t81         2E57 20 22 F8 JSR  _and_rts              
 2188 t01 t00 t80 t02 t11 t81         2E5A AD E3 7F LDA  $7FE3                 
 2189 t01 t00 t80 t02 t11 t81         2E5D 24 93    BIT  $93                   
 2190 t01 t00 t80 t02 t11 t81         2E5F 30 31    BMI  $2E92                 
 2191 t01 t00 t80 t02 t11 t81         2E61 70 26    BVS  $2E89                 
 2192                                 2E63 F0 11    BEQ  $2E76                 
 2193                                 2E65 A9 10    LDA  #$10                  
 2194                                 2E67 85 CB    STA  $CB                   
 2195                                 2E69 A4 3B    LDY  $3B                   
 2196                                 2E6B F0 06    BEQ  $2E73                 
 2197                                 2E6D 30 04    BMI  $2E73                 
 2198                                 2E6F C0 1F    CPY  #$1F                  
 2199                                 2E71 B0 16    BCS  $2E89                 
 2200                                 2E73 4C DE 2E JMP  $2EDE                 
 2201                                 2E76 A5 93    LDA  $93                   
 2202                                 2E78 D0 0F    BNE  $2E89                 
 2203                                 2E7A A9 A0    LDA  #$A0                  
 2204                                 2E7C 8D 15 04 STA  $0415                 
 2205                                 2E7F A9 03    LDA  #$03                  
 2206                                 2E81 A2 60    LDX  #$60                  
 2207                                 2E83 20 1D 54 JSR  $541D                 
 2208                                 2E86 8D 26 58 STA  $5826                 
 2209 t01 t00 t80 t02 t11 t81         2E89 4C 74 30 JMP  $3074                 
 2210                                 2E8C 29 20    AND  #$20                  
 2211                                 2E8E F0 F9    BEQ  $2E89                 
 2212                                 2E90 D0 39    BNE  $2ECB                 
 2213                                 2E92 70 F8    BVS  $2E8C                 
 2214                                 2E94 AD E3 7F LDA  $7FE3                 
 2215                                 2E97 4A       LSR  A                     
 2216                                 2E98 A4 2B    LDY  $2B                   
 2217                                 2E9A D0 0A    BNE  $2EA6                 
 2218                                 2E9C 90 EB    BCC  $2E89                 
 2219                                 2E9E AD 63 7F LDA  $7F63                 
 2220                                 2EA1 29 0F    AND  #$0F                  
 2221                                 2EA3 85 33    STA  $33                   
 2222                                 2EA5 98       TYA                        
 2223                                 2EA6 B0 06    BCS  $2EAE                 
 2224                                 2EA8 A9 01    LDA  #$01                  
 2225                                 2EAA 85 2B    STA  $2B                   
 2226                                 2EAC D0 DB    BNE  $2E89                 
 2227                                 2EAE 30 D9    BMI  $2E89                 
 2228                                 2EB0 A9 FF    LDA  #$FF                  
 2229                                 2EB2 85 2B    STA  $2B                   
 2230                                 2EB4 85 FF    STA  $FF                   
 2231                                 2EB6 C6 33    DEC  $33                   
 2232                                 2EB8 D0 CF    BNE  $2E89                 
 2233                                 2EBA A9 02    LDA  #$02                  
 2234                                 2EBC 8D EB 7F STA  $7FEB                 
 2235                                 2EBF A9 A1    LDA  #$A1                  
 2236                                 2EC1 8D 15 04 STA  $0415                 
 2237                                 2EC4 A2 03    LDX  #$03                  
 2238                                 2EC6 A0 60    LDY  #$60                  
 2239                                 2EC8 20 05 60 JSR  $6005                 
 2240                                 2ECB 85 93    STA  $93                   
 2241                                 2ECD 30 0C    BMI  $2EDB                 
 2242                                 2ECF 38       SEC                        
 2243                                 2ED0 A9 03    LDA  #$03                  
 2244                                 2ED2 20 6C 54 JSR  $546C                 
 2245                                 2ED5 8D 45 2F STA  $2F45                 
 2246                                 2ED8 8C 46 2F STY  $2F46                 
 2247                                 2EDB 4C 74 30 JMP  $3074                 
 2248                                 2EDE 2C F3 7F BIT  $7FF3                 
 2249                                 2EE1 10 5E    BPL  $2F41                 
 2250                                 2EE3 24 63    BIT  $63                   
 2251                                 2EE5 30 0D    BMI  $2EF4                 
 2252                                 2EE7 A9 FF    LDA  #$FF                  
 2253                                 2EE9 85 63    STA  $63                   
 2254                                 2EEB A5 6B    LDA  $6B                   
 2255                                 2EED F0 05    BEQ  $2EF4                 
 2256                                 2EEF 8D F3 7F STA  $7FF3                 
 2257                                 2EF2 D0 E7    BNE  $2EDB                 
 2258                                 2EF4 A5 A3    LDA  $A3                   
 2259                                 2EF6 F0 4C    BEQ  $2F44                 
 2260                                 2EF8 10 22    BPL  $2F1C                 
 2261                                 2EFA A4 8B    LDY  $8B                   
 2262                                 2EFC C4 83    CPY  $83                   
 2263                                 2EFE B0 30    BCS  $2F30                 
 2264                                 2F00 B9 00 0B LDA  inbuf_line3,Y         
 2265                                 2F03 24 4B    BIT  $4B                   
 2266                                 2F05 30 0F    BMI  $2F16                 
 2267                                 2F07 50 05    BVC  $2F0E                 
 2268                                 2F09 A2 03    LDX  #$03                  
 2269                                 2F0B 20 41 22 JSR  $2241                 
 2270                                 2F0E 8D F3 7F STA  $7FF3                 
 2271                                 2F11 E6 8B    INC  $8B                   
 2272                                 2F13 4C 74 30 JMP  $3074                 
 2273                                 2F16 24 A3    BIT  $A3                   
 2274                                 2F18 30 F7    BMI  $2F11                 
 2275                                 2F1A 10 F2    BPL  $2F0E                 
 2276                                 2F1C 0A       ASL  A                     
 2277                                 2F1D 10 DB    BPL  $2EFA                 
 2278                                 2F1F AD 93 7F LDA  $7F93                 
 2279                                 2F22 85 83    STA  $83                   
 2280                                 2F24 A9 FF    LDA  #$FF                  
 2281                                 2F26 85 8B    STA  $8B                   
 2282                                 2F28 46 A3    LSR  $A3                   
 2283                                 2F2A A9 0D    LDA  #$0D                  
 2284                                 2F2C 85 63    STA  $63                   
 2285                                 2F2E D0 DE    BNE  $2F0E                 
 2286                                 2F30 A4 83    LDY  $83                   
 2287                                 2F32 84 8B    STY  $8B                   
 2288                                 2F34 66 A3    ROR  $A3                   
 2289                                 2F36 A5 DB    LDA  $DB                   
 2290                                 2F38 F0 07    BEQ  $2F41                 
 2291                                 2F3A C6 DB    DEC  $DB                   
 2292                                 2F3C A9 08    LDA  #$08                  
 2293                                 2F3E 8D F3 7F STA  $7FF3                 
 2294                                 2F41 4C 74 30 JMP  $3074                 
 2295                                 2F44 AC 05 20 LDY  $2005                 
 2296                                 2F47 D0 11    BNE  $2F5A                 
 2297                                 2F49 A5 83    LDA  $83                   
 2298                                 2F4B F0 F4    BEQ  $2F41                 
 2299                                 2F4D A5 BB    LDA  $BB                   
 2300                                 2F4F 30 F0    BMI  $2F41                 
 2301                                 2F51 A9 FF    LDA  #$FF                  
 2302                                 2F53 85 A3    STA  $A3                   
 2303                                 2F55 D0 A1    BNE  $2EF8                 
 2304                                 2F57 4C EA 2F JMP  $2FEA                 
 2305                                 2F5A 30 03    BMI  $2F5F                 
 2306                                 2F5C 4C EC 2F JMP  $2FEC                 
 2307                                 2F5F C0 8D    CPY  #$8D                  
 2308                                 2F61 F0 F4    BEQ  $2F57                 
 2309                                 2F63 A5 13    LDA  $13                   
 2310                                 2F65 D0 42    BNE  $2FA9                 
 2311                                 2F67 06 5B    ASL  $5B                   
 2312                                 2F69 AD 3B 7F LDA  $7F3B                 
 2313                                 2F6C 8D 73 7F STA  $7F73                 
 2314                                 2F6F C0 88    CPY  #$88                  
 2315                                 2F71 F0 0A    BEQ  $2F7D                 
 2316                                 2F73 B0 15    BCS  $2F8A                 
 2317                                 2F75 C0 83    CPY  #$83                  
 2318                                 2F77 F0 04    BEQ  $2F7D                 
 2319                                 2F79 A0 80    LDY  #$80                  
 2320                                 2F7B 84 5B    STY  $5B                   
 2321                                 2F7D A5 83    LDA  $83                   
 2322                                 2F7F F0 25    BEQ  $2FA6                 
 2323                                 2F81 A5 BB    LDA  $BB                   
 2324                                 2F83 30 21    BMI  $2FA6                 
 2325                                 2F85 84 A3    STY  $A3                   
 2326                                 2F87 4C 74 30 JMP  $3074                 
 2327                                 2F8A C0 89    CPY  #$89                  
 2328                                 2F8C D0 25    BNE  $2FB3                 
 2329                                 2F8E A0 00    LDY  #$00                  
 2330                                 2F90 84 8B    STY  $8B                   
 2331                                 2F92 84 DB    STY  $DB                   
 2332                                 2F94 AD 8B 7F LDA  $7F8B                 
 2333                                 2F97 F0 05    BEQ  $2F9E                 
 2334                                 2F99 A9 8D    LDA  #$8D                  
 2335                                 2F9B 8D FB 7F STA  $7FFB                 
 2336                                 2F9E 84 83    STY  $83                   
 2337                                 2FA0 A9 EC    LDA  #$EC                  
 2338                                 2FA2 85 3B    STA  $3B                   
 2339                                 2FA4 85 D3    STA  $D3                   
 2340                                 2FA6 4C 5B 30 JMP  $305B                 
 2341                                 2FA9 C6 13    DEC  $13                   
 2342                                 2FAB AC 46 2F LDY  $2F46                 
 2343                                 2FAE C8       INY                        
 2344                                 2FAF A9 00    LDA  #$00                  
 2345                                 2FB1 F0 27    BEQ  $2FDA                 
 2346                                 2FB3 C0 A3    CPY  #$A3                  
 2347                                 2FB5 F0 C2    BEQ  $2F79                 
 2348                                 2FB7 C0 A8    CPY  #$A8                  
 2349                                 2FB9 90 C2    BCC  $2F7D                 
 2350                                 2FBB D0 06    BNE  $2FC3                 
 2351                                 2FBD 24 BB    BIT  $BB                   
 2352                                 2FBF 10 BC    BPL  $2F7D                 
 2353                                 2FC1 30 B6    BMI  $2F79                 
 2354                                 2FC3 98       TYA                        
 2355                                 2FC4 A4 9B    LDY  $9B                   
 2356                                 2FC6 30 04    BMI  $2FCC                 
 2357                                 2FC8 49 F0    EOR  #$F0                  
 2358                                 2FCA F0 17    BEQ  $2FE3                 
 2359                                 2FCC 84 D3    STY  $D3                   
 2360                                 2FCE A5 73    LDA  $73                   
 2361                                 2FD0 A4 7B    LDY  $7B                   
 2362                                 2FD2 D0 06    BNE  $2FDA                 
 2363                                 2FD4 A6 B3    LDX  $B3                   
 2364                                 2FD6 B5 C0    LDA  $C0,X                 
 2365                                 2FD8 B4 C1    LDY  $C1,X                 
 2366                                 2FDA 8D 45 2F STA  $2F45                 
 2367                                 2FDD 8C 46 2F STY  $2F46                 
 2368                                 2FE0 4C 44 2F JMP  $2F44                 
 2369                                 2FE3 A9 00    LDA  #$00                  
 2370                                 2FE5 85 93    STA  $93                   
 2371                                 2FE7 4C 74 30 JMP  $3074                 
 2372                                 2FEA A4 43    LDY  $43                   
 2373                                 2FEC 24 5B    BIT  $5B                   
 2374                                 2FEE 30 6B    BMI  $305B                 
 2375                                 2FF0 A9 20    LDA  #$20                  
 2376                                 2FF2 C9 20    CMP  #$20                  
 2377                                 2FF4 8D F3 2F STA  $2FF3                 
 2378                                 2FF7 D0 53    BNE  $304C                 
 2379                                 2FF9 B9 00 F3 LDA  char_translate_tbl,Y  
 2380                                 2FFC 30 5D    BMI  $305B                 
 2381                                 2FFE 24 BB    BIT  $BB                   
 2382                                 3000 30 56    BMI  $3058                 
 2383                                 3002 C9 7D    CMP  #$7D                  
 2384                                 3004 90 0B    BCC  $3011                 
 2385                                 3006 D0 53    BNE  $305B                 
 2386                                 3008 CE 73 7F DEC  $7F73                 
 2387                                 300B 10 4E    BPL  $305B                 
 2388                                 300D 66 5B    ROR  $5B                   
 2389                                 300F D0 4A    BNE  $305B                 
 2390                                 3011 CD 5B 7F CMP  $7F5B                 
 2391                                 3014 F0 10    BEQ  $3026                 
 2392                                 3016 C9 20    CMP  #$20                  
 2393                                 3018 F0 1A    BEQ  $3034                 
 2394                                 301A B0 38    BCS  $3054                 
 2395                                 301C C9 0D    CMP  #$0D                  
 2396                                 301E F0 0B    BEQ  $302B                 
 2397                                 3020 24 EB    BIT  $EB                   
 2398                                 3022 10 34    BPL  $3058                 
 2399                                 3024 30 35    BMI  $305B                 
 2400                                 3026 EE F3 2F INC  $2FF3                 
 2401                                 3029 A9 0D    LDA  #$0D                  
 2402                                 302B A4 BB    LDY  $BB                   
 2403                                 302D 84 AB    STY  $AB                   
 2404                                 302F 85 63    STA  $63                   
 2405                                 3031 4C 58 30 JMP  $3058                 
 2406                                 3034 A5 AB    LDA  $AB                   
 2407                                 3036 E9 0A    SBC  #$0A                  
 2408                                 3038 B0 18    BCS  $3052                 
 2409                                 303A A4 BB    LDY  $BB                   
 2410                                 303C 30 14    BMI  $3052                 
 2411                                 303E D0 06    BNE  $3046                 
 2412                                 3040 EE F3 2F INC  $2FF3                 
 2413                                 3043 A4 BB    LDY  $BB                   
 2414                                 3045 88       DEY                        
 2415                                 3046 84 AB    STY  $AB                   
 2416                                 3048 A9 0D    LDA  #$0D                  
 2417                                 304A 85 63    STA  $63                   
 2418                                 304C 8D F3 7F STA  $7FF3                 
 2419                                 304F 4C 74 30 JMP  $3074                 
 2420                                 3052 A9 20    LDA  #$20                  
 2421                                 3054 C6 AB    DEC  $AB                   
 2422                                 3056 F0 E8    BEQ  $3040                 
 2423                                 3058 8D F3 7F STA  $7FF3                 
 2424                                 305B EE 45 2F INC  $2F45                 
 2425                                 305E D0 14    BNE  $3074                 
 2426                                 3060 EE 46 2F INC  $2F46                 
 2427                                 3063 AD 46 2F LDA  $2F46                 
 2428                                 3066 24 08    BIT  $08                   
 2429                                 3068 D0 0A    BNE  $3074                 
 2430                                 306A 24 D3    BIT  $D3                   
 2431                                 306C 10 06    BPL  $3074                 
 2432                                 306E 38       SEC                        
 2433                                 306F E9 10    SBC  #$10                  
 2434                                 3071 8D 46 2F STA  $2F46                 
 2435 t01 t00 t80 t02 t11 t81         3074 20 22 F8 JSR  _and_rts              
 2436 t01 t00 t80 t02 t11 t81         3077 AD E4 7F LDA  $7FE4                 
 2437 t01 t00 t80 t02 t11 t81         307A 24 94    BIT  $94                   
 2438 t01 t00 t80 t02 t11 t81         307C 30 31    BMI  $30AF                 
 2439 t01 t00 t80 t02 t11 t81         307E 70 26    BVS  $30A6                 
 2440                                 3080 F0 11    BEQ  $3093                 
 2441                                 3082 A9 10    LDA  #$10                  
 2442                                 3084 85 CC    STA  $CC                   
 2443                                 3086 A4 3C    LDY  $3C                   
 2444                                 3088 F0 06    BEQ  $3090                 
 2445                                 308A 30 04    BMI  $3090                 
 2446                                 308C C0 1F    CPY  #$1F                  
 2447                                 308E B0 16    BCS  $30A6                 
 2448                                 3090 4C FB 30 JMP  $30FB                 
 2449                                 3093 A5 94    LDA  $94                   
 2450                                 3095 D0 0F    BNE  $30A6                 
 2451                                 3097 A9 A0    LDA  #$A0                  
 2452                                 3099 8D 19 04 STA  $0419                 
 2453                                 309C A9 04    LDA  #$04                  
 2454                                 309E A2 80    LDX  #$80                  
 2455                                 30A0 20 1D 54 JSR  $541D                 
 2456                                 30A3 8D 2E 58 STA  $582E                 
 2457 t01 t00 t80 t02 t11 t81         30A6 4C 91 32 JMP  $3291                 
 2458                                 30A9 29 20    AND  #$20                  
 2459                                 30AB F0 F9    BEQ  $30A6                 
 2460                                 30AD D0 39    BNE  $30E8                 
 2461                                 30AF 70 F8    BVS  $30A9                 
 2462                                 30B1 AD E4 7F LDA  $7FE4                 
 2463                                 30B4 4A       LSR  A                     
 2464                                 30B5 A4 2C    LDY  $2C                   
 2465                                 30B7 D0 0A    BNE  $30C3                 
 2466                                 30B9 90 EB    BCC  $30A6                 
 2467                                 30BB AD 64 7F LDA  $7F64                 
 2468                                 30BE 29 0F    AND  #$0F                  
 2469                                 30C0 85 34    STA  $34                   
 2470                                 30C2 98       TYA                        
 2471                                 30C3 B0 06    BCS  $30CB                 
 2472                                 30C5 A9 01    LDA  #$01                  
 2473                                 30C7 85 2C    STA  $2C                   
 2474                                 30C9 D0 DB    BNE  $30A6                 
 2475                                 30CB 30 D9    BMI  $30A6                 
 2476                                 30CD A9 FF    LDA  #$FF                  
 2477                                 30CF 85 2C    STA  $2C                   
 2478                                 30D1 85 FF    STA  $FF                   
 2479                                 30D3 C6 34    DEC  $34                   
 2480                                 30D5 D0 CF    BNE  $30A6                 
 2481                                 30D7 A9 02    LDA  #$02                  
 2482                                 30D9 8D EC 7F STA  $7FEC                 
 2483                                 30DC A9 A1    LDA  #$A1                  
 2484                                 30DE 8D 19 04 STA  $0419                 
 2485                                 30E1 A2 04    LDX  #$04                  
 2486                                 30E3 A0 80    LDY  #$80                  
 2487                                 30E5 20 05 60 JSR  $6005                 
 2488                                 30E8 85 94    STA  $94                   
 2489                                 30EA 30 0C    BMI  $30F8                 
 2490                                 30EC 38       SEC                        
 2491                                 30ED A9 04    LDA  #$04                  
 2492                                 30EF 20 6C 54 JSR  $546C                 
 2493                                 30F2 8D 62 31 STA  $3162                 
 2494                                 30F5 8C 63 31 STY  $3163                 
 2495                                 30F8 4C 91 32 JMP  $3291                 
 2496                                 30FB 2C F4 7F BIT  $7FF4                 
 2497                                 30FE 10 5E    BPL  $315E                 
 2498                                 3100 24 64    BIT  $64                   
 2499                                 3102 30 0D    BMI  $3111                 
 2500                                 3104 A9 FF    LDA  #$FF                  
 2501                                 3106 85 64    STA  $64                   
 2502                                 3108 A5 6C    LDA  $6C                   
 2503                                 310A F0 05    BEQ  $3111                 
 2504                                 310C 8D F4 7F STA  $7FF4                 
 2505                                 310F D0 E7    BNE  $30F8                 
 2506                                 3111 A5 A4    LDA  $A4                   
 2507                                 3113 F0 4C    BEQ  $3161                 
 2508                                 3115 10 22    BPL  $3139                 
 2509                                 3117 A4 8C    LDY  $8C                   
 2510                                 3119 C4 84    CPY  $84                   
 2511                                 311B B0 30    BCS  $314D                 
 2512                                 311D B9 00 0C LDA  inbuf_line4,Y         
 2513                                 3120 24 4C    BIT  $4C                   
 2514                                 3122 30 0F    BMI  $3133                 
 2515                                 3124 50 05    BVC  $312B                 
 2516                                 3126 A2 04    LDX  #$04                  
 2517                                 3128 20 41 22 JSR  $2241                 
 2518                                 312B 8D F4 7F STA  $7FF4                 
 2519                                 312E E6 8C    INC  $8C                   
 2520                                 3130 4C 91 32 JMP  $3291                 
 2521                                 3133 24 A4    BIT  $A4                   
 2522                                 3135 30 F7    BMI  $312E                 
 2523                                 3137 10 F2    BPL  $312B                 
 2524                                 3139 0A       ASL  A                     
 2525                                 313A 10 DB    BPL  $3117                 
 2526                                 313C AD 94 7F LDA  $7F94                 
 2527                                 313F 85 84    STA  $84                   
 2528                                 3141 A9 FF    LDA  #$FF                  
 2529                                 3143 85 8C    STA  $8C                   
 2530                                 3145 46 A4    LSR  $A4                   
 2531                                 3147 A9 0D    LDA  #$0D                  
 2532                                 3149 85 64    STA  $64                   
 2533                                 314B D0 DE    BNE  $312B                 
 2534                                 314D A4 84    LDY  $84                   
 2535                                 314F 84 8C    STY  $8C                   
 2536                                 3151 66 A4    ROR  $A4                   
 2537                                 3153 A5 DC    LDA  $DC                   
 2538                                 3155 F0 07    BEQ  $315E                 
 2539                                 3157 C6 DC    DEC  $DC                   
 2540                                 3159 A9 08    LDA  #$08                  
 2541                                 315B 8D F4 7F STA  $7FF4                 
 2542                                 315E 4C 91 32 JMP  $3291                 
 2543                                 3161 AC 05 20 LDY  $2005                 
 2544                                 3164 D0 11    BNE  $3177                 
 2545                                 3166 A5 84    LDA  $84                   
 2546                                 3168 F0 F4    BEQ  $315E                 
 2547                                 316A A5 BC    LDA  $BC                   
 2548                                 316C 30 F0    BMI  $315E                 
 2549                                 316E A9 FF    LDA  #$FF                  
 2550                                 3170 85 A4    STA  $A4                   
 2551                                 3172 D0 A1    BNE  $3115                 
 2552                                 3174 4C 07 32 JMP  $3207                 
 2553                                 3177 30 03    BMI  $317C                 
 2554                                 3179 4C 09 32 JMP  $3209                 
 2555                                 317C C0 8D    CPY  #$8D                  
 2556                                 317E F0 F4    BEQ  $3174                 
 2557                                 3180 A5 14    LDA  $14                   
 2558                                 3182 D0 42    BNE  $31C6                 
 2559                                 3184 06 5C    ASL  $5C                   
 2560                                 3186 AD 3C 7F LDA  $7F3C                 
 2561                                 3189 8D 74 7F STA  $7F74                 
 2562                                 318C C0 88    CPY  #$88                  
 2563                                 318E F0 0A    BEQ  $319A                 
 2564                                 3190 B0 15    BCS  $31A7                 
 2565                                 3192 C0 84    CPY  #$84                  
 2566                                 3194 F0 04    BEQ  $319A                 
 2567                                 3196 A0 80    LDY  #$80                  
 2568                                 3198 84 5C    STY  $5C                   
 2569                                 319A A5 84    LDA  $84                   
 2570                                 319C F0 25    BEQ  $31C3                 
 2571                                 319E A5 BC    LDA  $BC                   
 2572                                 31A0 30 21    BMI  $31C3                 
 2573                                 31A2 84 A4    STY  $A4                   
 2574                                 31A4 4C 91 32 JMP  $3291                 
 2575                                 31A7 C0 89    CPY  #$89                  
 2576                                 31A9 D0 25    BNE  $31D0                 
 2577                                 31AB A0 00    LDY  #$00                  
 2578                                 31AD 84 8C    STY  $8C                   
 2579                                 31AF 84 DC    STY  $DC                   
 2580                                 31B1 AD 8C 7F LDA  $7F8C                 
 2581                                 31B4 F0 05    BEQ  $31BB                 
 2582                                 31B6 A9 8D    LDA  #$8D                  
 2583                                 31B8 8D FC 7F STA  $7FFC                 
 2584                                 31BB 84 84    STY  $84                   
 2585                                 31BD A9 EC    LDA  #$EC                  
 2586                                 31BF 85 3C    STA  $3C                   
 2587                                 31C1 85 D4    STA  $D4                   
 2588                                 31C3 4C 78 32 JMP  $3278                 
 2589                                 31C6 C6 14    DEC  $14                   
 2590                                 31C8 AC 63 31 LDY  $3163                 
 2591                                 31CB C8       INY                        
 2592                                 31CC A9 00    LDA  #$00                  
 2593                                 31CE F0 27    BEQ  $31F7                 
 2594                                 31D0 C0 A4    CPY  #$A4                  
 2595                                 31D2 F0 C2    BEQ  $3196                 
 2596                                 31D4 C0 A8    CPY  #$A8                  
 2597                                 31D6 90 C2    BCC  $319A                 
 2598                                 31D8 D0 06    BNE  $31E0                 
 2599                                 31DA 24 BC    BIT  $BC                   
 2600                                 31DC 10 BC    BPL  $319A                 
 2601                                 31DE 30 B6    BMI  $3196                 
 2602                                 31E0 98       TYA                        
 2603                                 31E1 A4 9C    LDY  $9C                   
 2604                                 31E3 30 04    BMI  $31E9                 
 2605                                 31E5 49 F0    EOR  #$F0                  
 2606                                 31E7 F0 17    BEQ  $3200                 
 2607                                 31E9 84 D4    STY  $D4                   
 2608                                 31EB A5 74    LDA  $74                   
 2609                                 31ED A4 7C    LDY  $7C                   
 2610                                 31EF D0 06    BNE  $31F7                 
 2611                                 31F1 A6 B4    LDX  $B4                   
 2612                                 31F3 B5 C0    LDA  $C0,X                 
 2613                                 31F5 B4 C1    LDY  $C1,X                 
 2614                                 31F7 8D 62 31 STA  $3162                 
 2615                                 31FA 8C 63 31 STY  $3163                 
 2616                                 31FD 4C 61 31 JMP  $3161                 
 2617                                 3200 A9 00    LDA  #$00                  
 2618                                 3202 85 94    STA  $94                   
 2619                                 3204 4C 91 32 JMP  $3291                 
 2620                                 3207 A4 44    LDY  $44                   
 2621                                 3209 24 5C    BIT  $5C                   
 2622                                 320B 30 6B    BMI  $3278                 
 2623                                 320D A9 20    LDA  #$20                  
 2624                                 320F C9 20    CMP  #$20                  
 2625                                 3211 8D 10 32 STA  $3210                 
 2626                                 3214 D0 53    BNE  $3269                 
 2627                                 3216 B9 00 F3 LDA  char_translate_tbl,Y  
 2628                                 3219 30 5D    BMI  $3278                 
 2629                                 321B 24 BC    BIT  $BC                   
 2630                                 321D 30 56    BMI  $3275                 
 2631                                 321F C9 7D    CMP  #$7D                  
 2632                                 3221 90 0B    BCC  $322E                 
 2633                                 3223 D0 53    BNE  $3278                 
 2634                                 3225 CE 74 7F DEC  $7F74                 
 2635                                 3228 10 4E    BPL  $3278                 
 2636                                 322A 66 5C    ROR  $5C                   
 2637                                 322C D0 4A    BNE  $3278                 
 2638                                 322E CD 5C 7F CMP  $7F5C                 
 2639                                 3231 F0 10    BEQ  $3243                 
 2640                                 3233 C9 20    CMP  #$20                  
 2641                                 3235 F0 1A    BEQ  $3251                 
 2642                                 3237 B0 38    BCS  $3271                 
 2643                                 3239 C9 0D    CMP  #$0D                  
 2644                                 323B F0 0B    BEQ  $3248                 
 2645                                 323D 24 EC    BIT  $EC                   
 2646                                 323F 10 34    BPL  $3275                 
 2647                                 3241 30 35    BMI  $3278                 
 2648                                 3243 EE 10 32 INC  $3210                 
 2649                                 3246 A9 0D    LDA  #$0D                  
 2650                                 3248 A4 BC    LDY  $BC                   
 2651                                 324A 84 AC    STY  $AC                   
 2652                                 324C 85 64    STA  $64                   
 2653                                 324E 4C 75 32 JMP  $3275                 
 2654                                 3251 A5 AC    LDA  $AC                   
 2655                                 3253 E9 0A    SBC  #$0A                  
 2656                                 3255 B0 18    BCS  $326F                 
 2657                                 3257 A4 BC    LDY  $BC                   
 2658                                 3259 30 14    BMI  $326F                 
 2659                                 325B D0 06    BNE  $3263                 
 2660                                 325D EE 10 32 INC  $3210                 
 2661                                 3260 A4 BC    LDY  $BC                   
 2662                                 3262 88       DEY                        
 2663                                 3263 84 AC    STY  $AC                   
 2664                                 3265 A9 0D    LDA  #$0D                  
 2665                                 3267 85 64    STA  $64                   
 2666                                 3269 8D F4 7F STA  $7FF4                 
 2667                                 326C 4C 91 32 JMP  $3291                 
 2668                                 326F A9 20    LDA  #$20                  
 2669                                 3271 C6 AC    DEC  $AC                   
 2670                                 3273 F0 E8    BEQ  $325D                 
 2671                                 3275 8D F4 7F STA  $7FF4                 
 2672                                 3278 EE 62 31 INC  $3162                 
 2673                                 327B D0 14    BNE  $3291                 
 2674                                 327D EE 63 31 INC  $3163                 
 2675                                 3280 AD 63 31 LDA  $3163                 
 2676                                 3283 24 08    BIT  $08                   
 2677                                 3285 D0 0A    BNE  $3291                 
 2678                                 3287 24 D4    BIT  $D4                   
 2679                                 3289 10 06    BPL  $3291                 
 2680                                 328B 38       SEC                        
 2681                                 328C E9 10    SBC  #$10                  
 2682                                 328E 8D 63 31 STA  $3163                 
 2683 t01 t00 t80 t02 t11 t81         3291 20 22 F8 JSR  _and_rts              
 2684 t01 t00 t80 t02 t11 t81         3294 AD E5 7F LDA  $7FE5                 
 2685 t01 t00 t80 t02 t11 t81         3297 24 95    BIT  $95                   
 2686 t01 t00 t80 t02 t11 t81         3299 30 31    BMI  $32CC                 
 2687 t01 t00 t80 t02 t11 t81         329B 70 26    BVS  $32C3                 
 2688                                 329D F0 11    BEQ  $32B0                 
 2689                                 329F A9 10    LDA  #$10                  
 2690                                 32A1 85 CD    STA  $CD                   
 2691                                 32A3 A4 3D    LDY  $3D                   
 2692                                 32A5 F0 06    BEQ  $32AD                 
 2693                                 32A7 30 04    BMI  $32AD                 
 2694                                 32A9 C0 1F    CPY  #$1F                  
 2695                                 32AB B0 16    BCS  $32C3                 
 2696                                 32AD 4C 18 33 JMP  $3318                 
 2697                                 32B0 A5 95    LDA  $95                   
 2698                                 32B2 D0 0F    BNE  $32C3                 
 2699                                 32B4 A9 A0    LDA  #$A0                  
 2700                                 32B6 8D 1D 04 STA  $041D                 
 2701                                 32B9 A9 05    LDA  #$05                  
 2702                                 32BB A2 A0    LDX  #$A0                  
 2703                                 32BD 20 1D 54 JSR  $541D                 
 2704                                 32C0 8D 36 58 STA  $5836                 
 2705 t01 t00 t80 t02 t11 t81         32C3 4C AE 34 JMP  $34AE                 
 2706                                 32C6 29 20    AND  #$20                  
 2707                                 32C8 F0 F9    BEQ  $32C3                 
 2708                                 32CA D0 39    BNE  $3305                 
 2709                                 32CC 70 F8    BVS  $32C6                 
 2710                                 32CE AD E5 7F LDA  $7FE5                 
 2711                                 32D1 4A       LSR  A                     
 2712                                 32D2 A4 2D    LDY  $2D                   
 2713                                 32D4 D0 0A    BNE  $32E0                 
 2714                                 32D6 90 EB    BCC  $32C3                 
 2715                                 32D8 AD 65 7F LDA  $7F65                 
 2716                                 32DB 29 0F    AND  #$0F                  
 2717                                 32DD 85 35    STA  $35                   
 2718                                 32DF 98       TYA                        
 2719                                 32E0 B0 06    BCS  $32E8                 
 2720                                 32E2 A9 01    LDA  #$01                  
 2721                                 32E4 85 2D    STA  $2D                   
 2722                                 32E6 D0 DB    BNE  $32C3                 
 2723                                 32E8 30 D9    BMI  $32C3                 
 2724                                 32EA A9 FF    LDA  #$FF                  
 2725                                 32EC 85 2D    STA  $2D                   
 2726                                 32EE 85 FF    STA  $FF                   
 2727                                 32F0 C6 35    DEC  $35                   
 2728                                 32F2 D0 CF    BNE  $32C3                 
 2729                                 32F4 A9 02    LDA  #$02                  
 2730                                 32F6 8D ED 7F STA  $7FED                 
 2731                                 32F9 A9 A1    LDA  #$A1                  
 2732                                 32FB 8D 1D 04 STA  $041D                 
 2733                                 32FE A2 05    LDX  #$05                  
 2734                                 3300 A0 A0    LDY  #$A0                  
 2735                                 3302 20 05 60 JSR  $6005                 
 2736                                 3305 85 95    STA  $95                   
 2737                                 3307 30 0C    BMI  $3315                 
 2738                                 3309 38       SEC                        
 2739                                 330A A9 05    LDA  #$05                  
 2740                                 330C 20 6C 54 JSR  $546C                 
 2741                                 330F 8D 7F 33 STA  $337F                 
 2742                                 3312 8C 80 33 STY  $3380                 
 2743                                 3315 4C AE 34 JMP  $34AE                 
 2744                                 3318 2C F5 7F BIT  $7FF5                 
 2745                                 331B 10 5E    BPL  $337B                 
 2746                                 331D 24 65    BIT  $65                   
 2747                                 331F 30 0D    BMI  $332E                 
 2748                                 3321 A9 FF    LDA  #$FF                  
 2749                                 3323 85 65    STA  $65                   
 2750                                 3325 A5 6D    LDA  $6D                   
 2751                                 3327 F0 05    BEQ  $332E                 
 2752                                 3329 8D F5 7F STA  $7FF5                 
 2753                                 332C D0 E7    BNE  $3315                 
 2754                                 332E A5 A5    LDA  $A5                   
 2755                                 3330 F0 4C    BEQ  $337E                 
 2756                                 3332 10 22    BPL  $3356                 
 2757                                 3334 A4 8D    LDY  $8D                   
 2758                                 3336 C4 85    CPY  $85                   
 2759                                 3338 B0 30    BCS  $336A                 
 2760                                 333A B9 00 0D LDA  inbuf_line5,Y         
 2761                                 333D 24 4D    BIT  $4D                   
 2762                                 333F 30 0F    BMI  $3350                 
 2763                                 3341 50 05    BVC  $3348                 
 2764                                 3343 A2 05    LDX  #$05                  
 2765                                 3345 20 41 22 JSR  $2241                 
 2766                                 3348 8D F5 7F STA  $7FF5                 
 2767                                 334B E6 8D    INC  $8D                   
 2768                                 334D 4C AE 34 JMP  $34AE                 
 2769                                 3350 24 A5    BIT  $A5                   
 2770                                 3352 30 F7    BMI  $334B                 
 2771                                 3354 10 F2    BPL  $3348                 
 2772                                 3356 0A       ASL  A                     
 2773                                 3357 10 DB    BPL  $3334                 
 2774                                 3359 AD 95 7F LDA  $7F95                 
 2775                                 335C 85 85    STA  $85                   
 2776                                 335E A9 FF    LDA  #$FF                  
 2777                                 3360 85 8D    STA  $8D                   
 2778                                 3362 46 A5    LSR  $A5                   
 2779                                 3364 A9 0D    LDA  #$0D                  
 2780                                 3366 85 65    STA  $65                   
 2781                                 3368 D0 DE    BNE  $3348                 
 2782                                 336A A4 85    LDY  $85                   
 2783                                 336C 84 8D    STY  $8D                   
 2784                                 336E 66 A5    ROR  $A5                   
 2785                                 3370 A5 DD    LDA  $DD                   
 2786                                 3372 F0 07    BEQ  $337B                 
 2787                                 3374 C6 DD    DEC  $DD                   
 2788                                 3376 A9 08    LDA  #$08                  
 2789                                 3378 8D F5 7F STA  $7FF5                 
 2790                                 337B 4C AE 34 JMP  $34AE                 
 2791                                 337E AC 05 20 LDY  $2005                 
 2792                                 3381 D0 11    BNE  $3394                 
 2793                                 3383 A5 85    LDA  $85                   
 2794                                 3385 F0 F4    BEQ  $337B                 
 2795                                 3387 A5 BD    LDA  $BD                   
 2796                                 3389 30 F0    BMI  $337B                 
 2797                                 338B A9 FF    LDA  #$FF                  
 2798                                 338D 85 A5    STA  $A5                   
 2799                                 338F D0 A1    BNE  $3332                 
 2800                                 3391 4C 24 34 JMP  $3424                 
 2801                                 3394 30 03    BMI  $3399                 
 2802                                 3396 4C 26 34 JMP  $3426                 
 2803                                 3399 C0 8D    CPY  #$8D                  
 2804                                 339B F0 F4    BEQ  $3391                 
 2805                                 339D A5 15    LDA  $15                   
 2806                                 339F D0 42    BNE  $33E3                 
 2807                                 33A1 06 5D    ASL  $5D                   
 2808                                 33A3 AD 3D 7F LDA  $7F3D                 
 2809                                 33A6 8D 75 7F STA  $7F75                 
 2810                                 33A9 C0 88    CPY  #$88                  
 2811                                 33AB F0 0A    BEQ  $33B7                 
 2812                                 33AD B0 15    BCS  $33C4                 
 2813                                 33AF C0 85    CPY  #$85                  
 2814                                 33B1 F0 04    BEQ  $33B7                 
 2815                                 33B3 A0 80    LDY  #$80                  
 2816                                 33B5 84 5D    STY  $5D                   
 2817                                 33B7 A5 85    LDA  $85                   
 2818                                 33B9 F0 25    BEQ  $33E0                 
 2819                                 33BB A5 BD    LDA  $BD                   
 2820                                 33BD 30 21    BMI  $33E0                 
 2821                                 33BF 84 A5    STY  $A5                   
 2822                                 33C1 4C AE 34 JMP  $34AE                 
 2823                                 33C4 C0 89    CPY  #$89                  
 2824                                 33C6 D0 25    BNE  $33ED                 
 2825                                 33C8 A0 00    LDY  #$00                  
 2826                                 33CA 84 8D    STY  $8D                   
 2827                                 33CC 84 DD    STY  $DD                   
 2828                                 33CE AD 8D 7F LDA  $7F8D                 
 2829                                 33D1 F0 05    BEQ  $33D8                 
 2830                                 33D3 A9 8D    LDA  #$8D                  
 2831                                 33D5 8D FD 7F STA  $7FFD                 
 2832                                 33D8 84 85    STY  $85                   
 2833                                 33DA A9 EC    LDA  #$EC                  
 2834                                 33DC 85 3D    STA  $3D                   
 2835                                 33DE 85 D5    STA  $D5                   
 2836                                 33E0 4C 95 34 JMP  $3495                 
 2837                                 33E3 C6 15    DEC  $15                   
 2838                                 33E5 AC 80 33 LDY  $3380                 
 2839                                 33E8 C8       INY                        
 2840                                 33E9 A9 00    LDA  #$00                  
 2841                                 33EB F0 27    BEQ  $3414                 
 2842                                 33ED C0 A5    CPY  #$A5                  
 2843                                 33EF F0 C2    BEQ  $33B3                 
 2844                                 33F1 C0 A8    CPY  #$A8                  
 2845                                 33F3 90 C2    BCC  $33B7                 
 2846                                 33F5 D0 06    BNE  $33FD                 
 2847                                 33F7 24 BD    BIT  $BD                   
 2848                                 33F9 10 BC    BPL  $33B7                 
 2849                                 33FB 30 B6    BMI  $33B3                 
 2850                                 33FD 98       TYA                        
 2851                                 33FE A4 9D    LDY  $9D                   
 2852                                 3400 30 04    BMI  $3406                 
 2853                                 3402 49 F0    EOR  #$F0                  
 2854                                 3404 F0 17    BEQ  $341D                 
 2855                                 3406 84 D5    STY  $D5                   
 2856                                 3408 A5 75    LDA  $75                   
 2857                                 340A A4 7D    LDY  $7D                   
 2858                                 340C D0 06    BNE  $3414                 
 2859                                 340E A6 B5    LDX  $B5                   
 2860                                 3410 B5 C0    LDA  $C0,X                 
 2861                                 3412 B4 C1    LDY  $C1,X                 
 2862                                 3414 8D 7F 33 STA  $337F                 
 2863                                 3417 8C 80 33 STY  $3380                 
 2864                                 341A 4C 7E 33 JMP  $337E                 
 2865                                 341D A9 00    LDA  #$00                  
 2866                                 341F 85 95    STA  $95                   
 2867                                 3421 4C AE 34 JMP  $34AE                 
 2868                                 3424 A4 45    LDY  $45                   
 2869                                 3426 24 5D    BIT  $5D                   
 2870                                 3428 30 6B    BMI  $3495                 
 2871                                 342A A9 20    LDA  #$20                  
 2872                                 342C C9 20    CMP  #$20                  
 2873                                 342E 8D 2D 34 STA  $342D                 
 2874                                 3431 D0 53    BNE  $3486                 
 2875                                 3433 B9 00 F3 LDA  char_translate_tbl,Y  
 2876                                 3436 30 5D    BMI  $3495                 
 2877                                 3438 24 BD    BIT  $BD                   
 2878                                 343A 30 56    BMI  $3492                 
 2879                                 343C C9 7D    CMP  #$7D                  
 2880                                 343E 90 0B    BCC  $344B                 
 2881                                 3440 D0 53    BNE  $3495                 
 2882                                 3442 CE 75 7F DEC  $7F75                 
 2883                                 3445 10 4E    BPL  $3495                 
 2884                                 3447 66 5D    ROR  $5D                   
 2885                                 3449 D0 4A    BNE  $3495                 
 2886                                 344B CD 5D 7F CMP  $7F5D                 
 2887                                 344E F0 10    BEQ  $3460                 
 2888                                 3450 C9 20    CMP  #$20                  
 2889                                 3452 F0 1A    BEQ  $346E                 
 2890                                 3454 B0 38    BCS  $348E                 
 2891                                 3456 C9 0D    CMP  #$0D                  
 2892                                 3458 F0 0B    BEQ  $3465                 
 2893                                 345A 24 ED    BIT  $ED                   
 2894                                 345C 10 34    BPL  $3492                 
 2895                                 345E 30 35    BMI  $3495                 
 2896                                 3460 EE 2D 34 INC  $342D                 
 2897                                 3463 A9 0D    LDA  #$0D                  
 2898                                 3465 A4 BD    LDY  $BD                   
 2899                                 3467 84 AD    STY  $AD                   
 2900                                 3469 85 65    STA  $65                   
 2901                                 346B 4C 92 34 JMP  $3492                 
 2902                                 346E A5 AD    LDA  $AD                   
 2903                                 3470 E9 0A    SBC  #$0A                  
 2904                                 3472 B0 18    BCS  $348C                 
 2905                                 3474 A4 BD    LDY  $BD                   
 2906                                 3476 30 14    BMI  $348C                 
 2907                                 3478 D0 06    BNE  $3480                 
 2908                                 347A EE 2D 34 INC  $342D                 
 2909                                 347D A4 BD    LDY  $BD                   
 2910                                 347F 88       DEY                        
 2911                                 3480 84 AD    STY  $AD                   
 2912                                 3482 A9 0D    LDA  #$0D                  
 2913                                 3484 85 65    STA  $65                   
 2914                                 3486 8D F5 7F STA  $7FF5                 
 2915                                 3489 4C AE 34 JMP  $34AE                 
 2916                                 348C A9 20    LDA  #$20                  
 2917                                 348E C6 AD    DEC  $AD                   
 2918                                 3490 F0 E8    BEQ  $347A                 
 2919                                 3492 8D F5 7F STA  $7FF5                 
 2920                                 3495 EE 7F 33 INC  $337F                 
 2921                                 3498 D0 14    BNE  $34AE                 
 2922                                 349A EE 80 33 INC  $3380                 
 2923                                 349D AD 80 33 LDA  $3380                 
 2924                                 34A0 24 08    BIT  $08                   
 2925                                 34A2 D0 0A    BNE  $34AE                 
 2926                                 34A4 24 D5    BIT  $D5                   
 2927                                 34A6 10 06    BPL  $34AE                 
 2928                                 34A8 38       SEC                        
 2929                                 34A9 E9 10    SBC  #$10                  
 2930                                 34AB 8D 80 33 STA  $3380                 
 2931 t01 t00 t80 t02 t11 t81         34AE 20 22 F8 JSR  _and_rts              
 2932 t01 t00 t80 t02 t11 t81         34B1 AD E6 7F LDA  $7FE6                 
 2933 t01 t00 t80 t02 t11 t81         34B4 24 96    BIT  $96                   
 2934 t01 t00 t80 t02 t11 t81         34B6 30 31    BMI  $34E9                 
 2935 t01 t00 t80 t02 t11 t81         34B8 70 26    BVS  $34E0                 
 2936                                 34BA F0 11    BEQ  $34CD                 
 2937                                 34BC A9 10    LDA  #$10                  
 2938                                 34BE 85 CE    STA  $CE                   
 2939                                 34C0 A4 3E    LDY  $3E                   
 2940                                 34C2 F0 06    BEQ  $34CA                 
 2941                                 34C4 30 04    BMI  $34CA                 
 2942                                 34C6 C0 1F    CPY  #$1F                  
 2943                                 34C8 B0 16    BCS  $34E0                 
 2944                                 34CA 4C 35 35 JMP  $3535                 
 2945                                 34CD A5 96    LDA  $96                   
 2946                                 34CF D0 0F    BNE  $34E0                 
 2947                                 34D1 A9 A0    LDA  #$A0                  
 2948                                 34D3 8D 21 04 STA  $0421                 
 2949                                 34D6 A9 06    LDA  #$06                  
 2950                                 34D8 A2 C0    LDX  #$C0                  
 2951                                 34DA 20 1D 54 JSR  $541D                 
 2952                                 34DD 8D 3E 58 STA  $583E                 
 2953 t01 t00 t80 t02 t11 t81         34E0 4C CB 36 JMP  $36CB                 
 2954                                 34E3 29 20    AND  #$20                  
 2955                                 34E5 F0 F9    BEQ  $34E0                 
 2956                                 34E7 D0 39    BNE  $3522                 
 2957                                 34E9 70 F8    BVS  $34E3                 
 2958                                 34EB AD E6 7F LDA  $7FE6                 
 2959                                 34EE 4A       LSR  A                     
 2960                                 34EF A4 2E    LDY  $2E                   
 2961                                 34F1 D0 0A    BNE  $34FD                 
 2962                                 34F3 90 EB    BCC  $34E0                 
 2963                                 34F5 AD 66 7F LDA  $7F66                 
 2964                                 34F8 29 0F    AND  #$0F                  
 2965                                 34FA 85 36    STA  $36                   
 2966                                 34FC 98       TYA                        
 2967                                 34FD B0 06    BCS  $3505                 
 2968                                 34FF A9 01    LDA  #$01                  
 2969                                 3501 85 2E    STA  $2E                   
 2970                                 3503 D0 DB    BNE  $34E0                 
 2971                                 3505 30 D9    BMI  $34E0                 
 2972                                 3507 A9 FF    LDA  #$FF                  
 2973                                 3509 85 2E    STA  $2E                   
 2974                                 350B 85 FF    STA  $FF                   
 2975                                 350D C6 36    DEC  $36                   
 2976                                 350F D0 CF    BNE  $34E0                 
 2977                                 3511 A9 02    LDA  #$02                  
 2978                                 3513 8D EE 7F STA  $7FEE                 
 2979                                 3516 A9 A1    LDA  #$A1                  
 2980                                 3518 8D 21 04 STA  $0421                 
 2981                                 351B A2 06    LDX  #$06                  
 2982                                 351D A0 C0    LDY  #$C0                  
 2983                                 351F 20 05 60 JSR  $6005                 
 2984                                 3522 85 96    STA  $96                   
 2985                                 3524 30 0C    BMI  $3532                 
 2986                                 3526 38       SEC                        
 2987                                 3527 A9 06    LDA  #$06                  
 2988                                 3529 20 6C 54 JSR  $546C                 
 2989                                 352C 8D 9C 35 STA  $359C                 
 2990                                 352F 8C 9D 35 STY  $359D                 
 2991                                 3532 4C CB 36 JMP  $36CB                 
 2992                                 3535 2C F6 7F BIT  $7FF6                 
 2993                                 3538 10 5E    BPL  $3598                 
 2994                                 353A 24 66    BIT  $66                   
 2995                                 353C 30 0D    BMI  $354B                 
 2996                                 353E A9 FF    LDA  #$FF                  
 2997                                 3540 85 66    STA  $66                   
 2998                                 3542 A5 6E    LDA  $6E                   
 2999                                 3544 F0 05    BEQ  $354B                 
 3000                                 3546 8D F6 7F STA  $7FF6                 
 3001                                 3549 D0 E7    BNE  $3532                 
 3002                                 354B A5 A6    LDA  $A6                   
 3003                                 354D F0 4C    BEQ  $359B                 
 3004                                 354F 10 22    BPL  $3573                 
 3005                                 3551 A4 8E    LDY  $8E                   
 3006                                 3553 C4 86    CPY  $86                   
 3007                                 3555 B0 30    BCS  $3587                 
 3008                                 3557 B9 00 0E LDA  inbuf_line6,Y         
 3009                                 355A 24 4E    BIT  $4E                   
 3010                                 355C 30 0F    BMI  $356D                 
 3011                                 355E 50 05    BVC  $3565                 
 3012                                 3560 A2 06    LDX  #$06                  
 3013                                 3562 20 41 22 JSR  $2241                 
 3014                                 3565 8D F6 7F STA  $7FF6                 
 3015                                 3568 E6 8E    INC  $8E                   
 3016                                 356A 4C CB 36 JMP  $36CB                 
 3017                                 356D 24 A6    BIT  $A6                   
 3018                                 356F 30 F7    BMI  $3568                 
 3019                                 3571 10 F2    BPL  $3565                 
 3020                                 3573 0A       ASL  A                     
 3021                                 3574 10 DB    BPL  $3551                 
 3022                                 3576 AD 96 7F LDA  $7F96                 
 3023                                 3579 85 86    STA  $86                   
 3024                                 357B A9 FF    LDA  #$FF                  
 3025                                 357D 85 8E    STA  $8E                   
 3026                                 357F 46 A6    LSR  $A6                   
 3027                                 3581 A9 0D    LDA  #$0D                  
 3028                                 3583 85 66    STA  $66                   
 3029                                 3585 D0 DE    BNE  $3565                 
 3030                                 3587 A4 86    LDY  $86                   
 3031                                 3589 84 8E    STY  $8E                   
 3032                                 358B 66 A6    ROR  $A6                   
 3033                                 358D A5 DE    LDA  $DE                   
 3034                                 358F F0 07    BEQ  $3598                 
 3035                                 3591 C6 DE    DEC  $DE                   
 3036                                 3593 A9 08    LDA  #$08                  
 3037                                 3595 8D F6 7F STA  $7FF6                 
 3038                                 3598 4C CB 36 JMP  $36CB                 
 3039                                 359B AC 05 20 LDY  $2005                 
 3040                                 359E D0 11    BNE  $35B1                 
 3041                                 35A0 A5 86    LDA  $86                   
 3042                                 35A2 F0 F4    BEQ  $3598                 
 3043                                 35A4 A5 BE    LDA  $BE                   
 3044                                 35A6 30 F0    BMI  $3598                 
 3045                                 35A8 A9 FF    LDA  #$FF                  
 3046                                 35AA 85 A6    STA  $A6                   
 3047                                 35AC D0 A1    BNE  $354F                 
 3048                                 35AE 4C 41 36 JMP  $3641                 
 3049                                 35B1 30 03    BMI  $35B6                 
 3050                                 35B3 4C 43 36 JMP  $3643                 
 3051                                 35B6 C0 8D    CPY  #$8D                  
 3052                                 35B8 F0 F4    BEQ  $35AE                 
 3053                                 35BA A5 16    LDA  $16                   
 3054                                 35BC D0 42    BNE  $3600                 
 3055                                 35BE 06 5E    ASL  $5E                   
 3056                                 35C0 AD 3E 7F LDA  $7F3E                 
 3057                                 35C3 8D 76 7F STA  $7F76                 
 3058                                 35C6 C0 88    CPY  #$88                  
 3059                                 35C8 F0 0A    BEQ  $35D4                 
 3060                                 35CA B0 15    BCS  $35E1                 
 3061                                 35CC C0 86    CPY  #$86                  
 3062                                 35CE F0 04    BEQ  $35D4                 
 3063                                 35D0 A0 80    LDY  #$80                  
 3064                                 35D2 84 5E    STY  $5E                   
 3065                                 35D4 A5 86    LDA  $86                   
 3066                                 35D6 F0 25    BEQ  $35FD                 
 3067                                 35D8 A5 BE    LDA  $BE                   
 3068                                 35DA 30 21    BMI  $35FD                 
 3069                                 35DC 84 A6    STY  $A6                   
 3070                                 35DE 4C CB 36 JMP  $36CB                 
 3071                                 35E1 C0 89    CPY  #$89                  
 3072                                 35E3 D0 25    BNE  $360A                 
 3073                                 35E5 A0 00    LDY  #$00                  
 3074                                 35E7 84 8E    STY  $8E                   
 3075                                 35E9 84 DE    STY  $DE                   
 3076                                 35EB AD 8E 7F LDA  $7F8E                 
 3077                                 35EE F0 05    BEQ  $35F5                 
 3078                                 35F0 A9 8D    LDA  #$8D                  
 3079                                 35F2 8D FE 7F STA  $7FFE                 
 3080                                 35F5 84 86    STY  $86                   
 3081                                 35F7 A9 EC    LDA  #$EC                  
 3082                                 35F9 85 3E    STA  $3E                   
 3083                                 35FB 85 D6    STA  $D6                   
 3084                                 35FD 4C B2 36 JMP  $36B2                 
 3085                                 3600 C6 16    DEC  $16                   
 3086                                 3602 AC 9D 35 LDY  $359D                 
 3087                                 3605 C8       INY                        
 3088                                 3606 A9 00    LDA  #$00                  
 3089                                 3608 F0 27    BEQ  $3631                 
 3090                                 360A C0 A6    CPY  #$A6                  
 3091                                 360C F0 C2    BEQ  $35D0                 
 3092                                 360E C0 A8    CPY  #$A8                  
 3093                                 3610 90 C2    BCC  $35D4                 
 3094                                 3612 D0 06    BNE  $361A                 
 3095                                 3614 24 BE    BIT  $BE                   
 3096                                 3616 10 BC    BPL  $35D4                 
 3097                                 3618 30 B6    BMI  $35D0                 
 3098                                 361A 98       TYA                        
 3099                                 361B A4 9E    LDY  $9E                   
 3100                                 361D 30 04    BMI  $3623                 
 3101                                 361F 49 F0    EOR  #$F0                  
 3102                                 3621 F0 17    BEQ  $363A                 
 3103                                 3623 84 D6    STY  $D6                   
 3104                                 3625 A5 76    LDA  $76                   
 3105                                 3627 A4 7E    LDY  $7E                   
 3106                                 3629 D0 06    BNE  $3631                 
 3107                                 362B A6 B6    LDX  $B6                   
 3108                                 362D B5 C0    LDA  $C0,X                 
 3109                                 362F B4 C1    LDY  $C1,X                 
 3110                                 3631 8D 9C 35 STA  $359C                 
 3111                                 3634 8C 9D 35 STY  $359D                 
 3112                                 3637 4C 9B 35 JMP  $359B                 
 3113                                 363A A9 00    LDA  #$00                  
 3114                                 363C 85 96    STA  $96                   
 3115                                 363E 4C CB 36 JMP  $36CB                 
 3116                                 3641 A4 46    LDY  $46                   
 3117                                 3643 24 5E    BIT  $5E                   
 3118                                 3645 30 6B    BMI  $36B2                 
 3119                                 3647 A9 20    LDA  #$20                  
 3120                                 3649 C9 20    CMP  #$20                  
 3121                                 364B 8D 4A 36 STA  $364A                 
 3122                                 364E D0 53    BNE  $36A3                 
 3123                                 3650 B9 00 F3 LDA  char_translate_tbl,Y  
 3124                                 3653 30 5D    BMI  $36B2                 
 3125                                 3655 24 BE    BIT  $BE                   
 3126                                 3657 30 56    BMI  $36AF                 
 3127                                 3659 C9 7D    CMP  #$7D                  
 3128                                 365B 90 0B    BCC  $3668                 
 3129                                 365D D0 53    BNE  $36B2                 
 3130                                 365F CE 76 7F DEC  $7F76                 
 3131                                 3662 10 4E    BPL  $36B2                 
 3132                                 3664 66 5E    ROR  $5E                   
 3133                                 3666 D0 4A    BNE  $36B2                 
 3134                                 3668 CD 5E 7F CMP  $7F5E                 
 3135                                 366B F0 10    BEQ  $367D                 
 3136                                 366D C9 20    CMP  #$20                  
 3137                                 366F F0 1A    BEQ  $368B                 
 3138                                 3671 B0 38    BCS  $36AB                 
 3139                                 3673 C9 0D    CMP  #$0D                  
 3140                                 3675 F0 0B    BEQ  $3682                 
 3141                                 3677 24 EE    BIT  $EE                   
 3142                                 3679 10 34    BPL  $36AF                 
 3143                                 367B 30 35    BMI  $36B2                 
 3144                                 367D EE 4A 36 INC  $364A                 
 3145                                 3680 A9 0D    LDA  #$0D                  
 3146                                 3682 A4 BE    LDY  $BE                   
 3147                                 3684 84 AE    STY  $AE                   
 3148                                 3686 85 66    STA  $66                   
 3149                                 3688 4C AF 36 JMP  $36AF                 
 3150                                 368B A5 AE    LDA  $AE                   
 3151                                 368D E9 0A    SBC  #$0A                  
 3152                                 368F B0 18    BCS  $36A9                 
 3153                                 3691 A4 BE    LDY  $BE                   
 3154                                 3693 30 14    BMI  $36A9                 
 3155                                 3695 D0 06    BNE  $369D                 
 3156                                 3697 EE 4A 36 INC  $364A                 
 3157                                 369A A4 BE    LDY  $BE                   
 3158                                 369C 88       DEY                        
 3159                                 369D 84 AE    STY  $AE                   
 3160                                 369F A9 0D    LDA  #$0D                  
 3161                                 36A1 85 66    STA  $66                   
 3162                                 36A3 8D F6 7F STA  $7FF6                 
 3163                                 36A6 4C CB 36 JMP  $36CB                 
 3164                                 36A9 A9 20    LDA  #$20                  
 3165                                 36AB C6 AE    DEC  $AE                   
 3166                                 36AD F0 E8    BEQ  $3697                 
 3167                                 36AF 8D F6 7F STA  $7FF6                 
 3168                                 36B2 EE 9C 35 INC  $359C                 
 3169                                 36B5 D0 14    BNE  $36CB                 
 3170                                 36B7 EE 9D 35 INC  $359D                 
 3171                                 36BA AD 9D 35 LDA  $359D                 
 3172                                 36BD 24 08    BIT  $08                   
 3173                                 36BF D0 0A    BNE  $36CB                 
 3174                                 36C1 24 D6    BIT  $D6                   
 3175                                 36C3 10 06    BPL  $36CB                 
 3176                                 36C5 38       SEC                        
 3177                                 36C6 E9 10    SBC  #$10                  
 3178                                 36C8 8D 9D 35 STA  $359D                 
 3179 t01 t00 t80 t02 t11 t81         36CB 20 22 F8 JSR  _and_rts              
 3180 t01 t00 t80 t02 t11 t81         36CE AD E7 7F LDA  $7FE7                 
 3181 t01 t00 t80 t02 t11 t81         36D1 24 97    BIT  $97                   
 3182 t01 t00 t80 t02 t11 t81         36D3 30 31    BMI  $3706                 
 3183 t01 t00 t80 t02 t11 t81         36D5 70 26    BVS  $36FD                 
 3184                                 36D7 F0 11    BEQ  $36EA                 
 3185                                 36D9 A9 10    LDA  #$10                  
 3186                                 36DB 85 CF    STA  $CF                   
 3187                                 36DD A4 3F    LDY  $3F                   
 3188                                 36DF F0 06    BEQ  $36E7                 
 3189                                 36E1 30 04    BMI  $36E7                 
 3190                                 36E3 C0 1F    CPY  #$1F                  
 3191                                 36E5 B0 16    BCS  $36FD                 
 3192                                 36E7 4C 52 37 JMP  $3752                 
 3193                                 36EA A5 97    LDA  $97                   
 3194                                 36EC D0 0F    BNE  $36FD                 
 3195                                 36EE A9 A0    LDA  #$A0                  
 3196                                 36F0 8D 25 04 STA  $0425                 
 3197                                 36F3 A9 07    LDA  #$07                  
 3198                                 36F5 A2 E0    LDX  #$E0                  
 3199                                 36F7 20 1D 54 JSR  $541D                 
 3200                                 36FA 8D 46 58 STA  $5846                 
 3201 t01 t00 t80 t02 t11 t81         36FD 4C E8 38 JMP  $38E8                 
 3202                                 3700 29 20    AND  #$20                  
 3203                                 3702 F0 F9    BEQ  $36FD                 
 3204                                 3704 D0 39    BNE  $373F                 
 3205                                 3706 70 F8    BVS  $3700                 
 3206                                 3708 AD E7 7F LDA  $7FE7                 
 3207                                 370B 4A       LSR  A                     
 3208                                 370C A4 2F    LDY  $2F                   
 3209                                 370E D0 0A    BNE  $371A                 
 3210                                 3710 90 EB    BCC  $36FD                 
 3211                                 3712 AD 67 7F LDA  $7F67                 
 3212                                 3715 29 0F    AND  #$0F                  
 3213                                 3717 85 37    STA  $37                   
 3214                                 3719 98       TYA                        
 3215                                 371A B0 06    BCS  $3722                 
 3216                                 371C A9 01    LDA  #$01                  
 3217                                 371E 85 2F    STA  $2F                   
 3218                                 3720 D0 DB    BNE  $36FD                 
 3219                                 3722 30 D9    BMI  $36FD                 
 3220                                 3724 A9 FF    LDA  #$FF                  
 3221                                 3726 85 2F    STA  $2F                   
 3222                                 3728 85 FF    STA  $FF                   
 3223                                 372A C6 37    DEC  $37                   
 3224                                 372C D0 CF    BNE  $36FD                 
 3225                                 372E A9 02    LDA  #$02                  
 3226                                 3730 8D EF 7F STA  $7FEF                 
 3227                                 3733 A9 A1    LDA  #$A1                  
 3228                                 3735 8D 25 04 STA  $0425                 
 3229                                 3738 A2 07    LDX  #$07                  
 3230                                 373A A0 E0    LDY  #$E0                  
 3231                                 373C 20 05 60 JSR  $6005                 
 3232                                 373F 85 97    STA  $97                   
 3233                                 3741 30 0C    BMI  $374F                 
 3234                                 3743 38       SEC                        
 3235                                 3744 A9 07    LDA  #$07                  
 3236                                 3746 20 6C 54 JSR  $546C                 
 3237                                 3749 8D B9 37 STA  $37B9                 
 3238                                 374C 8C BA 37 STY  $37BA                 
 3239                                 374F 4C E8 38 JMP  $38E8                 
 3240                                 3752 2C F7 7F BIT  $7FF7                 
 3241                                 3755 10 5E    BPL  $37B5                 
 3242                                 3757 24 67    BIT  $67                   
 3243                                 3759 30 0D    BMI  $3768                 
 3244                                 375B A9 FF    LDA  #$FF                  
 3245                                 375D 85 67    STA  $67                   
 3246                                 375F A5 6F    LDA  $6F                   
 3247                                 3761 F0 05    BEQ  $3768                 
 3248                                 3763 8D F7 7F STA  $7FF7                 
 3249                                 3766 D0 E7    BNE  $374F                 
 3250                                 3768 A5 A7    LDA  $A7                   
 3251                                 376A F0 4C    BEQ  $37B8                 
 3252                                 376C 10 22    BPL  $3790                 
 3253                                 376E A4 8F    LDY  $8F                   
 3254                                 3770 C4 87    CPY  $87                   
 3255                                 3772 B0 30    BCS  $37A4                 
 3256                                 3774 B9 00 0F LDA  inbuf_line7,Y         
 3257                                 3777 24 4F    BIT  $4F                   
 3258                                 3779 30 0F    BMI  $378A                 
 3259                                 377B 50 05    BVC  $3782                 
 3260                                 377D A2 07    LDX  #$07                  
 3261                                 377F 20 41 22 JSR  $2241                 
 3262                                 3782 8D F7 7F STA  $7FF7                 
 3263                                 3785 E6 8F    INC  $8F                   
 3264                                 3787 4C E8 38 JMP  $38E8                 
 3265                                 378A 24 A7    BIT  $A7                   
 3266                                 378C 30 F7    BMI  $3785                 
 3267                                 378E 10 F2    BPL  $3782                 
 3268                                 3790 0A       ASL  A                     
 3269                                 3791 10 DB    BPL  $376E                 
 3270                                 3793 AD 97 7F LDA  $7F97                 
 3271                                 3796 85 87    STA  $87                   
 3272                                 3798 A9 FF    LDA  #$FF                  
 3273                                 379A 85 8F    STA  $8F                   
 3274                                 379C 46 A7    LSR  $A7                   
 3275                                 379E A9 0D    LDA  #$0D                  
 3276                                 37A0 85 67    STA  $67                   
 3277                                 37A2 D0 DE    BNE  $3782                 
 3278                                 37A4 A4 87    LDY  $87                   
 3279                                 37A6 84 8F    STY  $8F                   
 3280                                 37A8 66 A7    ROR  $A7                   
 3281                                 37AA A5 DF    LDA  $DF                   
 3282                                 37AC F0 07    BEQ  $37B5                 
 3283                                 37AE C6 DF    DEC  $DF                   
 3284                                 37B0 A9 08    LDA  #$08                  
 3285                                 37B2 8D F7 7F STA  $7FF7                 
 3286                                 37B5 4C E8 38 JMP  $38E8                 
 3287                                 37B8 AC 05 20 LDY  $2005                 
 3288                                 37BB D0 11    BNE  $37CE                 
 3289                                 37BD A5 87    LDA  $87                   
 3290                                 37BF F0 F4    BEQ  $37B5                 
 3291                                 37C1 A5 BF    LDA  $BF                   
 3292                                 37C3 30 F0    BMI  $37B5                 
 3293                                 37C5 A9 FF    LDA  #$FF                  
 3294                                 37C7 85 A7    STA  $A7                   
 3295                                 37C9 D0 A1    BNE  $376C                 
 3296                                 37CB 4C 5E 38 JMP  $385E                 
 3297                                 37CE 30 03    BMI  $37D3                 
 3298                                 37D0 4C 60 38 JMP  $3860                 
 3299                                 37D3 C0 8D    CPY  #$8D                  
 3300                                 37D5 F0 F4    BEQ  $37CB                 
 3301                                 37D7 A5 17    LDA  $17                   
 3302                                 37D9 D0 42    BNE  $381D                 
 3303                                 37DB 06 5F    ASL  $5F                   
 3304                                 37DD AD 3F 7F LDA  $7F3F                 
 3305                                 37E0 8D 77 7F STA  $7F77                 
 3306                                 37E3 C0 88    CPY  #$88                  
 3307                                 37E5 F0 0A    BEQ  $37F1                 
 3308                                 37E7 B0 15    BCS  $37FE                 
 3309                                 37E9 C0 87    CPY  #$87                  
 3310                                 37EB F0 04    BEQ  $37F1                 
 3311                                 37ED A0 80    LDY  #$80                  
 3312                                 37EF 84 5F    STY  $5F                   
 3313                                 37F1 A5 87    LDA  $87                   
 3314                                 37F3 F0 25    BEQ  $381A                 
 3315                                 37F5 A5 BF    LDA  $BF                   
 3316                                 37F7 30 21    BMI  $381A                 
 3317                                 37F9 84 A7    STY  $A7                   
 3318                                 37FB 4C E8 38 JMP  $38E8                 
 3319                                 37FE C0 89    CPY  #$89                  
 3320                                 3800 D0 25    BNE  $3827                 
 3321                                 3802 A0 00    LDY  #$00                  
 3322                                 3804 84 8F    STY  $8F                   
 3323                                 3806 84 DF    STY  $DF                   
 3324                                 3808 AD 8F 7F LDA  $7F8F                 
 3325                                 380B F0 05    BEQ  $3812                 
 3326                                 380D A9 8D    LDA  #$8D                  
 3327                                 380F 8D FF 7F STA  $7FFF                 
 3328                                 3812 84 87    STY  $87                   
 3329                                 3814 A9 EC    LDA  #$EC                  
 3330                                 3816 85 3F    STA  $3F                   
 3331                                 3818 85 D7    STA  $D7                   
 3332                                 381A 4C CF 38 JMP  $38CF                 
 3333                                 381D C6 17    DEC  $17                   
 3334                                 381F AC BA 37 LDY  $37BA                 
 3335                                 3822 C8       INY                        
 3336                                 3823 A9 00    LDA  #$00                  
 3337                                 3825 F0 27    BEQ  $384E                 
 3338                                 3827 C0 A7    CPY  #$A7                  
 3339                                 3829 F0 C2    BEQ  $37ED                 
 3340                                 382B C0 A8    CPY  #$A8                  
 3341                                 382D 90 C2    BCC  $37F1                 
 3342                                 382F D0 06    BNE  $3837                 
 3343                                 3831 24 BF    BIT  $BF                   
 3344                                 3833 10 BC    BPL  $37F1                 
 3345                                 3835 30 B6    BMI  $37ED                 
 3346                                 3837 98       TYA                        
 3347                                 3838 A4 9F    LDY  $9F                   
 3348                                 383A 30 04    BMI  $3840                 
 3349                                 383C 49 F0    EOR  #$F0                  
 3350                                 383E F0 17    BEQ  $3857                 
 3351                                 3840 84 D7    STY  $D7                   
 3352                                 3842 A5 77    LDA  $77                   
 3353                                 3844 A4 7F    LDY  $7F                   
 3354                                 3846 D0 06    BNE  $384E                 
 3355                                 3848 A6 B7    LDX  $B7                   
 3356                                 384A B5 C0    LDA  $C0,X                 
 3357                                 384C B4 C1    LDY  $C1,X                 
 3358                                 384E 8D B9 37 STA  $37B9                 
 3359                                 3851 8C BA 37 STY  $37BA                 
 3360                                 3854 4C B8 37 JMP  $37B8                 
 3361                                 3857 A9 00    LDA  #$00                  
 3362                                 3859 85 97    STA  $97                   
 3363                                 385B 4C E8 38 JMP  $38E8                 
 3364                                 385E A4 47    LDY  $47                   
 3365                                 3860 24 5F    BIT  $5F                   
 3366                                 3862 30 6B    BMI  $38CF                 
 3367                                 3864 A9 20    LDA  #$20                  
 3368                                 3866 C9 20    CMP  #$20                  
 3369                                 3868 8D 67 38 STA  $3867                 
 3370                                 386B D0 53    BNE  $38C0                 
 3371                                 386D B9 00 F3 LDA  char_translate_tbl,Y  
 3372                                 3870 30 5D    BMI  $38CF                 
 3373                                 3872 24 BF    BIT  $BF                   
 3374                                 3874 30 56    BMI  $38CC                 
 3375                                 3876 C9 7D    CMP  #$7D                  
 3376                                 3878 90 0B    BCC  $3885                 
 3377                                 387A D0 53    BNE  $38CF                 
 3378                                 387C CE 77 7F DEC  $7F77                 
 3379                                 387F 10 4E    BPL  $38CF                 
 3380                                 3881 66 5F    ROR  $5F                   
 3381                                 3883 D0 4A    BNE  $38CF                 
 3382                                 3885 CD 5F 7F CMP  $7F5F                 
 3383                                 3888 F0 10    BEQ  $389A                 
 3384                                 388A C9 20    CMP  #$20                  
 3385                                 388C F0 1A    BEQ  $38A8                 
 3386                                 388E B0 38    BCS  $38C8                 
 3387                                 3890 C9 0D    CMP  #$0D                  
 3388                                 3892 F0 0B    BEQ  $389F                 
 3389                                 3894 24 EF    BIT  $EF                   
 3390                                 3896 10 34    BPL  $38CC                 
 3391                                 3898 30 35    BMI  $38CF                 
 3392                                 389A EE 67 38 INC  $3867                 
 3393                                 389D A9 0D    LDA  #$0D                  
 3394                                 389F A4 BF    LDY  $BF                   
 3395                                 38A1 84 AF    STY  $AF                   
 3396                                 38A3 85 67    STA  $67                   
 3397                                 38A5 4C CC 38 JMP  $38CC                 
 3398                                 38A8 A5 AF    LDA  $AF                   
 3399                                 38AA E9 0A    SBC  #$0A                  
 3400                                 38AC B0 18    BCS  $38C6                 
 3401                                 38AE A4 BF    LDY  $BF                   
 3402                                 38B0 30 14    BMI  $38C6                 
 3403                                 38B2 D0 06    BNE  $38BA                 
 3404                                 38B4 EE 67 38 INC  $3867                 
 3405                                 38B7 A4 BF    LDY  $BF                   
 3406                                 38B9 88       DEY                        
 3407                                 38BA 84 AF    STY  $AF                   
 3408                                 38BC A9 0D    LDA  #$0D                  
 3409                                 38BE 85 67    STA  $67                   
 3410                                 38C0 8D F7 7F STA  $7FF7                 
 3411                                 38C3 4C E8 38 JMP  $38E8                 
 3412                                 38C6 A9 20    LDA  #$20                  
 3413                                 38C8 C6 AF    DEC  $AF                   
 3414                                 38CA F0 E8    BEQ  $38B4                 
 3415                                 38CC 8D F7 7F STA  $7FF7                 
 3416                                 38CF EE B9 37 INC  $37B9                 
 3417                                 38D2 D0 14    BNE  $38E8                 
 3418                                 38D4 EE BA 37 INC  $37BA                 
 3419                                 38D7 AD BA 37 LDA  $37BA                 
 3420                                 38DA 24 08    BIT  $08                   
 3421                                 38DC D0 0A    BNE  $38E8                 
 3422                                 38DE 24 D7    BIT  $D7                   
 3423                                 38E0 10 06    BPL  $38E8                 
 3424                                 38E2 38       SEC                        
 3425                                 38E3 E9 10    SBC  #$10                  
 3426                                 38E5 8D BA 37 STA  $37BA                 
 3427 t01 t00 t80 t02 t11 t81         38E8 20 22 F8 JSR  _and_rts              
 3428 t01 t00 t80 t02 t11 t81         38EB A5 30    LDA  $30                   
 3429 t01 t00 t80 t02 t11 t81         38ED 30 03    BMI  $38F2                 
 3430 t01 t00 t80 t02 t11 t81         38EF 20 3C 26 JSR  $263C                 
 3431 t01 t00 t80 t02 t11 t81         38F2 A5 28    LDA  $28                   
 3432 t01 t00 t80 t02 t11 t81         38F4 30 10    BMI  $3906                 
 3433     t00 t80                     38F6 A5 F4    LDA  $F4                   
 3434     t00 t80                     38F8 D0 05    BNE  $38FF                 
 3435     t00 t80                     38FA A9 A0    LDA  #$A0                  
 3436     t00 t80                     38FC 8D A5 04 STA  $04A5                 
 3437     t00 t80                     38FF A9 84    LDA  #$84                  
 3438     t00 t80                     3901 85 28    STA  $28                   
 3439     t00 t80                     3903 20 0C 52 JSR  $520C                 
 3440 t01 t00 t80 t02 t11 t81         3906 20 D3 7F JSR  $7FD3                 
 3441 t01 t00 t80 t02 t11 t81         3909 20 5A 47 JSR  $475A                 
 3442 t01 t00 t80 t02 t11 t81         390C 20 22 F8 JSR  _and_rts              
 3443 t01 t00 t80 t02 t11 t81         390F A9 FF    LDA  #$FF                  
 3444 t01 t00 t80 t02 t11 t81         3911 30 03    BMI  $3916                 
 3445                                 3913 20 9B 7F JSR  $7F9B                 
 3446 t01 t00 t80 t02 t11 t81         3916 A5 FD    LDA  $FD                   
 3447 t01 t00 t80 t02 t11 t81         3918 8D 10 39 STA  $3910                 
 3448 t01 t00 t80 t02 t11 t81         391B 30 03    BMI  $3920                 
 3449                                 391D 4C AB 39 JMP  $39AB                 
 3450 t01 t00 t80 t02 t11 t81         3920 A6 E2    LDX  $E2                   
 3451 t01 t00 t80 t02 t11 t81         3922 85 E2    STA  $E2                   
 3452 t01 t00 t80 t02 t11 t81         3924 10 03    BPL  $3929                 
 3453 t01 t00 t80 t02 t11 t81         3926 20 03 F8 JSR  $F803                 
 3454 t01 t00 t80 t02 t11 t81         3929 A6 05    LDX  $05                   
 3455 t01 t00 t80 t02 t11 t81         392B 30 39    BMI  $3966                 
 3456                                 392D E4 06    CPX  $06                   
 3457                                 392F D0 2B    BNE  $395C                 
 3458                                 3931 A5 07    LDA  $07                   
 3459                                 3933 C9 08    CMP  #$08                  
 3460                                 3935 D0 0D    BNE  $3944                 
 3461                                 3937 B5 38    LDA  $38,X                 
 3462                                 3939 D0 0D    BNE  $3948                 
 3463                                 393B B5 50    LDA  $50,X                 
 3464                                 393D 0A       ASL  A                     
 3465                                 393E F0 08    BEQ  $3948                 
 3466                                 3940 C9 FE    CMP  #$FE                  
 3467                                 3942 F0 18    BEQ  $395C                 
 3468                                 3944 C6 07    DEC  $07                   
 3469                                 3946 D0 1A    BNE  $3962                 
 3470                                 3948 B5 20    LDA  $20,X                 
 3471                                 394A 10 10    BPL  $395C                 
 3472                                 394C AC A0 7F LDY  $7FA0                 
 3473                                 394F A5 B0    LDA  $B0                   
 3474                                 3951 D0 01    BNE  $3954                 
 3475                                 3953 88       DEY                        
 3476                                 3954 C0 02    CPY  #$02                  
 3477                                 3956 90 04    BCC  $395C                 
 3478                                 3958 A9 00    LDA  #$00                  
 3479                                 395A 95 90    STA  $90,X                 
 3480                                 395C A9 0A    LDA  #$0A                  
 3481                                 395E 85 07    STA  $07                   
 3482                                 3960 86 06    STX  $06                   
 3483                                 3962 A9 FF    LDA  #$FF                  
 3484                                 3964 85 05    STA  $05                   
 3485 t01 t00 t80 t02 t11 t81         3966 A5 F4    LDA  $F4                   
 3486 t01 t00 t80 t02 t11 t81         3968 C9 01    CMP  #$01                  
 3487 t01 t00 t80 t02 t11 t81         396A 90 14    BCC  $3980                 
 3488                                 396C AD 60 C0 LDA  $C060                 
 3489                                 396F A8       TAY                        
 3490                                 3970 49 00    EOR  #$00                  
 3491                                 3972 10 0C    BPL  $3980                 
 3492                                 3974 8C 71 39 STY  $3971                 
 3493                                 3977 A9 0A    LDA  #$0A                  
 3494                                 3979 85 F4    STA  $F4                   
 3495                                 397B 85 28    STA  $28                   
 3496                                 397D AD 20 C0 LDA  $C020                 
 3497 t01 t00 t80 t02 t11 t81         3980 2C B1 28 BIT  $28B1                 
 3498 t01 t00 t80 t02 t11 t81         3983 CE AA 39 DEC  $39AA                 
 3499 t01 t00 t80 t02 t11 t81         3986 D0 1E    BNE  $39A6                 
 3500 t01 t00 t80 t02 t11 t81         3988 A9 00    LDA  #$00                  
 3501 t01 t00 t80 t02 t11 t81         398A 85 F2    STA  $F2                   
 3502 t01 t00 t80 t02 t11 t81         398C 85 30    STA  $30                   
 3503 t01 t00 t80 t02 t11 t81         398E AD 12 53 LDA  $5312                 
 3504 t01 t00 t80 t02 t11 t81         3991 8D AA 39 STA  $39AA                 
 3505 t01 t00 t80 t02 t11 t81         3994 CE A9 39 DEC  $39A9                 
 3506 t01 t00 t80 t02 t11 t81         3997 D0 0D    BNE  $39A6                 
 3507                                 3999 A9 1E    LDA  #$1E                  
 3508                                 399B 8D A9 39 STA  $39A9                 
 3509                                 399E 90 04    BCC  $39A4                 
 3510                                 39A0 C6 F4    DEC  $F4                   
 3511                                 39A2 D0 02    BNE  $39A6                 
 3512                                 39A4 85 28    STA  $28                   
 3513 t01 t00 t80 t02 t11 t81         39A6 4C B1 28 JMP  $28B1                 
 3514                                 39A9 1E 13 A9 ASL  $A913,X               
 3515                                 39AC FF       ???                        
 3516                                 39AD 85 FD    STA  $FD                   
 3517                                 39AF A5 E4    LDA  $E4                   
 3518                                 39B1 F0 0C    BEQ  $39BF                 
 3519                                 39B3 C6 E4    DEC  $E4                   
 3520                                 39B5 D0 08    BNE  $39BF                 
 3521                                 39B7 AD 80 04 LDA  cons_line2/line0channel 
 3522                                 39BA 29 7F    AND  #$7F                  
 3523                                 39BC 8D 80 04 STA  cons_line2/line0channel 
 3524                                 39BF CE B0 7F DEC  $7FB0                 
 3525                                 39C2 D0 0A    BNE  $39CE                 
 3526                                 39C4 A2 07    LDX  #$07                  
 3527                                 39C6 A9 00    LDA  #$00                  
 3528                                 39C8 9D B0 7F STA  $7FB0,X               
 3529                                 39CB CA       DEX                        
 3530                                 39CC D0 FA    BNE  $39C8                 
 3531                                 39CE A5 E3    LDA  $E3                   
 3532                                 39D0 D0 06    BNE  $39D8                 
 3533                                 39D2 A5 E7    LDA  $E7                   
 3534                                 39D4 F0 02    BEQ  $39D8                 
 3535                                 39D6 C6 E7    DEC  $E7                   
 3536                                 39D8 38       SEC                        
 3537                                 39D9 A2 00    LDX  #$00                  
 3538                                 39DB 20 09 58 JSR  $5809                 
 3539                                 39DE A0 07    LDY  #$07                  
 3540                                 39E0 B9 18 00 LDA  $0018,Y               
 3541                                 39E3 F0 68    BEQ  $3A4D                 
 3542                                 39E5 98       TYA                        
 3543                                 39E6 0A       ASL  A                     
 3544                                 39E7 0A       ASL  A                     
 3545                                 39E8 AA       TAX                        
 3546                                 39E9 FE 08 04 INC  cons_moecutoff,X      
 3547                                 39EC BD 08 04 LDA  cons_moecutoff,X      
 3548                                 39EF C9 BA    CMP  #$BA                  
 3549                                 39F1 B0 27    BCS  $3A1A                 
 3550                                 39F3 B9 50 00 LDA  $0050,Y               
 3551                                 39F6 D0 55    BNE  $3A4D                 
 3552                                 39F8 A5 E3    LDA  $E3                   
 3553                                 39FA 2D E4 F7 AND  $F7E4                 
 3554                                 39FD F0 07    BEQ  $3A06                 
 3555                                 39FF 0A       ASL  A                     
 3556                                 3A00 A9 B0    LDA  #$B0                  
 3557                                 3A02 69 01    ADC  #$01                  
 3558                                 3A04 D0 05    BNE  $3A0B                 
 3559                                 3A06 AD 08 04 LDA  cons_moecutoff        
 3560                                 3A09 09 B0    ORA  #$B0                  
 3561                                 3A0B DD 08 04 CMP  cons_moecutoff,X      
 3562                                 3A0E B0 3D    BCS  $3A4D                 
 3563                                 3A10 B9 50 00 LDA  $0050,Y               
 3564                                 3A13 09 80    ORA  #$80                  
 3565                                 3A15 99 50 00 STA  $0050,Y               
 3566                                 3A18 D0 33    BNE  $3A4D                 
 3567                                 3A1A A9 B0    LDA  #$B0                  
 3568                                 3A1C 9D 08 04 STA  cons_moecutoff,X      
 3569                                 3A1F FE 07 04 INC  $0407,X               
 3570                                 3A22 BD 07 04 LDA  $0407,X               
 3571                                 3A25 C9 BA    CMP  #$BA                  
 3572                                 3A27 90 14    BCC  $3A3D                 
 3573                                 3A29 A9 B0    LDA  #$B0                  
 3574                                 3A2B 9D 07 04 STA  $0407,X               
 3575                                 3A2E FE 06 04 INC  $0406,X               
 3576                                 3A31 BD 06 04 LDA  $0406,X               
 3577                                 3A34 C9 BA    CMP  #$BA                  
 3578                                 3A36 90 05    BCC  $3A3D                 
 3579                                 3A38 A9 B0    LDA  #$B0                  
 3580                                 3A3A 9D 06 04 STA  $0406,X               
 3581                                 3A3D B9 50 00 LDA  $0050,Y               
 3582                                 3A40 F0 CE    BEQ  $3A10                 
 3583                                 3A42 29 0F    AND  #$0F                  
 3584                                 3A44 09 B0    ORA  #$B0                  
 3585                                 3A46 DD 07 04 CMP  $0407,X               
 3586                                 3A49 F0 C5    BEQ  $3A10                 
 3587                                 3A4B 90 C3    BCC  $3A10                 
 3588                                 3A4D 88       DEY                        
 3589                                 3A4E D0 90    BNE  $39E0                 
 3590                                 3A50 AD 00 04 LDA  cons_line1/cutofftime 
 3591                                 3A53 29 0F    AND  #$0F                  
 3592                                 3A55 F0 23    BEQ  $3A7A                 
 3593                                 3A57 A5 F1    LDA  $F1                   
 3594                                 3A59 05 E3    ORA  $E3                   
 3595                                 3A5B C9 02    CMP  #$02                  
 3596                                 3A5D 90 1B    BCC  $3A7A                 
 3597                                 3A5F A2 07    LDX  #$07                  
 3598                                 3A61 B5 18    LDA  $18,X                 
 3599                                 3A63 10 12    BPL  $3A77                 
 3600                                 3A65 B5 50    LDA  $50,X                 
 3601                                 3A67 10 0E    BPL  $3A77                 
 3602                                 3A69 C9 FF    CMP  #$FF                  
 3603                                 3A6B F0 0A    BEQ  $3A77                 
 3604                                 3A6D 0A       ASL  A                     
 3605                                 3A6E F0 04    BEQ  $3A74                 
 3606                                 3A70 A5 E3    LDA  $E3                   
 3607                                 3A72 F0 03    BEQ  $3A77                 
 3608                                 3A74 20 81 3A JSR  $3A81                 
 3609                                 3A77 CA       DEX                        
 3610                                 3A78 D0 E7    BNE  $3A61                 
 3611                                 3A7A 18       CLC                        
 3612                                 3A7B 20 0E 60 JSR  $600E                 
 3613                                 3A7E 4C B1 28 JMP  $28B1                 
 3614                                 3A81 B5 38    LDA  $38,X                 
 3615                                 3A83 F0 01    BEQ  $3A86                 
 3616                                 3A85 60       RTS                        
 3617                                 3A86 8A       TXA                        
 3618                                 3A87 48       PHA                        
 3619                                 3A88 20 22 F8 JSR  _and_rts              
 3620                                 3A8B BC B2 3A LDY  $3AB2,X               
 3621                                 3A8E A9 1E    LDA  #$1E                  
 3622                                 3A90 95 38    STA  $38,X                 
 3623                                 3A92 A9 2A    LDA  #$2A                  
 3624                                 3A94 99 01 02 STA  $0201,Y               
 3625                                 3A97 8A       TXA                        
 3626                                 3A98 09 30    ORA  #$30                  
 3627                                 3A9A 8D C1 3A STA  $3AC1                 
 3628                                 3A9D B5 B0    LDA  $B0,X                 
 3629                                 3A9F AA       TAX                        
 3630                                 3AA0 A0 00    LDY  #$00                  
 3631                                 3AA2 B9 BA 3A LDA  $3ABA,Y               
 3632                                 3AA5 81 C0    STA  ($C0,X)               
 3633                                 3AA7 F0 06    BEQ  $3AAF                 
 3634                                 3AA9 20 D4 3A JSR  $3AD4                 
 3635                                 3AAC C8       INY                        
 3636                                 3AAD D0 F3    BNE  $3AA2                 
 3637                                 3AAF 68       PLA                        
 3638                                 3AB0 AA       TAX                        
 3639                                 3AB1 60       RTS                        
 3640                                 3AB2 00       BRK                        
 3641                                 3AB3 20 40 60 JSR  $6040                 
 3642                                 3AB6 80       ???                        
 3643                                 3AB7 A0 C0    LDY  #$C0                  
 3644                                 3AB9 E0 A8    CPX  #$A8                  
 3645                                 3ABB 8D 2D 2D STA  $2D2D                 
 3646                                 3ABE 3E 20 23 ROL  $2320,X               
 3647                                 3AC1 30 20    BMI  $3AE3                 
 3648                                 3AC3 43       ???                        
 3649                                 3AC4 75 74    ADC  $74,X                 
 3650                                 3AC6 20 69 6E JSR  $6E69                 
 3651                                 3AC9 20 33 30 JSR  $3033                 
 3652                                 3ACC 20 73 65 JSR  $6573                 
 3653                                 3ACF 63       ???                        
 3654                                 3AD0 0D 00 81 ORA  $8100                 
 3655                                 3AD3 C0 F6    CPY  #$F6                  
 3656                                 3AD5 C0 D0    CPY  #$D0                  
 3657                                 3AD7 0D F6 C1 ORA  $C1F6                 
 3658                                 3ADA B5 C1    LDA  $C1,X                 
 3659                                 3ADC 24 08    BIT  $08                   
 3660                                 3ADE D0 05    BNE  $3AE5                 
 3661                                 3AE0 38       SEC                        
 3662                                 3AE1 E9 10    SBC  #$10                  
 3663                                 3AE3 95 C1    STA  $C1,X                 
 3664                                 3AE5 60       RTS                        
 3665                                 3AE6 84 10    STY  $10                   
 3666                                 3AE8 24 D0    BIT  $D0                   
 3667                                 3AEA 10 0E    BPL  $3AFA                 
 3668                                 3AEC 84 D0    STY  $D0                   
 3669                                 3AEE 46 58    LSR  $58                   
 3670                                 3AF0 AD 0C 29 LDA  $290C                 
 3671                                 3AF3 85 70    STA  $70                   
 3672                                 3AF5 AD 0D 29 LDA  $290D                 
 3673                                 3AF8 85 78    STA  $78                   
 3674                              *
 3675                              * command entered on console keyboard !
 3676                                 3AFA AD 01 08 LDA  $0801                 ; load keyboard buffer byte offset +1
 3677                                 3AFD C9 3F    CMP  #$3F                  ; /?
 3678                                 3AFF D0 04    BNE  $3B05                 
 3679                                 3B01 A0 06    LDY  #$06                  
 3680                                 3B03 D0 18    BNE  $3B1D                 
 3681                                 3B05 A2 08    LDX  #$08                  
 3682                                 3B07 29 5F    AND  #$5F                  ; character mask 0011 1111
 3683                                 3B09 C9 54    CMP  #$54                  ; /T
 3684                                 3B0B D0 13    BNE  $3B20                 
 3685                                 3B0D AD 02 08 LDA  $0802                 ; a = load inbuf + 2 offset (/tX which channel to select)
 3686                                 3B10 CD 15 58 CMP  $5815                 ; cmp against $5815 (??? it's 00 on startup - see 3cb6)
 3687                                 3B13 F0 08    BEQ  $3B1D                 ; branch if so (never branch so far???)
 3688                                 3B15 A0 00    LDY  #$00                  ; y = 0
 3689                                 3B17 AE 03 08 LDX  $0803                 ; x = load inbuf + 3 offset (/tnX) to move someone else (or self-move if 0x0d)
 3690                                 3B1A 20 21 28 JSR  tune_command          ; call /t command
 3691                                 3B1D 4C 70 3C JMP  cmdcon_finalize_2     ; jmp and output
 3692                                 3B20 C9 48    CMP  #$48                  ; /H
 3693                                 3B22 D0 0F    BNE  $3B33                 
 3694                                 3B24 20 95 25 JSR  handle_command        
 3695                                 3B27 24 20    BIT  $20                   
 3696                                 3B29 30 F2    BMI  $3B1D                 
 3697                                 3B2B 38       SEC                        
 3698                                 3B2C AA       TAX                        
 3699                                 3B2D 20 06 F8 JSR  $F806                 
 3700                                 3B30 4C 70 3C JMP  cmdcon_finalize_2     
 3701                                 3B33 C9 53    CMP  #$53                  ; /S
 3702                                 3B35 D0 0B    BNE  $3B42                 
 3703                                 3B37 A9 00    LDA  #$00                  
 3704                                 3B39 AE 02 08 LDX  $0802                 
 3705                                 3B3C 20 99 56 JSR  $5699                 
 3706                                 3B3F 4C 70 3C JMP  cmdcon_finalize_2     
 3707                                 3B42 C9 45    CMP  #$45                  ; /E
 3708                                 3B44 D0 08    BNE  $3B4E                 
 3709                                 3B46 A9 00    LDA  #$00                  
 3710                                 3B48 20 00 F8 JSR  $F800                 
 3711                                 3B4B 4C 70 3C JMP  cmdcon_finalize_2     
 3712                                 3B4E C9 42    CMP  #$42                  ; /B
 3713                                 3B50 D0 05    BNE  $3B57                 
 3714                                 3B52 20 65 27 JSR  $2765                 
 3715                                 3B55 D0 F4    BNE  $3B4B                 
 3716                                 3B57 C9 4C    CMP  #$4C                  ; /L
 3717                                 3B59 D0 20    BNE  $3B7B                 
 3718                                 3B5B AD 80 04 LDA  cons_line2/line0channel 
 3719                                 3B5E 29 7F    AND  #$7F                  
 3720                                 3B60 8D 80 04 STA  cons_line2/line0channel 
 3721                                 3B63 AD 02 08 LDA  $0802                 
 3722                                 3B66 29 5F    AND  #$5F                  
 3723                                 3B68 C9 47    CMP  #$47                  
 3724                                 3B6A D0 0C    BNE  $3B78                 
 3725                                 3B6C A9 A0    LDA  #$A0                  
 3726                                 3B6E 2C 88 04 BIT  cons_status           
 3727                                 3B71 10 02    BPL  $3B75                 
 3728                                 3B73 A9 07    LDA  #$07                  
 3729                                 3B75 8D 88 04 STA  cons_status           
 3730                                 3B78 4C 70 3C JMP  cmdcon_finalize_2     
 3731                                 3B7B C9 52    CMP  #$52                  ; /R
 3732                                 3B7D D0 06    BNE  $3B85                 
 3733                                 3B7F 20 4A 22 JSR  $224A                 
 3734                                 3B82 4C 70 3C JMP  cmdcon_finalize_2     
 3735                                 3B85 C9 50    CMP  #$50                  ; /P
 3736                                 3B87 D0 48    BNE  $3BD1                 
 3737                                 3B89 AD 02 08 LDA  $0802                 
 3738                                 3B8C 49 30    EOR  #$30                  
 3739                                 3B8E 29 DF    AND  #$DF                  
 3740                                 3B90 A8       TAY                        
 3741                                 3B91 F0 0C    BEQ  $3B9F                 
 3742                                 3B93 C9 43    CMP  #$43                  
 3743                                 3B95 F0 18    BEQ  $3BAF                 
 3744                                 3B97 C9 08    CMP  #$08                  
 3745                                 3B99 B0 28    BCS  $3BC3                 
 3746                                 3B9B B6 18    LDX  $18,Y                 
 3747                                 3B9D 10 27    BPL  $3BC6                 
 3748                                 3B9F 0A       ASL  A                     
 3749                                 3BA0 0A       ASL  A                     
 3750                                 3BA1 0A       ASL  A                     
 3751                                 3BA2 AA       TAX                        
 3752                                 3BA3 AD 03 08 LDA  $0803                 
 3753                                 3BA6 C9 7E    CMP  #$7E                  
 3754                                 3BA8 F0 05    BEQ  $3BAF                 
 3755                                 3BAA BD 00 01 LDA  $0100,X               
 3756                                 3BAD D0 1A    BNE  $3BC9                 
 3757                                 3BAF A2 D1    LDX  #$D1                  
 3758                                 3BB1 8E 0C 29 STX  $290C                 
 3759                                 3BB4 A9 57    LDA  #$57                  
 3760                                 3BB6 8D 0D 29 STA  $290D                 
 3761                                 3BB9 A2 08    LDX  #$08                  
 3762                                 3BBB 20 96 20 JSR  $2096                 
 3763                                 3BBE B0 03    BCS  $3BC3                 
 3764                                 3BC0 4C E4 50 JMP  $50E4                 
 3765                                 3BC3 A0 16    LDY  #$16                  
 3766                                 3BC5 2C A0 18 BIT  $18A0                 
 3767                                 3BC8 2C A0 1C BIT  $1CA0                 
 3768                                 3BCB 2C A0 08 BIT  $08A0                 
 3769                                 3BCE 4C 70 3C JMP  cmdcon_finalize_2     
 3770                                 3BD1 C9 49    CMP  #$49                  ; /I
 3771                                 3BD3 D0 06    BNE  $3BDB                 
 3772                                 3BD5 20 FC 27 JSR  instructions_command  
 3773                                 3BD8 4C 70 3C JMP  cmdcon_finalize_2     
 3774                                 3BDB C9 44    CMP  #$44                  ; /D
 3775                                 3BDD D0 1E    BNE  $3BFD                 
 3776                                 3BDF AD 02 08 LDA  $0802                 
 3777                                 3BE2 29 5F    AND  #$5F                  
 3778                                 3BE4 A0 01    LDY  #$01                  
 3779                                 3BE6 A2 80    LDX  #$80                  
 3780                                 3BE8 C9 53    CMP  #$53                  
 3781                                 3BEA F0 05    BEQ  $3BF1                 
 3782                                 3BEC 88       DEY                        
 3783                                 3BED B0 02    BCS  $3BF1                 
 3784                                 3BEF A2 40    LDX  #$40                  
 3785                                 3BF1 8A       TXA                        
 3786                                 3BF2 59 CB 7F EOR  $7FCB,Y               
 3787                                 3BF5 99 CB 7F STA  $7FCB,Y               
 3788                                 3BF8 20 6D 27 JSR  $276D                 
 3789                                 3BFB D0 DB    BNE  $3BD8                 
 3790                                 3BFD C9 46    CMP  #$46                  ; /F
 3791                                 3BFF D0 08    BNE  $3C09                 
 3792                                 3C01 AD 02 08 LDA  $0802                 
 3793                                 3C04 20 F3 26 JSR  $26F3                 
 3794                                 3C07 D0 CF    BNE  $3BD8                 
 3795                                 3C09 C9 4E    CMP  #$4E                  ; /N
 3796                                 3C0B D0 0C    BNE  $3C19                 
 3797                                 3C0D A9 51    LDA  #$51                  
 3798                                 3C0F 8D 0A 3C STA  $3C0A                 
 3799                                 3C12 18       CLC                        
 3800                                 3C13 20 0B 60 JSR  $600B                 
 3801                                 3C16 4C 70 3C JMP  cmdcon_finalize_2     
 3802                                 3C19 C9 4B    CMP  #$4B                  ; /K
 3803                                 3C1B F0 08    BEQ  check_valid_line      
 3804                                 3C1D C9 56    CMP  #$56                  ; /V
 3805                                 3C1F F0 04    BEQ  check_valid_line      
 3806                                 3C21 C9 47    CMP  #$47                  ; /G
 3807                                 3C23 D0 0E    BNE  $3C33                 
 3808                              check_valid_line
 3809                                 3C25 A2 00    LDX  #$00                  
 3810                                 3C27 AC 02 08 LDY  $0802                 
 3811                                 3C2A 2C 03 08 BIT  $0803                 
 3812                                 3C2D 20 03 57 JSR  $5703                 
 3813                                 3C30 4C 70 3C JMP  cmdcon_finalize_2     
 3814                                 3C33 C9 58    CMP  #$58                  ; /X
 3815                                 3C35 D0 05    BNE  $3C3C                 
 3816                                 3C37 20 E7 24 JSR  $24E7                 
 3817                                 3C3A D0 F4    BNE  $3C30                 
 3818                                 3C3C C9 5A    CMP  #$5A                  ; /Z
 3819                                 3C3E F0 05    BEQ  $3C45                 
 3820                                 3C40 C9 4D    CMP  #$4D                  ; /M
 3821                                 3C42 D0 0B    BNE  $3C4F                 
 3822                                 3C44 18       CLC                        
 3823                                 3C45 A9 08    LDA  #$08                  
 3824                                 3C47 A6 20    LDX  $20                   
 3825                                 3C49 20 FE 23 JSR  mslot_command         
 3826                                 3C4C 4C 70 3C JMP  cmdcon_finalize_2     
 3827                                 3C4F C9 55    CMP  #$55                  ; /U
 3828                                 3C51 D0 06    BNE  $3C59                 
 3829                                 3C53 20 06 58 JSR  $5806                 
 3830                                 3C56 4C 70 3C JMP  cmdcon_finalize_2     
 3831                                 3C59 C9 43    CMP  #$43                  ; /C
 3832                                 3C5B D0 0A    BNE  $3C67                 
 3833                                 3C5D AD 02 08 LDA  $0802                 
 3834                                 3C60 20 1E 27 JSR  $271E                 
 3835                                 3C63 D0 0B    BNE  cmdcon_finalize_2     
 3836                                 3C65 A9 43    LDA  #$43                  
 3837                                 3C67 A0 04    LDY  #$04                  
 3838                                 3C69 24 20    BIT  $20                   
 3839                                 3C6B 30 03    BMI  cmdcon_finalize_2     
 3840                                 3C6D 20 13 53 JSR  cons_key_2            
 3841                              cmdcon_finalize_2
 3842                                 3C70 B9 11 60 LDA  $6011,Y               
 3843                                 3C73 8D 0C 29 STA  $290C                 
 3844                                 3C76 B9 12 60 LDA  $6012,Y               
 3845                                 3C79 8D 0D 29 STA  $290D                 
 3846                                 3C7C 4C E1 50 JMP  $50E1                 
 3847                                 3C7F 84 11    STY  $11                   
 3848                                 3C81 24 D1    BIT  $D1                   
 3849                                 3C83 10 0E    BPL  $3C93                 
 3850                                 3C85 84 D1    STY  $D1                   
 3851                                 3C87 46 59    LSR  $59                   
 3852                                 3C89 AD 0B 2B LDA  $2B0B                 
 3853                                 3C8C 85 71    STA  $71                   
 3854                                 3C8E AD 0C 2B LDA  $2B0C                 
 3855                                 3C91 85 79    STA  $79                   
 3856                                 3C93 AD 01 09 LDA  $0901                 
 3857                                 3C96 C9 3F    CMP  #$3F                  
 3858                                 3C98 D0 04    BNE  $3C9E                 
 3859                                 3C9A A0 06    LDY  #$06                  
 3860                                 3C9C D0 25    BNE  $3CC3                 
 3861                                 3C9E A2 09    LDX  #$09                  
 3862                                 3CA0 20 4B 25 JSR  $254B                 
 3863                                 3CA3 8C F9 3D STY  $3DF9                 
 3864                                 3CA6 B0 1B    BCS  $3CC3                 
 3865                              *
 3866                              * modem command search!
 3867                                 3CA8 C9 54    CMP  #$54                  ; /T
 3868                                 3CAA D0 1A    BNE  $3CC6                 
 3869                                 3CAC A0 08    LDY  #$08                  ; y = 8 (offset to 'ReqPW' if check below fails)
 3870                                 3CAE AD 79 7F LDA  $7F79                 ; a = $7f79 (0 on startup / a moe, ff when valid to /t)
 3871                                 3CB1 10 10    BPL  $3CC3                 ; branch if credentials fail
 3872                                 3CB3 AD 02 09 LDA  $0902                 ; a = $0902 inbuf + 2 offset (/tX)  !!! is this self modifying? check for 3cb5)
 3873                                 3CB6 CD 1D 58 CMP  $581D                 ; cmp against $581d (is 0) (??? that's +8 from console /t, whats up with that?)
 3874                                 3CB9 F0 08    BEQ  $3CC3                 ; branch if equal
 3875                                 3CBB A0 01    LDY  #$01                  ; y = 1 (pre load with offset to 'BadChan#')
 3876                                 3CBD AE 03 09 LDX  $0903                 ; x = inbuf+3 (/tnX)
 3877                                 3CC0 20 21 28 JSR  tune_command          ; call /t command
 3878                                 3CC3 4C F8 3D JMP  cmdmodem_finalize_2   ; jmp and output
 3879                                 3CC6 C9 48    CMP  #$48                  ; /H
 3880                                 3CC8 D0 05    BNE  $3CCF                 
 3881                                 3CCA 20 95 25 JSR  handle_command        
 3882                                 3CCD F0 F4    BEQ  $3CC3                 
 3883                                 3CCF C9 53    CMP  #$53                  ; /S
 3884                                 3CD1 D0 0B    BNE  $3CDE                 
 3885                                 3CD3 A9 01    LDA  #$01                  
 3886                                 3CD5 AE 02 09 LDX  $0902                 
 3887                                 3CD8 20 99 56 JSR  $5699                 
 3888                                 3CDB 4C F8 3D JMP  cmdmodem_finalize_2   
 3889                                 3CDE C9 45    CMP  #$45                  ; /E
 3890                                 3CE0 D0 08    BNE  $3CEA                 
 3891                                 3CE2 A9 01    LDA  #$01                  
 3892                                 3CE4 20 00 F8 JSR  $F800                 
 3893                                 3CE7 4C F8 3D JMP  cmdmodem_finalize_2   
 3894                                 3CEA C9 57    CMP  #$57                  ; /W
 3895                                 3CEC D0 05    BNE  $3CF3                 
 3896                                 3CEE 20 0D 26 JSR  $260D                 
 3897                                 3CF1 90 F4    BCC  $3CE7                 
 3898                                 3CF3 C9 42    CMP  #$42                  ; /B
 3899                                 3CF5 D0 05    BNE  $3CFC                 
 3900                                 3CF7 20 65 27 JSR  $2765                 
 3901                                 3CFA D0 EB    BNE  $3CE7                 
 3902                                 3CFC C9 4C    CMP  #$4C                  ; /L
 3903                                 3CFE D0 06    BNE  $3D06                 
 3904                                 3D00 20 0F 28 JSR  $280F                 
 3905                                 3D03 4C F8 3D JMP  cmdmodem_finalize_2   
 3906                                 3D06 C9 52    CMP  #$52                  ; /R
 3907                                 3D08 D0 06    BNE  $3D10                 
 3908                                 3D0A 20 4A 22 JSR  $224A                 
 3909                                 3D0D 4C F8 3D JMP  cmdmodem_finalize_2   
 3910                                 3D10 C9 50    CMP  #$50                  ; /P
 3911                                 3D12 D0 65    BNE  $3D79                 
 3912                                 3D14 AD 02 09 LDA  $0902                 
 3913                                 3D17 49 30    EOR  #$30                  
 3914                                 3D19 29 DF    AND  #$DF                  
 3915                                 3D1B A8       TAY                        
 3916                                 3D1C F0 0C    BEQ  $3D2A                 
 3917                                 3D1E C9 43    CMP  #$43                  
 3918                                 3D20 F0 30    BEQ  $3D52                 
 3919                                 3D22 C9 08    CMP  #$08                  
 3920                                 3D24 B0 45    BCS  $3D6B                 
 3921                                 3D26 B6 18    LDX  $18,Y                 
 3922                                 3D28 10 44    BPL  $3D6E                 
 3923                                 3D2A 0A       ASL  A                     
 3924                                 3D2B 0A       ASL  A                     
 3925                                 3D2C 0A       ASL  A                     
 3926                                 3D2D AA       TAX                        
 3927                                 3D2E AD 03 09 LDA  $0903                 
 3928                                 3D31 C9 7E    CMP  #$7E                  
 3929                                 3D33 F0 1D    BEQ  $3D52                 
 3930                                 3D35 BD 01 01 LDA  $0101,X               
 3931                                 3D38 D0 37    BNE  $3D71                 
 3932                                 3D3A AD 79 7F LDA  $7F79                 
 3933                                 3D3D 30 13    BMI  $3D52                 
 3934                                 3D3F AD E3 F7 LDA  $F7E3                 
 3935                                 3D42 19 B8 00 ORA  $00B8,Y               
 3936                                 3D45 30 2D    BMI  $3D74                 
 3937                                 3D47 86 00    STX  $00                   
 3938                                 3D49 98       TYA                        
 3939                                 3D4A 65 00    ADC  $00                   
 3940                                 3D4C AA       TAX                        
 3941                                 3D4D BD 00 01 LDA  $0100,X               
 3942                                 3D50 D0 1F    BNE  $3D71                 
 3943                                 3D52 A2 D1    LDX  #$D1                  
 3944                                 3D54 A5 B9    LDA  $B9                   
 3945                                 3D56 10 01    BPL  $3D59                 
 3946                                 3D58 CA       DEX                        
 3947                                 3D59 8E 0B 2B STX  $2B0B                 
 3948                                 3D5C A9 57    LDA  #$57                  
 3949                                 3D5E 8D 0C 2B STA  $2B0C                 
 3950                                 3D61 A2 09    LDX  #$09                  
 3951                                 3D63 20 96 20 JSR  $2096                 
 3952                                 3D66 B0 03    BCS  $3D6B                 
 3953                                 3D68 4C 62 47 JMP  $4762                 
 3954                                 3D6B A0 16    LDY  #$16                  
 3955                                 3D6D 2C A0 18 BIT  $18A0                 
 3956                                 3D70 2C A0 1C BIT  $1CA0                 
 3957                                 3D73 2C A0 08 BIT  $08A0                 
 3958                                 3D76 4C F8 3D JMP  cmdmodem_finalize_2   
 3959                                 3D79 C9 49    CMP  #$49                  ; /I
 3960                                 3D7B D0 06    BNE  $3D83                 
 3961                                 3D7D 20 FC 27 JSR  instructions_command  
 3962                                 3D80 4C F8 3D JMP  cmdmodem_finalize_2   
 3963                                 3D83 C9 44    CMP  #$44                  ; /D
 3964                                 3D85 D0 05    BNE  $3D8C                 
 3965                                 3D87 20 18 28 JSR  $2818                 
 3966                                 3D8A D0 F4    BNE  $3D80                 
 3967                                 3D8C C9 46    CMP  #$46                  ; /F
 3968                                 3D8E D0 08    BNE  $3D98                 
 3969                                 3D90 AD 02 09 LDA  $0902                 
 3970                                 3D93 20 F3 26 JSR  $26F3                 
 3971                                 3D96 D0 E8    BNE  $3D80                 
 3972                                 3D98 C9 51    CMP  #$51                  ; /Q
 3973                                 3D9A D0 0E    BNE  $3DAA                 
 3974                                 3D9C 20 0B 60 JSR  $600B                 
 3975                                 3D9F B0 04    BCS  $3DA5                 
 3976                                 3DA1 8E 23 02 STX  $0223                 
 3977                                 3DA4 2C 84 91 BIT  $9184                 
 3978                                 3DA7 4C F8 3D JMP  cmdmodem_finalize_2   
 3979                                 3DAA C9 4B    CMP  #$4B                  ; /K
 3980                                 3DAC F0 08    BEQ  $3DB6                 
 3981                                 3DAE C9 56    CMP  #$56                  ; /V
 3982                                 3DB0 F0 04    BEQ  $3DB6                 
 3983                                 3DB2 C9 47    CMP  #$47                  ; /G
 3984                                 3DB4 D0 0E    BNE  $3DC4                 
 3985                                 3DB6 A2 01    LDX  #$01                  
 3986                                 3DB8 AC 02 09 LDY  $0902                 
 3987                                 3DBB 2C 03 09 BIT  $0903                 
 3988                                 3DBE 20 03 57 JSR  $5703                 
 3989                                 3DC1 4C F8 3D JMP  cmdmodem_finalize_2   
 3990                                 3DC4 C9 58    CMP  #$58                  ; /X
 3991                                 3DC6 D0 05    BNE  $3DCD                 
 3992                                 3DC8 20 E7 24 JSR  $24E7                 
 3993                                 3DCB D0 F4    BNE  $3DC1                 
 3994                                 3DCD C9 5A    CMP  #$5A                  ; /Z
 3995                                 3DCF F0 05    BEQ  $3DD6                 
 3996                                 3DD1 C9 4D    CMP  #$4D                  ; /M
 3997                                 3DD3 D0 0B    BNE  $3DE0                 
 3998                                 3DD5 18       CLC                        
 3999                                 3DD6 A9 09    LDA  #$09                  
 4000                                 3DD8 A6 21    LDX  $21                   
 4001                                 3DDA 20 FE 23 JSR  mslot_command         ; check command for /mm=  and valid/invalid entry, setup parameters
 4002                                 3DDD 4C F8 3D JMP  cmdmodem_finalize_2   ; continue execution ahead
 4003                                 3DE0 C9 55    CMP  #$55                  ; /U
 4004                                 3DE2 D0 06    BNE  $3DEA                 
 4005                                 3DE4 20 06 58 JSR  $5806                 
 4006                                 3DE7 4C F8 3D JMP  cmdmodem_finalize_2   
 4007                                 3DEA C9 43    CMP  #$43                  ; /C
 4008                                 3DEC D0 08    BNE  $3DF6                 
 4009                                 3DEE AD 02 09 LDA  $0902                 
 4010                                 3DF1 20 1E 27 JSR  $271E                 
 4011                                 3DF4 D0 02    BNE  cmdmodem_finalize_2   
 4012                                 3DF6 A0 04    LDY  #$04                  
 4013                              cmdmodem_finalize_2
 4014                                 3DF8 A9 00    LDA  #$00                  ; (useless) blown away below
 4015                                 3DFA F0 01    BEQ  cmdmodem_finalize_3   ; always branch
 4016                                 3DFC A8       TAY                        ; set y to 0 ("done") - never reached
 4017                              *
 4018                              * table at 6011 contains mslots, error codes, etc. y is offset to this table
 4019                              * 6dd0 6dda 6ded 6e0a  6f84 1000 6f9b 6fae    Done BadChanNo NotACmd /?  ReqPW ???? MustBe2099 BeepsOn
 4020                              * 
 4021                              cmdmodem_finalize_3
 4022                                 3DFD B9 11 60 LDA  $6011,Y               ; low byte at table $6011
 4023                                 3E00 8D 0B 2B STA  $2B0B                 ; store into $2b0b           (!!! is this self modifying ? look for stores to 3e01/3e02)
 4024                                 3E03 B9 12 60 LDA  $6012,Y               ; high byte of table
 4025                                 3E06 8D 0C 2B STA  $2B0C                 ; store                      ( 3e07/3e08  )
 4026                                 3E09 4C 5F 47 JMP  $475F                 ; all done. something must happen now with the output routines with these newly set variables
 4027                 t11             3E0C 84 12    STY  $12                   
 4028                 t11             3E0E 24 D2    BIT  $D2                   
 4029                 t11             3E10 10 0E    BPL  $3E20                 
 4030                 t11             3E12 84 D2    STY  $D2                   
 4031                 t11             3E14 46 5A    LSR  $5A                   
 4032                 t11             3E16 AD 28 2D LDA  $2D28                 
 4033                 t11             3E19 85 72    STA  $72                   
 4034                 t11             3E1B AD 29 2D LDA  $2D29                 
 4035                 t11             3E1E 85 7A    STA  $7A                   
 4036                 t11             3E20 AD 01 0A LDA  $0A01                 
 4037                 t11             3E23 C9 3F    CMP  #$3F                  
 4038                 t11             3E25 D0 04    BNE  $3E2B                 
 4039                                 3E27 A0 06    LDY  #$06                  
 4040                                 3E29 D0 25    BNE  $3E50                 
 4041                 t11             3E2B A2 0A    LDX  #$0A                  
 4042                 t11             3E2D 20 4B 25 JSR  $254B                 
 4043                 t11             3E30 8C 86 3F STY  $3F86                 
 4044                 t11             3E33 B0 1B    BCS  $3E50                 
 4045                 t11             3E35 C9 54    CMP  #$54                  
 4046                 t11             3E37 D0 1A    BNE  $3E53                 
 4047                 t11             3E39 A0 08    LDY  #$08                  
 4048                 t11             3E3B AD 7A 7F LDA  $7F7A                 
 4049                 t11             3E3E 10 10    BPL  $3E50                 
 4050                                 3E40 AD 02 0A LDA  $0A02                 
 4051                                 3E43 CD 25 58 CMP  $5825                 
 4052                                 3E46 F0 08    BEQ  $3E50                 
 4053                                 3E48 A0 02    LDY  #$02                  
 4054                                 3E4A AE 03 0A LDX  $0A03                 
 4055                                 3E4D 20 21 28 JSR  tune_command          
 4056                 t11             3E50 4C 85 3F JMP  $3F85                 
 4057                                 3E53 C9 48    CMP  #$48                  
 4058                                 3E55 D0 05    BNE  $3E5C                 
 4059                                 3E57 20 95 25 JSR  handle_command        
 4060                                 3E5A F0 F4    BEQ  $3E50                 
 4061                                 3E5C C9 53    CMP  #$53                  
 4062                                 3E5E D0 0B    BNE  $3E6B                 
 4063                                 3E60 A9 02    LDA  #$02                  
 4064                                 3E62 AE 02 0A LDX  $0A02                 
 4065                                 3E65 20 99 56 JSR  $5699                 
 4066                                 3E68 4C 85 3F JMP  $3F85                 
 4067                                 3E6B C9 45    CMP  #$45                  
 4068                                 3E6D D0 08    BNE  $3E77                 
 4069                                 3E6F A9 02    LDA  #$02                  
 4070                                 3E71 20 00 F8 JSR  $F800                 
 4071                                 3E74 4C 85 3F JMP  $3F85                 
 4072                                 3E77 C9 57    CMP  #$57                  
 4073                                 3E79 D0 05    BNE  $3E80                 
 4074                                 3E7B 20 0D 26 JSR  $260D                 
 4075                                 3E7E 90 F4    BCC  $3E74                 
 4076                                 3E80 C9 42    CMP  #$42                  
 4077                                 3E82 D0 05    BNE  $3E89                 
 4078                                 3E84 20 65 27 JSR  $2765                 
 4079                                 3E87 D0 EB    BNE  $3E74                 
 4080                                 3E89 C9 4C    CMP  #$4C                  
 4081                                 3E8B D0 06    BNE  $3E93                 
 4082                                 3E8D 20 0F 28 JSR  $280F                 
 4083                                 3E90 4C 85 3F JMP  $3F85                 
 4084                                 3E93 C9 52    CMP  #$52                  
 4085                                 3E95 D0 06    BNE  $3E9D                 
 4086                                 3E97 20 4A 22 JSR  $224A                 
 4087                                 3E9A 4C 85 3F JMP  $3F85                 
 4088                                 3E9D C9 50    CMP  #$50                  
 4089                                 3E9F D0 65    BNE  $3F06                 
 4090                                 3EA1 AD 02 0A LDA  $0A02                 
 4091                                 3EA4 49 30    EOR  #$30                  
 4092                                 3EA6 29 DF    AND  #$DF                  
 4093                                 3EA8 A8       TAY                        
 4094                                 3EA9 F0 0C    BEQ  $3EB7                 
 4095                                 3EAB C9 43    CMP  #$43                  
 4096                                 3EAD F0 30    BEQ  $3EDF                 
 4097                                 3EAF C9 08    CMP  #$08                  
 4098                                 3EB1 B0 45    BCS  $3EF8                 
 4099                                 3EB3 B6 18    LDX  $18,Y                 
 4100                                 3EB5 10 44    BPL  $3EFB                 
 4101                                 3EB7 0A       ASL  A                     
 4102                                 3EB8 0A       ASL  A                     
 4103                                 3EB9 0A       ASL  A                     
 4104                                 3EBA AA       TAX                        
 4105                                 3EBB AD 03 0A LDA  $0A03                 
 4106                                 3EBE C9 7E    CMP  #$7E                  
 4107                                 3EC0 F0 1D    BEQ  $3EDF                 
 4108                                 3EC2 BD 02 01 LDA  $0102,X               
 4109                                 3EC5 D0 37    BNE  $3EFE                 
 4110                                 3EC7 AD 7A 7F LDA  $7F7A                 
 4111                                 3ECA 30 13    BMI  $3EDF                 
 4112                                 3ECC AD E3 F7 LDA  $F7E3                 
 4113                                 3ECF 19 B8 00 ORA  $00B8,Y               
 4114                                 3ED2 30 2D    BMI  $3F01                 
 4115                                 3ED4 86 00    STX  $00                   
 4116                                 3ED6 98       TYA                        
 4117                                 3ED7 65 00    ADC  $00                   
 4118                                 3ED9 AA       TAX                        
 4119                                 3EDA BD 00 01 LDA  $0100,X               
 4120                                 3EDD D0 1F    BNE  $3EFE                 
 4121                                 3EDF A2 D1    LDX  #$D1                  
 4122                                 3EE1 A5 BA    LDA  $BA                   
 4123                                 3EE3 10 01    BPL  $3EE6                 
 4124                                 3EE5 CA       DEX                        
 4125                                 3EE6 8E 28 2D STX  $2D28                 
 4126                                 3EE9 A9 57    LDA  #$57                  
 4127                                 3EEB 8D 29 2D STA  $2D29                 
 4128                                 3EEE A2 0A    LDX  #$0A                  
 4129                                 3EF0 20 96 20 JSR  $2096                 
 4130                                 3EF3 B0 03    BCS  $3EF8                 
 4131                                 3EF5 4C BD 48 JMP  $48BD                 
 4132                                 3EF8 A0 16    LDY  #$16                  
 4133                                 3EFA 2C A0 18 BIT  $18A0                 
 4134                                 3EFD 2C A0 1C BIT  $1CA0                 
 4135                                 3F00 2C A0 08 BIT  $08A0                 
 4136                                 3F03 4C 85 3F JMP  $3F85                 
 4137                                 3F06 C9 49    CMP  #$49                  
 4138                                 3F08 D0 06    BNE  $3F10                 
 4139                                 3F0A 20 FC 27 JSR  instructions_command  
 4140                                 3F0D 4C 85 3F JMP  $3F85                 
 4141                                 3F10 C9 44    CMP  #$44                  
 4142                                 3F12 D0 05    BNE  $3F19                 
 4143                                 3F14 20 18 28 JSR  $2818                 
 4144                                 3F17 D0 F4    BNE  $3F0D                 
 4145                                 3F19 C9 46    CMP  #$46                  
 4146                                 3F1B D0 08    BNE  $3F25                 
 4147                                 3F1D AD 02 0A LDA  $0A02                 
 4148                                 3F20 20 F3 26 JSR  $26F3                 
 4149                                 3F23 D0 E8    BNE  $3F0D                 
 4150                                 3F25 C9 51    CMP  #$51                  
 4151                                 3F27 D0 0E    BNE  $3F37                 
 4152                                 3F29 20 0B 60 JSR  $600B                 
 4153                                 3F2C B0 04    BCS  $3F32                 
 4154                                 3F2E 8E 43 02 STX  $0243                 
 4155                                 3F31 2C 84 92 BIT  $9284                 
 4156                                 3F34 4C 85 3F JMP  $3F85                 
 4157                                 3F37 C9 4B    CMP  #$4B                  
 4158                                 3F39 F0 08    BEQ  $3F43                 
 4159                                 3F3B C9 56    CMP  #$56                  
 4160                                 3F3D F0 04    BEQ  $3F43                 
 4161                                 3F3F C9 47    CMP  #$47                  
 4162                                 3F41 D0 0E    BNE  $3F51                 
 4163                                 3F43 A2 02    LDX  #$02                  
 4164                                 3F45 AC 02 0A LDY  $0A02                 
 4165                                 3F48 2C 03 0A BIT  $0A03                 
 4166                                 3F4B 20 03 57 JSR  $5703                 
 4167                                 3F4E 4C 85 3F JMP  $3F85                 
 4168                                 3F51 C9 58    CMP  #$58                  
 4169                                 3F53 D0 05    BNE  $3F5A                 
 4170                                 3F55 20 E7 24 JSR  $24E7                 
 4171                                 3F58 D0 F4    BNE  $3F4E                 
 4172                                 3F5A C9 5A    CMP  #$5A                  
 4173                                 3F5C F0 05    BEQ  $3F63                 
 4174                                 3F5E C9 4D    CMP  #$4D                  
 4175                                 3F60 D0 0B    BNE  $3F6D                 
 4176                                 3F62 18       CLC                        
 4177                                 3F63 A9 0A    LDA  #$0A                  
 4178                                 3F65 A6 22    LDX  $22                   
 4179                                 3F67 20 FE 23 JSR  mslot_command         
 4180                                 3F6A 4C 85 3F JMP  $3F85                 
 4181                                 3F6D C9 55    CMP  #$55                  
 4182                                 3F6F D0 06    BNE  $3F77                 
 4183                                 3F71 20 06 58 JSR  $5806                 
 4184                                 3F74 4C 85 3F JMP  $3F85                 
 4185                                 3F77 C9 43    CMP  #$43                  
 4186                                 3F79 D0 08    BNE  $3F83                 
 4187                                 3F7B AD 02 0A LDA  $0A02                 
 4188                                 3F7E 20 1E 27 JSR  $271E                 
 4189                                 3F81 D0 02    BNE  $3F85                 
 4190                                 3F83 A0 04    LDY  #$04                  
 4191                 t11             3F85 A9 00    LDA  #$00                  
 4192                 t11             3F87 F0 01    BEQ  $3F8A                 
 4193                                 3F89 A8       TAY                        
 4194                 t11             3F8A B9 11 60 LDA  $6011,Y               
 4195                 t11             3F8D 8D 28 2D STA  $2D28                 
 4196                 t11             3F90 B9 12 60 LDA  $6012,Y               
 4197                 t11             3F93 8D 29 2D STA  $2D29                 
 4198                 t11             3F96 4C BA 48 JMP  $48BA                 
 4199                                 3F99 84 13    STY  $13                   
 4200                                 3F9B 24 D3    BIT  $D3                   
 4201                                 3F9D 10 0E    BPL  $3FAD                 
 4202                                 3F9F 84 D3    STY  $D3                   
 4203                                 3FA1 46 5B    LSR  $5B                   
 4204                                 3FA3 AD 45 2F LDA  $2F45                 
 4205                                 3FA6 85 73    STA  $73                   
 4206                                 3FA8 AD 46 2F LDA  $2F46                 
 4207                                 3FAB 85 7B    STA  $7B                   
 4208                                 3FAD AD 01 0B LDA  $0B01                 
 4209                                 3FB0 C9 3F    CMP  #$3F                  
 4210                                 3FB2 D0 04    BNE  $3FB8                 
 4211                                 3FB4 A0 06    LDY  #$06                  
 4212                                 3FB6 D0 25    BNE  $3FDD                 
 4213                                 3FB8 A2 0B    LDX  #$0B                  
 4214                                 3FBA 20 4B 25 JSR  $254B                 
 4215                                 3FBD 8C 13 41 STY  $4113                 
 4216                                 3FC0 B0 1B    BCS  $3FDD                 
 4217                                 3FC2 C9 54    CMP  #$54                  
 4218                                 3FC4 D0 1A    BNE  $3FE0                 
 4219                                 3FC6 A0 08    LDY  #$08                  
 4220                                 3FC8 AD 7B 7F LDA  $7F7B                 
 4221                                 3FCB 10 10    BPL  $3FDD                 
 4222                                 3FCD AD 02 0B LDA  $0B02                 
 4223                                 3FD0 CD 2D 58 CMP  $582D                 
 4224                                 3FD3 F0 08    BEQ  $3FDD                 
 4225                                 3FD5 A0 03    LDY  #$03                  
 4226                                 3FD7 AE 03 0B LDX  $0B03                 
 4227                                 3FDA 20 21 28 JSR  tune_command          
 4228                                 3FDD 4C 12 41 JMP  $4112                 
 4229                                 3FE0 C9 48    CMP  #$48                  
 4230                                 3FE2 D0 05    BNE  $3FE9                 
 4231                                 3FE4 20 95 25 JSR  handle_command        
 4232                                 3FE7 F0 F4    BEQ  $3FDD                 
 4233                                 3FE9 C9 53    CMP  #$53                  
 4234                                 3FEB D0 0B    BNE  $3FF8                 
 4235                                 3FED A9 03    LDA  #$03                  
 4236                                 3FEF AE 02 0B LDX  $0B02                 
 4237                                 3FF2 20 99 56 JSR  $5699                 
 4238                                 3FF5 4C 12 41 JMP  $4112                 
 4239                                 3FF8 C9 45    CMP  #$45                  
 4240                                 3FFA D0 08    BNE  $4004                 
 4241                                 3FFC A9 03    LDA  #$03                  
 4242                                 3FFE 20 00 F8 JSR  $F800                 
 4243                                 4001 4C 12 41 JMP  $4112                 
 4244                                 4004 C9 57    CMP  #$57                  
 4245                                 4006 D0 05    BNE  $400D                 
 4246                                 4008 20 0D 26 JSR  $260D                 
 4247                                 400B 90 F4    BCC  $4001                 
 4248                                 400D C9 42    CMP  #$42                  
 4249                                 400F D0 05    BNE  $4016                 
 4250                                 4011 20 65 27 JSR  $2765                 
 4251                                 4014 D0 EB    BNE  $4001                 
 4252                                 4016 C9 4C    CMP  #$4C                  
 4253                                 4018 D0 06    BNE  $4020                 
 4254                                 401A 20 0F 28 JSR  $280F                 
 4255                                 401D 4C 12 41 JMP  $4112                 
 4256                                 4020 C9 52    CMP  #$52                  
 4257                                 4022 D0 06    BNE  $402A                 
 4258                                 4024 20 4A 22 JSR  $224A                 
 4259                                 4027 4C 12 41 JMP  $4112                 
 4260                                 402A C9 50    CMP  #$50                  
 4261                                 402C D0 65    BNE  $4093                 
 4262                                 402E AD 02 0B LDA  $0B02                 
 4263                                 4031 49 30    EOR  #$30                  
 4264                                 4033 29 DF    AND  #$DF                  
 4265                                 4035 A8       TAY                        
 4266                                 4036 F0 0C    BEQ  $4044                 
 4267                                 4038 C9 43    CMP  #$43                  
 4268                                 403A F0 30    BEQ  $406C                 
 4269                                 403C C9 08    CMP  #$08                  
 4270                                 403E B0 45    BCS  $4085                 
 4271                                 4040 B6 18    LDX  $18,Y                 
 4272                                 4042 10 44    BPL  $4088                 
 4273                                 4044 0A       ASL  A                     
 4274                                 4045 0A       ASL  A                     
 4275                                 4046 0A       ASL  A                     
 4276                                 4047 AA       TAX                        
 4277                                 4048 AD 03 0B LDA  $0B03                 
 4278                                 404B C9 7E    CMP  #$7E                  
 4279                                 404D F0 1D    BEQ  $406C                 
 4280                                 404F BD 03 01 LDA  $0103,X               
 4281                                 4052 D0 37    BNE  $408B                 
 4282                                 4054 AD 7B 7F LDA  $7F7B                 
 4283                                 4057 30 13    BMI  $406C                 
 4284                                 4059 AD E3 F7 LDA  $F7E3                 
 4285                                 405C 19 B8 00 ORA  $00B8,Y               
 4286                                 405F 30 2D    BMI  $408E                 
 4287                                 4061 86 00    STX  $00                   
 4288                                 4063 98       TYA                        
 4289                                 4064 65 00    ADC  $00                   
 4290                                 4066 AA       TAX                        
 4291                                 4067 BD 00 01 LDA  $0100,X               
 4292                                 406A D0 1F    BNE  $408B                 
 4293                                 406C A2 D1    LDX  #$D1                  
 4294                                 406E A5 BB    LDA  $BB                   
 4295                                 4070 10 01    BPL  $4073                 
 4296                                 4072 CA       DEX                        
 4297                                 4073 8E 45 2F STX  $2F45                 
 4298                                 4076 A9 57    LDA  #$57                  
 4299                                 4078 8D 46 2F STA  $2F46                 
 4300                                 407B A2 0B    LDX  #$0B                  
 4301                                 407D 20 96 20 JSR  $2096                 
 4302                                 4080 B0 03    BCS  $4085                 
 4303                                 4082 4C 18 4A JMP  $4A18                 
 4304                                 4085 A0 16    LDY  #$16                  
 4305                                 4087 2C A0 18 BIT  $18A0                 
 4306                                 408A 2C A0 1C BIT  $1CA0                 
 4307                                 408D 2C A0 08 BIT  $08A0                 
 4308                                 4090 4C 12 41 JMP  $4112                 
 4309                                 4093 C9 49    CMP  #$49                  
 4310                                 4095 D0 06    BNE  $409D                 
 4311                                 4097 20 FC 27 JSR  instructions_command  
 4312                                 409A 4C 12 41 JMP  $4112                 
 4313                                 409D C9 44    CMP  #$44                  
 4314                                 409F D0 05    BNE  $40A6                 
 4315                                 40A1 20 18 28 JSR  $2818                 
 4316                                 40A4 D0 F4    BNE  $409A                 
 4317                                 40A6 C9 46    CMP  #$46                  
 4318                                 40A8 D0 08    BNE  $40B2                 
 4319                                 40AA AD 02 0B LDA  $0B02                 
 4320                                 40AD 20 F3 26 JSR  $26F3                 
 4321                                 40B0 D0 E8    BNE  $409A                 
 4322                                 40B2 C9 51    CMP  #$51                  
 4323                                 40B4 D0 0E    BNE  $40C4                 
 4324                                 40B6 20 0B 60 JSR  $600B                 
 4325                                 40B9 B0 04    BCS  $40BF                 
 4326                                 40BB 8E 63 02 STX  $0263                 
 4327                                 40BE 2C 84 93 BIT  $9384                 
 4328                                 40C1 4C 12 41 JMP  $4112                 
 4329                                 40C4 C9 4B    CMP  #$4B                  
 4330                                 40C6 F0 08    BEQ  $40D0                 
 4331                                 40C8 C9 56    CMP  #$56                  
 4332                                 40CA F0 04    BEQ  $40D0                 
 4333                                 40CC C9 47    CMP  #$47                  
 4334                                 40CE D0 0E    BNE  $40DE                 
 4335                                 40D0 A2 03    LDX  #$03                  
 4336                                 40D2 AC 02 0B LDY  $0B02                 
 4337                                 40D5 2C 03 0B BIT  $0B03                 
 4338                                 40D8 20 03 57 JSR  $5703                 
 4339                                 40DB 4C 12 41 JMP  $4112                 
 4340                                 40DE C9 58    CMP  #$58                  
 4341                                 40E0 D0 05    BNE  $40E7                 
 4342                                 40E2 20 E7 24 JSR  $24E7                 
 4343                                 40E5 D0 F4    BNE  $40DB                 
 4344                                 40E7 C9 5A    CMP  #$5A                  
 4345                                 40E9 F0 05    BEQ  $40F0                 
 4346                                 40EB C9 4D    CMP  #$4D                  
 4347                                 40ED D0 0B    BNE  $40FA                 
 4348                                 40EF 18       CLC                        
 4349                                 40F0 A9 0B    LDA  #$0B                  
 4350                                 40F2 A6 23    LDX  $23                   
 4351                                 40F4 20 FE 23 JSR  mslot_command         
 4352                                 40F7 4C 12 41 JMP  $4112                 
 4353                                 40FA C9 55    CMP  #$55                  
 4354                                 40FC D0 06    BNE  $4104                 
 4355                                 40FE 20 06 58 JSR  $5806                 
 4356                                 4101 4C 12 41 JMP  $4112                 
 4357                                 4104 C9 43    CMP  #$43                  
 4358                                 4106 D0 08    BNE  $4110                 
 4359                                 4108 AD 02 0B LDA  $0B02                 
 4360                                 410B 20 1E 27 JSR  $271E                 
 4361                                 410E D0 02    BNE  $4112                 
 4362                                 4110 A0 04    LDY  #$04                  
 4363                                 4112 A9 00    LDA  #$00                  
 4364                                 4114 F0 01    BEQ  $4117                 
 4365                                 4116 A8       TAY                        
 4366                                 4117 B9 11 60 LDA  $6011,Y               
 4367                                 411A 8D 45 2F STA  $2F45                 
 4368                                 411D B9 12 60 LDA  $6012,Y               
 4369                                 4120 8D 46 2F STA  $2F46                 
 4370                                 4123 4C 15 4A JMP  $4A15                 
 4371                                 4126 84 14    STY  $14                   
 4372                                 4128 24 D4    BIT  $D4                   
 4373                                 412A 10 0E    BPL  $413A                 
 4374                                 412C 84 D4    STY  $D4                   
 4375                                 412E 46 5C    LSR  $5C                   
 4376                                 4130 AD 62 31 LDA  $3162                 
 4377                                 4133 85 74    STA  $74                   
 4378                                 4135 AD 63 31 LDA  $3163                 
 4379                                 4138 85 7C    STA  $7C                   
 4380                                 413A AD 01 0C LDA  $0C01                 
 4381                                 413D C9 3F    CMP  #$3F                  
 4382                                 413F D0 04    BNE  $4145                 
 4383                                 4141 A0 06    LDY  #$06                  
 4384                                 4143 D0 25    BNE  $416A                 
 4385                                 4145 A2 0C    LDX  #$0C                  
 4386                                 4147 20 4B 25 JSR  $254B                 
 4387                                 414A 8C A0 42 STY  $42A0                 
 4388                                 414D B0 1B    BCS  $416A                 
 4389                                 414F C9 54    CMP  #$54                  
 4390                                 4151 D0 1A    BNE  $416D                 
 4391                                 4153 A0 08    LDY  #$08                  
 4392                                 4155 AD 7C 7F LDA  $7F7C                 
 4393                                 4158 10 10    BPL  $416A                 
 4394                                 415A AD 02 0C LDA  $0C02                 
 4395                                 415D CD 35 58 CMP  $5835                 
 4396                                 4160 F0 08    BEQ  $416A                 
 4397                                 4162 A0 04    LDY  #$04                  
 4398                                 4164 AE 03 0C LDX  $0C03                 
 4399                                 4167 20 21 28 JSR  tune_command          
 4400                                 416A 4C 9F 42 JMP  $429F                 
 4401                                 416D C9 48    CMP  #$48                  
 4402                                 416F D0 05    BNE  $4176                 
 4403                                 4171 20 95 25 JSR  handle_command        
 4404                                 4174 F0 F4    BEQ  $416A                 
 4405                                 4176 C9 53    CMP  #$53                  
 4406                                 4178 D0 0B    BNE  $4185                 
 4407                                 417A A9 04    LDA  #$04                  
 4408                                 417C AE 02 0C LDX  $0C02                 
 4409                                 417F 20 99 56 JSR  $5699                 
 4410                                 4182 4C 9F 42 JMP  $429F                 
 4411                                 4185 C9 45    CMP  #$45                  
 4412                                 4187 D0 08    BNE  $4191                 
 4413                                 4189 A9 04    LDA  #$04                  
 4414                                 418B 20 00 F8 JSR  $F800                 
 4415                                 418E 4C 9F 42 JMP  $429F                 
 4416                                 4191 C9 57    CMP  #$57                  
 4417                                 4193 D0 05    BNE  $419A                 
 4418                                 4195 20 0D 26 JSR  $260D                 
 4419                                 4198 90 F4    BCC  $418E                 
 4420                                 419A C9 42    CMP  #$42                  
 4421                                 419C D0 05    BNE  $41A3                 
 4422                                 419E 20 65 27 JSR  $2765                 
 4423                                 41A1 D0 EB    BNE  $418E                 
 4424                                 41A3 C9 4C    CMP  #$4C                  
 4425                                 41A5 D0 06    BNE  $41AD                 
 4426                                 41A7 20 0F 28 JSR  $280F                 
 4427                                 41AA 4C 9F 42 JMP  $429F                 
 4428                                 41AD C9 52    CMP  #$52                  
 4429                                 41AF D0 06    BNE  $41B7                 
 4430                                 41B1 20 4A 22 JSR  $224A                 
 4431                                 41B4 4C 9F 42 JMP  $429F                 
 4432                                 41B7 C9 50    CMP  #$50                  
 4433                                 41B9 D0 65    BNE  $4220                 
 4434                                 41BB AD 02 0C LDA  $0C02                 
 4435                                 41BE 49 30    EOR  #$30                  
 4436                                 41C0 29 DF    AND  #$DF                  
 4437                                 41C2 A8       TAY                        
 4438                                 41C3 F0 0C    BEQ  $41D1                 
 4439                                 41C5 C9 43    CMP  #$43                  
 4440                                 41C7 F0 30    BEQ  $41F9                 
 4441                                 41C9 C9 08    CMP  #$08                  
 4442                                 41CB B0 45    BCS  $4212                 
 4443                                 41CD B6 18    LDX  $18,Y                 
 4444                                 41CF 10 44    BPL  $4215                 
 4445                                 41D1 0A       ASL  A                     
 4446                                 41D2 0A       ASL  A                     
 4447                                 41D3 0A       ASL  A                     
 4448                                 41D4 AA       TAX                        
 4449                                 41D5 AD 03 0C LDA  $0C03                 
 4450                                 41D8 C9 7E    CMP  #$7E                  
 4451                                 41DA F0 1D    BEQ  $41F9                 
 4452                                 41DC BD 04 01 LDA  $0104,X               
 4453                                 41DF D0 37    BNE  $4218                 
 4454                                 41E1 AD 7C 7F LDA  $7F7C                 
 4455                                 41E4 30 13    BMI  $41F9                 
 4456                                 41E6 AD E3 F7 LDA  $F7E3                 
 4457                                 41E9 19 B8 00 ORA  $00B8,Y               
 4458                                 41EC 30 2D    BMI  $421B                 
 4459                                 41EE 86 00    STX  $00                   
 4460                                 41F0 98       TYA                        
 4461                                 41F1 65 00    ADC  $00                   
 4462                                 41F3 AA       TAX                        
 4463                                 41F4 BD 00 01 LDA  $0100,X               
 4464                                 41F7 D0 1F    BNE  $4218                 
 4465                                 41F9 A2 D1    LDX  #$D1                  
 4466                                 41FB A5 BC    LDA  $BC                   
 4467                                 41FD 10 01    BPL  $4200                 
 4468                                 41FF CA       DEX                        
 4469                                 4200 8E 62 31 STX  $3162                 
 4470                                 4203 A9 57    LDA  #$57                  
 4471                                 4205 8D 63 31 STA  $3163                 
 4472                                 4208 A2 0C    LDX  #$0C                  
 4473                                 420A 20 96 20 JSR  $2096                 
 4474                                 420D B0 03    BCS  $4212                 
 4475                                 420F 4C 73 4B JMP  $4B73                 
 4476                                 4212 A0 16    LDY  #$16                  
 4477                                 4214 2C A0 18 BIT  $18A0                 
 4478                                 4217 2C A0 1C BIT  $1CA0                 
 4479                                 421A 2C A0 08 BIT  $08A0                 
 4480                                 421D 4C 9F 42 JMP  $429F                 
 4481                                 4220 C9 49    CMP  #$49                  
 4482                                 4222 D0 06    BNE  $422A                 
 4483                                 4224 20 FC 27 JSR  instructions_command  
 4484                                 4227 4C 9F 42 JMP  $429F                 
 4485                                 422A C9 44    CMP  #$44                  
 4486                                 422C D0 05    BNE  $4233                 
 4487                                 422E 20 18 28 JSR  $2818                 
 4488                                 4231 D0 F4    BNE  $4227                 
 4489                                 4233 C9 46    CMP  #$46                  
 4490                                 4235 D0 08    BNE  $423F                 
 4491                                 4237 AD 02 0C LDA  $0C02                 
 4492                                 423A 20 F3 26 JSR  $26F3                 
 4493                                 423D D0 E8    BNE  $4227                 
 4494                                 423F C9 51    CMP  #$51                  
 4495                                 4241 D0 0E    BNE  $4251                 
 4496                                 4243 20 0B 60 JSR  $600B                 
 4497                                 4246 B0 04    BCS  $424C                 
 4498                                 4248 8E 83 02 STX  $0283                 
 4499                                 424B 2C 84 94 BIT  $9484                 
 4500                                 424E 4C 9F 42 JMP  $429F                 
 4501                                 4251 C9 4B    CMP  #$4B                  
 4502                                 4253 F0 08    BEQ  $425D                 
 4503                                 4255 C9 56    CMP  #$56                  
 4504                                 4257 F0 04    BEQ  $425D                 
 4505                                 4259 C9 47    CMP  #$47                  
 4506                                 425B D0 0E    BNE  $426B                 
 4507                                 425D A2 04    LDX  #$04                  
 4508                                 425F AC 02 0C LDY  $0C02                 
 4509                                 4262 2C 03 0C BIT  $0C03                 
 4510                                 4265 20 03 57 JSR  $5703                 
 4511                                 4268 4C 9F 42 JMP  $429F                 
 4512                                 426B C9 58    CMP  #$58                  
 4513                                 426D D0 05    BNE  $4274                 
 4514                                 426F 20 E7 24 JSR  $24E7                 
 4515                                 4272 D0 F4    BNE  $4268                 
 4516                                 4274 C9 5A    CMP  #$5A                  
 4517                                 4276 F0 05    BEQ  $427D                 
 4518                                 4278 C9 4D    CMP  #$4D                  
 4519                                 427A D0 0B    BNE  $4287                 
 4520                                 427C 18       CLC                        
 4521                                 427D A9 0C    LDA  #$0C                  
 4522                                 427F A6 24    LDX  $24                   
 4523                                 4281 20 FE 23 JSR  mslot_command         
 4524                                 4284 4C 9F 42 JMP  $429F                 
 4525                                 4287 C9 55    CMP  #$55                  
 4526                                 4289 D0 06    BNE  $4291                 
 4527                                 428B 20 06 58 JSR  $5806                 
 4528                                 428E 4C 9F 42 JMP  $429F                 
 4529                                 4291 C9 43    CMP  #$43                  
 4530                                 4293 D0 08    BNE  $429D                 
 4531                                 4295 AD 02 0C LDA  $0C02                 
 4532                                 4298 20 1E 27 JSR  $271E                 
 4533                                 429B D0 02    BNE  $429F                 
 4534                                 429D A0 04    LDY  #$04                  
 4535                                 429F A9 00    LDA  #$00                  
 4536                                 42A1 F0 01    BEQ  $42A4                 
 4537                                 42A3 A8       TAY                        
 4538                                 42A4 B9 11 60 LDA  $6011,Y               
 4539                                 42A7 8D 62 31 STA  $3162                 
 4540                                 42AA B9 12 60 LDA  $6012,Y               
 4541                                 42AD 8D 63 31 STA  $3163                 
 4542                                 42B0 4C 70 4B JMP  $4B70                 
 4543                                 42B3 84 15    STY  $15                   
 4544                                 42B5 24 D5    BIT  $D5                   
 4545                                 42B7 10 0E    BPL  $42C7                 
 4546                                 42B9 84 D5    STY  $D5                   
 4547                                 42BB 46 5D    LSR  $5D                   
 4548                                 42BD AD 7F 33 LDA  $337F                 
 4549                                 42C0 85 75    STA  $75                   
 4550                                 42C2 AD 80 33 LDA  $3380                 
 4551                                 42C5 85 7D    STA  $7D                   
 4552                                 42C7 AD 01 0D LDA  $0D01                 
 4553                                 42CA C9 3F    CMP  #$3F                  
 4554                                 42CC D0 04    BNE  $42D2                 
 4555                                 42CE A0 06    LDY  #$06                  
 4556                                 42D0 D0 25    BNE  $42F7                 
 4557                                 42D2 A2 0D    LDX  #$0D                  
 4558                                 42D4 20 4B 25 JSR  $254B                 
 4559                                 42D7 8C 2D 44 STY  $442D                 
 4560                                 42DA B0 1B    BCS  $42F7                 
 4561                                 42DC C9 54    CMP  #$54                  
 4562                                 42DE D0 1A    BNE  $42FA                 
 4563                                 42E0 A0 08    LDY  #$08                  
 4564                                 42E2 AD 7D 7F LDA  $7F7D                 
 4565                                 42E5 10 10    BPL  $42F7                 
 4566                                 42E7 AD 02 0D LDA  $0D02                 
 4567                                 42EA CD 3D 58 CMP  $583D                 
 4568                                 42ED F0 08    BEQ  $42F7                 
 4569                                 42EF A0 05    LDY  #$05                  
 4570                                 42F1 AE 03 0D LDX  $0D03                 
 4571                                 42F4 20 21 28 JSR  tune_command          
 4572                                 42F7 4C 2C 44 JMP  $442C                 
 4573                                 42FA C9 48    CMP  #$48                  
 4574                                 42FC D0 05    BNE  $4303                 
 4575                                 42FE 20 95 25 JSR  handle_command        
 4576                                 4301 F0 F4    BEQ  $42F7                 
 4577                                 4303 C9 53    CMP  #$53                  
 4578                                 4305 D0 0B    BNE  $4312                 
 4579                                 4307 A9 05    LDA  #$05                  
 4580                                 4309 AE 02 0D LDX  $0D02                 
 4581                                 430C 20 99 56 JSR  $5699                 
 4582                                 430F 4C 2C 44 JMP  $442C                 
 4583                                 4312 C9 45    CMP  #$45                  
 4584                                 4314 D0 08    BNE  $431E                 
 4585                                 4316 A9 05    LDA  #$05                  
 4586                                 4318 20 00 F8 JSR  $F800                 
 4587                                 431B 4C 2C 44 JMP  $442C                 
 4588                                 431E C9 57    CMP  #$57                  
 4589                                 4320 D0 05    BNE  $4327                 
 4590                                 4322 20 0D 26 JSR  $260D                 
 4591                                 4325 90 F4    BCC  $431B                 
 4592                                 4327 C9 42    CMP  #$42                  
 4593                                 4329 D0 05    BNE  $4330                 
 4594                                 432B 20 65 27 JSR  $2765                 
 4595                                 432E D0 EB    BNE  $431B                 
 4596                                 4330 C9 4C    CMP  #$4C                  
 4597                                 4332 D0 06    BNE  $433A                 
 4598                                 4334 20 0F 28 JSR  $280F                 
 4599                                 4337 4C 2C 44 JMP  $442C                 
 4600                                 433A C9 52    CMP  #$52                  
 4601                                 433C D0 06    BNE  $4344                 
 4602                                 433E 20 4A 22 JSR  $224A                 
 4603                                 4341 4C 2C 44 JMP  $442C                 
 4604                                 4344 C9 50    CMP  #$50                  
 4605                                 4346 D0 65    BNE  $43AD                 
 4606                                 4348 AD 02 0D LDA  $0D02                 
 4607                                 434B 49 30    EOR  #$30                  
 4608                                 434D 29 DF    AND  #$DF                  
 4609                                 434F A8       TAY                        
 4610                                 4350 F0 0C    BEQ  $435E                 
 4611                                 4352 C9 43    CMP  #$43                  
 4612                                 4354 F0 30    BEQ  $4386                 
 4613                                 4356 C9 08    CMP  #$08                  
 4614                                 4358 B0 45    BCS  $439F                 
 4615                                 435A B6 18    LDX  $18,Y                 
 4616                                 435C 10 44    BPL  $43A2                 
 4617                                 435E 0A       ASL  A                     
 4618                                 435F 0A       ASL  A                     
 4619                                 4360 0A       ASL  A                     
 4620                                 4361 AA       TAX                        
 4621                                 4362 AD 03 0D LDA  $0D03                 
 4622                                 4365 C9 7E    CMP  #$7E                  
 4623                                 4367 F0 1D    BEQ  $4386                 
 4624                                 4369 BD 05 01 LDA  $0105,X               
 4625                                 436C D0 37    BNE  $43A5                 
 4626                                 436E AD 7D 7F LDA  $7F7D                 
 4627                                 4371 30 13    BMI  $4386                 
 4628                                 4373 AD E3 F7 LDA  $F7E3                 
 4629                                 4376 19 B8 00 ORA  $00B8,Y               
 4630                                 4379 30 2D    BMI  $43A8                 
 4631                                 437B 86 00    STX  $00                   
 4632                                 437D 98       TYA                        
 4633                                 437E 65 00    ADC  $00                   
 4634                                 4380 AA       TAX                        
 4635                                 4381 BD 00 01 LDA  $0100,X               
 4636                                 4384 D0 1F    BNE  $43A5                 
 4637                                 4386 A2 D1    LDX  #$D1                  
 4638                                 4388 A5 BD    LDA  $BD                   
 4639                                 438A 10 01    BPL  $438D                 
 4640                                 438C CA       DEX                        
 4641                                 438D 8E 7F 33 STX  $337F                 
 4642                                 4390 A9 57    LDA  #$57                  
 4643                                 4392 8D 80 33 STA  $3380                 
 4644                                 4395 A2 0D    LDX  #$0D                  
 4645                                 4397 20 96 20 JSR  $2096                 
 4646                                 439A B0 03    BCS  $439F                 
 4647                                 439C 4C CE 4C JMP  $4CCE                 
 4648                                 439F A0 16    LDY  #$16                  
 4649                                 43A1 2C A0 18 BIT  $18A0                 
 4650                                 43A4 2C A0 1C BIT  $1CA0                 
 4651                                 43A7 2C A0 08 BIT  $08A0                 
 4652                                 43AA 4C 2C 44 JMP  $442C                 
 4653                                 43AD C9 49    CMP  #$49                  
 4654                                 43AF D0 06    BNE  $43B7                 
 4655                                 43B1 20 FC 27 JSR  instructions_command  
 4656                                 43B4 4C 2C 44 JMP  $442C                 
 4657                                 43B7 C9 44    CMP  #$44                  
 4658                                 43B9 D0 05    BNE  $43C0                 
 4659                                 43BB 20 18 28 JSR  $2818                 
 4660                                 43BE D0 F4    BNE  $43B4                 
 4661                                 43C0 C9 46    CMP  #$46                  
 4662                                 43C2 D0 08    BNE  $43CC                 
 4663                                 43C4 AD 02 0D LDA  $0D02                 
 4664                                 43C7 20 F3 26 JSR  $26F3                 
 4665                                 43CA D0 E8    BNE  $43B4                 
 4666                                 43CC C9 51    CMP  #$51                  
 4667                                 43CE D0 0E    BNE  $43DE                 
 4668                                 43D0 20 0B 60 JSR  $600B                 
 4669                                 43D3 B0 04    BCS  $43D9                 
 4670                                 43D5 8E A3 02 STX  $02A3                 
 4671                                 43D8 2C 84 95 BIT  $9584                 
 4672                                 43DB 4C 2C 44 JMP  $442C                 
 4673                                 43DE C9 4B    CMP  #$4B                  
 4674                                 43E0 F0 08    BEQ  $43EA                 
 4675                                 43E2 C9 56    CMP  #$56                  
 4676                                 43E4 F0 04    BEQ  $43EA                 
 4677                                 43E6 C9 47    CMP  #$47                  
 4678                                 43E8 D0 0E    BNE  $43F8                 
 4679                                 43EA A2 05    LDX  #$05                  
 4680                                 43EC AC 02 0D LDY  $0D02                 
 4681                                 43EF 2C 03 0D BIT  $0D03                 
 4682                                 43F2 20 03 57 JSR  $5703                 
 4683                                 43F5 4C 2C 44 JMP  $442C                 
 4684                                 43F8 C9 58    CMP  #$58                  
 4685                                 43FA D0 05    BNE  $4401                 
 4686                                 43FC 20 E7 24 JSR  $24E7                 
 4687                                 43FF D0 F4    BNE  $43F5                 
 4688                                 4401 C9 5A    CMP  #$5A                  
 4689                                 4403 F0 05    BEQ  $440A                 
 4690                                 4405 C9 4D    CMP  #$4D                  
 4691                                 4407 D0 0B    BNE  $4414                 
 4692                                 4409 18       CLC                        
 4693                                 440A A9 0D    LDA  #$0D                  
 4694                                 440C A6 25    LDX  $25                   
 4695                                 440E 20 FE 23 JSR  mslot_command         
 4696                                 4411 4C 2C 44 JMP  $442C                 
 4697                                 4414 C9 55    CMP  #$55                  
 4698                                 4416 D0 06    BNE  $441E                 
 4699                                 4418 20 06 58 JSR  $5806                 
 4700                                 441B 4C 2C 44 JMP  $442C                 
 4701                                 441E C9 43    CMP  #$43                  
 4702                                 4420 D0 08    BNE  $442A                 
 4703                                 4422 AD 02 0D LDA  $0D02                 
 4704                                 4425 20 1E 27 JSR  $271E                 
 4705                                 4428 D0 02    BNE  $442C                 
 4706                                 442A A0 04    LDY  #$04                  
 4707                                 442C A9 00    LDA  #$00                  
 4708                                 442E F0 01    BEQ  $4431                 
 4709                                 4430 A8       TAY                        
 4710                                 4431 B9 11 60 LDA  $6011,Y               
 4711                                 4434 8D 7F 33 STA  $337F                 
 4712                                 4437 B9 12 60 LDA  $6012,Y               
 4713                                 443A 8D 80 33 STA  $3380                 
 4714                                 443D 4C CB 4C JMP  $4CCB                 
 4715                                 4440 84 16    STY  $16                   
 4716                                 4442 24 D6    BIT  $D6                   
 4717                                 4444 10 0E    BPL  $4454                 
 4718                                 4446 84 D6    STY  $D6                   
 4719                                 4448 46 5E    LSR  $5E                   
 4720                                 444A AD 9C 35 LDA  $359C                 
 4721                                 444D 85 76    STA  $76                   
 4722                                 444F AD 9D 35 LDA  $359D                 
 4723                                 4452 85 7E    STA  $7E                   
 4724                                 4454 AD 01 0E LDA  $0E01                 
 4725                                 4457 C9 3F    CMP  #$3F                  
 4726                                 4459 D0 04    BNE  $445F                 
 4727                                 445B A0 06    LDY  #$06                  
 4728                                 445D D0 25    BNE  $4484                 
 4729                                 445F A2 0E    LDX  #$0E                  
 4730                                 4461 20 4B 25 JSR  $254B                 
 4731                                 4464 8C BA 45 STY  $45BA                 
 4732                                 4467 B0 1B    BCS  $4484                 
 4733                                 4469 C9 54    CMP  #$54                  
 4734                                 446B D0 1A    BNE  $4487                 
 4735                                 446D A0 08    LDY  #$08                  
 4736                                 446F AD 7E 7F LDA  $7F7E                 
 4737                                 4472 10 10    BPL  $4484                 
 4738                                 4474 AD 02 0E LDA  $0E02                 
 4739                                 4477 CD 45 58 CMP  $5845                 
 4740                                 447A F0 08    BEQ  $4484                 
 4741                                 447C A0 06    LDY  #$06                  
 4742                                 447E AE 03 0E LDX  $0E03                 
 4743                                 4481 20 21 28 JSR  tune_command          
 4744                                 4484 4C B9 45 JMP  $45B9                 
 4745                                 4487 C9 48    CMP  #$48                  
 4746                                 4489 D0 05    BNE  $4490                 
 4747                                 448B 20 95 25 JSR  handle_command        
 4748                                 448E F0 F4    BEQ  $4484                 
 4749                                 4490 C9 53    CMP  #$53                  
 4750                                 4492 D0 0B    BNE  $449F                 
 4751                                 4494 A9 06    LDA  #$06                  
 4752                                 4496 AE 02 0E LDX  $0E02                 
 4753                                 4499 20 99 56 JSR  $5699                 
 4754                                 449C 4C B9 45 JMP  $45B9                 
 4755                                 449F C9 45    CMP  #$45                  
 4756                                 44A1 D0 08    BNE  $44AB                 
 4757                                 44A3 A9 06    LDA  #$06                  
 4758                                 44A5 20 00 F8 JSR  $F800                 
 4759                                 44A8 4C B9 45 JMP  $45B9                 
 4760                                 44AB C9 57    CMP  #$57                  
 4761                                 44AD D0 05    BNE  $44B4                 
 4762                                 44AF 20 0D 26 JSR  $260D                 
 4763                                 44B2 90 F4    BCC  $44A8                 
 4764                                 44B4 C9 42    CMP  #$42                  
 4765                                 44B6 D0 05    BNE  $44BD                 
 4766                                 44B8 20 65 27 JSR  $2765                 
 4767                                 44BB D0 EB    BNE  $44A8                 
 4768                                 44BD C9 4C    CMP  #$4C                  
 4769                                 44BF D0 06    BNE  $44C7                 
 4770                                 44C1 20 0F 28 JSR  $280F                 
 4771                                 44C4 4C B9 45 JMP  $45B9                 
 4772                                 44C7 C9 52    CMP  #$52                  
 4773                                 44C9 D0 06    BNE  $44D1                 
 4774                                 44CB 20 4A 22 JSR  $224A                 
 4775                                 44CE 4C B9 45 JMP  $45B9                 
 4776                                 44D1 C9 50    CMP  #$50                  
 4777                                 44D3 D0 65    BNE  $453A                 
 4778                                 44D5 AD 02 0E LDA  $0E02                 
 4779                                 44D8 49 30    EOR  #$30                  
 4780                                 44DA 29 DF    AND  #$DF                  
 4781                                 44DC A8       TAY                        
 4782                                 44DD F0 0C    BEQ  $44EB                 
 4783                                 44DF C9 43    CMP  #$43                  
 4784                                 44E1 F0 30    BEQ  $4513                 
 4785                                 44E3 C9 08    CMP  #$08                  
 4786                                 44E5 B0 45    BCS  $452C                 
 4787                                 44E7 B6 18    LDX  $18,Y                 
 4788                                 44E9 10 44    BPL  $452F                 
 4789                                 44EB 0A       ASL  A                     
 4790                                 44EC 0A       ASL  A                     
 4791                                 44ED 0A       ASL  A                     
 4792                                 44EE AA       TAX                        
 4793                                 44EF AD 03 0E LDA  $0E03                 
 4794                                 44F2 C9 7E    CMP  #$7E                  
 4795                                 44F4 F0 1D    BEQ  $4513                 
 4796                                 44F6 BD 06 01 LDA  $0106,X               
 4797                                 44F9 D0 37    BNE  $4532                 
 4798                                 44FB AD 7E 7F LDA  $7F7E                 
 4799                                 44FE 30 13    BMI  $4513                 
 4800                                 4500 AD E3 F7 LDA  $F7E3                 
 4801                                 4503 19 B8 00 ORA  $00B8,Y               
 4802                                 4506 30 2D    BMI  $4535                 
 4803                                 4508 86 00    STX  $00                   
 4804                                 450A 98       TYA                        
 4805                                 450B 65 00    ADC  $00                   
 4806                                 450D AA       TAX                        
 4807                                 450E BD 00 01 LDA  $0100,X               
 4808                                 4511 D0 1F    BNE  $4532                 
 4809                                 4513 A2 D1    LDX  #$D1                  
 4810                                 4515 A5 BE    LDA  $BE                   
 4811                                 4517 10 01    BPL  $451A                 
 4812                                 4519 CA       DEX                        
 4813                                 451A 8E 9C 35 STX  $359C                 
 4814                                 451D A9 57    LDA  #$57                  
 4815                                 451F 8D 9D 35 STA  $359D                 
 4816                                 4522 A2 0E    LDX  #$0E                  
 4817                                 4524 20 96 20 JSR  $2096                 
 4818                                 4527 B0 03    BCS  $452C                 
 4819                                 4529 4C 29 4E JMP  $4E29                 
 4820                                 452C A0 16    LDY  #$16                  
 4821                                 452E 2C A0 18 BIT  $18A0                 
 4822                                 4531 2C A0 1C BIT  $1CA0                 
 4823                                 4534 2C A0 08 BIT  $08A0                 
 4824                                 4537 4C B9 45 JMP  $45B9                 
 4825                                 453A C9 49    CMP  #$49                  
 4826                                 453C D0 06    BNE  $4544                 
 4827                                 453E 20 FC 27 JSR  instructions_command  
 4828                                 4541 4C B9 45 JMP  $45B9                 
 4829                                 4544 C9 44    CMP  #$44                  
 4830                                 4546 D0 05    BNE  $454D                 
 4831                                 4548 20 18 28 JSR  $2818                 
 4832                                 454B D0 F4    BNE  $4541                 
 4833                                 454D C9 46    CMP  #$46                  
 4834                                 454F D0 08    BNE  $4559                 
 4835                                 4551 AD 02 0E LDA  $0E02                 
 4836                                 4554 20 F3 26 JSR  $26F3                 
 4837                                 4557 D0 E8    BNE  $4541                 
 4838                                 4559 C9 51    CMP  #$51                  
 4839                                 455B D0 0E    BNE  $456B                 
 4840                                 455D 20 0B 60 JSR  $600B                 
 4841                                 4560 B0 04    BCS  $4566                 
 4842                                 4562 8E C3 02 STX  $02C3                 
 4843                                 4565 2C 84 96 BIT  $9684                 
 4844                                 4568 4C B9 45 JMP  $45B9                 
 4845                                 456B C9 4B    CMP  #$4B                  
 4846                                 456D F0 08    BEQ  $4577                 
 4847                                 456F C9 56    CMP  #$56                  
 4848                                 4571 F0 04    BEQ  $4577                 
 4849                                 4573 C9 47    CMP  #$47                  
 4850                                 4575 D0 0E    BNE  $4585                 
 4851                                 4577 A2 06    LDX  #$06                  
 4852                                 4579 AC 02 0E LDY  $0E02                 
 4853                                 457C 2C 03 0E BIT  $0E03                 
 4854                                 457F 20 03 57 JSR  $5703                 
 4855                                 4582 4C B9 45 JMP  $45B9                 
 4856                                 4585 C9 58    CMP  #$58                  
 4857                                 4587 D0 05    BNE  $458E                 
 4858                                 4589 20 E7 24 JSR  $24E7                 
 4859                                 458C D0 F4    BNE  $4582                 
 4860                                 458E C9 5A    CMP  #$5A                  
 4861                                 4590 F0 05    BEQ  $4597                 
 4862                                 4592 C9 4D    CMP  #$4D                  
 4863                                 4594 D0 0B    BNE  $45A1                 
 4864                                 4596 18       CLC                        
 4865                                 4597 A9 0E    LDA  #$0E                  
 4866                                 4599 A6 26    LDX  $26                   
 4867                                 459B 20 FE 23 JSR  mslot_command         
 4868                                 459E 4C B9 45 JMP  $45B9                 
 4869                                 45A1 C9 55    CMP  #$55                  
 4870                                 45A3 D0 06    BNE  $45AB                 
 4871                                 45A5 20 06 58 JSR  $5806                 
 4872                                 45A8 4C B9 45 JMP  $45B9                 
 4873                                 45AB C9 43    CMP  #$43                  
 4874                                 45AD D0 08    BNE  $45B7                 
 4875                                 45AF AD 02 0E LDA  $0E02                 
 4876                                 45B2 20 1E 27 JSR  $271E                 
 4877                                 45B5 D0 02    BNE  $45B9                 
 4878                                 45B7 A0 04    LDY  #$04                  
 4879                                 45B9 A9 00    LDA  #$00                  
 4880                                 45BB F0 01    BEQ  $45BE                 
 4881                                 45BD A8       TAY                        
 4882                                 45BE B9 11 60 LDA  $6011,Y               
 4883                                 45C1 8D 9C 35 STA  $359C                 
 4884                                 45C4 B9 12 60 LDA  $6012,Y               
 4885                                 45C7 8D 9D 35 STA  $359D                 
 4886                                 45CA 4C 26 4E JMP  $4E26                 
 4887                                 45CD 84 17    STY  $17                   
 4888                                 45CF 24 D7    BIT  $D7                   
 4889                                 45D1 10 0E    BPL  $45E1                 
 4890                                 45D3 84 D7    STY  $D7                   
 4891                                 45D5 46 5F    LSR  $5F                   
 4892                                 45D7 AD B9 37 LDA  $37B9                 
 4893                                 45DA 85 77    STA  $77                   
 4894                                 45DC AD BA 37 LDA  $37BA                 
 4895                                 45DF 85 7F    STA  $7F                   
 4896                                 45E1 AD 01 0F LDA  $0F01                 
 4897                                 45E4 C9 3F    CMP  #$3F                  
 4898                                 45E6 D0 04    BNE  $45EC                 
 4899                                 45E8 A0 06    LDY  #$06                  
 4900                                 45EA D0 25    BNE  $4611                 
 4901                                 45EC A2 0F    LDX  #$0F                  
 4902                                 45EE 20 4B 25 JSR  $254B                 
 4903                                 45F1 8C 47 47 STY  $4747                 
 4904                                 45F4 B0 1B    BCS  $4611                 
 4905                                 45F6 C9 54    CMP  #$54                  
 4906                                 45F8 D0 1A    BNE  $4614                 
 4907                                 45FA A0 08    LDY  #$08                  
 4908                                 45FC AD 7F 7F LDA  $7F7F                 
 4909                                 45FF 10 10    BPL  $4611                 
 4910                                 4601 AD 02 0F LDA  $0F02                 
 4911                                 4604 CD 4D 58 CMP  $584D                 
 4912                                 4607 F0 08    BEQ  $4611                 
 4913                                 4609 A0 07    LDY  #$07                  
 4914                                 460B AE 03 0F LDX  $0F03                 
 4915                                 460E 20 21 28 JSR  tune_command          
 4916                                 4611 4C 46 47 JMP  $4746                 
 4917                                 4614 C9 48    CMP  #$48                  
 4918                                 4616 D0 05    BNE  $461D                 
 4919                                 4618 20 95 25 JSR  handle_command        
 4920                                 461B F0 F4    BEQ  $4611                 
 4921                                 461D C9 53    CMP  #$53                  
 4922                                 461F D0 0B    BNE  $462C                 
 4923                                 4621 A9 07    LDA  #$07                  
 4924                                 4623 AE 02 0F LDX  $0F02                 
 4925                                 4626 20 99 56 JSR  $5699                 
 4926                                 4629 4C 46 47 JMP  $4746                 
 4927                                 462C C9 45    CMP  #$45                  
 4928                                 462E D0 08    BNE  $4638                 
 4929                                 4630 A9 07    LDA  #$07                  
 4930                                 4632 20 00 F8 JSR  $F800                 
 4931                                 4635 4C 46 47 JMP  $4746                 
 4932                                 4638 C9 57    CMP  #$57                  
 4933                                 463A D0 05    BNE  $4641                 
 4934                                 463C 20 0D 26 JSR  $260D                 
 4935                                 463F 90 F4    BCC  $4635                 
 4936                                 4641 C9 42    CMP  #$42                  
 4937                                 4643 D0 05    BNE  $464A                 
 4938                                 4645 20 65 27 JSR  $2765                 
 4939                                 4648 D0 EB    BNE  $4635                 
 4940                                 464A C9 4C    CMP  #$4C                  
 4941                                 464C D0 06    BNE  $4654                 
 4942                                 464E 20 0F 28 JSR  $280F                 
 4943                                 4651 4C 46 47 JMP  $4746                 
 4944                                 4654 C9 52    CMP  #$52                  
 4945                                 4656 D0 06    BNE  $465E                 
 4946                                 4658 20 4A 22 JSR  $224A                 
 4947                                 465B 4C 46 47 JMP  $4746                 
 4948                                 465E C9 50    CMP  #$50                  
 4949                                 4660 D0 65    BNE  $46C7                 
 4950                                 4662 AD 02 0F LDA  $0F02                 
 4951                                 4665 49 30    EOR  #$30                  
 4952                                 4667 29 DF    AND  #$DF                  
 4953                                 4669 A8       TAY                        
 4954                                 466A F0 0C    BEQ  $4678                 
 4955                                 466C C9 43    CMP  #$43                  
 4956                                 466E F0 30    BEQ  $46A0                 
 4957                                 4670 C9 08    CMP  #$08                  
 4958                                 4672 B0 45    BCS  $46B9                 
 4959                                 4674 B6 18    LDX  $18,Y                 
 4960                                 4676 10 44    BPL  $46BC                 
 4961                                 4678 0A       ASL  A                     
 4962                                 4679 0A       ASL  A                     
 4963                                 467A 0A       ASL  A                     
 4964                                 467B AA       TAX                        
 4965                                 467C AD 03 0F LDA  $0F03                 
 4966                                 467F C9 7E    CMP  #$7E                  
 4967                                 4681 F0 1D    BEQ  $46A0                 
 4968                                 4683 BD 07 01 LDA  $0107,X               
 4969                                 4686 D0 37    BNE  $46BF                 
 4970                                 4688 AD 7F 7F LDA  $7F7F                 
 4971                                 468B 30 13    BMI  $46A0                 
 4972                                 468D AD E3 F7 LDA  $F7E3                 
 4973                                 4690 19 B8 00 ORA  $00B8,Y               
 4974                                 4693 30 2D    BMI  $46C2                 
 4975                                 4695 86 00    STX  $00                   
 4976                                 4697 98       TYA                        
 4977                                 4698 65 00    ADC  $00                   
 4978                                 469A AA       TAX                        
 4979                                 469B BD 00 01 LDA  $0100,X               
 4980                                 469E D0 1F    BNE  $46BF                 
 4981                                 46A0 A2 D1    LDX  #$D1                  
 4982                                 46A2 A5 BF    LDA  $BF                   
 4983                                 46A4 10 01    BPL  $46A7                 
 4984                                 46A6 CA       DEX                        
 4985                                 46A7 8E B9 37 STX  $37B9                 
 4986                                 46AA A9 57    LDA  #$57                  
 4987                                 46AC 8D BA 37 STA  $37BA                 
 4988                                 46AF A2 0F    LDX  #$0F                  
 4989                                 46B1 20 96 20 JSR  $2096                 
 4990                                 46B4 B0 03    BCS  $46B9                 
 4991                                 46B6 4C 84 4F JMP  $4F84                 
 4992                                 46B9 A0 16    LDY  #$16                  
 4993                                 46BB 2C A0 18 BIT  $18A0                 
 4994                                 46BE 2C A0 1C BIT  $1CA0                 
 4995                                 46C1 2C A0 08 BIT  $08A0                 
 4996                                 46C4 4C 46 47 JMP  $4746                 
 4997                                 46C7 C9 49    CMP  #$49                  
 4998                                 46C9 D0 06    BNE  $46D1                 
 4999                                 46CB 20 FC 27 JSR  instructions_command  
 5000                                 46CE 4C 46 47 JMP  $4746                 
 5001                                 46D1 C9 44    CMP  #$44                  
 5002                                 46D3 D0 05    BNE  $46DA                 
 5003                                 46D5 20 18 28 JSR  $2818                 
 5004                                 46D8 D0 F4    BNE  $46CE                 
 5005                                 46DA C9 46    CMP  #$46                  
 5006                                 46DC D0 08    BNE  $46E6                 
 5007                                 46DE AD 02 0F LDA  $0F02                 
 5008                                 46E1 20 F3 26 JSR  $26F3                 
 5009                                 46E4 D0 E8    BNE  $46CE                 
 5010                                 46E6 C9 51    CMP  #$51                  
 5011                                 46E8 D0 0E    BNE  $46F8                 
 5012                                 46EA 20 0B 60 JSR  $600B                 
 5013                                 46ED B0 04    BCS  $46F3                 
 5014                                 46EF 8E E3 02 STX  $02E3                 
 5015                                 46F2 2C 84 97 BIT  $9784                 
 5016                                 46F5 4C 46 47 JMP  $4746                 
 5017                                 46F8 C9 4B    CMP  #$4B                  
 5018                                 46FA F0 08    BEQ  $4704                 
 5019                                 46FC C9 56    CMP  #$56                  
 5020                                 46FE F0 04    BEQ  $4704                 
 5021                                 4700 C9 47    CMP  #$47                  
 5022                                 4702 D0 0E    BNE  $4712                 
 5023                                 4704 A2 07    LDX  #$07                  
 5024                                 4706 AC 02 0F LDY  $0F02                 
 5025                                 4709 2C 03 0F BIT  $0F03                 
 5026                                 470C 20 03 57 JSR  $5703                 
 5027                                 470F 4C 46 47 JMP  $4746                 
 5028                                 4712 C9 58    CMP  #$58                  
 5029                                 4714 D0 05    BNE  $471B                 
 5030                                 4716 20 E7 24 JSR  $24E7                 
 5031                                 4719 D0 F4    BNE  $470F                 
 5032                                 471B C9 5A    CMP  #$5A                  
 5033                                 471D F0 05    BEQ  $4724                 
 5034                                 471F C9 4D    CMP  #$4D                  
 5035                                 4721 D0 0B    BNE  $472E                 
 5036                                 4723 18       CLC                        
 5037                                 4724 A9 0F    LDA  #$0F                  
 5038                                 4726 A6 27    LDX  $27                   
 5039                                 4728 20 FE 23 JSR  mslot_command         
 5040                                 472B 4C 46 47 JMP  $4746                 
 5041                                 472E C9 55    CMP  #$55                  
 5042                                 4730 D0 06    BNE  $4738                 
 5043                                 4732 20 06 58 JSR  $5806                 
 5044                                 4735 4C 46 47 JMP  $4746                 
 5045                                 4738 C9 43    CMP  #$43                  
 5046                                 473A D0 08    BNE  $4744                 
 5047                                 473C AD 02 0F LDA  $0F02                 
 5048                                 473F 20 1E 27 JSR  $271E                 
 5049                                 4742 D0 02    BNE  $4746                 
 5050                                 4744 A0 04    LDY  #$04                  
 5051                                 4746 A9 00    LDA  #$00                  
 5052                                 4748 F0 01    BEQ  $474B                 
 5053                                 474A A8       TAY                        
 5054                                 474B B9 11 60 LDA  $6011,Y               
 5055                                 474E 8D B9 37 STA  $37B9                 
 5056                                 4751 B9 12 60 LDA  $6012,Y               
 5057                                 4754 8D BA 37 STA  $37BA                 
 5058                                 4757 4C 81 4F JMP  $4F81                 
 5059 t01 t00 t80 t02 t11 t81         475A AC F9 7F LDY  $7FF9                 
 5060 t01 t00 t80 t02 t11 t81         475D 30 06    BMI  $4765                 
 5061 t01 t00 t80 t02 t11 t81         475F 4C B5 48 JMP  $48B5                 
 5062                                 4762 4C 82 48 JMP  $4882                 
 5063 t81                             4765 4E F9 7F LSR  $7FF9                 
 5064                     t81         4768 46 E2    LSR  $E2                   
 5065                     t81         476A 20 22 F8 JSR  _and_rts              
 5066                     t81         476D 24 D1    BIT  $D1                   
 5067                     t81         476F 30 26    BMI  $4797                 
 5068                                 4771 70 18    BVS  $478B                 
 5069                                 4773 B9 00 F3 LDA  char_translate_tbl,Y  
 5070                                 4776 29 7F    AND  #$7F                  
 5071                                 4778 D0 1D    BNE  $4797                 
 5072                                 477A 85 11    STA  $11                   
 5073                                 477C 8D 91 7F STA  $7F91                 
 5074                                 477F AD B2 23 LDA  $23B2                 
 5075                                 4782 8D 0C 2B STA  $2B0C                 
 5076                                 4785 AD B1 23 LDA  $23B1                 
 5077                                 4788 8D 0B 2B STA  $2B0B                 
 5078                     t81         478B 4C B5 48 JMP  $48B5                 
 5079                                 478E 50 FB    BVC  $478B                 
 5080                                 4790 D0 35    BNE  $47C7                 
 5081                                 4792 EE 51 48 INC  $4851                 
 5082                                 4795 B0 F4    BCS  $478B                 
 5083                     t81         4797 B9 00 F3 LDA  char_translate_tbl,Y  
 5084                     t81         479A 30 65    BMI  $4801                 
 5085                     t81         479C 24 B9    BIT  $B9                   
 5086                     t81         479E 30 0F    BMI  $47AF                 
 5087                     t81         47A0 B8       CLV                        
 5088                     t81         47A1 EE 31 7F INC  $7F31                 
 5089                     t81         47A4 C9 5E    CMP  #$5E                  
 5090                     t81         47A6 D0 07    BNE  $47AF                 
 5091                                 47A8 A0 00    LDY  #$00                  
 5092                                 47AA F0 DF    BEQ  $478B                 
 5093                                 47AC CE A9 47 DEC  $47A9                 
 5094                     t81         47AF A4 81    LDY  $81                   
 5095                     t81         47B1 C9 7D    CMP  #$7D                  
 5096                     t81         47B3 B0 D9    BCS  $478E                 
 5097                     t81         47B5 C0 00    CPY  #$00                  
 5098                     t81         47B7 D0 0E    BNE  $47C7                 
 5099                     t81         47B9 70 0C    BVS  $47C7                 
 5100                     t81         47BB C9 2F    CMP  #$2F                  
 5101                     t81         47BD D0 03    BNE  $47C2                 
 5102                                 47BF 8C 91 7F STY  $7F91                 
 5103                     t81         47C2 AC 91 7F LDY  $7F91                 
 5104                     t81         47C5 84 81    STY  $81                   
 5105                     t81         47C7 99 00 09 STA  inbuf_line1,Y         
 5106                     t81         47CA C9 0D    CMP  #$0D                  
 5107                     t81         47CC F0 3C    BEQ  $480A                 
 5108                     t81         47CE CC E9 7E CPY  $7EE9                 
 5109                     t81         47D1 90 08    BCC  $47DB                 
 5110                                 47D3 70 29    BVS  $47FE                 
 5111                                 47D5 24 49    BIT  $49                   
 5112                                 47D7 10 15    BPL  $47EE                 
 5113                                 47D9 30 1E    BMI  $47F9                 
 5114                     t81         47DB E6 81    INC  $81                   
 5115                     t81         47DD C9 08    CMP  #$08                  
 5116                     t81         47DF D0 AA    BNE  $478B                 
 5117                                 47E1 98       TYA                        
 5118                                 47E2 D0 05    BNE  $47E9                 
 5119                                 47E4 A5 39    LDA  $39                   
 5120                                 47E6 10 22    BPL  $480A                 
 5121                                 47E8 C8       INY                        
 5122                                 47E9 4D 91 7F EOR  $7F91                 
 5123                                 47EC F0 18    BEQ  $4806                 
 5124                                 47EE 88       DEY                        
 5125                                 47EF 84 81    STY  $81                   
 5126                                 47F1 C4 89    CPY  $89                   
 5127                                 47F3 B0 09    BCS  $47FE                 
 5128                                 47F5 24 49    BIT  $49                   
 5129                                 47F7 30 05    BMI  $47FE                 
 5130                                 47F9 E6 D9    INC  $D9                   
 5131                                 47FB 2C 85 A1 BIT  $A185                 
 5132                                 47FE 4C B5 48 JMP  $48B5                 
 5133                                 4801 0A       ASL  A                     
 5134                                 4802 30 87    BMI  $478B                 
 5135                                 4804 D0 F6    BNE  $47FC                 
 5136                                 4806 8D 91 7F STA  $7F91                 
 5137                                 4809 A8       TAY                        
 5138                                 480A A5 89    LDA  $89                   
 5139                                 480C F0 0F    BEQ  $481D                 
 5140                                 480E A5 49    LDA  $49                   
 5141                                 4810 30 07    BMI  $4819                 
 5142                                 4812 A9 0D    LDA  #$0D                  
 5143                                 4814 8D F1 7F STA  $7FF1                 
 5144                                 4817 85 61    STA  $61                   
 5145                                 4819 A5 B9    LDA  $B9                   
 5146                                 481B 85 A9    STA  $A9                   
 5147                                 481D A9 00    LDA  #$00                  
 5148                                 481F C8       INY                        
 5149                                 4820 99 00 09 STA  inbuf_line1,Y         
 5150                                 4823 85 A1    STA  $A1                   
 5151                                 4825 85 81    STA  $81                   
 5152                                 4827 85 89    STA  $89                   
 5153                                 4829 85 D9    STA  $D9                   
 5154                                 482B 24 39    BIT  $39                   
 5155                                 482D 10 1E    BPL  $484D                 
 5156                                 482F A9 01    LDA  #$01                  
 5157                                 4831 20 00 58 JSR  $5800                 
 5158                                 4834 8D 0B 2B STA  $2B0B                 
 5159                                 4837 8E 0C 2B STX  $2B0C                 
 5160                                 483A 8C 0D 04 STY  $040D                 
 5161                                 483D A0 01    LDY  #$01                  
 5162                                 483F 20 06 55 JSR  $5506                 
 5163                                 4842 8E 09 01 STX  $0109                 
 5164                                 4845 4C B5 48 JMP  $48B5                 
 5165                                 4848 A2 09    LDX  #$09                  
 5166                                 484A 20 75 27 JSR  $2775                 
 5167                                 484D 88       DEY                        
 5168                                 484E F0 62    BEQ  $48B2                 
 5169                                 4850 A0 00    LDY  #$00                  
 5170                                 4852 D0 F4    BNE  $4848                 
 5171                                 4854 A9 08    LDA  #$08                  
 5172                                 4856 2D 79 7F AND  $7F79                 
 5173                                 4859 8D A9 47 STA  $47A9                 
 5174                                 485C 84 F5    STY  $F5                   
 5175                                 485E EE 29 7F INC  $7F29                 
 5176                                 4861 A6 B1    LDX  $B1                   
 5177                                 4863 AD 00 09 LDA  inbuf_line1           
 5178                                 4866 C9 2F    CMP  #$2F                  
 5179                                 4868 D0 03    BNE  $486D                 
 5180                                 486A 4C 7F 3C JMP  $3C7F                 
 5181                                 486D BD A1 7F LDA  $7FA1,X               
 5182                                 4870 30 43    BMI  $48B5                 
 5183                                 4872 24 B9    BIT  $B9                   
 5184                                 4874 10 02    BPL  $4878                 
 5185                                 4876 A0 1C    LDY  #$1C                  
 5186                                 4878 AD C1 7F LDA  $7FC1                 
 5187                                 487B 24 90    BIT  $90                   
 5188                                 487D 18       CLC                        
 5189                                 487E 90 18    BCC  $4898                 
 5190                                 4880 50 08    BVC  $488A                 
 5191                                 4882 B9 1F 02 LDA  $021F,Y               
 5192                                 4885 D0 11    BNE  $4898                 
 5193                                 4887 B8       CLV                        
 5194                                 4888 A4 F5    LDY  $F5                   
 5195                                 488A B9 00 09 LDA  inbuf_line1,Y         
 5196                                 488D F0 18    BEQ  $48A7                 
 5197                                 488F 49 07    EOR  #$07                  
 5198                                 4891 D0 03    BNE  $4896                 
 5199                                 4893 B0 0E    BCS  $48A3                 
 5200                                 4895 38       SEC                        
 5201                                 4896 49 07    EOR  #$07                  
 5202                                 4898 81 C0    STA  ($C0,X)               
 5203                                 489A F6 C0    INC  $C0,X                 
 5204                                 489C D0 05    BNE  $48A3                 
 5205                                 489E 08       PHP                        
 5206                                 489F 20 D8 3A JSR  $3AD8                 
 5207                                 48A2 28       PLP                        
 5208                                 48A3 C8       INY                        
 5209                                 48A4 D0 DA    BNE  $4880                 
 5210                                 48A6 98       TYA                        
 5211                                 48A7 81 C0    STA  ($C0,X)               
 5212                                 48A9 8A       TXA                        
 5213                                 48AA 25 B1    AND  $B1                   
 5214                                 48AC D0 07    BNE  $48B5                 
 5215                                 48AE A2 01    LDX  #$01                  
 5216                                 48B0 86 05    STX  $05                   
 5217                                 48B2 8D 51 48 STA  $4851                 
 5218 t01 t00 t80 t02 t11 t81         48B5 AC FA 7F LDY  $7FFA                 
 5219 t01 t00 t80 t02 t11 t81         48B8 30 06    BMI  $48C0                 
 5220 t01 t00 t80 t02 t11 t81         48BA 4C 10 4A JMP  $4A10                 
 5221                                 48BD 4C DD 49 JMP  $49DD                 
 5222 t11                             48C0 4E FA 7F LSR  $7FFA                 
 5223                 t11             48C3 46 E2    LSR  $E2                   
 5224                 t11             48C5 20 22 F8 JSR  _and_rts              
 5225                 t11             48C8 24 D2    BIT  $D2                   
 5226                 t11             48CA 30 26    BMI  $48F2                 
 5227                 t11             48CC 70 18    BVS  $48E6                 
 5228                 t11             48CE B9 00 F3 LDA  char_translate_tbl,Y  
 5229                 t11             48D1 29 7F    AND  #$7F                  
 5230                 t11             48D3 D0 1D    BNE  $48F2                 
 5231                                 48D5 85 12    STA  $12                   
 5232                                 48D7 8D 92 7F STA  $7F92                 
 5233                                 48DA AD B2 23 LDA  $23B2                 
 5234                                 48DD 8D 29 2D STA  $2D29                 
 5235                                 48E0 AD B1 23 LDA  $23B1                 
 5236                                 48E3 8D 28 2D STA  $2D28                 
 5237                 t11             48E6 4C 10 4A JMP  $4A10                 
 5238                                 48E9 50 FB    BVC  $48E6                 
 5239                                 48EB D0 35    BNE  $4922                 
 5240                                 48ED EE AC 49 INC  $49AC                 
 5241                                 48F0 B0 F4    BCS  $48E6                 
 5242                 t11             48F2 B9 00 F3 LDA  char_translate_tbl,Y  
 5243                 t11             48F5 30 65    BMI  $495C                 
 5244                 t11             48F7 24 BA    BIT  $BA                   
 5245                 t11             48F9 30 0F    BMI  $490A                 
 5246                 t11             48FB B8       CLV                        
 5247                 t11             48FC EE 32 7F INC  $7F32                 
 5248                 t11             48FF C9 5E    CMP  #$5E                  
 5249                 t11             4901 D0 07    BNE  $490A                 
 5250                                 4903 A0 00    LDY  #$00                  
 5251                                 4905 F0 DF    BEQ  $48E6                 
 5252                                 4907 CE 04 49 DEC  $4904                 
 5253                 t11             490A A4 82    LDY  $82                   
 5254                 t11             490C C9 7D    CMP  #$7D                  
 5255                 t11             490E B0 D9    BCS  $48E9                 
 5256                 t11             4910 C0 00    CPY  #$00                  
 5257                 t11             4912 D0 0E    BNE  $4922                 
 5258                                 4914 70 0C    BVS  $4922                 
 5259                                 4916 C9 2F    CMP  #$2F                  
 5260                                 4918 D0 03    BNE  $491D                 
 5261                                 491A 8C 92 7F STY  $7F92                 
 5262                                 491D AC 92 7F LDY  $7F92                 
 5263                                 4920 84 82    STY  $82                   
 5264                 t11             4922 99 00 0A STA  inbuf_line2,Y         
 5265                 t11             4925 C9 0D    CMP  #$0D                  
 5266                 t11             4927 F0 3C    BEQ  $4965                 
 5267                                 4929 CC EA 7E CPY  $7EEA                 
 5268                                 492C 90 08    BCC  $4936                 
 5269                                 492E 70 29    BVS  $4959                 
 5270                                 4930 24 4A    BIT  $4A                   
 5271                                 4932 10 15    BPL  $4949                 
 5272                                 4934 30 1E    BMI  $4954                 
 5273                                 4936 E6 82    INC  $82                   
 5274                                 4938 C9 08    CMP  #$08                  
 5275                                 493A D0 AA    BNE  $48E6                 
 5276                                 493C 98       TYA                        
 5277                                 493D D0 05    BNE  $4944                 
 5278                                 493F A5 3A    LDA  $3A                   
 5279                                 4941 10 22    BPL  $4965                 
 5280                                 4943 C8       INY                        
 5281                                 4944 4D 92 7F EOR  $7F92                 
 5282                                 4947 F0 18    BEQ  $4961                 
 5283                                 4949 88       DEY                        
 5284                                 494A 84 82    STY  $82                   
 5285                                 494C C4 8A    CPY  $8A                   
 5286                                 494E B0 09    BCS  $4959                 
 5287                                 4950 24 4A    BIT  $4A                   
 5288                                 4952 30 05    BMI  $4959                 
 5289                                 4954 E6 DA    INC  $DA                   
 5290                                 4956 2C 85 A2 BIT  $A285                 
 5291                                 4959 4C 10 4A JMP  $4A10                 
 5292                 t11             495C 0A       ASL  A                     
 5293                 t11             495D 30 87    BMI  $48E6                 
 5294                                 495F D0 F6    BNE  $4957                 
 5295                                 4961 8D 92 7F STA  $7F92                 
 5296                                 4964 A8       TAY                        
 5297                 t11             4965 A5 8A    LDA  $8A                   
 5298                 t11             4967 F0 0F    BEQ  $4978                 
 5299                 t11             4969 A5 4A    LDA  $4A                   
 5300                 t11             496B 30 07    BMI  $4974                 
 5301                 t11             496D A9 0D    LDA  #$0D                  
 5302                 t11             496F 8D F2 7F STA  $7FF2                 
 5303                 t11             4972 85 62    STA  $62                   
 5304                 t11             4974 A5 BA    LDA  $BA                   
 5305                 t11             4976 85 AA    STA  $AA                   
 5306                 t11             4978 A9 00    LDA  #$00                  
 5307                 t11             497A C8       INY                        
 5308                 t11             497B 99 00 0A STA  inbuf_line2,Y         
 5309                 t11             497E 85 A2    STA  $A2                   
 5310                 t11             4980 85 82    STA  $82                   
 5311                 t11             4982 85 8A    STA  $8A                   
 5312                 t11             4984 85 DA    STA  $DA                   
 5313                 t11             4986 24 3A    BIT  $3A                   
 5314                 t11             4988 10 1E    BPL  $49A8                 
 5315                                 498A A9 02    LDA  #$02                  
 5316                                 498C 20 00 58 JSR  $5800                 
 5317                                 498F 8D 28 2D STA  $2D28                 
 5318                                 4992 8E 29 2D STX  $2D29                 
 5319                                 4995 8C 11 04 STY  $0411                 
 5320                                 4998 A0 02    LDY  #$02                  
 5321                                 499A 20 06 55 JSR  $5506                 
 5322                                 499D 8E 12 01 STX  $0112                 
 5323                                 49A0 4C 10 4A JMP  $4A10                 
 5324                                 49A3 A2 0A    LDX  #$0A                  
 5325                                 49A5 20 75 27 JSR  $2775                 
 5326                 t11             49A8 88       DEY                        
 5327                 t11             49A9 F0 62    BEQ  $4A0D                 
 5328                 t11             49AB A0 00    LDY  #$00                  
 5329                 t11             49AD D0 F4    BNE  $49A3                 
 5330                 t11             49AF A9 08    LDA  #$08                  
 5331                 t11             49B1 2D 7A 7F AND  $7F7A                 
 5332                 t11             49B4 8D 04 49 STA  $4904                 
 5333                 t11             49B7 84 F5    STY  $F5                   
 5334                 t11             49B9 EE 2A 7F INC  $7F2A                 
 5335                 t11             49BC A6 B2    LDX  $B2                   
 5336                 t11             49BE AD 00 0A LDA  inbuf_line2           
 5337                 t11             49C1 C9 2F    CMP  #$2F                  
 5338                 t11             49C3 D0 03    BNE  $49C8                 
 5339                 t11             49C5 4C 0C 3E JMP  $3E0C                 
 5340                                 49C8 BD A1 7F LDA  $7FA1,X               
 5341                                 49CB 30 43    BMI  $4A10                 
 5342                                 49CD 24 BA    BIT  $BA                   
 5343                                 49CF 10 02    BPL  $49D3                 
 5344                                 49D1 A0 1C    LDY  #$1C                  
 5345                                 49D3 AD C2 7F LDA  $7FC2                 
 5346                                 49D6 24 90    BIT  $90                   
 5347                                 49D8 18       CLC                        
 5348                                 49D9 90 18    BCC  $49F3                 
 5349                                 49DB 50 08    BVC  $49E5                 
 5350                                 49DD B9 3F 02 LDA  $023F,Y               
 5351                                 49E0 D0 11    BNE  $49F3                 
 5352                                 49E2 B8       CLV                        
 5353                                 49E3 A4 F5    LDY  $F5                   
 5354                                 49E5 B9 00 0A LDA  inbuf_line2,Y         
 5355                                 49E8 F0 18    BEQ  $4A02                 
 5356                                 49EA 49 07    EOR  #$07                  
 5357                                 49EC D0 03    BNE  $49F1                 
 5358                                 49EE B0 0E    BCS  $49FE                 
 5359                                 49F0 38       SEC                        
 5360                                 49F1 49 07    EOR  #$07                  
 5361                                 49F3 81 C0    STA  ($C0,X)               
 5362                                 49F5 F6 C0    INC  $C0,X                 
 5363                                 49F7 D0 05    BNE  $49FE                 
 5364                                 49F9 08       PHP                        
 5365                                 49FA 20 D8 3A JSR  $3AD8                 
 5366                                 49FD 28       PLP                        
 5367                                 49FE C8       INY                        
 5368                                 49FF D0 DA    BNE  $49DB                 
 5369                                 4A01 98       TYA                        
 5370                                 4A02 81 C0    STA  ($C0,X)               
 5371                                 4A04 8A       TXA                        
 5372                                 4A05 25 B2    AND  $B2                   
 5373                                 4A07 D0 07    BNE  $4A10                 
 5374                                 4A09 A2 02    LDX  #$02                  
 5375                                 4A0B 86 05    STX  $05                   
 5376                                 4A0D 8D AC 49 STA  $49AC                 
 5377 t01 t00 t80 t02 t11 t81         4A10 AC FB 7F LDY  $7FFB                 
 5378 t01 t00 t80 t02 t11 t81         4A13 30 06    BMI  $4A1B                 
 5379 t01 t00 t80 t02 t11 t81         4A15 4C 6B 4B JMP  $4B6B                 
 5380                                 4A18 4C 38 4B JMP  $4B38                 
 5381                                 4A1B 4E FB 7F LSR  $7FFB                 
 5382                                 4A1E 46 E2    LSR  $E2                   
 5383                                 4A20 20 22 F8 JSR  _and_rts              
 5384                                 4A23 24 D3    BIT  $D3                   
 5385                                 4A25 30 26    BMI  $4A4D                 
 5386                                 4A27 70 18    BVS  $4A41                 
 5387                                 4A29 B9 00 F3 LDA  char_translate_tbl,Y  
 5388                                 4A2C 29 7F    AND  #$7F                  
 5389                                 4A2E D0 1D    BNE  $4A4D                 
 5390                                 4A30 85 13    STA  $13                   
 5391                                 4A32 8D 93 7F STA  $7F93                 
 5392                                 4A35 AD B2 23 LDA  $23B2                 
 5393                                 4A38 8D 46 2F STA  $2F46                 
 5394                                 4A3B AD B1 23 LDA  $23B1                 
 5395                                 4A3E 8D 45 2F STA  $2F45                 
 5396                                 4A41 4C 6B 4B JMP  $4B6B                 
 5397                                 4A44 50 FB    BVC  $4A41                 
 5398                                 4A46 D0 35    BNE  $4A7D                 
 5399                                 4A48 EE 07 4B INC  $4B07                 
 5400                                 4A4B B0 F4    BCS  $4A41                 
 5401                                 4A4D B9 00 F3 LDA  char_translate_tbl,Y  
 5402                                 4A50 30 65    BMI  $4AB7                 
 5403                                 4A52 24 BB    BIT  $BB                   
 5404                                 4A54 30 0F    BMI  $4A65                 
 5405                                 4A56 B8       CLV                        
 5406                                 4A57 EE 33 7F INC  $7F33                 
 5407                                 4A5A C9 5E    CMP  #$5E                  
 5408                                 4A5C D0 07    BNE  $4A65                 
 5409                                 4A5E A0 00    LDY  #$00                  
 5410                                 4A60 F0 DF    BEQ  $4A41                 
 5411                                 4A62 CE 5F 4A DEC  $4A5F                 
 5412                                 4A65 A4 83    LDY  $83                   
 5413                                 4A67 C9 7D    CMP  #$7D                  
 5414                                 4A69 B0 D9    BCS  $4A44                 
 5415                                 4A6B C0 00    CPY  #$00                  
 5416                                 4A6D D0 0E    BNE  $4A7D                 
 5417                                 4A6F 70 0C    BVS  $4A7D                 
 5418                                 4A71 C9 2F    CMP  #$2F                  
 5419                                 4A73 D0 03    BNE  $4A78                 
 5420                                 4A75 8C 93 7F STY  $7F93                 
 5421                                 4A78 AC 93 7F LDY  $7F93                 
 5422                                 4A7B 84 83    STY  $83                   
 5423                                 4A7D 99 00 0B STA  inbuf_line3,Y         
 5424                                 4A80 C9 0D    CMP  #$0D                  
 5425                                 4A82 F0 3C    BEQ  $4AC0                 
 5426                                 4A84 CC EB 7E CPY  $7EEB                 
 5427                                 4A87 90 08    BCC  $4A91                 
 5428                                 4A89 70 29    BVS  $4AB4                 
 5429                                 4A8B 24 4B    BIT  $4B                   
 5430                                 4A8D 10 15    BPL  $4AA4                 
 5431                                 4A8F 30 1E    BMI  $4AAF                 
 5432                                 4A91 E6 83    INC  $83                   
 5433                                 4A93 C9 08    CMP  #$08                  
 5434                                 4A95 D0 AA    BNE  $4A41                 
 5435                                 4A97 98       TYA                        
 5436                                 4A98 D0 05    BNE  $4A9F                 
 5437                                 4A9A A5 3B    LDA  $3B                   
 5438                                 4A9C 10 22    BPL  $4AC0                 
 5439                                 4A9E C8       INY                        
 5440                                 4A9F 4D 93 7F EOR  $7F93                 
 5441                                 4AA2 F0 18    BEQ  $4ABC                 
 5442                                 4AA4 88       DEY                        
 5443                                 4AA5 84 83    STY  $83                   
 5444                                 4AA7 C4 8B    CPY  $8B                   
 5445                                 4AA9 B0 09    BCS  $4AB4                 
 5446                                 4AAB 24 4B    BIT  $4B                   
 5447                                 4AAD 30 05    BMI  $4AB4                 
 5448                                 4AAF E6 DB    INC  $DB                   
 5449                                 4AB1 2C 85 A3 BIT  $A385                 
 5450                                 4AB4 4C 6B 4B JMP  $4B6B                 
 5451                                 4AB7 0A       ASL  A                     
 5452                                 4AB8 30 87    BMI  $4A41                 
 5453                                 4ABA D0 F6    BNE  $4AB2                 
 5454                                 4ABC 8D 93 7F STA  $7F93                 
 5455                                 4ABF A8       TAY                        
 5456                                 4AC0 A5 8B    LDA  $8B                   
 5457                                 4AC2 F0 0F    BEQ  $4AD3                 
 5458                                 4AC4 A5 4B    LDA  $4B                   
 5459                                 4AC6 30 07    BMI  $4ACF                 
 5460                                 4AC8 A9 0D    LDA  #$0D                  
 5461                                 4ACA 8D F3 7F STA  $7FF3                 
 5462                                 4ACD 85 63    STA  $63                   
 5463                                 4ACF A5 BB    LDA  $BB                   
 5464                                 4AD1 85 AB    STA  $AB                   
 5465                                 4AD3 A9 00    LDA  #$00                  
 5466                                 4AD5 C8       INY                        
 5467                                 4AD6 99 00 0B STA  inbuf_line3,Y         
 5468                                 4AD9 85 A3    STA  $A3                   
 5469                                 4ADB 85 83    STA  $83                   
 5470                                 4ADD 85 8B    STA  $8B                   
 5471                                 4ADF 85 DB    STA  $DB                   
 5472                                 4AE1 24 3B    BIT  $3B                   
 5473                                 4AE3 10 1E    BPL  $4B03                 
 5474                                 4AE5 A9 03    LDA  #$03                  
 5475                                 4AE7 20 00 58 JSR  $5800                 
 5476                                 4AEA 8D 45 2F STA  $2F45                 
 5477                                 4AED 8E 46 2F STX  $2F46                 
 5478                                 4AF0 8C 15 04 STY  $0415                 
 5479                                 4AF3 A0 03    LDY  #$03                  
 5480                                 4AF5 20 06 55 JSR  $5506                 
 5481                                 4AF8 8E 1B 01 STX  $011B                 
 5482                                 4AFB 4C 6B 4B JMP  $4B6B                 
 5483                                 4AFE A2 0B    LDX  #$0B                  
 5484                                 4B00 20 75 27 JSR  $2775                 
 5485                                 4B03 88       DEY                        
 5486                                 4B04 F0 62    BEQ  $4B68                 
 5487                                 4B06 A0 00    LDY  #$00                  
 5488                                 4B08 D0 F4    BNE  $4AFE                 
 5489                                 4B0A A9 08    LDA  #$08                  
 5490                                 4B0C 2D 7B 7F AND  $7F7B                 
 5491                                 4B0F 8D 5F 4A STA  $4A5F                 
 5492                                 4B12 84 F5    STY  $F5                   
 5493                                 4B14 EE 2B 7F INC  $7F2B                 
 5494                                 4B17 A6 B3    LDX  $B3                   
 5495                                 4B19 AD 00 0B LDA  inbuf_line3           
 5496                                 4B1C C9 2F    CMP  #$2F                  
 5497                                 4B1E D0 03    BNE  $4B23                 
 5498                                 4B20 4C 99 3F JMP  $3F99                 
 5499                                 4B23 BD A1 7F LDA  $7FA1,X               
 5500                                 4B26 30 43    BMI  $4B6B                 
 5501                                 4B28 24 BB    BIT  $BB                   
 5502                                 4B2A 10 02    BPL  $4B2E                 
 5503                                 4B2C A0 1C    LDY  #$1C                  
 5504                                 4B2E AD C3 7F LDA  $7FC3                 
 5505                                 4B31 24 90    BIT  $90                   
 5506                                 4B33 18       CLC                        
 5507                                 4B34 90 18    BCC  $4B4E                 
 5508                                 4B36 50 08    BVC  $4B40                 
 5509                                 4B38 B9 5F 02 LDA  $025F,Y               
 5510                                 4B3B D0 11    BNE  $4B4E                 
 5511                                 4B3D B8       CLV                        
 5512                                 4B3E A4 F5    LDY  $F5                   
 5513                                 4B40 B9 00 0B LDA  inbuf_line3,Y         
 5514                                 4B43 F0 18    BEQ  $4B5D                 
 5515                                 4B45 49 07    EOR  #$07                  
 5516                                 4B47 D0 03    BNE  $4B4C                 
 5517                                 4B49 B0 0E    BCS  $4B59                 
 5518                                 4B4B 38       SEC                        
 5519                                 4B4C 49 07    EOR  #$07                  
 5520                                 4B4E 81 C0    STA  ($C0,X)               
 5521                                 4B50 F6 C0    INC  $C0,X                 
 5522                                 4B52 D0 05    BNE  $4B59                 
 5523                                 4B54 08       PHP                        
 5524                                 4B55 20 D8 3A JSR  $3AD8                 
 5525                                 4B58 28       PLP                        
 5526                                 4B59 C8       INY                        
 5527                                 4B5A D0 DA    BNE  $4B36                 
 5528                                 4B5C 98       TYA                        
 5529                                 4B5D 81 C0    STA  ($C0,X)               
 5530                                 4B5F 8A       TXA                        
 5531                                 4B60 25 B3    AND  $B3                   
 5532                                 4B62 D0 07    BNE  $4B6B                 
 5533                                 4B64 A2 03    LDX  #$03                  
 5534                                 4B66 86 05    STX  $05                   
 5535                                 4B68 8D 07 4B STA  $4B07                 
 5536 t01 t00 t80 t02 t11 t81         4B6B AC FC 7F LDY  $7FFC                 
 5537 t01 t00 t80 t02 t11 t81         4B6E 30 06    BMI  $4B76                 
 5538 t01 t00 t80 t02 t11 t81         4B70 4C C6 4C JMP  $4CC6                 
 5539                                 4B73 4C 93 4C JMP  $4C93                 
 5540                                 4B76 4E FC 7F LSR  $7FFC                 
 5541                                 4B79 46 E2    LSR  $E2                   
 5542                                 4B7B 20 22 F8 JSR  _and_rts              
 5543                                 4B7E 24 D4    BIT  $D4                   
 5544                                 4B80 30 26    BMI  $4BA8                 
 5545                                 4B82 70 18    BVS  $4B9C                 
 5546                                 4B84 B9 00 F3 LDA  char_translate_tbl,Y  
 5547                                 4B87 29 7F    AND  #$7F                  
 5548                                 4B89 D0 1D    BNE  $4BA8                 
 5549                                 4B8B 85 14    STA  $14                   
 5550                                 4B8D 8D 94 7F STA  $7F94                 
 5551                                 4B90 AD B2 23 LDA  $23B2                 
 5552                                 4B93 8D 63 31 STA  $3163                 
 5553                                 4B96 AD B1 23 LDA  $23B1                 
 5554                                 4B99 8D 62 31 STA  $3162                 
 5555                                 4B9C 4C C6 4C JMP  $4CC6                 
 5556                                 4B9F 50 FB    BVC  $4B9C                 
 5557                                 4BA1 D0 35    BNE  $4BD8                 
 5558                                 4BA3 EE 62 4C INC  $4C62                 
 5559                                 4BA6 B0 F4    BCS  $4B9C                 
 5560                                 4BA8 B9 00 F3 LDA  char_translate_tbl,Y  
 5561                                 4BAB 30 65    BMI  $4C12                 
 5562                                 4BAD 24 BC    BIT  $BC                   
 5563                                 4BAF 30 0F    BMI  $4BC0                 
 5564                                 4BB1 B8       CLV                        
 5565                                 4BB2 EE 34 7F INC  $7F34                 
 5566                                 4BB5 C9 5E    CMP  #$5E                  
 5567                                 4BB7 D0 07    BNE  $4BC0                 
 5568                                 4BB9 A0 00    LDY  #$00                  
 5569                                 4BBB F0 DF    BEQ  $4B9C                 
 5570                                 4BBD CE BA 4B DEC  $4BBA                 
 5571                                 4BC0 A4 84    LDY  $84                   
 5572                                 4BC2 C9 7D    CMP  #$7D                  
 5573                                 4BC4 B0 D9    BCS  $4B9F                 
 5574                                 4BC6 C0 00    CPY  #$00                  
 5575                                 4BC8 D0 0E    BNE  $4BD8                 
 5576                                 4BCA 70 0C    BVS  $4BD8                 
 5577                                 4BCC C9 2F    CMP  #$2F                  
 5578                                 4BCE D0 03    BNE  $4BD3                 
 5579                                 4BD0 8C 94 7F STY  $7F94                 
 5580                                 4BD3 AC 94 7F LDY  $7F94                 
 5581                                 4BD6 84 84    STY  $84                   
 5582                                 4BD8 99 00 0C STA  inbuf_line4,Y         
 5583                                 4BDB C9 0D    CMP  #$0D                  
 5584                                 4BDD F0 3C    BEQ  $4C1B                 
 5585                                 4BDF CC EC 7E CPY  $7EEC                 
 5586                                 4BE2 90 08    BCC  $4BEC                 
 5587                                 4BE4 70 29    BVS  $4C0F                 
 5588                                 4BE6 24 4C    BIT  $4C                   
 5589                                 4BE8 10 15    BPL  $4BFF                 
 5590                                 4BEA 30 1E    BMI  $4C0A                 
 5591                                 4BEC E6 84    INC  $84                   
 5592                                 4BEE C9 08    CMP  #$08                  
 5593                                 4BF0 D0 AA    BNE  $4B9C                 
 5594                                 4BF2 98       TYA                        
 5595                                 4BF3 D0 05    BNE  $4BFA                 
 5596                                 4BF5 A5 3C    LDA  $3C                   
 5597                                 4BF7 10 22    BPL  $4C1B                 
 5598                                 4BF9 C8       INY                        
 5599                                 4BFA 4D 94 7F EOR  $7F94                 
 5600                                 4BFD F0 18    BEQ  $4C17                 
 5601                                 4BFF 88       DEY                        
 5602                                 4C00 84 84    STY  $84                   
 5603                                 4C02 C4 8C    CPY  $8C                   
 5604                                 4C04 B0 09    BCS  $4C0F                 
 5605                                 4C06 24 4C    BIT  $4C                   
 5606                                 4C08 30 05    BMI  $4C0F                 
 5607                                 4C0A E6 DC    INC  $DC                   
 5608                                 4C0C 2C 85 A4 BIT  $A485                 
 5609                                 4C0F 4C C6 4C JMP  $4CC6                 
 5610                                 4C12 0A       ASL  A                     
 5611                                 4C13 30 87    BMI  $4B9C                 
 5612                                 4C15 D0 F6    BNE  $4C0D                 
 5613                                 4C17 8D 94 7F STA  $7F94                 
 5614                                 4C1A A8       TAY                        
 5615                                 4C1B A5 8C    LDA  $8C                   
 5616                                 4C1D F0 0F    BEQ  $4C2E                 
 5617                                 4C1F A5 4C    LDA  $4C                   
 5618                                 4C21 30 07    BMI  $4C2A                 
 5619                                 4C23 A9 0D    LDA  #$0D                  
 5620                                 4C25 8D F4 7F STA  $7FF4                 
 5621                                 4C28 85 64    STA  $64                   
 5622                                 4C2A A5 BC    LDA  $BC                   
 5623                                 4C2C 85 AC    STA  $AC                   
 5624                                 4C2E A9 00    LDA  #$00                  
 5625                                 4C30 C8       INY                        
 5626                                 4C31 99 00 0C STA  inbuf_line4,Y         
 5627                                 4C34 85 A4    STA  $A4                   
 5628                                 4C36 85 84    STA  $84                   
 5629                                 4C38 85 8C    STA  $8C                   
 5630                                 4C3A 85 DC    STA  $DC                   
 5631                                 4C3C 24 3C    BIT  $3C                   
 5632                                 4C3E 10 1E    BPL  $4C5E                 
 5633                                 4C40 A9 04    LDA  #$04                  
 5634                                 4C42 20 00 58 JSR  $5800                 
 5635                                 4C45 8D 62 31 STA  $3162                 
 5636                                 4C48 8E 63 31 STX  $3163                 
 5637                                 4C4B 8C 19 04 STY  $0419                 
 5638                                 4C4E A0 04    LDY  #$04                  
 5639                                 4C50 20 06 55 JSR  $5506                 
 5640                                 4C53 8E 24 01 STX  $0124                 
 5641                                 4C56 4C C6 4C JMP  $4CC6                 
 5642                                 4C59 A2 0C    LDX  #$0C                  
 5643                                 4C5B 20 75 27 JSR  $2775                 
 5644                                 4C5E 88       DEY                        
 5645                                 4C5F F0 62    BEQ  $4CC3                 
 5646                                 4C61 A0 00    LDY  #$00                  
 5647                                 4C63 D0 F4    BNE  $4C59                 
 5648                                 4C65 A9 08    LDA  #$08                  
 5649                                 4C67 2D 7C 7F AND  $7F7C                 
 5650                                 4C6A 8D BA 4B STA  $4BBA                 
 5651                                 4C6D 84 F5    STY  $F5                   
 5652                                 4C6F EE 2C 7F INC  $7F2C                 
 5653                                 4C72 A6 B4    LDX  $B4                   
 5654                                 4C74 AD 00 0C LDA  inbuf_line4           
 5655                                 4C77 C9 2F    CMP  #$2F                  
 5656                                 4C79 D0 03    BNE  $4C7E                 
 5657                                 4C7B 4C 26 41 JMP  $4126                 
 5658                                 4C7E BD A1 7F LDA  $7FA1,X               
 5659                                 4C81 30 43    BMI  $4CC6                 
 5660                                 4C83 24 BC    BIT  $BC                   
 5661                                 4C85 10 02    BPL  $4C89                 
 5662                                 4C87 A0 1C    LDY  #$1C                  
 5663                                 4C89 AD C4 7F LDA  $7FC4                 
 5664                                 4C8C 24 90    BIT  $90                   
 5665                                 4C8E 18       CLC                        
 5666                                 4C8F 90 18    BCC  $4CA9                 
 5667                                 4C91 50 08    BVC  $4C9B                 
 5668                                 4C93 B9 7F 02 LDA  $027F,Y               
 5669                                 4C96 D0 11    BNE  $4CA9                 
 5670                                 4C98 B8       CLV                        
 5671                                 4C99 A4 F5    LDY  $F5                   
 5672                                 4C9B B9 00 0C LDA  inbuf_line4,Y         
 5673                                 4C9E F0 18    BEQ  $4CB8                 
 5674                                 4CA0 49 07    EOR  #$07                  
 5675                                 4CA2 D0 03    BNE  $4CA7                 
 5676                                 4CA4 B0 0E    BCS  $4CB4                 
 5677                                 4CA6 38       SEC                        
 5678                                 4CA7 49 07    EOR  #$07                  
 5679                                 4CA9 81 C0    STA  ($C0,X)               
 5680                                 4CAB F6 C0    INC  $C0,X                 
 5681                                 4CAD D0 05    BNE  $4CB4                 
 5682                                 4CAF 08       PHP                        
 5683                                 4CB0 20 D8 3A JSR  $3AD8                 
 5684                                 4CB3 28       PLP                        
 5685                                 4CB4 C8       INY                        
 5686                                 4CB5 D0 DA    BNE  $4C91                 
 5687                                 4CB7 98       TYA                        
 5688                                 4CB8 81 C0    STA  ($C0,X)               
 5689                                 4CBA 8A       TXA                        
 5690                                 4CBB 25 B4    AND  $B4                   
 5691                                 4CBD D0 07    BNE  $4CC6                 
 5692                                 4CBF A2 04    LDX  #$04                  
 5693                                 4CC1 86 05    STX  $05                   
 5694                                 4CC3 8D 62 4C STA  $4C62                 
 5695 t01 t00 t80 t02 t11 t81         4CC6 AC FD 7F LDY  $7FFD                 
 5696 t01 t00 t80 t02 t11 t81         4CC9 30 06    BMI  $4CD1                 
 5697 t01 t00 t80 t02 t11 t81         4CCB 4C 21 4E JMP  $4E21                 
 5698                                 4CCE 4C EE 4D JMP  $4DEE                 
 5699                                 4CD1 4E FD 7F LSR  $7FFD                 
 5700                                 4CD4 46 E2    LSR  $E2                   
 5701                                 4CD6 20 22 F8 JSR  _and_rts              
 5702                                 4CD9 24 D5    BIT  $D5                   
 5703                                 4CDB 30 26    BMI  $4D03                 
 5704                                 4CDD 70 18    BVS  $4CF7                 
 5705                                 4CDF B9 00 F3 LDA  char_translate_tbl,Y  
 5706                                 4CE2 29 7F    AND  #$7F                  
 5707                                 4CE4 D0 1D    BNE  $4D03                 
 5708                                 4CE6 85 15    STA  $15                   
 5709                                 4CE8 8D 95 7F STA  $7F95                 
 5710                                 4CEB AD B2 23 LDA  $23B2                 
 5711                                 4CEE 8D 80 33 STA  $3380                 
 5712                                 4CF1 AD B1 23 LDA  $23B1                 
 5713                                 4CF4 8D 7F 33 STA  $337F                 
 5714                                 4CF7 4C 21 4E JMP  $4E21                 
 5715                                 4CFA 50 FB    BVC  $4CF7                 
 5716                                 4CFC D0 35    BNE  $4D33                 
 5717                                 4CFE EE BD 4D INC  $4DBD                 
 5718                                 4D01 B0 F4    BCS  $4CF7                 
 5719                                 4D03 B9 00 F3 LDA  char_translate_tbl,Y  
 5720                                 4D06 30 65    BMI  $4D6D                 
 5721                                 4D08 24 BD    BIT  $BD                   
 5722                                 4D0A 30 0F    BMI  $4D1B                 
 5723                                 4D0C B8       CLV                        
 5724                                 4D0D EE 35 7F INC  $7F35                 
 5725                                 4D10 C9 5E    CMP  #$5E                  
 5726                                 4D12 D0 07    BNE  $4D1B                 
 5727                                 4D14 A0 00    LDY  #$00                  
 5728                                 4D16 F0 DF    BEQ  $4CF7                 
 5729                                 4D18 CE 15 4D DEC  $4D15                 
 5730                                 4D1B A4 85    LDY  $85                   
 5731                                 4D1D C9 7D    CMP  #$7D                  
 5732                                 4D1F B0 D9    BCS  $4CFA                 
 5733                                 4D21 C0 00    CPY  #$00                  
 5734                                 4D23 D0 0E    BNE  $4D33                 
 5735                                 4D25 70 0C    BVS  $4D33                 
 5736                                 4D27 C9 2F    CMP  #$2F                  
 5737                                 4D29 D0 03    BNE  $4D2E                 
 5738                                 4D2B 8C 95 7F STY  $7F95                 
 5739                                 4D2E AC 95 7F LDY  $7F95                 
 5740                                 4D31 84 85    STY  $85                   
 5741                                 4D33 99 00 0D STA  inbuf_line5,Y         
 5742                                 4D36 C9 0D    CMP  #$0D                  
 5743                                 4D38 F0 3C    BEQ  $4D76                 
 5744                                 4D3A CC ED 7E CPY  $7EED                 
 5745                                 4D3D 90 08    BCC  $4D47                 
 5746                                 4D3F 70 29    BVS  $4D6A                 
 5747                                 4D41 24 4D    BIT  $4D                   
 5748                                 4D43 10 15    BPL  $4D5A                 
 5749                                 4D45 30 1E    BMI  $4D65                 
 5750                                 4D47 E6 85    INC  $85                   
 5751                                 4D49 C9 08    CMP  #$08                  
 5752                                 4D4B D0 AA    BNE  $4CF7                 
 5753                                 4D4D 98       TYA                        
 5754                                 4D4E D0 05    BNE  $4D55                 
 5755                                 4D50 A5 3D    LDA  $3D                   
 5756                                 4D52 10 22    BPL  $4D76                 
 5757                                 4D54 C8       INY                        
 5758                                 4D55 4D 95 7F EOR  $7F95                 
 5759                                 4D58 F0 18    BEQ  $4D72                 
 5760                                 4D5A 88       DEY                        
 5761                                 4D5B 84 85    STY  $85                   
 5762                                 4D5D C4 8D    CPY  $8D                   
 5763                                 4D5F B0 09    BCS  $4D6A                 
 5764                                 4D61 24 4D    BIT  $4D                   
 5765                                 4D63 30 05    BMI  $4D6A                 
 5766                                 4D65 E6 DD    INC  $DD                   
 5767                                 4D67 2C 85 A5 BIT  $A585                 
 5768                                 4D6A 4C 21 4E JMP  $4E21                 
 5769                                 4D6D 0A       ASL  A                     
 5770                                 4D6E 30 87    BMI  $4CF7                 
 5771                                 4D70 D0 F6    BNE  $4D68                 
 5772                                 4D72 8D 95 7F STA  $7F95                 
 5773                                 4D75 A8       TAY                        
 5774                                 4D76 A5 8D    LDA  $8D                   
 5775                                 4D78 F0 0F    BEQ  $4D89                 
 5776                                 4D7A A5 4D    LDA  $4D                   
 5777                                 4D7C 30 07    BMI  $4D85                 
 5778                                 4D7E A9 0D    LDA  #$0D                  
 5779                                 4D80 8D F5 7F STA  $7FF5                 
 5780                                 4D83 85 65    STA  $65                   
 5781                                 4D85 A5 BD    LDA  $BD                   
 5782                                 4D87 85 AD    STA  $AD                   
 5783                                 4D89 A9 00    LDA  #$00                  
 5784                                 4D8B C8       INY                        
 5785                                 4D8C 99 00 0D STA  inbuf_line5,Y         
 5786                                 4D8F 85 A5    STA  $A5                   
 5787                                 4D91 85 85    STA  $85                   
 5788                                 4D93 85 8D    STA  $8D                   
 5789                                 4D95 85 DD    STA  $DD                   
 5790                                 4D97 24 3D    BIT  $3D                   
 5791                                 4D99 10 1E    BPL  $4DB9                 
 5792                                 4D9B A9 05    LDA  #$05                  
 5793                                 4D9D 20 00 58 JSR  $5800                 
 5794                                 4DA0 8D 7F 33 STA  $337F                 
 5795                                 4DA3 8E 80 33 STX  $3380                 
 5796                                 4DA6 8C 1D 04 STY  $041D                 
 5797                                 4DA9 A0 05    LDY  #$05                  
 5798                                 4DAB 20 06 55 JSR  $5506                 
 5799                                 4DAE 8E 2D 01 STX  $012D                 
 5800                                 4DB1 4C 21 4E JMP  $4E21                 
 5801                                 4DB4 A2 0D    LDX  #$0D                  
 5802                                 4DB6 20 75 27 JSR  $2775                 
 5803                                 4DB9 88       DEY                        
 5804                                 4DBA F0 62    BEQ  $4E1E                 
 5805                                 4DBC A0 00    LDY  #$00                  
 5806                                 4DBE D0 F4    BNE  $4DB4                 
 5807                                 4DC0 A9 08    LDA  #$08                  
 5808                                 4DC2 2D 7D 7F AND  $7F7D                 
 5809                                 4DC5 8D 15 4D STA  $4D15                 
 5810                                 4DC8 84 F5    STY  $F5                   
 5811                                 4DCA EE 2D 7F INC  $7F2D                 
 5812                                 4DCD A6 B5    LDX  $B5                   
 5813                                 4DCF AD 00 0D LDA  inbuf_line5           
 5814                                 4DD2 C9 2F    CMP  #$2F                  
 5815                                 4DD4 D0 03    BNE  $4DD9                 
 5816                                 4DD6 4C B3 42 JMP  $42B3                 
 5817                                 4DD9 BD A1 7F LDA  $7FA1,X               
 5818                                 4DDC 30 43    BMI  $4E21                 
 5819                                 4DDE 24 BD    BIT  $BD                   
 5820                                 4DE0 10 02    BPL  $4DE4                 
 5821                                 4DE2 A0 1C    LDY  #$1C                  
 5822                                 4DE4 AD C5 7F LDA  $7FC5                 
 5823                                 4DE7 24 90    BIT  $90                   
 5824                                 4DE9 18       CLC                        
 5825                                 4DEA 90 18    BCC  $4E04                 
 5826                                 4DEC 50 08    BVC  $4DF6                 
 5827                                 4DEE B9 9F 02 LDA  $029F,Y               
 5828                                 4DF1 D0 11    BNE  $4E04                 
 5829                                 4DF3 B8       CLV                        
 5830                                 4DF4 A4 F5    LDY  $F5                   
 5831                                 4DF6 B9 00 0D LDA  inbuf_line5,Y         
 5832                                 4DF9 F0 18    BEQ  $4E13                 
 5833                                 4DFB 49 07    EOR  #$07                  
 5834                                 4DFD D0 03    BNE  $4E02                 
 5835                                 4DFF B0 0E    BCS  $4E0F                 
 5836                                 4E01 38       SEC                        
 5837                                 4E02 49 07    EOR  #$07                  
 5838                                 4E04 81 C0    STA  ($C0,X)               
 5839                                 4E06 F6 C0    INC  $C0,X                 
 5840                                 4E08 D0 05    BNE  $4E0F                 
 5841                                 4E0A 08       PHP                        
 5842                                 4E0B 20 D8 3A JSR  $3AD8                 
 5843                                 4E0E 28       PLP                        
 5844                                 4E0F C8       INY                        
 5845                                 4E10 D0 DA    BNE  $4DEC                 
 5846                                 4E12 98       TYA                        
 5847                                 4E13 81 C0    STA  ($C0,X)               
 5848                                 4E15 8A       TXA                        
 5849                                 4E16 25 B5    AND  $B5                   
 5850                                 4E18 D0 07    BNE  $4E21                 
 5851                                 4E1A A2 05    LDX  #$05                  
 5852                                 4E1C 86 05    STX  $05                   
 5853                                 4E1E 8D BD 4D STA  $4DBD                 
 5854 t01 t00 t80 t02 t11 t81         4E21 AC FE 7F LDY  $7FFE                 
 5855 t01 t00 t80 t02 t11 t81         4E24 30 06    BMI  $4E2C                 
 5856 t01 t00 t80 t02 t11 t81         4E26 4C 7C 4F JMP  $4F7C                 
 5857                                 4E29 4C 49 4F JMP  $4F49                 
 5858                                 4E2C 4E FE 7F LSR  $7FFE                 
 5859                                 4E2F 46 E2    LSR  $E2                   
 5860                                 4E31 20 22 F8 JSR  _and_rts              
 5861                                 4E34 24 D6    BIT  $D6                   
 5862                                 4E36 30 26    BMI  $4E5E                 
 5863                                 4E38 70 18    BVS  $4E52                 
 5864                                 4E3A B9 00 F3 LDA  char_translate_tbl,Y  
 5865                                 4E3D 29 7F    AND  #$7F                  
 5866                                 4E3F D0 1D    BNE  $4E5E                 
 5867                                 4E41 85 16    STA  $16                   
 5868                                 4E43 8D 96 7F STA  $7F96                 
 5869                                 4E46 AD B2 23 LDA  $23B2                 
 5870                                 4E49 8D 9D 35 STA  $359D                 
 5871                                 4E4C AD B1 23 LDA  $23B1                 
 5872                                 4E4F 8D 9C 35 STA  $359C                 
 5873                                 4E52 4C 7C 4F JMP  $4F7C                 
 5874                                 4E55 50 FB    BVC  $4E52                 
 5875                                 4E57 D0 35    BNE  $4E8E                 
 5876                                 4E59 EE 18 4F INC  $4F18                 
 5877                                 4E5C B0 F4    BCS  $4E52                 
 5878                                 4E5E B9 00 F3 LDA  char_translate_tbl,Y  
 5879                                 4E61 30 65    BMI  $4EC8                 
 5880                                 4E63 24 BE    BIT  $BE                   
 5881                                 4E65 30 0F    BMI  $4E76                 
 5882                                 4E67 B8       CLV                        
 5883                                 4E68 EE 36 7F INC  $7F36                 
 5884                                 4E6B C9 5E    CMP  #$5E                  
 5885                                 4E6D D0 07    BNE  $4E76                 
 5886                                 4E6F A0 00    LDY  #$00                  
 5887                                 4E71 F0 DF    BEQ  $4E52                 
 5888                                 4E73 CE 70 4E DEC  $4E70                 
 5889                                 4E76 A4 86    LDY  $86                   
 5890                                 4E78 C9 7D    CMP  #$7D                  
 5891                                 4E7A B0 D9    BCS  $4E55                 
 5892                                 4E7C C0 00    CPY  #$00                  
 5893                                 4E7E D0 0E    BNE  $4E8E                 
 5894                                 4E80 70 0C    BVS  $4E8E                 
 5895                                 4E82 C9 2F    CMP  #$2F                  
 5896                                 4E84 D0 03    BNE  $4E89                 
 5897                                 4E86 8C 96 7F STY  $7F96                 
 5898                                 4E89 AC 96 7F LDY  $7F96                 
 5899                                 4E8C 84 86    STY  $86                   
 5900                                 4E8E 99 00 0E STA  inbuf_line6,Y         
 5901                                 4E91 C9 0D    CMP  #$0D                  
 5902                                 4E93 F0 3C    BEQ  $4ED1                 
 5903                                 4E95 CC EE 7E CPY  $7EEE                 
 5904                                 4E98 90 08    BCC  $4EA2                 
 5905                                 4E9A 70 29    BVS  $4EC5                 
 5906                                 4E9C 24 4E    BIT  $4E                   
 5907                                 4E9E 10 15    BPL  $4EB5                 
 5908                                 4EA0 30 1E    BMI  $4EC0                 
 5909                                 4EA2 E6 86    INC  $86                   
 5910                                 4EA4 C9 08    CMP  #$08                  
 5911                                 4EA6 D0 AA    BNE  $4E52                 
 5912                                 4EA8 98       TYA                        
 5913                                 4EA9 D0 05    BNE  $4EB0                 
 5914                                 4EAB A5 3E    LDA  $3E                   
 5915                                 4EAD 10 22    BPL  $4ED1                 
 5916                                 4EAF C8       INY                        
 5917                                 4EB0 4D 96 7F EOR  $7F96                 
 5918                                 4EB3 F0 18    BEQ  $4ECD                 
 5919                                 4EB5 88       DEY                        
 5920                                 4EB6 84 86    STY  $86                   
 5921                                 4EB8 C4 8E    CPY  $8E                   
 5922                                 4EBA B0 09    BCS  $4EC5                 
 5923                                 4EBC 24 4E    BIT  $4E                   
 5924                                 4EBE 30 05    BMI  $4EC5                 
 5925                                 4EC0 E6 DE    INC  $DE                   
 5926                                 4EC2 2C 85 A6 BIT  $A685                 
 5927                                 4EC5 4C 7C 4F JMP  $4F7C                 
 5928                                 4EC8 0A       ASL  A                     
 5929                                 4EC9 30 87    BMI  $4E52                 
 5930                                 4ECB D0 F6    BNE  $4EC3                 
 5931                                 4ECD 8D 96 7F STA  $7F96                 
 5932                                 4ED0 A8       TAY                        
 5933                                 4ED1 A5 8E    LDA  $8E                   
 5934                                 4ED3 F0 0F    BEQ  $4EE4                 
 5935                                 4ED5 A5 4E    LDA  $4E                   
 5936                                 4ED7 30 07    BMI  $4EE0                 
 5937                                 4ED9 A9 0D    LDA  #$0D                  
 5938                                 4EDB 8D F6 7F STA  $7FF6                 
 5939                                 4EDE 85 66    STA  $66                   
 5940                                 4EE0 A5 BE    LDA  $BE                   
 5941                                 4EE2 85 AE    STA  $AE                   
 5942                                 4EE4 A9 00    LDA  #$00                  
 5943                                 4EE6 C8       INY                        
 5944                                 4EE7 99 00 0E STA  inbuf_line6,Y         
 5945                                 4EEA 85 A6    STA  $A6                   
 5946                                 4EEC 85 86    STA  $86                   
 5947                                 4EEE 85 8E    STA  $8E                   
 5948                                 4EF0 85 DE    STA  $DE                   
 5949                                 4EF2 24 3E    BIT  $3E                   
 5950                                 4EF4 10 1E    BPL  $4F14                 
 5951                                 4EF6 A9 06    LDA  #$06                  
 5952                                 4EF8 20 00 58 JSR  $5800                 
 5953                                 4EFB 8D 9C 35 STA  $359C                 
 5954                                 4EFE 8E 9D 35 STX  $359D                 
 5955                                 4F01 8C 21 04 STY  $0421                 
 5956                                 4F04 A0 06    LDY  #$06                  
 5957                                 4F06 20 06 55 JSR  $5506                 
 5958                                 4F09 8E 36 01 STX  $0136                 
 5959                                 4F0C 4C 7C 4F JMP  $4F7C                 
 5960                                 4F0F A2 0E    LDX  #$0E                  
 5961                                 4F11 20 75 27 JSR  $2775                 
 5962                                 4F14 88       DEY                        
 5963                                 4F15 F0 62    BEQ  $4F79                 
 5964                                 4F17 A0 00    LDY  #$00                  
 5965                                 4F19 D0 F4    BNE  $4F0F                 
 5966                                 4F1B A9 08    LDA  #$08                  
 5967                                 4F1D 2D 7E 7F AND  $7F7E                 
 5968                                 4F20 8D 70 4E STA  $4E70                 
 5969                                 4F23 84 F5    STY  $F5                   
 5970                                 4F25 EE 2E 7F INC  $7F2E                 
 5971                                 4F28 A6 B6    LDX  $B6                   
 5972                                 4F2A AD 00 0E LDA  inbuf_line6           
 5973                                 4F2D C9 2F    CMP  #$2F                  
 5974                                 4F2F D0 03    BNE  $4F34                 
 5975                                 4F31 4C 40 44 JMP  $4440                 
 5976                                 4F34 BD A1 7F LDA  $7FA1,X               
 5977                                 4F37 30 43    BMI  $4F7C                 
 5978                                 4F39 24 BE    BIT  $BE                   
 5979                                 4F3B 10 02    BPL  $4F3F                 
 5980                                 4F3D A0 1C    LDY  #$1C                  
 5981                                 4F3F AD C6 7F LDA  $7FC6                 
 5982                                 4F42 24 90    BIT  $90                   
 5983                                 4F44 18       CLC                        
 5984                                 4F45 90 18    BCC  $4F5F                 
 5985                                 4F47 50 08    BVC  $4F51                 
 5986                                 4F49 B9 BF 02 LDA  $02BF,Y               
 5987                                 4F4C D0 11    BNE  $4F5F                 
 5988                                 4F4E B8       CLV                        
 5989                                 4F4F A4 F5    LDY  $F5                   
 5990                                 4F51 B9 00 0E LDA  inbuf_line6,Y         
 5991                                 4F54 F0 18    BEQ  $4F6E                 
 5992                                 4F56 49 07    EOR  #$07                  
 5993                                 4F58 D0 03    BNE  $4F5D                 
 5994                                 4F5A B0 0E    BCS  $4F6A                 
 5995                                 4F5C 38       SEC                        
 5996                                 4F5D 49 07    EOR  #$07                  
 5997                                 4F5F 81 C0    STA  ($C0,X)               
 5998                                 4F61 F6 C0    INC  $C0,X                 
 5999                                 4F63 D0 05    BNE  $4F6A                 
 6000                                 4F65 08       PHP                        
 6001                                 4F66 20 D8 3A JSR  $3AD8                 
 6002                                 4F69 28       PLP                        
 6003                                 4F6A C8       INY                        
 6004                                 4F6B D0 DA    BNE  $4F47                 
 6005                                 4F6D 98       TYA                        
 6006                                 4F6E 81 C0    STA  ($C0,X)               
 6007                                 4F70 8A       TXA                        
 6008                                 4F71 25 B6    AND  $B6                   
 6009                                 4F73 D0 07    BNE  $4F7C                 
 6010                                 4F75 A2 06    LDX  #$06                  
 6011                                 4F77 86 05    STX  $05                   
 6012                                 4F79 8D 18 4F STA  $4F18                 
 6013 t01 t00 t80 t02 t11 t81         4F7C AC FF 7F LDY  $7FFF                 
 6014 t01 t00 t80 t02 t11 t81         4F7F 30 06    BMI  $4F87                 
 6015 t01 t00 t80 t02 t11 t81         4F81 4C D7 50 JMP  $50D7                 
 6016                                 4F84 4C A4 50 JMP  $50A4                 
 6017                                 4F87 4E FF 7F LSR  $7FFF                 
 6018                                 4F8A 46 E2    LSR  $E2                   
 6019                                 4F8C 20 22 F8 JSR  _and_rts              
 6020                                 4F8F 24 D7    BIT  $D7                   
 6021                                 4F91 30 26    BMI  $4FB9                 
 6022                                 4F93 70 18    BVS  $4FAD                 
 6023                                 4F95 B9 00 F3 LDA  char_translate_tbl,Y  
 6024                                 4F98 29 7F    AND  #$7F                  
 6025                                 4F9A D0 1D    BNE  $4FB9                 
 6026                                 4F9C 85 17    STA  $17                   
 6027                                 4F9E 8D 97 7F STA  $7F97                 
 6028                                 4FA1 AD B2 23 LDA  $23B2                 
 6029                                 4FA4 8D BA 37 STA  $37BA                 
 6030                                 4FA7 AD B1 23 LDA  $23B1                 
 6031                                 4FAA 8D B9 37 STA  $37B9                 
 6032                                 4FAD 4C D7 50 JMP  $50D7                 
 6033                                 4FB0 50 FB    BVC  $4FAD                 
 6034                                 4FB2 D0 35    BNE  $4FE9                 
 6035                                 4FB4 EE 73 50 INC  $5073                 
 6036                                 4FB7 B0 F4    BCS  $4FAD                 
 6037                                 4FB9 B9 00 F3 LDA  char_translate_tbl,Y  
 6038                                 4FBC 30 65    BMI  $5023                 
 6039                                 4FBE 24 BF    BIT  $BF                   
 6040                                 4FC0 30 0F    BMI  $4FD1                 
 6041                                 4FC2 B8       CLV                        
 6042                                 4FC3 EE 37 7F INC  $7F37                 
 6043                                 4FC6 C9 5E    CMP  #$5E                  
 6044                                 4FC8 D0 07    BNE  $4FD1                 
 6045                                 4FCA A0 00    LDY  #$00                  
 6046                                 4FCC F0 DF    BEQ  $4FAD                 
 6047                                 4FCE CE CB 4F DEC  $4FCB                 
 6048                                 4FD1 A4 87    LDY  $87                   
 6049                                 4FD3 C9 7D    CMP  #$7D                  
 6050                                 4FD5 B0 D9    BCS  $4FB0                 
 6051                                 4FD7 C0 00    CPY  #$00                  
 6052                                 4FD9 D0 0E    BNE  $4FE9                 
 6053                                 4FDB 70 0C    BVS  $4FE9                 
 6054                                 4FDD C9 2F    CMP  #$2F                  
 6055                                 4FDF D0 03    BNE  $4FE4                 
 6056                                 4FE1 8C 97 7F STY  $7F97                 
 6057                                 4FE4 AC 97 7F LDY  $7F97                 
 6058                                 4FE7 84 87    STY  $87                   
 6059                                 4FE9 99 00 0F STA  inbuf_line7,Y         
 6060                                 4FEC C9 0D    CMP  #$0D                  
 6061                                 4FEE F0 3C    BEQ  $502C                 
 6062                                 4FF0 CC EF 7E CPY  $7EEF                 
 6063                                 4FF3 90 08    BCC  $4FFD                 
 6064                                 4FF5 70 29    BVS  $5020                 
 6065                                 4FF7 24 4F    BIT  $4F                   
 6066                                 4FF9 10 15    BPL  $5010                 
 6067                                 4FFB 30 1E    BMI  $501B                 
 6068                                 4FFD E6 87    INC  $87                   
 6069                                 4FFF C9 08    CMP  #$08                  
 6070                                 5001 D0 AA    BNE  $4FAD                 
 6071                                 5003 98       TYA                        
 6072                                 5004 D0 05    BNE  $500B                 
 6073                                 5006 A5 3F    LDA  $3F                   
 6074                                 5008 10 22    BPL  $502C                 
 6075                                 500A C8       INY                        
 6076                                 500B 4D 97 7F EOR  $7F97                 
 6077                                 500E F0 18    BEQ  $5028                 
 6078                                 5010 88       DEY                        
 6079                                 5011 84 87    STY  $87                   
 6080                                 5013 C4 8F    CPY  $8F                   
 6081                                 5015 B0 09    BCS  $5020                 
 6082                                 5017 24 4F    BIT  $4F                   
 6083                                 5019 30 05    BMI  $5020                 
 6084                                 501B E6 DF    INC  $DF                   
 6085                                 501D 2C 85 A7 BIT  $A785                 
 6086                                 5020 4C D7 50 JMP  $50D7                 
 6087                                 5023 0A       ASL  A                     
 6088                                 5024 30 87    BMI  $4FAD                 
 6089                                 5026 D0 F6    BNE  $501E                 
 6090                                 5028 8D 97 7F STA  $7F97                 
 6091                                 502B A8       TAY                        
 6092                                 502C A5 8F    LDA  $8F                   
 6093                                 502E F0 0F    BEQ  $503F                 
 6094                                 5030 A5 4F    LDA  $4F                   
 6095                                 5032 30 07    BMI  $503B                 
 6096                                 5034 A9 0D    LDA  #$0D                  
 6097                                 5036 8D F7 7F STA  $7FF7                 
 6098                                 5039 85 67    STA  $67                   
 6099                                 503B A5 BF    LDA  $BF                   
 6100                                 503D 85 AF    STA  $AF                   
 6101                                 503F A9 00    LDA  #$00                  
 6102                                 5041 C8       INY                        
 6103                                 5042 99 00 0F STA  inbuf_line7,Y         
 6104                                 5045 85 A7    STA  $A7                   
 6105                                 5047 85 87    STA  $87                   
 6106                                 5049 85 8F    STA  $8F                   
 6107                                 504B 85 DF    STA  $DF                   
 6108                                 504D 24 3F    BIT  $3F                   
 6109                                 504F 10 1E    BPL  $506F                 
 6110                                 5051 A9 07    LDA  #$07                  
 6111                                 5053 20 00 58 JSR  $5800                 
 6112                                 5056 8D B9 37 STA  $37B9                 
 6113                                 5059 8E BA 37 STX  $37BA                 
 6114                                 505C 8C 25 04 STY  $0425                 
 6115                                 505F A0 07    LDY  #$07                  
 6116                                 5061 20 06 55 JSR  $5506                 
 6117                                 5064 8E 3F 01 STX  $013F                 
 6118                                 5067 4C D7 50 JMP  $50D7                 
 6119                                 506A A2 0F    LDX  #$0F                  
 6120                                 506C 20 75 27 JSR  $2775                 
 6121                                 506F 88       DEY                        
 6122                                 5070 F0 62    BEQ  $50D4                 
 6123                                 5072 A0 00    LDY  #$00                  
 6124                                 5074 D0 F4    BNE  $506A                 
 6125                                 5076 A9 08    LDA  #$08                  
 6126                                 5078 2D 7F 7F AND  $7F7F                 
 6127                                 507B 8D CB 4F STA  $4FCB                 
 6128                                 507E 84 F5    STY  $F5                   
 6129                                 5080 EE 2F 7F INC  $7F2F                 
 6130                                 5083 A6 B7    LDX  $B7                   
 6131                                 5085 AD 00 0F LDA  inbuf_line7           
 6132                                 5088 C9 2F    CMP  #$2F                  
 6133                                 508A D0 03    BNE  $508F                 
 6134                                 508C 4C CD 45 JMP  $45CD                 
 6135                                 508F BD A1 7F LDA  $7FA1,X               
 6136                                 5092 30 43    BMI  $50D7                 
 6137                                 5094 24 BF    BIT  $BF                   
 6138                                 5096 10 02    BPL  $509A                 
 6139                                 5098 A0 1C    LDY  #$1C                  
 6140                                 509A AD C7 7F LDA  $7FC7                 
 6141                                 509D 24 90    BIT  $90                   
 6142                                 509F 18       CLC                        
 6143                                 50A0 90 18    BCC  $50BA                 
 6144                                 50A2 50 08    BVC  $50AC                 
 6145                                 50A4 B9 DF 02 LDA  $02DF,Y               
 6146                                 50A7 D0 11    BNE  $50BA                 
 6147                                 50A9 B8       CLV                        
 6148                                 50AA A4 F5    LDY  $F5                   
 6149                                 50AC B9 00 0F LDA  inbuf_line7,Y         
 6150                                 50AF F0 18    BEQ  $50C9                 
 6151                                 50B1 49 07    EOR  #$07                  
 6152                                 50B3 D0 03    BNE  $50B8                 
 6153                                 50B5 B0 0E    BCS  $50C5                 
 6154                                 50B7 38       SEC                        
 6155                                 50B8 49 07    EOR  #$07                  
 6156                                 50BA 81 C0    STA  ($C0,X)               
 6157                                 50BC F6 C0    INC  $C0,X                 
 6158                                 50BE D0 05    BNE  $50C5                 
 6159                                 50C0 08       PHP                        
 6160                                 50C1 20 D8 3A JSR  $3AD8                 
 6161                                 50C4 28       PLP                        
 6162                                 50C5 C8       INY                        
 6163                                 50C6 D0 DA    BNE  $50A2                 
 6164                                 50C8 98       TYA                        
 6165                                 50C9 81 C0    STA  ($C0,X)               
 6166                                 50CB 8A       TXA                        
 6167                                 50CC 25 B7    AND  $B7                   
 6168                                 50CE D0 07    BNE  $50D7                 
 6169                                 50D0 A2 07    LDX  #$07                  
 6170                                 50D2 86 05    STX  $05                   
 6171                                 50D4 8D 73 50 STA  $5073                 
 6172 t01 t00 t80 t02 t11 t81         50D7 A9 00    LDA  #$00                  
 6173 t01 t00 t80 t02 t11 t81         50D9 8D FF 57 STA  $57FF                 
 6174 t01 t00 t80 t02 t11 t81         50DC 20 53 18 JSR  $1853                 
 6175 t01 t00 t80 t02 t11 t81         50DF 30 06    BMI  $50E7                 
 6176 t01 t00 t80 t02 t11 t81         50E1 4C 0B 52 JMP  $520B                 
 6177                                 50E4 4C D8 51 JMP  $51D8                 
 6178 t00 t80                         50E7 4E F8 7F LSR  _mdm_inbuf_tbl        
 6179     t00 t80                     50EA 46 E2    LSR  $E2                   
 6180     t00 t80                     50EC 20 22 F8 JSR  _and_rts              
 6181     t00 t80                     50EF 24 D0    BIT  $D0                   
 6182     t00 t80                     50F1 30 1D    BMI  $5110                 
 6183                                 50F3 70 18    BVS  $510D                 
 6184                                 50F5 B9 00 F3 LDA  char_translate_tbl,Y  
 6185                                 50F8 29 7F    AND  #$7F                  
 6186                                 50FA D0 14    BNE  $5110                 
 6187                                 50FC 85 10    STA  $10                   
 6188                                 50FE 8D 90 7F STA  $7F90                 
 6189                                 5101 AD B2 23 LDA  $23B2                 
 6190                                 5104 8D 0D 29 STA  $290D                 
 6191                                 5107 AD B1 23 LDA  $23B1                 
 6192                                 510A 8D 0C 29 STA  $290C                 
 6193                                 510D 4C 0B 52 JMP  $520B                 
 6194     t00 t80                     5110 B9 00 F3 LDA  char_translate_tbl,Y  
 6195     t00 t80                     5113 30 4E    BMI  $5163                 
 6196     t00 t80                     5115 A4 80    LDY  $80                   
 6197     t00 t80                     5117 C9 7D    CMP  #$7D                  
 6198     t00 t80                     5119 B0 F2    BCS  $510D                 
 6199     t00 t80                     511B C0 00    CPY  #$00                  
 6200     t00 t80                     511D D0 0C    BNE  $512B                 
 6201     t00 t80                     511F C9 2F    CMP  #$2F                  
 6202     t00 t80                     5121 D0 03    BNE  $5126                 
 6203                                 5123 8C 90 7F STY  $7F90                 
 6204     t00 t80                     5126 AC 90 7F LDY  $7F90                 
 6205     t00 t80                     5129 84 80    STY  $80                   
 6206     t00 t80                     512B 99 00 08 STA  inbuf_line0,Y         
 6207     t00 t80                     512E C9 0D    CMP  #$0D                  
 6208     t00 t80                     5130 F0 3A    BEQ  $516C                 
 6209     t00 t80                     5132 CC E8 7E CPY  $7EE8                 
 6210     t00 t80                     5135 90 06    BCC  $513D                 
 6211                                 5137 24 48    BIT  $48                   
 6212                                 5139 10 15    BPL  $5150                 
 6213                                 513B 30 1E    BMI  $515B                 
 6214     t00 t80                     513D E6 80    INC  $80                   
 6215     t00 t80                     513F C9 08    CMP  #$08                  
 6216     t00 t80                     5141 D0 CA    BNE  $510D                 
 6217     t00 t80                     5143 98       TYA                        
 6218     t00 t80                     5144 D0 05    BNE  $514B                 
 6219     t00 t80                     5146 A5 38    LDA  $38                   
 6220     t00 t80                     5148 10 22    BPL  $516C                 
 6221                                 514A C8       INY                        
 6222                                 514B 4D 90 7F EOR  $7F90                 
 6223                                 514E F0 18    BEQ  $5168                 
 6224                                 5150 88       DEY                        
 6225                                 5151 84 80    STY  $80                   
 6226                                 5153 C4 88    CPY  $88                   
 6227                                 5155 B0 09    BCS  $5160                 
 6228                                 5157 24 48    BIT  $48                   
 6229                                 5159 30 05    BMI  $5160                 
 6230                                 515B E6 D8    INC  $D8                   
 6231                                 515D 2C 85 A0 BIT  $A085                 
 6232                                 5160 4C 0B 52 JMP  $520B                 
 6233                                 5163 0A       ASL  A                     
 6234                                 5164 30 A7    BMI  $510D                 
 6235                                 5166 D0 F6    BNE  $515E                 
 6236                                 5168 8D 90 7F STA  $7F90                 
 6237                                 516B A8       TAY                        
 6238     t00 t80                     516C A5 88    LDA  $88                   
 6239     t00 t80                     516E F0 0D    BEQ  $517D                 
 6240                                 5170 A5 48    LDA  $48                   
 6241                                 5172 30 05    BMI  $5179                 
 6242                                 5174 A9 0D    LDA  #$0D                  
 6243                                 5176 20 02 60 JSR  $6002                 
 6244                                 5179 A5 B8    LDA  $B8                   
 6245                                 517B 85 A8    STA  $A8                   
 6246     t00 t80                     517D A9 00    LDA  #$00                  
 6247     t00 t80                     517F C8       INY                        
 6248     t00 t80                     5180 99 00 08 STA  inbuf_line0,Y         
 6249     t00 t80                     5183 85 A0    STA  $A0                   
 6250     t00 t80                     5185 85 80    STA  $80                   
 6251     t00 t80                     5187 85 88    STA  $88                   
 6252     t00 t80                     5189 85 D8    STA  $D8                   
 6253     t00 t80                     518B 24 38    BIT  $38                   
 6254     t00 t80                     518D 10 1B    BPL  $51AA                 
 6255     t00 t80                     518F A9 00    LDA  #$00                  
 6256     t00 t80                     5191 20 00 58 JSR  $5800                 
 6257     t00 t80                     5194 8D 0C 29 STA  $290C                 ; self modify 290b - low B2, high 58 "PASSWORD needed for .."
 6258     t00 t80                     5197 8E 0D 29 STX  $290D                 
 6259     t00 t80                     519A A0 00    LDY  #$00                  
 6260     t00 t80                     519C 20 06 55 JSR  $5506                 
 6261     t00 t80                     519F 8E 00 01 STX  $0100                 
 6262     t00 t80                     51A2 4C 0B 52 JMP  $520B                 
 6263                                 51A5 A2 08    LDX  #$08                  
 6264                                 51A7 20 75 27 JSR  $2775                 
 6265     t00 t80                     51AA 88       DEY                        
 6266     t00 t80                     51AB F0 5B    BEQ  $5208                 
 6267                                 51AD A0 00    LDY  #$00                  
 6268                                 51AF D0 F4    BNE  $51A5                 
 6269                                 51B1 84 F5    STY  $F5                   
 6270                                 51B3 EE 28 7F INC  $7F28                 
 6271                                 51B6 A6 B0    LDX  $B0                   
 6272                                 51B8 AD 00 08 LDA  inbuf_line0           
 6273                                 51BB C9 2F    CMP  #$2F                  
 6274                                 51BD D0 03    BNE  $51C2                 
 6275                                 51BF 4C E6 3A JMP  $3AE6                 
 6276                                 51C2 A9 08    LDA  #$08                  
 6277                                 51C4 85 E4    STA  $E4                   
 6278                                 51C6 AD 80 04 LDA  cons_line2/line0channel 
 6279                                 51C9 09 80    ORA  #$80                  
 6280                                 51CB 8D 80 04 STA  cons_line2/line0channel 
 6281                                 51CE AD C0 7F LDA  $7FC0                 
 6282                                 51D1 24 90    BIT  $90                   
 6283                                 51D3 18       CLC                        
 6284                                 51D4 90 18    BCC  $51EE                 
 6285                                 51D6 50 08    BVC  $51E0                 
 6286                                 51D8 B9 FF 01 LDA  $01FF,Y               
 6287                                 51DB D0 11    BNE  $51EE                 
 6288                                 51DD B8       CLV                        
 6289                                 51DE A4 F5    LDY  $F5                   
 6290                                 51E0 B9 00 08 LDA  inbuf_line0,Y         
 6291                                 51E3 F0 18    BEQ  $51FD                 
 6292                                 51E5 49 07    EOR  #$07                  
 6293                                 51E7 D0 03    BNE  $51EC                 
 6294                                 51E9 B0 0E    BCS  $51F9                 
 6295                                 51EB 38       SEC                        
 6296                                 51EC 49 07    EOR  #$07                  
 6297                                 51EE 81 C0    STA  ($C0,X)               
 6298                                 51F0 F6 C0    INC  $C0,X                 
 6299                                 51F2 D0 05    BNE  $51F9                 
 6300                                 51F4 08       PHP                        
 6301                                 51F5 20 D8 3A JSR  $3AD8                 
 6302                                 51F8 28       PLP                        
 6303                                 51F9 C8       INY                        
 6304                                 51FA D0 DA    BNE  $51D6                 
 6305                                 51FC 98       TYA                        
 6306                                 51FD 81 C0    STA  ($C0,X)               
 6307                                 51FF 8A       TXA                        
 6308                                 5200 25 B0    AND  $B0                   
 6309                                 5202 D0 07    BNE  $520B                 
 6310                                 5204 A2 00    LDX  #$00                  
 6311                                 5206 86 05    STX  $05                   
 6312     t00 t80                     5208 8D AE 51 STA  $51AE                 
 6313 t01 t00 t80 t02 t11 t81         520B 60       RTS                        
 6314     t00 t80                     520C A6 FF    LDX  $FF                   
 6315     t00 t80                     520E F0 17    BEQ  $5227                 
 6316                                 5210 10 02    BPL  $5214                 
 6317                                 5212 A2 09    LDX  #$09                  
 6318                                 5214 CA       DEX                        
 6319                                 5215 86 FF    STX  $FF                   
 6320                                 5217 D0 0E    BNE  $5227                 
 6321                                 5219 86 29    STX  $29                   
 6322                                 521B 86 2A    STX  $2A                   
 6323                                 521D 86 2B    STX  $2B                   
 6324                                 521F 86 2C    STX  $2C                   
 6325                                 5221 86 2D    STX  $2D                   
 6326                                 5223 86 2E    STX  $2E                   
 6327                                 5225 86 2F    STX  $2F                   
 6328     t00 t80                     5227 A5 E6    LDA  $E6                   
 6329     t00 t80                     5229 29 07    AND  #$07                  
 6330     t00 t80                     522B F0 17    BEQ  $5244                 
 6331                                 522D AA       TAX                        
 6332                                 522E A5 E6    LDA  $E6                   
 6333                                 5230 18       CLC                        
 6334                                 5231 69 08    ADC  #$08                  
 6335                                 5233 90 02    BCC  $5237                 
 6336                                 5235 A9 00    LDA  #$00                  
 6337                                 5237 85 E6    STA  $E6                   
 6338                                 5239 29 08    AND  #$08                  
 6339                                 523B 4A       LSR  A                     
 6340                                 523C 4A       LSR  A                     
 6341                                 523D D0 02    BNE  $5241                 
 6342                                 523F A9 80    LDA  #$80                  
 6343                                 5241 9D E8 7F STA  $7FE8,X               
 6344     t00 t80                     5244 A2 07    LDX  #$07                  
 6345     t00 t80                     5246 B5 A0    LDA  $A0,X                 
 6346     t00 t80                     5248 F0 0C    BEQ  $5256                 
 6347                                 524A BD 35 FF LDA  $FF35,X               
 6348                                 524D 18       CLC                        
 6349                                 524E 69 02    ADC  #$02                  
 6350                                 5250 90 04    BCC  $5256                 
 6351                                 5252 A9 C0    LDA  #$C0                  
 6352                                 5254 95 58    STA  $58,X                 
 6353     t00 t80                     5256 9D 35 FF STA  $FF35,X               
 6354     t00 t80                     5259 8A       TXA                        
 6355     t00 t80                     525A F0 37    BEQ  clock_secondtick      
 6356     t00 t80                     525C B5 B8    LDA  $B8,X                 
 6357     t00 t80                     525E 15 38    ORA  $38,X                 
 6358     t00 t80                     5260 30 08    BMI  $526A                 
 6359     t00 t80                     5262 BD 30 7F LDA  $7F30,X               
 6360     t00 t80                     5265 1D 28 7F ORA  $7F28,X               
 6361     t00 t80                     5268 30 22    BMI  $528C                 
 6362     t00 t80                     526A B4 B0    LDY  $B0,X                 
 6363     t00 t80                     526C B9 F8 7E LDA  $7EF8,Y               
 6364     t00 t80                     526F 9D 28 7F STA  $7F28,X               
 6365     t00 t80                     5272 B9 F9 7E LDA  $7EF9,Y               
 6366     t00 t80                     5275 9D 30 7F STA  $7F30,X               
 6367     t00 t80                     5278 16 C8    ASL  $C8,X                 
 6368     t00 t80                     527A B0 10    BCS  $528C                 
 6369     t00 t80                     527C B5 38    LDA  $38,X                 
 6370     t00 t80                     527E F0 10    BEQ  $5290                 
 6371                                 5280 10 06    BPL  $5288                 
 6372                                 5282 F6 38    INC  $38,X                 
 6373                                 5284 D0 0A    BNE  $5290                 
 6374                                 5286 F0 04    BEQ  $528C                 
 6375                                 5288 D6 38    DEC  $38,X                 
 6376                                 528A D0 04    BNE  $5290                 
 6377                                 528C A9 00    LDA  #$00                  
 6378                                 528E 95 90    STA  $90,X                 
 6379     t00 t80                     5290 CA       DEX                        
 6380     t00 t80                     5291 10 B3    BPL  $5246                 
 6381                              *
 6382                              * --- second clock tick
 6383                              clock_secondtick
 6384     t00 t80                     5293 EE A7 04 INC  cons_seconds2         ; increment 2nd seconds digit
 6385     t00 t80                     5296 AD A7 04 LDA  cons_seconds2         
 6386     t00 t80                     5299 C9 BA    CMP  #$BA                  ; 2nd seconds digit > 9?
 6387     t00 t80                     529B D0 74    BNE  clock_done            ; branch if not
 6388                                 529D A0 B0    LDY  #$B0                  ; reset 2nd seconds digit to 0
 6389                                 529F 8C A7 04 STY  cons_seconds2         
 6390                                 52A2 EE A6 04 INC  cons_seconds1         ; increment 1st seconds digit
 6391                                 52A5 AD A6 04 LDA  cons_seconds1         
 6392                                 52A8 49 B6    EOR  #$B6                  ; 1st seconds digit == 6?
 6393                                 52AA D0 65    BNE  clock_done            ; branch if not
 6394                                 52AC 85 FD    STA  $FD                   ; ?????? whats in $FD? i think this stores 0 in there from the eor?
 6395                                 52AE 8C A6 04 STY  cons_seconds1         ; reset 1st seconds digit to 0
 6396                                 52B1 EE A1 04 INC  cons_minutes2         ; increase 2nd minutes digit
 6397                                 52B4 AD A1 04 LDA  cons_minutes2         
 6398                                 52B7 C9 BA    CMP  #$BA                  ; 2nd minutes digit > 9?
 6399                                 52B9 D0 56    BNE  clock_done            ; branch if not
 6400                                 52BB 8C A1 04 STY  cons_minutes2         ; reset 2nd seconds digit to 0
 6401                                 52BE EE A0 04 INC  cons_minutes1         ; increment 1st minutes digit
 6402                                 52C1 AD A0 04 LDA  cons_minutes1         ;   and load
 6403                                 52C4 20 23 7F JSR  clock_branch1         ; this quick branchoff checks 1st minutes digit for a 5
 6404                                 52C7 C9 B6    CMP  #$B6                  ; 1st minutes digit == 6?
 6405                                 52C9 D0 46    BNE  clock_done            ; branch if not
 6406                                 52CB 8C A0 04 STY  cons_minutes1         ; reset 1st minutes digit to 0
 6407                                 52CE EE 9E 04 INC  cons_hours2           ; increment 2nd hours digit
 6408                                 52D1 AD 9E 04 LDA  cons_hours2           ;   and load
 6409                                 52D4 C9 BA    CMP  #$BA                  ; 2nd hours digit > 9?
 6410                                 52D6 D0 0A    BNE  clock_52e2            ; branch if not
 6411                                 52D8 8C 9E 04 STY  cons_hours2           ; reset 2nd hours digit to 0 (rolling from 9:59 to 10)
 6412                                 52DB A9 B1    LDA  #$B1                  ; load one digit
 6413                                 52DD 8D 9D 04 STA  cons_hours1           ;   and store
 6414                                 52E0 D0 2F    BNE  clock_done            
 6415                              clock_52e2
 6416                                 52E2 C9 B3    CMP  #$B3                  ; 2nd hours digit == 3? (logic: rolling over from 12:59 to 3 or 2:59 to 1?)
 6417                                 52E4 D0 11    BNE  clock_daychange?      ; branch if NOT
 6418                                 52E6 A9 B1    LDA  #$B1                  
 6419                                 52E8 CD 9D 04 CMP  cons_hours1           ; 1st hours digit == 1? (12:59 to <space>1)
 6420                                 52EB D0 24    BNE  clock_done            ; branch if not (it's 2:59)
 6421                                 52ED 8D 9E 04 STA  cons_hours2           ; its 1:00, store 1 in 2nd hours digit
 6422                                 52F0 A9 A0    LDA  #$A0                  ; load a space
 6423                                 52F2 8D 9D 04 STA  cons_hours1           ; store in 1st hours digit
 6424                                 52F5 D0 1A    BNE  clock_done            ; always branch (done!)
 6425                              clock_daychange?
 6426                                 52F7 C9 B2    CMP  #$B2                  ; 2nd hours digit == 2? (rolling from 11:59 to 12 or 1:59 to 2?)
 6427                                 52F9 D0 16    BNE  clock_done            ; branch if not
 6428                                 52FB AD 9D 04 LDA  cons_hours1           ; check 1st hours digit
 6429                                 52FE C9 B1    CMP  #$B1                  ; is it == 1?
 6430                                 5300 D0 0F    BNE  clock_done            ; branch if not (it's 1:59)
 6431                              *
 6432                              * -- rolling from 11:59 to 12:00, check for am/pm
 6433                                 5302 A9 D0    LDA  #$D0                  ; load P+1 (Q)
 6434                                 5304 CD A3 04 CMP  cons_ampm             ; compare
 6435                                 5307 D0 05    BNE  $530E                 ; branch if not PM (it's AM)
 6436                              *
 6437                              * -- doing a day change
 6438                                 5309 20 03 58 JSR  clock_daychange       ; call day change code
 6439                                 530C A9 C1    LDA  #$C1                  
 6440                                 530E 8D A3 04 STA  cons_ampm             
 6441                              clock_done
 6442     t00 t80                     5311 60       RTS                        
 6443                                 5312 13       ???                        
 6444                              cons_key_2
 6445                                 5313 C9 4F    CMP  #$4F                  ; /O
 6446                                 5315 D0 26    BNE  $533D                 
 6447                                 5317 AD 01 60 LDA  $6001                 
 6448                                 531A F0 F7    BEQ  cons_key_2            
 6449                                 531C 85 01    STA  $01                   
 6450                                 531E AD 00 60 LDA  $6000                 
 6451                                 5321 85 00    STA  $00                   
 6452                                 5323 A0 00    LDY  #$00                  
 6453                                 5325 B9 02 08 LDA  $0802,Y               
 6454                                 5328 F0 0C    BEQ  $5336                 
 6455                                 532A C9 3B    CMP  #$3B                  
 6456                                 532C D0 02    BNE  $5330                 
 6457                                 532E A9 0D    LDA  #$0D                  
 6458                                 5330 91 00    STA  ($00),Y               
 6459                                 5332 C8       INY                        
 6460                                 5333 D0 F0    BNE  $5325                 
 6461                                 5335 88       DEY                        
 6462                                 5336 A9 F0    LDA  #$F0                  
 6463                                 5338 91 00    STA  ($00),Y               
 6464                                 533A A0 00    LDY  #$00                  
 6465                                 533C 60       RTS                        
 6466                                 533D C9 43    CMP  #$43                  ; /C
 6467                                 533F D0 40    BNE  $5381                 
 6468                                 5341 A0 00    LDY  #$00                  
 6469                                 5343 AD 02 08 LDA  $0802                 
 6470                                 5346 AA       TAX                        
 6471                                 5347 49 30    EOR  #$30                  
 6472                                 5349 C9 0A    CMP  #$0A                  
 6473                                 534B B0 15    BCS  $5362                 
 6474                                 534D 8E 00 04 STX  cons_line1/cutofftime 
 6475                                 5350 A9 A0    LDA  #$A0                  
 6476                                 5352 AE 03 08 LDX  $0803                 
 6477                                 5355 E0 30    CPX  #$30                  
 6478                                 5357 90 05    BCC  $535E                 
 6479                                 5359 E0 3A    CPX  #$3A                  
 6480                                 535B B0 01    BCS  $535E                 
 6481                                 535D 8A       TXA                        
 6482                                 535E 8D 08 04 STA  cons_moecutoff        
 6483                                 5361 60       RTS                        
 6484                                 5362 49 30    EOR  #$30                  
 6485                                 5364 29 DF    AND  #$DF                  
 6486                                 5366 C9 49    CMP  #$49                  
 6487                                 5368 F0 07    BEQ  $5371                 
 6488                                 536A C9 44    CMP  #$44                  
 6489                                 536C F0 0A    BEQ  $5378                 
 6490                                 536E A0 04    LDY  #$04                  
 6491                                 5370 60       RTS                        
 6492                                 5371 CE 12 53 DEC  $5312                 
 6493                                 5374 8C 9F 7F STY  $7F9F                 
 6494                                 5377 60       RTS                        
 6495                                 5378 EE 12 53 INC  $5312                 
 6496                                 537B A9 01    LDA  #$01                  
 6497                                 537D 8D 9F 7F STA  $7F9F                 
 6498                                 5380 60       RTS                        
 6499                                 5381 C9 41    CMP  #$41                  ; /A
 6500                                 5383 D0 03    BNE  $5388                 
 6501                                 5385 4C 0E 60 JMP  $600E                 
 6502                                 5388 C9 4A    CMP  #$4A                  ; /J
 6503                                 538A D0 49    BNE  $53D5                 
 6504                                 538C A0 00    LDY  #$00                  
 6505                                 538E B9 02 08 LDA  $0802,Y               
 6506                                 5391 49 30    EOR  #$30                  
 6507                                 5393 D0 02    BNE  $5397                 
 6508                                 5395 A9 0A    LDA  #$0A                  
 6509                                 5397 C9 0B    CMP  #$0B                  
 6510                                 5399 B0 08    BCS  $53A3                 
 6511                                 539B 99 DD 7E STA  $7EDD,Y               
 6512                                 539E C8       INY                        
 6513                                 539F C0 0B    CPY  #$0B                  
 6514                                 53A1 90 EB    BCC  $538E                 
 6515                                 53A3 98       TYA                        
 6516                                 53A4 F0 27    BEQ  $53CD                 
 6517                                 53A6 A9 2F    LDA  #$2F                  
 6518                                 53A8 D9 02 08 CMP  $0802,Y               
 6519                                 53AB D0 08    BNE  $53B5                 
 6520                                 53AD B9 03 08 LDA  $0803,Y               
 6521                                 53B0 29 0F    AND  #$0F                  
 6522                                 53B2 18       CLC                        
 6523                                 53B3 69 01    ADC  #$01                  
 6524                                 53B5 8D 9E 7F STA  $7F9E                 
 6525                                 53B8 C0 07    CPY  #$07                  
 6526                                 53BA F0 09    BEQ  $53C5                 
 6527                                 53BC AD DB 7E LDA  $7EDB                 
 6528                                 53BF F0 0C    BEQ  $53CD                 
 6529                                 53C1 C0 0B    CPY  #$0B                  
 6530                                 53C3 B0 05    BCS  $53CA                 
 6531                                 53C5 A9 00    LDA  #$00                  
 6532                                 53C7 99 DD 7E STA  $7EDD,Y               
 6533                                 53CA C8       INY                        
 6534                                 53CB D0 05    BNE  $53D2                 
 6535                                 53CD A9 00    LDA  #$00                  
 6536                                 53CF 8D DD 7E STA  $7EDD                 
 6537                                 53D2 4C 6D 27 JMP  $276D                 
 6538                                 53D5 60       RTS                        
 6539                                 53D6 8D E0 53 STA  $53E0                 
 6540                                 53D9 8A       TXA                        
 6541                                 53DA D0 2C    BNE  $5408                 
 6542                                 53DC A0 1A    LDY  #$1A                  
 6543                                 53DE B9 01 08 LDA  $0801,Y               
 6544                                 53E1 C0 15    CPY  #$15                  
 6545                                 53E3 90 07    BCC  $53EC                 
 6546                                 53E5 09 80    ORA  #$80                  
 6547                                 53E7 99 F6 FE STA  $FEF6,Y               
 6548                                 53EA B0 24    BCS  $5410                 
 6549                                 53EC C9 60    CMP  #$60                  
 6550                                 53EE 90 02    BCC  $53F2                 
 6551                                 53F0 29 5F    AND  #$5F                  
 6552                                 53F2 09 80    ORA  #$80                  
 6553                                 53F4 AA       TAX                        
 6554                                 53F5 59 93 04 EOR  $0493,Y               
 6555                                 53F8 29 F0    AND  #$F0                  
 6556                                 53FA F0 10    BEQ  $540C                 
 6557                                 53FC C0 10    CPY  #$10                  
 6558                                 53FE F0 0C    BEQ  $540C                 
 6559                                 5400 C9 10    CMP  #$10                  
 6560                                 5402 D0 04    BNE  $5408                 
 6561                                 5404 C0 0A    CPY  #$0A                  
 6562                                 5406 F0 04    BEQ  $540C                 
 6563                                 5408 A0 04    LDY  #$04                  
 6564                                 540A D0 0E    BNE  $541A                 
 6565                                 540C 8A       TXA                        
 6566                                 540D 99 93 04 STA  $0493,Y               
 6567                                 5410 88       DEY                        
 6568                                 5411 D0 CB    BNE  $53DE                 
 6569                                 5413 AD A5 04 LDA  $04A5                 
 6570                                 5416 49 A0    EOR  #$A0                  
 6571                                 5418 85 F4    STA  $F4                   
 6572                                 541A 4C 0F F8 JMP  $F80F                 
 6573                                 541D A8       TAY                        
 6574                                 541E CD D6 7F CMP  $7FD6                 
 6575                                 5421 F0 05    BEQ  $5428                 
 6576                                 5423 CD D7 7F CMP  $7FD7                 
 6577                                 5426 D0 03    BNE  $542B                 
 6578                                 5428 20 57 22 JSR  $2257                 
 6579                                 542B B9 B0 00 LDA  $00B0,Y               
 6580                                 542E 85 F5    STA  $F5                   
 6581                                 5430 A9 00    LDA  #$00                  
 6582                                 5432 99 38 00 STA  $0038,Y               
 6583                                 5435 B9 50 00 LDA  $0050,Y               
 6584                                 5438 C9 FF    CMP  #$FF                  
 6585                                 543A D0 07    BNE  $5443                 
 6586                                 543C 4A       LSR  A                     
 6587                                 543D 19 03 FF ORA  $FF03,Y               
 6588                                 5440 99 03 FF STA  $FF03,Y               
 6589                                 5443 A9 80    LDA  #$80                  
 6590                                 5445 99 20 00 STA  $0020,Y               
 6591                                 5448 99 E8 7F STA  $7FE8,Y               
 6592                                 544B 99 90 00 STA  $0090,Y               
 6593                                 544E 18       CLC                        
 6594                                 544F 20 09 58 JSR  $5809                 
 6595                                 5452 B9 18 00 LDA  $0018,Y               
 6596                                 5455 D0 01    BNE  $5458                 
 6597                                 5457 60       RTS                        
 6598                                 5458 B9 50 00 LDA  $0050,Y               
 6599                                 545B 0A       ASL  A                     
 6600                                 545C 85 00    STA  $00                   
 6601                                 545E A9 00    LDA  #$00                  
 6602                                 5460 99 50 00 STA  $0050,Y               
 6603                                 5463 C6 F1    DEC  $F1                   
 6604                                 5465 A9 AA    LDA  #$AA                  
 6605                                 5467 99 80 04 STA  cons_line2/line0channel,Y 
 6606                                 546A 18       CLC                        
 6607                                 546B 98       TYA                        
 6608                                 546C 48       PHA                        
 6609                                 546D A8       TAY                        
 6610                                 546E 08       PHP                        
 6611                                 546F 20 20 7F JSR  $7F20                 
 6612                                 5472 28       PLP                        
 6613                                 5473 90 0B    BCC  $5480                 
 6614                                 5475 A9 21    LDA  #$21                  
 6615                                 5477 99 38 00 STA  $0038,Y               
 6616                                 547A 99 18 00 STA  $0018,Y               
 6617                                 547D E6 F1    INC  $F1                   
 6618                                 547F 38       SEC                        
 6619                                 5480 B0 25    BCS  $54A7                 
 6620                                 5482 A2 07    LDX  #$07                  
 6621                                 5484 BD 9C 04 LDA  $049C,X               
 6622                                 5487 29 7F    AND  #$7F                  
 6623                                 5489 9D D3 23 STA  $23D3,X               
 6624                                 548C CA       DEX                        
 6625                                 548D D0 F5    BNE  $5484                 
 6626                                 548F 8A       TXA                        
 6627                                 5490 B6 18    LDX  $18,Y                 
 6628                                 5492 99 18 00 STA  $0018,Y               
 6629                                 5495 99 78 7F STA  $7F78,Y               
 6630                                 5498 99 B8 00 STA  $00B8,Y               
 6631                                 549B 10 0A    BPL  $54A7                 
 6632                                 549D A6 F5    LDX  $F5                   
 6633                                 549F DE A0 7F DEC  $7FA0,X               
 6634                                 54A2 A6 00    LDX  $00                   
 6635                                 54A4 20 D2 55 JSR  $55D2                 
 6636                                 54A7 68       PLA                        
 6637                                 54A8 90 15    BCC  $54BF                 
 6638                                 54AA 0A       ASL  A                     
 6639                                 54AB 0A       ASL  A                     
 6640                                 54AC A8       TAY                        
 6641                                 54AD A9 B0    LDA  #$B0                  
 6642                                 54AF 99 06 04 STA  $0406,Y               
 6643                                 54B2 99 07 04 STA  $0407,Y               
 6644                                 54B5 99 08 04 STA  cons_moecutoff,Y      
 6645                                 54B8 AD AF 23 LDA  $23AF                 
 6646                                 54BB AC B0 23 LDY  $23B0                 
 6647                                 54BE 60       RTS                        
 6648                                 54BF A8       TAY                        
 6649                                 54C0 A9 00    LDA  #$00                  
 6650                                 54C2 99 B0 00 STA  $00B0,Y               
 6651                                 54C5 98       TYA                        
 6652                                 54C6 0A       ASL  A                     
 6653                                 54C7 0A       ASL  A                     
 6654                                 54C8 A8       TAY                        
 6655                                 54C9 B9 06 04 LDA  $0406,Y               
 6656                                 54CC 29 3F    AND  #$3F                  
 6657                                 54CE 99 06 04 STA  $0406,Y               
 6658                                 54D1 B9 07 04 LDA  $0407,Y               
 6659                                 54D4 29 3F    AND  #$3F                  
 6660                                 54D6 99 07 04 STA  $0407,Y               
 6661                                 54D9 B9 08 04 LDA  cons_moecutoff,Y      
 6662                                 54DC 29 3F    AND  #$3F                  
 6663                                 54DE 99 08 04 STA  cons_moecutoff,Y      
 6664                                 54E1 C9 32    CMP  #$32                  
 6665                                 54E3 B0 0A    BCS  $54EF                 
 6666                                 54E5 B9 06 04 LDA  $0406,Y               
 6667                                 54E8 19 07 04 ORA  $0407,Y               
 6668                                 54EB C9 30    CMP  #$30                  
 6669                                 54ED F0 14    BEQ  $5503                 
 6670                                 54EF A2 02    LDX  #$02                  
 6671                                 54F1 FE 89 04 INC  cons_callstoday1,X    
 6672                                 54F4 BD 89 04 LDA  cons_callstoday1,X    
 6673                                 54F7 C9 BA    CMP  #$BA                  
 6674                                 54F9 90 08    BCC  $5503                 
 6675                                 54FB A9 B0    LDA  #$B0                  
 6676                                 54FD 9D 89 04 STA  cons_callstoday1,X    
 6677                                 5500 CA       DEX                        
 6678                                 5501 10 EE    BPL  $54F1                 
 6679                                 5503 A9 00    LDA  #$00                  
 6680                                 5505 60       RTS                        
 6681     t00 t80                     5506 B9 38 00 LDA  $0038,Y               
 6682     t00 t80                     5509 F0 05    BEQ  $5510                 
 6683                                 550B A9 31    LDA  #$31                  
 6684                                 550D A2 00    LDX  #$00                  
 6685                                 550F 60       RTS                        
 6686     t00 t80                     5510 99 B8 7F STA  $7FB8,Y               
 6687     t00 t80                     5513 A9 FF    LDA  #$FF                  
 6688     t00 t80                     5515 99 3D FF STA  $FF3D,Y               
 6689     t00 t80                     5518 99 18 00 STA  $0018,Y               
 6690     t00 t80                     551B 98       TYA                        
 6691     t00 t80                     551C F0 47    BEQ  $5565                 
 6692                                 551E 0A       ASL  A                     
 6693                                 551F AA       TAX                        
 6694                                 5520 B9 88 7F LDA  $7F88,Y               
 6695                                 5523 4A       LSR  A                     
 6696                                 5524 D0 16    BNE  $553C                 
 6697                                 5526 BD 4F 58 LDA  $584F,X               
 6698                                 5529 C9 F7    CMP  #$F7                  
 6699                                 552B D0 15    BNE  $5542                 
 6700                                 552D 48       PHA                        
 6701                                 552E BD 4E 58 LDA  $584E,X               
 6702                                 5531 C9 84    CMP  #$84                  
 6703                                 5533 68       PLA                        
 6704                                 5534 90 0C    BCC  $5542                 
 6705                                 5536 2C D6 7F BIT  $7FD6                 
 6706                                 5539 10 07    BPL  $5542                 
 6707                                 553B 18       CLC                        
 6708                                 553C 20 C8 7F JSR  $7FC8                 
 6709                                 553F 4C 65 55 JMP  $5565                 
 6710                                 5542 C9 F4    CMP  #$F4                  
 6711                                 5544 90 1F    BCC  $5565                 
 6712                                 5546 AA       TAX                        
 6713                                 5547 AD DA F7 LDA  $F7DA                 
 6714                                 554A F0 16    BEQ  $5562                 
 6715                                 554C 30 07    BMI  $5555                 
 6716                                 554E E0 F6    CPX  #$F6                  
 6717                                 5550 B0 10    BCS  $5562                 
 6718                                 5552 0A       ASL  A                     
 6719                                 5553 30 04    BMI  $5559                 
 6720                                 5555 A5 E7    LDA  $E7                   
 6721                                 5557 D0 09    BNE  $5562                 
 6722                                 5559 98       TYA                        
 6723                                 555A 48       PHA                        
 6724                                 555B A9 00    LDA  #$00                  
 6725                                 555D 20 00 57 JSR  $5700                 
 6726                                 5560 68       PLA                        
 6727                                 5561 A8       TAY                        
 6728                                 5562 20 0C F8 JSR  $F80C                 
 6729     t00 t80                     5565 98       TYA                        
 6730     t00 t80                     5566 F0 0A    BEQ  $5572                 
 6731                                 5568 AE AE 23 LDX  $23AE                 
 6732                                 556B B9 50 00 LDA  $0050,Y               
 6733                                 556E 30 21    BMI  $5591                 
 6734                                 5570 D0 0F    BNE  $5581                 
 6735     t00 t80                     5572 AA       TAX                        
 6736     t00 t80                     5573 2C DC F7 BIT  $F7DC                 
 6737     t00 t80                     5576 30 11    BMI  $5589                 
 6738     t00 t80                     5578 50 14    BVC  $558E                 
 6739                                 557A B9 78 7F LDA  $7F78,Y               
 6740                                 557D F0 0F    BEQ  $558E                 
 6741                                 557F D0 08    BNE  $5589                 
 6742                                 5581 A9 FF    LDA  #$FF                  
 6743                                 5583 99 78 7F STA  $7F78,Y               
 6744                                 5586 AE AD 23 LDX  $23AD                 
 6745                                 5589 A9 88    LDA  #$88                  
 6746                                 558B 99 C0 7F STA  $7FC0,Y               
 6747     t00 t80                     558E AD E6 F7 LDA  $F7E6                 
 6748     t00 t80                     5591 85 00    STA  $00                   
 6749     t00 t80                     5593 BD A0 7F LDA  $7FA0,X               
 6750     t00 t80                     5596 DD A1 7F CMP  $7FA1,X               
 6751     t00 t80                     5599 90 02    BCC  $559D                 
 6752                                 559B A2 00    LDX  #$00                  
 6753     t00 t80                     559D B5 C0    LDA  $C0,X                 
 6754     t00 t80                     559F 99 70 00 STA  $0070,Y               
 6755     t00 t80                     55A2 B5 C1    LDA  $C1,X                 
 6756     t00 t80                     55A4 99 78 00 STA  $0078,Y               
 6757     t00 t80                     55A7 FE A0 7F INC  $7FA0,X               
 6758     t00 t80                     55AA 8A       TXA                        
 6759     t00 t80                     55AB 99 B0 00 STA  $00B0,Y               
 6760     t00 t80                     55AE 4A       LSR  A                     
 6761     t00 t80                     55AF 69 B1    ADC  #$B1                  
 6762     t00 t80                     55B1 99 80 04 STA  cons_line2/line0channel,Y 
 6763     t00 t80                     55B4 29 7F    AND  #$7F                  
 6764     t00 t80                     55B6 48       PHA                        
 6765     t00 t80                     55B7 B9 80 7F LDA  $7F80,Y               
 6766     t00 t80                     55BA 0A       ASL  A                     
 6767     t00 t80                     55BB AA       TAX                        
 6768     t00 t80                     55BC 68       PLA                        
 6769     t00 t80                     55BD 9D 05 02 STA  $0205,X               
 6770     t00 t80                     55C0 B9 50 00 LDA  $0050,Y               
 6771     t00 t80                     55C3 F0 05    BEQ  $55CA                 
 6772                                 55C5 A9 5B    LDA  #$5B                  
 6773                                 55C7 9D 03 02 STA  $0203,X               
 6774     t00 t80                     55CA AA       TAX                        
 6775     t00 t80                     55CB 38       SEC                        
 6776     t00 t80                     55CC 20 D2 55 JSR  $55D2                 
 6777     t00 t80                     55CF A6 00    LDX  $00                   
 6778     t00 t80                     55D1 60       RTS                        
 6779     t00 t80                     55D2 98       TYA                        
 6780     t00 t80                     55D3 2D FF FE AND  $FEFF                 
 6781     t00 t80                     55D6 F0 F9    BEQ  $55D1                 
 6782                                 55D8 08       PHP                        
 6783                                 55D9 A9 2D    LDA  #$2D                  
 6784                                 55DB 90 02    BCC  $55DF                 
 6785                                 55DD A9 2B    LDA  #$2B                  
 6786                                 55DF 8D 96 56 STA  $5696                 
 6787                                 55E2 49 2C    EOR  #$2C                  
 6788                                 55E4 8D 90 56 STA  $5690                 
 6789                                 55E7 98       TYA                        
 6790                                 55E8 0A       ASL  A                     
 6791                                 55E9 0A       ASL  A                     
 6792                                 55EA 0A       ASL  A                     
 6793                                 55EB 8D 69 56 STA  $5669                 
 6794                                 55EE 0A       ASL  A                     
 6795                                 55EF 0A       ASL  A                     
 6796                                 55F0 8D 5A 56 STA  $565A                 
 6797                                 55F3 98       TYA                        
 6798                                 55F4 09 30    ORA  #$30                  
 6799                                 55F6 8D 4A 56 STA  $564A                 
 6800                                 55F9 AD EF 5E LDA  $5EEF                 
 6801                                 55FC 8D 94 56 STA  $5694                 
 6802                                 55FF B9 C0 7F LDA  $7FC0,Y               
 6803                                 5602 49 A8    EOR  #$A8                  
 6804                                 5604 8D 56 56 STA  $5656                 
 6805                                 5607 B9 B0 00 LDA  $00B0,Y               
 6806                                 560A 8D 41 56 STA  $5641                 
 6807                                 560D 8E 4F 56 STX  $564F                 
 6808                                 5610 2C E5 F7 BIT  $F7E5                 
 6809                                 5613 A9 88    LDA  #$88                  
 6810                                 5615 E0 00    CPX  #$00                  
 6811                                 5617 D0 04    BNE  $561D                 
 6812                                 5619 70 09    BVS  $5624                 
 6813                                 561B A9 A8    LDA  #$A8                  
 6814                                 561D A2 06    LDX  #$06                  
 6815                                 561F 8D 23 56 STA  $5623                 
 6816                                 5622 A9 88    LDA  #$88                  
 6817                                 5624 BC A0 7F LDY  $7FA0,X               
 6818                                 5627 F0 5A    BEQ  $5683                 
 6819                                 5629 20 D2 3A JSR  $3AD2                 
 6820                                 562C AC 4F 56 LDY  $564F                 
 6821                                 562F F0 02    BEQ  $5633                 
 6822                                 5631 A0 01    LDY  #$01                  
 6823                                 5633 B9 8D 56 LDA  $568D,Y               
 6824                                 5636 F0 06    BEQ  $563E                 
 6825                                 5638 20 D2 3A JSR  $3AD2                 
 6826                                 563B C8       INY                        
 6827                                 563C D0 F5    BNE  $5633                 
 6828                                 563E A9 2F    LDA  #$2F                  
 6829                                 5640 E0 00    CPX  #$00                  
 6830                                 5642 D0 02    BNE  $5646                 
 6831                                 5644 A9 23    LDA  #$23                  
 6832                                 5646 20 D2 3A JSR  $3AD2                 
 6833                                 5649 A9 30    LDA  #$30                  
 6834                                 564B 20 D2 3A JSR  $3AD2                 
 6835                                 564E A9 00    LDA  #$00                  
 6836                                 5650 D0 07    BNE  $5659                 
 6837                                 5652 8A       TXA                        
 6838                                 5653 D0 13    BNE  $5668                 
 6839                                 5655 A9 00    LDA  #$00                  
 6840                                 5657 F0 0F    BEQ  $5668                 
 6841                                 5659 A0 00    LDY  #$00                  
 6842                                 565B B9 06 02 LDA  $0206,Y               
 6843                                 565E C9 29    CMP  #$29                  
 6844                                 5660 F0 06    BEQ  $5668                 
 6845                                 5662 20 D2 3A JSR  $3AD2                 
 6846                                 5665 C8       INY                        
 6847                                 5666 D0 F3    BNE  $565B                 
 6848                                 5668 A0 00    LDY  #$00                  
 6849                                 566A B9 0E 58 LDA  $580E,Y               
 6850                                 566D F0 0B    BEQ  $567A                 
 6851                                 566F A9 3A    LDA  #$3A                  
 6852                                 5671 20 D2 3A JSR  $3AD2                 
 6853                                 5674 C8       INY                        
 6854                                 5675 B9 0E 58 LDA  $580E,Y               
 6855                                 5678 D0 F7    BNE  $5671                 
 6856                                 567A A9 0D    LDA  #$0D                  
 6857                                 567C 20 D2 3A JSR  $3AD2                 
 6858                                 567F A9 00    LDA  #$00                  
 6859                                 5681 81 C0    STA  ($C0,X)               
 6860                                 5683 A9 88    LDA  #$88                  
 6861                                 5685 CA       DEX                        
 6862                                 5686 CA       DEX                        
 6863                                 5687 F0 9B    BEQ  $5624                 
 6864                                 5689 10 97    BPL  $5622                 
 6865                                 568B 28       PLP                        
 6866                                 568C 60       RTS                        
 6867                                 568D 7D 7D 8D ADC  $8D7D,X               
 6868                                 5690 07       ???                        
 6869                                 5691 2D 2D 3E AND  $3E2D                 
 6870                                 5694 2E 20 2B ROL  $2B20                 
 6871                                 5697 5E 00 A8 LSR  $A800,X               
 6872                                 569A 85 04    STA  $04                   
 6873                                 569C B9 20 00 LDA  $0020,Y               
 6874                                 569F 85 F3    STA  $F3                   
 6875                                 56A1 98       TYA                        
 6876                                 56A2 0A       ASL  A                     
 6877                                 56A3 09 10    ORA  #$10                  
 6878                                 56A5 8D 1C 60 STA  $601C                 
 6879                                 56A8 85 01    STA  $01                   
 6880                                 56AA 20 09 F8 JSR  $F809                 
 6881                                 56AD A0 00    LDY  #$00                  
 6882                                 56AF 84 00    STY  $00                   
 6883                                 56B1 A9 01    LDA  #$01                  
 6884                                 56B3 85 F0    STA  $F0                   
 6885                                 56B5 20 D0 7F JSR  $7FD0                 
 6886                                 56B8 90 0C    BCC  $56C6                 
 6887                                 56BA A9 0D    LDA  #$0D                  
 6888                                 56BC 91 00    STA  ($00),Y               
 6889                                 56BE C8       INY                        
 6890                                 56BF A9 FF    LDA  #$FF                  
 6891                                 56C1 91 00    STA  ($00),Y               
 6892                                 56C3 A0 0A    LDY  #$0A                  
 6893                                 56C5 60       RTS                        
 6894                                 56C6 AD 09 04 LDA  cons_syslocked        
 6895                                 56C9 29 7F    AND  #$7F                  
 6896                                 56CB 8D F2 23 STA  $23F2                 
 6897                                 56CE A9 FF    LDA  #$FF                  
 6898                                 56D0 A6 E3    LDX  $E3                   
 6899                                 56D2 F0 02    BEQ  $56D6                 
 6900                                 56D4 A9 2D    LDA  #$2D                  
 6901                                 56D6 8D F4 23 STA  $23F4                 
 6902                                 56D9 A2 10    LDX  #$10                  
 6903                                 56DB BD 93 04 LDA  $0493,X               
 6904                                 56DE 29 7F    AND  #$7F                  
 6905                                 56E0 9D E0 23 STA  $23E0,X               
 6906                                 56E3 CA       DEX                        
 6907                                 56E4 D0 F5    BNE  $56DB                 
 6908                                 56E6 06 F0    ASL  $F0                   
 6909                                 56E8 BD DC 23 LDA  $23DC,X               
 6910                                 56EB B0 03    BCS  $56F0                 
 6911                                 56ED BD C9 23 LDA  $23C9,X               
 6912                                 56F0 91 00    STA  ($00),Y               
 6913                                 56F2 30 08    BMI  $56FC                 
 6914                                 56F4 E8       INX                        
 6915                                 56F5 C8       INY                        
 6916                                 56F6 D0 F0    BNE  $56E8                 
 6917                                 56F8 E6 01    INC  $01                   
 6918                                 56FA D0 EC    BNE  $56E8                 
 6919                                 56FC A0 0A    LDY  #$0A                  
 6920                                 56FE 60       RTS                        
 6921                                 56FF 00       BRK                        
 6922                                 5700 4C 85 57 JMP  $5785                 
 6923                                 5703 C9 4B    CMP  #$4B                  
 6924                                 5705 08       PHP                        
 6925                                 5706 98       TYA                        
 6926                                 5707 49 30    EOR  #$30                  
 6927                                 5709 F0 0A    BEQ  $5715                 
 6928                                 570B 85 00    STA  $00                   
 6929                                 570D E4 00    CPX  $00                   
 6930                                 570F F0 04    BEQ  $5715                 
 6931                                 5711 C9 08    CMP  #$08                  
 6932                                 5713 90 0B    BCC  $5720                 
 6933                                 5715 28       PLP                        
 6934                                 5716 A0 16    LDY  #$16                  
 6935                                 5718 60       RTS                        
 6936                                 5719 28       PLP                        
 6937                                 571A A0 18    LDY  #$18                  
 6938                                 571C 60       RTS                        
 6939                                 571D A0 08    LDY  #$08                  
 6940                                 571F 60       RTS                        
 6941                                 5720 A8       TAY                        
 6942                                 5721 B9 90 00 LDA  $0090,Y               
 6943                                 5724 49 20    EOR  #$20                  
 6944                                 5726 F0 05    BEQ  $572D                 
 6945                                 5728 28       PLP                        
 6946                                 5729 8A       TXA                        
 6947                                 572A D0 EE    BNE  $571A                 
 6948                                 572C 08       PHP                        
 6949                                 572D 28       PLP                        
 6950                                 572E D0 3F    BNE  $576F                 
 6951                                 5730 8A       TXA                        
 6952                                 5731 F0 09    BEQ  $573C                 
 6953                                 5733 B9 D8 7F LDA  modem_exists,Y        
 6954                                 5736 4A       LSR  A                     
 6955                                 5737 90 E4    BCC  $571D                 
 6956                                 5739 AD FF 57 LDA  $57FF                 
 6957                                 573C 15 20    ORA  $20,X                 
 6958                                 573E 4A       LSR  A                     
 6959                                 573F F0 0F    BEQ  $5750                 
 6960                                 5741 70 DA    BVS  $571D                 
 6961                                 5743 B9 78 7F LDA  $7F78,Y               
 6962                                 5746 D0 CE    BNE  $5716                 
 6963                                 5748 20 CD 7F JSR  $7FCD                 
 6964                                 574B F0 D0    BEQ  $571D                 
 6965                                 574D B0 1D    BCS  $576C                 
 6966                                 574F B8       CLV                        
 6967                                 5750 70 15    BVS  $5767                 
 6968                                 5752 A9 00    LDA  #$00                  
 6969                                 5754 99 90 00 STA  $0090,Y               
 6970                                 5757 AD E7 F7 LDA  $F7E7                 
 6971                                 575A 30 10    BMI  $576C                 
 6972                                 575C AE DF F7 LDX  $F7DF                 
 6973                                 575F 10 0B    BPL  $576C                 
 6974                                 5761 38       SEC                        
 6975                                 5762 A2 FF    LDX  #$FF                  
 6976                                 5764 20 09 58 JSR  $5809                 
 6977                                 5767 A9 80    LDA  #$80                  
 6978                                 5769 99 50 00 STA  $0050,Y               
 6979                                 576C A0 00    LDY  #$00                  
 6980                                 576E 60       RTS                        
 6981                                 576F B9 38 00 LDA  $0038,Y               
 6982                                 5772 D0 D2    BNE  $5746                 
 6983                                 5774 B5 20    LDA  $20,X                 
 6984                                 5776 B0 0D    BCS  $5785                 
 6985                                 5778 D0 A3    BNE  $571D                 
 6986                                 577A 8A       TXA                        
 6987                                 577B F0 13    BEQ  $5790                 
 6988                                 577D AD 88 04 LDA  cons_status           
 6989                                 5780 10 0E    BPL  $5790                 
 6990                                 5782 A0 04    LDY  #$04                  
 6991                                 5784 60       RTS                        
 6992                                 5785 4A       LSR  A                     
 6993                                 5786 D0 95    BNE  $571D                 
 6994                                 5788 B9 50 00 LDA  $0050,Y               
 6995                                 578B D0 B9    BNE  $5746                 
 6996                                 578D A9 41    LDA  #$41                  
 6997                                 578F 2C A9 FF BIT  $FFA9                 
 6998                                 5792 99 50 00 STA  $0050,Y               
 6999                                 5795 A2 5B    LDX  #$5B                  
 7000                                 5797 CD DE F7 CMP  $F7DE                 
 7001                                 579A D0 05    BNE  $57A1                 
 7002                                 579C A6 FC    LDX  $FC                   
 7003                                 579E A9 01    LDA  #$01                  
 7004                                 57A0 2C A9 80 BIT  $80A9                 
 7005                                 57A3 99 20 00 STA  $0020,Y               
 7006                                 57A6 B9 B8 00 LDA  $00B8,Y               
 7007                                 57A9 30 0A    BMI  $57B5                 
 7008                                 57AB A9 88    LDA  #$88                  
 7009                                 57AD 99 C0 7F STA  $7FC0,Y               
 7010                                 57B0 A9 FF    LDA  #$FF                  
 7011                                 57B2 99 78 7F STA  $7F78,Y               
 7012                                 57B5 B9 80 7F LDA  $7F80,Y               
 7013                                 57B8 0A       ASL  A                     
 7014                                 57B9 A8       TAY                        
 7015                                 57BA 8A       TXA                        
 7016                                 57BB 99 03 02 STA  $0203,Y               
 7017                                 57BE D0 AC    BNE  $576C                 
 7018                                 57C0             00 00 00 00 00 00 00 0A 14 1E 28 32 3C 46 50 5A  ..........(2<FPZ
 7019                                 57D0             FF 2D 2D 3E 20 2F 50 20 53 65 6E 74 0D FF 00 00  .--> /P Sent....
 7020                                 57E0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7021                                 57F0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7022                                 5800             4C 34 5C 4C 93 5B 4C F1 5A 4C 84 5A 01 59 10 03  L4\L.[L.ZL.Z.Y..
 7023                                 5810             10 10 10 0A 00 00 00 23 30 30 30 00 00 00 00 23  .......#000....#
 7024                                 5820             30 30 30 00 00 00 00 23 30 30 30 00 00 00 00 23  000....#000....#
 7025                                 5830             30 30 30 00 00 00 00 23 30 30 30 00 00 00 00 23  000....#000....#
 7026                                 5840             30 30 30 00 00 00 00 23 30 30 30 00 00 00 00 F4  000....#000.....
 7027                                 5850             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7028                                 5860             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7029                                 5870             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7030                                 5880             00 00 00 00 00 00 00 00 00 00 00 00 00 00 0D 55  ...............U
 7031                                 5890             73 65 20 41 6C 74 20 41 80 0D 49 6E 76 61 6C 69  se Alt A..Invali
 7032                                 58A0             64 20 31 35 20 6D 69 6E 80 0D 47 55 45 53 54 20  d 15 min..GUEST 
 7033                                 58B0             23 88 0D 50 41 53 53 57 4F 52 44 20 6E 65 65 64  #..PASSWORD need
 7034                                 58C0             65 64 20 66 6F 72 20 66 75 6C 6C 20 61 63 63 65  ed for full acce
 7035                                 58D0             73 73 0D 0D 46 6F 72 20 69 6E 66 6F 20 65 6E 74  ss..For info ent
 7036                                 58E0             65 72 3A 0D 2F 49 0D 0D 30 30 30 30 30 20 43 61  er:./I..00000 Ca
 7037                                 58F0             6C 6C 73 20 2F 20 30 30 30 20 54 6F 64 61 79 0D  lls / 000 Today.
 7038                                 5900             0D FF 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7039                                 5910             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7040                                 5920             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7041                                 5930             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7042                                 5940             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7043                                 5950             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7044                                 5960             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7045                                 5970             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7046                                 5980             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7047                                 5990             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7048                                 59A0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7049                                 59B0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7050                                 59C0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7051                                 59D0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7052                                 59E0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7053                                 59F0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ................
 7054                                 5A00             21 5A E6 58 B2 58 8E 58 99 58 A9 58 0D 2D 2D 3E  !Z.X.X.X.X.X.-->
 7055                                 5A10             20 2F 55 30 30 30 2F 20 20 20 2F 30 30 30 30 30   /U000/   /00000
 7056                                 5A20 0D FF 0C ORA  $0CFF                 
 7057                                 5A23 5A       ???                        
 7058                                 5A24 8E E7 F7 STX  $F7E7                 
 7059                                 5A27 20 60 5B JSR  $5B60                 
 7060                                 5A2A A9 06    LDA  #$06                  
 7061                                 5A2C 8D 5E 58 STA  $585E                 
 7062                                 5A2F 60       RTS                        
 7063                                 5A30 8A       TXA                        
 7064                                 5A31 30 F1    BMI  $5A24                 
 7065                                 5A33 AE 5E 58 LDX  $585E                 
 7066                                 5A36 F0 0B    BEQ  $5A43                 
 7067                                 5A38 30 EA    BMI  $5A24                 
 7068                                 5A3A CA       DEX                        
 7069                                 5A3B 8E 5E 58 STX  $585E                 
 7070                                 5A3E D0 03    BNE  $5A43                 
 7071                                 5A40 20 7B 5A JSR  $5A7B                 
 7072                                 5A43 A2 07    LDX  #$07                  
 7073                                 5A45 BD 76 58 LDA  $5876,X               
 7074                                 5A48 F0 03    BEQ  $5A4D                 
 7075                                 5A4A DE 76 58 DEC  $5876,X               
 7076                                 5A4D CA       DEX                        
 7077                                 5A4E 10 F5    BPL  $5A45                 
 7078                                 5A50 AD 9E 04 LDA  cons_hours2           
 7079                                 5A53 C9 00    CMP  #$00                  
 7080                                 5A55 D0 01    BNE  $5A58                 
 7081                                 5A57 60       RTS                        
 7082                                 5A58 8D 54 5A STA  $5A54                 
 7083                                 5A5B E8       INX                        
 7084                                 5A5C A0 03    LDY  #$03                  
 7085                                 5A5E 20 63 5A JSR  $5A63                 
 7086                                 5A61 A2 FF    LDX  #$FF                  
 7087                                 5A63 B9 CE 5A LDA  $5ACE,Y               
 7088                                 5A66 CD 9E 04 CMP  cons_hours2           
 7089                                 5A69 D0 16    BNE  $5A81                 
 7090                                 5A6B B9 CD 5A LDA  $5ACD,Y               
 7091                                 5A6E CD 9D 04 CMP  cons_hours1           
 7092                                 5A71 D0 0E    BNE  $5A81                 
 7093                                 5A73 B9 CF 5A LDA  $5ACF,Y               
 7094                                 5A76 CD A3 04 CMP  cons_ampm             
 7095                                 5A79 D0 06    BNE  $5A81                 
 7096                                 5A7B 8E E7 F7 STX  $F7E7                 
 7097                                 5A7E 20 60 5B JSR  $5B60                 
 7098                                 5A81 A0 00    LDY  #$00                  
 7099                                 5A83 60       RTS                        
 7100                                 5A84 B0 AA    BCS  $5A30                 
 7101                                 5A86 86 00    STX  $00                   
 7102                                 5A88 84 01    STY  $01                   
 7103                                 5A8A 98       TYA                        
 7104                                 5A8B 0A       ASL  A                     
 7105                                 5A8C AA       TAX                        
 7106                                 5A8D 20 22 F8 JSR  _and_rts              
 7107                                 5A90 B9 20 00 LDA  $0020,Y               
 7108                                 5A93 10 2F    BPL  $5AC4                 
 7109                                 5A95 B9 50 00 LDA  $0050,Y               
 7110                                 5A98 0A       ASL  A                     
 7111                                 5A99 F0 2D    BEQ  $5AC8                 
 7112                                 5A9B 10 0A    BPL  $5AA7                 
 7113                                 5A9D 2C DB F7 BIT  $F7DB                 
 7114                                 5AA0 10 22    BPL  $5AC4                 
 7115                                 5AA2 B9 03 FF LDA  $FF03,Y               
 7116                                 5AA5 D0 1D    BNE  $5AC4                 
 7117                                 5AA7 A0 00    LDY  #$00                  
 7118                                 5AA9 C8       INY                        
 7119                                 5AAA C0 08    CPY  #$08                  
 7120                                 5AAC 90 02    BCC  $5AB0                 
 7121                                 5AAE A0 00    LDY  #$00                  
 7122                                 5AB0 8C A8 5A STY  $5AA8                 
 7123                                 5AB3 BD 4F 58 LDA  $584F,X               
 7124                                 5AB6 99 86 58 STA  $5886,Y               
 7125                                 5AB9 BD 4E 58 LDA  $584E,X               
 7126                                 5ABC 99 7E 58 STA  $587E,Y               
 7127                                 5ABF A9 0F    LDA  #$0F                  
 7128                                 5AC1 99 76 58 STA  $5876,Y               
 7129                                 5AC4 38       SEC                        
 7130                                 5AC5 20 06 F8 JSR  $F806                 
 7131                                 5AC8 A4 01    LDY  $01                   
 7132                                 5ACA A6 00    LDX  $00                   
 7133                                 5ACC 60       RTS                        
 7134                                 5ACD 00       BRK                        
 7135                                 5ACE 00       BRK                        
 7136                                 5ACF 00       BRK                        
 7137                                 5AD0 00       BRK                        
 7138                                 5AD1 00       BRK                        
 7139                                 5AD2 00       BRK                        
 7140                                 5AD3 A0 06    LDY  #$06                  
 7141                                 5AD5 B9 02 08 LDA  $0802,Y               
 7142                                 5AD8 09 80    ORA  #$80                  
 7143                                 5ADA 99 CC 5A STA  $5ACC,Y               
 7144                                 5ADD 88       DEY                        
 7145                                 5ADE D0 F5    BNE  $5AD5                 
 7146                                 5AE0 60       RTS                        
 7147                                 5AE1 A0 03    LDY  #$03                  
 7148                                 5AE3 A9 A0    LDA  #$A0                  
 7149                                 5AE5 99 90 04 STA  $0490,Y               
 7150                                 5AE8 A9 20    LDA  #$20                  
 7151                                 5AEA 99 16 5A STA  $5A16,Y               
 7152                                 5AED 88       DEY                        
 7153                                 5AEE D0 F3    BNE  $5AE3                 
 7154                                 5AF0 60       RTS                        
 7155                                 5AF1 8E 10 5B STX  $5B10                 
 7156                                 5AF4 8E 1F 5B STX  $5B1F                 
 7157                                 5AF7 A0 04    LDY  #$04                  
 7158                                 5AF9 B5 18    LDA  $18,X                 
 7159                                 5AFB D0 F3    BNE  $5AF0                 
 7160                                 5AFD E0 08    CPX  #$08                  
 7161                                 5AFF D0 0B    BNE  $5B0C                 
 7162                                 5B01 AE 02 08 LDX  $0802                 
 7163                                 5B04 E0 3D    CPX  #$3D                  
 7164                                 5B06 F0 CB    BEQ  $5AD3                 
 7165                                 5B08 E0 20    CPX  #$20                  
 7166                                 5B0A F0 D5    BEQ  $5AE1                 
 7167                                 5B0C A0 02    LDY  #$02                  
 7168                                 5B0E B9 03 08 LDA  $0803,Y               
 7169                                 5B11 49 30    EOR  #$30                  
 7170                                 5B13 C9 0A    CMP  #$0A                  
 7171                                 5B15 B0 62    BCS  $5B79                 
 7172                                 5B17 99 5F 58 STA  $585F,Y               
 7173                                 5B1A 88       DEY                        
 7174                                 5B1B 10 F1    BPL  $5B0E                 
 7175                                 5B1D AD 02 08 LDA  $0802                 
 7176                                 5B20 AA       TAX                        
 7177                                 5B21 49 2B    EOR  #$2B                  
 7178                                 5B23 F0 11    BEQ  $5B36                 
 7179                                 5B25 A9 2B    LDA  #$2B                  
 7180                                 5B27 E0 41    CPX  #$41                  
 7181                                 5B29 F0 0B    BEQ  $5B36                 
 7182                                 5B2B 0A       ASL  A                     
 7183                                 5B2C E0 42    CPX  #$42                  
 7184                                 5B2E F0 06    BEQ  $5B36                 
 7185                                 5B30 E0 2D    CPX  #$2D                  
 7186                                 5B32 D0 45    BNE  $5B79                 
 7187                                 5B34 A9 FF    LDA  #$FF                  
 7188                                 5B36 48       PHA                        
 7189                                 5B37 20 31 5E JSR  $5E31                 
 7190                                 5B3A A0 00    LDY  #$00                  
 7191                                 5B3C 68       PLA                        
 7192                                 5B3D 91 00    STA  ($00),Y               
 7193                                 5B3F 10 1F    BPL  $5B60                 
 7194                                 5B41 A5 01    LDA  $01                   
 7195                                 5B43 49 F4    EOR  #$F4                  
 7196                                 5B45 D0 19    BNE  $5B60                 
 7197                                 5B47 A9 0D    LDA  #$0D                  
 7198                                 5B49 06 00    ASL  $00                   
 7199                                 5B4B 2A       ROL  A                     
 7200                                 5B4C 06 00    ASL  $00                   
 7201                                 5B4E 2A       ROL  A                     
 7202                                 5B4F 06 00    ASL  $00                   
 7203                                 5B51 2A       ROL  A                     
 7204                                 5B52 06 00    ASL  $00                   
 7205                                 5B54 2A       ROL  A                     
 7206                                 5B55 85 01    STA  $01                   
 7207                                 5B57 98       TYA                        
 7208                                 5B58 2C 8B C0 BIT  $C08B                 
 7209                                 5B5B 91 00    STA  ($00),Y               
 7210                                 5B5D 2C 83 C0 BIT  $C083                 
 7211                                 5B60 A2 A0    LDX  #$A0                  
 7212                                 5B62 AD E7 F7 LDA  $F7E7                 
 7213                                 5B65 49 FF    EOR  #$FF                  
 7214                                 5B67 8D F9 5D STA  $5DF9                 
 7215                                 5B6A D0 05    BNE  $5B71                 
 7216                                 5B6C 8D 5E 58 STA  $585E                 
 7217                                 5B6F A2 2D    LDX  #$2D                  
 7218                                 5B71 8E 09 04 STX  cons_syslocked        
 7219                                 5B74 A9 FF    LDA  #$FF                  
 7220                                 5B76 4C 20 7F JMP  $7F20                 
 7221                                 5B79 AD 22 5A LDA  $5A22                 
 7222                                 5B7C 8D 4F 60 STA  $604F                 
 7223                                 5B7F AD 23 5A LDA  $5A23                 
 7224                                 5B82 8D 50 60 STA  $6050                 
 7225                                 5B85 A0 04    LDY  #$04                  
 7226                                 5B87 B9 E8 58 LDA  $58E8,Y               
 7227                                 5B8A 99 1B 5A STA  $5A1B,Y               
 7228                                 5B8D 88       DEY                        
 7229                                 5B8E 10 F7    BPL  $5B87                 
 7230                                 5B90 A0 3E    LDY  #$3E                  
 7231                                 5B92 60       RTS                        
 7232                              clock_daychange2
 7233                                 5B93 A2 02    LDX  #$02                  
 7234                                 5B95 20 22 F8 JSR  _and_rts              
 7235                                 5B98 BD 89 04 LDA  cons_callstoday1,X    
 7236                                 5B9B 9D 8D 04 STA  cons_callsyester1,X   
 7237                                 5B9E A9 B0    LDA  #$B0                  
 7238                                 5BA0 9D 89 04 STA  cons_callstoday1,X    
 7239                                 5BA3 CA       DEX                        
 7240                                 5BA4 10 F2    BPL  $5B98                 
 7241                                 5BA6 EE 98 04 INC  $0498                 
 7242                                 5BA9 AD 98 04 LDA  $0498                 
 7243                                 5BAC C9 BA    CMP  #$BA                  
 7244                                 5BAE D0 08    BNE  $5BB8                 
 7245                                 5BB0 A9 B0    LDA  #$B0                  
 7246                                 5BB2 8D 98 04 STA  $0498                 
 7247                                 5BB5 EE 97 04 INC  $0497                 
 7248                                 5BB8 AD 97 04 LDA  $0497                 
 7249                                 5BBB C9 B3    CMP  #$B3                  
 7250                                 5BBD D0 46    BNE  $5C05                 
 7251                                 5BBF AD 95 04 LDA  $0495                 
 7252                                 5BC2 29 0F    AND  #$0F                  
 7253                                 5BC4 AC 94 04 LDY  cons_line2col21       
 7254                                 5BC7 C0 B1    CPY  #$B1                  
 7255                                 5BC9 D0 02    BNE  $5BCD                 
 7256                                 5BCB 69 09    ADC  #$09                  
 7257                                 5BCD A8       TAY                        
 7258                                 5BCE B9 05 5C LDA  $5C05,Y               
 7259                                 5BD1 CD 98 04 CMP  $0498                 
 7260                                 5BD4 D0 2F    BNE  $5C05                 
 7261                                 5BD6 A0 B0    LDY  #$B0                  
 7262                                 5BD8 8C 97 04 STY  $0497                 
 7263                                 5BDB C8       INY                        
 7264                                 5BDC 8C 98 04 STY  $0498                 
 7265                                 5BDF EE 95 04 INC  $0495                 
 7266                                 5BE2 AD 95 04 LDA  $0495                 
 7267                                 5BE5 C9 BA    CMP  #$BA                  
 7268                                 5BE7 D0 09    BNE  $5BF2                 
 7269                                 5BE9 8C 94 04 STY  cons_line2col21       
 7270                                 5BEC 88       DEY                        
 7271                                 5BED 8C 95 04 STY  $0495                 
 7272                                 5BF0 D0 13    BNE  $5C05                 
 7273                                 5BF2 C9 B3    CMP  #$B3                  
 7274                                 5BF4 D0 0F    BNE  $5C05                 
 7275                                 5BF6 CC 94 04 CPY  cons_line2col21       
 7276                                 5BF9 D0 0A    BNE  $5C05                 
 7277                                 5BFB 8C 95 04 STY  $0495                 
 7278                                 5BFE 88       DEY                        
 7279                                 5BFF 8C 94 04 STY  cons_line2col21       
 7280                                 5C02 EE 9B 04 INC  $049B                 
 7281                                 5C05 60       RTS                        
 7282                                 5C06 B2       ???                        
 7283                                 5C07 B0 B2    BCS  $5BBB                 
 7284                                 5C09 B1 B2    LDA  ($B2),Y               
 7285                                 5C0B B1 B2    LDA  ($B2),Y               
 7286                                 5C0D B2       ???                        
 7287                                 5C0E B1 B2    LDA  ($B2),Y               
 7288                                 5C10 B1 B2    LDA  ($B2),Y               
 7289                                 5C12 A2 04    LDX  #$04                  
 7290                                 5C14 FE E8 58 INC  $58E8,X               
 7291                                 5C17 BD E8 58 LDA  $58E8,X               
 7292                                 5C1A C9 3A    CMP  #$3A                  
 7293                                 5C1C 90 08    BCC  $5C26                 
 7294                                 5C1E A9 30    LDA  #$30                  
 7295                                 5C20 9D E8 58 STA  $58E8,X               
 7296                                 5C23 CA       DEX                        
 7297                                 5C24 10 EE    BPL  $5C14                 
 7298                                 5C26 A2 03    LDX  #$03                  
 7299                                 5C28 BD 88 04 LDA  cons_status,X         
 7300                                 5C2B 29 7F    AND  #$7F                  
 7301                                 5C2D 9D F5 58 STA  $58F5,X               
 7302                                 5C30 CA       DEX                        
 7303                                 5C31 D0 F5    BNE  $5C28                 
 7304                                 5C33 60       RTS                        
 7305     t00 t80                     5C34 48       PHA                        
 7306     t00 t80                     5C35 AA       TAX                        
 7307     t00 t80                     5C36 F0 69    BEQ  $5CA1                 
 7308                                 5C38 0A       ASL  A                     
 7309                                 5C39 A8       TAY                        
 7310                                 5C3A A9 00    LDA  #$00                  
 7311                                 5C3C 8D FE 5D STA  $5DFE                 
 7312                                 5C3F 8D EB 5D STA  $5DEB                 
 7313                                 5C42 8D 12 F8 STA  $F812                 
 7314                                 5C45 99 4E 58 STA  $584E,Y               
 7315                                 5C48 99 4F 58 STA  $584F,Y               
 7316                                 5C4B A9 04    LDA  #$04                  
 7317                                 5C4D 8D A2 5C STA  $5CA2                 
 7318                                 5C50 8A       TXA                        
 7319                                 5C51 09 08    ORA  #$08                  
 7320                                 5C53 8D 7E 5C STA  $5C7E                 
 7321                                 5C56 29 07    AND  #$07                  
 7322                                 5C58 0A       ASL  A                     
 7323                                 5C59 0A       ASL  A                     
 7324                                 5C5A 0A       ASL  A                     
 7325                                 5C5B A8       TAY                        
 7326                                 5C5C A9 A0    LDA  #$A0                  
 7327                                 5C5E 8D 2F 5E STA  $5E2F                 
 7328                                 5C61 8D 6B 58 STA  $586B                 
 7329                                 5C64 A9 32    LDA  #$32                  
 7330                                 5C66 2D E1 F7 AND  $F7E1                 
 7331                                 5C69 99 15 58 STA  $5815,Y               
 7332                                 5C6C 20 12 5C JSR  $5C12                 
 7333                                 5C6F A9 00    LDA  #$00                  
 7334                                 5C71 8D DE 5D STA  $5DDE                 
 7335                                 5C74 8D CC 5D STA  $5DCC                 
 7336                                 5C77 99 0E 58 STA  $580E,Y               
 7337                                 5C7A A8       TAY                        
 7338                                 5C7B AA       TAX                        
 7339                                 5C7C B9 00 08 LDA  inbuf_line0,Y         
 7340                                 5C7F F0 1C    BEQ  $5C9D                 
 7341                                 5C81 49 30    EOR  #$30                  
 7342                                 5C83 C9 0A    CMP  #$0A                  
 7343                                 5C85 B0 0D    BCS  $5C94                 
 7344                                 5C87 9D 5F 58 STA  $585F,X               
 7345                                 5C8A E0 03    CPX  #$03                  
 7346                                 5C8C B0 05    BCS  $5C93                 
 7347                                 5C8E 09 30    ORA  #$30                  
 7348                                 5C90 9D 13 5A STA  $5A13,X               
 7349                                 5C93 E8       INX                        
 7350                                 5C94 C8       INY                        
 7351                                 5C95 F0 0A    BEQ  $5CA1                 
 7352                                 5C97 E0 0D    CPX  #$0D                  
 7353                                 5C99 90 E1    BCC  $5C7C                 
 7354                                 5C9B B0 0C    BCS  $5CA9                 
 7355                                 5C9D E0 09    CPX  #$09                  
 7356                                 5C9F B0 08    BCS  $5CA9                 
 7357     t00 t80                     5CA1 A9 04    LDA  #$04                  
 7358     t00 t80                     5CA3 8D EB 5D STA  $5DEB                 
 7359     t00 t80                     5CA6 4C C9 5D JMP  $5DC9                 
 7360                                 5CA9 20 31 5E JSR  $5E31                 
 7361                                 5CAC A0 00    LDY  #$00                  
 7362                                 5CAE B1 00    LDA  ($00),Y               
 7363                                 5CB0 30 EF    BMI  $5CA1                 
 7364                                 5CB2 F0 11    BEQ  $5CC5                 
 7365                                 5CB4 18       CLC                        
 7366                                 5CB5 C8       INY                        
 7367                                 5CB6 E9 2B    SBC  #$2B                  
 7368                                 5CB8 B0 FB    BCS  $5CB5                 
 7369                                 5CBA 98       TYA                        
 7370                                 5CBB 09 40    ORA  #$40                  
 7371                                 5CBD 8D 97 58 STA  $5897                 
 7372                                 5CC0 A9 06    LDA  #$06                  
 7373                                 5CC2 8D A2 5C STA  $5CA2                 
 7374                                 5CC5 A2 FF    LDX  #$FF                  
 7375                                 5CC7 A5 01    LDA  $01                   
 7376                                 5CC9 49 F4    EOR  #$F4                  
 7377                                 5CCB 2D E2 F7 AND  $F7E2                 
 7378                                 5CCE F0 07    BEQ  $5CD7                 
 7379                                 5CD0 8E 6B 58 STX  $586B                 
 7380                                 5CD3 A9 0A    LDA  #$0A                  
 7381                                 5CD5 D0 1B    BNE  $5CF2                 
 7382                                 5CD7 A5 E7    LDA  $E7                   
 7383                                 5CD9 F0 20    BEQ  $5CFB                 
 7384                                 5CDB A0 07    LDY  #$07                  
 7385                                 5CDD B9 76 58 LDA  $5876,Y               
 7386                                 5CE0 F0 16    BEQ  $5CF8                 
 7387                                 5CE2 B9 7E 58 LDA  $587E,Y               
 7388                                 5CE5 C5 00    CMP  $00                   
 7389                                 5CE7 D0 0F    BNE  $5CF8                 
 7390                                 5CE9 B9 86 58 LDA  $5886,Y               
 7391                                 5CEC C5 01    CMP  $01                   
 7392                                 5CEE D0 08    BNE  $5CF8                 
 7393                                 5CF0 A9 08    LDA  #$08                  
 7394                                 5CF2 E8       INX                        
 7395                                 5CF3 8D EB 5D STA  $5DEB                 
 7396                                 5CF6 F0 03    BEQ  $5CFB                 
 7397                                 5CF8 88       DEY                        
 7398                                 5CF9 10 E2    BPL  $5CDD                 
 7399                                 5CFB 8E 3E 5D STX  $5D3E                 
 7400                                 5CFE A0 02    LDY  #$02                  
 7401                                 5D00 A2 09    LDX  #$09                  
 7402                                 5D02 BD 6C 58 LDA  $586C,X               
 7403                                 5D05 DD 62 58 CMP  $5862,X               
 7404                                 5D08 F0 07    BEQ  $5D11                 
 7405                                 5D0A E0 06    CPX  #$06                  
 7406                                 5D0C 90 93    BCC  $5CA1                 
 7407                                 5D0E 88       DEY                        
 7408                                 5D0F A2 06    LDX  #$06                  
 7409                                 5D11 CA       DEX                        
 7410                                 5D12 10 EE    BPL  $5D02                 
 7411                                 5D14 68       PLA                        
 7412                                 5D15 48       PHA                        
 7413                                 5D16 AA       TAX                        
 7414                                 5D17 A9 10    LDA  #$10                  
 7415                                 5D19 9D 78 7F STA  $7F78,X               
 7416                                 5D1C A2 AB    LDX  #$AB                  
 7417                                 5D1E AD 00 04 LDA  cons_line1/cutofftime 
 7418                                 5D21 29 0F    AND  #$0F                  
 7419                                 5D23 88       DEY                        
 7420                                 5D24 F0 0D    BEQ  $5D33                 
 7421                                 5D26 CA       DEX                        
 7422                                 5D27 A0 02    LDY  #$02                  
 7423                                 5D29 8C EB 5D STY  $5DEB                 
 7424                                 5D2C A0 2A    LDY  #$2A                  
 7425                                 5D2E 09 70    ORA  #$70                  
 7426                                 5D30 8E CC 5D STX  $5DCC                 
 7427                                 5D33 8C 9F 5D STY  $5D9F                 
 7428                                 5D36 8E 2F 5E STX  $5E2F                 
 7429                                 5D39 C0 00    CPY  #$00                  
 7430                                 5D3B D0 02    BNE  $5D3F                 
 7431                                 5D3D 29 FF    AND  #$FF                  
 7432                                 5D3F 8D DE 5D STA  $5DDE                 
 7433                                 5D42 AD 08 04 LDA  cons_moecutoff        
 7434                                 5D45 C9 A0    CMP  #$A0                  
 7435                                 5D47 F0 21    BEQ  $5D6A                 
 7436                                 5D49 A2 07    LDX  #$07                  
 7437                                 5D4B B5 90    LDA  $90,X                 
 7438                                 5D4D 49 20    EOR  #$20                  
 7439                                 5D4F 15 38    ORA  $38,X                 
 7440                                 5D51 D0 14    BNE  $5D67                 
 7441                                 5D53 8A       TXA                        
 7442                                 5D54 0A       ASL  A                     
 7443                                 5D55 A8       TAY                        
 7444                                 5D56 A5 00    LDA  $00                   
 7445                                 5D58 D9 4E 58 CMP  $584E,Y               
 7446                                 5D5B D0 0A    BNE  $5D67                 
 7447                                 5D5D A5 01    LDA  $01                   
 7448                                 5D5F D9 4F 58 CMP  $584F,Y               
 7449                                 5D62 D0 03    BNE  $5D67                 
 7450                                 5D64 4C A7 5E JMP  $5EA7                 
 7451                                 5D67 CA       DEX                        
 7452                                 5D68 D0 E1    BNE  $5D4B                 
 7453                                 5D6A 68       PLA                        
 7454                                 5D6B 48       PHA                        
 7455                                 5D6C 0A       ASL  A                     
 7456                                 5D6D AA       TAX                        
 7457                                 5D6E 0A       ASL  A                     
 7458                                 5D6F 0A       ASL  A                     
 7459                                 5D70 A8       TAY                        
 7460                                 5D71 A5 00    LDA  $00                   
 7461                                 5D73 9D 4E 58 STA  $584E,X               
 7462                                 5D76 A5 01    LDA  $01                   
 7463                                 5D78 9D 4F 58 STA  $584F,X               
 7464                                 5D7B A9 2F    LDA  #$2F                  
 7465                                 5D7D 8D FE 5D STA  $5DFE                 
 7466                                 5D80 99 0E 58 STA  $580E,Y               
 7467                                 5D83 18       CLC                        
 7468                                 5D84 20 06 F8 JSR  $F806                 
 7469                                 5D87 AE EB 5D LDX  $5DEB                 
 7470                                 5D8A 90 12    BCC  $5D9E                 
 7471                                 5D8C 70 04    BVS  $5D92                 
 7472                                 5D8E E0 08    CPX  #$08                  
 7473                                 5D90 F0 14    BEQ  $5DA6                 
 7474                                 5D92 AD 00 04 LDA  cons_line1/cutofftime 
 7475                                 5D95 09 70    ORA  #$70                  
 7476                                 5D97 8D DE 5D STA  $5DDE                 
 7477                                 5D9A A9 AA    LDA  #$AA                  
 7478                                 5D9C D0 0A    BNE  $5DA8                 
 7479                                 5D9E A9 00    LDA  #$00                  
 7480                                 5DA0 D0 0B    BNE  $5DAD                 
 7481                                 5DA2 E0 08    CPX  #$08                  
 7482                                 5DA4 90 07    BCC  $5DAD                 
 7483                                 5DA6 A9 A4    LDA  #$A4                  
 7484                                 5DA8 8D 2F 5E STA  $5E2F                 
 7485                                 5DAB 29 7F    AND  #$7F                  
 7486                                 5DAD 99 13 58 STA  $5813,Y               
 7487                                 5DB0 AD 5F 58 LDA  $585F                 
 7488                                 5DB3 D0 03    BNE  $5DB8                 
 7489                                 5DB5 99 15 58 STA  $5815,Y               
 7490                                 5DB8 C8       INY                        
 7491                                 5DB9 A2 00    LDX  #$00                  
 7492                                 5DBB C8       INY                        
 7493                                 5DBC BD 5F 58 LDA  $585F,X               
 7494                                 5DBF 09 30    ORA  #$30                  
 7495                                 5DC1 99 0E 58 STA  $580E,Y               
 7496                                 5DC4 E8       INX                        
 7497                                 5DC5 E0 03    CPX  #$03                  
 7498                                 5DC7 90 F2    BCC  $5DBB                 
 7499     t00 t80                     5DC9 68       PLA                        
 7500     t00 t80                     5DCA AA       TAX                        
 7501     t00 t80                     5DCB A9 00    LDA  #$00                  
 7502     t00 t80                     5DCD 9D 03 FF STA  $FF03,X               
 7503     t00 t80                     5DD0 AD 08 04 LDA  cons_moecutoff        
 7504     t00 t80                     5DD3 C9 A0    CMP  #$A0                  
 7505     t00 t80                     5DD5 D0 06    BNE  $5DDD                 
 7506                                 5DD7 AD 00 04 LDA  cons_line1/cutofftime 
 7507                                 5DDA 29 0F    AND  #$0F                  
 7508                                 5DDC 2C A9 00 BIT  $00A9                 
 7509     t00 t80                     5DDF 2C E0 F7 BIT  $F7E0                 
 7510     t00 t80                     5DE2 30 04    BMI  $5DE8                 
 7511     t00 t80                     5DE4 C9 70    CMP  #$70                  
 7512     t00 t80                     5DE6 69 00    ADC  #$00                  
 7513     t00 t80                     5DE8 95 50    STA  $50,X                 
 7514     t00 t80                     5DEA A0 04    LDY  #$04                  
 7515     t00 t80                     5DEC C9 00    CMP  #$00                  
 7516     t00 t80                     5DEE F0 02    BEQ  $5DF2                 
 7517                                 5DF0 A0 02    LDY  #$02                  
 7518     t00 t80                     5DF2 A9 40    LDA  #$40                  
 7519     t00 t80                     5DF4 95 D0    STA  $D0,X                 
 7520     t00 t80                     5DF6 95 98    STA  $98,X                 
 7521     t00 t80                     5DF8 A9 FF    LDA  #$FF                  
 7522     t00 t80                     5DFA 1D 88 7F ORA  $7F88,X               
 7523     t00 t80                     5DFD 09 00    ORA  #$00                  
 7524     t00 t80                     5DFF D0 17    BNE  $5E18                 
 7525                                 5E01 95 48    STA  $48,X                 
 7526                                 5E03 A9 19    LDA  #$19                  
 7527                                 5E05 95 38    STA  $38,X                 
 7528                                 5E07 AD 9B 60 LDA  $609B                 
 7529                                 5E0A 95 70    STA  $70,X                 
 7530                                 5E0C AD 9C 60 LDA  $609C                 
 7531                                 5E0F 95 78    STA  $78,X                 
 7532                                 5E11 A9 00    LDA  #$00                  
 7533                                 5E13 A2 F2    LDX  #$F2                  
 7534                                 5E15 A0 A0    LDY  #$A0                  
 7535                                 5E17 60       RTS                        
 7536     t00 t80                     5E18 A9 00    LDA  #$00                  
 7537     t00 t80                     5E1A DD 88 7F CMP  $7F88,X               
 7538     t00 t80                     5E1D F0 01    BEQ  $5E20                 
 7539                                 5E1F A8       TAY                        
 7540     t00 t80                     5E20 95 38    STA  $38,X                 
 7541     t00 t80                     5E22 95 48    STA  $48,X                 
 7542     t00 t80                     5E24 A9 FF    LDA  #$FF                  
 7543     t00 t80                     5E26 95 98    STA  $98,X                 
 7544     t00 t80                     5E28 B9 00 5A LDA  $5A00,Y               ; something before i left
 7545     t00 t80                     5E2B BE 01 5A LDX  $5A01,Y               
 7546     t00 t80                     5E2E A0 00    LDY  #$00                  
 7547     t00 t80                     5E30 60       RTS                        
 7548                                 5E31 AD 5F 58 LDA  $585F                 
 7549                                 5E34 0A       ASL  A                     
 7550                                 5E35 AA       TAX                        
 7551                                 5E36 AC 60 58 LDY  $5860                 
 7552                                 5E39 AD 61 58 LDA  $5861                 
 7553                                 5E3C 18       CLC                        
 7554                                 5E3D 79 C6 57 ADC  $57C6,Y               
 7555                                 5E40 7D CA 5E ADC  $5ECA,X               
 7556                                 5E43 85 E0    STA  $E0                   
 7557                                 5E45 85 00    STA  $00                   
 7558                                 5E47 A8       TAY                        
 7559                                 5E48 B9 00 5F LDA  $5F00,Y               
 7560                                 5E4B 8D 81 5E STA  $5E81                 
 7561                                 5E4E A9 00    LDA  #$00                  
 7562                                 5E50 8D 84 5E STA  $5E84                 
 7563                                 5E53 7D CB 5E ADC  $5ECB,X               
 7564                                 5E56 85 E1    STA  $E1                   
 7565                                 5E58 69 F4    ADC  #$F4                  
 7566                                 5E5A 85 01    STA  $01                   
 7567                                 5E5C AD 0D FF LDA  $FF0D                 
 7568                                 5E5F AE 0C FF LDX  $FF0C                 
 7569                                 5E62 E0 B1    CPX  #$B1                  
 7570                                 5E64 D0 02    BNE  $5E68                 
 7571                                 5E66 69 09    ADC  #$09                  
 7572                                 5E68 0A       ASL  A                     
 7573                                 5E69 0A       ASL  A                     
 7574                                 5E6A 0A       ASL  A                     
 7575                                 5E6B 0A       ASL  A                     
 7576                                 5E6C 4D 10 FF EOR  $FF10                 
 7577                                 5E6F 49 B0    EOR  #$B0                  
 7578                                 5E71 A0 09    LDY  #$09                  
 7579                                 5E73 18       CLC                        
 7580                                 5E74 AA       TAX                        
 7581                                 5E75 20 22 F8 JSR  _and_rts              
 7582                                 5E78 8A       TXA                        
 7583                                 5E79 A2 18    LDX  #$18                  
 7584                                 5E7B 26 E0    ROL  $E0                   
 7585                                 5E7D 26 E1    ROL  $E1                   
 7586                                 5E7F 2A       ROL  A                     
 7587                                 5E80 5D 00 5F EOR  $5F00,X               
 7588                                 5E83 49 00    EOR  #$00                  
 7589                                 5E85 90 02    BCC  $5E89                 
 7590                                 5E87 49 97    EOR  #$97                  
 7591                                 5E89 CA       DEX                        
 7592                                 5E8A D0 EF    BNE  $5E7B                 
 7593                                 5E8C AA       TAX                        
 7594                                 5E8D BD 00 5F LDA  $5F00,X               
 7595                                 5E90 29 0F    AND  #$0F                  
 7596                                 5E92 99 6C 58 STA  $586C,Y               
 7597                                 5E95 98       TYA                        
 7598                                 5E96 49 06    EOR  #$06                  
 7599                                 5E98 D0 08    BNE  $5EA2                 
 7600                                 5E9A A8       TAY                        
 7601                                 5E9B B1 00    LDA  ($00),Y               
 7602                                 5E9D 8D 84 5E STA  $5E84                 
 7603                                 5EA0 A0 06    LDY  #$06                  
 7604                                 5EA2 8A       TXA                        
 7605                                 5EA3 88       DEY                        
 7606                                 5EA4 10 CE    BPL  $5E74                 
 7607                                 5EA6 60       RTS                        
 7608                                 5EA7 A9 80    LDA  #$80                  
 7609                                 5EA9 95 50    STA  $50,X                 
 7610                                 5EAB 8D DE 5D STA  $5DDE                 
 7611                                 5EAE A2 02    LDX  #$02                  
 7612                                 5EB0 BD 5F 58 LDA  $585F,X               
 7613                                 5EB3 09 30    ORA  #$30                  
 7614                                 5EB5 9D 91 04 STA  $0491,X               
 7615                                 5EB8 9D 17 5A STA  $5A17,X               
 7616                                 5EBB CA       DEX                        
 7617                                 5EBC 10 F2    BPL  $5EB0                 
 7618                                 5EBE A0 00    LDY  #$00                  
 7619                                 5EC0 B1 00    LDA  ($00),Y               
 7620                                 5EC2 18       CLC                        
 7621                                 5EC3 69 2B    ADC  #$2B                  
 7622                                 5EC5 91 00    STA  ($00),Y               
 7623                                 5EC7 4C C9 5D JMP  $5DC9                 
 7624                                 5ECA 00       BRK                        
 7625                                 5ECB 00       BRK                        
 7626                                 5ECC 64       ???                        
 7627                                 5ECD 00       BRK                        
 7628                                 5ECE C8       INY                        
 7629                                 5ECF 00       BRK                        
 7630                                 5ED0 2C 01 90 BIT  $9001                 
 7631                                 5ED3 01 F4    ORA  ($F4,X)               
 7632                                 5ED5 01 58    ORA  ($58,X)               
 7633                                 5ED7 02       ???                        
 7634                                 5ED8 BC 02 20 LDY  $2002,X               
 7635                                 5EDB 03       ???                        
 7636                                 5EDC 84 03    STY  $03                   
 7637                                 5EDE 00       BRK                        
 7638                                 5EDF 00       BRK                        
 7639                                 5EE0 00       BRK                        
 7640                                 5EE1 00       BRK                        
 7641                                 5EE2 00       BRK                        
 7642                                 5EE3 00       BRK                        
 7643                                 5EE4 00       BRK                        
 7644                                 5EE5 00       BRK                        
 7645                                 5EE6 00       BRK                        
 7646                                 5EE7 00       BRK                        
 7647                                 5EE8 00       BRK                        
 7648                                 5EE9 88       DEY                        
 7649                                 5EEA 7D 7D 7D ADC  $7D7D,X               
 7650                                 5EED 8D 01 20 STA  $2001                 
 7651                              station_name
 7652                                 5EF0 44       ???                        
 7653                                 5EF1 2D 44 69 AND  $6944                 
 7654                                 5EF4 61 6C    ADC  ($6C,X)               
 7655                                 5EF6 20 23 10 JSR  $1023                 
 7656                                 5EF9 10 10    BPL  $5F0B                 
 7657                                 5EFB 10 10    BPL  $5F0D                 
 7658                                 5EFD 10 10    BPL  $5F0F                 
 7659                                 5EFF 34       ???                        
 7660                                 5F00 3B       ???                        
 7661                                 5F01 31 60    AND  ($60),Y               
 7662                                 5F03 03       ???                        
 7663                                 5F04 74       ???                        
 7664                                 5F05 23       ???                        
 7665                                 5F06 29 61    AND  #$61                  
 7666                                 5F08 6F       ???                        
 7667                                 5F09 69 59    ADC  #$59                  
 7668                                 5F0B 26 73    ROL  $73                   
 7669                                 5F0D 16 09    ASL  $09,X                 
 7670                                 5F0F 27       ???                        
 7671                                 5F10 49 14    EOR  #$14                  
 7672                                 5F12 11 20    ORA  ($20),Y               
 7673                                 5F14 34       ???                        
 7674                                 5F15 72       ???                        
 7675                                 5F16 2F       ???                        
 7676                                 5F17 51 74    EOR  ($74),Y               
 7677                                 5F19 04       ???                        
 7678                                 5F1A 27       ???                        
 7679                                 5F1B 15 79    ORA  $79,X                 
 7680                                 5F1D 44       ???                        
 7681                                 5F1E 50 60    BVC  $5F80                 
 7682                                 5F20 38       SEC                        
 7683                                 5F21 39 68 77 AND  $7768,Y               
 7684                                 5F24 41 26    EOR  ($26,X)               
 7685                                 5F26 62       ???                        
 7686                                 5F27 08       PHP                        
 7687                                 5F28 73       ???                        
 7688                                 5F29 15 49    ORA  $49,X                 
 7689                                 5F2B 34       ???                        
 7690                                 5F2C 37       ???                        
 7691                                 5F2D 6C 64 78 JMP  ($7864)               
 7692                                 5F30 69 51    ADC  #$51                  
 7693                                 5F32 78       SEI                        
 7694                                 5F33 73       ???                        
 7695                                 5F34 25 18    AND  $18                   
 7696                                 5F36 60       RTS                        
 7697                                 5F37 61 69    ADC  ($69,X)               
 7698                                 5F39 00       BRK                        
 7699                                 5F3A 16 70    ASL  $70,X                 
 7700                                 5F3C 03       ???                        
 7701                                 5F3D 71 02    ADC  ($02),Y               
 7702                                 5F3F 51 50    EOR  ($50),Y               
 7703                                 5F41 01 73    ORA  ($73,X)               
 7704                                 5F43 25 34    AND  $34                   
 7705                                 5F45 69 09    ADC  #$09                  
 7706                                 5F47 72       ???                        
 7707                                 5F48 14       ???                        
 7708                                 5F49 48       PHA                        
 7709                                 5F4A 76 06    ROR  $06,X                 
 7710                                 5F4C 72       ???                        
 7711                                 5F4D 06 67    ASL  $67                   
 7712                                 5F4F 33       ???                        
 7713                                 5F50 3B       ???                        
 7714                                 5F51 04       ???                        
 7715                                 5F52 20 48 28 JSR  $2848                 
 7716                                 5F55 57       ???                        
 7717                                 5F56 47       ???                        
 7718                                 5F57 50 67    BVC  $5FC0                 
 7719                                 5F59 38       SEC                        
 7720                                 5F5A 58       CLI                        
 7721                                 5F5B 46 6E    LSR  $6E                   
 7722                                 5F5D 72       ???                        
 7723                                 5F5E 24 19    BIT  $19                   
 7724                                 5F60 34       ???                        
 7725                                 5F61 20 77 64 JSR  $6477                 
 7726                                 5F64 55 36    EOR  $36,X                 
 7727                                 5F66 20 09 35 JSR  $3509                 
 7728                                 5F69 65 36    ADC  $36                   
 7729                                 5F6B 05 45    ORA  $45                   
 7730                                 5F6D 35 33    AND  $33,X                 
 7731                                 5F6F 28       PLP                        
 7732                                 5F70 75 3D    ADC  $3D,X                 
 7733                                 5F72 53       ???                        
 7734                                 5F73 74       ???                        
 7735                                 5F74 61 29    ADC  ($29,X)               
 7736                                 5F76 39 16 28 AND  $2816,Y               
 7737                                 5F79 06 35    ASL  $35                   
 7738                                 5F7B 04       ???                        
 7739                                 5F7C 35 37    AND  $37,X                 
 7740                                 5F7E 54       ???                        
 7741                                 5F7F 6E 43 17 ROR  $1743                 
 7742                                 5F82 63       ???                        
 7743                                 5F83 48       PHA                        
 7744                                 5F84 08       PHP                        
 7745                                 5F85 36 06    ROL  $06,X                 
 7746                                 5F87 66 0D    ROR  $0D                   
 7747                                 5F89 26 44    ROL  $44                   
 7748                                 5F8B 54       ???                        
 7749                                 5F8C 59 43 04 EOR  $0443,Y               
 7750                                 5F8F 74       ???                        
 7751                                 5F90 01 76    ORA  ($76,X)               
 7752                                 5F92 20 61 42 JSR  $4261                 
 7753                                 5F95 69 64    ADC  #$64                  
 7754                                 5F97 07       ???                        
 7755                                 5F98 33       ???                        
 7756                                 5F99 43       ???                        
 7757                                 5F9A 68       PLA                        
 7758                                 5F9B 14       ???                        
 7759                                 5F9C 19 23 6C ORA  $6C23,Y               
 7760                                 5F9F 66 32    ROR  $32                   
 7761                                 5FA1 52       ???                        
 7762                                 5FA2 57       ???                        
 7763                                 5FA3 79 17 05 ADC  $0517,Y               
 7764                                 5FA6 40       RTI                        
 7765                                 5FA7 74       ???                        
 7766                                 5FA8 66 29    ROR  $29                   
 7767                                 5FAA 13       ???                        
 7768                                 5FAB 39 6C 65 AND  $656C,Y               
 7769                                 5FAE 30 20    BMI  $5FD0                 
 7770                                 5FB0 35 2D    AND  $2D,X                 
 7771                                 5FB2 73       ???                        
 7772                                 5FB3 61 40    ADC  ($40,X)               
 7773                                 5FB5 62       ???                        
 7774                                 5FB6 20 2F 45 JSR  $452F                 
 7775                                 5FB9 07       ???                        
 7776                                 5FBA 42       ???                        
 7777                                 5FBB 32       ???                        
 7778                                 5FBC 73       ???                        
 7779                                 5FBD 30 77    BMI  $6036                 
 7780                                 5FBF 4D 20 6F EOR  $6F20                 
 7781                                 5FC2 00       BRK                        
 7782                                 5FC3 70 21    BVS  $5FE6                 
 7783                                 5FC5 15 67    ORA  $67,X                 
 7784                                 5FC7 02       ???                        
 7785                                 5FC8 71 18    ADC  ($18),Y               
 7786                                 5FCA 74       ???                        
 7787                                 5FCB 13       ???                        
 7788                                 5FCC 71 73    ADC  ($73),Y               
 7789                                 5FCE 40       RTI                        
 7790                                 5FCF 01 21    ORA  ($21,X)               
 7791                                 5FD1 45 72    EOR  $72                   
 7792                                 5FD3 78       SEI                        
 7793                                 5FD4 63       ???                        
 7794                                 5FD5 25 52    AND  $52                   
 7795                                 5FD7 46 07    LSR  $07                   
 7796                                 5FD9 02       ???                        
 7797                                 5FDA 35 66    AND  $66,X                 
 7798                                 5FDC 69 76    ADC  #$76                  
 7799                                 5FDE 42       ???                        
 7800                                 5FDF 22       ???                        
 7801                                 5FE0 17       ???                        
 7802                                 5FE1 32       ???                        
 7803                                 5FE2 56 05    LSR  $05,X                 
 7804                                 5FE4 18       CLC                        
 7805                                 5FE5 36 6F    ROL  $6F,X                 
 7806                                 5FE7 27       ???                        
 7807                                 5FE8 45 63    EOR  $63                   
 7808                                 5FEA 4D 03 31 EOR  $3103                 
 7809                                 5FED 20 4D 75 JSR  $754D                 
 7810                                 5FF0 53       ???                        
 7811                                 5FF1 20 55 79 JSR  $7955                 
 7812                                 5FF4 75 41    ADC  $41,X                 
 7813                                 5FF6 47       ???                        
 7814                                 5FF7 08       PHP                        
 7815                                 5FF8 56 50    LSR  $50,X                 
 7816                                 5FFA 2F       ???                        
 7817                                 5FFB 47       ???                        
 7818                                 5FFC 31 75    AND  ($75),Y               
 7819                                 5FFE 75 20    ADC  $20,X                 
 7820                                 6000             51 7C 4C 55 7D 4C D3 6A 4C AA 60 4C EA 6B 4C 1E  Q|LU}L.jL.`L.kL.
 7821                                 6010             6D D0 6D DA 6D ED 6D 0A 6E 84 6F 00 10 9B 6F AE  m.m.m.m.n.o...o.
 7822                                 6020             6F BC 6F CB 6F D4 6F DC 6F EE 6F FF 6F 11 70 20  o.o.o.o.o.o.o.p 
 7823                                 6030             70 3E 70 50 70 63 70 A5 60 79 70 79 70 E5 79 4D  p>pPpcp.`ypyp.yM
 7824                                 6040             71 C3 72 F4 73 2E 75 A3 76 82 77 67 78 29 79 00  q.r.s.u.v.wgx)y.
 7825                                 6050             00 00 D0 00 D0 00 D1 00 D2 00 D3 00 D4 00 D5 00  ................
 7826                                 6060             D6 00 D7 00 D8 00 D9 00 DA 00 DB 00 DC 00 DD 00  ................
 7827                                 6070             DE 00 DF 00 E0 00 E1 00 E2 00 E3 00 E4 00 E5 00  ................
 7828                                 6080             E6 00 E7 00 E8 00 E9 00 EA 00 EB 00 EC 00 ED 00  ................
 7829                                 6090             EE 00 EF 00 F0 00 F1 00 F2 27 63 EC 7B D0 57 C3  .........'c.{.W.
 7830                                 60A0 6D B4 6D ADC  $6DB4                 
 7831                                 60A3 27       ???                        
 7832                                 60A4 63       ???                        
 7833                                 60A5 2F       ???                        
 7834                                 60A6 51 3D    EOR  ($3D),Y               
 7835                                 60A8 0D FF A9 ORA  $A9FF                 
 7836                                 60AB 40       RTI                        
 7837     t00 t80                     60AC 95 90    STA  $90,X                 
 7838     t00 t80                     60AE 95 D0    STA  $D0,X                 
 7839     t00 t80                     60B0 95 48    STA  $48,X                 
 7840     t00 t80                     60B2 8A       TXA                        
 7841     t00 t80                     60B3 09 30    ORA  #$30                  
 7842     t00 t80                     60B5 8D A0 61 STA  $61A0                 
 7843     t00 t80                     60B8 8D BB 61 STA  $61BB                 
 7844     t00 t80                     60BB 09 B0    ORA  #$B0                  
 7845     t00 t80                     60BD 9D 00 04 STA  cons_line1/cutofftime,X 
 7846     t00 t80                     60C0 8A       TXA                        
 7847     t00 t80                     60C1 0A       ASL  A                     
 7848     t00 t80                     60C2 0A       ASL  A                     
 7849     t00 t80                     60C3 0A       ASL  A                     
 7850     t00 t80                     60C4 0A       ASL  A                     
 7851     t00 t80                     60C5 0A       ASL  A                     
 7852     t00 t80                     60C6 8D CF 60 STA  $60CF                 
 7853     t00 t80                     60C9 A0 1F    LDY  #$1F                  
 7854     t00 t80                     60CB B9 9E 61 LDA  $619E,Y               
 7855     t00 t80                     60CE 99 00 02 STA  $0200,Y               
 7856     t00 t80                     60D1 88       DEY                        
 7857     t00 t80                     60D2 10 F7    BPL  $60CB                 
 7858     t00 t80                     60D4 A9 AA    LDA  #$AA                  
 7859     t00 t80                     60D6 9D 80 04 STA  cons_line2/line0channel,X 
 7860     t00 t80                     60D9 A9 3C    LDA  #$3C                  
 7861     t00 t80                     60DB 85 FC    STA  $FC                   
 7862     t00 t80                     60DD A9 00    LDA  #$00                  
 7863     t00 t80                     60DF 85 00    STA  $00                   
 7864     t00 t80                     60E1 85 FA    STA  $FA                   
 7865     t00 t80                     60E3 95 50    STA  $50,X                 
 7866     t00 t80                     60E5 95 18    STA  $18,X                 
 7867     t00 t80                     60E7 95 10    STA  $10,X                 
 7868     t00 t80                     60E9 95 40    STA  $40,X                 
 7869     t00 t80                     60EB 95 38    STA  $38,X                 
 7870     t00 t80                     60ED 95 28    STA  $28,X                 
 7871     t00 t80                     60EF 95 88    STA  $88,X                 
 7872     t00 t80                     60F1 95 80    STA  $80,X                 
 7873     t00 t80                     60F3 95 A0    STA  $A0,X                 
 7874     t00 t80                     60F5 95 C8    STA  $C8,X                 
 7875     t00 t80                     60F7 95 B0    STA  $B0,X                 
 7876     t00 t80                     60F9 95 D8    STA  $D8,X                 
 7877     t00 t80                     60FB 95 78    STA  $78,X                 
 7878     t00 t80                     60FD 95 E8    STA  $E8,X                 
 7879     t00 t80                     60FF 95 58    STA  $58,X                 
 7880     t00 t80                     6101 A9 0A    LDA  #$0A                  
 7881     t00 t80                     6103 95 68    STA  $68,X                 
 7882     t00 t80                     6105 A9 FF    LDA  #$FF                  
 7883     t00 t80                     6107 85 E8    STA  $E8                   
 7884     t00 t80                     6109 95 60    STA  $60,X                 
 7885     t00 t80                     610B 95 20    STA  $20,X                 
 7886     t00 t80                     610D A9 28    LDA  #$28                  
 7887     t00 t80                     610F 95 B8    STA  $B8,X                 
 7888     t00 t80                     6111 95 A8    STA  $A8,X                 
 7889     t00 t80                     6113 A0 00    LDY  #$00                  
 7890     t00 t80                     6115 84 20    STY  $20                   
 7891     t00 t80                     6117 98       TYA                        
 7892     t00 t80                     6118 29 7F    AND  #$7F                  
 7893     t00 t80                     611A C9 7F    CMP  #$7F                  
 7894     t00 t80                     611C D0 02    BNE  $6120                 
 7895     t00 t80                     611E A9 08    LDA  #$08                  
 7896     t00 t80                     6120 C9 20    CMP  #$20                  
 7897     t00 t80                     6122 B0 25    BCS  $6149                 
 7898     t00 t80                     6124 C9 08    CMP  #$08                  
 7899     t00 t80                     6126 F0 21    BEQ  $6149                 
 7900     t00 t80                     6128 C9 0D    CMP  #$0D                  
 7901     t00 t80                     612A F0 1D    BEQ  $6149                 
 7902     t00 t80                     612C C9 07    CMP  #$07                  
 7903     t00 t80                     612E F0 19    BEQ  $6149                 
 7904     t00 t80                     6130 C9 1B    CMP  #$1B                  
 7905     t00 t80                     6132 F0 10    BEQ  $6144                 
 7906     t00 t80                     6134 C9 09    CMP  #$09                  
 7907     t00 t80                     6136 F0 04    BEQ  $613C                 
 7908     t00 t80                     6138 C9 16    CMP  #$16                  
 7909     t00 t80                     613A D0 04    BNE  $6140                 
 7910     t00 t80                     613C A9 A0    LDA  #$A0                  
 7911     t00 t80                     613E D0 09    BNE  $6149                 
 7912     t00 t80                     6140 C9 15    CMP  #$15                  
 7913     t00 t80                     6142 D0 03    BNE  $6147                 
 7914     t00 t80                     6144 A9 80    LDA  #$80                  
 7915     t00 t80                     6146 2C A9 FF BIT  $FFA9                 
 7916     t00 t80                     6149 99 00 F3 STA  char_translate_tbl,Y  
 7917     t00 t80                     614C C8       INY                        
 7918     t00 t80                     614D D0 C8    BNE  $6117                 
 7919     t00 t80                     614F BD D8 7F LDA  modem_exists,X        
 7920     t00 t80                     6152 D0 01    BNE  acat_initialization   
 7921     t00 t80                     6154 60       RTS                        
 7922                              *
 7923                              * --- start of applecat initialization code
 7924                              * x=modem line # (1-7), one flag for branch later?
 7925                              acat_initialization
 7926     t80                         6155 08       PHP                        ; save entry flags
 7927         t80                     6156 A9 80    LDA  #$80                  
 7928         t80                     6158 95 90    STA  $90,X                 ; ??? something with $90+line
 7929         t80                     615A A9 01    LDA  #$01                  
 7930         t80                     615C 9D 60 7F STA  $7F60,X               ; ??? something with $7f60+line
 7931         t80                     615F BC 80 7F LDY  $7F80,X               ; y=modem slot offset for $c0nx access from table at $7f80,line
 7932         t80                     6162 28       PLP                        ; restore flags
 7933         t80                     6163 30 24    BMI  $6189                 ; ??? branch if some flag on entry (doesn't branch?)
 7934         t80                     6165 A9 01    LDA  #$01                  ; squelch microphone, speaker, tape recorder off, 212 enable/answer mode
 7935         t80                     6167 99 81 C0 STA  $C081,Y               ; store applecat 'squbyt'
 7936         t80                     616A A9 00    LDA  #$00                  ; dv (touchtone?) set, on hook
 7937         t80                     616C 99 82 C0 STA  $C082,Y               ; store applecat 'shbyt'
 7938         t80                     616F A9 06    LDA  #$06                  ; bsr disabled, interrupts disabled
 7939         t80                     6171 99 83 C0 STA  $C083,Y               ; store applecat 'bsrbyt'
 7940         t80                     6174 A9 03    LDA  #$03                  ; 8 data bits, 1 stop bit, disable parity
 7941         t80                     6176 99 8A C0 STA  $C08A,Y               ; store applecat 'con'
 7942         t80                     6179 A9 22    LDA  #$22                  ; 300 baud, transmit and receive
 7943         t80                     617B 99 8B C0 STA  $C08B,Y               ; store applecat 'spdbyt'
 7944         t80                     617E A9 05    LDA  #$05                  ; receiver on, disable IRQ / transmitter on, disable IRQ
 7945         t80                     6180 99 8C C0 STA  $C08C,Y               ; store applecat 'com'
 7946         t80                     6183 A9 00    LDA  #$00                  ; direct uart tx/rx to 'main modem'
 7947         t80                     6185 99 8F C0 STA  $C08F,Y               ; store applecat 'devbyt'
 7948         t80                     6188 60       RTS                        ; done !
 7949                                 6189 A9 03    LDA  #$03                  
 7950                                 618B 99 86 C0 STA  $C086,Y               
 7951                                 618E A9 15    LDA  #$15                  
 7952                                 6190 99 86 C0 STA  $C086,Y               
 7953                                 6193 A9 0B    LDA  #$0B                  
 7954                                 6195 99 85 C0 STA  $C085,Y               
 7955                                 6198 A9 00    LDA  #$00                  
 7956                                 619A 99 83 C0 STA  $C083,Y               
 7957                                 619D 60       RTS                        
 7958                                 619E 8D 23 30 STA  $3023                 
 7959                                 61A1 3C       ???                        
 7960                                 61A2 54       ???                        
 7961                                 61A3 31 3A    AND  ($3A),Y               
 7962                                 61A5 3F       ???                        
 7963                                 61A6 29 20    AND  #$20                  
 7964                                 61A8 00       BRK                        
 7965                                 61A9 00       BRK                        
 7966                                 61AA 00       BRK                        
 7967                                 61AB 00       BRK                        
 7968                                 61AC 00       BRK                        
 7969                                 61AD 00       BRK                        
 7970                                 61AE 00       BRK                        
 7971                                 61AF 00       BRK                        
 7972                                 61B0 00       BRK                        
 7973                                 61B1 00       BRK                        
 7974                                 61B2 00       BRK                        
 7975                                 61B3 00       BRK                        
 7976                                 61B4 00       BRK                        
 7977                                 61B5 00       BRK                        
 7978                                 61B6 00       BRK                        
 7979                                 61B7 00       BRK                        
 7980                                 61B8 00       BRK                        
 7981                                 61B9 00       BRK                        
 7982                                 61BA 8D 30 00 STA  $0030                 
 7983                                 61BD 00       BRK                        
 7984                                 61BE 81 C0    STA  ($C0,X)               
 7985                                 61C0 F6 C0    INC  $C0,X                 
 7986                                 61C2 F0 01    BEQ  $61C5                 
 7987                                 61C4 60       RTS                        
 7988                                 61C5 F6 C1    INC  $C1,X                 
 7989                                 61C7 B5 C1    LDA  $C1,X                 
 7990                                 61C9 08       PHP                        
 7991                                 61CA 24 08    BIT  $08                   
 7992                                 61CC D0 05    BNE  $61D3                 
 7993                                 61CE 38       SEC                        
 7994                                 61CF E9 10    SBC  #$10                  
 7995                                 61D1 95 C1    STA  $C1,X                 
 7996                                 61D3 28       PLP                        
 7997                                 61D4 60       RTS                        
 7998                                 61D5 C9 DD    CMP  #$DD                  
 7999                                 61D7 D0 02    BNE  $61DB                 
 8000                                 61D9 A9 CD    LDA  #$CD                  
 8001                                 61DB C9 C0    CMP  #$C0                  
 8002                                 61DD D0 02    BNE  $61E1                 
 8003                                 61DF A9 D0    LDA  #$D0                  
 8004                                 61E1 C9 DE    CMP  #$DE                  
 8005                                 61E3 D0 02    BNE  $61E7                 
 8006                                 61E5 A9 CE    LDA  #$CE                  
 8007                                 61E7 C9 8E    CMP  #$8E                  
 8008                                 61E9 D0 02    BNE  $61ED                 
 8009                                 61EB A9 DE    LDA  #$DE                  
 8010                                 61ED 2C 63 C0 BIT  $C063                 
 8011                                 61F0 10 0B    BPL  $61FD                 
 8012                                 61F2 C9 C1    CMP  #$C1                  
 8013                                 61F4 90 06    BCC  $61FC                 
 8014                                 61F6 C9 DB    CMP  #$DB                  
 8015                                 61F8 B0 02    BCS  $61FC                 
 8016                                 61FA 09 20    ORA  #$20                  
 8017                                 61FC 60       RTS                        
 8018                                 61FD C9 B0    CMP  #$B0                  
 8019                                 61FF D0 FB    BNE  $61FC                 
 8020                                 6201 A9 DC    LDA  #$DC                  
 8021                                 6203 60       RTS                        
 8022                                 6204 A2 07    LDX  #$07                  
 8023                                 6206 BD A0 7F LDA  $7FA0,X               
 8024                                 6209 09 30    ORA  #$30                  
 8025                                 620B 10 02    BPL  $620F                 
 8026                                 620D A9 51    LDA  #$51                  
 8027                                 620F 9D F5 72 STA  $72F5,X               
 8028                                 6212 BD F8 7E LDA  $7EF8,X               
 8029                                 6215 1D F7 7E ORA  $7EF7,X               
 8030                                 6218 C9 01    CMP  #$01                  
 8031                                 621A A9 20    LDA  #$20                  
 8032                                 621C 90 02    BCC  $6220                 
 8033                                 621E A9 3E    LDA  #$3E                  
 8034                                 6220 9D E2 72 STA  $72E2,X               
 8035                                 6223 CA       DEX                        
 8036                                 6224 CA       DEX                        
 8037                                 6225 10 DF    BPL  $6206                 
 8038                                 6227 60       RTS                        
 8039                                 6228 90 19    BCC  $6243                 
 8040                                 622A BE 80 7F LDX  $7F80,Y               
 8041                                 622D B9 D8 7F LDA  modem_exists,Y        
 8042                                 6230 30 11    BMI  $6243                 
 8043                                 6232 49 01    EOR  #$01                  
 8044                                 6234 D0 0D    BNE  $6243                 
 8045                                 6236 A9 65    LDA  #$65                  
 8046                                 6238 9D 89 C0 STA  $C089,X               
 8047                                 623B A9 11    LDA  #$11                  
 8048                                 623D 9D 8D C0 STA  $C08D,X               
 8049                                 6240 99 A8 7F STA  $7FA8,Y               
 8050                                 6243 A9 FA    LDA  #$FA                  
 8051                                 6245 99 B8 00 STA  $00B8,Y               
 8052                                 6248 69 00    ADC  #$00                  
 8053                                 624A 99 E8 7E STA  $7EE8,Y               
 8054                                 624D AD D6 7F LDA  $7FD6                 
 8055                                 6250 30 0A    BMI  $625C                 
 8056                                 6252 D0 05    BNE  $6259                 
 8057                                 6254 A9 60    LDA  #$60                  
 8058                                 6256 8D 02 60 STA  $6002                 
 8059                                 6259 8C D7 7F STY  $7FD7                 
 8060                                 625C A9 07    LDA  #$07                  
 8061                                 625E 99 F0 7E STA  $7EF0,Y               
 8062                                 6261 98       TYA                        
 8063                                 6262 09 A0    ORA  #$A0                  
 8064                                 6264 99 C0 7F STA  $7FC0,Y               
 8065                                 6267 A9 80    LDA  #$80                  
 8066                                 6269 99 48 00 STA  $0048,Y               
 8067                                 626C 98       TYA                        
 8068                                 626D 0A       ASL  A                     
 8069                                 626E AA       TAX                        
 8070                                 626F BD 4F 58 LDA  $584F,X               
 8071                                 6272 D0 0A    BNE  $627E                 
 8072                                 6274 A9 20    LDA  #$20                  
 8073                                 6276 99 B0 7F STA  $7FB0,Y               
 8074                                 6279 A9 03    LDA  #$03                  
 8075                                 627B 8D B0 7F STA  $7FB0                 
 8076                                 627E BD 4E 58 LDA  $584E,X               
 8077                                 6281 49 84    EOR  #$84                  
 8078                                 6283 D0 03    BNE  $6288                 
 8079                                 6285 9D 4F 58 STA  $584F,X               
 8080                                 6288 A9 00    LDA  #$00                  
 8081                                 628A 99 88 7F STA  $7F88,Y               
 8082                                 628D 99 68 00 STA  $0068,Y               
 8083                                 6290 99 58 7F STA  $7F58,Y               
 8084                                 6293 8A       TXA                        
 8085                                 6294 0A       ASL  A                     
 8086                                 6295 0A       ASL  A                     
 8087                                 6296 AA       TAX                        
 8088                                 6297 A9 00    LDA  #$00                  
 8089                                 6299 9D 15 58 STA  $5815,X               
 8090                                 629C A9 FF    LDA  #$FF                  
 8091                                 629E 99 78 7F STA  $7F78,Y               
 8092                                 62A1 99 50 00 STA  $0050,Y               
 8093                                 62A4 B9 80 7F LDA  $7F80,Y               
 8094                                 62A7 0A       ASL  A                     
 8095                                 62A8 AA       TAX                        
 8096                                 62A9 98       TYA                        
 8097                                 62AA 48       PHA                        
 8098                                 62AB A0 00    LDY  #$00                  
 8099                                 62AD A9 3D    LDA  #$3D                  
 8100                                 62AF D0 03    BNE  $62B4                 
 8101                                 62B1 B9 C5 62 LDA  $62C5,Y               
 8102                                 62B4 99 12 F8 STA  $F812,Y               
 8103                                 62B7 9D 06 02 STA  $0206,X               
 8104                                 62BA F0 04    BEQ  $62C0                 
 8105                                 62BC E8       INX                        
 8106                                 62BD C8       INY                        
 8107                                 62BE D0 F1    BNE  $62B1                 
 8108                                 62C0 99 10 F8 STA  $F810,Y               
 8109                                 62C3 68       PLA                        
 8110                                 62C4 A8       TAY                        
 8111                                 62C5 60       RTS                        
 8112                                 62C6 52       ???                        
 8113                                 62C7 65 6D    ADC  $6D                   
 8114                                 62C9 6F       ???                        
 8115                                 62CA 74       ???                        
 8116                                 62CB 65 29    ADC  $29                   
 8117                                 62CD 20 00 91 JSR  $9100                 
 8118                                 62D0 00       BRK                        
 8119                                 62D1 C8       INY                        
 8120                                 62D2 D0 02    BNE  $62D6                 
 8121                                 62D4 E6 01    INC  $01                   
 8122                                 62D6 60       RTS                        
 8123                                 62D7 00       BRK                        
 8124                                 62D8 00       BRK                        
 8125                                 62D9 00       BRK                        
 8126                                 62DA 00       BRK                        
 8127                                 62DB 00       BRK                        
 8128                                 62DC 00       BRK                        
 8129                                 62DD 00       BRK                        
 8130                                 62DE 00       BRK                        
 8131                                 62DF AD DD F7 LDA  $F7DD                 
 8132                                 62E2 F0 41    BEQ  $6325                 
 8133                                 62E4 B5 50    LDA  $50,X                 
 8134                                 62E6 0A       ASL  A                     
 8135                                 62E7 F0 3C    BEQ  $6325                 
 8136                                 62E9 B5 B0    LDA  $B0,X                 
 8137                                 62EB D0 38    BNE  $6325                 
 8138                                 62ED A9 00    LDA  #$00                  
 8139                                 62EF 85 01    STA  $01                   
 8140                                 62F1 B5 B8    LDA  $B8,X                 
 8141                                 62F3 10 02    BPL  $62F7                 
 8142                                 62F5 E6 01    INC  $01                   
 8143                                 62F7 98       TYA                        
 8144                                 62F8 9D D7 62 STA  $62D7,X               
 8145                                 62FB 85 04    STA  $04                   
 8146                                 62FD A2 07    LDX  #$07                  
 8147                                 62FF B5 50    LDA  $50,X                 
 8148                                 6301 0A       ASL  A                     
 8149                                 6302 F0 11    BEQ  $6315                 
 8150                                 6304 B5 B0    LDA  $B0,X                 
 8151                                 6306 D0 0D    BNE  $6315                 
 8152                                 6308 B5 B8    LDA  $B8,X                 
 8153                                 630A 30 09    BMI  $6315                 
 8154                                 630C BD D7 62 LDA  $62D7,X               
 8155                                 630F C5 04    CMP  $04                   
 8156                                 6311 D0 12    BNE  $6325                 
 8157                                 6313 E6 01    INC  $01                   
 8158                                 6315 CA       DEX                        
 8159                                 6316 D0 E7    BNE  $62FF                 
 8160                                 6318 2C DD F7 BIT  $F7DD                 
 8161                                 631B 30 04    BMI  $6321                 
 8162                                 631D E8       INX                        
 8163                                 631E 50 01    BVC  $6321                 
 8164                                 6320 E8       INX                        
 8165                                 6321 E4 01    CPX  $01                   
 8166                                 6323 E8       INX                        
 8167                                 6324 60       RTS                        
 8168                                 6325 38       SEC                        
 8169                                 6326 60       RTS                        
 8170                                 6327 2D 2D 3E AND  $3E2D                 
 8171                                 632A 20 4E 6F JSR  $6F4E                 
 8172                                 632D 20 45 6D JSR  $6D45                 
 8173                                 6330 61 69    ADC  ($69,X)               
 8174                                 6332 6C 20 54 JMP  ($5420)               
 8175                                 6335 68       PLA                        
 8176                                 6336 69 73    ADC  #$73                  
 8177                                 6338 20 53 74 JSR  $7453                 
 8178                                 633B 61 74    ADC  ($74,X)               
 8179                                 633D 69 6F    ADC  #$6F                  
 8180                                 633F 6E 0D FF ROR  $FF0D                 
 8181                                 6342 D0 02    BNE  $6346                 
 8182                                 6344 A9 00    LDA  #$00                  
 8183                                 6346 18       CLC                        
 8184                                 6347 7D 80 7F ADC  $7F80,X               
 8185                                 634A A8       TAY                        
 8186                                 634B BD E8 7F LDA  $7FE8,X               
 8187                                 634E F0 10    BEQ  $6360                 
 8188                                 6350 29 02    AND  #$02                  
 8189                                 6352 F0 02    BEQ  $6356                 
 8190                                 6354 A9 20    LDA  #$20                  
 8191                                 6356 9D 50 7F STA  $7F50,X               
 8192                                 6359 A9 00    LDA  #$00                  
 8193                                 635B 9D E8 7F STA  $7FE8,X               
 8194                                 635E F0 5A    BEQ  $63BA                 
 8195                                 6360 BD 50 7F LDA  $7F50,X               
 8196                                 6363 1D B0 7F ORA  $7FB0,X               
 8197                                 6366 9D E0 7F STA  $7FE0,X               
 8198                                 6369 F0 62    BEQ  $63CD                 
 8199                                 636B BD 88 7F LDA  $7F88,X               
 8200                                 636E F0 06    BEQ  $6376                 
 8201                                 6370 A9 FF    LDA  #$FF                  
 8202                                 6372 9D F0 7F STA  _mdm_outbuf_tbl,X     
 8203                                 6375 60       RTS                        
 8204                                 6376 BD 48 7F LDA  $7F48,X               
 8205                                 6379 D0 1A    BNE  $6395                 
 8206                                 637B BD F8 7F LDA  _mdm_inbuf_tbl,X      
 8207                                 637E 30 4D    BMI  $63CD                 
 8208                                 6380 B9 80 C0 LDA  $C080,Y               
 8209                                 6383 10 48    BPL  $63CD                 
 8210                                 6385 C9 80    CMP  #$80                  
 8211                                 6387 F0 03    BEQ  $638C                 
 8212                                 6389 9D F8 7F STA  _mdm_inbuf_tbl,X      
 8213                                 638C A9 00    LDA  #$00                  
 8214                                 638E 99 80 C0 STA  $C080,Y               
 8215                                 6391 A9 80    LDA  #$80                  
 8216                                 6393 D0 25    BNE  $63BA                 
 8217                                 6395 30 09    BMI  $63A0                 
 8218                                 6397 B9 80 C0 LDA  $C080,Y               
 8219                                 639A 30 31    BMI  $63CD                 
 8220                                 639C A9 00    LDA  #$00                  
 8221                                 639E F0 1A    BEQ  $63BA                 
 8222                                 63A0 B9 80 C0 LDA  $C080,Y               
 8223                                 63A3 C9 7F    CMP  #$7F                  
 8224                                 63A5 D0 26    BNE  $63CD                 
 8225                                 63A7 BD F0 7F LDA  _mdm_outbuf_tbl,X     
 8226                                 63AA C9 7F    CMP  #$7F                  
 8227                                 63AC 90 02    BCC  $63B0                 
 8228                                 63AE A9 00    LDA  #$00                  
 8229                                 63B0 99 80 C0 STA  $C080,Y               
 8230                                 63B3 A9 FF    LDA  #$FF                  
 8231                                 63B5 9D F0 7F STA  _mdm_outbuf_tbl,X     
 8232                                 63B8 A9 7F    LDA  #$7F                  
 8233                                 63BA 9D 48 7F STA  $7F48,X               
 8234                                 63BD A9 00    LDA  #$00                  
 8235                                 63BF 99 81 C0 STA  $C081,Y               
 8236                                 63C2 BD 48 7F LDA  $7F48,X               
 8237                                 63C5 99 80 C0 STA  $C080,Y               
 8238                                 63C8 A9 04    LDA  #$04                  
 8239                                 63CA 99 81 C0 STA  $C081,Y               
 8240                                 63CD 60       RTS                        
 8241 t01 t00 t80 t02 t11 t81         63CE A5 FA    LDA  $FA                   
 8242 t01 t00 t80 t02 t11 t81         63D0 F0 05    BEQ  $63D7                 
 8243                                 63D2 E6 FA    INC  $FA                   
 8244                                 63D4 AD 30 C0 LDA  $C030                 
 8245 t01 t00 t80 t02 t11 t81         63D7 AD F8 7F LDA  _mdm_inbuf_tbl        
 8246 t01 t00 t80 t02 t11 t81         63DA 30 13    BMI  $63EF                 
 8247 t01 t00 t80 t02 t11 t81         63DC AD 00 C0 LDA  $C000                 
 8248 t01 t00 t80 t02 t11 t81         63DF 10 0E    BPL  $63EF                 
 8249                              *
 8250                              * --- keyboard input routine (cmp 04 02)
 8251                              keyboard_input
 8252                                 63E1 2C CC 7F BIT  $7FCC                 
 8253                                 63E4 10 03    BPL  $63E9                 
 8254                                 63E6 20 D5 61 JSR  $61D5                 
 8255                                 63E9 8D F8 7F STA  _mdm_inbuf_tbl        
 8256                                 63EC AD 10 C0 LDA  $C010                 
 8257 t01 t00 t80 t02 t11 t81         63EF AC D7 7F LDY  $7FD7                 
 8258 t01 t00 t80 t02 t11 t81         63F2 10 03    BPL  $63F7                 
 8259 t01 t00 t80 t02 t11 t81         63F4 4C 9C 64 JMP  modem_pollall         
 8260                                 63F7 AE D6 7F LDX  $7FD6                 
 8261                                 63FA B9 F8 7F LDA  _mdm_inbuf_tbl,Y      
 8262                                 63FD 10 01    BPL  $6400                 
 8263                                 63FF 60       RTS                        
 8264                                 6400 BD F0 7F LDA  _mdm_outbuf_tbl,X     
 8265                                 6403 C9 7F    CMP  #$7F                  
 8266                                 6405 D0 05    BNE  $640C                 
 8267                                 6407 A9 FF    LDA  #$FF                  
 8268                                 6409 9D F0 7F STA  _mdm_outbuf_tbl,X     
 8269                                 640C B9 F0 7F LDA  _mdm_outbuf_tbl,Y     
 8270                                 640F C9 7F    CMP  #$7F                  
 8271                                 6411 D0 05    BNE  $6418                 
 8272                                 6413 A9 FF    LDA  #$FF                  
 8273                                 6415 99 F0 7F STA  _mdm_outbuf_tbl,Y     
 8274                                 6418 20 9C 64 JSR  modem_pollall         
 8275                                 641B AC D7 7F LDY  $7FD7                 
 8276                                 641E AE D6 7F LDX  $7FD6                 
 8277                                 6421 BD F8 7F LDA  _mdm_inbuf_tbl,X      
 8278                                 6424 10 51    BPL  $6477                 
 8279                                 6426 29 7F    AND  #$7F                  
 8280                                 6428 9D F8 7F STA  _mdm_inbuf_tbl,X      
 8281                                 642B C9 04    CMP  #$04                  
 8282                                 642D D0 15    BNE  $6444                 
 8283                                 642F 8A       TXA                        
 8284                                 6430 D0 12    BNE  $6444                 
 8285                                 6432 AD 26 04 LDA  $0426                 
 8286                                 6435 49 A4    EOR  #$A4                  
 8287                                 6437 8D 26 04 STA  $0426                 
 8288                                 643A AD 48 64 LDA  $6448                 
 8289                                 643D 49 FF    EOR  #$FF                  
 8290                                 643F 8D 48 64 STA  $6448                 
 8291                                 6442 B0 33    BCS  $6477                 
 8292                                 6444 99 F0 7F STA  _mdm_outbuf_tbl,Y     
 8293                                 6447 E0 FF    CPX  #$FF                  
 8294                                 6449 D0 03    BNE  $644E                 
 8295                                 644B 20 55 7D JSR  $7D55                 
 8296                                 644E C9 07    CMP  #$07                  
 8297                                 6450 D0 25    BNE  $6477                 
 8298                                 6452 A9 A0    LDA  #$A0                  
 8299                                 6454 8D 27 04 STA  $0427                 
 8300                                 6457 8D 26 04 STA  $0426                 
 8301                                 645A A9 4C    LDA  #$4C                  
 8302                                 645C 8D 02 60 STA  $6002                 
 8303                                 645F AE D6 7F LDX  $7FD6                 
 8304                                 6462 20 60 20 JSR  $2060                 
 8305                                 6465 AE D7 7F LDX  $7FD7                 
 8306                                 6468 20 60 20 JSR  $2060                 
 8307                                 646B A9 FF    LDA  #$FF                  
 8308                                 646D 8D 48 64 STA  $6448                 
 8309                                 6470 8D D6 7F STA  $7FD6                 
 8310                                 6473 8D D7 7F STA  $7FD7                 
 8311                                 6476 60       RTS                        
 8312                                 6477 B9 F8 7F LDA  _mdm_inbuf_tbl,Y      
 8313                                 647A 10 0F    BPL  $648B                 
 8314                                 647C 29 7F    AND  #$7F                  
 8315                                 647E 99 F8 7F STA  _mdm_inbuf_tbl,Y      
 8316                                 6481 9D F0 7F STA  _mdm_outbuf_tbl,X     
 8317                                 6484 E0 00    CPX  #$00                  
 8318                                 6486 D0 03    BNE  $648B                 
 8319                                 6488 20 55 7D JSR  $7D55                 
 8320                                 648B BD F0 7F LDA  _mdm_outbuf_tbl,X     
 8321                                 648E 29 7F    AND  #$7F                  
 8322                                 6490 9D F0 7F STA  _mdm_outbuf_tbl,X     
 8323                                 6493 B9 F0 7F LDA  _mdm_outbuf_tbl,Y     
 8324                                 6496 29 7F    AND  #$7F                  
 8325                                 6498 99 F0 7F STA  _mdm_outbuf_tbl,Y     
 8326                                 649B 60       RTS                        
 8327                              *
 8328                              * --- start of modem polling code
 8329                              * uses table at 7fd8 'modem_exists'
 8330                              modem_pollall
 8331 t01 t00 t80 t02 t11 t81         649C A2 07    LDX  #$07                  
 8332                              _mdm_loop
 8333 t01 t00 t80 t02 t11 t81         649E BD D8 7F LDA  modem_exists,X        
 8334 t01 t00 t80 t02 t11 t81         64A1 D0 04    BNE  _mdm_pollone          
 8335                              _mdm_loopdone
 8336 t01 t00 t80 t02 t11 t81         64A3 CA       DEX                        
 8337 t01 t00 t80 t02 t11 t81         64A4 D0 F8    BNE  _mdm_loop             
 8338 t01 t00 t80 t02 t11 t81         64A6 60       RTS                        
 8339                              *
 8340                              * on entry x=line 1-7, a=byte from modem_exists table
 8341                              _mdm_pollone
 8342 t80 t11 t81                     64A7 10 03    BPL  $64AC                 ; branch if applecat or interface two
 8343                                 64A9 4C 3E 65 JMP  $653E                 
 8344         t80     t11 t81         64AC C9 02    CMP  #$02                  ; is modem => 2 (interface 2?)
 8345         t80     t11 t81         64AE 90 06    BCC  _mdm_pollchk          ; branch if not (applecat)
 8346                                 64B0 20 42 63 JSR  $6342                 
 8347                                 64B3 4C A3 64 JMP  _mdm_loopdone         
 8348                              _mdm_pollchk
 8349         t80     t11 t81         64B6 BC 80 7F LDY  $7F80,X               ; y=modem slot offset for $c0nx access from table at $7f80,line
 8350         t80     t11 t81         64B9 BD E8 7F LDA  $7FE8,X               ; a=table at $7fe8,x  ???
 8351         t80     t11 t81         64BC F0 30    BEQ  _mdm_poll_acat        ; branch if zero
 8352                                 64BE 2C DA 7E BIT  $7EDA                 
 8353                                 64C1 30 13    BMI  $64D6                 
 8354                                 64C3 1D 88 7F ORA  $7F88,X               
 8355                                 64C6 99 82 C0 STA  $C082,Y               
 8356                                 64C9 A9 64    LDA  #$64                  
 8357                                 64CB 99 89 C0 STA  $C089,Y               
 8358                                 64CE A9 10    LDA  #$10                  
 8359                                 64D0 99 8D C0 STA  $C08D,Y               
 8360                                 64D3 9D A8 7F STA  $7FA8,X               
 8361                                 64D6 A9 00    LDA  #$00                  
 8362                                 64D8 50 0E    BVC  $64E8                 
 8363                                 64DA 1E E8 7F ASL  $7FE8,X               
 8364                                 64DD B0 09    BCS  $64E8                 
 8365                                 64DF 9D 88 7F STA  $7F88,X               
 8366                                 64E2 8D DA 7E STA  $7EDA                 
 8367                                 64E5 9D B0 7F STA  $7FB0,X               
 8368                                 64E8 9D E8 7F STA  $7FE8,X               
 8369                                 64EB 4C A3 64 JMP  _mdm_loopdone         
 8370                              _mdm_poll_acat
 8371         t80     t11 t81         64EE B9 8D C0 LDA  $C08D,Y               ; read applecat 'acbyt' - na/na/na/na cts/cd/na/ring
 8372         t80     t11 t81         64F1 4A       LSR  A                     ; pop ring detection into carry
 8373         t80     t11 t81         64F2 08       PHP                        ; save flags
 8374         t80     t11 t81         64F3 B9 80 C0 LDA  $C080,Y               ; load applecat 'swbyt' - dvtt/bsr/carrier/audio fw4/fw3/fw2/fw1
 8375         t80     t11 t81         64F6 29 20    AND  #$20                  ; drop all bits but carrier detect
 8376         t80     t11 t81         64F8 4A       LSR  A                     ; shift bit
 8377         t80     t11 t81         64F9 28       PLP                        ; restore flags
 8378         t80     t11 t81         64FA 2A       ROL  A                     ; accum now x/x/carrier/x x/x/x/ring
 8379         t80     t11 t81         64FB 1D B0 7F ORA  $7FB0,X               ; ??? ora with some table at 7fb0 - (??? watch this var in next version of mkanalyze)
 8380         t80     t11 t81         64FE 9D E0 7F STA  $7FE0,X               ; ??? and store in table at 7fe0
 8381         t80     t11 t81         6501 29 20    AND  #$20                  ; ??? and with 0010 0000 and get bit 5
 8382         t80     t11 t81         6503 F0 36    BEQ  _mdm_acat_done        ; ??? branch if 0
 8383                 t11 t81         6505 B9 8F C0 LDA  $C08F,Y               ; load applecat 'status' - ovrerr/framerr/parerr/tx(1=empty) rx(1=full)/txirq/rxirq/ringirq
 8384                 t11 t81         6508 29 08    AND  #$08                  ; isolate bit 3 (byte waiting from user?)
 8385                 t11 t81         650A F0 13    BEQ  _mdm_acat_checkforout ; branch if zero (no byte waiting)
 8386                 t11 t81         650C BD F8 7F LDA  _mdm_inbuf_tbl,X      ; ??? something with table at 7ff8,x
 8387                 t11 t81         650F 30 0E    BMI  _mdm_acat_checkforout ; ??? branch if high bit set
 8388                 t11 t81         6511 BD A8 7F LDA  $7FA8,X               ; ??? load something with table at 7fa8,x
 8389                 t11 t81         6514 99 8D C0 STA  $C08D,Y               ; ??? store into applecat 'xmtbyt' (need to do this before indat?)
 8390                 t11 t81         6517 B9 8B C0 LDA  $C08B,Y               ; load applecat 'indat', the byte waiting from user --- **read byte**
 8391                 t11 t81         651A 09 80    ORA  #$80                  ; drop high bit
 8392                 t11 t81         651C 9D F8 7F STA  _mdm_inbuf_tbl,X      ; store into byte waiting buffer at 7ff8,x
 8393                              _mdm_acat_checkforout
 8394                 t11 t81         651F BD F0 7F LDA  _mdm_outbuf_tbl,X     ; load from ddial outbuf table at 7ff0,x
 8395                 t11 t81         6522 30 17    BMI  _mdm_acat_done        ; branch if high bit set (no character waiting to send to user from ddial)
 8396                 t11 t81         6524 BD 88 7F LDA  $7F88,X               ; ??? load something from table at 7f88,x
 8397                 t11 t81         6527 D0 0D    BNE  _mdm_acat_outbufreset ; branch if not 0 (never in my case)
 8398                 t11 t81         6529 B9 8F C0 LDA  $C08F,Y               ; load applecat 'status' like 6505 above
 8399                 t11 t81         652C 29 10    AND  #$10                  ; isolate bit 4 (transmit buffer empty?)
 8400                 t11 t81         652E F0 0B    BEQ  _mdm_acat_done        ; branch if zero (modem is still busy)
 8401                 t11 t81         6530 BD F0 7F LDA  _mdm_outbuf_tbl,X     ; load from ddial outbuf 7ff0,x
 8402                 t11 t81         6533 99 8E C0 STA  $C08E,Y               ; store into applecat 'outdat' --- **send byte**
 8403                              _mdm_acat_outbufreset
 8404                 t11 t81         6536 A9 FF    LDA  #$FF                  ; lda #ff
 8405                 t11 t81         6538 9D F0 7F STA  _mdm_outbuf_tbl,X     ; store into ddial outbuf
 8406                              _mdm_acat_done
 8407         t80     t11 t81         653B 4C A3 64 JMP  _mdm_loopdone         
 8408                                 653E BC 80 7F LDY  $7F80,X               
 8409                                 6541 BD E8 7F LDA  $7FE8,X               
 8410                                 6544 F0 32    BEQ  $6578                 
 8411                                 6546 FE D3 65 INC  $65D3,X               
 8412                                 6549 0A       ASL  A                     
 8413                                 654A BD 88 7F LDA  $7F88,X               
 8414                                 654D F0 08    BEQ  $6557                 
 8415                                 654F 18       CLC                        
 8416                                 6550 29 01    AND  #$01                  
 8417                                 6552 F0 03    BEQ  $6557                 
 8418                                 6554 A9 8F    LDA  #$8F                  
 8419                                 6556 2C A9 8B BIT  $8BA9                 
 8420                                 6559 90 02    BCC  $655D                 
 8421                                 655B A9 0B    LDA  #$0B                  
 8422                                 655D 2C DA 7E BIT  $7EDA                 
 8423                                 6560 30 03    BMI  $6565                 
 8424                                 6562 99 85 C0 STA  $C085,Y               
 8425                                 6565 4C D6 64 JMP  $64D6                 
 8426                                 6568 18       CLC                        
 8427                                 6569 EE D3 65 INC  $65D3                 
 8428                                 656C AD D3 65 LDA  $65D3                 
 8429                                 656F 29 07    AND  #$07                  
 8430                                 6571 D0 10    BNE  $6583                 
 8431                                 6573 FE D3 65 INC  $65D3,X               
 8432                                 6576 90 0B    BCC  $6583                 
 8433                                 6578 B9 85 C0 LDA  $C085,Y               
 8434                                 657B 49 80    EOR  #$80                  
 8435                                 657D 0A       ASL  A                     
 8436                                 657E BD D3 65 LDA  $65D3,X               
 8437                                 6581 D0 E5    BNE  $6568                 
 8438                                 6583 B9 86 C0 LDA  $C086,Y               
 8439                                 6586 29 04    AND  #$04                  
 8440                                 6588 F0 14    BEQ  $659E                 
 8441                                 658A B9 87 C0 LDA  $C087,Y               
 8442                                 658D A9 00    LDA  #$00                  
 8443                                 658F 2A       ROL  A                     
 8444                                 6590 1D B0 7F ORA  $7FB0,X               
 8445                                 6593 9D E0 7F STA  $7FE0,X               
 8446                                 6596 BD 88 7F LDA  $7F88,X               
 8447                                 6599 D0 21    BNE  $65BC                 
 8448                                 659B 4C A3 64 JMP  _mdm_loopdone         
 8449                                 659E A9 10    LDA  #$10                  
 8450                                 65A0 2A       ROL  A                     
 8451                                 65A1 1D B0 7F ORA  $7FB0,X               
 8452                                 65A4 9D E0 7F STA  $7FE0,X               
 8453                                 65A7 BD 88 7F LDA  $7F88,X               
 8454                                 65AA D0 10    BNE  $65BC                 
 8455                                 65AC B9 86 C0 LDA  $C086,Y               
 8456                                 65AF 29 03    AND  #$03                  
 8457                                 65B1 4A       LSR  A                     
 8458                                 65B2 F0 0D    BEQ  $65C1                 
 8459                                 65B4 BD F0 7F LDA  _mdm_outbuf_tbl,X     
 8460                                 65B7 30 08    BMI  $65C1                 
 8461                                 65B9 99 87 C0 STA  $C087,Y               
 8462                                 65BC A9 FF    LDA  #$FF                  
 8463                                 65BE 9D F0 7F STA  _mdm_outbuf_tbl,X     
 8464                                 65C1 90 0D    BCC  $65D0                 
 8465                                 65C3 BD F8 7F LDA  _mdm_inbuf_tbl,X      
 8466                                 65C6 30 08    BMI  $65D0                 
 8467                                 65C8 B9 87 C0 LDA  $C087,Y               
 8468                                 65CB 09 80    ORA  #$80                  
 8469                                 65CD 9D F8 7F STA  _mdm_inbuf_tbl,X      
 8470                                 65D0 4C A3 64 JMP  _mdm_loopdone         
 8471                                 65D3 00       BRK                        
 8472                                 65D4 00       BRK                        
 8473                                 65D5 00       BRK                        
 8474                                 65D6 00       BRK                        
 8475                                 65D7 00       BRK                        
 8476                                 65D8 00       BRK                        
 8477                                 65D9 00       BRK                        
 8478                                 65DA 00       BRK                        
 8479                                 65DB 05 05    ORA  $05                   
 8480                                 65DD 05 05    ORA  $05                   
 8481                                 65DF 05 05    ORA  $05                   
 8482                                 65E1 05 05    ORA  $05                   
 8483                                 65E3 A2 06    LDX  #$06                  
 8484                                 65E5 A9 00    LDA  #$00                  
 8485                                 65E7 24 90    BIT  $90                   
 8486                                 65E9 85 04    STA  $04                   
 8487                                 65EB DE DB 65 DEC  $65DB,X               
 8488                                 65EE D0 05    BNE  $65F5                 
 8489                                 65F0 20 FD 65 JSR  $65FD                 
 8490                                 65F3 50 04    BVC  $65F9                 
 8491                                 65F5 CA       DEX                        
 8492                                 65F6 CA       DEX                        
 8493                                 65F7 10 F2    BPL  $65EB                 
 8494                                 65F9 60       RTS                        
 8495                                 65FA B5 B0    LDA  $B0,X                 
 8496                                 65FC AA       TAX                        
 8497                                 65FD A4 04    LDY  $04                   
 8498                                 65FF B9 20 00 LDA  $0020,Y               
 8499                                 6602 F0 0B    BEQ  $660F                 
 8500                                 6604 B9 B8 00 LDA  $00B8,Y               
 8501                                 6607 30 06    BMI  $660F                 
 8502                                 6609 A0 08    LDY  #$08                  
 8503                                 660B 68       PLA                        
 8504                                 660C 68       PLA                        
 8505                                 660D 38       SEC                        
 8506                                 660E 60       RTS                        
 8507                                 660F A0 07    LDY  #$07                  
 8508                                 6611 B9 B8 00 LDA  $00B8,Y               
 8509                                 6614 39 18 00 AND  $0018,Y               
 8510                                 6617 10 06    BPL  $661F                 
 8511                                 6619 8A       TXA                        
 8512                                 661A D9 B0 00 CMP  $00B0,Y               
 8513                                 661D F0 06    BEQ  $6625                 
 8514                                 661F 88       DEY                        
 8515                                 6620 D0 EF    BNE  $6611                 
 8516                                 6622 4C 18 68 JMP  $6818                 
 8517                                 6625 A0 01    LDY  #$01                  
 8518                                 6627 AD 0C F8 LDA  $F80C                 
 8519                                 662A 49 4C    EOR  #$4C                  
 8520                                 662C 0D D9 F7 ORA  $F7D9                 
 8521                                 662F F0 02    BEQ  $6633                 
 8522                                 6631 A0 2D    LDY  #$2D                  
 8523                                 6633 8C EE 5E STY  $5EEE                 
 8524                                 6636 A0 E9    LDY  #$E9                  
 8525                                 6638 B9 00 5E LDA  $5E00,Y               
 8526                                 663B F0 06    BEQ  $6643                 
 8527                                 663D 20 BE 61 JSR  $61BE                 
 8528                                 6640 C8       INY                        
 8529                                 6641 D0 F5    BNE  $6638                 
 8530                                 6643 A0 00    LDY  #$00                  
 8531                                 6645 BD A1 7F LDA  $7FA1,X               
 8532                                 6648 10 01    BPL  $664B                 
 8533                                 664A C8       INY                        
 8534                                 664B 84 F3    STY  $F3                   
 8535                                 664D AD 80 04 LDA  cons_line2/line0channel 
 8536                                 6650 10 26    BPL  $6678                 
 8537                                 6652 2C 78 7F BIT  $7F78                 
 8538                                 6655 50 21    BVC  $6678                 
 8539                                 6657 A9 5E    LDA  #$5E                  
 8540                                 6659 A4 F3    LDY  $F3                   
 8541                                 665B D0 05    BNE  $6662                 
 8542                                 665D E4 B0    CPX  $B0                   
 8543                                 665F F0 06    BEQ  $6667                 
 8544                                 6661 C8       INY                        
 8545                                 6662 20 BE 61 JSR  $61BE                 
 8546                                 6665 A9 2F    LDA  #$2F                  
 8547                                 6667 20 BE 61 JSR  $61BE                 
 8548                                 666A C8       INY                        
 8549                                 666B C0 03    CPY  #$03                  
 8550                                 666D D0 02    BNE  $6671                 
 8551                                 666F A0 06    LDY  #$06                  
 8552                                 6671 B9 00 02 LDA  $0200,Y               
 8553                                 6674 C9 29    CMP  #$29                  
 8554                                 6676 D0 EF    BNE  $6667                 
 8555                                 6678 2C 79 7F BIT  $7F79                 
 8556                                 667B 10 35    BPL  $66B2                 
 8557                                 667D A9 5E    LDA  #$5E                  
 8558                                 667F A4 F3    LDY  $F3                   
 8559                                 6681 D0 05    BNE  $6688                 
 8560                                 6683 E4 B1    CPX  $B1                   
 8561                                 6685 F0 06    BEQ  $668D                 
 8562                                 6687 C8       INY                        
 8563                                 6688 20 BE 61 JSR  $61BE                 
 8564                                 668B A9 2F    LDA  #$2F                  
 8565                                 668D 20 BE 61 JSR  $61BE                 
 8566                                 6690 C8       INY                        
 8567                                 6691 C0 03    CPY  #$03                  
 8568                                 6693 D0 06    BNE  $669B                 
 8569                                 6695 A9 78    LDA  #$78                  
 8570                                 6697 50 0B    BVC  $66A4                 
 8571                                 6699 A0 06    LDY  #$06                  
 8572                                 669B B9 20 02 LDA  $0220,Y               
 8573                                 669E C9 29    CMP  #$29                  
 8574                                 66A0 D0 EB    BNE  $668D                 
 8575                                 66A2 A9 3A    LDA  #$3A                  
 8576                                 66A4 AC 16 58 LDY  $5816                 
 8577                                 66A7 F0 09    BEQ  $66B2                 
 8578                                 66A9 20 BE 61 JSR  $61BE                 
 8579                                 66AC C8       INY                        
 8580                                 66AD B9 E8 57 LDA  $57E8,Y               
 8581                                 66B0 D0 F7    BNE  $66A9                 
 8582                                 66B2 2C 7A 7F BIT  $7F7A                 
 8583                                 66B5 10 35    BPL  $66EC                 
 8584                                 66B7 A9 5E    LDA  #$5E                  
 8585                                 66B9 A4 F3    LDY  $F3                   
 8586                                 66BB D0 05    BNE  $66C2                 
 8587                                 66BD E4 B2    CPX  $B2                   
 8588                                 66BF F0 06    BEQ  $66C7                 
 8589                                 66C1 C8       INY                        
 8590                                 66C2 20 BE 61 JSR  $61BE                 
 8591                                 66C5 A9 2F    LDA  #$2F                  
 8592                                 66C7 20 BE 61 JSR  $61BE                 
 8593                                 66CA C8       INY                        
 8594                                 66CB C0 03    CPY  #$03                  
 8595                                 66CD D0 06    BNE  $66D5                 
 8596                                 66CF A9 78    LDA  #$78                  
 8597                                 66D1 50 0B    BVC  $66DE                 
 8598                                 66D3 A0 06    LDY  #$06                  
 8599                                 66D5 B9 40 02 LDA  $0240,Y               
 8600                                 66D8 C9 29    CMP  #$29                  
 8601                                 66DA D0 EB    BNE  $66C7                 
 8602                                 66DC A9 3A    LDA  #$3A                  
 8603                                 66DE AC 1E 58 LDY  $581E                 
 8604                                 66E1 F0 09    BEQ  $66EC                 
 8605                                 66E3 20 BE 61 JSR  $61BE                 
 8606                                 66E6 C8       INY                        
 8607                                 66E7 B9 F0 57 LDA  $57F0,Y               
 8608                                 66EA D0 F7    BNE  $66E3                 
 8609                                 66EC 2C 7B 7F BIT  $7F7B                 
 8610                                 66EF 10 35    BPL  $6726                 
 8611                                 66F1 A9 5E    LDA  #$5E                  
 8612                                 66F3 A4 F3    LDY  $F3                   
 8613                                 66F5 D0 05    BNE  $66FC                 
 8614                                 66F7 E4 B3    CPX  $B3                   
 8615                                 66F9 F0 06    BEQ  $6701                 
 8616                                 66FB C8       INY                        
 8617                                 66FC 20 BE 61 JSR  $61BE                 
 8618                                 66FF A9 2F    LDA  #$2F                  
 8619                                 6701 20 BE 61 JSR  $61BE                 
 8620                                 6704 C8       INY                        
 8621                                 6705 C0 03    CPY  #$03                  
 8622                                 6707 D0 06    BNE  $670F                 
 8623                                 6709 A9 78    LDA  #$78                  
 8624                                 670B 50 0B    BVC  $6718                 
 8625                                 670D A0 06    LDY  #$06                  
 8626                                 670F B9 60 02 LDA  $0260,Y               
 8627                                 6712 C9 29    CMP  #$29                  
 8628                                 6714 D0 EB    BNE  $6701                 
 8629                                 6716 A9 3A    LDA  #$3A                  
 8630                                 6718 AC 26 58 LDY  $5826                 
 8631                                 671B F0 09    BEQ  $6726                 
 8632                                 671D 20 BE 61 JSR  $61BE                 
 8633                                 6720 C8       INY                        
 8634                                 6721 B9 F8 57 LDA  $57F8,Y               
 8635                                 6724 D0 F7    BNE  $671D                 
 8636                                 6726 2C 7C 7F BIT  $7F7C                 
 8637                                 6729 10 35    BPL  $6760                 
 8638                                 672B A9 5E    LDA  #$5E                  
 8639                                 672D A4 F3    LDY  $F3                   
 8640                                 672F D0 05    BNE  $6736                 
 8641                                 6731 E4 B4    CPX  $B4                   
 8642                                 6733 F0 06    BEQ  $673B                 
 8643                                 6735 C8       INY                        
 8644                                 6736 20 BE 61 JSR  $61BE                 
 8645                                 6739 A9 2F    LDA  #$2F                  
 8646                                 673B 20 BE 61 JSR  $61BE                 
 8647                                 673E C8       INY                        
 8648                                 673F C0 03    CPY  #$03                  
 8649                                 6741 D0 06    BNE  $6749                 
 8650                                 6743 A9 78    LDA  #$78                  
 8651                                 6745 50 0B    BVC  $6752                 
 8652                                 6747 A0 06    LDY  #$06                  
 8653                                 6749 B9 80 02 LDA  $0280,Y               
 8654                                 674C C9 29    CMP  #$29                  
 8655                                 674E D0 EB    BNE  $673B                 
 8656                                 6750 A9 3A    LDA  #$3A                  
 8657                                 6752 AC 2E 58 LDY  $582E                 
 8658                                 6755 F0 09    BEQ  $6760                 
 8659                                 6757 20 BE 61 JSR  $61BE                 
 8660                                 675A C8       INY                        
 8661                                 675B B9 00 58 LDA  $5800,Y               
 8662                                 675E D0 F7    BNE  $6757                 
 8663                                 6760 2C 7D 7F BIT  $7F7D                 
 8664                                 6763 10 35    BPL  $679A                 
 8665                                 6765 A9 5E    LDA  #$5E                  
 8666                                 6767 A4 F3    LDY  $F3                   
 8667                                 6769 D0 05    BNE  $6770                 
 8668                                 676B E4 B5    CPX  $B5                   
 8669                                 676D F0 06    BEQ  $6775                 
 8670                                 676F C8       INY                        
 8671                                 6770 20 BE 61 JSR  $61BE                 
 8672                                 6773 A9 2F    LDA  #$2F                  
 8673                                 6775 20 BE 61 JSR  $61BE                 
 8674                                 6778 C8       INY                        
 8675                                 6779 C0 03    CPY  #$03                  
 8676                                 677B D0 06    BNE  $6783                 
 8677