MGRAPH
FILE INFORMATION
FILENAME(S): MGRAPH
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 16:59:31
APPEARS ON: 1 disk(s)
FILE HASH
85c2060cd83da8fa99bed4df2208fb41ca23441c0bc25df5b5fb3f526d61b752
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DIABOLO | MGRAPH | PRG | High Voltage Complete C64 Collection, Sailor, Pbv | 14 | 8 | 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 71 08 24 00 AB 4C 44 41 20 35 33 32 37 |65.q.$..LDA 5327|
00000070: 30 00 7D 08 26 00 AB B0 41 20 23 31 36 00 8C 08 |0.}.&...A #16...|
00000080: 27 00 AB 53 54 41 20 35 33 32 37 30 00 92 08 28 |'..STA 53270...(|
00000090: 00 8E 00 A7 08 32 00 3A 83 3C 20 30 2C 36 34 2C |.....2.:.< 0,64,|
000000A0: 31 32 38 2C 31 39 32 00 BB 08 33 00 83 3C 20 30 |128,192...3..< 0|
000000B0: 2C 36 34 2C 31 32 38 2C 31 39 32 00 CF 08 34 00 |,64,128,192...4.|
000000C0: 83 3C 20 30 2C 36 34 2C 31 32 38 2C 31 39 32 00 |.< 0,64,128,192.|
000000D0: E3 08 35 00 83 3C 20 30 2C 36 34 2C 31 32 38 2C |..5..< 0,64,128,|
000000E0: 31 39 32 00 F7 08 36 00 83 3C 20 30 2C 36 34 2C |192...6..< 0,64,|
000000F0: 31 32 38 2C 31 39 32 00 0D 09 37 00 83 3C 20 30 |128,192...7..< 0|
00000100: 2C 36 34 2C 31 32 38 2C 31 39 32 2C 30 00 22 09 |,64,128,192,0.".|
00000110: 3C 00 3A 83 24 3C 20 32 30 2C 32 31 2C 32 32 2C |<.:.$< 20,21,22,|
00000120: 32 33 00 36 09 3D 00 83 24 3C 20 32 35 2C 32 36 |23.6.=..$< 25,26|
00000130: 2C 32 37 2C 32 38 00 4A 09 3E 00 83 24 3C 20 32 |,27,28.J.>..$< 2|
00000140: 41 2C 32 42 2C 32 43 2C 32 44 00 5E 09 3F 00 83 |A,2B,2C,2D.^.?..|
00000150: 24 3C 20 32 46 2C 33 30 2C 33 31 2C 33 32 00 72 |$< 2F,30,31,32.r|
00000160: 09 40 00 83 24 3C 20 33 34 2C 33 35 2C 33 36 2C |.@..$< 34,35,36,|
00000170: 33 37 00 89 09 41 00 83 24 3C 20 33 39 2C 33 41 |37...A..$< 39,3A|
00000180: 2C 33 42 2C 33 43 2C 33 45 00 A0 09 46 00 3A 83 |,3B,3C,3E...F.:.|
00000190: 3C 20 36 33 2C 32 30 37 2C 32 34 33 2C 32 35 32 |< 63,207,243,252|
000001A0: 00 B4 09 4B 00 3A 83 3C 20 31 39 32 2C 34 38 2C |...K.:.< 192,48,|
000001B0: 31 32 2C 33 00 C6 09 50 00 3A 83 3C 20 36 34 2C |12,3...P.:.< 64,|
000001C0: 31 36 2C 34 2C 31 00 D9 09 5A 00 3A 83 3C 20 31 |16,4,1...Z.:.< 1|
000001D0: 32 38 2C 33 32 2C 38 2C 32 00 E7 09 64 00 96 20 |28,32,8,2...d.. |
000001E0: 47 52 41 46 30 28 29 00 F6 09 6E 00 AB 4C 44 41 |GRAF0()...n..LDA|
000001F0: 20 35 33 32 37 32 00 02 0A 70 00 AB AF 20 23 32 | 53272...p... #2|
00000200: 34 37 00 11 0A 72 00 AB 53 54 41 20 35 33 32 37 |47...r..STA 5327|
00000210: 32 00 20 0A 78 00 AB 4C 44 41 20 35 33 32 36 35 |2. .x..LDA 53265|
00000220: 00 2C 0A 7A 00 AB AF 20 23 32 32 33 00 3B 0A 7C |.,.z... #223.;.||
00000230: 00 AB 53 54 41 20 35 33 32 36 35 00 4A 0A 82 00 |..STA 53265.J...|
00000240: AB 4C 44 41 20 35 33 32 37 30 00 56 0A 84 00 AB |.LDA 53270.V....|
00000250: AF 20 23 32 33 39 00 65 0A 86 00 AB 53 54 41 20 |. #239.e....STA |
00000260: 35 33 32 37 30 00 74 0A 8C 00 AB 4A 4D 50 20 35 |53270.t....JMP 5|
00000270: 38 36 39 32 00 8A 0A C8 00 96 20 53 45 54 50 49 |8692...... SETPI|
00000280: 58 45 4C 28 41 39 2C 42 39 29 00 97 0A CA 00 3A |XEL(A9,B9).....:|
00000290: AB 4C 44 41 20 42 39 00 A0 0A CB 00 AB 54 41 59 |.LDA B9......TAY|
000002A0: 00 B3 0A CC 00 AB 4C 53 52 3A AB 4C 53 52 3A AB |......LSR:.LSR:.|
000002B0: 4C 53 52 00 BC 0A CD 00 AB 54 41 58 00 C5 0A CE |LSR......TAX....|
000002C0: 00 AB 43 4C 43 00 CE 0A CF 00 AB 54 59 41 00 D8 |..CLC......TYA..|
000002D0: 0A D0 00 AB AF 20 23 37 00 E7 0A D1 00 AB 41 44 |..... #7......AD|
000002E0: 43 20 5C 35 30 2C 58 00 F3 0A D2 00 AB 53 54 41 |C \50,X......STA|
000002F0: 20 32 30 00 FF 0A D3 00 AB 4C 44 41 20 41 39 00 | 20......LDA A9.|
00000300: 0B 0B D4 00 AB 4C 44 59 20 23 30 00 1D 0B D5 00 |.....LDY #0.....|
00000310: 3A AB 53 54 59 20 5C 32 31 33 AA 31 37 00 29 0B |:.STY \213.17.).|
00000320: D6 00 AB AF 20 23 24 46 43 00 32 0B D7 00 AB 41 |.... #$FC.2....A|
00000330: 53 4C 00 43 0B D8 00 AB 52 4F 4C 20 5C 32 31 33 |SL.C....ROL \213|
00000340: AA 31 37 00 4F 0B D9 00 AB 41 44 43 20 32 30 00 |.17.O....ADC 20.|
00000350: 5B 0B DA 00 AB 53 54 41 20 32 30 00 6A 0B DB 00 |[....STA 20.j...|
00000360: AB 4C 44 41 20 5C 36 30 2C 58 00 76 0B DC 00 AB |.LDA \60,X.v....|
00000370: 41 44 43 20 23 30 00 82 0B DD 00 AB 53 54 41 20 |ADC #0......STA |
00000380: 32 31 00 8E 0B DE 00 AB 4C 44 41 20 41 39 00 98 |21......LDA A9..|
00000390: 0B DF 00 AB AF 20 23 33 00 A1 0B E0 00 AB 54 41 |..... #3......TA|
000003A0: 58 00 B1 0B E1 00 AB 4C 44 41 20 28 32 30 29 2C |X......LDA (20),|
000003B0: 59 00 BF 0B FA 00 3A AB AF 20 5C 37 30 2C 58 00 |Y.....:.. \70,X.|
000003C0: CD 0B FC 00 AB B0 41 20 5C 38 30 2C 58 00 DD 0B |......A \80,X...|
000003D0: FE 00 AB 53 54 41 20 28 32 30 29 2C 59 00 E6 0B |...STA (20),Y...|
000003E0: 00 01 AB 52 54 53 00 FA 0B 2C 01 96 20 43 4C 53 |...RTS...,.. CLS|
000003F0: 28 41 39 2C 42 39 2C 43 39 29 00 1A 0C 36 01 AB |(A9,B9,C9)...6..|
00000400: 4C 44 41 20 41 39 3A AB 41 53 4C 3A AB 41 53 4C |LDA A9:.ASL:.ASL|
00000410: 3A AB 41 53 4C 3A AB 41 53 4C 00 2E 0C 3B 01 AB |:.ASL:.ASL...;..|
00000420: 41 44 43 20 42 39 3A AB 53 54 41 20 41 39 00 49 |ADC B9:.STA A9.I|
00000430: 0C 40 01 81 42 39 B2 38 31 39 32 A4 31 36 31 39 |.@..B9.8192.1619|
00000440: 31 3A 97 42 39 2C 30 3A 82 00 71 0C 4A 01 81 42 |1:.B9,0:..q.J..B|
00000450: 39 B2 31 30 32 34 A4 32 30 32 33 3A 97 42 39 2C |9.1024.2023:.B9,|
00000460: 41 39 3A 97 35 34 32 37 32 AA 42 39 2C 43 39 3A |A9:.54272.B9,C9:|
00000470: 82 00 77 0C 54 01 8E 00 8C 0C 90 01 96 20 47 54 |..w.T........ GT|
00000480: 50 49 58 45 4C 28 41 39 2C 42 39 29 00 9A 0C 9A |PIXEL(A9,B9)....|
00000490: 01 AB 4C 44 41 20 5C 32 35 30 00 AC 0C 9C 01 3A |..LDA \250.....:|
000004A0: AB 53 54 41 20 5C 34 31 32 AA 32 36 00 B9 0C 9E |.STA \412.26....|
000004B0: 01 AB 4C 44 41 20 23 39 36 00 C7 0C A0 01 AB 53 |..LDA #96......S|
000004C0: 54 41 20 5C 32 35 30 00 D5 0C A2 01 AB 4A 53 52 |TA \250......JSR|
000004D0: 20 5C 32 30 32 00 DF 0C A6 01 3A AB 49 4E 58 00 | \202.....:.INX.|
000004E0: EB 0C A7 01 AB 43 50 58 20 23 34 00 F6 0C A8 01 |.....CPX #4.....|
000004F0: AB 42 45 51 20 35 00 FF 0C AA 01 AB 4C 53 52 00 |.BEQ 5......LSR.|
00000500: 08 0D AC 01 AB 4C 53 52 00 16 0D AE 01 AB 4A 4D |.....LSR......JM|
00000510: 50 20 5C 34 32 32 00 22 0D B0 01 AB 4C 44 58 20 |P \422."....LDX |
00000520: 23 30 00 2C 0D B2 01 AB AF 20 23 33 00 39 0D B4 |#0.,..... #3.9..|
00000530: 01 AB 4C 44 59 20 23 39 36 00 47 0D B6 01 AB 53 |..LDY #96.G....S|
00000540: 54 59 20 5C 32 35 30 00 4D 0D BA 01 8E 00 65 0D |TY \250.M.....e.|
00000550: F4 01 96 20 4C 49 4E 45 28 41 39 2C 42 39 2C 46 |... LINE(A9,B9,F|
00000560: 39 2C 47 39 29 00 73 0D FE 01 48 39 B2 30 3A 49 |9,G9).s...H9.0:I|
00000570: 39 B2 30 00 91 0D 08 02 8B 46 39 B1 41 39 A7 4A |9.0......F9.A9.J|
00000580: 39 B2 46 39 AB 41 39 3A 4C 39 B2 31 3A 89 35 34 |9.F9.A9:L9.1:.54|
00000590: 30 00 A4 0D 12 02 4A 39 B2 41 39 AB 46 39 3A 4C |0.....J9.A9.F9:L|
000005A0: 39 B2 AB 31 00 C3 0D 1C 02 3A 8B 47 39 B1 42 39 |9..1.....:.G9.B9|
000005B0: A7 4B 39 B2 47 39 AB 42 39 3A 4D 39 B2 31 3A 89 |.K9.G9.B9:M9.1:.|
000005C0: 35 36 30 00 D6 0D 26 02 4B 39 B2 42 39 AB 47 39 |560...&.K9.B9.G9|
000005D0: 3A 4D 39 B2 AB 31 00 0A 0E 30 02 3A 8B 4A 39 B3 |:M9..1...0.:.J9.|
000005E0: 4B 39 A7 43 39 B2 4A 39 3A 4A 39 B2 4B 39 3A 4B |K9.C9.J9:J9.K9:K|
000005F0: 39 B2 43 39 3A 48 39 B2 4C 39 3A 49 39 B2 4D 39 |9.C9:H9.L9:I9.M9|
00000600: 3A 4C 39 B2 30 3A 4D 39 B2 30 00 1B 0E 3A 02 4F |:L9.0:M9.0...:.O|
00000610: 39 B2 4A 39 AD 32 3A 4E 39 B2 31 00 27 0E 3C 02 |9.J9.2:N9.1.'.<.|
00000620: AB 4C 44 41 20 4A 39 00 33 0E 3D 02 AB 53 54 41 |.LDA J9.3.=..STA|
00000630: 20 4E 39 00 40 0E 3E 02 AB B0 41 20 4A 39 AA 31 | N9.@.>...A J9.1|
00000640: 00 4D 0E 3F 02 AB 42 45 51 20 31 31 37 00 5B 0E |.M.?..BEQ 117.[.|
00000650: 40 02 AB 4C 44 41 20 4A 39 AA 31 00 69 0E 41 02 |@..LDA J9.1.i.A.|
00000660: AB 53 54 41 20 4E 39 AA 31 00 73 0E 44 02 3A 8D |.STA N9.1.s.D.:.|
00000670: 32 30 32 00 7F 0E 46 02 AB 4C 44 41 20 41 39 00 |202...F..LDA A9.|
00000680: 88 0E 47 02 AB 43 4C 43 00 94 0E 48 02 AB 41 44 |..G..CLC...H..AD|
00000690: 43 20 4C 39 00 A0 0E 49 02 AB 53 54 41 20 41 39 |C L9...I..STA A9|
000006A0: 00 AE 0E 4A 02 AB 4C 44 41 20 41 39 AA 31 00 BC |...J..LDA A9.1..|
000006B0: 0E 4B 02 AB 41 44 43 20 4C 39 AA 31 00 CA 0E 4C |.K..ADC L9.1...L|
000006C0: 02 AB 53 54 41 20 41 39 AA 31 00 D6 0E 4E 02 AB |..STA A9.1...N..|
000006D0: 4C 44 41 20 42 39 00 DF 0E 4F 02 AB 43 4C 43 00 |LDA B9...O..CLC.|
000006E0: EB 0E 50 02 AB 41 44 43 20 49 39 00 F7 0E 51 02 |..P..ADC I9...Q.|
000006F0: AB 53 54 41 20 42 39 00 03 0F 62 02 AB 4C 44 41 |.STA B9...b..LDA|
00000700: 20 4F 39 00 0C 0F 63 02 AB 43 4C 43 00 18 0F 64 | O9...c..CLC...d|
00000710: 02 AB 41 44 43 20 4B 39 00 24 0F 65 02 AB 53 54 |..ADC K9.$.e..ST|
00000720: 41 20 4F 39 00 2D 0F 66 02 AB 54 41 58 00 3B 0F |A O9.-.f..TAX.;.|
00000730: 67 02 AB 4C 44 41 20 4F 39 AA 31 00 49 0F 68 02 |g..LDA O9.1.I.h.|
00000740: AB 41 44 43 20 4B 39 AA 31 00 57 0F 69 02 AB 53 |.ADC K9.1.W.i..S|
00000750: 54 41 20 4F 39 AA 31 00 60 0F 6A 02 AB 54 58 41 |TA O9.1.`.j..TXA|
00000760: 00 69 0F 6B 02 AB 53 45 43 00 75 0F 6C 02 AB 53 |.i.k..SEC.u.l..S|
00000770: 42 43 20 4A 39 00 7E 0F 6D 02 AB 54 41 58 00 8C |BC J9.~.m..TAX..|
00000780: 0F 6E 02 AB 4C 44 41 20 4F 39 AA 31 00 9A 0F 6F |.n..LDA O9.1...o|
00000790: 02 AB 53 42 43 20 4A 39 AA 31 00 A6 0F 70 02 AB |..SBC J9.1...p..|
000007A0: 42 43 43 20 33 35 00 B4 0F 71 02 AB 53 54 41 20 |BCC 35...q..STA |
000007B0: 4F 39 AA 31 00 C0 0F 72 02 AB 53 54 58 20 4F 39 |O9.1...r..STX O9|
000007C0: 00 CC 0F 73 02 AB 4C 44 41 20 41 39 00 D5 0F 74 |...s..LDA A9...t|
000007D0: 02 AB 43 4C 43 00 E1 0F 75 02 AB 41 44 43 20 48 |..CLC...u..ADC H|
000007E0: 39 00 ED 0F 76 02 AB 53 54 41 20 41 39 00 FB 0F |9...v..STA A9...|
000007F0: 77 02 AB 4C 44 41 20 41 39 AA 31 00 09 10 78 02 |w..LDA A9.1...x.|
00000800: AB 41 44 43 20 48 39 AA 31 00 17 10 79 02 AB 53 |.ADC H9.1...y..S|
00000810: 54 41 20 41 39 AA 31 00 23 10 7A 02 AB 4C 44 41 |TA A9.1.#.z..LDA|
00000820: 20 42 39 00 2C 10 7B 02 AB 43 4C 43 00 38 10 7C | B9.,.{..CLC.8.||
00000830: 02 AB 41 44 43 20 4D 39 00 44 10 7D 02 AB 53 54 |..ADC M9.D.}..ST|
00000840: 41 20 42 39 00 50 10 80 02 AB 44 45 43 20 4E 39 |A B9.P....DEC N9|
00000850: 00 5E 10 81 02 AB 42 4E 45 20 5C 35 38 30 00 6C |.^....BNE \580.l|
00000860: 10 82 02 AB 44 45 43 20 4E 39 AA 31 00 7A 10 83 |....DEC N9.1.z..|
00000870: 02 AB 42 50 4C 20 5C 35 38 30 00 83 10 8A 02 89 |..BPL \580......|
00000880: 32 30 32 00 90 10 20 03 96 20 43 4F 4C 30 28 29 |202... .. COL0()|
00000890: 00 9C 10 22 03 AB 4C 44 59 20 23 35 00 B0 10 24 |..."..LDY #5...$|
000008A0: 03 3A AB 4C 44 41 20 5C 38 30 34 AA 31 30 2C 59 |.:.LDA \804.10,Y|
000008B0: 00 C0 10 26 03 AB 53 54 41 20 5C 32 35 30 2C 59 |...&..STA \250,Y|
000008C0: 00 C9 10 28 03 AB 44 45 59 00 D7 10 2A 03 AB 42 |...(..DEY...*..B|
000008D0: 50 4C 20 5C 38 30 34 00 E0 10 2C 03 AB 52 54 53 |PL \804...,..RTS|
000008E0: 00 ED 10 40 03 AB AF 20 5C 37 30 2C 58 00 FD 10 |...@... \70,X...|
000008F0: 42 03 AB 53 54 41 20 28 32 30 29 2C 59 00 06 11 |B..STA (20),Y...|
00000900: 44 03 AB 52 54 53 00 13 11 48 03 96 20 43 4F 4C |D..RTS...H.. COL|
00000910: 31 28 29 00 1F 11 4A 03 AB 4C 44 59 20 23 37 00 |1()...J..LDY #7.|
00000920: 33 11 4C 03 3A AB 4C 44 41 20 5C 38 34 34 AA 31 |3.L.:.LDA \844.1|
00000930: 30 2C 59 00 43 11 4E 03 AB 53 54 41 20 5C 32 35 |0,Y.C.N..STA \25|
00000940: 30 2C 59 00 4C 11 50 03 AB 44 45 59 00 5A 11 52 |0,Y.L.P..DEY.Z.R|
00000950: 03 AB 42 50 4C 20 5C 38 34 34 00 63 11 54 03 AB |..BPL \844.c.T..|
00000960: 52 54 53 00 70 11 56 03 AB AF 20 5C 37 30 2C 58 |RTS.p.V... \70,X|
00000970: 00 7E 11 58 03 AB B0 41 20 5C 38 30 2C 58 00 8E |.~.X...A \80,X..|
00000980: 11 5A 03 AB 53 54 41 20 28 32 30 29 2C 59 00 9B |.Z..STA (20),Y..|
00000990: 11 5C 03 96 20 43 4F 4C 32 28 29 00 A7 11 5E 03 |.\.. COL2()...^.|
000009A0: AB 4C 44 59 20 23 37 00 BB 11 60 03 3A AB 4C 44 |.LDY #7...`.:.LD|
000009B0: 41 20 5C 38 36 34 AA 31 30 2C 59 00 CB 11 62 03 |A \864.10,Y...b.|
000009C0: AB 53 54 41 20 5C 32 35 30 2C 59 00 D4 11 64 03 |.STA \250,Y...d.|
000009D0: AB 44 45 59 00 E2 11 66 03 AB 42 50 4C 20 5C 38 |.DEY...f..BPL \8|
000009E0: 36 34 00 EB 11 68 03 AB 52 54 53 00 F8 11 6A 03 |64...h..RTS...j.|
000009F0: AB AF 20 5C 37 30 2C 58 00 06 12 6C 03 AB B0 41 |.. \70,X...l...A|
00000A00: 20 5C 39 30 2C 58 00 16 12 6E 03 AB 53 54 41 20 | \90,X...n..STA |
00000A10: 28 32 30 29 2C 59 00 23 12 70 03 96 20 43 4F 4C |(20),Y.#.p.. COL|
00000A20: 33 28 29 00 2F 12 72 03 AB 4C 44 59 20 23 35 00 |3()./.r..LDY #5.|
00000A30: 43 12 74 03 3A AB 4C 44 41 20 5C 38 38 34 AA 31 |C.t.:.LDA \884.1|
00000A40: 30 2C 59 00 53 12 76 03 AB 53 54 41 20 5C 32 35 |0,Y.S.v..STA \25|
00000A50: 30 2C 59 00 5C 12 78 03 AB 44 45 59 00 6A 12 7A |0,Y.\.x..DEY.j.z|
00000A60: 03 AB 42 50 4C 20 5C 38 38 34 00 73 12 7C 03 AB |..BPL \884.s.|..|
00000A70: 52 54 53 00 81 12 7E 03 AB B0 41 20 5C 37 35 2C |RTS...~...A \75,|
00000A80: 58 00 91 12 7F 03 AB 53 54 41 20 28 32 30 29 2C |X......STA (20),|
00000A90: 59 00 9A 12 80 03 AB 52 54 53 00 B1 12 84 03 96 |Y......RTS......|
00000AA0: 20 43 49 52 43 4C 45 28 45 39 2C 46 39 2C 4B 39 | CIRCLE(E9,F9,K9|
00000AB0: 29 00 C4 12 8E 03 48 39 B2 4B 39 AC 4B 39 3A 49 |).....H9.K9.K9:I|
00000AC0: 39 B2 48 39 00 DC 12 98 03 81 20 4A 39 B2 30 20 |9.H9...... J9.0 |
00000AD0: A4 20 33 35 33 AC 4B 39 AD 34 39 39 00 FD 12 A2 |. 353.K9.499....|
00000AE0: 03 8B 49 39 B1 48 39 A7 49 39 B2 49 39 AB 4B 39 |..I9.H9.I9.I9.K9|
00000AF0: AB 4B 39 AA 31 3A 44 45 43 28 4B 39 29 00 0F 13 |.K9.1:DEC(K9)...|
00000B00: AC 03 48 39 B2 48 39 AB 4A 39 AB 4A 39 AB 31 00 |..H9.H9.J9.J9.1.|
00000B10: 30 13 CA 03 41 39 B2 45 39 AB 4A 39 3A 42 39 B2 |0...A9.E9.J9:B9.|
00000B20: 46 39 AB 4B 39 3A 47 39 B2 42 39 3A 8D 32 30 32 |F9.K9:G9.B9:.202|
00000B30: 00 42 13 CF 03 42 39 B2 46 39 AA 4B 39 3A 8D 32 |.B...B9.F9.K9:.2|
00000B40: 30 32 00 54 13 D4 03 41 39 B2 45 39 AA 4A 39 3A |02.T...A9.E9.J9:|
00000B50: 8D 32 30 32 00 63 13 D9 03 42 39 B2 47 39 3A 8D |.202.c...B9.G9:.|
00000B60: 32 30 32 00 84 13 DE 03 41 39 B2 45 39 AB 4B 39 |202.....A9.E9.K9|
00000B70: 3A 42 39 B2 46 39 AB 4A 39 3A 47 39 B2 42 39 3A |:B9.F9.J9:G9.B9:|
00000B80: 8D 32 30 32 00 96 13 E3 03 42 39 B2 46 39 AA 4A |.202.....B9.F9.J|
00000B90: 39 3A 8D 32 30 32 00 A8 13 E8 03 41 39 B2 45 39 |9:.202.....A9.E9|
00000BA0: AA 4B 39 3A 8D 32 30 32 00 B7 13 ED 03 42 39 B2 |.K9:.202.....B9.|
00000BB0: 47 39 3A 8D 32 30 32 00 BD 13 F2 03 82 00 C3 13 |G9:.202.........|
00000BC0: FC 03 8E 00 00 00 |...... |
....... GRAF1()......LDA 53272.).....A #
8.8....STA 53272.G....LDA 53265.S. ...A
#32.B."..STA 53265.Q.$..LDA 53270.}.&...
A #16...'..STA 53270...(.....2.:.< 0,64,
128,192...3..< 0,64,128,192.O.4..< 0,64,
128,192...5..< 0,64,128,192...6..< 0,64,
128,192...7..< 0,64,128,192,0.".<.:.$< 2
0,21,22,23.6.=..$< 25,26,27,28.J.>..$< 2
A,2B,2C,2D.^.?..$< 2F,30,31,32.R.@..$< 3
4,35,36,37...A..$< 39,3A,3B,3C,3E. .F.:.
< 63,207,243,252...K.:.< 192,48,12,3.F.P
.:.< 64,16,4,1.Y.Z.:.< 128,32,8,2...D..
GRAF0()...N..LDA 53272...P... #247...R..
STA 53272. .X..LDA 53265.,.Z... #223.;.|
..STA 53265.J....LDA 53270.V..... #239.E
....STA 53270.T....JMP 58692...H.. SETPI
XEL(A9,B9)...J.:.LDA B9. .K..TAY...L..LS
R:.LSR:.LSR...M..TAX.E.N..CLC.N.O..TYA.X
.P... #7...Q..ADC \50,X...R..STA 20...S.
.LDA A9...T..LDY #0...U.:.STY \213.17.).
V... #$FC.2.W..ASL.C.X..ROL \213.17.O.Y.
.ADC 20.[.Z..STA 20.J....LDA \60,X.V....
ADC #0......STA 21......LDA A9....... #3
......TAX......LDA (20),Y.....:.. \70,X.
M.....A \80,X......STA (20),Y......RTS..
.,.. CLS(A9,B9,C9)...6..LDA A9:.ASL:.ASL
:.ASL:.ASL...;..ADC B9:.STA A9.I.@..B9.8
192.16191:.B9,0:..Q.J..B9.1024.2023:.B9,
A9:.54272.B9,C9:..W.T........ GTPIXEL(A9
,B9)......LDA \250.....:.STA \412.26....
..LDA #96.G. ..STA \250.U....JSR \202...
..:.INX......CPX #4......BEQ 5......LSR.
.....LSR......JMP \422."....LDX #0.,....
. #3.9....LDY #96.G....STY \250.M.....E.
... LINE(A9,B9,F9,G9).S...H9.0:I9.0.....
.F9.A9.J9.F9.A9:L9.1:.540.....J9.A9.F9:L
9..1.C...:.G9.B9.K9.G9.B9:M9.1:.560.V.&.
K9.B9.G9:M9..1...0.:.J9.K9.C9.J9:J9.K9:K
9.C9:H9.L9:I9.M9:L9.0:M9.0...:.O9.J9.2:N
9.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..AD
C 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..SEC.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 H9...V..STA A9...W..LDA A
9.1...X..ADC H9.1...Y..STA A9.1.#.Z..LDA
B9.,.{..CLC.8.|..ADC M9.D.}..STA B9.P..
..DEC N9.^....BNE \580.L....DEC N9.1.Z..
..BPL \580......202... .. COL0()..."..LD
Y #5...$.:.LDA \804.10,Y...&..STA \250,Y
.I.(..DEY.W.*..BPL \804...,..RTS...@...
\70,X...B..STA (20),Y...D..RTS...H.. COL
1()...J..LDY #7.3.L.:.LDA \844.10,Y.C.N.
.STA \250,Y.L.P..DEY.Z.R..BPL \844.C.T..
RTS.P.V... \70,X.~.X...A \80,X...Z..STA
(20),Y...\.. COL2()...^..LDY #7...`.:.LD
A \864.10,Y.K.B..STA \250,Y.T.D..DEY...F
..BPL \864...H..RTS...J... \70,X...L...A
\90,X...N..STA (20),Y.#.P.. COL3()./.R.
.LDY #5.C.T.:.LDA \884.10,Y.S.V..STA \25
0,Y.\.X..DEY.J.Z..BPL \884.S.|..RTS...~.
..A \75,X.....STA (20),Y......RTS......
CIRCLE(E9,F9,K9).D...H9.K9.K9:I9.H9....
.. J9.0 . 353.K9.499......I9.H9.I9.I9.K9
.K9.1:DEC(K9).....H9.H9.J9.J9.1.0.J.A9.E
9.J9:B9.F9.K9:G9.B9:.202.B.O.B9.F9.K9:.2
02.T.T.A9.E9.J9:.202.C.Y.B9.G9:.202.....
A9.E9.K9:B9.F9.J9:G9.B9:.202.....B9.F9.J
9:.202.....A9.E9.K9:.202.....B9.G9:.202.
......C.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL