POINTERS
FILE INFORMATION
FILENAME(S): POINTERS
FILE TYPE(S): PRG
FILE SIZE: 4.9K
FIRST SEEN: 2025-11-30 17:31:23
APPEARS ON: 1 disk(s)
FILE HASH
2741c17194a0cd2d379bea770d35e8d06ba8a81a4d4543e2cdb9516a88515684
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CDU VOL3 NO7 MAY | POINTERS | PRG | UK CD | 24 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2D 08 05 00 8B 5A 25 B2 30 A7 5A 25 B2 31 |..-....Z%.0.Z%.1|
00000010: 3A 97 36 33 31 2C 33 32 3A 97 31 39 38 2C 31 3A |:.631,32:.198,1:|
00000020: 93 22 50 2E 43 4F 44 45 22 2C 38 2C 31 00 4B 08 |."P.CODE",8,1.K.|
00000030: 0A 00 8F 20 2A 2A 2A 20 50 52 45 46 45 52 45 4E |... *** PREFEREN|
00000040: 43 45 53 20 50 52 4F 47 52 41 4D 00 6B 08 14 00 |CES PROGRAM.k...|
00000050: 8F 20 2A 2A 2A 20 54 4F 20 44 45 4D 4F 4E 53 54 |. *** TO DEMONST|
00000060: 52 41 54 45 20 55 53 45 20 4F 46 00 83 08 1E 00 |RATE USE OF.....|
00000070: 8F 20 2A 2A 2A 20 50 4F 49 4E 54 45 52 20 43 4F |. *** POINTER CO|
00000080: 44 45 2E 00 A7 08 28 00 8F 20 2A 2A 2A 20 42 59 |DE....(.. *** BY|
00000090: 20 57 49 4C 4C 49 41 4D 20 50 48 49 4C 4C 49 50 | WILLIAM PHILLIP|
000000A0: 53 20 31 39 38 38 2E 00 AD 08 32 00 3A 00 B7 08 |S 1988....2.:...|
000000B0: 3C 00 8D 35 30 31 30 00 C1 08 46 00 8D 35 32 32 |<..5010...F..522|
000000C0: 30 00 CB 08 50 00 8D 35 31 38 30 00 D5 08 5A 00 |0...P..5180...Z.|
000000D0: 8D 35 32 36 30 00 E8 08 5F 00 8B C2 28 34 39 38 |.5260..._...(498|
000000E0: 38 36 29 B1 30 A7 39 30 00 09 09 64 00 58 25 B2 |86).0.90...d.X%.|
000000F0: C2 28 34 39 38 37 32 29 AA 32 35 36 AC 28 C2 28 |.(49872).256.(.(|
00000100: 34 39 38 37 33 29 AF 31 29 00 1F 09 6E 00 8B 58 |49873).1)...n..X|
00000110: 25 B1 32 35 AF 58 25 B3 31 36 32 A7 31 35 30 00 |%.25.X%.162.150.|
00000120: 36 09 78 00 8B 58 25 B1 31 36 34 AF 58 25 B3 32 |6.x..X%.164.X%.2|
00000130: 35 39 A7 35 35 30 00 5A 09 82 00 8B 58 25 B1 32 |59.550.Z....X%.2|
00000140: 36 30 AF 58 25 B3 33 34 31 A7 9E 34 39 32 37 34 |60.X%.341..49274|
00000150: 3A 99 C7 28 31 34 37 29 3A 80 00 62 09 8C 00 89 |:..(147):..b....|
00000160: 39 30 00 71 09 96 00 4D 25 B2 30 3A 8D 35 33 32 |90.q...M%.0:.532|
00000170: 30 00 83 09 A0 00 97 36 38 34 2C 37 3A 97 36 37 |0......684,7:.67|
00000180: 39 2C 31 00 9B 09 AA 00 8D 35 32 36 30 3A 8B C2 |9,1......5260:..|
00000190: 28 37 31 30 29 B2 30 A7 31 37 30 00 A5 09 B4 00 |(710).0.170.....|
000001A0: 8D 35 34 37 30 00 B1 09 BE 00 59 25 B2 53 25 AB |.5470.....Y%.S%.|
000001B0: 34 00 D1 09 C8 00 91 59 25 89 32 31 30 2C 32 35 |4......Y%.210,25|
000001C0: 30 2C 32 39 30 2C 33 33 30 2C 33 39 30 2C 35 34 |0,290,330,390,54|
000001D0: 30 00 E0 09 D2 00 4D 25 B2 37 3A 8D 35 33 32 30 |0.....M%.7:.5320|
000001E0: 00 F0 09 DC 00 41 25 B2 C2 28 34 39 34 31 33 29 |.....A%..(49413)|
000001F0: 00 11 0A E6 00 58 25 B2 37 3A 59 25 B2 31 39 3A |.....X%.7:Y%.19:|
00000200: 4C 25 B2 33 31 3A 4E 25 B2 31 39 3A 8D 35 35 36 |L%.31:N%.19:.556|
00000210: 30 00 23 0A F0 00 97 34 39 34 31 33 2C 41 25 3A |0.#....49413,A%:|
00000220: 89 39 30 00 33 0A FA 00 4D 25 B2 31 32 3A 8D 35 |.90.3...M%.12:.5|
00000230: 33 32 30 00 43 0A 04 01 41 25 B2 C2 28 34 39 34 |320.C...A%..(494|
00000240: 30 38 29 00 62 0A 0E 01 58 25 B2 38 3A 59 25 B2 |08).b...X%.8:Y%.|
00000250: 32 33 3A 4C 25 B2 37 3A 4E 25 B2 31 3A 8D 35 35 |23:L%.7:N%.1:.55|
00000260: 36 30 00 74 0A 18 01 97 34 39 34 30 38 2C 41 25 |60.t....49408,A%|
00000270: 3A 89 39 30 00 84 0A 22 01 4D 25 B2 31 37 3A 8D |:.90...".M%.17:.|
00000280: 35 33 32 30 00 94 0A 2C 01 41 25 B2 C2 28 34 39 |5320...,.A%..(49|
00000290: 33 39 36 29 00 B3 0A 36 01 58 25 B2 39 3A 59 25 |396)...6.X%.9:Y%|
000002A0: B2 32 33 3A 4C 25 B2 37 3A 4E 25 B2 35 3A 8D 35 |.23:L%.7:N%.5:.5|
000002B0: 35 36 30 00 C5 0A 40 01 97 34 39 33 39 36 2C 41 |560...@..49396,A|
000002C0: 25 3A 89 39 30 00 D5 0A 4A 01 4D 25 B2 32 32 3A |%:.90...J.M%.22:|
000002D0: 8D 35 33 32 30 00 E7 0A 54 01 97 36 38 34 2C 33 |.5320...T..684,3|
000002E0: 3A 97 36 37 39 2C 31 00 FF 0A 5E 01 8D 35 32 36 |:.679,1...^..526|
000002F0: 30 3A 8B C2 28 37 31 30 29 B2 30 A7 33 35 30 00 |0:..(710).0.350.|
00000300: 0F 0B 68 01 8D 35 34 37 30 3A 8D 35 35 32 30 00 |..h..5470:.5520.|
00000310: 28 0B 72 01 44 43 25 B2 53 25 AB 31 32 3A 8B 44 |(.r.DC%.S%.12:.D|
00000320: 43 25 B2 33 A7 35 34 30 00 3E 0B 7C 01 44 56 25 |C%.3.540.>.|.DV%|
00000330: B2 44 43 25 3A 8B 44 56 25 B2 32 A7 38 30 00 50 |.DC%:.DV%.2.80.P|
00000340: 0B 81 01 44 56 25 B2 31 AB 44 56 25 3A 89 38 30 |...DV%.1.DV%:.80|
00000350: 00 60 0B 86 01 4D 25 B2 32 37 3A 8D 35 33 32 30 |.`...M%.27:.5320|
00000360: 00 73 0B 90 01 97 36 38 34 2C 31 34 3A 97 36 37 |.s....684,14:.67|
00000370: 39 2C 31 00 8B 0B 9A 01 8D 35 32 36 30 3A 8B C2 |9,1......5260:..|
00000380: 28 37 31 30 29 B2 30 A7 34 31 30 00 95 0B A4 01 |(710).0.410.....|
00000390: 8D 35 34 37 30 00 AC 0B AE 01 47 25 B2 53 25 AB |.5470.....G%.S%.|
000003A0: 31 33 3A 8B 47 25 B2 33 A7 35 34 30 00 C0 0B B8 |13:.G%.3.540....|
000003B0: 01 4C 25 B2 30 3A 8B 47 25 B2 32 A7 4C 25 B2 31 |.L%.0:.G%.2.L%.1|
000003C0: 00 D3 0B C2 01 58 25 B2 31 34 AA 47 25 3A 8D 35 |.....X%.14.G%:.5|
000003D0: 36 38 30 00 DD 0B CC 01 8D 35 32 36 30 00 ED 0B |680......5260...|
000003E0: D6 01 59 25 B2 C2 28 34 39 38 38 36 29 00 0B 0C |..Y%..(49886)...|
000003F0: E0 01 8B 59 25 B3 28 58 25 AA 31 29 B0 59 25 B1 |...Y%.(X%.1).Y%.|
00000400: 28 58 25 AA 32 29 A7 89 34 36 30 00 1B 0C EA 01 |(X%.2)..460.....|
00000410: 59 25 B2 C2 28 34 39 38 38 35 29 00 37 0C EF 01 |Y%..(49885).7...|
00000420: 8B 59 25 B3 33 B0 59 25 B1 32 AC 28 31 37 AB 4C |.Y%.3.Y%.2.(17.L|
00000430: 25 29 A7 89 34 36 30 00 4D 0C F4 01 50 25 B2 B5 |%)..460.M...P%..|
00000440: 28 28 59 25 AB 33 29 AD 32 29 AA 4C 25 00 5E 0C |((Y%.3).2).L%.^.|
00000450: FE 01 8B 47 25 B2 30 A7 54 4C 25 B2 50 25 00 72 |...G%.0.TL%.P%.r|
00000460: 0C 08 02 8B 47 25 B2 31 A7 97 34 39 33 33 32 2C |....G%.1..49332,|
00000470: 50 25 00 86 0C 12 02 8B 47 25 B2 32 A7 97 35 33 |P%......G%.2..53|
00000480: 32 38 37 2C 50 25 00 94 0C 1C 02 8D 35 35 32 30 |287,P%......5520|
00000490: 3A 89 37 30 00 A4 0C 26 02 4D 25 B2 33 32 3A 8D |:.70...&.M%.32:.|
000004A0: 35 33 32 30 00 DA 0C 30 02 97 37 38 31 2C 36 3A |5320...0..781,6:|
000004B0: 97 37 38 32 2C 31 30 3A 9E 35 38 36 33 34 3A 99 |.782,10:.58634:.|
000004C0: C7 28 31 35 38 29 22 5D 22 C8 28 59 24 2C 31 33 |.(158)"]".(Y$,13|
000004D0: 29 3A 97 35 33 32 36 39 2C 30 00 09 0D 35 02 54 |):.53269,0...5.T|
000004E0: 25 B2 C2 28 34 39 34 30 38 29 3A 54 31 25 B2 C2 |%..(49408):T1%..|
000004F0: 28 34 39 33 39 36 29 3A 97 34 39 33 39 36 2C 30 |(49396):.49396,0|
00000500: 3A 97 34 39 34 30 38 2C 30 00 13 0D 3A 02 46 24 |:.49408,0...:.F$|
00000510: B2 22 22 00 44 0D 44 02 97 37 38 31 2C 36 3A 97 |."".D.D..781,6:.|
00000520: 37 38 32 2C 31 31 3A 9E 35 38 36 33 34 3A 99 46 |782,11:.58634:.F|
00000530: 24 3B 22 20 22 3B C7 28 31 35 37 29 3B 3A 97 32 |$;" ";.(157);:.2|
00000540: 30 34 2C 30 00 5A 0D 4E 02 A1 41 24 3A 8B 41 24 |04,0.Z.N..A$:.A$|
00000550: B2 C7 28 31 33 29 A7 36 34 30 00 7C 0D 58 02 8B |..(13).640.|.X..|
00000560: 41 24 B2 C7 28 32 30 29 AF C3 28 46 24 29 B1 30 |A$..(20)..(F$).0|
00000570: A7 97 32 30 34 2C 31 3A 99 22 20 22 00 A8 0D 5D |..204,1:." "...]|
00000580: 02 8B 41 24 B2 C7 28 32 30 29 AF C3 28 46 24 29 |..A$..(20)..(F$)|
00000590: B1 30 A7 46 24 B2 C8 28 46 24 2C C3 28 46 24 29 |.0.F$..(F$,.(F$)|
000005A0: AB 31 29 3A 89 35 38 30 00 BF 0D 62 02 8B 41 24 |.1):.580...b..A$|
000005B0: B3 22 20 22 B0 41 24 B1 22 DA 22 A7 35 39 30 00 |." ".A$.".".590.|
000005C0: D6 0D 6C 02 8B C3 28 46 24 29 B3 31 33 A7 46 24 |..l...(F$).13.F$|
000005D0: B2 46 24 AA 41 24 00 DF 0D 76 02 89 35 38 30 00 |.F$.A$...v..580.|
000005E0: F5 0D 80 02 97 32 30 34 2C 31 3A 8B 46 24 B2 22 |.....204,1:.F$."|
000005F0: 22 A7 38 30 30 00 05 0E 94 02 4D 25 B2 33 35 3A |".800.....M%.35:|
00000600: 8D 35 33 32 30 00 3C 0E 9E 02 52 25 B2 30 3A A1 |.5320.<...R%.0:.|
00000610: 41 24 3A 8B 41 24 B2 22 D4 22 B0 41 24 B2 22 54 |A$:.A$.".".A$."T|
00000620: 22 A7 52 25 B2 31 3A 46 24 B2 C7 28 35 29 AA C7 |".R%.1:F$..(5)..|
00000630: 28 31 34 29 AA C7 28 38 29 AA 46 24 00 59 0E A8 |(14)..(8).F$.Y..|
00000640: 02 8B 41 24 B2 22 C4 22 B0 41 24 B2 22 44 22 A7 |..A$.".".A$."D".|
00000650: 52 25 B2 38 3A 89 37 31 30 00 67 0E B2 02 8B 52 |R%.8:.710.g....R|
00000660: 25 B2 30 A7 36 37 30 00 77 0E BC 02 4D 25 B2 33 |%.0.670.w...M%.3|
00000670: 38 3A 8D 35 33 32 30 00 8D 0E C1 02 8B 28 C2 28 |8:.5320......(.(|
00000680: 31 29 AF 31 36 29 B2 31 36 A7 37 30 35 00 A0 0E |1).16).16.705...|
00000690: C2 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 37 30 35 |...A$:.A$."".705|
000006A0: 00 B4 0E C6 02 9E 34 39 32 37 34 3A 94 46 24 2C |......49274:.F$,|
000006B0: 52 25 2C 31 00 CE 0E D0 02 97 31 38 36 2C 52 25 |R%,1......186,R%|
000006C0: 3A 97 31 38 34 2C 31 3A 97 31 38 35 2C 31 00 FD |:.184,1:.185,1..|
000006D0: 0E E4 02 46 24 B2 22 50 2E 43 4F 44 45 22 3A 81 |...F$."P.CODE":.|
000006E0: 49 B2 31 A4 36 3A 97 35 33 32 33 30 AA 49 2C C6 |I.1.6:.53230.I,.|
000006F0: 28 CA 28 46 24 2C 49 2C 31 29 29 3A 82 00 1A 0F |(.(F$,I,1)):....|
00000700: EE 02 97 31 38 33 2C 36 3A 97 31 38 37 2C 32 33 |...183,6:.187,23|
00000710: 39 3A 97 31 38 38 2C 32 30 37 00 2E 0F F8 02 97 |9:.188,207......|
00000720: 32 35 31 2C 30 3A 97 32 35 32 2C 31 39 32 00 43 |251,0:.252,192.C|
00000730: 0F 02 03 97 37 38 31 2C 39 33 3A 97 37 38 32 2C |....781,93:.782,|
00000740: 31 39 35 00 50 0F 0C 03 97 37 38 30 2C 32 35 31 |195.P....780,251|
00000750: 00 62 0F 16 03 9E 36 35 34 39 36 3A 9E 36 35 34 |.b....65496:.654|
00000760: 38 34 00 6D 0F 20 03 9E 34 39 31 35 32 00 8B 0F |84.m. ..49152...|
00000770: 2A 03 97 34 39 34 30 38 2C 54 25 3A 97 34 39 33 |*..49408,T%:.493|
00000780: 39 36 2C 54 31 25 3A 89 35 34 30 00 91 0F 9F 0F |96,T1%:.540.....|
00000790: 80 00 A6 0F 88 13 8F 20 2A 2A 2A 20 49 4E 49 54 |....... *** INIT|
000007A0: 49 41 4C 49 53 45 00 C9 0F 92 13 97 36 37 39 2C |IALISE......679,|
000007B0: 30 3A 97 37 31 30 2C 30 3A 99 C7 28 31 34 37 29 |0:.710,0:..(147)|
000007C0: C7 28 31 34 29 C7 28 38 29 00 DF 0F 9C 13 97 35 |.(14).(8)......5|
000007D0: 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 |3280,0:.53281,0.|
000007E0: F5 0F A6 13 81 49 B2 36 38 35 A4 37 30 39 3A 97 |.....I.685.709:.|
000007F0: 49 2C 31 3A 82 00 0C 10 B0 13 97 34 39 33 33 32 |I,1:.......49332|
00000800: 2C 31 3A 97 34 39 34 31 33 2C 31 39 00 22 10 B5 |,1:.49413,19."..|
00000810: 13 97 34 39 33 39 36 2C 35 3A 97 34 39 34 30 38 |..49396,5:.49408|
00000820: 2C 31 00 3C 10 BA 13 97 34 39 38 37 32 2C 31 32 |,1.<....49872,12|
00000830: 38 3A 97 34 39 38 37 34 2C 31 32 38 00 52 10 C4 |8:.49874,128.R..|
00000840: 13 97 34 39 38 37 33 2C 30 3A 97 35 33 32 38 37 |..49873,0:.53287|
00000850: 2C 31 00 62 10 CE 13 44 56 25 B2 32 3A 54 4C 25 |,1.b...DV%.2:TL%|
00000860: B2 36 00 75 10 D8 13 86 43 25 28 31 35 29 2C 4D |.6.u....C%(15),M|
00000870: 24 28 34 30 29 00 8A 10 E2 13 81 49 B2 30 A4 31 |$(40)......I.0.1|
00000880: 35 3A 87 43 25 28 49 29 3A 82 00 B4 10 EC 13 5A |5:.C%(I):......Z|
00000890: 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |$.".............|
000008A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000008B0: C0 C0 C0 22 00 E5 10 F6 13 59 24 B2 22 20 20 20 |...".....Y$." |
000008C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008E0: 20 20 20 20 22 00 F5 10 FB 13 4B 25 B2 30 3A 81 | ".....K%.0:.|
000008F0: 49 B2 30 A4 38 00 31 11 00 14 87 58 25 2C 59 25 |I.0.8.1....X%,Y%|
00000900: 2C 4C 25 2C 44 25 2C 51 25 2C 42 25 2C 56 25 2C |,L%,D%,Q%,B%,V%,|
00000910: 54 24 3A 4D 24 28 4B 25 29 B2 C7 28 58 25 29 AA |T$:M$(K%)..(X%).|
00000920: C7 28 59 25 29 AA C7 28 4C 25 29 AA C7 28 44 25 |.(Y%)..(L%)..(D%|
00000930: 29 00 6C 11 0A 14 4D 24 28 4B 25 29 B2 4D 24 28 |).l...M$(K%).M$(|
00000940: 4B 25 29 AA C7 28 51 25 29 AA C7 28 42 25 29 AA |K%)..(Q%)..(B%).|
00000950: C7 28 56 25 29 AA 54 24 3A 81 44 B2 31 A4 44 25 |.(V%).T$:.D.1.D%|
00000960: 3A 87 4D 24 28 4B 25 AA 44 29 3A 82 00 7D 11 14 |:.M$(K%.D):..}..|
00000970: 14 4B 25 B2 4B 25 AA 31 AA 44 25 3A 82 00 A6 11 |.K%.K%.1.D%:....|
00000980: 1E 14 97 37 38 31 2C 32 34 3A 97 37 38 32 2C 31 |...781,24:.782,1|
00000990: 3A 97 37 38 33 2C 34 38 3A 97 36 35 38 2C 31 3A |:.783,48:.658,1:|
000009A0: 9E 35 38 36 33 34 00 D8 11 23 14 99 C7 28 31 35 |.58634...#...(15|
000009B0: 33 29 22 27 D0 52 45 46 45 52 45 4E 43 45 53 27 |3)"'.REFERENCES'|
000009C0: 20 50 52 4F 47 52 41 4D 20 42 59 20 D7 2E 20 D0 | PROGRAM BY .. .|
000009D0: 48 49 4C 4C 49 50 53 22 00 E5 11 28 14 9E 34 39 |HILLIPS"...(..49|
000009E0: 31 35 32 3A 8E 00 FA 11 32 14 8F 20 2A 2A 2A 20 |152:....2.. *** |
000009F0: 53 45 54 20 44 45 56 49 43 45 00 0B 12 3C 14 97 |SET DEVICE...<..|
00000A00: 34 39 38 38 34 2C 44 56 25 AF 32 00 1C 12 46 14 |49884,DV%.2...F.|
00000A10: 97 34 39 33 33 37 2C 44 56 25 AF 31 00 22 12 50 |.49337,DV%.1.".P|
00000A20: 14 8E 00 3B 12 5A 14 8F 20 2A 2A 2A 20 50 52 49 |...;.Z.. *** PRI|
00000A30: 4E 54 20 54 4F 50 20 4C 49 4E 45 00 7B 12 64 14 |NT TOP LINE.{.d.|
00000A40: 99 C7 28 31 39 29 C7 28 43 25 28 54 4C 25 29 29 |..(19).(C%(TL%))|
00000A50: C7 28 31 38 29 C7 28 31 36 35 29 22 20 20 20 D0 |.(18).(165)" .|
00000A60: 52 45 46 45 52 45 4E 43 45 53 20 20 DD 20 20 D3 |REFERENCES . .|
00000A70: 54 4F 52 41 47 45 20 20 DD 22 3B 00 98 12 6E 14 |TORAGE .";...n.|
00000A80: 99 22 20 20 D1 55 49 54 20 20 20 22 C7 28 31 36 |." .UIT ".(16|
00000A90: 37 29 C7 28 31 34 36 29 00 9E 12 78 14 8E 00 B3 |7).(146)...x....|
00000AA0: 12 82 14 8F 20 2A 2A 2A 20 43 48 45 43 4B 20 46 |.... *** CHECK F|
00000AB0: 49 52 45 00 C3 12 8C 14 8B 44 56 25 B2 32 A7 35 |IRE......DV%.2.5|
00000AC0: 32 39 30 00 E6 12 96 14 46 25 B2 C2 28 35 36 33 |290.....F%..(563|
00000AD0: 32 30 AA 44 56 25 29 AF 31 36 3A 8B 46 25 B2 31 |20.DV%).16:.F%.1|
00000AE0: 36 A7 35 32 37 30 00 EC 12 A0 14 8E 00 04 13 AA |6.5270..........|
00000AF0: 14 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 |..A$:.A$...(13).|
00000B00: 35 32 39 30 00 0A 13 B4 14 8E 00 1F 13 BE 14 8F |5290............|
00000B10: 20 2A 2A 2A 20 50 52 49 4E 54 20 4D 45 4E 55 00 | *** PRINT MENU.|
00000B20: 49 13 C8 14 58 25 B2 C6 28 C8 28 4D 24 28 4D 25 |I...X%..(.(M$(M%|
00000B30: 29 2C 31 29 29 3A 59 25 B2 C6 28 CA 28 4D 24 28 |),1)):Y%..(.(M$(|
00000B40: 4D 25 29 2C 32 2C 31 29 29 00 75 13 D2 14 4C 25 |M%),2,1)).u...L%|
00000B50: B2 C6 28 CA 28 4D 24 28 4D 25 29 2C 33 2C 31 29 |..(.(M$(M%),3,1)|
00000B60: 29 3A 44 25 B2 C6 28 CA 28 4D 24 28 4D 25 29 2C |):D%..(.(M$(M%),|
00000B70: 34 2C 31 29 29 00 A1 13 DC 14 51 25 B2 C6 28 CA |4,1)).....Q%..(.|
00000B80: 28 4D 24 28 4D 25 29 2C 35 2C 31 29 29 3A 42 25 |(M$(M%),5,1)):B%|
00000B90: B2 C6 28 CA 28 4D 24 28 4D 25 29 2C 36 2C 31 29 |..(.(M$(M%),6,1)|
00000BA0: 29 00 B9 13 E6 14 56 25 B2 C6 28 CA 28 4D 24 28 |).....V%..(.(M$(|
00000BB0: 4D 25 29 2C 37 2C 31 29 29 00 DB 13 F0 14 97 37 |M%),7,1))......7|
00000BC0: 38 31 2C 58 25 3A 97 37 38 32 2C 30 3A 97 37 38 |81,X%:.782,0:.78|
00000BD0: 33 2C 34 38 3A 9E 35 38 36 33 34 00 F8 13 FA 14 |3,48:.58634.....|
00000BE0: 99 A3 59 25 29 C7 28 42 25 29 22 B0 22 C8 28 5A |..Y%).(B%)".".(Z|
00000BF0: 24 2C 4C 25 29 22 AE 22 00 24 14 04 15 8B 51 25 |$,L%)".".$....Q%|
00000C00: B2 31 A7 99 A3 59 25 29 22 DD 22 C7 28 33 30 29 |.1...Y%)".".(30)|
00000C10: C9 28 4D 24 28 4D 25 29 2C 4C 25 29 C7 28 42 25 |.(M$(M%),L%).(B%|
00000C20: 29 22 DD 22 00 42 14 0E 15 8B 51 25 B2 31 A7 99 |)".".B....Q%.1..|
00000C30: A3 59 25 29 22 AB 22 C8 28 5A 24 2C 4C 25 29 22 |.Y%)".".(Z$,L%)"|
00000C40: B3 22 00 4E 14 18 15 81 49 B2 31 A4 44 25 00 86 |.".N....I.1.D%..|
00000C50: 14 22 15 99 A3 59 25 29 22 DD 22 C7 28 56 25 29 |."...Y%)".".(V%)|
00000C60: 4D 24 28 4D 25 AA 49 29 C8 28 59 24 2C 4C 25 AB |M$(M%.I).(Y$,L%.|
00000C70: C3 28 4D 24 28 4D 25 AA 49 29 29 29 C7 28 42 25 |.(M$(M%.I))).(B%|
00000C80: 29 22 DD 22 3A 82 00 9E 14 2C 15 99 A3 59 25 29 |)".":....,...Y%)|
00000C90: 22 AD 22 C8 28 5A 24 2C 4C 25 29 22 BD 22 00 B7 |".".(Z$,L%)"."..|
00000CA0: 14 36 15 97 36 38 30 2C 59 25 AA 31 3A 97 36 38 |.6..680,Y%.1:.68|
00000CB0: 31 2C 59 25 AA 4C 25 00 DB 14 40 15 97 36 38 32 |1,Y%.L%...@..682|
00000CC0: 2C 58 25 AA 31 AA 32 AC 51 25 3A 97 36 38 33 2C |,X%.1.2.Q%:.683,|
00000CD0: C2 28 36 38 32 29 AA 44 25 AB 31 00 E1 14 4A 15 |.(682).D%.1...J.|
00000CE0: 8E 00 F5 14 54 15 8F 20 2A 2A 2A 20 46 4C 41 53 |....T.. *** FLAS|
00000CF0: 48 20 42 41 52 00 2D 15 5E 15 54 25 B2 C2 28 34 |H BAR.-.^.T%..(4|
00000D00: 39 34 30 38 29 3A 54 31 25 B2 C2 28 34 39 33 39 |9408):T1%..(4939|
00000D10: 36 29 3A 97 34 39 33 39 36 2C 30 3A 97 34 39 34 |6):.49396,0:.494|
00000D20: 30 38 2C 30 3A 97 34 39 38 37 31 2C 30 00 47 15 |08,0:.49871,0.G.|
00000D30: 68 15 81 49 B2 30 A4 31 34 3A 97 36 37 39 2C 31 |h..I.0.14:.679,1|
00000D40: AB C2 28 36 37 39 29 00 55 15 72 15 81 44 B2 30 |..(679).U.r..D.0|
00000D50: A4 31 38 3A 82 00 85 15 7C 15 82 3A 53 25 B2 C2 |.18:....|..:S%..|
00000D60: 28 34 39 38 38 36 29 3A 97 36 37 39 2C 30 3A 97 |(49886):.679,0:.|
00000D70: 34 39 34 30 38 2C 54 25 3A 97 34 39 33 39 36 2C |49408,T%:.49396,|
00000D80: 54 31 25 3A 8E 00 A2 15 86 15 8F 20 2A 2A 2A 20 |T1%:....... *** |
00000D90: 43 4C 45 41 52 20 57 49 4E 44 4F 57 20 53 50 41 |CLEAR WINDOW SPA|
00000DA0: 43 45 00 B2 15 90 15 99 C7 28 31 39 29 C7 28 31 |CE.......(19).(1|
00000DB0: 37 29 00 C4 15 9A 15 81 49 B2 30 A4 31 37 3A 99 |7)......I.0.17:.|
00000DC0: 59 24 3A 82 00 CA 15 A4 15 8E 00 E9 15 AE 15 8F |Y$:.............|
00000DD0: 20 2A 2A 2A 20 48 41 4E 44 4C 45 20 41 43 43 45 | *** HANDLE ACCE|
00000DE0: 4C 20 26 20 56 45 4C 4F 43 00 F5 15 B8 15 97 36 |L & VELOC......6|
00000DF0: 38 34 2C 31 35 00 17 16 C2 15 97 36 37 39 2C 31 |84,15......679,1|
00000E00: 3A 97 37 38 31 2C 58 25 3A 97 37 38 32 2C 59 25 |:.781,X%:.782,Y%|
00000E10: 3A 9E 35 38 36 33 34 00 39 16 CC 15 41 24 B2 C4 |:.58634.9...A$..|
00000E20: 28 41 25 29 AA 22 20 22 3A 99 C7 28 31 35 30 29 |(A%)." ":..(150)|
00000E30: CA 28 41 24 2C 32 2C 32 29 00 52 16 D6 15 8D 35 |.(A$,2,2).R....5|
00000E40: 32 36 30 3A 8B C2 28 37 31 30 29 B2 30 A7 35 35 |260:..(710).0.55|
00000E50: 39 30 00 5C 16 E0 15 8D 35 34 37 30 00 6D 16 EA |90.\....5470.m..|
00000E60: 15 50 25 B2 53 25 AB 28 58 25 AA 31 29 00 89 16 |.P%.S%.(X%.1)...|
00000E70: F4 15 91 50 25 89 35 36 33 30 2C 35 36 34 30 2C |...P%.5630,5640,|
00000E80: 35 36 35 30 2C 35 36 36 30 00 A4 16 FE 15 41 25 |5650,5660.....A%|
00000E90: B2 41 25 AA 31 3A 41 25 B2 41 25 AF 4C 25 3A 89 |.A%.1:A%.A%.L%:.|
00000EA0: 35 35 37 30 00 BF 16 08 16 41 25 B2 41 25 AB 31 |5570.....A%.A%.1|
00000EB0: 3A 41 25 B2 41 25 AF 4C 25 3A 89 35 35 37 30 00 |:A%.A%.L%:.5570.|
00000EC0: CF 16 12 16 41 25 B2 4E 25 3A 89 35 35 37 30 00 |....A%.N%:.5570.|
00000ED0: DB 16 1C 16 8D 35 35 32 30 3A 8E 00 F9 16 26 16 |.....5520:....&.|
00000EE0: 8F 20 2A 2A 2A 20 50 52 49 4E 54 20 43 4F 4C 4F |. *** PRINT COLO|
00000EF0: 55 52 20 42 4C 4F 43 4B 53 00 13 17 30 16 97 37 |UR BLOCKS...0..7|
00000F00: 38 31 2C 58 25 3A 97 37 38 32 2C 30 3A 9E 35 38 |81,X%:.782,0:.58|
00000F10: 36 33 34 00 37 17 3A 16 99 A3 32 29 C7 28 31 35 |634.7.:...2).(15|
00000F20: 38 29 22 B0 22 C8 28 5A 24 2C 32 AC 28 31 36 AB |8)".".(Z$,2.(16.|
00000F30: 4C 25 29 29 22 AE 22 00 63 17 44 16 99 A3 32 29 |L%))".".c.D...2)|
00000F40: 22 DD 22 C7 28 31 38 29 3B 3A 81 49 B2 4C 25 A4 |".".(18);:.I.L%.|
00000F50: 31 35 3A 99 C7 28 43 25 28 49 29 29 22 20 20 22 |15:..(C%(I))" "|
00000F60: 3B 3A 82 00 78 17 4E 16 99 C7 28 31 34 36 29 C7 |;:..x.N...(146).|
00000F70: 28 31 35 38 29 22 DD 22 00 A4 17 58 16 99 A3 32 |(158)"."...X...2|
00000F80: 29 22 DD 22 C7 28 31 38 29 3B 3A 81 49 B2 4C 25 |)".".(18);:.I.L%|
00000F90: A4 31 35 3A 99 C7 28 43 25 28 49 29 29 22 20 20 |.15:..(C%(I))" |
00000FA0: 22 3B 3A 82 00 B9 17 62 16 99 C7 28 31 34 36 29 |";:....b...(146)|
00000FB0: C7 28 31 35 38 29 22 DD 22 00 D9 17 6C 16 99 A3 |.(158)"."...l...|
00000FC0: 32 29 22 AD 22 C8 28 5A 24 2C 32 AC 28 31 36 AB |2)".".(Z$,2.(16.|
00000FD0: 4C 25 29 29 22 BD 22 3A 8E 00 19 18 40 1F 83 31 |L%))".":....@..1|
00000FE0: 34 34 2C 35 2C 32 38 2C 31 35 39 2C 31 35 36 2C |44,5,28,159,156,|
00000FF0: 33 30 2C 33 31 2C 31 35 38 2C 31 32 39 2C 31 34 |30,31,158,129,14|
00001000: 39 2C 31 35 30 2C 31 35 31 2C 31 35 32 2C 31 35 |9,150,151,152,15|
00001010: 33 2C 31 35 34 2C 31 35 35 00 44 18 4A 1F 83 32 |3,154,155.D.J..2|
00001020: 2C 31 2C 31 36 2C 36 2C 31 2C 31 35 34 2C 31 35 |,1,16,6,1,154,15|
00001030: 35 2C 22 20 20 D0 52 45 46 45 52 45 4E 43 45 53 |5," .REFERENCES|
00001040: 20 20 20 22 00 8F 18 54 1F 83 22 C1 43 43 45 4C | "...T..".CCEL|
00001050: 45 52 41 54 49 4F 4E 22 2C 22 C9 4E 49 54 49 41 |ERATION",".NITIA|
00001060: 4C 20 56 45 4C 4F 43 49 54 59 22 2C 22 CD 41 58 |L VELOCITY",".AX|
00001070: 49 4D 55 4D 20 56 45 4C 4F 43 49 54 59 22 2C 22 |IMUM VELOCITY","|
00001080: C3 4F 4E 54 52 4F 4C 20 44 45 56 49 43 45 22 00 |.ONTROL DEVICE".|
00001090: A8 18 59 1F 83 22 C1 54 54 52 49 42 55 54 45 53 |..Y..".TTRIBUTES|
000010A0: 22 2C 22 C5 58 49 54 22 00 D2 18 5E 1F 83 36 2C |",".XIT"...^..6,|
000010B0: 35 2C 31 35 2C 34 2C 31 2C 31 35 38 2C 31 35 33 |5,15,4,1,158,153|
000010C0: 2C 22 C1 43 43 45 4C 45 52 41 54 49 4F 4E 20 20 |,".CCELERATION |
000010D0: 20 22 00 12 19 68 1F 83 22 C1 43 43 45 4C 45 52 | "...h..".CCELER|
000010E0: 41 54 49 4F 4E 20 2B 31 22 2C 22 C1 43 43 45 4C |ATION +1",".CCEL|
000010F0: 45 52 41 54 49 4F 4E 20 2D 31 22 2C 22 CE 4F 52 |ERATION -1",".OR|
00001100: 4D 41 4C 20 41 43 43 45 4C 2E 22 2C 22 C5 58 49 |MAL ACCEL.",".XI|
00001110: 54 22 00 40 19 72 1F 83 37 2C 35 2C 31 39 2C 34 |T".@.r..7,5,19,4|
00001120: 2C 31 2C 31 35 38 2C 31 35 33 2C 22 C9 4E 49 54 |,1,158,153,".NIT|
00001130: 49 41 4C 20 D6 45 4C 4F 43 49 54 59 20 20 20 22 |IAL .ELOCITY "|
00001140: 00 8A 19 7C 1F 83 22 C9 4E 49 54 49 41 4C 20 56 |...|..".NITIAL V|
00001150: 45 4C 4F 43 49 54 59 20 2B 31 22 2C 22 C9 4E 49 |ELOCITY +1",".NI|
00001160: 54 49 41 4C 20 56 45 4C 4F 43 49 54 59 20 2D 31 |TIAL VELOCITY -1|
00001170: 22 2C 22 CE 4F 52 4D 41 4C 20 56 45 4C 4F 43 49 |",".ORMAL VELOCI|
00001180: 54 59 22 2C 22 C5 58 49 54 22 00 B8 19 86 1F 83 |TY",".XIT"......|
00001190: 38 2C 35 2C 31 39 2C 34 2C 31 2C 31 35 38 2C 31 |8,5,19,4,1,158,1|
000011A0: 35 33 2C 22 CD 41 58 49 4D 55 4D 20 D6 45 4C 4F |53,".AXIMUM .ELO|
000011B0: 43 49 54 59 20 20 20 22 00 01 1A 90 1F 83 22 CD |CITY "......".|
000011C0: 41 58 49 4D 55 4D 20 56 45 4C 4F 43 49 54 59 20 |AXIMUM VELOCITY |
000011D0: 2B 31 22 2C 22 CD 41 58 49 4D 55 4D 20 56 45 4C |+1",".AXIMUM VEL|
000011E0: 4F 43 49 54 59 20 2D 31 22 2C 22 CE 4F 52 4D 41 |OCITY -1",".ORMA|
000011F0: 4C 20 4D 41 58 49 4D 55 4D 22 2C 22 C5 58 49 54 |L MAXIMUM",".XIT|
00001200: 22 00 2A 1A 9A 1F 83 39 2C 35 2C 31 34 2C 34 2C |".*....9,5,14,4,|
00001210: 31 2C 31 35 38 2C 31 35 34 2C 22 C3 4F 4E 54 52 |1,158,154,".ONTR|
00001220: 4F 4C 20 C4 45 56 49 43 45 22 00 5B 1A A4 1F 83 |OL .EVICE".[....|
00001230: 22 CA 4F 59 53 54 49 43 4B 20 31 22 2C 22 CA 4F |".OYSTICK 1",".O|
00001240: 59 53 54 49 43 4B 20 32 22 2C 22 CB 45 59 42 4F |YSTICK 2",".EYBO|
00001250: 41 52 44 22 2C 22 C5 58 49 54 22 00 8A 1A AE 1F |ARD",".XIT".....|
00001260: 83 31 30 2C 35 2C 31 39 2C 34 2C 31 2C 31 35 39 |.10,5,19,4,1,159|
00001270: 2C 31 35 35 2C 22 20 20 20 20 C1 54 54 52 49 42 |,155," .TTRIB|
00001280: 55 54 45 53 20 20 20 20 20 22 00 CD 1A B8 1F 83 |UTES "......|
00001290: 22 D4 4F 50 20 4C 49 4E 45 20 54 45 58 54 22 2C |".OP LINE TEXT",|
000012A0: 22 D4 4F 50 20 4C 49 4E 45 20 42 41 43 4B 47 52 |".OP LINE BACKGR|
000012B0: 4F 55 4E 44 22 2C 22 D0 4F 49 4E 54 45 52 20 43 |OUND",".OINTER C|
000012C0: 4F 4C 4F 55 52 22 2C 22 C5 58 49 54 22 00 1A 1B |OLOUR",".XIT"...|
000012D0: C2 1F 83 32 2C 39 2C 32 32 2C 32 2C 31 2C 31 35 |...2,9,22,2,1,15|
000012E0: 39 2C 31 35 34 2C 22 D3 41 56 45 20 D0 52 4F 47 |9,154,".AVE .ROG|
000012F0: 52 41 4D 20 41 4E 44 20 C3 4F 44 45 20 22 2C 22 |RAM AND .ODE ","|
00001300: D0 4C 45 41 53 45 20 45 4E 54 45 52 20 46 49 4C |.LEASE ENTER FIL|
00001310: 45 4E 41 4D 45 3A 22 2C 22 22 00 5F 1B CC 1F 83 |ENAME:",""._....|
00001320: 36 2C 31 33 2C 31 39 2C 32 2C 30 2C 31 35 35 2C |6,13,19,2,0,155,|
00001330: 31 35 34 2C 22 22 2C 22 D0 4C 45 41 53 45 20 45 |154,"",".LEASE E|
00001340: 4E 54 45 52 20 44 45 56 49 43 45 22 2C 22 28 D4 |NTER DEVICE","(.|
00001350: 29 41 50 45 20 4F 52 20 28 C4 29 49 53 4B 22 00 |)APE OR (.)ISK".|
00001360: 9E 1B D6 1F 83 38 2C 31 35 2C 32 32 2C 32 2C 30 |.....8,15,22,2,0|
00001370: 2C 31 35 34 2C 31 35 35 2C 22 22 2C 22 D3 54 41 |,154,155,"",".TA|
00001380: 52 54 20 54 41 50 45 2C 22 2C 22 54 48 45 4E 20 |RT TAPE,","THEN |
00001390: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 22 00 00 |PRESS ANY KEY"..|
000013A0: 00 |. |
..-....Z%.0.Z%.1:.631,32:.198,1:."P.CODE
",8,1.K.... *** PREFERENCES PROGRAM.K...
. *** TO DEMONSTRATE USE OF...... *** PO
INTER CODE....(.. *** BY WILLIAM PHILLIP
S 1988....2.:...<..5010.A.F..5220.K.P..5
180.U.Z..5260..._..B(49886).0.90...D.X%.
B(49872).256.(B(49873).1)...N..X%.25.X%.
162.150.6.X..X%.164.X%.259.550.Z....X%.2
60.X%.341..49274:.G(147):..B....90.Q...M
%.0:.5320... ..684,7:.679,1......5260:.B
(710).0.170......5470.....Y%.S%.4.Q.H..Y
%.210,250,290,330,390,540...R.M%.7:.5320
.....A%.B(49413).....X%.7:Y%.19:L%.31:N%
.19:.5560.#....49413,A%:.90.3...M%.12:.5
320.C...A%.B(49408).B...X%.8:Y%.23:L%.7:
N%.1:.5560.T....49408,A%:.90...".M%.17:.
5320...,.A%.B(49396)...6.X%.9:Y%.23:L%.7
:N%.5:.5560.E.@..49396,A%:.90.U.J.M%.22:
.5320...T..684,3:.679,1...^..5260:.B(710
).0.350...H..5470:.5520.(.R.DC%.S%.12:.D
C%.3.540.>.|.DV%.DC%:.DV%.2.80.P...DV%.1
.DV%:.80.`...M%.27:.5320.S....684,14:.67
9,1......5260:.B(710).0.410......5470...
..G%.S%.13:.G%.3.540.....L%.0:.G%.2.L%.1
.S.B.X%.14.G%:.5680...L..5260...V.Y%.B(4
9886)......Y%.(X%.1).Y%.(X%.2)..460.....
Y%.B(49885).7....Y%.3.Y%.2.(17.L%)..460.
M...P%..((Y%.3).2).L%.^....G%.0.TL%.P%.R
....G%.1..49332,P%......G%.2..53287,P%..
....5520:.70...&.M%.32:.5320.Z.0..781,6:
.782,10:.58634:.G(158)"]"H(Y$,13):.53269
,0...5.T%.B(49408):T1%.B(49396):.49396,0
:.49408,0...:.F$."".D.D..781,6:.782,11:.
58634:.F$;" ";G(157);:.204,0.Z.N..A$:.A$
.G(13).640.|.X..A$.G(20).C(F$).0..204,1:
." "...]..A$.G(20).C(F$).0.F$.H(F$,C(F$)
.1):.580...B..A$." ".A$."Z".590.V.L..C(F
$).13.F$.F$.A$...V..580......204,1:.F$."
".800.....M%.35:.5320.<...R%.0:.A$:.A$."
T".A$."T".R%.1:F$.G(5).G(14).G(8).F$.Y..
..A$."D".A$."D".R%.8:.710.G....R%.0.670.
W...M%.38:.5320...A..(B(1).16).16.705. .
B..A$:.A$."".705...F..49274:.F$,R%,1.N.P
..186,R%:.184,1:.185,1.....F$."P.CODE":.
I.1.6:.53230.I,F(J(F$,I,1)):.......183,6
:.187,239:.188,207......251,0:.252,192.C
....781,93:.782,195.P....780,251.B....65
496:.65484.M. ..49152...*..49408,T%:.493
96,T1%:.540............ *** INITIALISE.I
....679,0:.710,0:.G(147)G(14)G(8)......5
3280,0:.53281,0......I.685.709:.I,1:....
...49332,1:.49413,19."....49396,5:.49408
,1.<....49872,128:.49874,128.R.D..49873,
0:.53287,1.B.N.DV%.2:TL%.6.U.X..C%(15),M
$(40)......I.0.15:.C%(I):......Z$.".....
...........................".....Y$."
"...
..K%.0:.I.0.8.1....X%,Y%,L%,D%,Q%,B%,V%,
T$:M$(K%).G(X%).G(Y%).G(L%).G(D%).L...M$
(K%).M$(K%).G(Q%).G(B%).G(V%).T$:.D.1.D%
:.M$(K%.D):..}...K%.K%.1.D%:.......781,2
4:.782,1:.783,48:.658,1:.58634.X.#..G(15
3)"'PREFERENCES' PROGRAM BY W. PHILLIPS"
...(..49152:....2.. *** SET DEVICE...<..
49884,DV%.2...F..49337,DV%.1.".P...;.Z..
*** PRINT TOP LINE.{.D..G(19)G(C%(TL%))
G(18)G(165)" PREFERENCES . STORAGE
.";...N.." QUIT "G(167)G(146)...X....
.... *** CHECK FIRE.C....DV%.2.5290.....
F%.B(56320.DV%).16:.F%.16.5270... ......
..A$:.A$..G(13).5290............ *** PRI
NT MENU.I.H.X%.F(H(M$(M%),1)):Y%.F(J(M$(
M%),2,1)).U.R.L%.F(J(M$(M%),3,1)):D%.F(J
(M$(M%),4,1)).....Q%.F(J(M$(M%),5,1)):B%
.F(J(M$(M%),6,1)).....V%.F(J(M$(M%),7,1)
)......781,X%:.782,0:.783,48:.58634.....
..Y%)G(B%)"."H(Z$,L%)".".$....Q%.1...Y%)
"."G(30)I(M$(M%),L%)G(B%)".".B....Q%.1..
.Y%)"."H(Z$,L%)".".N....I.1.D%..."...Y%)
"."G(V%)M$(M%.I)H(Y$,L%.C(M$(M%.I)))G(B%
)".":....,...Y%)"."H(Z$,L%)"."...6..680,
Y%.1:.681,Y%.L%...@..682,X%.1.2.Q%:.683,
B(682).D%.1...J.....T.. *** FLASH BAR.-.
^.T%.B(49408):T1%.B(49396):.49396,0:.494
08,0:.49871,0.G.H..I.0.14:.679,1.B(679).
U.R..D.0.18:....|..:S%.B(49886):.679,0:.
49408,T%:.49396,T1%:....... *** CLEAR WI
NDOW SPACE......G(19)G(17).D....I.0.17:.
Y$:..J.......... *** HANDLE ACCEL & VELO
C......684,15...B..679,1:.781,X%:.782,Y%
:.58634.9.L.A$.D(A%)." ":.G(150)J(A$,2,2
).R.V..5260:.B(710).0.5590.\....5470.M..
.P%.S%.(X%.1)......P%.5630,5640,5650,566
0.....A%.A%.1:A%.A%.L%:.5570.....A%.A%.1
:A%.A%.L%:.5570.O...A%.N%:.5570......552
0:....&.. *** PRINT COLOUR BLOCKS...0..7
81,X%:.782,0:.58634.7.:...2)G(158)"."H(Z
$,2.(16.L%))".".C.D...2)"."G(18);:.I.L%.
15:.G(C%(I))" ";:..X.N..G(146)G(158)"."
...X...2)"."G(18);:.I.L%.15:.G(C%(I))"
";:....B..G(146)G(158)".".Y.L...2)"."H(Z
$,2.(16.L%))".":....@..144,5,28,159,156,
30,31,158,129,149,150,151,152,153,154,15
5.D.J..2,1,16,6,1,154,155," PREFERENCES
"...T.."ACCELERATION","INITIAL VELOCI
TY","MAXIMUM VELOCITY","CONTROL DEVICE".
..Y.."ATTRIBUTES","EXIT".R.^..6,5,15,4,1
,158,153,"ACCELERATION "...H.."ACCELER
ATION +1","ACCELERATION -1","NORMAL ACCE
L.","EXIT".@.R..7,5,19,4,1,158,153,"INIT
IAL VELOCITY "...|.."INITIAL VELOCITY
+1","INITIAL VELOCITY -1","NORMAL VELOCI
TY","EXIT"......8,5,19,4,1,158,153,"MAXI
MUM VELOCITY "......"MAXIMUM VELOCITY
+1","MAXIMUM VELOCITY -1","NORMAL MAXIMU
M","EXIT".*....9,5,14,4,1,158,154,"CONTR
OL DEVICE".[...."JOYSTICK 1","JOYSTICK 2
","KEYBOARD","EXIT"......10,5,19,4,1,159
,155," ATTRIBUTES ".M...."TOP LIN
E TEXT","TOP LINE BACKGROUND","POINTER C
OLOUR","EXIT"...B..2,9,22,2,1,159,154,"S
AVE PROGRAM AND CODE ","PLEASE ENTER FIL
ENAME:",""._.L..6,13,19,2,0,155,154,"","
PLEASE ENTER DEVICE","(T)APE OR (D)ISK".
..V..8,15,22,2,0,154,155,"","START TAPE,
","THEN PRESS ANY KEY"...
> CLICK IMAGE PREVIEW FOR FULL MODAL