HALO.BAS
FILE INFORMATION
FILENAME(S): HALO.BAS
FILE TYPE(S): PRG
FILE SIZE: 7.1K
FIRST SEEN: 2025-11-30 21:12:48
APPEARS ON: 1 disk(s)
FILE HASH
84662fb496a4357ff9700654a3e3ab07db916e7f7778bd9c9e3e524c80499891
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TRANSACTOR DISK | HALO.BAS | PRG | DuncanTwain | 4 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 37 40 0A 00 8F 20 22 4D 41 4E 44 45 4C 42 |.@7@... "MANDELB| 00000010: 52 4F 54 20 48 41 4C 4F 22 20 22 41 55 42 52 45 |ROT HALO" "AUBRE| 00000020: 59 20 53 54 41 4E 4C 45 59 22 20 22 41 50 52 49 |Y STANLEY" "APRI| 00000030: 4C 20 31 39 38 37 22 00 70 40 14 00 8F 20 3D 20 |L 1987".p@... = | 00000040: 54 48 45 20 4E 45 58 54 20 4C 49 4E 45 20 4D 55 |THE NEXT LINE MU| 00000050: 53 54 20 42 45 20 45 4E 54 45 52 45 44 20 45 58 |ST BE ENTERED EX| 00000060: 41 43 54 4C 59 20 41 53 20 53 48 4F 57 4E 20 3D |ACTLY AS SHOWN =| 00000070: 00 9A 40 1E 00 52 45 B2 AB 32 3A 49 4D B2 31 2E |..@..RE..2:IM.1.| 00000080: 32 35 3A 53 49 B2 32 2E 35 3A 47 50 B2 53 49 AD |25:SI.2.5:GP.SI.| 00000090: 31 36 30 3A 43 4E B2 31 35 31 00 CB 40 23 00 52 |160:CN.151..@#.R| 000000A0: 31 24 B2 C7 28 31 38 29 3A 20 52 32 24 B2 C7 28 |1$..(18): R2$..(| 000000B0: 31 34 36 29 3A 20 43 4C 24 B2 C7 28 31 35 37 29 |146): CL$..(157)| 000000C0: 3A 20 43 52 24 B2 C7 28 32 39 29 00 FE 40 24 00 |: CR$..(29)..@$.| 000000D0: 42 4C 24 B2 C7 28 31 35 39 29 3A 20 52 44 24 B2 |BL$..(159): RD$.| 000000E0: C7 28 31 35 30 29 3A 20 42 52 24 B2 C7 28 31 34 |.(150): BR$..(14| 000000F0: 39 29 3A 20 47 59 24 B2 C7 28 31 35 35 29 00 18 |9): GY$..(155)..| 00000100: 41 25 00 43 55 24 B2 C7 28 31 34 35 29 3A 20 43 |A%.CU$..(145): C| 00000110: 44 24 B2 C7 28 31 37 29 00 40 41 28 00 FE 02 31 |D$..(17).@A(...1| 00000120: 35 3A FE 25 3A A0 20 31 35 3A 9F 20 31 35 2C 38 |5:.%:. 15:. 15,8| 00000130: 2C 31 35 3A FE 11 22 48 41 4C 4F 2E 4F 42 4A 22 |,15:.."HALO.OBJ"| 00000140: 00 58 41 32 00 8D 20 31 37 37 30 3A 8D 20 39 33 |.XA2.. 1770:. 93| 00000150: 30 3A A0 20 31 35 3A 80 00 77 41 3C 00 8F 20 3D |0:. 15:..wA<.. =| 00000160: 3D 20 22 50 52 49 4E 54 20 50 41 52 41 4D 45 54 |= "PRINT PARAMET| 00000170: 45 52 53 22 20 3D 3D 00 98 41 46 00 99 20 47 59 |ERS" ==..AF.. GY| 00000180: 24 3B 3A FE 1A 20 33 2C 32 31 2C 31 39 2C 32 31 |$;:.. 3,21,19,21| 00000190: 2C 31 3A 99 20 41 43 3B 00 B3 41 50 00 FE 1A 20 |,1:. AC;..AP... | 000001A0: 32 33 2C 32 31 2C 33 39 2C 32 31 2C 31 3A 99 20 |23,21,39,21,1:. | 000001B0: 42 43 3B 00 CF 41 5A 00 FE 1A 20 33 2C 32 32 2C |BC;..AZ... 3,22,| 000001C0: 31 39 2C 32 32 2C 31 3A 99 20 43 43 3B 3A 8E 00 |19,22,1:. CC;:..| 000001D0: EA 41 64 00 8F 20 3D 3D 20 22 50 52 49 4E 54 20 |.Ad.. == "PRINT | 000001E0: 43 4F 4F 52 44 53 22 20 3D 3D 00 0F 42 6E 00 8B |COORDS" ==..Bn..| 000001F0: 20 5A 4D B2 30 20 A7 20 4D 58 B2 30 3A 4D 59 B2 | ZM.0 . MX.0:MY.| 00000200: 30 3A 4D 5A B2 57 44 3A D5 20 4D 5A B2 53 44 00 |0:MZ.WD:. MZ.SD.| 00000210: 31 42 78 00 99 20 47 59 24 3B 3A FE 1A 20 32 31 |1Bx.. GY$;:.. 21| 00000220: 2C 32 32 2C 32 36 2C 32 32 2C 31 3A 99 20 4D 58 |,22,26,22,1:. MX| 00000230: 3B 00 4C 42 82 00 FE 1A 20 32 38 2C 32 32 2C 33 |;.LB.... 28,22,3| 00000240: 33 2C 32 32 2C 31 3A 99 20 4D 59 3B 00 69 42 8C |3,22,1:. MY;.iB.| 00000250: 00 FE 1A 20 33 35 2C 32 32 2C 33 39 2C 32 32 2C |... 35,22,39,22,| 00000260: 31 3A 99 20 4D 5A 3B 3A 8E 00 84 42 96 00 8F 20 |1:. MZ;:...B... | 00000270: 3D 3D 20 22 50 52 49 4E 54 20 50 49 58 45 4C 53 |== "PRINT PIXELS| 00000280: 22 20 3D 3D 00 A8 42 A0 00 99 20 47 59 24 3B 3A |" ==..B... GY$;:| 00000290: FE 1A 20 33 33 2C 32 33 2C 33 38 2C 32 33 2C 31 |.. 33,23,38,23,1| 000002A0: 3A 99 20 57 44 3B 3A 8E 00 C5 42 AA 00 8F 20 3D |:. WD;:...B... =| 000002B0: 3D 20 22 50 52 49 4E 54 20 46 49 4C 45 4E 41 4D |= "PRINT FILENAM| 000002C0: 45 22 20 3D 3D 00 E6 42 B4 00 99 20 47 59 24 3B |E" ==..B... GY$;| 000002D0: 3A FE 1A 20 38 2C 32 33 2C 32 35 2C 32 33 2C 31 |:.. 8,23,25,23,1| 000002E0: 3A 99 20 46 24 3B 00 EC 42 BE 00 8E 00 0A 43 C8 |:. F$;..B.....C.| 000002F0: 00 8F 20 3D 3D 20 22 50 4C 4F 54 20 43 4F 4C 4F |.. == "PLOT COLO| 00000300: 52 20 4C 49 4E 45 22 20 3D 3D 00 20 43 D2 00 8D |R LINE" ==. C...| 00000310: 20 32 32 30 3A 8D 20 32 33 30 3A 89 20 32 34 30 | 220:. 230:. 240| 00000320: 00 3A 43 DC 00 E1 20 31 2C 30 2C 31 36 34 2C 35 |.:C... 1,0,164,5| 00000330: 32 2C 31 36 37 2C 2C 31 3A 8E 00 56 43 E6 00 E1 |2,167,,1:..VC...| 00000340: 20 32 2C 35 33 2C 31 36 34 2C 31 30 35 2C 31 36 | 2,53,164,105,16| 00000350: 37 2C 2C 31 3A 8E 00 73 43 F0 00 E1 20 33 2C 31 |7,,1:..sC... 3,1| 00000360: 30 36 2C 31 36 34 2C 31 35 39 2C 31 36 37 2C 2C |06,164,159,167,,| 00000370: 31 3A 8E 00 8C 43 FA 00 8F 20 3D 3D 20 22 50 4C |1:...C... == "PL| 00000380: 4F 54 20 46 52 41 4D 45 22 20 3D 3D 00 BE 43 04 |OT FRAME" ==..C.| 00000390: 01 E7 20 33 2C 31 32 3A 81 20 59 B2 31 36 38 20 |.. 3,12:. Y.168 | 000003A0: A4 20 31 39 39 3A E5 20 33 2C 30 2C 59 20 A4 20 |. 199:. 3,0,Y . | 000003B0: 31 35 39 2C 59 3A 82 3A E7 20 33 2C 43 33 00 E6 |159,Y:.:. 3,C3..| 000003C0: 43 0E 01 58 B2 50 41 28 50 58 2C 31 29 3A 59 B2 |C..X.PA(PX,1):Y.| 000003D0: 57 44 AB 31 3A E1 20 33 2C 58 2C 58 2C 58 AA 59 |WD.1:. 3,X,X,X.Y| 000003E0: 2C 58 AA 59 3A 8E 00 01 44 18 01 8F 20 3D 3D 20 |,X.Y:...D... == | 000003F0: 22 43 4F 4C 4F 52 20 56 41 4C 55 45 53 22 20 3D |"COLOR VALUES" =| 00000400: 3D 00 22 44 22 01 E7 20 31 2C 43 31 3A E7 20 32 |=."D".. 1,C1:. 2| 00000410: 2C 43 32 3A E7 20 33 2C 43 33 3A DE 20 33 2C 31 |,C2:. 3,C3:. 3,1| 00000420: 3A 8E 00 54 44 2C 01 E7 20 31 2C 43 31 3A E7 20 |:..TD,.. 1,C1:. | 00000430: 32 2C 43 32 3A 8B 20 57 49 B3 B1 30 20 A7 20 9E |2,C2:. WI..0 . .| 00000440: 20 32 37 34 35 36 3A D5 20 8D 20 32 32 30 3A 8D | 27456:. . 220:.| 00000450: 20 32 33 30 00 5A 44 36 01 8E 00 77 44 40 01 E7 | 230.ZD6...wD@..| 00000460: 20 33 2C 43 33 3A 8B 20 57 49 B3 B1 30 20 A7 20 | 3,C3:. WI..0 . | 00000470: 9E 20 32 37 34 31 35 00 83 44 4A 01 8D 20 32 34 |. 27415..DJ.. 24| 00000480: 30 3A 8E 00 9B 44 54 01 43 34 B2 43 31 3A 43 35 |0:...DT.C4.C1:C5| 00000490: B2 43 32 3A 43 36 B2 43 33 3A 8E 00 B5 44 5E 01 |.C2:C6.C3:...D^.| 000004A0: 8F 20 3D 3D 20 22 50 4C 4F 54 20 56 41 4C 55 45 |. == "PLOT VALUE| 000004B0: 53 22 20 3D 3D 00 D9 44 68 01 52 45 B2 41 43 3A |S" ==..Dh.RE.AC:| 000004C0: 49 4D B2 42 43 3A 53 49 B2 43 43 3A FE 07 20 53 |IM.BC:SI.CC:.. S| 000004D0: 41 28 53 50 2C 30 29 2C 30 00 07 45 72 01 58 43 |A(SP,0),0..Er.XC| 000004E0: B2 50 41 28 50 58 2C 31 29 3A 59 43 B2 58 43 AA |.PA(PX,1):YC.XC.| 000004F0: 57 44 AB 31 3A 8D 20 37 30 3A 8D 20 31 31 30 3A |WD.1:. 70:. 110:| 00000500: 8D 20 31 36 30 3A 8E 00 21 45 7C 01 8F 20 3D 3D |. 160:..!E|.. ==| 00000510: 20 22 4D 41 4B 45 20 53 50 52 49 54 45 22 20 3D | "MAKE SPRITE" =| 00000520: 3D 00 48 45 86 01 E4 20 41 24 2C 30 2C 30 2C 32 |=.HE... A$,0,0,2| 00000530: 33 2C 32 30 3A FE 16 20 41 24 2C 41 3A 41 B2 41 |3,20:.. A$,A:A.A| 00000540: AA 31 3A E8 20 31 3A 8E 00 61 45 90 01 8F 20 3D |.1:. 1:..aE... =| 00000550: 3D 20 22 50 52 49 4E 54 20 4D 45 4E 55 22 20 3D |= "PRINT MENU" =| 00000560: 3D 00 81 45 9A 01 99 20 C7 28 31 39 29 C7 28 31 |=..E... .(19).(1| 00000570: 39 29 52 56 24 3A E8 20 30 3A 9E 20 35 31 39 34 |9)RV$:. 0:. 5194| 00000580: 31 00 9D 45 A4 01 FE 1A 20 30 2C 32 31 2C 32 2C |1..E.... 0,21,2,| 00000590: 32 31 3A 99 20 42 52 24 22 52 45 22 3B 00 B8 45 |21:. BR$"RE";..E| 000005A0: AE 01 FE 1A 20 32 30 2C 32 31 2C 32 32 2C 32 31 |.... 20,21,22,21| 000005B0: 3A 99 20 22 49 4D 22 3B 00 D1 45 B8 01 FE 1A 20 |:. "IM";..E.... | 000005C0: 30 2C 32 32 2C 32 2C 32 32 3A 99 20 22 53 49 22 |0,22,2,22:. "SI"| 000005D0: 3B 00 F6 45 C2 01 FE 1A 20 32 30 2C 32 32 2C 33 |;..E.... 20,22,3| 000005E0: 35 2C 32 32 3A 99 22 58 22 A6 36 29 22 59 22 A6 |5,22:."X".6)"Y".| 000005F0: 36 29 22 5A 22 3B 00 18 46 CC 01 8D 20 34 38 30 |6)"Z";..F... 480| 00000600: 3A 8D 20 34 39 30 3A 8D 20 35 30 30 3A 8D 20 35 |:. 490:. 500:. 5| 00000610: 31 30 3A 8D 20 35 32 30 00 3A 46 D6 01 8D 20 35 |10:. 520.:F... 5| 00000620: 33 30 3A 8D 20 35 34 30 3A 8D 20 35 35 30 3A 8D |30:. 540:. 550:.| 00000630: 20 35 36 30 3A 89 20 35 37 30 00 67 46 E0 01 FE | 560:. 570.gF...| 00000640: 1A 20 30 2C 32 33 2C 38 2C 32 33 3A 99 20 52 56 |. 0,23,8,23:. RV| 00000650: 24 3B 52 44 24 3B 22 46 49 4C 45 4E 41 4D 45 22 |$;RD$;"FILENAME"| 00000660: 3B 3A 89 20 35 38 30 00 94 46 EA 01 FE 1A 20 32 |;:. 580..F.... 2| 00000670: 37 2C 32 33 2C 33 33 2C 32 33 3A 99 20 52 56 24 |7,23,33,23:. RV$| 00000680: 3B 52 44 24 3B 22 50 49 58 45 4C 53 22 3B 3A 89 |;RD$;"PIXELS";:.| 00000690: 20 35 38 30 00 BD 46 F4 01 FE 1A 20 30 2C 32 34 | 580..F.... 0,24| 000006A0: 2C 33 2C 32 34 3A 99 20 52 56 24 3B 42 4C 24 3B |,3,24:. RV$;BL$;| 000006B0: 22 50 4C 4F 54 22 3B 3A 89 20 35 38 30 00 E6 46 |"PLOT";:. 580..F| 000006C0: FE 01 FE 1A 20 35 2C 32 34 2C 38 2C 32 34 3A 99 |.... 5,24,8,24:.| 000006D0: 20 52 56 24 3B 42 4C 24 3B 22 4C 4F 41 44 22 3B | RV$;BL$;"LOAD";| 000006E0: 3A 89 20 35 38 30 00 11 47 08 02 FE 1A 20 31 30 |:. 580..G.... 10| 000006F0: 2C 32 34 2C 31 33 2C 32 34 3A 99 20 52 56 24 3B |,24,13,24:. RV$;| 00000700: 42 4C 24 3B 22 53 41 56 45 22 3B 3A 89 20 35 38 |BL$;"SAVE";:. 58| 00000710: 30 00 3C 47 12 02 FE 1A 20 31 35 2C 32 34 2C 31 |0.<G.... 15,24,1| 00000720: 38 2C 32 34 3A 99 20 52 56 24 3B 42 4C 24 3B 22 |8,24:. RV$;BL$;"| 00000730: 44 55 4D 50 22 3B 3A 89 20 35 38 30 00 67 47 1C |DUMP";:. 580.gG.| 00000740: 02 FE 1A 20 32 30 2C 32 34 2C 32 33 2C 32 34 3A |... 20,24,23,24:| 00000750: 99 20 52 56 24 3B 42 4C 24 3B 22 43 4F 4C 31 22 |. RV$;BL$;"COL1"| 00000760: 3B 3A 89 20 35 38 30 00 92 47 26 02 FE 1A 20 32 |;:. 580..G&... 2| 00000770: 35 2C 32 34 2C 32 38 2C 32 34 3A 99 20 52 56 24 |5,24,28,24:. RV$| 00000780: 3B 42 4C 24 3B 22 43 4F 4C 32 22 3B 3A 89 20 35 |;BL$;"COL2";:. 5| 00000790: 38 30 00 BD 47 30 02 FE 1A 20 33 30 2C 32 34 2C |80..G0... 30,24,| 000007A0: 33 33 2C 32 34 3A 99 20 52 56 24 3B 42 4C 24 3B |33,24:. RV$;BL$;| 000007B0: 22 43 4F 4C 33 22 3B 3A 89 20 35 38 30 00 E2 47 |"COL3";:. 580..G| 000007C0: 3A 02 FE 1A 20 33 35 2C 32 34 2C 33 38 2C 32 34 |:... 35,24,38,24| 000007D0: 3A 99 20 52 56 24 3B 42 4C 24 3B 22 45 58 49 54 |:. RV$;BL$;"EXIT| 000007E0: 22 3B 00 F7 47 44 02 52 56 24 B2 52 32 24 3A 99 |";..GD.RV$.R2$:.| 000007F0: 20 52 56 24 3B 3A 8E 00 0D 48 4E 02 8F 20 3D 3D | RV$;:...HN.. ==| 00000800: 20 22 47 45 54 20 4B 45 59 22 20 3D 3D 00 1A 48 | "GET KEY" ==..H| 00000810: 58 02 A1 20 4B 24 3A 41 B2 31 00 26 48 62 02 EB |X.. K$:A.1.&Hb..| 00000820: 20 FC 20 41 B2 4B 00 46 48 6C 02 8B 20 4B 24 B2 | . A.K.FHl.. K$.| 00000830: CA 28 4B 42 24 2C 41 2C 31 29 20 A7 20 ED 3A D5 |.(KB$,A,1) . .:.| 00000840: 20 41 B2 41 AA 31 00 4C 48 76 02 EC 00 64 48 80 | A.A.1.LHv...dH.| 00000850: 02 8B 20 41 B2 4B 20 A7 20 36 30 30 3A D5 20 4B |.. A.K . 600:. K| 00000860: B2 41 3A 8E 00 7C 48 8A 02 8F 20 3D 3D 20 22 4C |.A:..|H... == "L| 00000870: 4F 41 44 20 56 41 52 53 22 20 3D 3D 00 AA 48 94 |OAD VARS" ==..H.| 00000880: 02 81 20 41 B2 30 20 A4 20 34 3A FE 02 20 30 3A |.. A.0 . 4:.. 0:| 00000890: 50 B2 C2 28 50 31 AA 41 29 3A FE 02 20 31 3A 97 |P..(P1.A):.. 1:.| 000008A0: 28 50 32 AA 41 29 2C 50 3A 82 00 BE 48 9E 02 FE |(P2.A),P:...H...| 000008B0: 02 20 31 35 3A 50 31 B2 50 31 AA 35 3A 8E 00 D6 |. 15:P1.P1.5:...| 000008C0: 48 A8 02 8F 20 3D 3D 20 22 53 41 56 45 20 56 41 |H... == "SAVE VA| 000008D0: 52 53 22 20 3D 3D 00 04 49 B2 02 81 20 41 B2 30 |RS" ==..I... A.0| 000008E0: 20 A4 20 34 3A FE 02 20 31 3A 50 B2 C2 28 50 31 | . 4:.. 1:P..(P1| 000008F0: AA 41 29 3A FE 02 20 30 3A 97 28 50 32 AA 41 29 |.A):.. 0:.(P2.A)| 00000900: 2C 50 3A 82 00 18 49 BC 02 FE 02 20 31 35 3A 50 |,P:...I.... 15:P| 00000910: 32 B2 50 32 AA 35 3A 8E 00 3D 49 C6 02 8F 20 3D |2.P2.5:..=I... =| 00000920: 3D 20 22 55 50 44 41 54 45 20 5A 4F 4F 4D 20 50 |= "UPDATE ZOOM P| 00000930: 41 52 41 4D 45 54 45 52 53 22 20 3D 3D 00 81 49 |ARAMETERS" ==..I| 00000940: D0 02 4D 58 B2 28 53 58 AB 53 51 29 AD 32 3A 4D |..MX.(SX.SQ).2:M| 00000950: 59 B2 53 59 AB 53 52 3A 41 43 B2 52 45 AA 28 4D |Y.SY.SR:AC.RE.(M| 00000960: 58 AC 47 50 29 3A 42 43 B2 49 4D AB 28 4D 59 AC |X.GP):BC.IM.(MY.| 00000970: 47 50 29 3A 43 43 B2 53 49 AD 28 57 49 AD 53 44 |GP):CC.SI.(WI.SD| 00000980: 29 00 92 49 DA 02 8D 20 37 30 3A 8D 20 31 31 30 |)..I... 70:. 110| 00000990: 3A 8E 00 AC 49 E4 02 8F 20 3D 3D 20 22 44 49 53 |:...I... == "DIS| 000009A0: 4B 20 43 48 45 43 4B 53 22 20 3D 3D 00 C9 49 EE |K CHECKS" ==..I.| 000009B0: 02 98 31 35 2C 22 53 30 3A 22 AA 46 49 24 3A 84 |..15,"S0:".FI$:.| 000009C0: 31 35 2C 41 2C 46 24 3A 8E 00 ED 49 F8 02 FE 0D |15,A,F$:...I....| 000009D0: 23 31 2C 28 46 49 24 29 AA 22 2C 50 22 3A 84 31 |#1,(FI$).",P":.1| 000009E0: 35 2C 41 2C 46 24 3A FE 0F 23 31 3A 8E 00 FC 49 |5,A,F$:..#1:...I| 000009F0: 02 03 84 31 35 2C 41 2C 46 24 3A 8E 00 07 4A 0C |...15,A,F$:...J.| 00000A00: 03 8F 20 3D 3D 3D 3D 00 1E 4A 16 03 8F 20 3D 3D |.. ====..J... ==| 00000A10: 20 22 46 49 4C 45 4E 41 4D 45 22 20 3D 3D 00 3B | "FILENAME" ==.;| 00000A20: 4A 20 03 52 56 24 B2 52 31 24 3A 8D 20 34 38 30 |J .RV$.R1$:. 480| 00000A30: 3A 4B 42 24 B2 43 52 24 AA 52 24 00 63 4A 2A 03 |:KB$.CR$.R$.cJ*.| 00000A40: 4B B2 33 3A 8D 20 36 30 30 3A 46 24 B2 22 22 3A |K.3:. 600:F$."":| 00000A50: 8B 20 4B B2 31 20 A7 20 8D 20 34 38 30 3A 89 20 |. K.1 . . 480:. | 00000A60: 38 36 30 00 78 4A 34 03 8D 20 34 38 30 3A 8D 20 |860.xJ4.. 480:. | 00000A70: 31 38 30 3A 85 20 46 24 00 97 4A 3E 03 8B 20 46 |180:. F$..J>.. F| 00000A80: 24 B3 B1 22 22 20 A7 20 46 49 24 B2 46 24 3A D5 |$.."" . FI$.F$:.| 00000A90: 20 46 24 B2 46 49 24 00 A6 4A 48 03 8D 20 31 38 | F$.FI$..JH.. 18| 00000AA0: 30 3A 89 38 30 30 00 BB 4A 52 03 8F 20 3D 3D 20 |0:.800..JR.. == | 00000AB0: 22 50 49 58 45 4C 53 22 20 3D 3D 00 DE 4A 5C 03 |"PIXELS" ==..J\.| 00000AC0: 52 56 24 B2 52 31 24 3A 8D 20 34 39 30 3A 4B 42 |RV$.R1$:. 490:KB| 00000AD0: 24 B2 43 4C 24 AA 43 52 24 AA 22 2B 2D 22 00 02 |$.CL$.CR$."+-"..| 00000AE0: 4B 66 03 4B B2 35 3A 8D 20 36 30 30 3A 91 20 4B |Kf.K.5:. 600:. K| 00000AF0: 20 89 20 38 38 30 2C 38 38 30 2C 38 39 30 2C 39 | . 880,880,890,9| 00000B00: 30 30 00 20 4B 70 03 8D 20 34 39 30 3A 8B 20 4B |00. Kp.. 490:. K| 00000B10: B2 31 20 A7 20 38 30 30 3A D5 20 89 20 39 33 30 |.1 . 800:. . 930| 00000B20: 00 41 4B 7A 03 8B 20 50 58 B2 39 20 A7 20 38 37 |.AKz.. PX.9 . 87| 00000B30: 30 3A D5 20 50 58 B2 50 58 AA 31 3A 89 20 39 31 |0:. PX.PX.1:. 91| 00000B40: 30 00 5C 4B 84 03 8B 20 50 58 B2 30 20 A7 20 38 |0.\K... PX.0 . 8| 00000B50: 37 30 3A D5 20 50 58 B2 50 58 AB 31 00 78 4B 8E |70:. PX.PX.1.xK.| 00000B60: 03 57 44 B2 50 41 28 50 58 2C 30 29 3A 8D 20 31 |.WD.PA(PX,0):. 1| 00000B70: 36 30 3A 89 20 38 37 30 00 8B 4B 98 03 8F 20 3D |60:. 870..K... =| 00000B80: 3D 20 22 50 4C 4F 54 22 20 3D 3D 00 B0 4B A2 03 |= "PLOT" ==..K..| 00000B90: 52 56 24 B2 52 31 24 3A 8D 20 35 30 30 3A 4B 42 |RV$.R1$:. 500:KB| 00000BA0: 24 B2 22 20 22 AA 43 4C 24 AA 43 52 24 AA 52 24 |$." ".CL$.CR$.R$| 00000BB0: 00 D4 4B AC 03 4B B2 35 3A 8D 20 36 30 30 3A 91 |..K..K.5:. 600:.| 00000BC0: 20 4B 20 89 20 39 38 30 2C 39 35 30 2C 39 35 30 | K . 980,950,950| 00000BD0: 2C 39 36 30 00 F3 4B B6 03 8D 20 35 30 30 3A 8B |,960..K... 500:.| 00000BE0: 20 4B B2 32 20 A7 20 38 36 30 3A D5 20 89 20 31 | K.2 . 860:. . 1| 00000BF0: 30 30 30 00 2B 4C C0 03 8D 20 35 30 30 3A 8D 20 |000.+L... 500:. | 00000C00: 32 39 30 3A 8D 20 33 36 30 3A 8D 20 32 36 30 3A |290:. 360:. 260:| 00000C10: 47 50 B2 53 49 AD 57 44 3A 9E 20 34 38 36 34 2C |GP.SI.WD:. 4864,| 00000C20: 57 44 2C 58 43 2C 43 4E 2C 4D 4F 00 58 4C CA 03 |WD,XC,CN,MO.XL..| 00000C30: FE 26 3A 57 49 B2 57 44 3A DE 20 34 2C 30 2C 32 |.&:WI.WD:. 4,0,2| 00000C40: 31 3A 8D 20 32 31 30 3A 5A 4D B2 30 3A 8D 20 31 |1:. 210:ZM.0:. 1| 00000C50: 31 30 3A 89 20 39 33 30 00 7E 4C D4 03 8B 20 57 |10:. 930.~L... W| 00000C60: 49 B2 30 20 A7 20 39 34 30 3A D5 20 8D 20 35 30 |I.0 . 940:. . 50| 00000C70: 30 3A 8D 20 32 30 31 30 3A 89 20 39 33 30 00 91 |0:. 2010:. 930..| 00000C80: 4C DE 03 8F 20 3D 3D 20 22 4C 4F 41 44 22 20 3D |L... == "LOAD" =| 00000C90: 3D 00 B2 4C E8 03 52 56 24 B2 52 31 24 3A 8D 20 |=..L..RV$.R1$:. | 00000CA0: 35 31 30 3A 4B 42 24 B2 43 4C 24 AA 43 52 24 AA |510:KB$.CL$.CR$.| 00000CB0: 52 24 00 CD 4C F2 03 4B B2 34 3A 8D 20 36 30 30 |R$..L..K.4:. 600| 00000CC0: 3A 8B 20 4B B2 33 20 A7 20 31 30 33 30 00 EC 4C |:. K.3 . 1030..L| 00000CD0: FC 03 8D 20 35 31 30 3A 8B 20 4B B2 31 20 A7 20 |... 510:. K.1 . | 00000CE0: 39 33 30 3A D5 20 89 20 31 31 33 30 00 0E 4D 06 |930:. . 1130..M.| 00000CF0: 04 8B 20 46 49 24 B2 22 22 20 A7 20 46 24 B2 46 |.. FI$."" . F$.F| 00000D00: 49 24 3A 8D 20 35 31 30 3A 89 20 38 32 30 00 34 |I$:. 510:. 820.4| 00000D10: 4D 10 04 8D 20 37 36 30 3A 8B 20 41 B3 B1 20 30 |M... 760:. A.. 0| 00000D20: 20 A7 20 8D 20 35 31 30 3A 8D 20 31 38 30 3A 89 | . . 510:. 180:.| 00000D30: 20 37 39 30 00 5E 4D 1A 04 FE 25 3A FE 11 28 46 | 790.^M...%:..(F| 00000D40: 49 24 29 2C 42 30 3A 50 31 B2 38 31 35 37 3A 50 |I$),B0:P1.8157:P| 00000D50: 32 B2 CE 0A 28 43 31 29 3A 8D 20 36 36 30 00 82 |2...(C1):. 660..| 00000D60: 4D 24 04 50 32 B2 CE 0A 28 43 32 29 3A 8D 20 36 |M$.P2...(C2):. 6| 00000D70: 36 30 3A 50 32 B2 CE 0A 28 43 33 29 3A 8D 20 36 |60:P2...(C3):. 6| 00000D80: 36 30 00 A6 4D 2E 04 50 32 B2 CE 0A 28 41 43 29 |60..M..P2...(AC)| 00000D90: 3A 8D 20 36 36 30 3A 50 32 B2 CE 0A 28 42 43 29 |:. 660:P2...(BC)| 00000DA0: 3A 8D 20 36 36 30 00 CA 4D 38 04 50 32 B2 CE 0A |:. 660..M8.P2...| 00000DB0: 28 43 43 29 3A 8D 20 36 36 30 3A 50 32 B2 CE 0A |(CC):. 660:P2...| 00000DC0: 28 57 49 29 3A 8D 20 36 36 30 00 FB 4D 42 04 57 |(WI):. 660..MB.W| 00000DD0: 44 B2 57 49 3A 47 50 B2 43 43 AD 57 44 3A 81 20 |D.WI:GP.CC.WD:. | 00000DE0: 41 B2 30 20 A4 20 39 3A 8B 20 57 49 B2 50 41 28 |A.0 . 9:. WI.PA(| 00000DF0: 41 2C 30 29 20 A7 20 50 58 B2 41 00 1E 4E 4C 04 |A,0) . PX.A..NL.| 00000E00: 82 3A 5A 4D B2 30 3A 8D 20 33 34 30 3A 8D 20 33 |.:ZM.0:. 340:. 3| 00000E10: 36 30 3A 8D 20 33 30 30 3A 8D 20 33 32 30 00 3D |60:. 300:. 320.=| 00000E20: 4E 56 04 8D 20 32 37 30 3A 8D 20 32 31 30 3A FE |NV.. 270:. 210:.| 00000E30: 26 3A 8D 20 35 31 30 3A 89 20 39 33 30 00 50 4E |&:. 510:. 930.PN| 00000E40: 60 04 8F 20 3D 3D 20 22 53 41 56 45 22 20 3D 3D |`.. == "SAVE" ==| 00000E50: 00 71 4E 6A 04 52 56 24 B2 52 31 24 3A 8D 20 35 |.qNj.RV$.R1$:. 5| 00000E60: 32 30 3A 4B 42 24 B2 43 4C 24 AA 43 52 24 AA 52 |20:KB$.CL$.CR$.R| 00000E70: 24 00 8C 4E 74 04 4B B2 34 3A 8D 20 36 30 30 3A |$..Nt.K.4:. 600:| 00000E80: 8B 20 4B B2 33 20 A7 20 31 31 37 30 00 A3 4E 7E |. K.3 . 1170..N~| 00000E90: 04 8D 20 35 32 30 3A 8B 20 4B B2 31 20 A7 20 31 |.. 520:. K.1 . 1| 00000EA0: 30 30 30 00 BE 4E 88 04 8B 20 4D 4F B2 30 20 A7 |000..N... MO.0 .| 00000EB0: 20 31 34 38 30 3A D5 20 89 20 31 32 38 30 00 E0 | 1480:. . 1280..| 00000EC0: 4E 92 04 8B 20 46 49 24 B2 22 22 20 A7 20 46 24 |N... FI$."" . F$| 00000ED0: B2 46 49 24 3A 8D 20 35 32 30 3A 89 20 38 32 30 |.FI$:. 520:. 820| 00000EE0: 00 F8 4E 9C 04 8D 20 37 36 30 3A 8B 20 41 B2 36 |..N... 760:. A.6| 00000EF0: 32 20 A7 20 31 32 31 30 00 15 4F A6 04 8B 20 41 |2 . 1210..O... A| 00000F00: B2 30 20 A7 20 46 24 B2 22 46 49 4C 45 20 45 58 |.0 . F$."FILE EX| 00000F10: 49 53 54 53 22 00 2B 4F B0 04 8D 20 35 32 30 3A |ISTS".+O... 520:| 00000F20: 8D 20 31 38 30 3A 89 20 37 39 30 00 5B 4F BA 04 |. 180:. 790.[O..| 00000F30: FE 25 3A 8D 20 33 34 30 3A 50 32 B2 38 31 35 37 |.%:. 340:P2.8157| 00000F40: 3A 81 20 50 B2 30 20 A4 20 33 34 3A 4D 41 28 50 |:. P.0 . 34:MA(P| 00000F50: 29 B2 C2 28 50 32 AA 50 29 3A 82 00 7F 4F C4 04 |)..(P2.P):...O..| 00000F60: 50 31 B2 CE 0A 28 43 31 29 3A 8D 20 36 39 30 3A |P1...(C1):. 690:| 00000F70: 50 31 B2 CE 0A 28 43 32 29 3A 8D 20 36 39 30 00 |P1...(C2):. 690.| 00000F80: A3 4F CE 04 50 31 B2 CE 0A 28 43 33 29 3A 8D 20 |.O..P1...(C3):. | 00000F90: 36 39 30 3A 50 31 B2 CE 0A 28 52 45 29 3A 8D 20 |690:P1...(RE):. | 00000FA0: 36 39 30 00 C7 4F D8 04 50 31 B2 CE 0A 28 49 4D |690..O..P1...(IM| 00000FB0: 29 3A 8D 20 36 39 30 3A 50 31 B2 CE 0A 28 53 49 |):. 690:P1...(SI| 00000FC0: 29 3A 8D 20 36 39 30 00 FD 4F E2 04 50 31 B2 CE |):. 690..O..P1..| 00000FD0: 0A 28 57 49 29 3A 8D 20 36 39 30 3A FE 10 28 46 |.(WI):. 690:..(F| 00000FE0: 49 24 29 2C 42 30 2C 50 38 31 35 37 20 A4 20 50 |I$),B0,P8157 . P| 00000FF0: 31 34 35 39 32 3A 50 32 B2 38 31 35 37 00 2A 50 |14592:P2.8157.*P| 00001000: EC 04 81 20 50 B2 30 20 A4 20 33 34 3A 97 20 50 |... P.0 . 34:. P| 00001010: 32 AA 50 2C 4D 41 28 50 29 3A 82 3A FE 26 3A 8D |2.P,MA(P):.:.&:.| 00001020: 20 35 32 30 3A 89 20 39 33 30 00 3D 50 F6 04 8F | 520:. 930.=P...| 00001030: 20 3D 3D 20 22 44 55 4D 50 22 20 3D 3D 00 5E 50 | == "DUMP" ==.^P| 00001040: 00 05 52 56 24 B2 52 31 24 3A 8D 20 35 33 30 3A |..RV$.R1$:. 530:| 00001050: 4B 42 24 B2 43 4C 24 AA 43 52 24 AA 52 24 00 79 |KB$.CL$.CR$.R$.y| 00001060: 50 0A 05 4B B2 34 3A 8D 20 36 30 30 3A 8B 20 4B |P..K.4:. 600:. K| 00001070: B2 33 20 A7 20 31 33 31 30 00 99 50 14 05 8D 20 |.3 . 1310..P... | 00001080: 35 33 30 3A 8B 20 4B B2 31 20 A7 20 31 31 33 30 |530:. K.1 . 1130| 00001090: 3A D5 20 89 20 31 34 38 30 00 BB 50 1E 05 8B 20 |:. . 1480..P... | 000010A0: 46 49 24 B2 22 22 20 A7 20 46 24 B2 46 49 24 3A |FI$."" . F$.FI$:| 000010B0: 8D 20 35 33 30 3A 89 20 38 32 30 00 DF 50 28 05 |. 530:. 820..P(.| 000010C0: 8D 20 37 36 30 3A 8B 20 41 B2 36 32 20 A7 20 41 |. 760:. A.62 . A| 000010D0: B2 50 58 AA 31 3A FE 25 3A 89 20 31 33 35 30 00 |.PX.1:.%:. 1350.| 000010E0: FC 50 32 05 8B 20 41 B2 30 20 A7 20 46 24 B2 22 |.P2.. A.0 . F$."| 000010F0: 46 49 4C 45 20 45 58 49 53 54 53 22 00 12 51 3C |FILE EXISTS"..Q<| 00001100: 05 8D 20 35 33 30 3A 8D 20 31 38 30 3A 89 20 37 |.. 530:. 180:. 7| 00001110: 39 30 00 4E 51 46 05 91 20 41 20 8D 20 31 33 37 |90.NQF.. A . 137| 00001120: 30 2C 31 33 38 30 2C 31 33 39 30 2C 31 34 30 30 |0,1380,1390,1400| 00001130: 2C 31 34 31 30 2C 31 34 32 30 2C 31 34 33 30 2C |,1410,1420,1430,| 00001140: 31 34 34 30 2C 31 34 35 30 2C 31 34 36 30 00 5C |1440,1450,1460.\| 00001150: 51 50 05 FE 26 3A 89 20 31 32 39 30 00 7D 51 5A |QP..&:. 1290.}QZ| 00001160: 05 FE 10 28 46 49 24 29 2C 42 30 2C 50 32 38 36 |...(FI$),B0,P286| 00001170: 36 39 20 A4 20 50 32 38 39 32 38 3A 8E 00 9E 51 |69 . P28928:...Q| 00001180: 64 05 FE 10 28 46 49 24 29 2C 42 30 2C 50 32 38 |d...(FI$),B0,P28| 00001190: 36 36 39 20 A4 20 50 32 39 36 39 36 3A 8E 00 BF |669 . P29696:...| 000011A0: 51 6E 05 FE 10 28 46 49 24 29 2C 42 30 2C 50 32 |Qn...(FI$),B0,P2| 000011B0: 38 36 36 39 20 A4 20 50 33 30 39 37 36 3A 8E 00 |8669 . P30976:..| 000011C0: E0 51 78 05 FE 10 28 46 49 24 29 2C 42 30 2C 50 |.Qx...(FI$),B0,P| 000011D0: 32 38 36 36 39 20 A4 20 50 33 32 37 36 38 3A 8E |28669 . P32768:.| 000011E0: 00 01 52 82 05 FE 10 28 46 49 24 29 2C 42 30 2C |..R....(FI$),B0,| 000011F0: 50 32 38 36 36 39 20 A4 20 50 33 35 30 37 32 3A |P28669 . P35072:| 00001200: 8E 00 22 52 8C 05 FE 10 28 46 49 24 29 2C 42 30 |.."R....(FI$),B0| 00001210: 2C 50 32 38 36 36 39 20 A4 20 50 33 37 38 38 38 |,P28669 . P37888| 00001220: 3A 8E 00 43 52 96 05 FE 10 28 46 49 24 29 2C 42 |:..CR....(FI$),B| 00001230: 30 2C 50 32 38 36 36 39 20 A4 20 50 34 31 32 31 |0,P28669 . P4121| 00001240: 36 3A 8E 00 64 52 A0 05 FE 10 28 46 49 24 29 2C |6:..dR....(FI$),| 00001250: 42 30 2C 50 32 38 36 36 39 20 A4 20 50 34 35 30 |B0,P28669 . P450| 00001260: 35 36 3A 8E 00 85 52 AA 05 FE 10 28 46 49 24 29 |56:...R....(FI$)| 00001270: 2C 42 30 2C 50 32 38 36 36 39 20 A4 20 50 34 39 |,B0,P28669 . P49| 00001280: 34 30 38 3A 8E 00 A6 52 B4 05 FE 10 28 46 49 24 |408:...R....(FI$| 00001290: 29 2C 42 30 2C 50 32 38 36 36 39 20 A4 20 50 35 |),B0,P28669 . P5| 000012A0: 34 32 37 32 3A 8E 00 BB 52 BE 05 8F 20 3D 3D 20 |4272:...R... == | 000012B0: 22 43 4F 4C 4F 52 20 31 20 3D 3D 00 DE 52 C8 05 |"COLOR 1 ==..R..| 000012C0: 52 56 24 B2 52 31 24 3A 8D 20 35 34 30 3A 4B 42 |RV$.R1$:. 540:KB| 000012D0: 24 B2 43 4C 24 AA 43 52 24 AA 22 2B 2D 22 00 F9 |$.CL$.CR$."+-"..| 000012E0: 52 D2 05 4B B2 35 3A 8D 20 36 30 30 3A 8B 20 4B |R..K.5:. 600:. K| 000012F0: B1 32 20 A7 20 31 35 32 30 00 10 53 DC 05 8D 20 |.2 . 1520..S... | 00001300: 35 34 30 3A 8B 20 4B B2 32 20 A7 20 31 35 36 30 |540:. K.2 . 1560| 00001310: 00 2B 53 E6 05 8B 20 4D 4F B2 30 20 A7 20 31 31 |.+S... MO.0 . 11| 00001320: 33 30 3A D5 20 89 20 31 32 38 30 00 47 53 F0 05 |30:. . 1280.GS..| 00001330: 8B 20 4B B2 33 20 A7 20 43 31 B2 43 31 AA 31 3A |. K.3 . C1.C1.1:| 00001340: D5 20 43 31 B2 43 34 00 5A 53 FA 05 8B 20 43 31 |. C1.C4.ZS... C1| 00001350: B2 31 37 20 A7 20 43 31 B2 32 00 6B 53 04 06 8D |.17 . C1.2.kS...| 00001360: 20 33 30 30 3A 89 20 31 34 39 30 00 80 53 0E 06 | 300:. 1490..S..| 00001370: 8F 20 3D 3D 20 22 43 4F 4C 4F 52 20 32 20 3D 3D |. == "COLOR 2 ==| 00001380: 00 A3 53 18 06 52 56 24 B2 52 31 24 3A 8D 20 35 |..S..RV$.R1$:. 5| 00001390: 35 30 3A 4B 42 24 B2 43 4C 24 AA 43 52 24 AA 22 |50:KB$.CL$.CR$."| 000013A0: 2B 2D 22 00 BE 53 22 06 4B B2 35 3A 8D 20 36 30 |+-"..S".K.5:. 60| 000013B0: 30 3A 8B 20 4B B1 32 20 A7 20 31 35 39 30 00 DE |0:. K.2 . 1590..| 000013C0: 53 2C 06 8D 20 35 35 30 3A 8B 20 4B B2 31 20 A7 |S,.. 550:. K.1 .| 000013D0: 20 31 34 38 30 3A D5 20 89 20 31 36 33 30 00 FA | 1480:. . 1630..| 000013E0: 53 36 06 8B 20 4B B2 33 20 A7 20 43 32 B2 43 32 |S6.. K.3 . C2.C2| 000013F0: AA 31 3A D5 20 43 32 B2 43 35 00 0D 54 40 06 8B |.1:. C2.C5..T@..| 00001400: 20 43 32 B2 31 37 20 A7 20 43 32 B2 32 00 1E 54 | C2.17 . C2.2..T| 00001410: 4A 06 8D 20 33 30 30 3A 89 20 31 35 37 30 00 33 |J.. 300:. 1570.3| 00001420: 54 54 06 8F 20 3D 3D 20 22 43 4F 4C 4F 52 20 33 |TT.. == "COLOR 3| 00001430: 20 3D 3D 00 56 54 5E 06 52 56 24 B2 52 31 24 3A | ==.VT^.RV$.R1$:| 00001440: 8D 20 35 36 30 3A 4B 42 24 B2 43 4C 24 AA 43 52 |. 560:KB$.CL$.CR| 00001450: 24 AA 22 2B 2D 22 00 71 54 68 06 4B B2 35 3A 8D |$."+-".qTh.K.5:.| 00001460: 20 36 30 30 3A 8B 20 4B B1 32 20 A7 20 31 36 36 | 600:. K.2 . 166| 00001470: 30 00 91 54 72 06 8D 20 35 36 30 3A 8B 20 4B B2 |0..Tr.. 560:. K.| 00001480: 31 20 A7 20 31 35 36 30 3A D5 20 89 20 31 37 30 |1 . 1560:. . 170| 00001490: 30 00 AD 54 7C 06 8B 20 4B B2 33 20 A7 20 43 33 |0..T|.. K.3 . C3| 000014A0: B2 43 33 AA 31 3A D5 20 43 33 B2 43 36 00 C0 54 |.C3.1:. C3.C6..T| 000014B0: 86 06 8B 20 43 33 B2 31 37 20 A7 20 43 33 B2 32 |... C3.17 . C3.2| 000014C0: 00 D1 54 90 06 8D 20 33 32 30 3A 89 20 31 36 34 |..T... 320:. 164| 000014D0: 30 00 E4 54 9A 06 8F 20 3D 3D 20 22 45 58 49 54 |0..T... == "EXIT| 000014E0: 22 20 3D 3D 00 01 55 A4 06 52 56 24 B2 52 31 24 |" ==..U..RV$.R1$| 000014F0: 3A 8D 20 35 37 30 3A 4B 42 24 B2 43 4C 24 AA 52 |:. 570:KB$.CL$.R| 00001500: 24 00 24 55 AE 06 4B B2 33 3A 8D 20 36 30 30 3A |$.$U..K.3:. 600:| 00001510: 8B 20 4B B2 31 20 A7 20 8D 20 35 37 30 3A 89 20 |. K.1 . . 570:. | 00001520: 31 36 33 30 00 51 55 B8 06 99 20 C7 28 31 39 29 |1630.QU... .(19)| 00001530: C7 28 31 39 29 3A DE 20 30 2C 31 3A FE 07 20 53 |.(19):. 0,1:.. S| 00001540: 41 28 53 50 2C 30 29 2C 30 3A 9E 20 35 31 39 33 |A(SP,0),0:. 5193| 00001550: 38 00 7C 55 C2 06 8B 20 4D 4F B2 35 20 A7 20 99 |8.|U... MO.5 . .| 00001560: 22 53 57 49 54 43 48 20 54 4F 20 38 30 20 43 4F |"SWITCH TO 80 CO| 00001570: 4C 20 53 43 52 45 45 4E 22 3A DE 35 00 82 55 CC |L SCREEN":.5..U.| 00001580: 06 8E 00 8D 55 D6 06 8F 20 3D 3D 3D 3D 00 A5 55 |....U... ====..U| 00001590: E0 06 8F 20 3D 3D 20 22 49 4E 49 54 49 41 4C 49 |... == "INITIALI| 000015A0: 5A 45 20 3D 3D 00 D5 55 EA 06 4D 4F B2 CC 28 30 |ZE ==..U..MO..(0| 000015B0: 29 3A 8B 20 4D 4F B2 35 20 A7 20 99 22 53 57 49 |):. MO.5 . ."SWI| 000015C0: 54 43 48 20 54 4F 20 34 30 20 43 4F 4C 20 53 43 |TCH TO 40 COL SC| 000015D0: 52 45 45 4E 22 00 F2 55 F4 06 86 20 53 41 28 39 |REEN"..U... SA(9| 000015E0: 2C 31 29 2C 50 41 28 39 2C 31 29 2C 4D 41 28 33 |,1),PA(9,1),MA(3| 000015F0: 34 29 00 2A 56 FE 06 5A 4D B2 30 3A 57 49 B2 30 |4).*V..ZM.0:WI.0| 00001600: 3A 58 53 B2 32 34 3A 59 53 B2 35 30 3A 41 43 B2 |:XS.24:YS.50:AC.| 00001610: 52 45 3A 42 43 B2 49 4D 3A 43 43 B2 53 49 3A 43 |RE:BC.IM:CC.SI:C| 00001620: 4E B2 43 4E 20 AF 20 32 35 35 00 5C 56 08 07 8F |N.CN . 255.\V...| 00001630: 20 3D 20 53 50 52 49 54 45 20 41 52 52 41 59 20 | = SPRITE ARRAY | 00001640: 3D 20 53 50 52 49 54 45 23 20 3D 20 57 49 44 54 |= SPRITE# = WIDT| 00001650: 48 20 3D 20 49 4E 44 45 58 20 53 50 00 73 56 12 |H = INDEX SP.sV.| 00001660: 07 81 20 49 B2 31 20 A4 20 38 3A FE 07 20 49 2C |.. I.1 . 8:.. I,| 00001670: 30 3A 82 00 B3 56 1C 07 53 41 28 30 2C 30 29 B2 |0:...V..SA(0,0).| 00001680: 31 3A 53 41 28 30 2C 31 29 B2 31 3A 53 41 28 31 |1:SA(0,1).1:SA(1| 00001690: 2C 30 29 B2 32 3A 53 41 28 31 2C 31 29 B2 32 3A |,0).2:SA(1,1).2:| 000016A0: 53 41 28 32 2C 30 29 B2 33 3A 53 41 28 32 2C 31 |SA(2,0).3:SA(2,1| 000016B0: 29 B2 34 00 F4 56 26 07 53 41 28 33 2C 30 29 B2 |).4..V&.SA(3,0).| 000016C0: 34 3A 53 41 28 33 2C 31 29 B2 36 3A 53 41 28 34 |4:SA(3,1).6:SA(4| 000016D0: 2C 30 29 B2 35 3A 53 41 28 34 2C 31 29 B2 38 3A |,0).5:SA(4,1).8:| 000016E0: 53 41 28 35 2C 30 29 B2 36 3A 53 41 28 35 2C 31 |SA(5,0).6:SA(5,1| 000016F0: 29 B2 31 30 00 37 57 30 07 53 41 28 36 2C 30 29 |).10.7W0.SA(6,0)| 00001700: B2 37 3A 53 41 28 36 2C 31 29 B2 31 32 3A 53 41 |.7:SA(6,1).12:SA| 00001710: 28 37 2C 30 29 B2 35 3A 53 41 28 37 2C 31 29 B2 |(7,0).5:SA(7,1).| 00001720: 31 36 3A 53 41 28 38 2C 30 29 B2 36 3A 53 41 28 |16:SA(8,0).6:SA(| 00001730: 38 2C 31 29 B2 32 30 00 5F 57 3A 07 53 41 28 39 |8,1).20._W:.SA(9| 00001740: 2C 30 29 B2 37 3A 53 41 28 39 2C 31 29 B2 32 34 |,0).7:SA(9,1).24| 00001750: 3A 53 50 B2 34 3A 53 4E B2 35 3A 53 44 B2 38 00 |:SP.4:SN.5:SD.8.| 00001760: 8E 57 44 07 8F 20 3D 20 50 49 58 45 4C 20 41 52 |.WD.. = PIXEL AR| 00001770: 52 41 59 20 3D 20 57 49 44 54 48 20 3D 20 53 54 |RAY = WIDTH = ST| 00001780: 41 52 54 20 3D 20 49 4E 44 45 58 20 50 58 00 B9 |ART = INDEX PX..| 00001790: 57 4E 07 50 58 B2 39 3A 41 B2 31 36 3A 81 20 49 |WN.PX.9:A.16:. I| 000017A0: B2 30 20 A4 20 39 3A 50 41 28 49 2C 30 29 B2 41 |.0 . 9:PA(I,0).A| 000017B0: 3A 41 B2 41 AA 31 36 3A 82 00 EA 57 58 07 57 44 |:A.A.16:...WX.WD| 000017C0: B2 31 36 30 3A 41 B2 37 32 3A 81 20 49 B2 30 20 |.160:A.72:. I.0 | 000017D0: A4 20 39 3A 50 41 28 49 2C 31 29 B2 41 3A 41 B2 |. 9:PA(I,1).A:A.| 000017E0: 41 AB 38 3A 82 3A 50 58 B2 39 00 FE 57 62 07 46 |A.8:.:PX.9..Wb.F| 000017F0: 49 24 B2 22 22 3A 52 24 B2 C7 28 31 33 29 00 1B |I$."":R$..(13)..| 00001800: 58 6C 07 8F 20 3D 3D 20 22 57 49 4E 44 4F 57 20 |Xl.. == "WINDOW | 00001810: 53 50 52 49 54 45 53 22 20 3D 3D 00 33 58 76 07 |SPRITES" ==.3Xv.| 00001820: E7 30 2C 31 3A E7 34 2C 31 3A E7 31 2C 32 3A DE |.0,1:.4,1:.1,2:.| 00001830: 31 2C 31 00 4E 58 80 07 41 B2 31 3A E5 20 31 2C |1,1.NX..A.1:. 1,| 00001840: 30 2C 30 20 A4 20 32 2C 30 3A 8D 33 39 30 00 74 |0,0 . 2,0:.390.t| 00001850: 58 8A 07 E1 20 31 2C 30 2C 30 2C 34 2C 32 3A 8D |X... 1,0,0,4,2:.| 00001860: 33 38 30 3A E1 20 31 2C 30 2C 30 2C 38 2C 34 3A |380:. 1,0,0,8,4:| 00001870: 8D 33 39 30 00 9C 58 94 07 E1 20 31 2C 30 2C 30 |.390..X... 1,0,0| 00001880: 2C 31 32 2C 36 3A 8D 33 38 30 3A E1 20 31 2C 30 |,12,6:.380:. 1,0| 00001890: 2C 30 2C 31 36 2C 38 3A 8D 33 39 30 00 C6 58 9E |,0,16,8:.390..X.| 000018A0: 07 E1 20 31 2C 30 2C 30 2C 32 30 2C 31 30 3A 8D |.. 1,0,0,20,10:.| 000018B0: 33 38 30 3A E1 20 31 2C 30 2C 30 2C 32 33 2C 31 |380:. 1,0,0,23,1| 000018C0: 32 3A 8D 33 39 30 00 E4 58 A8 07 8F 20 3D 3D 20 |2:.390..X... == | 000018D0: 22 47 52 41 50 48 49 43 53 20 53 43 52 45 45 4E |"GRAPHICS SCREEN| 000018E0: 22 20 3D 3D 00 0A 59 B2 07 43 31 B2 33 3A 43 32 |" ==..Y..C1.3:C2| 000018F0: B2 31 35 3A 43 33 B2 38 3A 8D 20 32 39 30 3A DE |.15:C3.8:. 290:.| 00001900: 20 34 2C 31 2C 32 31 3A FE 26 00 28 59 BC 07 8D | 4,1,21:.&.(Y...| 00001910: 20 33 34 30 3A 8D 20 32 31 30 3A 8D 20 34 31 30 | 340:. 210:. 410| 00001920: 3A 8D 20 33 36 30 3A 8E 00 33 59 C6 07 8F 20 3D |:. 360:..3Y... =| 00001930: 3D 3D 3D 00 48 59 D0 07 8F 20 3D 3D 3D 20 22 5A |===.HY... === "Z| 00001940: 4F 4F 4D 22 20 3D 3D 3D 00 8B 59 DA 07 4B 42 24 |OOM" ===..Y..KB$| 00001950: B2 22 20 22 AA 43 4C 24 AA 43 52 24 AA 43 55 24 |." ".CL$.CR$.CU$| 00001960: AA 43 44 24 AA 22 2B 2D 22 3A 8B 20 5A 4D B2 30 |.CD$."+-":. ZM.0| 00001970: 20 A7 20 4D 58 B2 57 49 AD 32 3A 4D 59 B2 4D 58 | . MX.WI.2:MY.MX| 00001980: 3A 58 44 B2 58 43 3A 53 50 B2 34 00 C0 59 E4 07 |:XD.XC:SP.4..Y..| 00001990: 5A 4D B2 31 3A 53 52 B2 59 53 AA 58 44 3A 53 51 |ZM.1:SR.YS.XD:SQ| 000019A0: B2 58 53 AA 28 58 44 AC 32 29 3A 53 58 B2 28 4D |.XS.(XD.2):SX.(M| 000019B0: 58 AC 32 29 AA 53 51 3A 53 59 B2 4D 59 AA 53 52 |X.2).SQ:SY.MY.SR| 000019C0: 00 F8 59 EE 07 FE 07 20 53 4E 2C 30 3A 53 4E B2 |..Y.... SN,0:SN.| 000019D0: 53 41 28 53 50 2C 30 29 3A 53 44 B2 53 41 28 53 |SA(SP,0):SD.SA(S| 000019E0: 50 2C 31 29 3A 53 55 B2 58 43 AA 57 49 AB 53 44 |P,1):SU.XC.WI.SD| 000019F0: 3A 53 53 B2 53 55 AC 32 00 2E 5A F8 07 53 55 B2 |:SS.SU.2..Z..SU.| 00001A00: 59 53 AA 53 55 3A 53 53 B2 58 53 AA 53 53 3A FE |YS.SU:SS.XS.SS:.| 00001A10: 06 20 53 4E 2C 53 58 2C 53 59 3A 8B 20 57 49 B2 |. SN,SX,SY:. WI.| 00001A20: 31 36 20 A7 20 55 B2 36 3A D5 20 55 B2 39 00 3E |16 . U.6:. U.9.>| 00001A30: 5A 02 08 FE 06 20 53 4E 2C 53 58 2C 53 59 00 76 |Z.... SN,SX,SY.v| 00001A40: 5A 0C 08 4B B2 38 3A 8D 20 32 31 35 30 3A 91 20 |Z..K.8:. 2150:. | 00001A50: 4B 20 89 20 32 30 37 30 2C 32 30 38 30 2C 32 30 |K . 2070,2080,20| 00001A60: 39 30 2C 32 31 30 30 2C 32 31 31 30 2C 32 31 32 |90,2100,2110,212| 00001A70: 30 2C 32 31 33 30 00 8D 5A 16 08 43 B2 31 3A 8D |0,2130..Z..C.1:.| 00001A80: 20 32 32 33 30 3A 8D 20 37 32 30 3A 8E 00 B1 5A | 2230:. 720:...Z| 00001A90: 20 08 8B 20 53 58 B2 53 51 20 A7 20 32 30 36 30 | .. SX.SQ . 2060| 00001AA0: 3A D5 20 53 58 B2 53 58 AB 32 3A 89 20 32 30 35 |:. SX.SX.2:. 205| 00001AB0: 30 00 D5 5A 2A 08 8B 20 53 58 B2 53 53 20 A7 20 |0..Z*.. SX.SS . | 00001AC0: 32 30 36 30 3A D5 20 53 58 B2 53 58 AA 32 3A 89 |2060:. SX.SX.2:.| 00001AD0: 20 32 30 35 30 00 F9 5A 34 08 8B 20 53 59 B2 53 | 2050..Z4.. SY.S| 00001AE0: 52 20 A7 20 32 30 36 30 3A D5 20 53 59 B2 53 59 |R . 2060:. SY.SY| 00001AF0: AB 31 3A 89 20 32 30 35 30 00 1D 5B 3E 08 8B 20 |.1:. 2050..[>.. | 00001B00: 53 59 B2 53 55 20 A7 20 32 30 36 30 3A D5 20 53 |SY.SU . 2060:. S| 00001B10: 59 B2 53 59 AA 31 3A 89 20 32 30 35 30 00 41 5B |Y.SY.1:. 2050.A[| 00001B20: 48 08 8B 20 53 50 B2 55 20 20 A7 20 32 30 33 30 |H.. SP.U . 2030| 00001B30: 3A D5 20 53 50 B2 53 50 AA 31 3A 89 20 32 30 33 |:. SP.SP.1:. 203| 00001B40: 30 00 65 5B 52 08 8B 20 53 50 B2 30 20 20 A7 20 |0.e[R.. SP.0 . | 00001B50: 32 30 33 30 3A D5 20 53 50 B2 53 50 AB 31 3A 89 |2030:. SP.SP.1:.| 00001B60: 20 32 30 33 30 00 7E 5B 5C 08 8F 20 3D 3D 20 22 | 2030.~[\.. == "| 00001B70: 4D 4F 56 45 20 57 49 4E 44 4F 57 20 3D 3D 00 8A |MOVE WINDOW ==..| 00001B80: 5B 66 08 42 B2 30 3A 43 B2 32 00 97 5B 70 08 A1 |[f.B.0:C.2..[p..| 00001B90: 20 4B 24 3A 41 B2 31 00 A3 5B 7A 08 EB 20 FC 20 | K$:A.1..[z.. . | 00001BA0: 41 B2 4B 00 C3 5B 84 08 8B 20 4B 24 B2 CA 28 4B |A.K..[... K$..(K| 00001BB0: 42 24 2C 41 2C 31 29 20 A7 20 ED 3A D5 20 41 B2 |B$,A,1) . .:. A.| 00001BC0: 41 AA 31 00 C9 5B 8E 08 EC 00 E3 5B 98 08 8D 20 |A.1..[.....[... | 00001BD0: 32 32 33 30 3A 8B 20 41 B3 B1 4B 20 A7 20 4B B2 |2230:. A..K . K.| 00001BE0: 41 3A 8E 00 F5 5B A2 08 8D 20 32 32 35 30 3A 89 |A:...[... 2250:.| 00001BF0: 20 32 31 36 30 00 FE 5B AC 08 8F 20 3D 3D 00 31 | 2160..[... ==.1| 00001C00: 5C B6 08 8B 20 53 50 B3 37 20 A7 20 FE 07 20 53 |\... SP.7 . .. S| 00001C10: 4E 2C 31 2C 43 2C 30 2C 30 2C 30 2C 30 3A D5 20 |N,1,C,0,0,0,0:. | 00001C20: FE 07 20 53 4E 2C 31 2C 43 2C 30 2C 31 2C 31 2C |.. SN,1,C,0,1,1,| 00001C30: 30 00 37 5C C0 08 8E 00 4D 5C CA 08 8B 20 43 B2 |0.7\....M\... C.| 00001C40: 32 20 A7 20 43 B2 31 3A D5 20 43 B2 32 00 63 5C |2 . C.1:. C.2.c\| 00001C50: D4 08 8B 20 42 B2 30 20 A7 20 8D 20 37 32 30 3A |... B.0 . . 720:| 00001C60: 42 B2 31 00 69 5C DE 08 8E 00 00 00 |B.1.i\...... |
.@7@... "MANDELBROT HALO" "AUBREY STANLE Y" "APRIL 1987".P@... = THE NEXT LINE MU ST BE ENTERED EXACTLY AS SHOWN =..@..RE. .2:IM.1.25:SI.2.5:GP.SI.160:CN.151.K@#.R 1$.G(18): R2$.G(146): CL$.G(157): CR$.G( 29)..@$.BL$.G(159): RD$.G(150): BR$.G(14 9): GY$.G(155)..A%.CU$.G(145): CD$.G(17) .@A(...15:.%: 15:. 15,8,15:.."HALO.OBJ" .XA2.. 1770:. 930: 15:..WA<.. == "PRINT PARAMETERS" ==..AF.. GY$;:.. 3,21,19,21 ,1:. AC;..AP... 23,21,39,21,1:. BC;.OAZ. .. 3,22,19,22,1:. CC;:...AD.. == "PRINT COORDS" ==..BN.. ZM.0 . MX.0:MY.0:MZ.WD: U MZ.SD.1BX.. GY$;:.. 21,22,26,22,1:. MX ;.LB.... 28,22,33,22,1:. MY;.IB.... 35,2 2,39,22,1:. MZ;:...B... == "PRINT PIXELS " ==..B .. GY$;:.. 33,23,38,23,1:. WD;:. .EB... == "PRINT FILENAME" ==..B... GY$; :.. 8,23,25,23,1:. F$;..B.....CH.. == "P LOT COLOR LINE" ==. CR.. 220:. 230:. 240 .:C... 1,0,164,52,167,,1:..VC... 2,53,16 4,105,167,,1:..SC... 3,106,164,159,167,, 1:...C... == "PLOT FRAME" ==..C... 3,12: . Y.168 . 199:. 3,0,Y . 159,Y:.:. 3,C3.. C..X.PA(PX,1):Y.WD.1:. 3,X,X,X.Y,X.Y:... D... == "COLOR VALUES" ==."D".. 1,C1:. 2 ,C2:. 3,C3:. 3,1:..TD,.. 1,C1:. 2,C2:. W I..0 . . 27456:U . 220:. 230.ZD6...WD@.. 3,C3:. WI..0 . . 27415..DJ.. 240:...DT. C4.C1:C5.C2:C6.C3:...D^.. == "PLOT VALUE S" ==.YDH.RE.AC:IM.BC:SI.CC:.. SA(SP,0), 0..ER.XC.PA(PX,1):YC.XC.WD.1:. 70:. 110: . 160:..!E|.. == "MAKE SPRITE" ==.HE... A$,0,0,23,20:.. A$,A:A.A.1:. 1:..AE... = = "PRINT MENU" ==..E... G(19)G(19)RV$:. 0:. 51941..E.... 0,21,2,21:. BR$"RE";..E .... 20,21,22,21:. "IM";.QE.... 0,22,2,2 2:. "SI";..EB... 20,22,35,22:."X".6)"Y". 6)"Z";..FL.. 480:. 490:. 500:. 510:. 520 .:FV.. 530:. 540:. 550:. 560:. 570.GF... . 0,23,8,23:. RV$;RD$;"FILENAME";:. 580. .F.... 27,23,33,23:. RV$;RD$;"PIXELS";:. 580..F.... 0,24,3,24:. RV$;BL$;"PLOT";: . 580..F.... 5,24,8,24:. RV$;BL$;"LOAD"; :. 580..G.... 10,24,13,24:. RV$;BL$;"SAV E";:. 580.<G.... 15,24,18,24:. RV$;BL$;" DUMP";:. 580.GG.... 20,24,23,24:. RV$;BL $;"COL1";:. 580..G&... 25,24,28,24:. RV$ ;BL$;"COL2";:. 580..G0... 30,24,33,24:. RV$;BL$;"COL3";:. 580..G:... 35,24,38,24 :. RV$;BL$;"EXIT";..GD.RV$.R2$:. RV$;:.. .HN.. == "GET KEY" ==..HX.. K$:A.1.&HB.. . A.K.FHL.. K$.J(KB$,A,1) . .:U A.A.1.L HV...DH... A.K . 600:U K.A:..|H... == "L OAD VARS" ==..H... A.0 . 4:.. 0:P.B(P1.A ):.. 1:.(P2.A),P:...H.... 15:P1.P1.5:..V H... == "SAVE VARS" ==..I... A.0 . 4:.. 1:P.B(P1.A):.. 0:.(P2.A),P:...I.... 15:P 2.P2.5:..=IF.. == "UPDATE ZOOM PARAMETER S" ==..IP.MX.(SX.SQ).2:MY.SY.SR:AC.RE.(M X.GP):BC.IM.(MY.GP):CC.SI.(WI.SD)..IZ.. 70:. 110:...I... == "DISK CHECKS" ==.II. ..15,"S0:".FI$:.15,A,F$:...I....#1,(FI$) .",P":.15,A,F$:..#1:...I...15,A,F$:...J. .. ====..J... == "FILENAME" ==.;J .RV$.R 1$:. 480:KB$.CR$.R$.CJ*.K.3:. 600:F$."": . K.1 . . 480:. 860.XJ4.. 480:. 180:. F$ ..J>.. F$.."" . FI$.F$:U F$.FI$..JH.. 18 0:.800..JR.. == "PIXELS" ==..J\.RV$.R1$: . 490:KB$.CL$.CR$."+-"..KF.K.5:. 600:. K . 880,880,890,900. KP.. 490:. K.1 . 800 :U . 930.AKZ.. PX.9 . 870:U PX.PX.1:. 91 0.\K... PX.0 . 870:U PX.PX.1.XK..WD.PA(P X,0):. 160:. 870..K... == "PLOT" ==..K.. RV$.R1$:. 500:KB$." ".CL$.CR$.R$.TK..K.5 :. 600:. K . 980,950,950,960..K... 500:. K.2 . 860:U . 1000.+L... 500:. 290:. 36 0:. 260:GP.SI.WD:. 4864,WD,XC,CN,MO.XLJ. .&:WI.WD:. 4,0,21:. 210:ZM.0:. 110:. 930 .~LT.. WI.0 . 940:U . 500:. 2010:. 930.. L... == "LOAD" ==..L..RV$.R1$:. 510:KB$. CL$.CR$.R$.ML..K.4:. 600:. K.3 . 1030..L ... 510:. K.1 . 930:U . 1130..M... FI$." " . F$.FI$:. 510:. 820.4M... 760:. A.. 0 . . 510:. 180:. 790.^M...%:..(FI$),B0:P 1.8157:P2.N.(C1):. 660..M$.P2.N.(C2):. 6 60:P2.N.(C3):. 660..M..P2.N.(AC):. 660:P 2.N.(BC):. 660.JM8.P2.N.(CC):. 660:P2.N. (WI):. 660..MB.WD.WI:GP.CC.WD:. A.0 . 9: . WI.PA(A,0) . PX.A..NL..:ZM.0:. 340:. 3 60:. 300:. 320.=NV.. 270:. 210:.&:. 510: . 930.PN`.. == "SAVE" ==.QNJ.RV$.R1$:. 5 20:KB$.CL$.CR$.R$..NT.K.4:. 600:. K.3 . 1170..N~.. 520:. K.1 . 1000..N... MO.0 . 1480:U . 1280..N... FI$."" . F$.FI$:. 5 20:. 820..N... 760:. A.62 . 1210..O... A .0 . F$."FILE EXISTS".+O... 520:. 180:. 790.[O...%:. 340:P2.8157:. P.0 . 34:MA(P ).B(P2.P):..OD.P1.N.(C1):. 690:P1.N.(C2 ):. 690..ON.P1.N.(C3):. 690:P1.N.(RE):. 690.GOX.P1.N.(IM):. 690:P1.N.(SI):. 690. .O..P1.N.(WI):. 690:..(FI$),B0,P8157 . P 14592:P2.8157.*P... P.0 . 34:. P2.P,MA(P ):.:.&:. 520:. 930.=P... == "DUMP" ==.^P ..RV$.R1$:. 530:KB$.CL$.CR$.R$.YP..K.4:. 600:. K.3 . 1310..P... 530:. K.1 . 1130 :U . 1480..P... FI$."" . F$.FI$:. 530:. 820..P(.. 760:. A.62 . A.PX.1:.%:. 1350. .P2.. A.0 . F$."FILE EXISTS"..Q<.. 530:. 180:. 790.NQF.. A . 1370,1380,1390,1400 ,1410,1420,1430,1440,1450,1460.\QP..&:. 1290.}QZ...(FI$),B0,P28669 . P28928:...Q D...(FI$),B0,P28669 . P29696:...QN...(FI $),B0,P28669 . P30976:...QX...(FI$),B0,P 28669 . P32768:...R....(FI$),B0,P28669 . P35072:.."R....(FI$),B0,P28669 . P37888 :..CR....(FI$),B0,P28669 . P41216:..DR . ..(FI$),B0,P28669 . P45056:...R....(FI$) ,B0,P28669 . P49408:...R....(FI$),B0,P28 669 . P54272:...R... == "COLOR 1 ==..RH. RV$.R1$:. 540:KB$.CL$.CR$."+-"..RR.K.5:. 600:. K.2 . 1520..S... 540:. K.2 . 1560 .+S... MO.0 . 1130:U . 1280.GS... K.3 . C1.C1.1:U C1.C4.ZS... C1.17 . C1.2.KS... 300:. 1490..S... == "COLOR 2 ==..S..RV$ .R1$:. 550:KB$.CL$.CR$."+-"..S".K.5:. 60 0:. K.2 . 1590..S,.. 550:. K.1 . 1480:U . 1630..S6.. K.3 . C2.C2.1:U C2.C5..T@.. C2.17 . C2.2..TJ.. 300:. 1570.3TT.. == "COLOR 3 ==.VT^.RV$.R1$:. 560:KB$.CL$.CR $."+-".QTH.K.5:. 600:. K.2 . 1660..TR.. 560:. K.1 . 1560:U . 1700..T|.. K.3 . C3 .C3.1:U C3.C6..T... C3.17 . C3.2.QT... 3 20:. 1640..T... == "EXIT" ==..U..RV$.R1$ :. 570:KB$.CL$.R$.$U..K.3:. 600:. K.1 . . 570:. 1630.QU... G(19)G(19):. 0,1:.. S A(SP,0),0:. 51938.|UB.. MO.5 . ."SWITCH TO 80 COL SCREEN":.5..UL....UV.. ====..U ... == "INITIALIZE ==.UU..MO.L(0):. MO.5 . ."SWITCH TO 40 COL SCREEN"..U... SA(9 ,1),PA(9,1),MA(34).*V..ZM.0:WI.0:XS.24:Y S.50:AC.RE:BC.IM:CC.SI:CN.CN . 255.\V... = SPRITE ARRAY = SPRITE# = WIDTH = INDE X SP.SV... I.1 . 8:.. I,0:...V..SA(0,0). 1:SA(0,1).1:SA(1,0).2:SA(1,1).2:SA(2,0). 3:SA(2,1).4..V&.SA(3,0).4:SA(3,1).6:SA(4 ,0).5:SA(4,1).8:SA(5,0).6:SA(5,1).10.7W0 .SA(6,0).7:SA(6,1).12:SA(7,0).5:SA(7,1). 16:SA(8,0).6:SA(8,1).20._W:.SA(9,0).7:SA (9,1).24:SP.4:SN.5:SD.8..WD.. = PIXEL AR RAY = WIDTH = START = INDEX PX..WN.PX.9: A.16:. I.0 . 9:PA(I,0).A:A.A.16:...WX.WD .160:A.72:. I.0 . 9:PA(I,1).A:A.A.8:.:PX .9..WB.FI$."":R$.G(13)..XL.. == "WINDOW SPRITES" ==.3XV..0,1:.4,1:.1,2:.1,1.NX.. A.1:. 1,0,0 . 2,0:.390.TX... 1,0,0,4,2:. 380:. 1,0,0,8,4:.390..X... 1,0,0,12,6:.3 80:. 1,0,0,16,8:.390.FX... 1,0,0,20,10:. 380:. 1,0,0,23,12:.390..X... == "GRAPHIC S SCREEN" ==..Y..C1.3:C2.15:C3.8:. 290:. 4,1,21:.&.(Y... 340:. 210:. 410:. 360:. .3YF.. ====.HYP.. === "ZOOM" ===..YZ.KB$ ." ".CL$.CR$.CU$.CD$."+-":. ZM.0 . MX.WI .2:MY.MX:XD.XC:SP.4..Y..ZM.1:SR.YS.XD:SQ .XS.(XD.2):SX.(MX.2).SQ:SY.MY.SR..Y.... SN,0:SN.SA(SP,0):SD.SA(SP,1):SU.XC.WI.SD :SS.SU.2..Z..SU.YS.SU:SS.XS.SS:.. SN,SX, SY:. WI.16 . U.6:U U.9.>Z.... SN,SX,SY.V Z..K.8:. 2150:. K . 2070,2080,2090,2100, 2110,2120,2130..Z..C.1:. 2230:. 720:...Z .. SX.SQ . 2060:U SX.SX.2:. 2050.UZ*.. SX.SS . 2060:U SX.SX.2:. 2050..Z4.. SY.S R . 2060:U SY.SY.1:. 2050..[>.. SY.SU . 2060:U SY.SY.1:. 2050.A[H.. SP.U . 2030 :U SP.SP.1:. 2030.E[R.. SP.0 . 2030:U S P.SP.1:. 2030.~[\.. == "MOVE WINDOW ==.. [F.B.0:C.2..[P.. K$:A.1..[Z.. . A.K.C[.. . K$.J(KB$,A,1) . .:U A.A.1.I[.....[... 2230:. A..K . K.A:...[... 2250:. 2160..[ ... ==.1\... SP.7 . .. SN,1,C,0,0,0,0:U .. SN,1,C,0,1,1,0.7\....M\J.. C.2 . C.1: U C.2.C\T.. B.0 . . 720:B.1.I\......
> CLICK IMAGE PREVIEW FOR FULL MODAL