> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 64 00 CF 52 47 20 24 43 30 30 30 00 |....d..RG $C000.|
00000010: 1C 08 6E 00 CC 44 41 20 23 24 39 33 00 2A 08 78 |..n..DA #$93.*.x|
00000020: 00 CA 53 52 20 24 46 46 44 32 00 37 08 82 00 CC |..SR $FFD2.7....|
00000030: 44 41 20 23 24 30 30 00 43 08 8C 00 D3 54 41 20 |DA #$00.C....TA |
00000040: 24 44 33 00 50 08 96 00 CC 44 41 20 23 24 30 36 |$D3.P....DA #$06|
00000050: 00 5C 08 A0 00 D3 54 41 20 24 44 36 00 64 08 A5 |.\....TA $D6.d..|
00000060: 00 D3 45 43 00 72 08 AA 00 CA 53 52 20 24 45 35 |..EC.r....SR $E5|
00000070: 30 41 00 7F 08 B4 00 CC 44 58 20 23 24 30 30 00 |0A......DX #$00.|
00000080: 93 08 BE 00 50 52 49 4E 54 20 4C 44 41 20 50 41 |....PRINT LDA PA|
00000090: 47 2C 58 00 A0 08 C8 00 C3 4D 50 20 23 24 30 30 |G,X......MP #$00|
000000A0: 00 AF 08 D2 00 C2 45 51 20 44 45 43 4F 44 45 00 |......EQ DECODE.|
000000B0: BD 08 DC 00 CA 53 52 20 24 46 46 44 32 00 C5 08 |.....SR $FFD2...|
000000C0: E6 00 C9 4E 58 00 D3 08 F0 00 CA 4D 50 20 50 52 |...NX......MP PR|
000000D0: 49 4E 54 00 E6 08 FA 00 44 45 43 4F 44 45 20 4C |INT.....DECODE L|
000000E0: 44 41 20 24 43 35 00 F3 08 04 01 C3 4D 50 20 23 |DA $C5......MP #|
000000F0: 24 34 30 00 02 09 0E 01 C2 45 51 20 44 45 43 4F |$40......EQ DECO|
00000100: 44 45 00 0A 09 18 01 D2 54 53 00 4C 09 0C 08 50 |DE......TS.L...P|
00000110: 41 47 20 44 41 54 20 31 33 2C 22 4E 41 41 4D 20 |AG DAT 13,"NAAM |
00000120: 20 20 20 20 20 3A 22 2C 31 33 2C 22 56 4F 4F 52 | :",13,"VOOR|
00000130: 4E 41 41 4D 20 20 3A 22 2C 31 33 2C 22 41 44 52 |NAAM :",13,"ADR|
00000140: 45 53 20 20 20 20 20 3A 22 2C 31 33 00 9B 09 16 |ES :",13....|
00000150: 08 C4 41 54 20 20 20 20 22 50 4F 53 54 43 4F 44 |..AT "POSTCOD|
00000160: 45 20 20 3A 22 2C 31 33 2C 22 57 4F 4F 4E 50 4C |E :",13,"WOONPL|
00000170: 41 41 54 53 3A 22 2C 31 33 2C 22 54 45 4C 45 46 |AATS:",13,"TELEF|
00000180: 4F 4F 4E 20 20 3A 22 2C 31 33 2C 22 47 45 42 2E |OON :",13,"GEB.|
00000190: 20 44 41 54 2E 20 3A 22 2C 31 33 00 C8 09 20 08 | DAT. :",13... .|
000001A0: C4 41 54 20 22 47 45 42 2E 50 4C 41 41 54 53 3A |.AT "GEB.PLAATS:|
000001B0: 22 2C 31 33 2C 22 47 52 41 41 44 20 20 20 20 20 |",13,"GRAAD |
000001C0: 3A 22 2C 30 30 2C 30 30 00 00 00 |:",00,00... |
....D.ORG $C000...N.LDA #$93.*.X.JSR $FF
D2.7...LDA #$00.C...STA $D3.P...LDA #$06
.\. .STA $D6.D...SEC.R...JSR $E50A....L
DX #$00.....PRINT LDA PAG,X. .H.CMP #$00
...R.BEQ DECODE.....JSR $FFD2.E...INX.S.
..JMP PRINT.....DECODE LDA $C5.....CMP #
$40.....BEQ DECODE.....RTS.L...PAG DAT 1
3,"NAAM :",13,"VOORNAAM :",13,"ADR
ES :",13.....DAT "POSTCODE :",13
,"WOONPLAATS:",13,"TELEFOON :",13,"GEB.
DAT. :",13.H. .DAT "GEB.PLAATS:",13,"GR
AAD :",00,00...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL