_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL