00000000: 01 04 0D 04 64 00 8F 20 53 2E 50 41 4C 00 13 04 |....d.. S.PAL...|
00000010: 6E 00 8F 00 2B 04 78 00 9F 32 2C 38 2C 32 2C 22 |n...+.x..2,8,2,"|
00000020: 40 31 3A 53 2E 42 2C 50 2C 57 22 00 31 04 82 00 |@1:S.B,P,W".1...|
00000030: 8F 00 3C 04 8C 00 9E 34 30 39 36 30 00 42 04 96 |..<....40960.B..|
00000040: 00 3B 00 50 04 A0 00 2E 4F 50 54 20 50 2C 4F 32 |.;.P....OPT P,O2|
00000050: 00 56 04 AA 00 3B 00 63 04 B4 00 AC B2 20 24 30 |.V...;.c..... $0|
00000060: 34 30 30 00 69 04 BE 00 3B 00 7D 04 C8 00 3B AC |400.i...;.}...;.|
00000070: 20 50 52 45 50 41 52 41 54 49 91 20 AC 00 83 04 | PREPARATI. ....|
00000080: D2 00 3B 00 90 04 DC 00 4C 44 41 20 23 24 30 30 |..;.....LDA #$00|
00000090: 00 9C 04 E6 00 53 54 41 20 24 37 46 00 A8 04 F0 |.....STA $7F....|
000000A0: 00 4C 44 58 20 24 30 43 00 B4 04 FA 00 53 54 58 |.LDX $0C.....STX|
000000B0: 20 24 35 31 00 C0 04 04 01 53 54 58 20 24 38 30 | $51.....STX $80|
000000C0: 00 CC 04 0E 01 4C 44 58 20 23 32 30 00 D8 04 18 |.....LDX #20....|
000000D0: 01 53 54 58 20 24 34 33 00 E5 04 22 01 4C 44 41 |.STX $43...".LDA|
000000E0: 20 23 24 30 30 00 09 05 2C 01 53 54 41 20 24 30 | #$00...,.STA $0|
000000F0: 34 46 46 20 20 20 20 20 20 20 3B 20 53 45 43 A4 |4FF ; SEC.|
00000100: 52 20 43 4F 55 4E 54 45 52 00 0F 05 36 01 3B 00 |R COUNTER...6.;.|
00000110: 2B 05 40 01 4A 53 52 20 24 43 31 30 30 20 20 20 |+.@.JSR $C100 |
00000120: 20 20 20 20 3B 20 4C 45 44 20 91 00 31 05 4A 01 | ; LED ..1.J.|
00000130: 3B 00 44 05 54 01 3B AC 20 43 52 45 41 54 45 20 |;.D.T.;. CREATE |
00000140: D0 53 20 AC 00 4A 05 5E 01 3B 00 57 05 68 01 4C |.S ..J.^.;.W.h.L|
00000150: 44 58 20 23 24 30 30 00 6D 05 72 01 D0 20 4C 44 |DX #$00.m.r.. LD|
00000160: 41 20 23 24 30 38 20 3B 20 44 42 49 44 00 7D 05 |A #$08 ; DBID.}.|
00000170: 7C 01 53 54 41 20 24 30 33 30 30 2C 58 00 85 05 ||.STA $0300,X...|
00000180: 86 01 49 4E 58 00 A4 05 90 01 49 4E 58 20 20 20 |..INX.....INX |
00000190: 20 20 20 20 20 20 20 20 20 20 3B 20 43 48 45 43 | ; CHEC|
000001A0: 4B 53 55 4D 00 B2 05 9A 01 4C 44 59 20 24 30 34 |KSUM.....LDY $04|
000001B0: 46 46 00 C2 05 A4 01 4C 44 41 20 53 45 43 A4 52 |FF.....LDA SEC.R|
000001C0: 2C 59 00 DE 05 AE 01 53 54 41 20 24 30 33 30 30 |,Y.....STA $0300|
000001D0: 2C 58 20 20 20 20 20 3B 20 53 45 43 A4 52 00 E6 |,X ; SEC.R..|
000001E0: 05 B8 01 49 4E 58 00 F2 05 C2 01 4C 44 41 20 24 |...INX.....LDA $|
000001F0: 35 31 00 0E 06 CC 01 53 54 41 20 24 30 33 30 30 |51.....STA $0300|
00000200: 2C 58 20 20 20 20 20 3B 20 54 52 41 43 4B 00 16 |,X ; TRACK..|
00000210: 06 D6 01 49 4E 58 00 22 06 E0 01 4C 44 41 20 23 |...INX."...LDA #|
00000220: 33 37 00 3C 06 EA 01 53 54 41 20 24 30 33 30 30 |37.<...STA $0300|
00000230: 2C 58 20 20 20 20 20 3B 20 49 44 4C 00 44 06 F4 |,X ; IDL.D..|
00000240: 01 49 4E 58 00 5E 06 FE 01 53 54 41 20 24 30 33 |.INX.^...STA $03|
00000250: 30 30 2C 58 20 20 20 20 20 3B 20 49 44 48 00 66 |00,X ; IDH.f|
00000260: 06 08 02 49 4E 58 00 73 06 12 02 4C 44 41 20 23 |...INX.s...LDA #|
00000270: 24 30 30 00 8D 06 1C 02 53 54 41 20 24 30 33 30 |$00.....STA $030|
00000280: 30 2C 58 20 20 20 20 20 3B 20 47 41 50 00 95 06 |0,X ; GAP...|
00000290: 26 02 49 4E 58 00 AF 06 30 02 53 54 41 20 24 30 |&.INX...0.STA $0|
000002A0: 33 30 30 2C 58 20 20 20 20 20 3B 20 47 41 50 00 |300,X ; GAP.|
000002B0: B7 06 3A 02 49 4E 58 00 BD 06 44 02 3B 00 E4 06 |..:.INX...D.;...|
000002C0: 4E 02 4C 44 41 20 23 24 30 30 20 20 20 20 20 20 |N.LDA #$00 |
000002D0: 20 20 3B 20 43 4F 4D 50 55 54 45 20 43 48 45 43 | ; COMPUTE CHEC|
000002E0: 4B 53 55 4D 00 F3 06 58 02 45 B0 20 24 30 32 46 |KSUM...X.E. $02F|
000002F0: 41 2C 58 00 02 07 62 02 45 B0 20 24 30 32 46 42 |A,X...b.E. $02FB|
00000300: 2C 58 00 11 07 6C 02 45 B0 20 24 30 32 46 43 2C |,X...l.E. $02FC,|
00000310: 58 00 20 07 76 02 45 B0 20 24 30 32 46 44 2C 58 |X. .v.E. $02FD,X|
00000320: 00 30 07 80 02 53 54 41 20 24 30 32 46 39 2C 58 |.0...STA $02F9,X|
00000330: 00 36 07 8A 02 3B 00 44 07 94 02 49 4E 43 20 24 |.6...;.D...INC $|
00000340: 30 34 46 46 00 52 07 9E 02 4C 44 41 20 24 30 34 |04FF.R...LDA $04|
00000350: 46 46 00 5E 07 A8 02 43 4D 50 20 24 34 33 00 68 |FF.^...CMP $43.h|
00000360: 07 B2 02 42 4E 45 20 D0 00 6E 07 BC 02 3B 00 76 |...BNE ..n...;.v|
00000370: 07 C6 02 54 58 41 00 7E 07 D0 02 50 48 41 00 84 |...TXA.~...PHA..|
00000380: 07 DA 02 3B 00 96 07 E4 02 3B AC 20 43 52 45 41 |...;.....;. CREA|
00000390: 54 45 20 83 20 2A 00 9C 07 EE 02 3B 00 A9 07 F8 |TE . *.....;....|
000003A0: 02 4C 44 41 20 23 24 30 30 00 CA 07 02 03 4C 44 |.LDA #$00.....LD|
000003B0: 58 20 23 24 30 30 20 20 20 20 20 20 20 20 20 3B |X #$00 ;|
000003C0: 20 34 30 34 30 20 81 4D 41 54 00 DC 07 0C 03 83 | 4040 .MAT......|
000003D0: 20 53 54 41 20 24 30 35 30 30 2C 58 00 E4 07 16 | STA $0500,X....|
000003E0: 03 49 4E 58 00 EE 07 20 03 42 4E 45 20 83 00 F4 |.INX... .BNE ...|
000003F0: 07 2A 03 3B 00 0A 08 34 03 3B AC 20 43 91 56 45 |.*.;...4.;. C.VE|
00000400: 52 54 20 A4 20 47 43 52 20 AC 00 10 08 3E 03 3B |RT . GCR ....>.;|
00000410: 00 1D 08 48 03 4C 44 41 20 23 24 30 30 00 29 08 |...H.LDA #$00.).|
00000420: 52 03 53 54 41 20 24 33 30 00 36 08 5C 03 4C 44 |R.STA $30.6.\.LD|
00000430: 41 20 23 24 30 33 00 42 08 66 03 53 54 41 20 24 |A #$03.B.f.STA $|
00000440: 33 31 00 50 08 70 03 4A 53 52 20 24 46 45 33 30 |31.P.p.JSR $FE30|
00000450: 00 58 08 7A 03 50 4C 41 00 60 08 84 03 54 41 59 |.X.z.PLA.`...TAY|
00000460: 00 68 08 8E 03 44 45 59 00 76 08 98 03 4A 53 52 |.h...DEY.v...JSR|
00000470: 20 24 46 44 45 35 00 84 08 A2 03 4A 53 52 20 24 | $FDE5.....JSR $|
00000480: 46 44 46 35 00 91 08 AC 03 4C 44 41 20 23 24 30 |FDF5.....LDA #$0|
00000490: 35 00 9D 08 B6 03 53 54 41 20 24 33 31 00 AB 08 |5.....STA $31...|
000004A0: C0 03 4A 53 52 20 24 46 35 45 39 00 B7 08 CA 03 |..JSR $F5E9.....|
000004B0: 53 54 41 20 24 33 41 00 C5 08 D4 03 4A 53 52 20 |STA $3A.....JSR |
000004C0: 24 46 37 38 46 00 CB 08 DE 03 3B 00 D3 08 E8 03 |$F78F.....;.....|
000004D0: 52 54 53 00 D9 08 F2 03 3B 00 E7 08 FC 03 53 45 |RTS.....;.....SE|
000004E0: 43 A4 52 20 B2 20 AC 00 11 09 06 04 2E 42 59 54 |C.R . .......BYT|
000004F0: 45 20 24 30 30 2C 24 30 31 2C 24 30 32 2C 24 30 |E $00,$01,$02,$0|
00000500: 33 2C 24 30 34 2C 24 30 35 2C 24 30 36 2C 24 30 |3,$04,$05,$06,$0|
00000510: 37 00 2F 09 10 04 2E 42 59 54 45 20 24 30 38 2C |7./....BYTE $08,|
00000520: 24 30 39 2C 24 30 41 2C 24 30 42 2C 24 30 43 00 |$09,$0A,$0B,$0C.|
00000530: 3D 09 1A 04 2E 42 59 54 45 20 24 31 32 00 5F 09 |=....BYTE $12._.|
00000540: 24 04 2E 42 59 54 45 20 24 30 44 2C 24 30 45 2C |$..BYTE $0D,$0E,|
00000550: 24 30 46 2C 24 31 30 2C 24 31 31 2C 24 31 32 00 |$0F,$10,$11,$12.|
00000560: 00 00 |.. |
....D.. S.PAL...N...+.X..2,8,2,"@1:S.B,P
,W".1.....<....40960.B...;.P. ..OPT P,O2
.V...;.C..... $0400.I...;.}.H.;. PREPARA
TI. ....R.;.....LDA #$00.....STA $7F....
.LDX $0C.....STX $51.....STX $80.L...LDX
#20.X...STX $43...".LDA #$00...,.STA $0
4FF ; SEC.R COUNTER...6.;.+.@.JSR
$C100 ; LED ..1.J.;.D.T.;. CREATE
PS ..J.^.;.W.H.LDX #$00.M.R.P LDA #$08 ;
DBID.}.|.STA $0300,X.....INX.....INX
; CHECKSUM.....LDY $04FF.B...L
DA SEC.R,Y.....STA $0300,X ; SEC.R..
...INX...B.LDA $51...L.STA $0300,X ;
TRACK...V.INX."...LDA #37.<...STA $0300
,X ; IDL.D...INX.^...STA $0300,X
; IDH.F...INX.S...LDA #$00.....STA $030
0,X ; GAP...&.INX...0.STA $0300,X
; GAP...:.INX...D.;...N.LDA #$00
; COMPUTE CHECKSUM...X.E. $02FA,X...B.
E. $02FB,X...L.E. $02FC,X. .V.E. $02FD,X
.0...STA $02F9,X.6...;.D...INC $04FF.R..
.LDA $04FF.^...CMP $43.H...BNE P.N...;.V
.F.TXA.~.P.PHA...Z.;.....;. CREATE . *..
...;.....LDA #$00.J...LDX #$00 ;
4040 .MAT...... STA $0500,X.....INX...
.BNE ....*.;...4.;. C.VERT . GCR ....>.;
...H.LDA #$00.).R.STA $30.6.\.LDA #$03.B
.F.STA $31.P.P.JSR $FE30.X.Z.PLA.`...TAY
.H...DEY.V...JSR $FDE5.....JSR $FDF5....
.LDA #$05.....STA $31.....JSR $F5E9...J.
STA $3A.E.T.JSR $F78F.K...;.S...RTS.Y...
;.....SEC.R . .......BYTE $00,$01,$02,$0
3,$04,$05,$06,$07./....BYTE $08,$09,$0A,
$0B,$0C.=....BYTE $12._.$..BYTE $0D,$0E,
$0F,$10,$11,$12...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL