Home » Personal collection » Acorn tapes » Own_Work » box01_tape15a_d60_acorn_joystick_progs.wav » DISASS
DISASS
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Personal collection » Acorn tapes » Own_Work » box01_tape15a_d60_acorn_joystick_progs.wav |
| Filename: | DISASS |
| Read OK: | ✔ |
| File size: | 28A8 bytes |
| Load address: | FFFF0E00 |
| Exec address: | FFFF8023 |
File contents
10MODE 6:HIMEM=&7000:LOMEM=&6400
20VDU 28,0,24,39,16
30OSBYTE=&FFF4:OSWORD=&FFF1:OSASCI=&FFE3:OSWRCH=&FFEE
40OSRDCH=&FFE0:CLI=&FFF7
50OUT=&70:PUT=&71:SP=&72:BPT=&74
60CONBLK=&76:HI=&81:LO=&80:DISP=&82:DH=&83
70UP=&85:STK=&86:ACR=&84
80OLO=&7B:OHI=&7C:OUMB=&88
90HA=&8D:HB=&8E:HC=&8F
100DLINES=&7D:NUMB=&7E:TEMPSTACK=&7F
110FOR OP=0 TO 3 STEP 3
120P%=&52BF
140[OPT OP:ADC#&FF:ADC&FFFF:ADC&FF:ADC(&FF,X):ADC(&FF),Y:ADC&FF,X:ADC&FFFF,X:ADC&FFFF,Y
150AND#&FF:AND&FFFF:AND&FF:AND(&FF,X):AND(&FF),Y:AND&FF,X:AND&FFFF,X:AND&FFFF,Y
160ASL&FFFF:ASL&FF:ASL A:ASL&FF,X:ASL&FFFF,X
170BCC P%+1:BCS P%+1:BEQ P%+1
180BIT&FFFF:BIT&FF
190BMI P%+1:BNE P%+1:BPL P%+1:BRK:BVC P%+1:BVS P%+1:CLC:CLD:CLI:CLV
200CMP#&FF:CMP&FFFF:CMP&FF:CMP(&FF,X):CMP(&FF),Y:CMP&FF,X:CMP&FFFF,X:CMP&FFFF,Y
210CPX#&FF:CPX&FFFF:CPX&FF
220CPY#&FF:CPY&FFFF:CPY&FF
230DEC&FFFF:DEC&FF:DEC&FF,X:DEC&FFFF,X
240DEX:DEY
250EOR#&FF:EOR&FFFF:EOR&FF:EOR(&FF,X):EOR(&FF),Y:EOR&FF,X:EOR&FFFF,X:EOR&FFFF,Y
260INC&FFFF:INC&FF:INC&FF,X:INC&FFFF,X
270INX:INY:JMP&FFFF:JMP(&FFFF)
280JSR&FFFF
290LDA#&FF:LDA&FFFF:LDA&FF:LDA(&FF,X):LDA(&FF),Y:LDA&FF,X:LDA&FFFF,X:LDA&FFFF,Y
300LDX#&FF:LDX&FFFF:LDX&FF:LDX&FF,Y:LDX&FFFF,Y
310LDY#&FF:LDY&FFFF:LDY&FF:LDY&FF,X:LDY&FFFF,X
320LSR&FFFF:LSR&FF:LSR A:LSR&FF,X:LSR&FFFF,X
330NOP:ORA#&FF:ORA&FFFF:ORA&FF:ORA(&FF,X):ORA(&FF),Y:ORA&FF,X:ORA&FFFF,X:ORA&FFFF,Y
340PHA:PHP:PLA:PLP
350ROL&FFFF:ROL&FF:ROL A:ROL&FF,X:ROL&FFFF,X
360ROR&FFFF:ROR&FF:ROR A:ROR&FF,X:ROR&FFFF,X
370RTI:RTS
380SBC#&FF:SBC&FFFF:SBC&FF:SBC(&FF,X):SBC(&FF),Y:SBC&FF,X:SBC&FFFF,X:SBC&FFFF,Y
390SEC:SED:SEI
400STA&FFFF:STA&FF:STA(&FF,X):STA(&FF),Y:STA&FF,X:STA&FFFF,X:STA&FFFF,Y
410STX&FFFF:STX&FF:STX&FF,Y:STY&FFFF:STY&FF:STY&FF,X
420TAX:TAY:TSX:TXA:TXS:TYA
430]
440PRINT P%
450[OPT OP
460TSX:STX TEMPSTACK
480LDA#0:STA CONBLK:LDA#6:STA CONBLK+1
500LDA#ASC("D"):STA DISP
520LDX#(ST1 MOD 256)
530LDY#(ST1 DIV 256)
540JSR OUTPUT
560LDA#4:LDX#1:JSR OSBYTE
590.L5 JSR DISPLAY
610.L7 JSR KEYIN
630CMP#ASC("D"):BNE NOND
650.STD STA DISP:JMP L5
660.NOND CMP#ASC("L"):BEQ STD
690CMP #ASC("H"):BNE NONH
710.HGIN LDX#15:LDY#2:JSR SETAB
730LDA#4:LDX#ASC("0"):LDY#ASC("F"):JSR STRIN
750JSR DHEX:BCCHGIN:LDA DH:STA HI
770LDA&602:STA&600:LDA&603:STA&601:JSR DHEX
790BCC HGIN:LDA DH:STA LO:JMP L5
800.NONH CMP#ASC("F"):BNE NOF
820.FGIN LDX#15:LDY#3:JSR SETAB
830LDA#2:LDX#ASC("0"):LDY#ASC("F"):JSR STRIN
840JSR DHEX:BCC FGIN:LDA DISP:CMP#ASC("L"):BNE OVSWAP
850LDA OLO:SEC:SBC OUMB:STA LO:LDA OHI:SBC#0:STA HI
860.OVSWAP
870LDY#0:LDA DH:.FLOOP INC LO:BNE OVHI:INC HI:.OVHI CMP(LO),Y:BNE FLOOP
880JMP L5
910.NOF LDX DISP:CPX#ASC("L"):BNE NONF:JMP LCOM
950.NONF CMP#&88:BNE NLEFT
970LDA LO:BNE DE1:DEC HI:.DE1 DEC LO:JMP L5
990.NLEFT CMP#&89:BNE NRT
1010INC LO:BNE DE2:INC HI:.DE2 JMP L5
1030.NRT CMP#&8A:BNE NDOWN
1050LDA LO:CLC:ADC#8:STA LO
1060LDA HI:ADC#0:STA HI:JMP L5
1080.NDOWN CMP#&8B:BNE NMOVE
1100LDA LO:SEC:SBC#8:STA LO
1110LDA HI:SBC#0:STA HI:JMP L5
1140.NMOVE CMP#ASC("A"):BNE NONA
1160.AGIN LDY#14
1180LDA ACR:ASL A:CLC:ADC ACR:CLC:ADC#6
1200TAX:JSR SETAB
1220LDA#2:LDX#ASC("0"):LDY#ASC("F"):JSR STRIN
1240JSR DHEX:BCC AGIN:LDA DH:LDY#0:STA (LO),Y
1250JMP L5
1290.DHEX LDA&600:CMP #ASC("9")+1:BCS AL1
1300AND#&0F:BCC TIP
1310.AL1 CMP #ASC("A"):BCC ERHEX:SBC #ASC("A")-10
1330.TIP ASL A:ASL A:ASL A:ASL A:STA DH
1340LDA&601:CMP #ASC("9")+1:BCS AL2
1350AND#&0F:BCC BOT
1360.AL2 CMP #ASC("A"):BCC ERHEX:SBC #ASC("A")-10
1380.BOT ORA DH:STA DH:SEC
1400.ERHEX RTS
1440.NONA CMP #ASC("S")BNE NONS
1460.SGIN LDY#14:LDA ACR:CLC:ADC#30:TAX:JSR SETAB
1480LDA#255:LDX #ASC(" "):LDY #ASC("~"):JSR STRIN
1500LDX#0:LDY#0
1520.LOP LDA&600,X:CMP#&0D:BEQ FINLOP
1530STA (LO),Y:INY:INX:BNE LOP
1540.FINLOP JMP L5
1570.NONS
1580JMP L7
1620.LCOM CMP#&0D:BNE NONCR
1640LDA OLO:STA LO:LDA OHI:STA HI:JMP L5
1660.NONCR CMP#&8B:BNE NONS
1680LDA OLO:INC OUMB:SEC:SBC OUMB:STA LO
1690LDA OHI:SBC#0:STA HI:JMP L5
1720.DIS LDX#(ST2 MOD 256)
1730LDY#(ST2 DIV 256)
1750JSR OUTPUT
1770LDA#16:STA DLINES
1780.LINLOP
1800LDA HI:JSR HEX:LDA LO:JSR HEXSP
1830LDY#0:LDX#3
1840.HALOP LDA(LO),Y:STA HA,Y:INY:DEX:BNE HALOP
1860LDX HA:LDA TYPE,X:TAX:LDA NUM,X
1880STA NUMB:CLC:ADC LO:STA LO:LDA#0:ADC HI:STA HI
1900LDX NUMB:LDY#3:LDA HA:JSR HEXSP:DEY:DEX:BEQ PAD
1910LDA HB:JSR HEXSP:DEY:DEX:BEQ PAD
1920LDA HC:JSR HEXSP:DEX:BEQ MNEM
1940.PAD TYA:PHA
1950LDX#(ST4 MOD 256):LDY#(ST4 DIV 256):JSR OUTPUT
1960PLA:TAY:DEY:BNE PAD
1980.MNEM LDA #ASC(" "):JSR OSASCI
2000LDX HA:LDA HASH,X:ASL A:ASL A:STA OUT
2020LDA#(STRING DIV 256):STA PUT:LDX#4:LDY#0
2040.MNMLOP LDA (OUT),Y:JSR OSASCI:INY:DEX:BNE MNMLOP
2050LDA #ASC(" "):JSR OSASCI
2070LDX HA:LDA TYPE,X:CMP#1:BNE NOD1
2090LDA #ASC("#"):JSR OSASCI:LDA #ASC("&"):JSR OSASCI
2110LDA HB:JSR HEXSP:LDY#5:JMP NDLINE
2130.NOD1 CMP#2:BNE NOD2
2150LDA #ASC("&"):JSR OSASCI:LDA HC:JSR HEX
2160LDA HB:JSR HEXSP:LDY#4:JMP NDLINE
2180.NOD2 CMP#3:BNE NOD3
2200LDA #ASC("&"):JSR OSASCI:LDA HB:JSR HEXSP
2210LDY#6:JMP NDLINE
2230.NOD3 CMP#4:BNE NOD4
2250LDA #ASC("A"):JSR OSASCI:LDY#9:JMP NDLINE
2270.NOD4:CMP#5:BNE NOD5
2290LDY#10:JMP NDLINE
2310.NOD5 CMP#6:BNE NOD6
2330LDA #ASC("("):JSR OSASCI:LDA #ASC("&"):JSR OSASCI
2340LDA HB:JSR HEX:LDA #ASC(","):JSR OSASCI
2350LDA #ASC("X"):JSR OSASCI:LDA #ASC(")"):JSR OSASCI
2360LDY#3:JMP NDLINE
2380.NOD6 CMP#7:BNE NOD7
2400LDA#ASC("("):JSR OSASCI:LDA#ASC("&"):JSR OSASCI
2410LDA HB:JSR HEX:LDA#ASC(")"):JSR OSASCI
2420LDA#ASC(","):JSR OSASCI:LDA#ASC("Y"):JSR OSASCI
2430LDY#3:JMP NDLINE
2450.NOD7 CMP#8:BNE NOD8
2470LDA#ASC("&"):JSR OSASCI:LDA HB:JSR HEX
2480LDA#ASC(","):JSR OSASCI:LDA#ASC("X"):JSR OSASCI
2490LDY#5:JMP NDLINE
2510.NOD8 CMP#9:BNE NOD9
2530LDA#ASC("&"):JSR OSASCI:LDA HC:JSR HEX
2540LDA HB:JSR HEX:LDA#ASC(","):JSR OSASCI
2550LDA#ASC("X"):JSR OSASCI
2560LDY#3:JMP NDLINE
2580.NOD9 CMP#&A:BNE NODA
2600LDA#ASC("&"):JSR OSASCI:LDA HC:JSR HEX
2610LDA HB:JSR HEX:LDA#ASC(","):JSR OSASCI
2620LDA#ASC("Y"):JSR OSASCI
2630LDY#3:JMP NDLINE
2650.NODA CMP#&B:BNE NODB
2670LDA#ASC("&"):JSR OSASCI
2690LDA HB:CMP#&7F:BCS BACK
2710CLC:ADC LO:PHA:LDA#0:ADC HI:CLC:BCC REL
2730.BACK EOR#255:ADC#0:STA&70:LDA LO:SEC:SBC&70
2740PHA:LDA HI:SBC#0
2760.REL JSR HEX:PLA:JSR HEXSP
2770LDY#4:JMP NDLINE
2790.NODB CMP#&C:BNE NODC
2810LDA#ASC("("):JSR OSASCI:LDA#ASC("&"):JSR OSASCI
2820LDA HC:JSR HEX:LDA HB:JSR HEX
2830LDA#ASC(")"):JSR OSASCI:LDY#3:JMP NDLINE
2850.NODC CMP#&D:BNE NODD
2870LDA#ASC("&"):JSR OSASCI:LDA HB:JSR HEX
2880LDA#ASC(","):JSR OSASCI:LDA#ASC("Y"):JSR OSASCI
2890LDY#5:JMP NDLINE
2910.NODD LDY#10
2930.NDLINE LDA#ASC(" "):JSR OSASCI:DEY:BPL NDLINE
2950LDX NUMB:LDY#0
2960.DISPLOP LDA HA,Y:JSR CHOUT:INY:DEX:BNE DISPLOP
2980LDA#ASC(" "):.PAD2 JSR OSASCI:INY:CPY#4:BNE PAD2
3000LDX#5:.PAD3 JSR OSASCI:DEX:BNE PAD3
3030LDA DLINES:CMP#16:BNE OVOLD
3050LDA LO:STA OLO:LDA HI:STA OHI
3060LDA NUMB:STA OUMB
3080.OVOLD DEC DLINES:BEQ FINLIN:JMP LINLOP
3090.FINLIN RTS
3130.DISPLAY LDY#2:LDX#15:JSR SETAB
3150LDA HI:JSR HEX:LDA LO:JSR HEXSP:
3170LDA DISP:CMP#ASC("L"):BEQ DDISP
3190JSR SHOW:RTS
3210.DDISP JSR DIS:RTS
3250.SHOW LDX#(ST2 MOD256)
3260LDY#(ST2 DIV256)
3280JSR OUTPUT
3300LDA LO:AND#&F8:SEC:SBC#64:STA UP
3310LDA HI:SBC#0:STA STK
3330LDA LO:AND#7:STA ACR
3350LDX#0:.L4 STX STK+1:LDA#8:CLC:ADC UP:STA UP
3360LDA #0:ADC STK:STA STK
3380JSR HEX:LDA UP:JSR HEXSP:LDA#ASC(" "):JSR OSASCI
3400LDX#0:.L2 STX STK+2:TXA
3410TAY
3430LDA(UP),Y:JSR HEXSP
3450LDX STK+2:INX:CPX#8:BNE L2
3470LDX#0:.L3 STX STK+2:TXA
3490TAY
3500LDA(UP),Y:JSR CHOUT
3520LDX STK+2:INX:CPX#8:BNE L3
3540LDA#ASC(" "):JSR OSASCI:JSR OSASCI
3560LDX STK+1:INX:CPX#16:BNE L4
3580LDY#14:LDA ACR:ASL A:CLC:ADC ACR
3590ADC#5:STA STK+1:TAX:JSR SETAB
3610LDA#ASC("["):JSR OSASCI
3620LDA STK+1:CLC:ADC#3:TAX:LDY#14:JSR SETAB
3640LDA#ASC("]"):JSR OSASCI
3650RTS
3690.CHOUT CMP#ASC(" "):BCC DUF
3710CMP#&7F:BCC OK
3740.DUF LDA#ASC(".")
3750.OK JSR OSASCI:RTS
3790.SETAB STY ST3+2:STX ST3+1
3800LDX#(ST3 MOD256):LDY#(ST3 DIV256)
3810JSR OUTPUT:RTS
3850.KEYIN LDX#0:LDA#21:JSR OSBYTE
3860JSR OSRDCH:BCS KEYERR:RTS
3880.KEYERR STA STK+1
3890LDX#(ST6 MOD256):LDY#(ST6 DIV256):JSR CLI
3900LDA STK+1:CMP#&1B:BNE KERR
3920LDA#&7E:JSR OSBYTE
3930.KERR
3950LDX#0:LDY#22:JSR SETAB:LDX TEMPSTACK:TXS
3980BRK:EQUB99
3990EQUS"END OF DIS"
4010BRK
4050.OUTPUT STX&70:STY&71
4060LDY#0
4070.LOOP LDA(&70),Y:CMP#&FF:BEQ OUTEND
4080JSR OSASCI:INY:BNE LOOP
4090.OUTEND RTS
4130.HEXSP JSR HEX:LDA#&20:JMP OSWRCH
4150.HEX
4170PHA:LSR A:LSR A:LSR A:LSR A
4180JSR HEXDIG:PLA:AND#&F
4190.HEXDIG CMP#&A:BCC HEXDIH:ADC#6
4200.HEXDIH ADC#&30:JMP OSWRCH
4250.STRIN STA CONBLK+2:STX CONBLK+3:STY CONBLK+4
4260LDX#(ST5 MOD256)
4270LDY#(ST5 DIV256):JSR OUTPUT
4280LDA#0:LDX# CONBLK:TAY:JSR OSWORD
4290BCS ESC1:RTS
4300.ESC1 LDA#&1B:JMP KEYERR
4310]
4320ST1=P%+1:!ST1=&0D0C0616:P%=P%+5
4330$P%=" ELECTRON DEBUGGER D DUMP MEMORY "
4340$(P%+40)=" H HEX ADDR. : 0000 L LISTING "
4350$(P%+80)=" F FIND BYTE : 00 A ALTER BYTE "
4360$(P%+120)=" S STRING"
4370P%=P%+LEN($P%):?P%=&FF
4380ST2=P%+1:!ST2=&00000117:ST2!4=0:P%=P%+9
4390!P%=&001F0000:P%=P%+4:!P%=&FF07:P%=P%+2
4400ST3=P%:!P%=&0000001F:P%!4=&FF000000:P%=P%+8
4410ST4=P%:!P%=&FF202020:P%=P%+4
4420ST5=P%:!P%=&00010117:ST5!4=0:P%=P%+8
4430!P%=&FF000000:P%=P%+4
4440ST6=P%:$ST6="FX4,0":P%=P%+6
4450RESTORE
4460NUM=P%:FOR I=0 TO 14:READ N%:P%?I=N%:NEXT I
4470P%=P%+15
4480P%=(P% DIV256)+1:P%=P%*256
4490HASH=P%:TYPE=P%+256:P%=P%+512:STRING=P%
4500NEXT OP
4510FOR I%=0 TO 255 STEP 4:HASH!I%=0:TYPE!I%=0:STRING!I%=0:NEXT I%
4520REPEAT
4530READ A$:IF A$="*" THEN 4570
4540IF ASC(A$)=ASC("-") THEN I=ABS(VAL(A$)):GOTO 4530
4550M=EVAL("&"+LEFT$(A$,1)):MN=EVAL("&"+RIGHT$(A$,2))
4560HASH?MN=I:TYPE?MN=M
4570UNTIL A$="*"
4580A$=" --- ADC AND ASL BCC BCS BEQ BIT BMI BNE"
4590A$=A$+" BPL BRK BVC BVS CLC CLD CLI CLV CMP CPX"
4600A$=A$+" CPY DEC DEX DEY EOR INC INX INY JMP JSR"
4610A$=A$+" LDA LDX LDY LSR NOP ORA PHA PHP PLA PLP"
4620A$=A$+" ROL ROR RTI RTS SBC SEC SED SEI STA STX"
4630A$=A$+" STY TAX TAY TSX TXA TXS TYA"
4640$STRING=A$
4650END
4660DATA1,2,3,2,1,1,2,2,2,3,3,2,3,2,1
4670DATA-1,169,26D,365,661,771,875,97D,A79
4680DATA-2,129,22D,325,621,731,835,93D,A39
4690DATA-3,20E,306,40A,816,91E
4700DATA-4,B90
4710DATA-5,BB0
4720DATA-6,BF0
4730DATA-7,22C,324
4740DATA-8,B30
4750DATA-9,BD0
4760DATA-10,B10
4770DATA-11,500
4780DATA-12,B50
4790DATA-13,B70
4800DATA-14,518
4810DATA-15,5D8
4820DATA-16,558
4830DATA-17,5B8
4840DATA-18,1C9,2CD,3C5,6C1,7D1,8D5,9DD,AD9
4850DATA-19,1E0,2EC,3E4
4860DATA-20,1C0,2CC,3C4
4870DATA-21,2CE,3C6,8D6,9DE
4880DATA-22,5CA
4890DATA-23,588
4900DATA-24,149,24D,345,641,751,855,95D,A59
4910DATA-25,2EE,3E6,8F6,9FE
4920DATA-26,5E8
4930DATA-27,5C8
4940DATA-28,24C,C6C
4950DATA-29,220
4960DATA-30,1A9,2AD,3A5,6A1,7B1,8B5,9BD,AB9
4970DATA-31,1A2,2AE,3A6,ABE,DB6
4980DATA-32,1A0,2AC,3A4,8B4,9BC
4990DATA-33,24E,346,44A,856,95E
5000DATA-34,5EA
5010DATA-35,109,20D,305,601,711,815,91D,A19
5020DATA-36,548
5030DATA-37,508
5040DATA-38,568
5050DATA-39,528
5060DATA-40,22E,326,42A,836,93E
5070DATA-41,26E,366,46A,876,97E
5080DATA-42,540
5090DATA-43,560
5100DATA-44,1E9,2ED,3E5,6E1,7F1,8F5,9FD,AF9
5110DATA-45,538
5120DATA-46,5F8
5130DATA-47,578
5140DATA-48,28D,385,681,791,895,99D,A99
5150DATA-49,28E,386,D96
5160DATA-50,28C,384,894
5170DATA-51,5AA
5180DATA-52,5A8
5190DATA-53,5BA
5200DATA-54,58A
5210DATA-55,59A
5220DATA-56,598,*
� 6:�=&7000:�=&6400
� 28,0,24,39,16
7OSBYTE=&FFF4:OSWORD=&FFF1:OSASCI=&FFE3:OSWRCH=&FFEE
(OSRDCH=&FFE0:CLI=&FFF7
2"OUT=&70:PUT=&71:SP=&72:BPT=&74
<,CONBLK=&76:HI=&81:LO=&80:DISP=&82:DH=&83
FUP=&85:STK=&86:ACR=&84
P OLO=&7B:OHI=&7C:OUMB=&88
ZHA=&8D:HB=&8E:HC=&8F
d%DLINES=&7D:NUMB=&7E:TEMPSTACK=&7F
n� OP=0 � 3 � 3
x P%=&52BF
�X[OPT OP:ADC#&FF:ADC&FFFF:ADC&FF:ADC(&FF,X):ADC(&FF),Y:ADC&FF,X:ADC&FFFF,X:ADC&FFFF,Y
�@�#&FF:�&FFFF:�&FF:�(&FF,X):�(&FF),Y:�&FF,X:�&FFFF,X:�&FFFF,Y
�-ASL&FFFF:ASL&FF:ASL A:ASL&FF,X:ASL&FFFF,X
� BCC P%+1:BCS P%+1:BEQ P%+1
�BIT&FFFF:BIT&FF
�DBMI P%+1:BNE P%+1:BPL P%+1:BRK:BVC P%+1:BVS P%+1:CLC:CLD:CLI:CLV
�PCMP#&FF:CMP&FFFF:CMP&FF:CMP(&FF,X):CMP(&FF),Y:CMP&FF,X:CMP&FFFF,X:CMP&FFFF,Y
�CPX#&FF:CPX&FFFF:CPX&FF
�CPY#&FF:CPY&FFFF:CPY&FF
�'DEC&FFFF:DEC&FF:DEC&FF,X:DEC&FFFF,X
� DEX:DEY
�@�#&FF:�&FFFF:�&FF:�(&FF,X):�(&FF),Y:�&FF,X:�&FFFF,X:�&FFFF,Y
'INC&FFFF:INC&FF:INC&FF,X:INC&FFFF,X
INX:INY:JMP&FFFF:JMP(&FFFF)
JSR&FFFF
"PLDA#&FF:LDA&FFFF:LDA&FF:LDA(&FF,X):LDA(&FF),Y:LDA&FF,X:LDA&FFFF,X:LDA&FFFF,Y
,/LDX#&FF:LDX&FFFF:LDX&FF:LDX&FF,Y:LDX&FFFF,Y
6/LDY#&FF:LDY&FFFF:LDY&FF:LDY&FF,X:LDY&FFFF,X
@-LSR&FFFF:LSR&FF:LSR A:LSR&FF,X:LSR&FFFF,X
JLNOP:�A#&FF:�A&FFFF:�A&FF:�A(&FF,X):�A(&FF),Y:�A&FF,X:�A&FFFF,X:�A&FFFF,Y
TPHA:PHP:PLA:PLP
^-ROL&FFFF:ROL&FF:ROL A:ROL&FF,X:ROL&FFFF,X
h-ROR&FFFF:ROR&FF:ROR A:ROR&FF,X:ROR&FFFF,X
r RTI:RTS
|PSBC#&FF:SBC&FFFF:SBC&FF:SBC(&FF,X):SBC(&FF),Y:SBC&FF,X:SBC&FFFF,X:SBC&FFFF,Y
�SEC:SED:SEI
�HSTA&FFFF:STA&FF:STA(&FF,X):STA(&FF),Y:STA&FF,X:STA&FFFF,X:STA&FFFF,Y
�5STX&FFFF:STX&FF:STX&FF,Y:STY&FFFF:STY&FF:STY&FF,X
�TAX:TAY:TSX:TXA:TXS:TYA
�]
�� P%
� [OPT OP
�TSX:STX TEMPSTACK
�'LDA#0:STA CONBLK:LDA#6:STA CONBLK+1
�LDA#�("D"):STA DISP
LDX#(ST1 � 256)
LDY#(ST1 � 256)
JSR OUTPUT
0LDA#4:LDX#1:JSR OSBYTE
N.L5 JSR DISPLAY
b.L7 JSR KEYIN
vCMP#�("D"):BNE NOND
�.STD STA DISP:JMP L5
� .NOND CMP#�("L"):BEQ STD
�CMP #�("H"):BNE NONH
� .HGIN LDX#15:LDY#2:JSR SETAB
�)LDA#4:LDX#�("0"):LDY#�("F"):JSR STRIN
�"JSR DHEX:BCCHGIN:LDA DH:STA HI
,LDA&602:STA&600:LDA&603:STA&601:JSR DHEX
!BCC HGIN:LDA DH:STA LO:JMP L5
.NONH CMP#�("F"):BNE NOF
4 .FGIN LDX#15:LDY#3:JSR SETAB
>)LDA#2:LDX#�("0"):LDY#�("F"):JSR STRIN
H4JSR DHEX:BCC FGIN:LDA DISP:CMP#�("L"):BNE OVSWAP
R4LDA OLO:SEC:SBC OUMB:STA LO:LDA OHI:SBC#0:STA HI
\ .OVSWAP
fHLDY#0:LDA DH:.FLOOP INC LO:BNE OVHI:INC HI:.OVHI CMP(LO),Y:BNE FLOOP
p
JMP L5
�..NOF LDX DISP:CPX#�("L"):BNE NONF:JMP LCOM
�.NONF CMP#&88:BNE NLEFT
�,LDA LO:BNE DE1:DEC HI:.DE1 DEC LO:JMP L5
�.NLEFT CMP#&89:BNE NRT
�%INC LO:BNE DE2:INC HI:.DE2 JMP L5
.NRT CMP#&8A:BNE NDOWN
LDA LO:CLC:ADC#8:STA LO
$ LDA HI:ADC#0:STA HI:JMP L5
8 .NDOWN CMP#&8B:BNE NMOVE
LLDA LO:SEC:SBC#8:STA LO
V LDA HI:SBC#0:STA HI:JMP L5
t .NMOVE CMP#�("A"):BNE NONA
�.AGIN LDY#14
�'LDA ACR:ASL A:CLC:ADC ACR:CLC:ADC#6
�TAX:JSR SETAB
�)LDA#2:LDX#�("0"):LDY#�("F"):JSR STRIN
�-JSR DHEX:BCC AGIN:LDA DH:LDY#0:STA (LO),Y
�
JMP L5
'.DHEX LDA&600:CMP #�("9")+1:BCS AL1
�#&0F:BCC TIP
-.AL1 CMP #�("A"):BCC ERHEX:SBC #�("A")-10
2'.TIP ASL A:ASL A:ASL A:ASL A:STA DH
<!LDA&601:CMP #�("9")+1:BCS AL2
F�#&0F:BCC BOT
P-.AL2 CMP #�("A"):BCC ERHEX:SBC #�("A")-10
d.BOT �A DH:STA DH:SEC
x.ERHEX RTS
� .NONA CMP #�("S")BNE NONS
�1.SGIN LDY#14:LDA ACR:CLC:ADC#30:TAX:JSR SETAB
�-LDA#255:LDX #�(" "):LDY #�("~"):JSR STRIN
�LDX#0:LDY#0
�%.LOP LDA&600,X:CMP#&0D:BEQ FINLOP
� STA (LO),Y:INY:INX:BNE LOP
.FINLOP JMP L5
" .NONS
,
JMP L7
T.LCOM CMP#&0D:BNE NONCR
h(LDA OLO:STA LO:LDA OHI:STA HI:JMP L5
|.NONCR CMP#&8B:BNE NONS
�(LDA OLO:INC OUMB:SEC:SBC OUMB:STA LO
� LDA OHI:SBC#0:STA HI:JMP L5
�.DIS LDX#(ST2 � 256)
�LDY#(ST2 � 256)
�JSR OUTPUT
�LDA#16:STA DLINES
� .LINLOP
#LDA HI:JSR HEX:LDA LO:JSR HEXSP
&LDY#0:LDX#3
0/.HALOP LDA(LO),Y:STA HA,Y:INY:DEX:BNE HALOP
D#LDX HA:LDA TYPE,X:TAX:LDA NUM,X
X2STA NUMB:CLC:ADC LO:STA LO:LDA#0:ADC HI:STA HI
l3LDX NUMB:LDY#3:LDA HA:JSR HEXSP:DEY:DEX:BEQ PAD
v$LDA HB:JSR HEXSP:DEY:DEX:BEQ PAD
�!LDA HC:JSR HEXSP:DEX:BEQ MNEM
�.PAD TYA:PHA
�.LDX#(ST4 � 256):LDY#(ST4 � 256):JSR OUTPUT
�PLA:TAY:DEY:BNE PAD
� .MNEM LDA #�(" "):JSR OSASCI
�)LDX HA:LDA HASH,X:ASL A:ASL A:STA OUT
�*LDA#(STRING � 256):STA PUT:LDX#4:LDY#0
�5.MNMLOP LDA (OUT),Y:JSR OSASCI:INY:DEX:BNE MNMLOP
LDA #�(" "):JSR OSASCI
$LDX HA:LDA TYPE,X:CMP#1:BNE NOD1
*1LDA #�("#"):JSR OSASCI:LDA #�("&"):JSR OSASCI
>%LDA HB:JSR HEXSP:LDY#5:JMP NDLINE
R.NOD1 CMP#2:BNE NOD2
f)LDA #�("&"):JSR OSASCI:LDA HC:JSR HEX
p%LDA HB:JSR HEXSP:LDY#4:JMP NDLINE
�.NOD2 CMP#3:BNE NOD3
�+LDA #�("&"):JSR OSASCI:LDA HB:JSR HEXSP
�LDY#6:JMP NDLINE
�.NOD3 CMP#4:BNE NOD4
�+LDA #�("A"):JSR OSASCI:LDY#9:JMP NDLINE
�.NOD4:CMP#5:BNE NOD5
�LDY#10:JMP NDLINE
.NOD5 CMP#6:BNE NOD6
1LDA #�("("):JSR OSASCI:LDA #�("&"):JSR OSASCI
$)LDA HB:JSR HEX:LDA #�(","):JSR OSASCI
.1LDA #�("X"):JSR OSASCI:LDA #�(")"):JSR OSASCI
8LDY#3:JMP NDLINE
L.NOD6 CMP#7:BNE NOD7
`/LDA#�("("):JSR OSASCI:LDA#�("&"):JSR OSASCI
j(LDA HB:JSR HEX:LDA#�(")"):JSR OSASCI
t/LDA#�(","):JSR OSASCI:LDA#�("Y"):JSR OSASCI
~LDY#3:JMP NDLINE
�.NOD7 CMP#8:BNE NOD8
�(LDA#�("&"):JSR OSASCI:LDA HB:JSR HEX
�/LDA#�(","):JSR OSASCI:LDA#�("X"):JSR OSASCI
�LDY#5:JMP NDLINE
�.NOD8 CMP#9:BNE NOD9
�(LDA#�("&"):JSR OSASCI:LDA HC:JSR HEX
�(LDA HB:JSR HEX:LDA#�(","):JSR OSASCI
�LDA#�("X"):JSR OSASCI
LDY#3:JMP NDLINE
.NOD9 CMP#&A:BNE NODA
((LDA#�("&"):JSR OSASCI:LDA HC:JSR HEX
2(LDA HB:JSR HEX:LDA#�(","):JSR OSASCI
<LDA#�("Y"):JSR OSASCI
FLDY#3:JMP NDLINE
Z.NODA CMP#&B:BNE NODB
nLDA#�("&"):JSR OSASCI
�LDA HB:CMP#&7F:BCS BACK
�+CLC:ADC LO:PHA:LDA#0:ADC HI:CLC:BCC REL
�..BACK �#255:ADC#0:STA&70:LDA LO:SEC:SBC&70
�PHA:LDA HI:SBC#0
� .REL JSR HEX:PLA:JSR HEXSP
�LDY#4:JMP NDLINE
�.NODB CMP#&C:BNE NODC
�/LDA#�("("):JSR OSASCI:LDA#�("&"):JSR OSASCI
!LDA HC:JSR HEX:LDA HB:JSR HEX
*LDA#�(")"):JSR OSASCI:LDY#3:JMP NDLINE
".NODC CMP#&D:BNE NODD
6(LDA#�("&"):JSR OSASCI:LDA HB:JSR HEX
@/LDA#�(","):JSR OSASCI:LDA#�("Y"):JSR OSASCI
JLDY#5:JMP NDLINE
^.NODD LDY#10
r0.NDLINE LDA#�(" "):JSR OSASCI:DEY:BPL NDLINE
�LDX NUMB:LDY#0
�3.DISPLOP LDA HA,Y:JSR CHOUT:INY:DEX:BNE DISPLOP
�2LDA#�(" "):.PAD2 JSR OSASCI:INY:CPY#4:BNE PAD2
�'LDX#5:.PAD3 JSR OSASCI:DEX:BNE PAD3
� LDA DLINES:CMP#16:BNE OVOLD
�!LDA LO:STA OLO:LDA HI:STA OHI
�LDA NUMB:STA OUMB
+.OVOLD DEC DLINES:BEQ FINLIN:JMP LINLOP
.FINLIN RTS
:#.DISPLAY LDY#2:LDX#15:JSR SETAB
N$LDA HI:JSR HEX:LDA LO:JSR HEXSP:
b!LDA DISP:CMP#�("L"):BEQ DDISP
vJSR SHOW:RTS
�.DDISP JSR DIS:RTS
�.SHOW LDX#(ST2 �256)
�LDY#(ST2 �256)
�JSR OUTPUT
�"LDA LO:�#&F8:SEC:SBC#64:STA UP
�LDA HI:SBC#0:STA STK
LDA LO:�#7:STA ACR
/LDX#0:.L4 STX STK+1:LDA#8:CLC:ADC UP:STA UP
LDA #0:ADC STK:STA STK
42JSR HEX:LDA UP:JSR HEXSP:LDA#�(" "):JSR OSASCI
HLDX#0:.L2 STX STK+2:TXA
RTAY
fLDA(UP),Y:JSR HEXSP
z LDX STK+2:INX:CPX#8:BNE L2
�LDX#0:.L3 STX STK+2:TXA
�TAY
�LDA(UP),Y:JSR CHOUT
� LDX STK+2:INX:CPX#8:BNE L3
�$LDA#�(" "):JSR OSASCI:JSR OSASCI
� LDX STK+1:INX:CPX#16:BNE L4
�$LDY#14:LDA ACR:ASL A:CLC:ADC ACR
!ADC#5:STA STK+1:TAX:JSR SETAB
LDA#�("["):JSR OSASCI
$,LDA STK+1:CLC:ADC#3:TAX:LDY#14:JSR SETAB
8LDA#�("]"):JSR OSASCI
BRTS
j .CHOUT CMP#�(" "):BCC DUF
~CMP#&7F:BCC OK
�.DUF LDA#�(".")
�.OK JSR OSASCI:RTS
� .SETAB STY ST3+2:STX ST3+1
�!LDX#(ST3 �256):LDY#(ST3 �256)
�JSR OUTPUT:RTS
".KEYIN LDX#0:LDA#21:JSR OSBYTE
JSR OSRDCH:BCS KEYERR:RTS
(.KEYERR STA STK+1
2)LDX#(ST6 �256):LDY#(ST6 �256):JSR CLI
< LDA STK+1:CMP#&1B:BNE KERR
PLDA#&7E:JSR OSBYTE
Z .KERR
n,LDX#0:LDY#22:JSR SETAB:LDX TEMPSTACK:TXS
�BRK:EQUB99
�EQUS"END OF DIS"
�BRK
�.OUTPUT STX&70:STY&71
� LDY#0
�'.LOOP LDA(&70),Y:CMP#&FF:BEQ OUTEND
�JSR OSASCI:INY:BNE LOOP
�.OUTEND RTS
"%.HEXSP JSR HEX:LDA#&20:JMP OSWRCH
6.HEX
J PHA:LSR A:LSR A:LSR A:LSR A
TJSR HEXDIG:PLA:�#&F
^#.HEXDIG CMP#&A:BCC HEXDIH:ADC#6
h .HEXDIH ADC#&30:JMP OSWRCH
�1.STRIN STA CONBLK+2:STX CONBLK+3:STY CONBLK+4
�LDX#(ST5 �256)
� LDY#(ST5 �256):JSR OUTPUT
�$LDA#0:LDX# CONBLK:TAY:JSR OSWORD
�BCS ESC1:RTS
� .ESC1 LDA#&1B:JMP KEYERR
�]
�#ST1=P%+1:!ST1=&0D0C0616:P%=P%+5
�2$P%=" ELECTRON DEBUGGER D DUMP MEMORY "
�7$(P%+40)=" H HEX ADDR. : 0000 L LISTING "
�7$(P%+80)=" F FIND BYTE : 00 A ALTER BYTE "
-$(P%+120)=" S STRING"
P%=P%+�($P%):?P%=&FF
+ST2=P%+1:!ST2=&00000117:ST2!4=0:P%=P%+9
&+!P%=&001F0000:P%=P%+4:!P%=&FF07:P%=P%+2
0/ST3=P%:!P%=&0000001F:P%!4=&FF000000:P%=P%+8
: ST4=P%:!P%=&FF202020:P%=P%+4
D(ST5=P%:!P%=&00010117:ST5!4=0:P%=P%+8
N!P%=&FF000000:P%=P%+4
X ST6=P%:$ST6="FX4,0":P%=P%+6
b�
l&NUM=P%:� I=0 � 14:� N%:P%?I=N%:� I
v P%=P%+15
� P%=(P% �256)+1:P%=P%*256
�+HASH=P%:TYPE=P%+256:P%=P%+512:STRING=P%
�� OP
�9� I%=0 � 255 � 4:HASH!I%=0:TYPE!I%=0:STRING!I%=0:� I%
��
�� A$:� A$="*" � �dZQ
�&� �(A$)=�("-") � I=�(�(A$)):� �trQ
�$M=�("&"+�A$,1)):MN=�("&"+�A$,2))
�HASH?MN=I:TYPE?MN=M
� � A$="*"
�1A$=" --- ADC AND ASL BCC BCS BEQ BIT BMI BNE"
�4A$=A$+" BPL BRK BVC BVS CLC CLD CLI CLV CMP CPX"
�4A$=A$+" CPY DEC DEX DEY EOR INC INX INY JMP JSR"
4A$=A$+" LDA LDX LDY LSR NOP ORA PHA PHP PLA PLP"
4A$=A$+" ROL ROR RTI RTS SBC SEC SED SEI STA STX"
(A$=A$+" STY TAX TAY TSX TXA TXS TYA"
$STRING=A$
*�
4"�1,2,3,2,1,1,2,2,2,3,3,2,3,2,1
>'�-1,169,26D,365,661,771,875,97D,A79
H'�-2,129,22D,325,621,731,835,93D,A39
R�-3,20E,306,40A,816,91E
\ �-4,B90
f �-5,BB0
p �-6,BF0
z�-7,22C,324
� �-8,B30
� �-9,BD0
� �-10,B10
� �-11,500
� �-12,B50
� �-13,B70
� �-14,518
� �-15,5D8
� �-16,558
� �-17,5B8
�(�-18,1C9,2CD,3C5,6C1,7D1,8D5,9DD,AD9
��-19,1E0,2EC,3E4
��-20,1C0,2CC,3C4
�-21,2CE,3C6,8D6,9DE
�-22,5CA
�-23,588
$(�-24,149,24D,345,641,751,855,95D,A59
.�-25,2EE,3E6,8F6,9FE
8 �-26,5E8
B �-27,5C8
L�-28,24C,C6C
V �-29,220
`(�-30,1A9,2AD,3A5,6A1,7B1,8B5,9BD,AB9
j �-31,1A2,2AE,3A6,ABE,DB6
t �-32,1A0,2AC,3A4,8B4,9BC
~ �-33,24E,346,44A,856,95E
� �-34,5EA
�(�-35,109,20D,305,601,711,815,91D,A19
� �-36,548
� �-37,508
� �-38,568
� �-39,528
� �-40,22E,326,42A,836,93E
� �-41,26E,366,46A,876,97E
� �-42,540
� �-43,560
�(�-44,1E9,2ED,3E5,6E1,7F1,8F5,9FD,AF9
� �-45,538
�-46,5F8
�-47,578
$�-48,28D,385,681,791,895,99D,A99
�-49,28E,386,D96
(�-50,28C,384,894
2 �-51,5AA
< �-52,5A8
F �-53,5BA
P �-54,58A
Z �-55,59A
d�-56,598,*
� 00000000 0d 00 0a 17 eb 20 36 3a d3 3d 26 37 30 30 30 3a |..... 6:.=&7000:|
00000010 d2 3d 26 36 34 30 30 0d 00 14 13 ef 20 32 38 2c |.=&6400..... 28,|
00000020 30 2c 32 34 2c 33 39 2c 31 36 0d 00 1e 37 4f 53 |0,24,39,16...7OS|
00000030 42 59 54 45 3d 26 46 46 46 34 3a 4f 53 57 4f 52 |BYTE=&FFF4:OSWOR|
00000040 44 3d 26 46 46 46 31 3a 4f 53 41 53 43 49 3d 26 |D=&FFF1:OSASCI=&|
00000050 46 46 45 33 3a 4f 53 57 52 43 48 3d 26 46 46 45 |FFE3:OSWRCH=&FFE|
00000060 45 0d 00 28 1a 4f 53 52 44 43 48 3d 26 46 46 45 |E..(.OSRDCH=&FFE|
00000070 30 3a 43 4c 49 3d 26 46 46 46 37 0d 00 32 22 4f |0:CLI=&FFF7..2"O|
00000080 55 54 3d 26 37 30 3a 50 55 54 3d 26 37 31 3a 53 |UT=&70:PUT=&71:S|
00000090 50 3d 26 37 32 3a 42 50 54 3d 26 37 34 0d 00 3c |P=&72:BPT=&74..<|
000000a0 2c 43 4f 4e 42 4c 4b 3d 26 37 36 3a 48 49 3d 26 |,CONBLK=&76:HI=&|
000000b0 38 31 3a 4c 4f 3d 26 38 30 3a 44 49 53 50 3d 26 |81:LO=&80:DISP=&|
000000c0 38 32 3a 44 48 3d 26 38 33 0d 00 46 1a 55 50 3d |82:DH=&83..F.UP=|
000000d0 26 38 35 3a 53 54 4b 3d 26 38 36 3a 41 43 52 3d |&85:STK=&86:ACR=|
000000e0 26 38 34 0d 00 50 1c 4f 4c 4f 3d 26 37 42 3a 4f |&84..P.OLO=&7B:O|
000000f0 48 49 3d 26 37 43 3a 4f 55 4d 42 3d 26 38 38 0d |HI=&7C:OUMB=&88.|
00000100 00 5a 18 48 41 3d 26 38 44 3a 48 42 3d 26 38 45 |.Z.HA=&8D:HB=&8E|
00000110 3a 48 43 3d 26 38 46 0d 00 64 25 44 4c 49 4e 45 |:HC=&8F..d%DLINE|
00000120 53 3d 26 37 44 3a 4e 55 4d 42 3d 26 37 45 3a 54 |S=&7D:NUMB=&7E:T|
00000130 45 4d 50 53 54 41 43 4b 3d 26 37 46 0d 00 6e 12 |EMPSTACK=&7F..n.|
00000140 e3 20 4f 50 3d 30 20 b8 20 33 20 88 20 33 0d 00 |. OP=0 . 3 . 3..|
00000150 78 0c 50 25 3d 26 35 32 42 46 0d 00 8c 58 5b 4f |x.P%=&52BF...X[O|
00000160 50 54 20 4f 50 3a 41 44 43 23 26 46 46 3a 41 44 |PT OP:ADC#&FF:AD|
00000170 43 26 46 46 46 46 3a 41 44 43 26 46 46 3a 41 44 |C&FFFF:ADC&FF:AD|
00000180 43 28 26 46 46 2c 58 29 3a 41 44 43 28 26 46 46 |C(&FF,X):ADC(&FF|
00000190 29 2c 59 3a 41 44 43 26 46 46 2c 58 3a 41 44 43 |),Y:ADC&FF,X:ADC|
000001a0 26 46 46 46 46 2c 58 3a 41 44 43 26 46 46 46 46 |&FFFF,X:ADC&FFFF|
000001b0 2c 59 0d 00 96 40 80 23 26 46 46 3a 80 26 46 46 |,Y...@.#&FF:.&FF|
000001c0 46 46 3a 80 26 46 46 3a 80 28 26 46 46 2c 58 29 |FF:.&FF:.(&FF,X)|
000001d0 3a 80 28 26 46 46 29 2c 59 3a 80 26 46 46 2c 58 |:.(&FF),Y:.&FF,X|
000001e0 3a 80 26 46 46 46 46 2c 58 3a 80 26 46 46 46 46 |:.&FFFF,X:.&FFFF|
000001f0 2c 59 0d 00 a0 2d 41 53 4c 26 46 46 46 46 3a 41 |,Y...-ASL&FFFF:A|
00000200 53 4c 26 46 46 3a 41 53 4c 20 41 3a 41 53 4c 26 |SL&FF:ASL A:ASL&|
00000210 46 46 2c 58 3a 41 53 4c 26 46 46 46 46 2c 58 0d |FF,X:ASL&FFFF,X.|
00000220 00 aa 1e 42 43 43 20 50 25 2b 31 3a 42 43 53 20 |...BCC P%+1:BCS |
00000230 50 25 2b 31 3a 42 45 51 20 50 25 2b 31 0d 00 b4 |P%+1:BEQ P%+1...|
00000240 13 42 49 54 26 46 46 46 46 3a 42 49 54 26 46 46 |.BIT&FFFF:BIT&FF|
00000250 0d 00 be 44 42 4d 49 20 50 25 2b 31 3a 42 4e 45 |...DBMI P%+1:BNE|
00000260 20 50 25 2b 31 3a 42 50 4c 20 50 25 2b 31 3a 42 | P%+1:BPL P%+1:B|
00000270 52 4b 3a 42 56 43 20 50 25 2b 31 3a 42 56 53 20 |RK:BVC P%+1:BVS |
00000280 50 25 2b 31 3a 43 4c 43 3a 43 4c 44 3a 43 4c 49 |P%+1:CLC:CLD:CLI|
00000290 3a 43 4c 56 0d 00 c8 50 43 4d 50 23 26 46 46 3a |:CLV...PCMP#&FF:|
000002a0 43 4d 50 26 46 46 46 46 3a 43 4d 50 26 46 46 3a |CMP&FFFF:CMP&FF:|
000002b0 43 4d 50 28 26 46 46 2c 58 29 3a 43 4d 50 28 26 |CMP(&FF,X):CMP(&|
000002c0 46 46 29 2c 59 3a 43 4d 50 26 46 46 2c 58 3a 43 |FF),Y:CMP&FF,X:C|
000002d0 4d 50 26 46 46 46 46 2c 58 3a 43 4d 50 26 46 46 |MP&FFFF,X:CMP&FF|
000002e0 46 46 2c 59 0d 00 d2 1b 43 50 58 23 26 46 46 3a |FF,Y....CPX#&FF:|
000002f0 43 50 58 26 46 46 46 46 3a 43 50 58 26 46 46 0d |CPX&FFFF:CPX&FF.|
00000300 00 dc 1b 43 50 59 23 26 46 46 3a 43 50 59 26 46 |...CPY#&FF:CPY&F|
00000310 46 46 46 3a 43 50 59 26 46 46 0d 00 e6 27 44 45 |FFF:CPY&FF...'DE|
00000320 43 26 46 46 46 46 3a 44 45 43 26 46 46 3a 44 45 |C&FFFF:DEC&FF:DE|
00000330 43 26 46 46 2c 58 3a 44 45 43 26 46 46 46 46 2c |C&FF,X:DEC&FFFF,|
00000340 58 0d 00 f0 0b 44 45 58 3a 44 45 59 0d 00 fa 40 |X....DEX:DEY...@|
00000350 82 23 26 46 46 3a 82 26 46 46 46 46 3a 82 26 46 |.#&FF:.&FFFF:.&F|
00000360 46 3a 82 28 26 46 46 2c 58 29 3a 82 28 26 46 46 |F:.(&FF,X):.(&FF|
00000370 29 2c 59 3a 82 26 46 46 2c 58 3a 82 26 46 46 46 |),Y:.&FF,X:.&FFF|
00000380 46 2c 58 3a 82 26 46 46 46 46 2c 59 0d 01 04 27 |F,X:.&FFFF,Y...'|
00000390 49 4e 43 26 46 46 46 46 3a 49 4e 43 26 46 46 3a |INC&FFFF:INC&FF:|
000003a0 49 4e 43 26 46 46 2c 58 3a 49 4e 43 26 46 46 46 |INC&FF,X:INC&FFF|
000003b0 46 2c 58 0d 01 0e 1f 49 4e 58 3a 49 4e 59 3a 4a |F,X....INX:INY:J|
000003c0 4d 50 26 46 46 46 46 3a 4a 4d 50 28 26 46 46 46 |MP&FFFF:JMP(&FFF|
000003d0 46 29 0d 01 18 0c 4a 53 52 26 46 46 46 46 0d 01 |F)....JSR&FFFF..|
000003e0 22 50 4c 44 41 23 26 46 46 3a 4c 44 41 26 46 46 |"PLDA#&FF:LDA&FF|
000003f0 46 46 3a 4c 44 41 26 46 46 3a 4c 44 41 28 26 46 |FF:LDA&FF:LDA(&F|
00000400 46 2c 58 29 3a 4c 44 41 28 26 46 46 29 2c 59 3a |F,X):LDA(&FF),Y:|
00000410 4c 44 41 26 46 46 2c 58 3a 4c 44 41 26 46 46 46 |LDA&FF,X:LDA&FFF|
00000420 46 2c 58 3a 4c 44 41 26 46 46 46 46 2c 59 0d 01 |F,X:LDA&FFFF,Y..|
00000430 2c 2f 4c 44 58 23 26 46 46 3a 4c 44 58 26 46 46 |,/LDX#&FF:LDX&FF|
00000440 46 46 3a 4c 44 58 26 46 46 3a 4c 44 58 26 46 46 |FF:LDX&FF:LDX&FF|
00000450 2c 59 3a 4c 44 58 26 46 46 46 46 2c 59 0d 01 36 |,Y:LDX&FFFF,Y..6|
00000460 2f 4c 44 59 23 26 46 46 3a 4c 44 59 26 46 46 46 |/LDY#&FF:LDY&FFF|
00000470 46 3a 4c 44 59 26 46 46 3a 4c 44 59 26 46 46 2c |F:LDY&FF:LDY&FF,|
00000480 58 3a 4c 44 59 26 46 46 46 46 2c 58 0d 01 40 2d |X:LDY&FFFF,X..@-|
00000490 4c 53 52 26 46 46 46 46 3a 4c 53 52 26 46 46 3a |LSR&FFFF:LSR&FF:|
000004a0 4c 53 52 20 41 3a 4c 53 52 26 46 46 2c 58 3a 4c |LSR A:LSR&FF,X:L|
000004b0 53 52 26 46 46 46 46 2c 58 0d 01 4a 4c 4e 4f 50 |SR&FFFF,X..JLNOP|
000004c0 3a 84 41 23 26 46 46 3a 84 41 26 46 46 46 46 3a |:.A#&FF:.A&FFFF:|
000004d0 84 41 26 46 46 3a 84 41 28 26 46 46 2c 58 29 3a |.A&FF:.A(&FF,X):|
000004e0 84 41 28 26 46 46 29 2c 59 3a 84 41 26 46 46 2c |.A(&FF),Y:.A&FF,|
000004f0 58 3a 84 41 26 46 46 46 46 2c 58 3a 84 41 26 46 |X:.A&FFFF,X:.A&F|
00000500 46 46 46 2c 59 0d 01 54 13 50 48 41 3a 50 48 50 |FFF,Y..T.PHA:PHP|
00000510 3a 50 4c 41 3a 50 4c 50 0d 01 5e 2d 52 4f 4c 26 |:PLA:PLP..^-ROL&|
00000520 46 46 46 46 3a 52 4f 4c 26 46 46 3a 52 4f 4c 20 |FFFF:ROL&FF:ROL |
00000530 41 3a 52 4f 4c 26 46 46 2c 58 3a 52 4f 4c 26 46 |A:ROL&FF,X:ROL&F|
00000540 46 46 46 2c 58 0d 01 68 2d 52 4f 52 26 46 46 46 |FFF,X..h-ROR&FFF|
00000550 46 3a 52 4f 52 26 46 46 3a 52 4f 52 20 41 3a 52 |F:ROR&FF:ROR A:R|
00000560 4f 52 26 46 46 2c 58 3a 52 4f 52 26 46 46 46 46 |OR&FF,X:ROR&FFFF|
00000570 2c 58 0d 01 72 0b 52 54 49 3a 52 54 53 0d 01 7c |,X..r.RTI:RTS..||
00000580 50 53 42 43 23 26 46 46 3a 53 42 43 26 46 46 46 |PSBC#&FF:SBC&FFF|
00000590 46 3a 53 42 43 26 46 46 3a 53 42 43 28 26 46 46 |F:SBC&FF:SBC(&FF|
000005a0 2c 58 29 3a 53 42 43 28 26 46 46 29 2c 59 3a 53 |,X):SBC(&FF),Y:S|
000005b0 42 43 26 46 46 2c 58 3a 53 42 43 26 46 46 46 46 |BC&FF,X:SBC&FFFF|
000005c0 2c 58 3a 53 42 43 26 46 46 46 46 2c 59 0d 01 86 |,X:SBC&FFFF,Y...|
000005d0 0f 53 45 43 3a 53 45 44 3a 53 45 49 0d 01 90 48 |.SEC:SED:SEI...H|
000005e0 53 54 41 26 46 46 46 46 3a 53 54 41 26 46 46 3a |STA&FFFF:STA&FF:|
000005f0 53 54 41 28 26 46 46 2c 58 29 3a 53 54 41 28 26 |STA(&FF,X):STA(&|
00000600 46 46 29 2c 59 3a 53 54 41 26 46 46 2c 58 3a 53 |FF),Y:STA&FF,X:S|
00000610 54 41 26 46 46 46 46 2c 58 3a 53 54 41 26 46 46 |TA&FFFF,X:STA&FF|
00000620 46 46 2c 59 0d 01 9a 35 53 54 58 26 46 46 46 46 |FF,Y...5STX&FFFF|
00000630 3a 53 54 58 26 46 46 3a 53 54 58 26 46 46 2c 59 |:STX&FF:STX&FF,Y|
00000640 3a 53 54 59 26 46 46 46 46 3a 53 54 59 26 46 46 |:STY&FFFF:STY&FF|
00000650 3a 53 54 59 26 46 46 2c 58 0d 01 a4 1b 54 41 58 |:STY&FF,X....TAX|
00000660 3a 54 41 59 3a 54 53 58 3a 54 58 41 3a 54 58 53 |:TAY:TSX:TXA:TXS|
00000670 3a 54 59 41 0d 01 ae 05 5d 0d 01 b8 08 f1 20 50 |:TYA....]..... P|
00000680 25 0d 01 c2 0b 5b 4f 50 54 20 4f 50 0d 01 cc 15 |%....[OPT OP....|
00000690 54 53 58 3a 53 54 58 20 54 45 4d 50 53 54 41 43 |TSX:STX TEMPSTAC|
000006a0 4b 0d 01 e0 27 4c 44 41 23 30 3a 53 54 41 20 43 |K...'LDA#0:STA C|
000006b0 4f 4e 42 4c 4b 3a 4c 44 41 23 36 3a 53 54 41 20 |ONBLK:LDA#6:STA |
000006c0 43 4f 4e 42 4c 4b 2b 31 0d 01 f4 17 4c 44 41 23 |CONBLK+1....LDA#|
000006d0 97 28 22 44 22 29 3a 53 54 41 20 44 49 53 50 0d |.("D"):STA DISP.|
000006e0 02 08 13 4c 44 58 23 28 53 54 31 20 83 20 32 35 |...LDX#(ST1 . 25|
000006f0 36 29 0d 02 12 13 4c 44 59 23 28 53 54 31 20 81 |6)....LDY#(ST1 .|
00000700 20 32 35 36 29 0d 02 1c 0e 4a 53 52 20 4f 55 54 | 256)....JSR OUT|
00000710 50 55 54 0d 02 30 1a 4c 44 41 23 34 3a 4c 44 58 |PUT..0.LDA#4:LDX|
00000720 23 31 3a 4a 53 52 20 4f 53 42 59 54 45 0d 02 4e |#1:JSR OSBYTE..N|
00000730 13 2e 4c 35 20 4a 53 52 20 44 49 53 50 4c 41 59 |..L5 JSR DISPLAY|
00000740 0d 02 62 11 2e 4c 37 20 4a 53 52 20 4b 45 59 49 |..b..L7 JSR KEYI|
00000750 4e 0d 02 76 17 43 4d 50 23 97 28 22 44 22 29 3a |N..v.CMP#.("D"):|
00000760 42 4e 45 20 4e 4f 4e 44 0d 02 8a 18 2e 53 54 44 |BNE NOND.....STD|
00000770 20 53 54 41 20 44 49 53 50 3a 4a 4d 50 20 4c 35 | STA DISP:JMP L5|
00000780 0d 02 94 1c 2e 4e 4f 4e 44 20 43 4d 50 23 97 28 |.....NOND CMP#.(|
00000790 22 4c 22 29 3a 42 45 51 20 53 54 44 0d 02 b2 18 |"L"):BEQ STD....|
000007a0 43 4d 50 20 23 97 28 22 48 22 29 3a 42 4e 45 20 |CMP #.("H"):BNE |
000007b0 4e 4f 4e 48 0d 02 c6 20 2e 48 47 49 4e 20 4c 44 |NONH... .HGIN LD|
000007c0 58 23 31 35 3a 4c 44 59 23 32 3a 4a 53 52 20 53 |X#15:LDY#2:JSR S|
000007d0 45 54 41 42 0d 02 da 29 4c 44 41 23 34 3a 4c 44 |ETAB...)LDA#4:LD|
000007e0 58 23 97 28 22 30 22 29 3a 4c 44 59 23 97 28 22 |X#.("0"):LDY#.("|
000007f0 46 22 29 3a 4a 53 52 20 53 54 52 49 4e 0d 02 ee |F"):JSR STRIN...|
00000800 22 4a 53 52 20 44 48 45 58 3a 42 43 43 48 47 49 |"JSR DHEX:BCCHGI|
00000810 4e 3a 4c 44 41 20 44 48 3a 53 54 41 20 48 49 0d |N:LDA DH:STA HI.|
00000820 03 02 2c 4c 44 41 26 36 30 32 3a 53 54 41 26 36 |..,LDA&602:STA&6|
00000830 30 30 3a 4c 44 41 26 36 30 33 3a 53 54 41 26 36 |00:LDA&603:STA&6|
00000840 30 31 3a 4a 53 52 20 44 48 45 58 0d 03 16 21 42 |01:JSR DHEX...!B|
00000850 43 43 20 48 47 49 4e 3a 4c 44 41 20 44 48 3a 53 |CC HGIN:LDA DH:S|
00000860 54 41 20 4c 4f 3a 4a 4d 50 20 4c 35 0d 03 20 1c |TA LO:JMP L5.. .|
00000870 2e 4e 4f 4e 48 20 43 4d 50 23 97 28 22 46 22 29 |.NONH CMP#.("F")|
00000880 3a 42 4e 45 20 4e 4f 46 0d 03 34 20 2e 46 47 49 |:BNE NOF..4 .FGI|
00000890 4e 20 4c 44 58 23 31 35 3a 4c 44 59 23 33 3a 4a |N LDX#15:LDY#3:J|
000008a0 53 52 20 53 45 54 41 42 0d 03 3e 29 4c 44 41 23 |SR SETAB..>)LDA#|
000008b0 32 3a 4c 44 58 23 97 28 22 30 22 29 3a 4c 44 59 |2:LDX#.("0"):LDY|
000008c0 23 97 28 22 46 22 29 3a 4a 53 52 20 53 54 52 49 |#.("F"):JSR STRI|
000008d0 4e 0d 03 48 34 4a 53 52 20 44 48 45 58 3a 42 43 |N..H4JSR DHEX:BC|
000008e0 43 20 46 47 49 4e 3a 4c 44 41 20 44 49 53 50 3a |C FGIN:LDA DISP:|
000008f0 43 4d 50 23 97 28 22 4c 22 29 3a 42 4e 45 20 4f |CMP#.("L"):BNE O|
00000900 56 53 57 41 50 0d 03 52 34 4c 44 41 20 4f 4c 4f |VSWAP..R4LDA OLO|
00000910 3a 53 45 43 3a 53 42 43 20 4f 55 4d 42 3a 53 54 |:SEC:SBC OUMB:ST|
00000920 41 20 4c 4f 3a 4c 44 41 20 4f 48 49 3a 53 42 43 |A LO:LDA OHI:SBC|
00000930 23 30 3a 53 54 41 20 48 49 0d 03 5c 0b 2e 4f 56 |#0:STA HI..\..OV|
00000940 53 57 41 50 0d 03 66 48 4c 44 59 23 30 3a 4c 44 |SWAP..fHLDY#0:LD|
00000950 41 20 44 48 3a 2e 46 4c 4f 4f 50 20 49 4e 43 20 |A DH:.FLOOP INC |
00000960 4c 4f 3a 42 4e 45 20 4f 56 48 49 3a 49 4e 43 20 |LO:BNE OVHI:INC |
00000970 48 49 3a 2e 4f 56 48 49 20 43 4d 50 28 4c 4f 29 |HI:.OVHI CMP(LO)|
00000980 2c 59 3a 42 4e 45 20 46 4c 4f 4f 50 0d 03 70 0a |,Y:BNE FLOOP..p.|
00000990 4a 4d 50 20 4c 35 0d 03 8e 2e 2e 4e 4f 46 20 4c |JMP L5.....NOF L|
000009a0 44 58 20 44 49 53 50 3a 43 50 58 23 97 28 22 4c |DX DISP:CPX#.("L|
000009b0 22 29 3a 42 4e 45 20 4e 4f 4e 46 3a 4a 4d 50 20 |"):BNE NONF:JMP |
000009c0 4c 43 4f 4d 0d 03 b6 1b 2e 4e 4f 4e 46 20 43 4d |LCOM.....NONF CM|
000009d0 50 23 26 38 38 3a 42 4e 45 20 4e 4c 45 46 54 0d |P#&88:BNE NLEFT.|
000009e0 03 ca 2c 4c 44 41 20 4c 4f 3a 42 4e 45 20 44 45 |..,LDA LO:BNE DE|
000009f0 31 3a 44 45 43 20 48 49 3a 2e 44 45 31 20 44 45 |1:DEC HI:.DE1 DE|
00000a00 43 20 4c 4f 3a 4a 4d 50 20 4c 35 0d 03 de 1a 2e |C LO:JMP L5.....|
00000a10 4e 4c 45 46 54 20 43 4d 50 23 26 38 39 3a 42 4e |NLEFT CMP#&89:BN|
00000a20 45 20 4e 52 54 0d 03 f2 25 49 4e 43 20 4c 4f 3a |E NRT...%INC LO:|
00000a30 42 4e 45 20 44 45 32 3a 49 4e 43 20 48 49 3a 2e |BNE DE2:INC HI:.|
00000a40 44 45 32 20 4a 4d 50 20 4c 35 0d 04 06 1a 2e 4e |DE2 JMP L5.....N|
00000a50 52 54 20 43 4d 50 23 26 38 41 3a 42 4e 45 20 4e |RT CMP#&8A:BNE N|
00000a60 44 4f 57 4e 0d 04 1a 1b 4c 44 41 20 4c 4f 3a 43 |DOWN....LDA LO:C|
00000a70 4c 43 3a 41 44 43 23 38 3a 53 54 41 20 4c 4f 0d |LC:ADC#8:STA LO.|
00000a80 04 24 1e 4c 44 41 20 48 49 3a 41 44 43 23 30 3a |.$.LDA HI:ADC#0:|
00000a90 53 54 41 20 48 49 3a 4a 4d 50 20 4c 35 0d 04 38 |STA HI:JMP L5..8|
00000aa0 1c 2e 4e 44 4f 57 4e 20 43 4d 50 23 26 38 42 3a |..NDOWN CMP#&8B:|
00000ab0 42 4e 45 20 4e 4d 4f 56 45 0d 04 4c 1b 4c 44 41 |BNE NMOVE..L.LDA|
00000ac0 20 4c 4f 3a 53 45 43 3a 53 42 43 23 38 3a 53 54 | LO:SEC:SBC#8:ST|
00000ad0 41 20 4c 4f 0d 04 56 1e 4c 44 41 20 48 49 3a 53 |A LO..V.LDA HI:S|
00000ae0 42 43 23 30 3a 53 54 41 20 48 49 3a 4a 4d 50 20 |BC#0:STA HI:JMP |
00000af0 4c 35 0d 04 74 1e 2e 4e 4d 4f 56 45 20 43 4d 50 |L5..t..NMOVE CMP|
00000b00 23 97 28 22 41 22 29 3a 42 4e 45 20 4e 4f 4e 41 |#.("A"):BNE NONA|
00000b10 0d 04 88 10 2e 41 47 49 4e 20 4c 44 59 23 31 34 |.....AGIN LDY#14|
00000b20 0d 04 9c 27 4c 44 41 20 41 43 52 3a 41 53 4c 20 |...'LDA ACR:ASL |
00000b30 41 3a 43 4c 43 3a 41 44 43 20 41 43 52 3a 43 4c |A:CLC:ADC ACR:CL|
00000b40 43 3a 41 44 43 23 36 0d 04 b0 11 54 41 58 3a 4a |C:ADC#6....TAX:J|
00000b50 53 52 20 53 45 54 41 42 0d 04 c4 29 4c 44 41 23 |SR SETAB...)LDA#|
00000b60 32 3a 4c 44 58 23 97 28 22 30 22 29 3a 4c 44 59 |2:LDX#.("0"):LDY|
00000b70 23 97 28 22 46 22 29 3a 4a 53 52 20 53 54 52 49 |#.("F"):JSR STRI|
00000b80 4e 0d 04 d8 2d 4a 53 52 20 44 48 45 58 3a 42 43 |N...-JSR DHEX:BC|
00000b90 43 20 41 47 49 4e 3a 4c 44 41 20 44 48 3a 4c 44 |C AGIN:LDA DH:LD|
00000ba0 59 23 30 3a 53 54 41 20 28 4c 4f 29 2c 59 0d 04 |Y#0:STA (LO),Y..|
00000bb0 e2 0a 4a 4d 50 20 4c 35 0d 05 0a 27 2e 44 48 45 |..JMP L5...'.DHE|
00000bc0 58 20 4c 44 41 26 36 30 30 3a 43 4d 50 20 23 97 |X LDA&600:CMP #.|
00000bd0 28 22 39 22 29 2b 31 3a 42 43 53 20 41 4c 31 0d |("9")+1:BCS AL1.|
00000be0 05 14 11 80 23 26 30 46 3a 42 43 43 20 54 49 50 |....#&0F:BCC TIP|
00000bf0 0d 05 1e 2d 2e 41 4c 31 20 43 4d 50 20 23 97 28 |...-.AL1 CMP #.(|
00000c00 22 41 22 29 3a 42 43 43 20 45 52 48 45 58 3a 53 |"A"):BCC ERHEX:S|
00000c10 42 43 20 23 97 28 22 41 22 29 2d 31 30 0d 05 32 |BC #.("A")-10..2|
00000c20 27 2e 54 49 50 20 41 53 4c 20 41 3a 41 53 4c 20 |'.TIP ASL A:ASL |
00000c30 41 3a 41 53 4c 20 41 3a 41 53 4c 20 41 3a 53 54 |A:ASL A:ASL A:ST|
00000c40 41 20 44 48 0d 05 3c 21 4c 44 41 26 36 30 31 3a |A DH..<!LDA&601:|
00000c50 43 4d 50 20 23 97 28 22 39 22 29 2b 31 3a 42 43 |CMP #.("9")+1:BC|
00000c60 53 20 41 4c 32 0d 05 46 11 80 23 26 30 46 3a 42 |S AL2..F..#&0F:B|
00000c70 43 43 20 42 4f 54 0d 05 50 2d 2e 41 4c 32 20 43 |CC BOT..P-.AL2 C|
00000c80 4d 50 20 23 97 28 22 41 22 29 3a 42 43 43 20 45 |MP #.("A"):BCC E|
00000c90 52 48 45 58 3a 53 42 43 20 23 97 28 22 41 22 29 |RHEX:SBC #.("A")|
00000ca0 2d 31 30 0d 05 64 19 2e 42 4f 54 20 84 41 20 44 |-10..d..BOT .A D|
00000cb0 48 3a 53 54 41 20 44 48 3a 53 45 43 0d 05 78 0e |H:STA DH:SEC..x.|
00000cc0 2e 45 52 48 45 58 20 52 54 53 0d 05 a0 1d 2e 4e |.ERHEX RTS.....N|
00000cd0 4f 4e 41 20 43 4d 50 20 23 97 28 22 53 22 29 42 |ONA CMP #.("S")B|
00000ce0 4e 45 20 4e 4f 4e 53 0d 05 b4 31 2e 53 47 49 4e |NE NONS...1.SGIN|
00000cf0 20 4c 44 59 23 31 34 3a 4c 44 41 20 41 43 52 3a | LDY#14:LDA ACR:|
00000d00 43 4c 43 3a 41 44 43 23 33 30 3a 54 41 58 3a 4a |CLC:ADC#30:TAX:J|
00000d10 53 52 20 53 45 54 41 42 0d 05 c8 2d 4c 44 41 23 |SR SETAB...-LDA#|
00000d20 32 35 35 3a 4c 44 58 20 23 97 28 22 20 22 29 3a |255:LDX #.(" "):|
00000d30 4c 44 59 20 23 97 28 22 7e 22 29 3a 4a 53 52 20 |LDY #.("~"):JSR |
00000d40 53 54 52 49 4e 0d 05 dc 0f 4c 44 58 23 30 3a 4c |STRIN....LDX#0:L|
00000d50 44 59 23 30 0d 05 f0 25 2e 4c 4f 50 20 4c 44 41 |DY#0...%.LOP LDA|
00000d60 26 36 30 30 2c 58 3a 43 4d 50 23 26 30 44 3a 42 |&600,X:CMP#&0D:B|
00000d70 45 51 20 46 49 4e 4c 4f 50 0d 05 fa 1e 53 54 41 |EQ FINLOP....STA|
00000d80 20 28 4c 4f 29 2c 59 3a 49 4e 59 3a 49 4e 58 3a | (LO),Y:INY:INX:|
00000d90 42 4e 45 20 4c 4f 50 0d 06 04 12 2e 46 49 4e 4c |BNE LOP.....FINL|
00000da0 4f 50 20 4a 4d 50 20 4c 35 0d 06 22 09 2e 4e 4f |OP JMP L5.."..NO|
00000db0 4e 53 0d 06 2c 0a 4a 4d 50 20 4c 37 0d 06 54 1b |NS..,.JMP L7..T.|
00000dc0 2e 4c 43 4f 4d 20 43 4d 50 23 26 30 44 3a 42 4e |.LCOM CMP#&0D:BN|
00000dd0 45 20 4e 4f 4e 43 52 0d 06 68 28 4c 44 41 20 4f |E NONCR..h(LDA O|
00000de0 4c 4f 3a 53 54 41 20 4c 4f 3a 4c 44 41 20 4f 48 |LO:STA LO:LDA OH|
00000df0 49 3a 53 54 41 20 48 49 3a 4a 4d 50 20 4c 35 0d |I:STA HI:JMP L5.|
00000e00 06 7c 1b 2e 4e 4f 4e 43 52 20 43 4d 50 23 26 38 |.|..NONCR CMP#&8|
00000e10 42 3a 42 4e 45 20 4e 4f 4e 53 0d 06 90 28 4c 44 |B:BNE NONS...(LD|
00000e20 41 20 4f 4c 4f 3a 49 4e 43 20 4f 55 4d 42 3a 53 |A OLO:INC OUMB:S|
00000e30 45 43 3a 53 42 43 20 4f 55 4d 42 3a 53 54 41 20 |EC:SBC OUMB:STA |
00000e40 4c 4f 0d 06 9a 1f 4c 44 41 20 4f 48 49 3a 53 42 |LO....LDA OHI:SB|
00000e50 43 23 30 3a 53 54 41 20 48 49 3a 4a 4d 50 20 4c |C#0:STA HI:JMP L|
00000e60 35 0d 06 b8 18 2e 44 49 53 20 4c 44 58 23 28 53 |5.....DIS LDX#(S|
00000e70 54 32 20 83 20 32 35 36 29 0d 06 c2 13 4c 44 59 |T2 . 256)....LDY|
00000e80 23 28 53 54 32 20 81 20 32 35 36 29 0d 06 d6 0e |#(ST2 . 256)....|
00000e90 4a 53 52 20 4f 55 54 50 55 54 0d 06 ea 15 4c 44 |JSR OUTPUT....LD|
00000ea0 41 23 31 36 3a 53 54 41 20 44 4c 49 4e 45 53 0d |A#16:STA DLINES.|
00000eb0 06 f4 0b 2e 4c 49 4e 4c 4f 50 0d 07 08 23 4c 44 |....LINLOP...#LD|
00000ec0 41 20 48 49 3a 4a 53 52 20 48 45 58 3a 4c 44 41 |A HI:JSR HEX:LDA|
00000ed0 20 4c 4f 3a 4a 53 52 20 48 45 58 53 50 0d 07 26 | LO:JSR HEXSP..&|
00000ee0 0f 4c 44 59 23 30 3a 4c 44 58 23 33 0d 07 30 2f |.LDY#0:LDX#3..0/|
00000ef0 2e 48 41 4c 4f 50 20 4c 44 41 28 4c 4f 29 2c 59 |.HALOP LDA(LO),Y|
00000f00 3a 53 54 41 20 48 41 2c 59 3a 49 4e 59 3a 44 45 |:STA HA,Y:INY:DE|
00000f10 58 3a 42 4e 45 20 48 41 4c 4f 50 0d 07 44 23 4c |X:BNE HALOP..D#L|
00000f20 44 58 20 48 41 3a 4c 44 41 20 54 59 50 45 2c 58 |DX HA:LDA TYPE,X|
00000f30 3a 54 41 58 3a 4c 44 41 20 4e 55 4d 2c 58 0d 07 |:TAX:LDA NUM,X..|
00000f40 58 32 53 54 41 20 4e 55 4d 42 3a 43 4c 43 3a 41 |X2STA NUMB:CLC:A|
00000f50 44 43 20 4c 4f 3a 53 54 41 20 4c 4f 3a 4c 44 41 |DC LO:STA LO:LDA|
00000f60 23 30 3a 41 44 43 20 48 49 3a 53 54 41 20 48 49 |#0:ADC HI:STA HI|
00000f70 0d 07 6c 33 4c 44 58 20 4e 55 4d 42 3a 4c 44 59 |..l3LDX NUMB:LDY|
00000f80 23 33 3a 4c 44 41 20 48 41 3a 4a 53 52 20 48 45 |#3:LDA HA:JSR HE|
00000f90 58 53 50 3a 44 45 59 3a 44 45 58 3a 42 45 51 20 |XSP:DEY:DEX:BEQ |
00000fa0 50 41 44 0d 07 76 24 4c 44 41 20 48 42 3a 4a 53 |PAD..v$LDA HB:JS|
00000fb0 52 20 48 45 58 53 50 3a 44 45 59 3a 44 45 58 3a |R HEXSP:DEY:DEX:|
00000fc0 42 45 51 20 50 41 44 0d 07 80 21 4c 44 41 20 48 |BEQ PAD...!LDA H|
00000fd0 43 3a 4a 53 52 20 48 45 58 53 50 3a 44 45 58 3a |C:JSR HEXSP:DEX:|
00000fe0 42 45 51 20 4d 4e 45 4d 0d 07 94 10 2e 50 41 44 |BEQ MNEM.....PAD|
00000ff0 20 54 59 41 3a 50 48 41 0d 07 9e 2e 4c 44 58 23 | TYA:PHA....LDX#|
00001000 28 53 54 34 20 83 20 32 35 36 29 3a 4c 44 59 23 |(ST4 . 256):LDY#|
00001010 28 53 54 34 20 81 20 32 35 36 29 3a 4a 53 52 20 |(ST4 . 256):JSR |
00001020 4f 55 54 50 55 54 0d 07 a8 17 50 4c 41 3a 54 41 |OUTPUT....PLA:TA|
00001030 59 3a 44 45 59 3a 42 4e 45 20 50 41 44 0d 07 bc |Y:DEY:BNE PAD...|
00001040 20 2e 4d 4e 45 4d 20 4c 44 41 20 23 97 28 22 20 | .MNEM LDA #.(" |
00001050 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d 07 d0 |"):JSR OSASCI...|
00001060 29 4c 44 58 20 48 41 3a 4c 44 41 20 48 41 53 48 |)LDX HA:LDA HASH|
00001070 2c 58 3a 41 53 4c 20 41 3a 41 53 4c 20 41 3a 53 |,X:ASL A:ASL A:S|
00001080 54 41 20 4f 55 54 0d 07 e4 2a 4c 44 41 23 28 53 |TA OUT...*LDA#(S|
00001090 54 52 49 4e 47 20 81 20 32 35 36 29 3a 53 54 41 |TRING . 256):STA|
000010a0 20 50 55 54 3a 4c 44 58 23 34 3a 4c 44 59 23 30 | PUT:LDX#4:LDY#0|
000010b0 0d 07 f8 35 2e 4d 4e 4d 4c 4f 50 20 4c 44 41 20 |...5.MNMLOP LDA |
000010c0 28 4f 55 54 29 2c 59 3a 4a 53 52 20 4f 53 41 53 |(OUT),Y:JSR OSAS|
000010d0 43 49 3a 49 4e 59 3a 44 45 58 3a 42 4e 45 20 4d |CI:INY:DEX:BNE M|
000010e0 4e 4d 4c 4f 50 0d 08 02 1a 4c 44 41 20 23 97 28 |NMLOP....LDA #.(|
000010f0 22 20 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d |" "):JSR OSASCI.|
00001100 08 16 24 4c 44 58 20 48 41 3a 4c 44 41 20 54 59 |..$LDX HA:LDA TY|
00001110 50 45 2c 58 3a 43 4d 50 23 31 3a 42 4e 45 20 4e |PE,X:CMP#1:BNE N|
00001120 4f 44 31 0d 08 2a 31 4c 44 41 20 23 97 28 22 23 |OD1..*1LDA #.("#|
00001130 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 3a 4c 44 |"):JSR OSASCI:LD|
00001140 41 20 23 97 28 22 26 22 29 3a 4a 53 52 20 4f 53 |A #.("&"):JSR OS|
00001150 41 53 43 49 0d 08 3e 25 4c 44 41 20 48 42 3a 4a |ASCI..>%LDA HB:J|
00001160 53 52 20 48 45 58 53 50 3a 4c 44 59 23 35 3a 4a |SR HEXSP:LDY#5:J|
00001170 4d 50 20 4e 44 4c 49 4e 45 0d 08 52 18 2e 4e 4f |MP NDLINE..R..NO|
00001180 44 31 20 43 4d 50 23 32 3a 42 4e 45 20 4e 4f 44 |D1 CMP#2:BNE NOD|
00001190 32 0d 08 66 29 4c 44 41 20 23 97 28 22 26 22 29 |2..f)LDA #.("&")|
000011a0 3a 4a 53 52 20 4f 53 41 53 43 49 3a 4c 44 41 20 |:JSR OSASCI:LDA |
000011b0 48 43 3a 4a 53 52 20 48 45 58 0d 08 70 25 4c 44 |HC:JSR HEX..p%LD|
000011c0 41 20 48 42 3a 4a 53 52 20 48 45 58 53 50 3a 4c |A HB:JSR HEXSP:L|
000011d0 44 59 23 34 3a 4a 4d 50 20 4e 44 4c 49 4e 45 0d |DY#4:JMP NDLINE.|
000011e0 08 84 18 2e 4e 4f 44 32 20 43 4d 50 23 33 3a 42 |....NOD2 CMP#3:B|
000011f0 4e 45 20 4e 4f 44 33 0d 08 98 2b 4c 44 41 20 23 |NE NOD3...+LDA #|
00001200 97 28 22 26 22 29 3a 4a 53 52 20 4f 53 41 53 43 |.("&"):JSR OSASC|
00001210 49 3a 4c 44 41 20 48 42 3a 4a 53 52 20 48 45 58 |I:LDA HB:JSR HEX|
00001220 53 50 0d 08 a2 14 4c 44 59 23 36 3a 4a 4d 50 20 |SP....LDY#6:JMP |
00001230 4e 44 4c 49 4e 45 0d 08 b6 18 2e 4e 4f 44 33 20 |NDLINE.....NOD3 |
00001240 43 4d 50 23 34 3a 42 4e 45 20 4e 4f 44 34 0d 08 |CMP#4:BNE NOD4..|
00001250 ca 2b 4c 44 41 20 23 97 28 22 41 22 29 3a 4a 53 |.+LDA #.("A"):JS|
00001260 52 20 4f 53 41 53 43 49 3a 4c 44 59 23 39 3a 4a |R OSASCI:LDY#9:J|
00001270 4d 50 20 4e 44 4c 49 4e 45 0d 08 de 18 2e 4e 4f |MP NDLINE.....NO|
00001280 44 34 3a 43 4d 50 23 35 3a 42 4e 45 20 4e 4f 44 |D4:CMP#5:BNE NOD|
00001290 35 0d 08 f2 15 4c 44 59 23 31 30 3a 4a 4d 50 20 |5....LDY#10:JMP |
000012a0 4e 44 4c 49 4e 45 0d 09 06 18 2e 4e 4f 44 35 20 |NDLINE.....NOD5 |
000012b0 43 4d 50 23 36 3a 42 4e 45 20 4e 4f 44 36 0d 09 |CMP#6:BNE NOD6..|
000012c0 1a 31 4c 44 41 20 23 97 28 22 28 22 29 3a 4a 53 |.1LDA #.("("):JS|
000012d0 52 20 4f 53 41 53 43 49 3a 4c 44 41 20 23 97 28 |R OSASCI:LDA #.(|
000012e0 22 26 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d |"&"):JSR OSASCI.|
000012f0 09 24 29 4c 44 41 20 48 42 3a 4a 53 52 20 48 45 |.$)LDA HB:JSR HE|
00001300 58 3a 4c 44 41 20 23 97 28 22 2c 22 29 3a 4a 53 |X:LDA #.(","):JS|
00001310 52 20 4f 53 41 53 43 49 0d 09 2e 31 4c 44 41 20 |R OSASCI...1LDA |
00001320 23 97 28 22 58 22 29 3a 4a 53 52 20 4f 53 41 53 |#.("X"):JSR OSAS|
00001330 43 49 3a 4c 44 41 20 23 97 28 22 29 22 29 3a 4a |CI:LDA #.(")"):J|
00001340 53 52 20 4f 53 41 53 43 49 0d 09 38 14 4c 44 59 |SR OSASCI..8.LDY|
00001350 23 33 3a 4a 4d 50 20 4e 44 4c 49 4e 45 0d 09 4c |#3:JMP NDLINE..L|
00001360 18 2e 4e 4f 44 36 20 43 4d 50 23 37 3a 42 4e 45 |..NOD6 CMP#7:BNE|
00001370 20 4e 4f 44 37 0d 09 60 2f 4c 44 41 23 97 28 22 | NOD7..`/LDA#.("|
00001380 28 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 3a 4c |("):JSR OSASCI:L|
00001390 44 41 23 97 28 22 26 22 29 3a 4a 53 52 20 4f 53 |DA#.("&"):JSR OS|
000013a0 41 53 43 49 0d 09 6a 28 4c 44 41 20 48 42 3a 4a |ASCI..j(LDA HB:J|
000013b0 53 52 20 48 45 58 3a 4c 44 41 23 97 28 22 29 22 |SR HEX:LDA#.(")"|
000013c0 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d 09 74 2f |):JSR OSASCI..t/|
000013d0 4c 44 41 23 97 28 22 2c 22 29 3a 4a 53 52 20 4f |LDA#.(","):JSR O|
000013e0 53 41 53 43 49 3a 4c 44 41 23 97 28 22 59 22 29 |SASCI:LDA#.("Y")|
000013f0 3a 4a 53 52 20 4f 53 41 53 43 49 0d 09 7e 14 4c |:JSR OSASCI..~.L|
00001400 44 59 23 33 3a 4a 4d 50 20 4e 44 4c 49 4e 45 0d |DY#3:JMP NDLINE.|
00001410 09 92 18 2e 4e 4f 44 37 20 43 4d 50 23 38 3a 42 |....NOD7 CMP#8:B|
00001420 4e 45 20 4e 4f 44 38 0d 09 a6 28 4c 44 41 23 97 |NE NOD8...(LDA#.|
00001430 28 22 26 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 |("&"):JSR OSASCI|
00001440 3a 4c 44 41 20 48 42 3a 4a 53 52 20 48 45 58 0d |:LDA HB:JSR HEX.|
00001450 09 b0 2f 4c 44 41 23 97 28 22 2c 22 29 3a 4a 53 |../LDA#.(","):JS|
00001460 52 20 4f 53 41 53 43 49 3a 4c 44 41 23 97 28 22 |R OSASCI:LDA#.("|
00001470 58 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d 09 |X"):JSR OSASCI..|
00001480 ba 14 4c 44 59 23 35 3a 4a 4d 50 20 4e 44 4c 49 |..LDY#5:JMP NDLI|
00001490 4e 45 0d 09 ce 18 2e 4e 4f 44 38 20 43 4d 50 23 |NE.....NOD8 CMP#|
000014a0 39 3a 42 4e 45 20 4e 4f 44 39 0d 09 e2 28 4c 44 |9:BNE NOD9...(LD|
000014b0 41 23 97 28 22 26 22 29 3a 4a 53 52 20 4f 53 41 |A#.("&"):JSR OSA|
000014c0 53 43 49 3a 4c 44 41 20 48 43 3a 4a 53 52 20 48 |SCI:LDA HC:JSR H|
000014d0 45 58 0d 09 ec 28 4c 44 41 20 48 42 3a 4a 53 52 |EX...(LDA HB:JSR|
000014e0 20 48 45 58 3a 4c 44 41 23 97 28 22 2c 22 29 3a | HEX:LDA#.(","):|
000014f0 4a 53 52 20 4f 53 41 53 43 49 0d 09 f6 19 4c 44 |JSR OSASCI....LD|
00001500 41 23 97 28 22 58 22 29 3a 4a 53 52 20 4f 53 41 |A#.("X"):JSR OSA|
00001510 53 43 49 0d 0a 00 14 4c 44 59 23 33 3a 4a 4d 50 |SCI....LDY#3:JMP|
00001520 20 4e 44 4c 49 4e 45 0d 0a 14 19 2e 4e 4f 44 39 | NDLINE.....NOD9|
00001530 20 43 4d 50 23 26 41 3a 42 4e 45 20 4e 4f 44 41 | CMP#&A:BNE NODA|
00001540 0d 0a 28 28 4c 44 41 23 97 28 22 26 22 29 3a 4a |..((LDA#.("&"):J|
00001550 53 52 20 4f 53 41 53 43 49 3a 4c 44 41 20 48 43 |SR OSASCI:LDA HC|
00001560 3a 4a 53 52 20 48 45 58 0d 0a 32 28 4c 44 41 20 |:JSR HEX..2(LDA |
00001570 48 42 3a 4a 53 52 20 48 45 58 3a 4c 44 41 23 97 |HB:JSR HEX:LDA#.|
00001580 28 22 2c 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 |(","):JSR OSASCI|
00001590 0d 0a 3c 19 4c 44 41 23 97 28 22 59 22 29 3a 4a |..<.LDA#.("Y"):J|
000015a0 53 52 20 4f 53 41 53 43 49 0d 0a 46 14 4c 44 59 |SR OSASCI..F.LDY|
000015b0 23 33 3a 4a 4d 50 20 4e 44 4c 49 4e 45 0d 0a 5a |#3:JMP NDLINE..Z|
000015c0 19 2e 4e 4f 44 41 20 43 4d 50 23 26 42 3a 42 4e |..NODA CMP#&B:BN|
000015d0 45 20 4e 4f 44 42 0d 0a 6e 19 4c 44 41 23 97 28 |E NODB..n.LDA#.(|
000015e0 22 26 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d |"&"):JSR OSASCI.|
000015f0 0a 82 1b 4c 44 41 20 48 42 3a 43 4d 50 23 26 37 |...LDA HB:CMP#&7|
00001600 46 3a 42 43 53 20 42 41 43 4b 0d 0a 96 2b 43 4c |F:BCS BACK...+CL|
00001610 43 3a 41 44 43 20 4c 4f 3a 50 48 41 3a 4c 44 41 |C:ADC LO:PHA:LDA|
00001620 23 30 3a 41 44 43 20 48 49 3a 43 4c 43 3a 42 43 |#0:ADC HI:CLC:BC|
00001630 43 20 52 45 4c 0d 0a aa 2e 2e 42 41 43 4b 20 82 |C REL.....BACK .|
00001640 23 32 35 35 3a 41 44 43 23 30 3a 53 54 41 26 37 |#255:ADC#0:STA&7|
00001650 30 3a 4c 44 41 20 4c 4f 3a 53 45 43 3a 53 42 43 |0:LDA LO:SEC:SBC|
00001660 26 37 30 0d 0a b4 14 50 48 41 3a 4c 44 41 20 48 |&70....PHA:LDA H|
00001670 49 3a 53 42 43 23 30 0d 0a c8 1e 2e 52 45 4c 20 |I:SBC#0.....REL |
00001680 4a 53 52 20 48 45 58 3a 50 4c 41 3a 4a 53 52 20 |JSR HEX:PLA:JSR |
00001690 48 45 58 53 50 0d 0a d2 14 4c 44 59 23 34 3a 4a |HEXSP....LDY#4:J|
000016a0 4d 50 20 4e 44 4c 49 4e 45 0d 0a e6 19 2e 4e 4f |MP NDLINE.....NO|
000016b0 44 42 20 43 4d 50 23 26 43 3a 42 4e 45 20 4e 4f |DB CMP#&C:BNE NO|
000016c0 44 43 0d 0a fa 2f 4c 44 41 23 97 28 22 28 22 29 |DC.../LDA#.("(")|
000016d0 3a 4a 53 52 20 4f 53 41 53 43 49 3a 4c 44 41 23 |:JSR OSASCI:LDA#|
000016e0 97 28 22 26 22 29 3a 4a 53 52 20 4f 53 41 53 43 |.("&"):JSR OSASC|
000016f0 49 0d 0b 04 21 4c 44 41 20 48 43 3a 4a 53 52 20 |I...!LDA HC:JSR |
00001700 48 45 58 3a 4c 44 41 20 48 42 3a 4a 53 52 20 48 |HEX:LDA HB:JSR H|
00001710 45 58 0d 0b 0e 2a 4c 44 41 23 97 28 22 29 22 29 |EX...*LDA#.(")")|
00001720 3a 4a 53 52 20 4f 53 41 53 43 49 3a 4c 44 59 23 |:JSR OSASCI:LDY#|
00001730 33 3a 4a 4d 50 20 4e 44 4c 49 4e 45 0d 0b 22 19 |3:JMP NDLINE..".|
00001740 2e 4e 4f 44 43 20 43 4d 50 23 26 44 3a 42 4e 45 |.NODC CMP#&D:BNE|
00001750 20 4e 4f 44 44 0d 0b 36 28 4c 44 41 23 97 28 22 | NODD..6(LDA#.("|
00001760 26 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 3a 4c |&"):JSR OSASCI:L|
00001770 44 41 20 48 42 3a 4a 53 52 20 48 45 58 0d 0b 40 |DA HB:JSR HEX..@|
00001780 2f 4c 44 41 23 97 28 22 2c 22 29 3a 4a 53 52 20 |/LDA#.(","):JSR |
00001790 4f 53 41 53 43 49 3a 4c 44 41 23 97 28 22 59 22 |OSASCI:LDA#.("Y"|
000017a0 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d 0b 4a 14 |):JSR OSASCI..J.|
000017b0 4c 44 59 23 35 3a 4a 4d 50 20 4e 44 4c 49 4e 45 |LDY#5:JMP NDLINE|
000017c0 0d 0b 5e 10 2e 4e 4f 44 44 20 4c 44 59 23 31 30 |..^..NODD LDY#10|
000017d0 0d 0b 72 30 2e 4e 44 4c 49 4e 45 20 4c 44 41 23 |..r0.NDLINE LDA#|
000017e0 97 28 22 20 22 29 3a 4a 53 52 20 4f 53 41 53 43 |.(" "):JSR OSASC|
000017f0 49 3a 44 45 59 3a 42 50 4c 20 4e 44 4c 49 4e 45 |I:DEY:BPL NDLINE|
00001800 0d 0b 86 12 4c 44 58 20 4e 55 4d 42 3a 4c 44 59 |....LDX NUMB:LDY|
00001810 23 30 0d 0b 90 33 2e 44 49 53 50 4c 4f 50 20 4c |#0...3.DISPLOP L|
00001820 44 41 20 48 41 2c 59 3a 4a 53 52 20 43 48 4f 55 |DA HA,Y:JSR CHOU|
00001830 54 3a 49 4e 59 3a 44 45 58 3a 42 4e 45 20 44 49 |T:INY:DEX:BNE DI|
00001840 53 50 4c 4f 50 0d 0b a4 32 4c 44 41 23 97 28 22 |SPLOP...2LDA#.("|
00001850 20 22 29 3a 2e 50 41 44 32 20 4a 53 52 20 4f 53 | "):.PAD2 JSR OS|
00001860 41 53 43 49 3a 49 4e 59 3a 43 50 59 23 34 3a 42 |ASCI:INY:CPY#4:B|
00001870 4e 45 20 50 41 44 32 0d 0b b8 27 4c 44 58 23 35 |NE PAD2...'LDX#5|
00001880 3a 2e 50 41 44 33 20 4a 53 52 20 4f 53 41 53 43 |:.PAD3 JSR OSASC|
00001890 49 3a 44 45 58 3a 42 4e 45 20 50 41 44 33 0d 0b |I:DEX:BNE PAD3..|
000018a0 d6 1f 4c 44 41 20 44 4c 49 4e 45 53 3a 43 4d 50 |..LDA DLINES:CMP|
000018b0 23 31 36 3a 42 4e 45 20 4f 56 4f 4c 44 0d 0b ea |#16:BNE OVOLD...|
000018c0 21 4c 44 41 20 4c 4f 3a 53 54 41 20 4f 4c 4f 3a |!LDA LO:STA OLO:|
000018d0 4c 44 41 20 48 49 3a 53 54 41 20 4f 48 49 0d 0b |LDA HI:STA OHI..|
000018e0 f4 15 4c 44 41 20 4e 55 4d 42 3a 53 54 41 20 4f |..LDA NUMB:STA O|
000018f0 55 4d 42 0d 0c 08 2b 2e 4f 56 4f 4c 44 20 44 45 |UMB...+.OVOLD DE|
00001900 43 20 44 4c 49 4e 45 53 3a 42 45 51 20 46 49 4e |C DLINES:BEQ FIN|
00001910 4c 49 4e 3a 4a 4d 50 20 4c 49 4e 4c 4f 50 0d 0c |LIN:JMP LINLOP..|
00001920 12 0f 2e 46 49 4e 4c 49 4e 20 52 54 53 0d 0c 3a |...FINLIN RTS..:|
00001930 23 2e 44 49 53 50 4c 41 59 20 4c 44 59 23 32 3a |#.DISPLAY LDY#2:|
00001940 4c 44 58 23 31 35 3a 4a 53 52 20 53 45 54 41 42 |LDX#15:JSR SETAB|
00001950 0d 0c 4e 24 4c 44 41 20 48 49 3a 4a 53 52 20 48 |..N$LDA HI:JSR H|
00001960 45 58 3a 4c 44 41 20 4c 4f 3a 4a 53 52 20 48 45 |EX:LDA LO:JSR HE|
00001970 58 53 50 3a 0d 0c 62 21 4c 44 41 20 44 49 53 50 |XSP:..b!LDA DISP|
00001980 3a 43 4d 50 23 97 28 22 4c 22 29 3a 42 45 51 20 |:CMP#.("L"):BEQ |
00001990 44 44 49 53 50 0d 0c 76 10 4a 53 52 20 53 48 4f |DDISP..v.JSR SHO|
000019a0 57 3a 52 54 53 0d 0c 8a 16 2e 44 44 49 53 50 20 |W:RTS.....DDISP |
000019b0 4a 53 52 20 44 49 53 3a 52 54 53 0d 0c b2 18 2e |JSR DIS:RTS.....|
000019c0 53 48 4f 57 20 4c 44 58 23 28 53 54 32 20 83 32 |SHOW LDX#(ST2 .2|
000019d0 35 36 29 0d 0c bc 12 4c 44 59 23 28 53 54 32 20 |56)....LDY#(ST2 |
000019e0 81 32 35 36 29 0d 0c d0 0e 4a 53 52 20 4f 55 54 |.256)....JSR OUT|
000019f0 50 55 54 0d 0c e4 22 4c 44 41 20 4c 4f 3a 80 23 |PUT..."LDA LO:.#|
00001a00 26 46 38 3a 53 45 43 3a 53 42 43 23 36 34 3a 53 |&F8:SEC:SBC#64:S|
00001a10 54 41 20 55 50 0d 0c ee 18 4c 44 41 20 48 49 3a |TA UP....LDA HI:|
00001a20 53 42 43 23 30 3a 53 54 41 20 53 54 4b 0d 0d 02 |SBC#0:STA STK...|
00001a30 16 4c 44 41 20 4c 4f 3a 80 23 37 3a 53 54 41 20 |.LDA LO:.#7:STA |
00001a40 41 43 52 0d 0d 16 2f 4c 44 58 23 30 3a 2e 4c 34 |ACR.../LDX#0:.L4|
00001a50 20 53 54 58 20 53 54 4b 2b 31 3a 4c 44 41 23 38 | STX STK+1:LDA#8|
00001a60 3a 43 4c 43 3a 41 44 43 20 55 50 3a 53 54 41 20 |:CLC:ADC UP:STA |
00001a70 55 50 0d 0d 20 1a 4c 44 41 20 23 30 3a 41 44 43 |UP.. .LDA #0:ADC|
00001a80 20 53 54 4b 3a 53 54 41 20 53 54 4b 0d 0d 34 32 | STK:STA STK..42|
00001a90 4a 53 52 20 48 45 58 3a 4c 44 41 20 55 50 3a 4a |JSR HEX:LDA UP:J|
00001aa0 53 52 20 48 45 58 53 50 3a 4c 44 41 23 97 28 22 |SR HEXSP:LDA#.("|
00001ab0 20 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d 0d | "):JSR OSASCI..|
00001ac0 48 1b 4c 44 58 23 30 3a 2e 4c 32 20 53 54 58 20 |H.LDX#0:.L2 STX |
00001ad0 53 54 4b 2b 32 3a 54 58 41 0d 0d 52 07 54 41 59 |STK+2:TXA..R.TAY|
00001ae0 0d 0d 66 17 4c 44 41 28 55 50 29 2c 59 3a 4a 53 |..f.LDA(UP),Y:JS|
00001af0 52 20 48 45 58 53 50 0d 0d 7a 1e 4c 44 58 20 53 |R HEXSP..z.LDX S|
00001b00 54 4b 2b 32 3a 49 4e 58 3a 43 50 58 23 38 3a 42 |TK+2:INX:CPX#8:B|
00001b10 4e 45 20 4c 32 0d 0d 8e 1b 4c 44 58 23 30 3a 2e |NE L2....LDX#0:.|
00001b20 4c 33 20 53 54 58 20 53 54 4b 2b 32 3a 54 58 41 |L3 STX STK+2:TXA|
00001b30 0d 0d a2 07 54 41 59 0d 0d ac 17 4c 44 41 28 55 |....TAY....LDA(U|
00001b40 50 29 2c 59 3a 4a 53 52 20 43 48 4f 55 54 0d 0d |P),Y:JSR CHOUT..|
00001b50 c0 1e 4c 44 58 20 53 54 4b 2b 32 3a 49 4e 58 3a |..LDX STK+2:INX:|
00001b60 43 50 58 23 38 3a 42 4e 45 20 4c 33 0d 0d d4 24 |CPX#8:BNE L3...$|
00001b70 4c 44 41 23 97 28 22 20 22 29 3a 4a 53 52 20 4f |LDA#.(" "):JSR O|
00001b80 53 41 53 43 49 3a 4a 53 52 20 4f 53 41 53 43 49 |SASCI:JSR OSASCI|
00001b90 0d 0d e8 1f 4c 44 58 20 53 54 4b 2b 31 3a 49 4e |....LDX STK+1:IN|
00001ba0 58 3a 43 50 58 23 31 36 3a 42 4e 45 20 4c 34 0d |X:CPX#16:BNE L4.|
00001bb0 0d fc 24 4c 44 59 23 31 34 3a 4c 44 41 20 41 43 |..$LDY#14:LDA AC|
00001bc0 52 3a 41 53 4c 20 41 3a 43 4c 43 3a 41 44 43 20 |R:ASL A:CLC:ADC |
00001bd0 41 43 52 0d 0e 06 21 41 44 43 23 35 3a 53 54 41 |ACR...!ADC#5:STA|
00001be0 20 53 54 4b 2b 31 3a 54 41 58 3a 4a 53 52 20 53 | STK+1:TAX:JSR S|
00001bf0 45 54 41 42 0d 0e 1a 19 4c 44 41 23 97 28 22 5b |ETAB....LDA#.("[|
00001c00 22 29 3a 4a 53 52 20 4f 53 41 53 43 49 0d 0e 24 |"):JSR OSASCI..$|
00001c10 2c 4c 44 41 20 53 54 4b 2b 31 3a 43 4c 43 3a 41 |,LDA STK+1:CLC:A|
00001c20 44 43 23 33 3a 54 41 58 3a 4c 44 59 23 31 34 3a |DC#3:TAX:LDY#14:|
00001c30 4a 53 52 20 53 45 54 41 42 0d 0e 38 19 4c 44 41 |JSR SETAB..8.LDA|
00001c40 23 97 28 22 5d 22 29 3a 4a 53 52 20 4f 53 41 53 |#.("]"):JSR OSAS|
00001c50 43 49 0d 0e 42 07 52 54 53 0d 0e 6a 1d 2e 43 48 |CI..B.RTS..j..CH|
00001c60 4f 55 54 20 43 4d 50 23 97 28 22 20 22 29 3a 42 |OUT CMP#.(" "):B|
00001c70 43 43 20 44 55 46 0d 0e 7e 12 43 4d 50 23 26 37 |CC DUF..~.CMP#&7|
00001c80 46 3a 42 43 43 20 4f 4b 0d 0e 9c 13 2e 44 55 46 |F:BCC OK.....DUF|
00001c90 20 4c 44 41 23 97 28 22 2e 22 29 0d 0e a6 16 2e | LDA#.(".").....|
00001ca0 4f 4b 20 4a 53 52 20 4f 53 41 53 43 49 3a 52 54 |OK JSR OSASCI:RT|
00001cb0 53 0d 0e ce 1e 2e 53 45 54 41 42 20 53 54 59 20 |S.....SETAB STY |
00001cc0 53 54 33 2b 32 3a 53 54 58 20 53 54 33 2b 31 0d |ST3+2:STX ST3+1.|
00001cd0 0e d8 21 4c 44 58 23 28 53 54 33 20 83 32 35 36 |..!LDX#(ST3 .256|
00001ce0 29 3a 4c 44 59 23 28 53 54 33 20 81 32 35 36 29 |):LDY#(ST3 .256)|
00001cf0 0d 0e e2 12 4a 53 52 20 4f 55 54 50 55 54 3a 52 |....JSR OUTPUT:R|
00001d00 54 53 0d 0f 0a 22 2e 4b 45 59 49 4e 20 4c 44 58 |TS...".KEYIN LDX|
00001d10 23 30 3a 4c 44 41 23 32 31 3a 4a 53 52 20 4f 53 |#0:LDA#21:JSR OS|
00001d20 42 59 54 45 0d 0f 14 1d 4a 53 52 20 4f 53 52 44 |BYTE....JSR OSRD|
00001d30 43 48 3a 42 43 53 20 4b 45 59 45 52 52 3a 52 54 |CH:BCS KEYERR:RT|
00001d40 53 0d 0f 28 15 2e 4b 45 59 45 52 52 20 53 54 41 |S..(..KEYERR STA|
00001d50 20 53 54 4b 2b 31 0d 0f 32 29 4c 44 58 23 28 53 | STK+1..2)LDX#(S|
00001d60 54 36 20 83 32 35 36 29 3a 4c 44 59 23 28 53 54 |T6 .256):LDY#(ST|
00001d70 36 20 81 32 35 36 29 3a 4a 53 52 20 43 4c 49 0d |6 .256):JSR CLI.|
00001d80 0f 3c 1e 4c 44 41 20 53 54 4b 2b 31 3a 43 4d 50 |.<.LDA STK+1:CMP|
00001d90 23 26 31 42 3a 42 4e 45 20 4b 45 52 52 0d 0f 50 |#&1B:BNE KERR..P|
00001da0 16 4c 44 41 23 26 37 45 3a 4a 53 52 20 4f 53 42 |.LDA#&7E:JSR OSB|
00001db0 59 54 45 0d 0f 5a 09 2e 4b 45 52 52 0d 0f 6e 2c |YTE..Z..KERR..n,|
00001dc0 4c 44 58 23 30 3a 4c 44 59 23 32 32 3a 4a 53 52 |LDX#0:LDY#22:JSR|
00001dd0 20 53 45 54 41 42 3a 4c 44 58 20 54 45 4d 50 53 | SETAB:LDX TEMPS|
00001de0 54 41 43 4b 3a 54 58 53 0d 0f 8c 0e 42 52 4b 3a |TACK:TXS....BRK:|
00001df0 45 51 55 42 39 39 0d 0f 96 14 45 51 55 53 22 45 |EQUB99....EQUS"E|
00001e00 4e 44 20 4f 46 20 44 49 53 22 0d 0f aa 07 42 52 |ND OF DIS"....BR|
00001e10 4b 0d 0f d2 19 2e 4f 55 54 50 55 54 20 53 54 58 |K.....OUTPUT STX|
00001e20 26 37 30 3a 53 54 59 26 37 31 0d 0f dc 09 4c 44 |&70:STY&71....LD|
00001e30 59 23 30 0d 0f e6 27 2e 4c 4f 4f 50 20 4c 44 41 |Y#0...'.LOOP LDA|
00001e40 28 26 37 30 29 2c 59 3a 43 4d 50 23 26 46 46 3a |(&70),Y:CMP#&FF:|
00001e50 42 45 51 20 4f 55 54 45 4e 44 0d 0f f0 1b 4a 53 |BEQ OUTEND....JS|
00001e60 52 20 4f 53 41 53 43 49 3a 49 4e 59 3a 42 4e 45 |R OSASCI:INY:BNE|
00001e70 20 4c 4f 4f 50 0d 0f fa 0f 2e 4f 55 54 45 4e 44 | LOOP.....OUTEND|
00001e80 20 52 54 53 0d 10 22 25 2e 48 45 58 53 50 20 4a | RTS.."%.HEXSP J|
00001e90 53 52 20 48 45 58 3a 4c 44 41 23 26 32 30 3a 4a |SR HEX:LDA#&20:J|
00001ea0 4d 50 20 4f 53 57 52 43 48 0d 10 36 08 2e 48 45 |MP OSWRCH..6..HE|
00001eb0 58 0d 10 4a 1f 50 48 41 3a 4c 53 52 20 41 3a 4c |X..J.PHA:LSR A:L|
00001ec0 53 52 20 41 3a 4c 53 52 20 41 3a 4c 53 52 20 41 |SR A:LSR A:LSR A|
00001ed0 0d 10 54 17 4a 53 52 20 48 45 58 44 49 47 3a 50 |..T.JSR HEXDIG:P|
00001ee0 4c 41 3a 80 23 26 46 0d 10 5e 23 2e 48 45 58 44 |LA:.#&F..^#.HEXD|
00001ef0 49 47 20 43 4d 50 23 26 41 3a 42 43 43 20 48 45 |IG CMP#&A:BCC HE|
00001f00 58 44 49 48 3a 41 44 43 23 36 0d 10 68 1e 2e 48 |XDIH:ADC#6..h..H|
00001f10 45 58 44 49 48 20 41 44 43 23 26 33 30 3a 4a 4d |EXDIH ADC#&30:JM|
00001f20 50 20 4f 53 57 52 43 48 0d 10 9a 31 2e 53 54 52 |P OSWRCH...1.STR|
00001f30 49 4e 20 53 54 41 20 43 4f 4e 42 4c 4b 2b 32 3a |IN STA CONBLK+2:|
00001f40 53 54 58 20 43 4f 4e 42 4c 4b 2b 33 3a 53 54 59 |STX CONBLK+3:STY|
00001f50 20 43 4f 4e 42 4c 4b 2b 34 0d 10 a4 12 4c 44 58 | CONBLK+4....LDX|
00001f60 23 28 53 54 35 20 83 32 35 36 29 0d 10 ae 1d 4c |#(ST5 .256)....L|
00001f70 44 59 23 28 53 54 35 20 81 32 35 36 29 3a 4a 53 |DY#(ST5 .256):JS|
00001f80 52 20 4f 55 54 50 55 54 0d 10 b8 24 4c 44 41 23 |R OUTPUT...$LDA#|
00001f90 30 3a 4c 44 58 23 20 43 4f 4e 42 4c 4b 3a 54 41 |0:LDX# CONBLK:TA|
00001fa0 59 3a 4a 53 52 20 4f 53 57 4f 52 44 0d 10 c2 10 |Y:JSR OSWORD....|
00001fb0 42 43 53 20 45 53 43 31 3a 52 54 53 0d 10 cc 1c |BCS ESC1:RTS....|
00001fc0 2e 45 53 43 31 20 4c 44 41 23 26 31 42 3a 4a 4d |.ESC1 LDA#&1B:JM|
00001fd0 50 20 4b 45 59 45 52 52 0d 10 d6 05 5d 0d 10 e0 |P KEYERR....]...|
00001fe0 23 53 54 31 3d 50 25 2b 31 3a 21 53 54 31 3d 26 |#ST1=P%+1:!ST1=&|
00001ff0 30 44 30 43 30 36 31 36 3a 50 25 3d 50 25 2b 35 |0D0C0616:P%=P%+5|
00002000 0d 10 ea 32 24 50 25 3d 22 20 45 4c 45 43 54 52 |...2$P%=" ELECTR|
00002010 4f 4e 20 44 45 42 55 47 47 45 52 20 20 20 44 20 |ON DEBUGGER D |
00002020 44 55 4d 50 20 4d 45 4d 4f 52 59 20 20 20 20 20 |DUMP MEMORY |
00002030 20 22 0d 10 f4 37 24 28 50 25 2b 34 30 29 3d 22 | "...7$(P%+40)="|
00002040 20 48 20 48 45 58 20 41 44 44 52 2e 20 3a 20 30 | H HEX ADDR. : 0|
00002050 30 30 30 20 20 4c 20 4c 49 53 54 49 4e 47 20 20 |000 L LISTING |
00002060 20 20 20 20 20 20 20 20 22 0d 10 fe 37 24 28 50 | "...7$(P|
00002070 25 2b 38 30 29 3d 22 20 46 20 46 49 4e 44 20 42 |%+80)=" F FIND B|
00002080 59 54 45 20 3a 20 30 30 20 20 20 20 41 20 41 4c |YTE : 00 A AL|
00002090 54 45 52 20 42 59 54 45 20 20 20 20 20 20 20 22 |TER BYTE "|
000020a0 0d 11 08 2d 24 28 50 25 2b 31 32 30 29 3d 22 20 |...-$(P%+120)=" |
000020b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000020c0 20 20 20 20 53 20 53 54 52 49 4e 47 22 0d 11 12 | S STRING"...|
000020d0 18 50 25 3d 50 25 2b a9 28 24 50 25 29 3a 3f 50 |.P%=P%+.($P%):?P|
000020e0 25 3d 26 46 46 0d 11 1c 2b 53 54 32 3d 50 25 2b |%=&FF...+ST2=P%+|
000020f0 31 3a 21 53 54 32 3d 26 30 30 30 30 30 31 31 37 |1:!ST2=&00000117|
00002100 3a 53 54 32 21 34 3d 30 3a 50 25 3d 50 25 2b 39 |:ST2!4=0:P%=P%+9|
00002110 0d 11 26 2b 21 50 25 3d 26 30 30 31 46 30 30 30 |..&+!P%=&001F000|
00002120 30 3a 50 25 3d 50 25 2b 34 3a 21 50 25 3d 26 46 |0:P%=P%+4:!P%=&F|
00002130 46 30 37 3a 50 25 3d 50 25 2b 32 0d 11 30 2f 53 |F07:P%=P%+2..0/S|
00002140 54 33 3d 50 25 3a 21 50 25 3d 26 30 30 30 30 30 |T3=P%:!P%=&00000|
00002150 30 31 46 3a 50 25 21 34 3d 26 46 46 30 30 30 30 |01F:P%!4=&FF0000|
00002160 30 30 3a 50 25 3d 50 25 2b 38 0d 11 3a 20 53 54 |00:P%=P%+8..: ST|
00002170 34 3d 50 25 3a 21 50 25 3d 26 46 46 32 30 32 30 |4=P%:!P%=&FF2020|
00002180 32 30 3a 50 25 3d 50 25 2b 34 0d 11 44 28 53 54 |20:P%=P%+4..D(ST|
00002190 35 3d 50 25 3a 21 50 25 3d 26 30 30 30 31 30 31 |5=P%:!P%=&000101|
000021a0 31 37 3a 53 54 35 21 34 3d 30 3a 50 25 3d 50 25 |17:ST5!4=0:P%=P%|
000021b0 2b 38 0d 11 4e 19 21 50 25 3d 26 46 46 30 30 30 |+8..N.!P%=&FF000|
000021c0 30 30 30 3a 50 25 3d 50 25 2b 34 0d 11 58 1f 53 |000:P%=P%+4..X.S|
000021d0 54 36 3d 50 25 3a 24 53 54 36 3d 22 46 58 34 2c |T6=P%:$ST6="FX4,|
000021e0 30 22 3a 50 25 3d 50 25 2b 36 0d 11 62 05 f7 0d |0":P%=P%+6..b...|
000021f0 11 6c 26 4e 55 4d 3d 50 25 3a e3 20 49 3d 30 20 |.l&NUM=P%:. I=0 |
00002200 b8 20 31 34 3a f3 20 4e 25 3a 50 25 3f 49 3d 4e |. 14:. N%:P%?I=N|
00002210 25 3a ed 20 49 0d 11 76 0c 50 25 3d 50 25 2b 31 |%:. I..v.P%=P%+1|
00002220 35 0d 11 80 1c 50 25 3d 28 50 25 20 81 32 35 36 |5....P%=(P% .256|
00002230 29 2b 31 3a 50 25 3d 50 25 2a 32 35 36 0d 11 8a |)+1:P%=P%*256...|
00002240 2b 48 41 53 48 3d 50 25 3a 54 59 50 45 3d 50 25 |+HASH=P%:TYPE=P%|
00002250 2b 32 35 36 3a 50 25 3d 50 25 2b 35 31 32 3a 53 |+256:P%=P%+512:S|
00002260 54 52 49 4e 47 3d 50 25 0d 11 94 08 ed 20 4f 50 |TRING=P%..... OP|
00002270 0d 11 9e 39 e3 20 49 25 3d 30 20 b8 20 32 35 35 |...9. I%=0 . 255|
00002280 20 88 20 34 3a 48 41 53 48 21 49 25 3d 30 3a 54 | . 4:HASH!I%=0:T|
00002290 59 50 45 21 49 25 3d 30 3a 53 54 52 49 4e 47 21 |YPE!I%=0:STRING!|
000022a0 49 25 3d 30 3a ed 20 49 25 0d 11 a8 05 f5 0d 11 |I%=0:. I%.......|
000022b0 b2 18 f3 20 41 24 3a e7 20 41 24 3d 22 2a 22 20 |... A$:. A$="*" |
000022c0 8c 20 8d 64 5a 51 0d 11 bc 26 e7 20 97 28 41 24 |. .dZQ...&. .(A$|
000022d0 29 3d 97 28 22 2d 22 29 20 8c 20 49 3d 94 28 bb |)=.("-") . I=.(.|
000022e0 28 41 24 29 29 3a e5 20 8d 74 72 51 0d 11 c6 24 |(A$)):. .trQ...$|
000022f0 4d 3d a0 28 22 26 22 2b c0 41 24 2c 31 29 29 3a |M=.("&"+.A$,1)):|
00002300 4d 4e 3d a0 28 22 26 22 2b c2 41 24 2c 32 29 29 |MN=.("&"+.A$,2))|
00002310 0d 11 d0 17 48 41 53 48 3f 4d 4e 3d 49 3a 54 59 |....HASH?MN=I:TY|
00002320 50 45 3f 4d 4e 3d 4d 0d 11 da 0c fd 20 41 24 3d |PE?MN=M..... A$=|
00002330 22 2a 22 0d 11 e4 31 41 24 3d 22 20 2d 2d 2d 20 |"*"...1A$=" --- |
00002340 41 44 43 20 41 4e 44 20 41 53 4c 20 42 43 43 20 |ADC AND ASL BCC |
00002350 42 43 53 20 42 45 51 20 42 49 54 20 42 4d 49 20 |BCS BEQ BIT BMI |
00002360 42 4e 45 22 0d 11 ee 34 41 24 3d 41 24 2b 22 20 |BNE"...4A$=A$+" |
00002370 42 50 4c 20 42 52 4b 20 42 56 43 20 42 56 53 20 |BPL BRK BVC BVS |
00002380 43 4c 43 20 43 4c 44 20 43 4c 49 20 43 4c 56 20 |CLC CLD CLI CLV |
00002390 43 4d 50 20 43 50 58 22 0d 11 f8 34 41 24 3d 41 |CMP CPX"...4A$=A|
000023a0 24 2b 22 20 43 50 59 20 44 45 43 20 44 45 58 20 |$+" CPY DEC DEX |
000023b0 44 45 59 20 45 4f 52 20 49 4e 43 20 49 4e 58 20 |DEY EOR INC INX |
000023c0 49 4e 59 20 4a 4d 50 20 4a 53 52 22 0d 12 02 34 |INY JMP JSR"...4|
000023d0 41 24 3d 41 24 2b 22 20 4c 44 41 20 4c 44 58 20 |A$=A$+" LDA LDX |
000023e0 4c 44 59 20 4c 53 52 20 4e 4f 50 20 4f 52 41 20 |LDY LSR NOP ORA |
000023f0 50 48 41 20 50 48 50 20 50 4c 41 20 50 4c 50 22 |PHA PHP PLA PLP"|
00002400 0d 12 0c 34 41 24 3d 41 24 2b 22 20 52 4f 4c 20 |...4A$=A$+" ROL |
00002410 52 4f 52 20 52 54 49 20 52 54 53 20 53 42 43 20 |ROR RTI RTS SBC |
00002420 53 45 43 20 53 45 44 20 53 45 49 20 53 54 41 20 |SEC SED SEI STA |
00002430 53 54 58 22 0d 12 16 28 41 24 3d 41 24 2b 22 20 |STX"...(A$=A$+" |
00002440 53 54 59 20 54 41 58 20 54 41 59 20 54 53 58 20 |STY TAX TAY TSX |
00002450 54 58 41 20 54 58 53 20 54 59 41 22 0d 12 20 0e |TXA TXS TYA".. .|
00002460 24 53 54 52 49 4e 47 3d 41 24 0d 12 2a 05 e0 0d |$STRING=A$..*...|
00002470 12 34 22 dc 31 2c 32 2c 33 2c 32 2c 31 2c 31 2c |.4".1,2,3,2,1,1,|
00002480 32 2c 32 2c 32 2c 33 2c 33 2c 32 2c 33 2c 32 2c |2,2,2,3,3,2,3,2,|
00002490 31 0d 12 3e 27 dc 2d 31 2c 31 36 39 2c 32 36 44 |1..>'.-1,169,26D|
000024a0 2c 33 36 35 2c 36 36 31 2c 37 37 31 2c 38 37 35 |,365,661,771,875|
000024b0 2c 39 37 44 2c 41 37 39 0d 12 48 27 dc 2d 32 2c |,97D,A79..H'.-2,|
000024c0 31 32 39 2c 32 32 44 2c 33 32 35 2c 36 32 31 2c |129,22D,325,621,|
000024d0 37 33 31 2c 38 33 35 2c 39 33 44 2c 41 33 39 0d |731,835,93D,A39.|
000024e0 12 52 1b dc 2d 33 2c 32 30 45 2c 33 30 36 2c 34 |.R..-3,20E,306,4|
000024f0 30 41 2c 38 31 36 2c 39 31 45 0d 12 5c 0b dc 2d |0A,816,91E..\..-|
00002500 34 2c 42 39 30 0d 12 66 0b dc 2d 35 2c 42 42 30 |4,B90..f..-5,BB0|
00002510 0d 12 70 0b dc 2d 36 2c 42 46 30 0d 12 7a 0f dc |..p..-6,BF0..z..|
00002520 2d 37 2c 32 32 43 2c 33 32 34 0d 12 84 0b dc 2d |-7,22C,324.....-|
00002530 38 2c 42 33 30 0d 12 8e 0b dc 2d 39 2c 42 44 30 |8,B30.....-9,BD0|
00002540 0d 12 98 0c dc 2d 31 30 2c 42 31 30 0d 12 a2 0c |.....-10,B10....|
00002550 dc 2d 31 31 2c 35 30 30 0d 12 ac 0c dc 2d 31 32 |.-11,500.....-12|
00002560 2c 42 35 30 0d 12 b6 0c dc 2d 31 33 2c 42 37 30 |,B50.....-13,B70|
00002570 0d 12 c0 0c dc 2d 31 34 2c 35 31 38 0d 12 ca 0c |.....-14,518....|
00002580 dc 2d 31 35 2c 35 44 38 0d 12 d4 0c dc 2d 31 36 |.-15,5D8.....-16|
00002590 2c 35 35 38 0d 12 de 0c dc 2d 31 37 2c 35 42 38 |,558.....-17,5B8|
000025a0 0d 12 e8 28 dc 2d 31 38 2c 31 43 39 2c 32 43 44 |...(.-18,1C9,2CD|
000025b0 2c 33 43 35 2c 36 43 31 2c 37 44 31 2c 38 44 35 |,3C5,6C1,7D1,8D5|
000025c0 2c 39 44 44 2c 41 44 39 0d 12 f2 14 dc 2d 31 39 |,9DD,AD9.....-19|
000025d0 2c 31 45 30 2c 32 45 43 2c 33 45 34 0d 12 fc 14 |,1E0,2EC,3E4....|
000025e0 dc 2d 32 30 2c 31 43 30 2c 32 43 43 2c 33 43 34 |.-20,1C0,2CC,3C4|
000025f0 0d 13 06 18 dc 2d 32 31 2c 32 43 45 2c 33 43 36 |.....-21,2CE,3C6|
00002600 2c 38 44 36 2c 39 44 45 0d 13 10 0c dc 2d 32 32 |,8D6,9DE.....-22|
00002610 2c 35 43 41 0d 13 1a 0c dc 2d 32 33 2c 35 38 38 |,5CA.....-23,588|
00002620 0d 13 24 28 dc 2d 32 34 2c 31 34 39 2c 32 34 44 |..$(.-24,149,24D|
00002630 2c 33 34 35 2c 36 34 31 2c 37 35 31 2c 38 35 35 |,345,641,751,855|
00002640 2c 39 35 44 2c 41 35 39 0d 13 2e 18 dc 2d 32 35 |,95D,A59.....-25|
00002650 2c 32 45 45 2c 33 45 36 2c 38 46 36 2c 39 46 45 |,2EE,3E6,8F6,9FE|
00002660 0d 13 38 0c dc 2d 32 36 2c 35 45 38 0d 13 42 0c |..8..-26,5E8..B.|
00002670 dc 2d 32 37 2c 35 43 38 0d 13 4c 10 dc 2d 32 38 |.-27,5C8..L..-28|
00002680 2c 32 34 43 2c 43 36 43 0d 13 56 0c dc 2d 32 39 |,24C,C6C..V..-29|
00002690 2c 32 32 30 0d 13 60 28 dc 2d 33 30 2c 31 41 39 |,220..`(.-30,1A9|
000026a0 2c 32 41 44 2c 33 41 35 2c 36 41 31 2c 37 42 31 |,2AD,3A5,6A1,7B1|
000026b0 2c 38 42 35 2c 39 42 44 2c 41 42 39 0d 13 6a 1c |,8B5,9BD,AB9..j.|
000026c0 dc 2d 33 31 2c 31 41 32 2c 32 41 45 2c 33 41 36 |.-31,1A2,2AE,3A6|
000026d0 2c 41 42 45 2c 44 42 36 0d 13 74 1c dc 2d 33 32 |,ABE,DB6..t..-32|
000026e0 2c 31 41 30 2c 32 41 43 2c 33 41 34 2c 38 42 34 |,1A0,2AC,3A4,8B4|
000026f0 2c 39 42 43 0d 13 7e 1c dc 2d 33 33 2c 32 34 45 |,9BC..~..-33,24E|
00002700 2c 33 34 36 2c 34 34 41 2c 38 35 36 2c 39 35 45 |,346,44A,856,95E|
00002710 0d 13 88 0c dc 2d 33 34 2c 35 45 41 0d 13 92 28 |.....-34,5EA...(|
00002720 dc 2d 33 35 2c 31 30 39 2c 32 30 44 2c 33 30 35 |.-35,109,20D,305|
00002730 2c 36 30 31 2c 37 31 31 2c 38 31 35 2c 39 31 44 |,601,711,815,91D|
00002740 2c 41 31 39 0d 13 9c 0c dc 2d 33 36 2c 35 34 38 |,A19.....-36,548|
00002750 0d 13 a6 0c dc 2d 33 37 2c 35 30 38 0d 13 b0 0c |.....-37,508....|
00002760 dc 2d 33 38 2c 35 36 38 0d 13 ba 0c dc 2d 33 39 |.-38,568.....-39|
00002770 2c 35 32 38 0d 13 c4 1c dc 2d 34 30 2c 32 32 45 |,528.....-40,22E|
00002780 2c 33 32 36 2c 34 32 41 2c 38 33 36 2c 39 33 45 |,326,42A,836,93E|
00002790 0d 13 ce 1c dc 2d 34 31 2c 32 36 45 2c 33 36 36 |.....-41,26E,366|
000027a0 2c 34 36 41 2c 38 37 36 2c 39 37 45 0d 13 d8 0c |,46A,876,97E....|
000027b0 dc 2d 34 32 2c 35 34 30 0d 13 e2 0c dc 2d 34 33 |.-42,540.....-43|
000027c0 2c 35 36 30 0d 13 ec 28 dc 2d 34 34 2c 31 45 39 |,560...(.-44,1E9|
000027d0 2c 32 45 44 2c 33 45 35 2c 36 45 31 2c 37 46 31 |,2ED,3E5,6E1,7F1|
000027e0 2c 38 46 35 2c 39 46 44 2c 41 46 39 0d 13 f6 0c |,8F5,9FD,AF9....|
000027f0 dc 2d 34 35 2c 35 33 38 0d 14 00 0c dc 2d 34 36 |.-45,538.....-46|
00002800 2c 35 46 38 0d 14 0a 0c dc 2d 34 37 2c 35 37 38 |,5F8.....-47,578|
00002810 0d 14 14 24 dc 2d 34 38 2c 32 38 44 2c 33 38 35 |...$.-48,28D,385|
00002820 2c 36 38 31 2c 37 39 31 2c 38 39 35 2c 39 39 44 |,681,791,895,99D|
00002830 2c 41 39 39 0d 14 1e 14 dc 2d 34 39 2c 32 38 45 |,A99.....-49,28E|
00002840 2c 33 38 36 2c 44 39 36 0d 14 28 14 dc 2d 35 30 |,386,D96..(..-50|
00002850 2c 32 38 43 2c 33 38 34 2c 38 39 34 0d 14 32 0c |,28C,384,894..2.|
00002860 dc 2d 35 31 2c 35 41 41 0d 14 3c 0c dc 2d 35 32 |.-51,5AA..<..-52|
00002870 2c 35 41 38 0d 14 46 0c dc 2d 35 33 2c 35 42 41 |,5A8..F..-53,5BA|
00002880 0d 14 50 0c dc 2d 35 34 2c 35 38 41 0d 14 5a 0c |..P..-54,58A..Z.|
00002890 dc 2d 35 35 2c 35 39 41 0d 14 64 0e dc 2d 35 36 |.-55,59A..d..-56|
000028a0 2c 35 39 38 2c 2a 0d ff |,598,*..|
000028a8 
DISASS.m0
DISASS.m1
DISASS.m2
DISASS.m4
DISASS.m5
.