GRAPHICS
FILE INFORMATION
FILENAME(S): GRAPHICS
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 16:59:31
APPEARS ON: 1 disk(s)
FILE HASH
e81240abeff61941905b533b07190656414d2c748a3e26d1ef05d7cd3837e7eb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DIABOLO | GRAPHICS | PRG | High Voltage Complete C64 Collection, Sailor, Pbv | 20 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 0A 00 96 20 47 52 41 46 31 28 29 00 |....... GRAF1().|
00000010: 1E 08 14 00 AB 4C 44 41 20 35 33 32 37 32 00 29 |.....LDA 53272.)|
00000020: 08 16 00 AB B0 41 20 23 38 00 38 08 18 00 AB 53 |.....A #8.8....S|
00000030: 54 41 20 35 33 32 37 32 00 47 08 1E 00 AB 4C 44 |TA 53272.G....LD|
00000040: 41 20 35 33 32 36 35 00 53 08 20 00 AB B0 41 20 |A 53265.S. ...A |
00000050: 23 33 32 00 62 08 22 00 AB 53 54 41 20 35 33 32 |#32.b."..STA 532|
00000060: 36 35 00 68 08 28 00 8E 00 7D 08 32 00 3A 83 3C |65.h.(...}.2.:.<|
00000070: 20 30 2C 36 34 2C 31 32 38 2C 31 39 32 00 91 08 | 0,64,128,192...|
00000080: 33 00 83 3C 20 30 2C 36 34 2C 31 32 38 2C 31 39 |3..< 0,64,128,19|
00000090: 32 00 A5 08 34 00 83 3C 20 30 2C 36 34 2C 31 32 |2...4..< 0,64,12|
000000A0: 38 2C 31 39 32 00 B9 08 35 00 83 3C 20 30 2C 36 |8,192...5..< 0,6|
000000B0: 34 2C 31 32 38 2C 31 39 32 00 CD 08 36 00 83 3C |4,128,192...6..<|
000000C0: 20 30 2C 36 34 2C 31 32 38 2C 31 39 32 00 E3 08 | 0,64,128,192...|
000000D0: 37 00 83 3C 20 30 2C 36 34 2C 31 32 38 2C 31 39 |7..< 0,64,128,19|
000000E0: 32 2C 30 00 F8 08 3C 00 3A 83 24 3C 20 32 30 2C |2,0...<.:.$< 20,|
000000F0: 32 31 2C 32 32 2C 32 33 00 0C 09 3D 00 83 24 3C |21,22,23...=..$<|
00000100: 20 32 35 2C 32 36 2C 32 37 2C 32 38 00 20 09 3E | 25,26,27,28. .>|
00000110: 00 83 24 3C 20 32 41 2C 32 42 2C 32 43 2C 32 44 |..$< 2A,2B,2C,2D|
00000120: 00 34 09 3F 00 83 24 3C 20 32 46 2C 33 30 2C 33 |.4.?..$< 2F,30,3|
00000130: 31 2C 33 32 00 48 09 40 00 83 24 3C 20 33 34 2C |1,32.H.@..$< 34,|
00000140: 33 35 2C 33 36 2C 33 37 00 5F 09 41 00 83 24 3C |35,36,37._.A..$<|
00000150: 20 33 39 2C 33 41 2C 33 42 2C 33 43 2C 33 45 00 | 39,3A,3B,3C,3E.|
00000160: 7C 09 46 00 3A 83 3C 20 31 32 38 2C 36 34 2C 33 ||.F.:.< 128,64,3|
00000170: 32 2C 31 36 2C 38 2C 34 2C 32 2C 31 00 8A 09 64 |2,16,8,4,2,1...d|
00000180: 00 96 20 47 52 41 46 30 28 29 00 99 09 6E 00 AB |.. GRAF0()...n..|
00000190: 4C 44 41 20 35 33 32 37 32 00 A5 09 70 00 AB AF |LDA 53272...p...|
000001A0: 20 23 32 34 37 00 B4 09 72 00 AB 53 54 41 20 35 | #247...r..STA 5|
000001B0: 33 32 37 32 00 C3 09 78 00 AB 4C 44 41 20 35 33 |3272...x..LDA 53|
000001C0: 32 36 35 00 CF 09 7A 00 AB AF 20 23 32 32 33 00 |265...z... #223.|
000001D0: DE 09 7C 00 AB 53 54 41 20 35 33 32 36 35 00 ED |..|..STA 53265..|
000001E0: 09 82 00 AB 4A 4D 50 20 35 38 36 39 32 00 03 0A |....JMP 58692...|
000001F0: C8 00 96 20 53 45 54 50 49 58 45 4C 28 41 39 2C |... SETPIXEL(A9,|
00000200: 42 39 29 00 10 0A CA 00 3A AB 4C 44 41 20 42 39 |B9).....:.LDA B9|
00000210: 00 19 0A CB 00 AB 54 41 58 00 2C 0A CC 00 AB 4C |......TAX.,....L|
00000220: 53 52 3A AB 4C 53 52 3A AB 4C 53 52 00 35 0A CD |SR:.LSR:.LSR.5..|
00000230: 00 AB 54 41 59 00 3E 0A CE 00 AB 43 4C 43 00 47 |..TAY.>....CLC.G|
00000240: 0A CF 00 AB 54 58 41 00 51 0A D0 00 AB AF 20 23 |....TXA.Q..... #|
00000250: 37 00 60 0A D1 00 AB 41 44 43 20 5C 35 30 2C 59 |7.`....ADC \50,Y|
00000260: 00 6C 0A D2 00 AB 53 54 41 20 32 30 00 78 0A D3 |.l....STA 20.x..|
00000270: 00 AB 4C 44 41 20 41 39 00 84 0A D4 00 AB AF 20 |..LDA A9....... |
00000280: 23 24 46 38 00 90 0A D5 00 AB 41 44 43 20 32 30 |#$F8......ADC 20|
00000290: 00 9C 0A D6 00 AB 53 54 41 20 32 30 00 AB 0A D7 |......STA 20....|
000002A0: 00 AB 4C 44 41 20 5C 36 30 2C 59 00 B9 0A D8 00 |..LDA \60,Y.....|
000002B0: AB 41 44 43 20 41 39 AA 31 00 C5 0A D9 00 AB 53 |.ADC A9.1......S|
000002C0: 54 41 20 32 31 00 D1 0A DA 00 AB 4C 44 41 20 41 |TA 21......LDA A|
000002D0: 39 00 DB 0A DB 00 AB AF 20 23 37 00 E4 0A DC 00 |9....... #7.....|
000002E0: AB 54 41 59 00 F3 0A DD 00 AB 4C 44 41 20 5C 37 |.TAY......LDA \7|
000002F0: 30 2C 59 00 FF 0A DE 00 AB 4C 44 59 20 23 30 00 |0,Y......LDY #0.|
00000300: 0F 0B FA 00 3A AB B0 41 20 28 32 30 29 2C 59 00 |....:..A (20),Y.|
00000310: 1F 0B FC 00 AB 53 54 41 20 28 32 30 29 2C 59 00 |.....STA (20),Y.|
00000320: 28 0B FE 00 AB 52 54 53 00 36 0B 00 01 AB 4E 4F |(....RTS.6....NO|
00000330: 50 3A AB 52 54 53 00 44 0B 2C 01 96 20 43 4C 53 |P:.RTS.D.,.. CLS|
00000340: 28 41 39 29 00 5F 0B 36 01 81 42 39 B2 38 31 39 |(A9)._.6..B9.819|
00000350: 32 A4 31 36 31 39 31 3A 97 42 39 2C 30 3A 82 00 |2.16191:.B9,0:..|
00000360: 7A 0B 40 01 81 42 39 B2 31 30 32 34 A4 32 30 32 |z.@..B9.1024.202|
00000370: 33 3A 97 42 39 2C 41 39 3A 82 00 80 0B 4A 01 8E |3:.B9,A9:....J..|
00000380: 00 95 0B 90 01 96 20 47 54 50 49 58 45 4C 28 41 |...... GTPIXEL(A|
00000390: 39 2C 42 39 29 00 A3 0B 9A 01 AB 4C 44 41 20 5C |9,B9)......LDA \|
000003A0: 32 35 30 00 AC 0B 9C 01 AB 50 48 41 00 B9 0B 9E |250......PHA....|
000003B0: 01 AB 4C 44 41 20 23 39 36 00 C7 0B A0 01 AB 53 |..LDA #96......S|
000003C0: 54 41 20 5C 32 35 30 00 D5 0B A2 01 AB 4A 53 52 |TA \250......JSR|
000003D0: 20 5C 32 30 32 00 E3 0B A4 01 AB AF 20 28 32 30 | \202....... (20|
000003E0: 29 2C 59 00 EC 0B A6 01 AB 54 41 59 00 F5 0B A8 |),Y......TAY....|
000003F0: 01 AB 50 4C 41 00 03 0C AA 01 AB 53 54 41 20 5C |..PLA......STA \|
00000400: 32 35 30 00 0F 0C AC 01 AB 4C 44 58 20 23 30 00 |250......LDX #0.|
00000410: 18 0C AE 01 AB 54 59 41 00 23 0C B0 01 AB 42 4E |.....TYA.#....BN|
00000420: 45 20 33 00 2F 0C B2 01 AB 4C 44 41 20 23 30 00 |E 3./....LDA #0.|
00000430: 38 0C B4 01 AB 52 54 53 00 44 0C B6 01 AB 4C 44 |8....RTS.D....LD|
00000440: 41 20 23 31 00 4D 0C B8 01 AB 52 54 53 00 65 0C |A #1.M....RTS.e.|
00000450: F4 01 96 20 4C 49 4E 45 28 41 39 2C 42 39 2C 46 |... LINE(A9,B9,F|
00000460: 39 2C 47 39 29 00 73 0C FE 01 48 39 B2 30 3A 49 |9,G9).s...H9.0:I|
00000470: 39 B2 30 00 91 0C 08 02 8B 46 39 B1 41 39 A7 4A |9.0......F9.A9.J|
00000480: 39 B2 46 39 AB 41 39 3A 4C 39 B2 31 3A 89 35 34 |9.F9.A9:L9.1:.54|
00000490: 30 00 A4 0C 12 02 4A 39 B2 41 39 AB 46 39 3A 4C |0.....J9.A9.F9:L|
000004A0: 39 B2 AB 31 00 C3 0C 1C 02 3A 8B 47 39 B1 42 39 |9..1.....:.G9.B9|
000004B0: A7 4B 39 B2 47 39 AB 42 39 3A 4D 39 B2 31 3A 89 |.K9.G9.B9:M9.1:.|
000004C0: 35 36 30 00 D6 0C 26 02 4B 39 B2 42 39 AB 47 39 |560...&.K9.B9.G9|
000004D0: 3A 4D 39 B2 AB 31 00 0A 0D 30 02 3A 8B 4A 39 B3 |:M9..1...0.:.J9.|
000004E0: 4B 39 A7 43 39 B2 4A 39 3A 4A 39 B2 4B 39 3A 4B |K9.C9.J9:J9.K9:K|
000004F0: 39 B2 43 39 3A 48 39 B2 4C 39 3A 49 39 B2 4D 39 |9.C9:H9.L9:I9.M9|
00000500: 3A 4C 39 B2 30 3A 4D 39 B2 30 00 1B 0D 3A 02 4F |:L9.0:M9.0...:.O|
00000510: 39 B2 4A 39 AD 32 3A 4E 39 B2 31 00 27 0D 3C 02 |9.J9.2:N9.1.'.<.|
00000520: AB 4C 44 41 20 4A 39 00 33 0D 3D 02 AB 53 54 41 |.LDA J9.3.=..STA|
00000530: 20 4E 39 00 40 0D 3E 02 AB B0 41 20 4A 39 AA 31 | N9.@.>...A J9.1|
00000540: 00 4D 0D 3F 02 AB 42 45 51 20 31 31 37 00 5B 0D |.M.?..BEQ 117.[.|
00000550: 40 02 AB 4C 44 41 20 4A 39 AA 31 00 69 0D 41 02 |@..LDA J9.1.i.A.|
00000560: AB 53 54 41 20 4E 39 AA 31 00 73 0D 44 02 3A 8D |.STA N9.1.s.D.:.|
00000570: 32 30 32 00 7F 0D 46 02 AB 4C 44 41 20 41 39 00 |202...F..LDA A9.|
00000580: 88 0D 47 02 AB 43 4C 43 00 94 0D 48 02 AB 41 44 |..G..CLC...H..AD|
00000590: 43 20 4C 39 00 A0 0D 49 02 AB 53 54 41 20 41 39 |C L9...I..STA A9|
000005A0: 00 AE 0D 4A 02 AB 4C 44 41 20 41 39 AA 31 00 BC |...J..LDA A9.1..|
000005B0: 0D 4B 02 AB 41 44 43 20 4C 39 AA 31 00 CA 0D 4C |.K..ADC L9.1...L|
000005C0: 02 AB 53 54 41 20 41 39 AA 31 00 D6 0D 4E 02 AB |..STA A9.1...N..|
000005D0: 4C 44 41 20 42 39 00 DF 0D 4F 02 AB 43 4C 43 00 |LDA B9...O..CLC.|
000005E0: EB 0D 50 02 AB 41 44 43 20 49 39 00 F7 0D 51 02 |..P..ADC I9...Q.|
000005F0: AB 53 54 41 20 42 39 00 03 0E 62 02 AB 4C 44 41 |.STA B9...b..LDA|
00000600: 20 4F 39 00 0C 0E 63 02 AB 43 4C 43 00 18 0E 64 | O9...c..CLC...d|
00000610: 02 AB 41 44 43 20 4B 39 00 24 0E 65 02 AB 53 54 |..ADC K9.$.e..ST|
00000620: 41 20 4F 39 00 2D 0E 66 02 AB 54 41 58 00 3B 0E |A O9.-.f..TAX.;.|
00000630: 67 02 AB 4C 44 41 20 4F 39 AA 31 00 49 0E 68 02 |g..LDA O9.1.I.h.|
00000640: AB 41 44 43 20 4B 39 AA 31 00 57 0E 69 02 AB 53 |.ADC K9.1.W.i..S|
00000650: 54 41 20 4F 39 AA 31 00 60 0E 6A 02 AB 54 58 41 |TA O9.1.`.j..TXA|
00000660: 00 69 0E 6B 02 AB 53 45 43 00 75 0E 6C 02 AB 53 |.i.k..SEC.u.l..S|
00000670: 42 43 20 4A 39 00 7E 0E 6D 02 AB 54 41 58 00 8C |BC J9.~.m..TAX..|
00000680: 0E 6E 02 AB 4C 44 41 20 4F 39 AA 31 00 9A 0E 6F |.n..LDA O9.1...o|
00000690: 02 AB 53 42 43 20 4A 39 AA 31 00 A6 0E 70 02 AB |..SBC J9.1...p..|
000006A0: 42 43 43 20 33 35 00 B4 0E 71 02 AB 53 54 41 20 |BCC 35...q..STA |
000006B0: 4F 39 AA 31 00 C0 0E 72 02 AB 53 54 58 20 4F 39 |O9.1...r..STX O9|
000006C0: 00 CC 0E 73 02 AB 4C 44 41 20 41 39 00 D5 0E 74 |...s..LDA A9...t|
000006D0: 02 AB 43 4C 43 00 E1 0E 75 02 AB 41 44 43 20 48 |..CLC...u..ADC H|
000006E0: 39 00 ED 0E 76 02 AB 53 54 41 20 41 39 00 FB 0E |9...v..STA A9...|
000006F0: 77 02 AB 4C 44 41 20 41 39 AA 31 00 09 0F 78 02 |w..LDA A9.1...x.|
00000700: AB 41 44 43 20 48 39 AA 31 00 17 0F 79 02 AB 53 |.ADC H9.1...y..S|
00000710: 54 41 20 41 39 AA 31 00 23 0F 7A 02 AB 4C 44 41 |TA A9.1.#.z..LDA|
00000720: 20 42 39 00 2C 0F 7B 02 AB 43 4C 43 00 38 0F 7C | B9.,.{..CLC.8.||
00000730: 02 AB 41 44 43 20 4D 39 00 44 0F 7D 02 AB 53 54 |..ADC M9.D.}..ST|
00000740: 41 20 42 39 00 50 0F 80 02 AB 44 45 43 20 4E 39 |A B9.P....DEC N9|
00000750: 00 5E 0F 81 02 AB 42 4E 45 20 5C 35 38 30 00 6C |.^....BNE \580.l|
00000760: 0F 82 02 AB 44 45 43 20 4E 39 AA 31 00 7A 0F 83 |....DEC N9.1.z..|
00000770: 02 AB 42 50 4C 20 5C 35 38 30 00 83 0F 8A 02 89 |..BPL \580......|
00000780: 32 30 32 00 8F 0F 20 03 96 20 53 45 54 28 29 00 |202... .. SET().|
00000790: 9C 0F 22 03 3A AB 4C 44 59 20 23 34 00 B0 0F 24 |..".:.LDY #4...$|
000007A0: 03 3A AB 4C 44 41 20 5C 38 30 34 AA 31 30 2C 59 |.:.LDA \804.10,Y|
000007B0: 00 C0 0F 26 03 AB 53 54 41 20 5C 32 35 30 2C 59 |...&..STA \250,Y|
000007C0: 00 C9 0F 28 03 AB 44 45 59 00 D7 0F 2A 03 AB 42 |...(..DEY...*..B|
000007D0: 50 4C 20 5C 38 30 34 00 E0 0F 2C 03 AB 52 54 53 |PL \804...,..RTS|
000007E0: 00 EF 0F 40 03 AB B0 41 20 28 32 30 29 2C 59 00 |...@...A (20),Y.|
000007F0: FF 0F 42 03 AB 53 54 41 20 28 32 30 29 2C 59 00 |..B..STA (20),Y.|
00000800: 08 10 44 03 AB 52 54 53 00 14 10 48 03 96 20 49 |..D..RTS...H.. I|
00000810: 4E 56 28 29 00 22 10 4A 03 AB 4A 53 52 20 5C 38 |NV().".J..JSR \8|
00000820: 30 32 00 2F 10 4C 03 AB 4C 44 41 20 23 38 31 00 |02./.L..LDA #81.|
00000830: 3D 10 4E 03 AB 53 54 41 20 5C 32 35 30 00 46 10 |=.N..STA \250.F.|
00000840: 50 03 AB 52 54 53 00 52 10 5C 03 96 20 44 45 4C |P..RTS.R.\.. DEL|
00000850: 28 29 00 5E 10 5E 03 AB 4C 44 59 20 23 35 00 72 |().^.^..LDY #5.r|
00000860: 10 60 03 3A AB 4C 44 41 20 5C 38 36 34 AA 31 30 |.`.:.LDA \864.10|
00000870: 2C 59 00 82 10 62 03 AB 53 54 41 20 5C 32 35 30 |,Y...b..STA \250|
00000880: 2C 59 00 8B 10 64 03 AB 44 45 59 00 99 10 66 03 |,Y...d..DEY...f.|
00000890: AB 42 50 4C 20 5C 38 36 34 00 A2 10 68 03 AB 52 |.BPL \864...h..R|
000008A0: 54 53 00 AF 10 70 03 AB 45 B0 20 23 24 46 46 00 |TS...p..E. #$FF.|
000008B0: BD 10 72 03 AB AF 20 28 32 30 29 2C 59 00 CD 10 |..r... (20),Y...|
000008C0: 74 03 AB 53 54 41 20 28 32 30 29 2C 59 00 E4 10 |t..STA (20),Y...|
000008D0: 84 03 96 20 43 49 52 43 4C 45 28 45 39 2C 46 39 |... CIRCLE(E9,F9|
000008E0: 2C 4B 39 29 00 F7 10 8E 03 48 39 B2 4B 39 AC 4B |,K9).....H9.K9.K|
000008F0: 39 3A 49 39 B2 48 39 00 0F 11 98 03 81 20 4A 39 |9:I9.H9...... J9|
00000900: B2 30 20 A4 20 33 35 33 AC 4B 39 AD 34 39 39 00 |.0 . 353.K9.499.|
00000910: 30 11 A2 03 8B 49 39 B1 48 39 A7 49 39 B2 49 39 |0....I9.H9.I9.I9|
00000920: AB 4B 39 AB 4B 39 AA 31 3A 44 45 43 28 4B 39 29 |.K9.K9.1:DEC(K9)|
00000930: 00 42 11 AC 03 48 39 B2 48 39 AB 4A 39 AB 4A 39 |.B...H9.H9.J9.J9|
00000940: AB 31 00 63 11 CA 03 41 39 B2 45 39 AB 4A 39 3A |.1.c...A9.E9.J9:|
00000950: 42 39 B2 46 39 AB 4B 39 3A 47 39 B2 42 39 3A 8D |B9.F9.K9:G9.B9:.|
00000960: 32 30 32 00 75 11 CF 03 42 39 B2 46 39 AA 4B 39 |202.u...B9.F9.K9|
00000970: 3A 8D 32 30 32 00 87 11 D4 03 41 39 B2 45 39 AA |:.202.....A9.E9.|
00000980: 4A 39 3A 8D 32 30 32 00 96 11 D9 03 42 39 B2 47 |J9:.202.....B9.G|
00000990: 39 3A 8D 32 30 32 00 B7 11 DE 03 41 39 B2 45 39 |9:.202.....A9.E9|
000009A0: AB 4B 39 3A 42 39 B2 46 39 AB 4A 39 3A 47 39 B2 |.K9:B9.F9.J9:G9.|
000009B0: 42 39 3A 8D 32 30 32 00 C9 11 E3 03 42 39 B2 46 |B9:.202.....B9.F|
000009C0: 39 AA 4A 39 3A 8D 32 30 32 00 DB 11 E8 03 41 39 |9.J9:.202.....A9|
000009D0: B2 45 39 AA 4B 39 3A 8D 32 30 32 00 EA 11 ED 03 |.E9.K9:.202.....|
000009E0: 42 39 B2 47 39 3A 8D 32 30 32 00 F0 11 F2 03 82 |B9.G9:.202......|
000009F0: 00 F6 11 FC 03 8E 00 00 00 |......... |
....... GRAF1()......LDA 53272.).....A #
8.8....STA 53272.G....LDA 53265.S. ...A
#32.B."..STA 53265.H.(...}.2.:.< 0,64,12
8,192...3..< 0,64,128,192...4..< 0,64,12
8,192...5..< 0,64,128,192.M.6..< 0,64,12
8,192...7..< 0,64,128,192,0...<.:.$< 20,
21,22,23...=..$< 25,26,27,28. .>..$< 2A,
2B,2C,2D.4.?..$< 2F,30,31,32.H.@..$< 34,
35,36,37._.A..$< 39,3A,3B,3C,3E.|.F.:.<
128,64,32,16,8,4,2,1...D.. GRAF0()...N..
LDA 53272...P... #247...R..STA 53272.C.X
..LDA 53265.O.Z... #223...|..STA 53265..
....JMP 58692...H.. SETPIXEL(A9,B9)...J.
:.LDA B9...K..TAX.,.L..LSR:.LSR:.LSR.5.M
..TAY.>.N..CLC.G.O..TXA.Q.P... #7.`.Q..A
DC \50,Y.L.R..STA 20.X.S..LDA A9...T...
#$F8...U..ADC 20...V..STA 20...W..LDA \6
0,Y...X..ADC A9.1.E.Y..STA 21.Q.Z..LDA A
9....... #7......TAY......LDA \70,Y.....
.LDY #0.....:..A (20),Y......STA (20),Y.
(....RTS.6....NOP:.RTS.D.,.. CLS(A9)._.6
..B9.8192.16191:.B9,0:..Z.@..B9.1024.202
3:.B9,A9:....J........ GTPIXEL(A9,B9)...
...LDA \250......PHA......LDA #96.G. ..S
TA \250.U....JSR \202....... (20),Y.....
.TAY......PLA......STA \250......LDX #0.
.....TYA.#....BNE 3./....LDA #0.8....RTS
.D....LDA #1.M....RTS.E.... LINE(A9,B9,F
9,G9).S...H9.0:I9.0......F9.A9.J9.F9.A9:
L9.1:.540.....J9.A9.F9:L9..1.C...:.G9.B9
.K9.G9.B9:M9.1:.560.V.&.K9.B9.G9:M9..1..
.0.:.J9.K9.C9.J9:J9.K9:K9.C9:H9.L9:I9.M9
:L9.0:M9.0...:.O9.J9.2:N9.1.'.<..LDA J9.
3.=..STA N9.@.>...A J9.1.M.?..BEQ 117.[.
@..LDA J9.1.I.A..STA N9.1.S.D.:.202..F.
.LDA A9...G..CLC...H..ADC L9. .I..STA A9
...J..LDA A9.1...K..ADC L9.1.J.L..STA A9
.1.V.N..LDA B9...O..CLC...P..ADC I9...Q.
.STA B9...B..LDA O9...C..CLC...D..ADC K9
.$.E..STA O9.-.F..TAX.;.G..LDA O9.1.I.H.
.ADC K9.1.W.I..STA O9.1.`.J..TXA.I.K..SE
C.U.L..SBC J9.~.M..TAX...N..LDA O9.1...O
..SBC J9.1...P..BCC 35...Q..STA O9.1...R
..STX O9.L.S..LDA A9.U.T..CLC...U..ADC H
9...V..STA A9...W..LDA A9.1...X..ADC H9.
1...Y..STA A9.1.#.Z..LDA B9.,.{..CLC.8.|
..ADC M9.D.}..STA B9.P....DEC N9.^....BN
E \580.L....DEC N9.1.Z....BPL \580......
202... .. SET()...".:.LDY #4...$.:.LDA \
804.10,Y...&..STA \250,Y.I.(..DEY.W.*..B
PL \804...,..RTS...@...A (20),Y...B..STA
(20),Y...D..RTS...H.. INV().".J..JSR \8
02./.L..LDA #81.=.N..STA \250.F.P..RTS.R
.\.. DEL().^.^..LDY #5.R.`.:.LDA \864.10
,Y...B..STA \250,Y...D..DEY...F..BPL \86
4...H..RTS...P..E. #$FF...R... (20),Y.M.
T..STA (20),Y...... CIRCLE(E9,F9,K9)....
.H9.K9.K9:I9.H9...... J9.0 . 353.K9.499.
0....I9.H9.I9.I9.K9.K9.1:DEC(K9).B...H9.
H9.J9.J9.1.C.J.A9.E9.J9:B9.F9.K9:G9.B9:.
202.U.O.B9.F9.K9:.202...T.A9.E9.J9:.202.
..Y.B9.G9:.202.....A9.E9.K9:B9.F9.J9:G9.
B9:.202.I...B9.F9.J9:.202.....A9.E9.K9:.
202.....B9.G9:.202...............
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL