00000000: 01 09 46 09 0A 00 44 B2 38 3A 45 B2 36 35 3A 41 |..F...D.8:E.65:A|
00000010: B2 45 3A 46 B2 31 34 37 3A 45 24 B2 C7 28 46 29 |.E:F.147:E$..(F)|
00000020: 3A 50 B2 35 37 38 31 32 3A 4C B2 36 32 36 33 31 |:P.57812:L.62631|
00000030: 3A 53 B2 36 32 39 35 37 3A 8B C2 28 36 38 37 29 |:S.62957:..(687)|
00000040: B2 35 34 A7 32 35 00 7A 09 0F 00 97 46 2C 30 3A |.54.25.z....F,0:|
00000050: 9E 50 C7 28 45 29 AA 22 20 43 4F 4F 52 44 2E 4F |.P.(E)." COORD.O|
00000060: 42 4A 22 2C 44 2C 31 3A 9E 4C 3A 45 B2 45 AA 31 |BJ",D,1:.L:E.E.1|
00000070: 3A 8B 45 B3 41 AA 32 A7 31 35 00 A5 09 19 00 52 |:.E.A.2.15.....R|
00000080: 45 53 45 54 B2 36 38 31 3A 43 4C 45 41 52 B2 36 |ESET.681:CLEAR.6|
00000090: 38 36 3A 50 4C 4F 54 B2 37 30 37 3A 45 52 41 53 |86:PLOT.707:ERAS|
000000A0: 45 B2 37 31 34 00 EF 09 1E 00 53 45 54 46 4C 41 |E.714.....SETFLA|
000000B0: 47 B2 37 36 37 3A 49 4E 49 54 B2 31 30 32 30 3A |G.767:INIT.1020:|
000000C0: 4D 46 4C 41 47 B2 30 3A 8F 20 4D 46 4C 41 47 3D |MFLAG.0:. MFLAG=|
000000D0: 31 20 54 55 52 4E 53 20 4F 4E 20 4D 55 4C 54 49 |1 TURNS ON MULTI|
000000E0: 43 4F 4C 4F 52 2C 20 30 20 49 53 20 4F 46 46 00 |COLOR, 0 IS OFF.|
000000F0: 0B 0A 28 00 46 47 B2 36 34 36 3A 42 4F B2 35 33 |..(.FG.646:BO.53|
00000100: 32 38 30 3A 42 47 B2 42 4F AA 31 00 4E 0A 2D 00 |280:BG.BO.1.N.-.|
00000110: 8B 4D 46 A7 4D 32 B2 42 4F AA 32 3A 4D 33 B2 42 |.MF.M2.BO.2:M3.B|
00000120: 4F AA 33 3A 97 4D 32 2C 36 3A 97 4D 33 2C 34 3A |O.3:.M2,6:.M3,4:|
00000130: 8F 20 53 45 54 20 4D 55 4C 54 49 43 4F 4C 4F 52 |. SET MULTICOLOR|
00000140: 20 52 45 47 53 2E 20 28 4D 31 3D 46 47 29 00 76 | REGS. (M1=FG).v|
00000150: 0A 37 00 42 41 4E 4B B2 31 3A 53 43 4E 4F 46 46 |.7.BANK.1:SCNOFF|
00000160: 53 45 54 B2 31 3A 43 4F 4C 4F 46 46 53 45 54 B2 |SET.1:COLOFFSET.|
00000170: 37 3A 8D 31 38 35 00 B4 0A 41 00 97 42 4F 2C 30 |7:.185...A..BO,0|
00000180: 3A 97 42 47 2C 30 3A 97 46 47 2C 31 3A 59 B2 31 |:.BG,0:.FG,1:Y.1|
00000190: 30 30 3A 58 B2 31 36 30 3A 9E 43 4C 45 41 52 3A |00:X.160:.CLEAR:|
000001A0: 4F B2 58 3A 4E B2 59 3A 8F 20 53 45 54 20 53 43 |O.X:N.Y:. SET SC|
000001B0: 52 45 45 4E 00 F6 0A 46 00 81 52 B2 37 A4 38 37 |REEN...F..R.7.87|
000001C0: A9 38 3A 97 42 47 2C AB 28 52 AD 38 B1 37 29 AC |.8:.BG,.(R.8.7).|
000001D0: 52 AD 37 3A 97 46 47 2C 52 AD 37 AB 38 AC 28 52 |R.7:.FG,R.7.8.(R|
000001E0: AD 38 B1 37 29 3A 8F 20 52 41 44 49 55 53 20 26 |.8.7):. RADIUS &|
000001F0: 20 43 4F 4C 4F 52 00 36 0B 4B 00 81 41 B2 30 A4 | COLOR.6.K..A.0.|
00000200: FF AD 32 A9 32 AD 52 3A 58 B2 52 AC BF 28 41 29 |..2.2.R:X.R..(A)|
00000210: AA 4F 3A 59 B2 52 AC BE 28 41 29 AA 4E 3A 9E 50 |.O:Y.R..(A).N:.P|
00000220: 4C 4F 54 3A 8F 20 53 57 45 45 50 20 39 30 20 44 |LOT:. SWEEP 90 D|
00000230: 45 47 52 45 45 53 00 7E 0B 50 00 58 B2 AB 58 AA |EGREES.~.P.X..X.|
00000240: 32 AC 4F 3A 9E 50 4C 4F 54 3A 59 B2 AB 59 AA 32 |2.O:.PLOT:Y..Y.2|
00000250: AC 4E 3A 9E 50 4C 4F 54 3A 58 B2 AB 58 AA 32 AC |.N:.PLOT:X..X.2.|
00000260: 4F 3A 9E 50 4C 4F 54 3A 8F 20 42 55 54 20 50 4C |O:.PLOT:. BUT PL|
00000270: 4F 54 20 34 20 51 55 41 44 52 41 4E 54 53 00 85 |OT 4 QUADRANTS..|
00000280: 0B 55 00 82 41 00 8C 0B 5A 00 82 52 00 C6 0B 5F |.U..A...Z..R..._|
00000290: 00 8B 4D 46 A7 97 4D 33 2C 35 3A 8F 20 42 49 54 |..MF..M3,5:. BIT|
000002A0: 20 50 41 54 54 45 52 4E 20 31 2C 31 20 50 4C 4F | PATTERN 1,1 PLO|
000002B0: 54 53 20 47 52 45 45 4E 20 49 46 20 4D 55 4C 54 |TS GREEN IF MULT|
000002C0: 49 43 4F 4C 4F 52 00 06 0C 64 00 59 B2 31 30 30 |ICOLOR...d.Y.100|
000002D0: 3A 81 58 B2 30 A4 33 31 39 3A 97 42 47 2C 58 AD |:.X.0.319:.BG,X.|
000002E0: 38 3A 97 46 47 2C 58 AD 38 AA 31 3A 9E 50 4C 4F |8:.FG,X.8.1:.PLO|
000002F0: 54 3A 82 3A 8F 44 52 41 57 20 43 4F 4C 4F 52 45 |T:.:.DRAW COLORE|
00000300: 44 20 4C 49 4E 45 00 43 0C 69 00 97 42 47 2C 30 |D LINE.C.i..BG,0|
00000310: 3A 97 46 47 2C 31 30 3A 81 58 B2 30 A4 33 31 39 |:.FG,10:.X.0.319|
00000320: 3A 9E 45 52 41 53 45 3A 82 3A 8F 20 45 52 41 53 |:.ERASE:.:. ERAS|
00000330: 45 20 4C 49 4E 45 20 57 49 54 48 20 4C 54 2E 20 |E LINE WITH LT. |
00000340: 52 45 44 00 78 0C 6E 00 59 B2 39 35 3A 97 46 47 |RED.x.n.Y.95:.FG|
00000350: 2C 31 3A 81 58 B2 30 A4 33 31 39 3A 9E 50 4C 4F |,1:.X.0.319:.PLO|
00000360: 54 3A 8B C2 28 53 45 54 46 4C 41 47 29 A7 9E 50 |T:..(SETFLAG)..P|
00000370: 4C 4F 54 3A 89 31 32 30 00 83 0C 73 00 9E 45 52 |LOT:.120...s..ER|
00000380: 41 53 45 00 89 0C 78 00 82 00 BB 0C 7D 00 96 A5 |ASE...x.....}...|
00000390: 4D 43 28 41 29 B2 B5 28 41 29 AB 28 B5 28 41 AD |MC(A)..(A).(.(A.|
000003A0: 32 29 B3 B1 B5 28 41 29 AD 32 29 3A 9E 43 4C 3A |2)...(A).2):.CL:|
000003B0: 52 B2 39 35 3A 97 36 34 36 2C 32 00 F5 0C 82 00 |R.95:.646,2.....|
000003C0: 81 41 B2 30 A4 33 31 39 A9 32 2E 32 36 3A 58 B2 |.A.0.319.2.26:X.|
000003D0: A5 4D 43 28 41 29 3A 59 B2 52 AA 38 30 AC BF 28 |.MC(A):Y.R.80..(|
000003E0: 41 AD 32 30 29 3A 9E 45 52 3A 58 B2 58 AA 31 3A |A.20):.ER:X.X.1:|
000003F0: 9E 50 4C 3A 82 00 2F 0D 87 00 81 41 B2 30 A4 33 |.PL:../....A.0.3|
00000400: 31 39 A9 32 2E 32 36 3A 58 B2 A5 4D 43 28 41 29 |19.2.26:X..MC(A)|
00000410: 3A 59 B2 52 AA 36 30 AC BF 28 41 AD 32 35 29 3A |:Y.R.60..(A.25):|
00000420: 9E 50 4C 3A 58 B2 58 AA 31 3A 9E 45 52 3A 82 00 |.PL:X.X.1:.ER:..|
00000430: 69 0D 8C 00 81 41 B2 30 A4 33 31 39 A9 32 2E 32 |i....A.0.319.2.2|
00000440: 36 3A 58 B2 A5 4D 43 28 41 29 3A 59 B2 52 AA 34 |6:X..MC(A):Y.R.4|
00000450: 30 AC BF 28 41 AD 33 30 29 3A 9E 50 4C 3A 58 B2 |0..(A.30):.PL:X.|
00000460: 58 AA 31 3A 9E 50 4C 3A 82 00 A3 0D 91 00 81 41 |X.1:.PL:.......A|
00000470: B2 30 A4 33 31 39 A9 32 2E 32 36 3A 58 B2 A5 4D |.0.319.2.26:X..M|
00000480: 43 28 41 29 3A 59 B2 52 AA 36 30 AC BF 28 41 AD |C(A):Y.R.60..(A.|
00000490: 32 35 29 3A 9E 45 52 3A 58 B2 58 AA 31 3A 9E 45 |25):.ER:X.X.1:.E|
000004A0: 52 3A 82 00 B5 0D 9B 00 8B C2 28 31 39 38 29 B2 |R:........(198).|
000004B0: 30 A7 31 35 35 00 C0 0D A0 00 97 31 39 38 2C 30 |0.155......198,0|
000004C0: 00 D0 0D A5 00 97 46 47 2C C2 28 42 47 29 AA 31 |......FG,.(BG).1|
000004D0: 00 04 0E AA 00 97 35 33 32 37 30 2C 32 30 30 3A |......53270,200:|
000004E0: 97 35 36 35 37 36 2C 31 35 31 3A 97 35 33 32 36 |.56576,151:.5326|
000004F0: 35 2C 32 37 3A 97 35 33 32 37 32 2C 32 31 3A 8B |5,27:.53272,21:.|
00000500: 53 46 A7 8E 00 0A 0E AF 00 80 00 38 0E B9 00 97 |SF.........8....|
00000510: 35 36 35 37 36 2C 28 C2 28 35 36 35 37 36 29 AF |56576,(.(56576).|
00000520: 32 35 32 29 B0 28 33 AB 42 41 4E 4B 29 3A 8F 20 |252).(3.BANK):. |
00000530: 53 45 54 20 42 41 4E 4B 00 60 0E BE 00 97 35 33 |SET BANK.`....53|
00000540: 32 36 35 2C C2 28 35 33 32 36 35 29 B0 33 32 3A |265,.(53265).32:|
00000550: 8F 20 54 55 52 4E 20 4F 4E 20 42 49 54 4D 41 50 |. TURN ON BITMAP|
00000560: 00 97 0E C3 00 8B 4D 46 A7 97 35 33 32 37 30 2C |......MF..53270,|
00000570: C2 28 35 33 32 37 30 29 B0 31 36 3A 8F 20 53 45 |.(53270).16:. SE|
00000580: 54 20 4D 55 4C 54 49 43 4F 4C 4F 52 20 49 46 20 |T MULTICOLOR IF |
00000590: 44 45 53 49 52 45 44 00 E2 0E C8 00 97 35 33 32 |DESIRED......532|
000005A0: 37 32 2C 28 43 4F 4C 4F 46 46 53 45 54 AC 31 36 |72,(COLOFFSET.16|
000005B0: AA 53 43 4E 4F 46 46 53 45 54 AC 38 29 3A 8F 20 |.SCNOFFSET.8):. |
000005C0: 50 4F 53 49 54 49 4F 4E 20 48 49 2D 52 45 53 20 |POSITION HI-RES |
000005D0: 41 4E 44 20 43 4F 4C 4F 52 20 4D 45 4D 4F 52 49 |AND COLOR MEMORI|
000005E0: 45 53 00 E8 0E CD 00 8E 00 00 00 |ES......... |
..F...D.8:E.65:A.E:F.147:E$.G(F):P.57812
:L.62631:S.62957:.B(687).54.25.Z....F,0:
.PG(E)." COORD.OBJ",D,1:.L:E.E.1:.E.A.2.
15.....RESET.681:CLEAR.686:PLOT.707:ERAS
E.714.....SETFLAG.767:INIT.1020:MFLAG.0:
. MFLAG=1 TURNS ON MULTICOLOR, 0 IS OFF.
..(.FG.646:BO.53280:BG.BO.1.N.-..MF.M2.B
O.2:M3.BO.3:.M2,6:.M3,4:. SET MULTICOLOR
REGS. (M1=FG).V.7.BANK.1:SCNOFFSET.1:CO
LOFFSET.7:.185...A..BO,0:.BG,0:.FG,1:Y.1
00:X.160:.CLEAR:O.X:N.Y:. SET SCREEN...F
..R.7.87.8:.BG,.(R.8.7).R.7:.FG,R.7.8.(R
.8.7):. RADIUS & COLOR.6.K..A.0...2.2.R:
X.R..(A).O:Y.R..(A).N:.PLOT:. SWEEP 90 D
EGREES.~.P.X..X.2.O:.PLOT:Y..Y.2.N:.PLOT
:X..X.2.O:.PLOT:. BUT PLOT 4 QUADRANTS..
.U..A...Z..R.F._..MF..M3,5:. BIT PATTERN
1,1 PLOTS GREEN IF MULTICOLOR...D.Y.100
:.X.0.319:.BG,X.8:.FG,X.8.1:.PLOT:.:.DRA
W COLORED LINE.C.I..BG,0:.FG,10:.X.0.319
:.ERASE:.:. ERASE LINE WITH LT. RED.X.N.
Y.95:.FG,1:.X.0.319:.PLOT:.B(SETFLAG)..P
LOT:.120...S..ERASE...X.....}...MC(A)..(
A).(.(A.2)...(A).2):.CL:R.95:.646,2.....
.A.0.319.2.26:X..MC(A):Y.R.80..(A.20):.E
R:X.X.1:.PL:../....A.0.319.2.26:X..MC(A)
:Y.R.60..(A.25):.PL:X.X.1:.ER:..I....A.0
.319.2.26:X..MC(A):Y.R.40..(A.30):.PL:X.
X.1:.PL:.......A.0.319.2.26:X..MC(A):Y.R
.60..(A.25):.ER:X.X.1:.ER:.......B(198).
0.155... ..198,0.P....FG,B(BG).1......53
270,200:.56576,151:.53265,27:.53272,21:.
SF.........8....56576,(B(56576).252).(3.
BANK):. SET BANK.`....53265,B(53265).32:
. TURN ON BITMAP...C..MF..53270,B(53270)
.16:. SET MULTICOLOR IF DESIRED...H..532
72,(COLOFFSET.16.SCNOFFSET.8):. POSITION
HI-RES AND COLOR MEMORIES...M.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL