> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 53 4C 49 44 45 20 28 41 |..).... SLIDE (A|
00000010: 55 47 20 32 35 2F 38 34 29 20 20 20 20 20 20 20 |UG 25/84) |
00000020: 20 20 20 20 20 20 20 20 3A 00 2F 08 01 00 3A 00 | :./...:.|
00000030: 4F 08 02 00 8F 20 20 31 20 53 54 41 54 45 4D 45 |O.... 1 STATEME|
00000040: 4E 54 2C 20 30 20 46 55 4E 43 54 49 4F 4E 53 00 |NT, 0 FUNCTIONS.|
00000050: 55 08 03 00 3A 00 72 08 04 00 8F 20 4B 45 59 57 |U...:.r.... KEYW|
00000060: 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A 20 |ORD CHARACTERS: |
00000070: 20 35 00 78 08 05 00 3A 00 A0 08 06 00 8F 20 4B | 5.x...:...... K|
00000080: 45 59 57 4F 52 44 20 20 20 20 20 52 4F 55 54 49 |EYWORD ROUTI|
00000090: 4E 45 20 20 4C 49 4E 45 20 20 20 53 45 52 20 23 |NE LINE SER #|
000000A0: 00 C7 08 07 00 8F 20 53 2F 53 4C 49 44 45 20 20 |...... S/SLIDE |
000000B0: 20 20 20 53 4C 49 44 20 20 20 20 20 33 38 33 30 | SLID 3830|
000000C0: 20 20 20 20 30 34 33 00 CD 08 08 00 3A 00 E8 08 | 043.....:...|
000000D0: 09 00 8F 20 20 55 2F 43 48 4B 53 50 52 20 28 33 |... U/CHKSPR (3|
000000E0: 36 36 34 2F 30 33 37 29 00 02 09 0A 00 8F 20 55 |664/037)...... U|
000000F0: 2F 52 41 53 43 48 4B 20 28 33 36 37 36 2F 30 33 |/RASCHK (3676/03|
00000100: 38 29 00 1C 09 0B 00 8F 20 55 2F 44 49 52 45 43 |8)...... U/DIREC|
00000110: 54 20 28 33 39 33 30 2F 30 34 34 29 00 36 09 0C |T (3930/044).6..|
00000120: 00 8F 20 44 2F 50 4F 57 45 52 53 20 28 33 36 39 |.. D/POWERS (369|
00000130: 34 2F 30 33 39 29 00 3C 09 0D 00 3A 00 61 09 0E |4/039).<...:.a..|
00000140: 00 8F 20 20 54 48 49 53 20 4D 4F 44 55 4C 45 20 |.. THIS MODULE |
00000150: 41 4C 53 4F 20 43 4F 4E 54 41 49 4E 53 20 4F 4E |ALSO CONTAINS ON|
00000160: 45 00 86 09 0F 00 8F 20 20 4C 49 4E 45 20 46 52 |E...... LINE FR|
00000170: 4F 4D 20 53 45 54 20 53 50 52 49 54 45 53 20 2D |OM SET SPRITES -|
00000180: 2D 20 33 36 32 34 00 8C 09 10 00 3A 00 B3 09 11 |- 3624.....:....|
00000190: 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.. =============|
000001A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000001B0: 3D 3D 3D 00 B9 09 12 00 3A 00 C8 09 6E 00 2E C6 |===.....:...n...|
000001C0: 20 22 53 4C 49 44 C5 22 00 D8 09 56 04 2E 57 B0 | "SLID."...V..W.|
000001D0: 44 20 53 4C 49 44 AB 31 00 EA 09 28 0E 58 53 33 |D SLID.1...(.XS3|
000001E0: 20 4A 4D 50 20 24 42 32 34 38 00 FD 09 50 0E 43 | JMP $B248...P.C|
000001F0: 48 4B 53 50 52 20 4A 53 52 20 24 37 33 00 10 0A |HKSPR JSR $73...|
00000200: 52 0E 43 48 53 31 20 4A 53 52 20 24 42 37 39 45 |R.CHS1 JSR $B79E|
00000210: 00 1B 0A 54 0E 43 50 58 20 23 38 00 27 0A 56 0E |...T.CPX #8.'.V.|
00000220: 42 43 53 20 58 53 33 00 2F 0A 58 0E 52 54 53 00 |BCS XS3./.X.RTS.|
00000230: 35 0A 5A 0E 3B 00 42 0A 5C 0E 52 C6 48 4B 20 50 |5.Z.;.B.\.R.HK P|
00000240: 48 41 00 55 0A 5E 0E 52 41 53 31 20 4C 44 41 20 |HA.U.^.RAS1 LDA |
00000250: 24 44 30 31 32 00 65 0A 60 0E 53 42 43 20 24 44 |$D012.e.`.SBC $D|
00000260: 30 30 31 2C 58 00 72 0A 62 0E 42 43 43 20 52 41 |001,X.r.b.BCC RA|
00000270: 53 32 00 7F 0A 64 0E 43 4D 50 20 23 24 32 42 00 |S2...d.CMP #$2B.|
00000280: 8C 0A 66 0E 42 43 43 20 52 41 53 31 00 99 0A 68 |..f.BCC RAS1...h|
00000290: 0E 52 41 53 32 20 50 4C 41 00 A1 0A 6A 0E 52 54 |.RAS2 PLA...j.RT|
000002A0: 53 00 A7 0A 6C 0E 3B 00 CD 0A 6E 0E 50 4F 57 45 |S...l.;...n.POWE|
000002B0: 52 53 20 2E 42 59 54 45 20 31 2C 32 2C 34 2C 38 |RS .BYTE 1,2,4,8|
000002C0: 2C 31 36 2C 33 32 2C 36 34 2C 31 32 38 00 D3 0A |,16,32,64,128...|
000002D0: 70 0E 3B 00 E5 0A F6 0E 53 4C 49 44 20 4A 53 52 |p.;.....SLID JSR|
000002E0: 20 43 48 53 31 00 F1 0A F8 0E 53 54 58 20 24 31 | CHS1.....STX $1|
000002F0: 34 00 FF 0A FA 0E 4A 53 52 20 24 41 45 46 44 00 |4.....JSR $AEFD.|
00000300: 0E 0B FC 0E 4A 53 52 20 44 49 52 45 43 54 00 16 |....JSR DIRECT..|
00000310: 0B FE 0E 50 48 41 00 22 0B 00 0F 4C 44 41 20 24 |...PHA."...LDA $|
00000320: 31 34 00 2A 0B 02 0F 50 48 41 00 35 0B 04 0F 4C |14.*...PHA.5...L|
00000330: 44 41 20 23 31 00 40 0B 06 0F 53 54 41 20 54 33 |DA #1.@...STA T3|
00000340: 00 4C 0B 08 0F 4A 53 52 20 24 37 39 00 59 0B 0A |.L...JSR $79.Y..|
00000350: 0F 43 4D 50 20 23 22 2C 22 00 65 0B 0C 0F 42 4E |.CMP #",".e...BN|
00000360: 45 20 53 4C 31 00 73 0B 0E 0F 4A 53 52 20 24 42 |E SL1.s...JSR $B|
00000370: 37 39 42 00 7E 0B 10 0F 53 54 58 20 54 33 00 8A |79B.~...STX T3..|
00000380: 0B 12 0F 53 4C 31 20 50 4C 41 00 92 0B 14 0F 54 |...SL1 PLA.....T|
00000390: 41 59 00 9A 0B 16 0F 41 53 4C 00 A2 0B 18 0F 54 |AY.....ASL.....T|
000003A0: 41 58 00 AA 0B 1A 0F 50 4C 41 00 B7 0B 1C 0F 4A |AX.....PLA.....J|
000003B0: 53 52 20 52 C6 48 4B 00 C3 0B 1E 0F 42 4E 45 20 |SR R.HK.....BNE |
000003C0: 53 4C 32 00 D3 0B 20 0F 4C 44 41 20 24 44 30 30 |SL2... .LDA $D00|
000003D0: 31 2C 58 00 DE 0B 22 0F 53 42 43 20 54 33 00 EE |1,X...".SBC T3..|
000003E0: 0B 24 0F 53 54 41 20 24 44 30 30 31 2C 58 00 F6 |.$.STA $D001,X..|
000003F0: 0B 26 0F 52 54 53 00 05 0C 28 0F 53 4C 32 20 43 |.&.RTS...(.SL2 C|
00000400: 4D 50 20 23 32 00 11 0C 2A 0F 42 4E 45 20 53 4C |MP #2...*.BNE SL|
00000410: 33 00 19 0C 2C 0F 43 4C 43 00 29 0C 2E 0F 4C 44 |3...,.CLC.)...LD|
00000420: 41 20 24 44 30 30 31 2C 58 00 34 0C 30 0F 41 44 |A $D001,X.4.0.AD|
00000430: 43 20 54 33 00 44 0C 32 0F 53 54 41 20 24 44 30 |C T3.D.2.STA $D0|
00000440: 30 31 2C 58 00 4C 0C 34 0F 52 54 53 00 5B 0C 36 |01,X.L.4.RTS.[.6|
00000450: 0F 53 4C 33 20 43 4D 50 20 23 31 00 67 0C 38 0F |.SL3 CMP #1.g.8.|
00000460: 42 4E 45 20 53 4C 35 00 77 0C 3A 0F 4C 44 41 20 |BNE SL5.w.:.LDA |
00000470: 24 44 30 30 30 2C 58 00 7F 0C 3C 0F 43 4C 43 00 |$D000,X...<.CLC.|
00000480: 8A 0C 3E 0F 41 44 43 20 54 33 00 9A 0C 40 0F 53 |..>.ADC T3...@.S|
00000490: 54 41 20 24 44 30 30 30 2C 58 00 A6 0C 42 0F 42 |TA $D000,X...B.B|
000004A0: 43 43 20 53 4C 36 00 B8 0C 44 0F 53 4C 34 20 4C |CC SL6...D.SL4 L|
000004B0: 44 41 20 24 44 30 31 30 00 C8 0C 46 0F 45 B0 20 |DA $D010...F.E. |
000004C0: 50 4F 57 45 52 53 2C 59 00 D6 0C 48 0F 53 54 41 |POWERS,Y...H.STA|
000004D0: 20 24 44 30 31 30 00 DE 0C 4A 0F 52 54 53 00 00 | $D010...J.RTS..|
000004E0: 0D 4C 0F 53 4C 35 20 4C 44 41 20 24 44 30 30 30 |.L.SL5 LDA $D000|
000004F0: 2C 58 3B 53 55 42 54 52 41 43 54 20 44 49 53 50 |,X;SUBTRACT DISP|
00000500: 00 08 0D 4E 0F 53 45 43 00 13 0D 50 0F 53 42 43 |...N.SEC...P.SBC|
00000510: 20 54 33 00 23 0D 52 0F 53 54 41 20 24 44 30 30 | T3.#.R.STA $D00|
00000520: 30 2C 58 00 2F 0D 54 0F 42 43 43 20 53 4C 34 00 |0,X./.T.BCC SL4.|
00000530: 3B 0D 56 0F 53 4C 36 20 52 54 53 00 41 0D 58 0F |;.V.SL6 RTS.A.X.|
00000540: 3B 00 62 0D 5A 0F 44 49 52 45 43 54 20 4A 53 52 |;.b.Z.DIRECT JSR|
00000550: 20 24 41 44 39 45 3B 45 C5 20 44 49 52 45 43 54 | $AD9E;E. DIRECT|
00000560: 49 91 00 6E 0D 5C 0F 42 49 54 20 24 30 44 00 7A |I..n.\.BIT $0D.z|
00000570: 0D 5E 0F 42 4D 49 20 44 49 31 00 88 0D 60 0F 4A |.^.BMI DI1...`.J|
00000580: 53 52 20 24 42 37 41 31 00 93 0D 62 0F 43 50 58 |SR $B7A1...b.CPX|
00000590: 20 23 34 00 9F 0D 64 0F 42 43 53 20 44 49 35 00 | #4...d.BCS DI5.|
000005A0: A7 0D 66 0F 54 58 41 00 AF 0D 68 0F 52 54 53 00 |..f.TXA...h.RTS.|
000005B0: C1 0D 6A 0F 44 49 31 20 4A 53 52 20 24 42 36 41 |..j.DI1 JSR $B6A|
000005C0: 36 00 C9 0D 6C 0F 54 41 59 00 D5 0D 6E 0F 42 45 |6...l.TAY...n.BE|
000005D0: 51 20 44 49 33 00 E0 0D 70 0F 4C 44 59 20 23 30 |Q DI3...p.LDY #0|
000005E0: 00 F0 0D 72 0F 4C 44 41 20 28 24 32 32 29 2C 59 |...r.LDA ($22),Y|
000005F0: 00 FD 0D 74 0F 4C 44 59 20 23 24 30 46 00 10 0E |...t.LDY #$0F...|
00000600: 76 0F 44 49 32 20 43 4D 50 20 44 49 52 53 2C 59 |v.DI2 CMP DIRS,Y|
00000610: 00 1C 0E 78 0F 42 45 51 20 44 49 34 00 24 0E 7A |...x.BEQ DI4.$.z|
00000620: 0F 44 45 59 00 30 0E 7C 0F 42 50 4C 20 44 49 32 |.DEY.0.|.BPL DI2|
00000630: 00 42 0E 7E 0F 44 49 33 20 4A 4D 50 20 24 41 46 |.B.~.DI3 JMP $AF|
00000640: 30 38 00 4E 0E 80 0F 44 49 34 20 54 59 41 00 56 |08.N...DI4 TYA.V|
00000650: 0E 82 0F 4C 53 52 00 5E 0E 84 0F 4C 53 52 00 66 |...LSR.^...LSR.f|
00000660: 0E 86 0F 52 54 53 00 78 0E 88 0F 44 49 35 20 4A |...RTS.x...DI5 J|
00000670: 4D 50 20 24 42 32 34 38 00 7E 0E 8A 0F 3B 00 9D |MP $B248.~...;..|
00000680: 0E 8C 0F 44 49 52 53 20 2E C6 20 22 D5 55 CE 4E |...DIRS .. ".U.N|
00000690: D2 52 C5 45 C4 44 D3 53 CC 4C D7 57 22 00 A3 0E |.R.E.D.S.L.W"...|
000006A0: 8E 0F 3B 00 00 00 |..;... |
..).... SLIDE (AUG 25/84)
:./...:.O.... 1 STATEMENT, 0 FUNCTIONS.
U...:.R.... KEYWORD CHARACTERS: 5.X...:
. .... KEYWORD ROUTINE LINE SER #
.G.... S/SLIDE SLID 3830 043.
M...:...... U/CHKSPR (3664/037)...... U
/RASCHK (3676/038)...... U/DIRECT (3930/
044).6.... D/POWERS (3694/039).<...:.A..
.. THIS MODULE ALSO CONTAINS ONE......
LINE FROM SET SPRITES -- 3624.....:....
.. ================================.....
:.H.N..F "SLIDE".X.V..W.D SLID.1...(.XS3
JMP $B248...P.CHKSPR JSR $73...R.CHS1 J
SR $B79E...T.CPX #8.'.V.BCS XS3./.X.RTS.
5.Z.;.B.\.RFHK PHA.U.^.RAS1 LDA $D012.E.
`.SBC $D001,X.R.B.BCC RAS2..D.CMP #$2B.
..F.BCC RAS1...H.RAS2 PLA...J.RTS...L.;.
M.N.POWERS .BYTE 1,2,4,8,16,32,64,128.S.
P.;.....SLID JSR CHS1.....STX $14.....JS
R $AEFD.....JSR DIRECT.....PHA."...LDA $
14.*...PHA.5...LDA #1.@...STA T3.L...JSR
$79.Y...CMP #",".E...BNE SL1.S...JSR $B
79B.~...STX T3.....SL1 PLA.....TAY.....A
SL.....TAX.....PLA.....JSR RFHK.C...BNE
SL2.S. .LDA $D001,X...".SBC T3...$.STA $
D001,X...&.RTS...(.SL2 CMP #2...*.BNE SL
3...,.CLC.)...LDA $D001,X.4.0.ADC T3.D.2
.STA $D001,X.L.4.RTS.[.6.SL3 CMP #1.G.8.
BNE SL5.W.:.LDA $D000,X..<.CLC...>.ADC
T3...@.STA $D000,X...B.BCC SL6...D.SL4 L
DA $D010.H.F.E. POWERS,Y.V.H.STA $D010..
.J.RTS...L.SL5 LDA $D000,X;SUBTRACT DISP
...N.SEC...P.SBC T3.#.R.STA $D000,X./.T.
BCC SL4.;.V.SL6 RTS.A.X.;.B.Z.DIRECT JSR
$AD9E;EE DIRECTI..N.\.BIT $0D.Z.^.BMI D
I1...`.JSR $B7A1...B.CPX #4...D.BCS DI5.
..F.TXA...H.RTS.A.J.DI1 JSR $B6A6.I.L.TA
Y.U.N.BEQ DI3...P.LDY #0...R.LDA ($22),Y
...T.LDY #$0F...V.DI2 CMP DIRS,Y...X.BEQ
DI4.$.Z.DEY.0.|.BPL DI2.B.~.DI3 JMP $AF
08.N...DI4 TYA.V...LSR.^...LSR.F...RTS.X
...DI5 JMP $B248.~...;.....DIRS .F "UUNN
RREEDDSSLLWW".....;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL