MACBASIC
FILE INFORMATION
FILENAME(S): MACBASIC
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-11-30 21:23:18
APPEARS ON: 1 disk(s)
FILE HASH
4a3458f2357db34dc9ed05851db77ddb43e1924ab2ac9d3a0c0d8970c2e9dde6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 6 1 | MACBASIC | PRG | DuncanTwain | 28 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 48 08 01 00 8F 20 47 4F 54 4F 33 30 30 20 |..H.... GOTO300 |
00000010: 4F 52 20 53 54 41 52 54 20 4F 46 20 59 4F 55 52 |OR START OF YOUR|
00000020: 20 50 52 4F 47 52 41 4D 20 20 20 2A 2A 43 4F 4E | PROGRAM **CON|
00000030: 56 45 52 54 20 64 7A 4F 52 59 20 54 4F 20 42 41 |VERT dzORY TO BA|
00000040: 53 49 43 20 44 41 54 41 00 5F 08 02 00 97 35 33 |SIC DATA._....53|
00000050: 32 38 31 2C 31 3A 97 35 33 32 38 30 2C 31 33 00 |281,1:.53280,13.|
00000060: 6B 08 03 00 86 5A 25 28 36 34 29 00 83 08 04 00 |k....Z%(64).....|
00000070: 99 22 93 22 3A 8D 20 32 30 30 3A 8F 20 42 4F 52 |.".":. 200:. BOR|
00000080: 44 45 52 00 A9 08 05 00 99 A6 31 29 22 11 11 1F |DER.......1)"...|
00000090: 20 20 20 20 20 20 20 20 4F 50 54 49 4F 4E 53 20 | OPTIONS |
000000A0: 41 56 41 49 41 42 4C 45 22 00 D2 08 06 00 99 A6 |AVAIABLE".......|
000000B0: 31 29 22 20 20 20 20 20 20 20 23 23 23 23 23 23 |1)" ######|
000000C0: 23 23 23 23 23 23 23 23 23 23 23 23 22 3A 99 22 |############":."|
000000D0: 11 22 00 03 09 07 00 99 A6 31 29 22 20 20 49 4E |.".......1)" IN|
000000E0: 53 54 52 55 43 54 49 4F 4E 53 20 4F 4E 20 55 53 |STRUCTIONS ON US|
000000F0: 45 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 31 |E..............1|
00000100: 22 3A 99 00 34 09 08 00 99 A6 31 29 22 20 20 53 |":..4.....1)" S|
00000110: 41 56 45 20 53 50 52 49 54 45 53 20 41 53 20 44 |AVE SPRITES AS D|
00000120: 41 54 41 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |ATA.............|
00000130: 32 22 3A 99 00 65 09 09 00 99 A6 31 29 22 20 20 |2":..e.....1)" |
00000140: 53 41 56 45 20 4D 41 43 48 49 4E 45 20 43 4F 44 |SAVE MACHINE COD|
00000150: 45 20 41 53 20 44 41 54 41 2E 2E 2E 2E 2E 2E 2E |E AS DATA.......|
00000160: 2E 33 22 3A 99 00 96 09 0A 00 99 A6 31 29 22 20 |.3":........1)" |
00000170: 20 44 45 4C 45 54 45 20 44 41 54 41 20 53 54 41 | DELETE DATA STA|
00000180: 54 45 4D 45 4E 54 53 2E 2E 2E 2E 2E 2E 2E 2E 2E |TEMENTS.........|
00000190: 2E 2E 34 22 3A 99 00 C7 09 0B 00 99 A6 31 29 22 |..4":........1)"|
000001A0: 20 20 4C 49 53 54 20 53 54 41 54 45 4D 45 4E 54 | LIST STATEMENT|
000001B0: 53 20 54 4F 20 54 41 50 45 2E 2E 2E 2E 2E 2E 2E |S TO TAPE.......|
000001C0: 2E 2E 2E 35 22 3A 99 00 F8 09 0C 00 99 A6 31 29 |...5":........1)|
000001D0: 22 20 20 41 53 53 45 4D 42 4C 45 20 44 41 54 41 |" ASSEMBLE DATA|
000001E0: 20 46 52 4F 4D 20 54 41 50 45 2E 2E 2E 2E 2E 2E | FROM TAPE......|
000001F0: 2E 2E 2E 2E 36 22 3A 99 00 29 0A 0D 00 99 A6 31 |....6":..).....1|
00000200: 29 22 20 20 44 45 4C 45 54 45 20 53 54 41 54 45 |)" DELETE STATE|
00000210: 4D 45 4E 54 53 20 30 2D 32 35 35 2E 2E 2E 2E 2E |MENTS 0-255.....|
00000220: 2E 2E 2E 2E 2E 37 22 3A 99 00 4B 0A 0E 00 99 A6 |.....7":..K.....|
00000230: 31 29 22 12 4B 45 59 20 49 4E 20 44 45 53 49 52 |1)".KEY IN DESIR|
00000240: 45 44 20 4F 50 54 49 4F 4E 92 22 00 5D 0A 0F 00 |ED OPTION.".]...|
00000250: A1 4B 24 3A 8B 4B 24 B2 22 22 A7 31 35 00 7D 0A |.K$:.K$."".15.}.|
00000260: 10 00 8B C5 28 4B 24 29 B3 B2 30 B0 C5 28 4B 24 |....(K$)..0..(K$|
00000270: 29 B1 37 A7 99 22 91 91 22 3A 89 31 34 00 9F 0A |).7.."..":.14...|
00000280: 11 00 91 C5 28 4B 24 29 8D 32 30 2C 34 30 2C 35 |....(K$).20,40,5|
00000290: 30 2C 36 30 2C 31 32 30 2C 31 33 30 2C 37 30 00 |0,60,120,130,70.|
000002A0: AE 0A 12 00 8B C5 28 4B 24 29 B2 38 A7 90 00 B4 |......(K$).8....|
000002B0: 0A 13 00 80 00 EA 0A 14 00 99 22 93 22 3A 8D 32 |..........".":.2|
000002C0: 30 30 3A 99 22 11 11 11 1D 1D 1D 49 4E 53 54 52 |00:."......INSTR|
000002D0: 55 43 54 49 4F 4E 53 20 4F 4E 20 55 53 45 20 4F |UCTIONS ON USE O|
000002E0: 46 20 55 54 49 4C 49 54 59 22 00 18 0B 15 00 99 |F UTILITY"......|
000002F0: A6 31 29 22 20 20 20 20 23 23 23 23 23 23 23 23 |.1)" ########|
00000300: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00000310: 23 23 23 23 23 23 23 22 00 49 0B 16 00 99 A6 31 |#######".I.....1|
00000320: 29 22 2E 53 50 52 49 54 45 53 20 41 52 45 20 53 |)".SPRITES ARE S|
00000330: 41 56 45 44 20 41 53 20 44 41 54 41 20 53 54 41 |AVED AS DATA STA|
00000340: 54 45 4D 45 4E 54 53 2E 22 00 7A 0B 17 00 99 A6 |TEMENTS.".z.....|
00000350: 31 29 22 20 53 50 52 49 54 45 53 20 30 2D 34 37 |1)" SPRITES 0-47|
00000360: 20 52 41 4D 20 41 44 44 52 45 53 53 20 31 32 32 | RAM ADDRESS 122|
00000370: 38 38 2D 31 35 33 36 30 20 22 00 AB 0B 18 00 99 |88-15360 "......|
00000380: A6 31 29 22 2E 4F 52 20 4D 41 43 48 49 4E 45 20 |.1)".OR MACHINE |
00000390: 43 4F 44 45 20 43 41 4E 20 42 45 20 53 41 56 45 |CODE CAN BE SAVE|
000003A0: 44 20 41 53 20 44 41 54 41 2E 22 00 D6 0B 19 00 |D AS DATA.".....|
000003B0: 99 A6 31 29 22 2E 44 41 54 41 20 53 54 41 54 45 |..1)".DATA STATE|
000003C0: 4D 45 4E 54 53 20 43 41 4E 20 42 45 20 44 45 4C |MENTS CAN BE DEL|
000003D0: 45 54 45 44 2E 22 00 01 0C 1A 00 99 A6 31 29 22 |ETED.".......1)"|
000003E0: 2E 54 48 45 20 52 45 53 54 20 4F 46 20 54 48 49 |.THE REST OF THI|
000003F0: 53 20 50 52 4F 47 52 41 4D 20 4D 41 59 20 42 45 |S PROGRAM MAY BE|
00000400: 22 00 31 0C 1B 00 99 A6 31 29 22 20 53 45 4C 45 |".1.....1)" SELE|
00000410: 54 45 44 20 49 46 20 52 45 51 55 49 52 45 44 2E |TED IF REQUIRED.|
00000420: 54 48 49 53 20 4C 45 41 56 45 53 20 4F 4E 4C 59 |THIS LEAVES ONLY|
00000430: 22 00 5E 0C 1C 00 99 A6 31 29 22 20 44 41 54 41 |".^.....1)" DATA|
00000440: 20 53 54 41 54 45 4D 45 4E 54 53 20 46 4F 52 20 | STATEMENTS FOR |
00000450: 55 53 45 52 20 50 52 4F 47 52 41 4D 53 22 00 86 |USER PROGRAMS"..|
00000460: 0C 1D 00 99 A6 31 29 22 11 11 12 20 20 54 4F 20 |.....1)"... TO |
00000470: 43 52 45 41 54 45 20 4E 45 57 20 50 52 4F 47 52 |CREATE NEW PROGR|
00000480: 41 4D 20 20 92 22 00 B4 0C 1E 00 99 A6 31 29 22 |AM .".......1)"|
00000490: 11 20 20 57 41 49 54 20 46 4F 52 20 52 45 41 44 |. WAIT FOR READ|
000004A0: 59 20 54 4F 20 53 54 4F 50 20 46 4C 41 48 49 4E |Y TO STOP FLAHIN|
000004B0: 47 20 20 22 00 E1 0C 1F 00 99 A6 31 29 22 20 49 |G ".......1)" I|
000004C0: 4E 20 54 48 49 53 20 4D 4F 44 45 2C 54 48 45 4E |N THIS MODE,THEN|
000004D0: 20 53 41 56 45 20 44 41 54 41 20 54 41 50 45 2E | SAVE DATA TAPE.|
000004E0: 22 00 0E 0D 20 00 99 A6 31 29 22 20 4C 4F 41 44 |"... ...1)" LOAD|
000004F0: 20 4E 45 57 20 44 41 54 41 20 41 4E 44 20 4B 45 | NEW DATA AND KE|
00000500: 59 20 49 4E 20 50 52 4F 47 52 41 4D 2E 22 00 31 |Y IN PROGRAM.".1|
00000510: 0D 21 00 99 A6 31 29 22 11 11 12 20 41 4E 59 20 |.!...1)"... ANY |
00000520: 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 |KEY TO CONTINUE.|
00000530: 22 00 43 0D 25 00 A1 4B 24 3A 8B 4B 24 B2 22 22 |".C.%..K$:.K$.""|
00000540: A7 33 37 00 4A 0D 26 00 89 34 00 6F 0D 28 00 99 |.37.J.&..4.o.(..|
00000550: 22 93 11 11 11 11 20 20 20 20 20 20 20 53 50 52 |"..... SPR|
00000560: 49 54 45 53 20 30 2D 34 37 22 3A 8D 32 30 30 00 |ITES 0-47":.200.|
00000570: AA 0D 29 00 99 A6 34 29 22 12 46 49 52 53 54 20 |..)...4)".FIRST |
00000580: 53 50 52 49 54 45 20 4E 4F 2E 20 92 22 3B 3A 4E |SPRITE NO. .";:N|
00000590: B2 30 3A 8D 37 35 3A 53 39 B2 4E 3A 8B 53 39 B1 |.0:.75:S9.N:.S9.|
000005A0: 34 37 B0 53 39 B3 30 A7 34 31 00 EC 0D 2A 00 99 |47.S9.0.41...*..|
000005B0: A6 31 29 22 11 11 20 46 4F 52 20 43 4F 4E 53 45 |.1)".. FOR CONSE|
000005C0: 43 55 54 45 20 53 50 52 49 54 45 53 22 3A 99 A6 |CUTE SPRITES":..|
000005D0: 34 29 22 20 20 20 20 12 20 20 20 20 4E 4F 2E 4F |4)" . NO.O|
000005E0: 46 20 53 50 52 49 54 45 53 92 22 3B 00 13 0E 2B |F SPRITES.";...+|
000005F0: 00 4E B2 30 3A 8D 37 35 3A 53 33 B2 4E 3A 8B 28 |.N.0:.75:S3.N:.(|
00000600: 34 38 AB 53 39 AB 53 33 29 B3 30 B0 53 33 B3 31 |48.S9.S3).0.S3.1|
00000610: A7 34 32 00 3A 0E 2C 00 99 A6 31 29 22 11 11 20 |.42.:.,...1)".. |
00000620: 44 41 54 41 20 53 54 41 54 45 4D 45 4E 54 53 20 |DATA STATEMENTS |
00000630: 3E 20 32 39 39 22 3A 4E B2 30 00 6A 0E 2D 00 99 |> 299":N.0.j.-..|
00000640: A6 31 29 22 12 20 53 54 41 52 54 20 4F 46 20 44 |.1)". START OF D|
00000650: 41 54 41 92 22 3B 3A 8D 37 35 3A 44 30 B2 4E 3A |ATA.";:.75:D0.N:|
00000660: 8B 4E B3 33 30 30 A7 34 30 30 00 AB 0E 2E 00 53 |.N.300.400.....S|
00000670: B2 31 32 32 38 38 AA 36 34 AC 53 39 3A 53 36 B2 |.12288.64.S9:S6.|
00000680: B5 28 53 AD 32 35 36 29 3A 53 37 B2 B5 28 53 AB |.(S.256):S7..(S.|
00000690: 53 36 AC 32 35 36 29 3A 53 33 B2 53 33 AC 36 34 |S6.256):S3.S3.64|
000006A0: 3A 4F 50 B2 30 97 38 32 38 2C 30 00 D7 0E 2F 00 |:OP.0.828,0.../.|
000006B0: 45 B2 30 3A 97 38 32 39 2C 30 3A 53 38 B2 B5 28 |E.0:.829,0:S8..(|
000006C0: 53 33 AD 32 35 36 29 3A 53 39 B2 B5 28 53 33 AB |S3.256):S9..(S3.|
000006D0: 53 38 AC 32 35 36 29 00 10 0F 30 00 97 38 33 30 |S8.256)...0..830|
000006E0: 2C 53 38 3A 97 38 33 31 2C 53 39 3A 44 38 B2 B5 |,S8:.831,S9:D8..|
000006F0: 28 44 30 AD 32 35 36 29 3A 44 39 B2 B5 28 44 30 |(D0.256):D9..(D0|
00000700: AB 44 38 AC 32 35 36 29 3A 97 38 33 32 2C 44 38 |.D8.256):.832,D8|
00000710: 00 33 0F 31 00 97 38 33 33 2C 44 39 3A 97 38 33 |.3.1..833,D9:.83|
00000720: 34 2C 53 36 3A 97 38 33 35 2C 53 37 3A 8D 38 30 |4,S6:.835,S7:.80|
00000730: 3A 89 34 00 5A 0F 32 00 99 22 93 11 11 11 11 20 |:.4.Z.2.."..... |
00000740: 20 20 20 20 20 20 20 52 41 4D 20 54 4F 20 44 41 | RAM TO DA|
00000750: 54 41 20 22 3A 8D 20 32 30 30 00 86 0F 33 00 99 |TA ":. 200...3..|
00000760: A6 34 29 22 12 53 54 41 52 54 20 41 44 44 52 45 |.4)".START ADDRE|
00000770: 53 53 20 20 20 20 92 22 3B 3A 4E B2 30 3A 8D 37 |SS .";:N.0:.7|
00000780: 35 3A 52 39 B2 4E 00 C9 0F 34 00 99 A6 31 29 22 |5:R9.N...4...1)"|
00000790: 11 11 20 43 4F 4E 53 45 43 55 54 49 56 45 20 41 |.. CONSECUTIVE A|
000007A0: 44 44 52 45 53 53 45 53 20 20 22 3A 99 A6 34 29 |DDRESSES ":..4)|
000007B0: 22 20 20 20 20 12 4E 4F 2E 4F 46 20 41 44 44 52 |" .NO.OF ADDR|
000007C0: 45 53 53 45 53 20 92 22 3B 00 DA 0F 35 00 4E B2 |ESSES .";...5.N.|
000007D0: 30 3A 8D 37 35 3A 53 33 B2 4E 00 01 10 36 00 99 |0:.75:S3.N...6..|
000007E0: A6 31 29 22 11 11 20 44 41 54 41 20 53 54 41 54 |.1)".. DATA STAT|
000007F0: 45 4D 45 4E 54 53 20 3E 20 32 39 39 22 3A 4E B2 |EMENTS > 299":N.|
00000800: 30 00 30 10 37 00 99 A6 31 29 22 12 20 53 54 41 |0.0.7...1)". STA|
00000810: 52 54 20 4F 46 20 44 41 54 41 92 22 3B 3A 8D 37 |RT OF DATA.";:.7|
00000820: 33 3A 44 30 B2 4E 3A 8B 4E B3 33 30 30 A7 35 34 |3:D0.N:.N.300.54|
00000830: 00 6B 10 38 00 53 B2 52 39 3A 53 36 B2 B5 28 53 |.k.8.S.R9:S6..(S|
00000840: AD 32 35 36 29 3A 53 37 B2 B5 28 53 AB 53 36 AC |.256):S7..(S.S6.|
00000850: 32 35 36 29 3A 4F 50 B2 30 3A 97 38 32 38 2C 30 |256):OP.0:.828,0|
00000860: 3A 45 B2 30 3A 97 38 32 39 2C 30 00 8C 10 39 00 |:E.0:.829,0...9.|
00000870: 53 38 B2 B5 28 53 33 AD 32 35 36 29 3A 53 39 B2 |S8..(S3.256):S9.|
00000880: B5 28 53 33 AB 53 38 AC 32 35 36 29 00 C5 10 3A |.(S3.S8.256)...:|
00000890: 00 97 38 33 30 2C 53 38 3A 97 38 33 31 2C 53 39 |..830,S8:.831,S9|
000008A0: 3A 44 38 B2 B5 28 44 30 AD 32 35 36 29 3A 44 39 |:D8..(D0.256):D9|
000008B0: B2 B5 28 44 30 AB 44 38 AC 32 35 36 29 3A 97 38 |..(D0.D8.256):.8|
000008C0: 33 32 2C 44 38 00 E8 10 3B 00 97 38 33 33 2C 44 |32,D8...;..833,D|
000008D0: 39 3A 97 38 33 34 2C 53 36 3A 97 38 33 35 2C 53 |9:.834,S6:.835,S|
000008E0: 37 3A 8D 38 30 3A 89 34 00 10 11 3C 00 99 22 93 |7:.80:.4...<..".|
000008F0: 11 11 11 11 20 20 20 20 20 20 20 20 44 45 4C 45 |.... DELE|
00000900: 54 45 20 44 41 54 41 20 22 3A 8D 32 30 30 59 2E |TE DATA ":.200Y.|
00000910: 00 47 11 3D 00 99 A6 34 29 22 12 53 54 41 52 54 |.G.=...4)".START|
00000920: 20 44 41 54 41 20 3E 32 39 39 20 20 20 92 22 3B | DATA >299 .";|
00000930: 3A 4E B2 30 3A 8D 37 35 3A 44 30 B2 4E 3A 8B 4E |:N.0:.75:D0.N:.N|
00000940: B1 33 30 30 A7 36 30 00 8A 11 3E 00 99 A6 31 29 |.300.60...>...1)|
00000950: 22 11 11 20 43 4F 4E 53 45 43 55 54 49 56 45 20 |".. CONSECUTIVE |
00000960: 53 54 41 54 45 4D 45 4E 54 53 20 22 3A 99 A6 34 |STATEMENTS ":..4|
00000970: 29 22 20 20 20 12 4E 4F 2E 4F 46 20 53 54 41 54 |)" .NO.OF STAT|
00000980: 45 4D 45 4E 54 53 20 92 22 3B 00 9B 11 3F 00 4E |EMENTS .";...?.N|
00000990: B2 30 3A 8D 37 35 3A 53 33 B2 4E 00 D6 11 40 00 |.0:.75:S3.N...@.|
000009A0: 53 B2 30 3A 53 36 B2 B5 28 53 AD 32 35 36 29 3A |S.0:S6..(S.256):|
000009B0: 53 37 B2 B5 28 53 AB 53 36 AC 32 35 36 29 3A 4F |S7..(S.S6.256):O|
000009C0: 50 B2 31 3A 97 38 32 38 2C 4F 50 3A 45 B2 30 3A |P.1:.828,OP:E.0:|
000009D0: 97 38 32 39 2C 30 00 F7 11 41 00 53 38 B2 B5 28 |.829,0...A.S8..(|
000009E0: 53 33 AD 32 35 36 29 3A 53 39 B2 B5 28 53 33 AB |S3.256):S9..(S3.|
000009F0: 53 38 AC 32 35 36 29 00 30 12 42 00 97 38 33 30 |S8.256).0.B..830|
00000A00: 2C 53 38 3A 97 38 33 31 2C 53 39 3A 44 38 B2 B5 |,S8:.831,S9:D8..|
00000A10: 28 44 30 AD 32 35 36 29 3A 44 39 B2 B5 28 44 30 |(D0.256):D9..(D0|
00000A20: AB 44 38 AC 32 35 36 29 3A 97 38 33 32 2C 44 38 |.D8.256):.832,D8|
00000A30: 00 65 12 43 00 97 38 33 33 2C 44 39 3A 97 38 33 |.e.C..833,D9:.83|
00000A40: 34 2C 53 36 3A 97 38 33 35 2C 53 37 3A 8D 38 30 |4,S6:.835,S7:.80|
00000A50: 3A 89 34 33 B2 53 33 AC 36 34 3A 4F 50 B2 30 97 |:.43.S3.64:OP.0.|
00000A60: 38 32 38 2C 30 00 A5 12 44 00 97 38 33 39 2C 30 |828,0...D..839,0|
00000A70: 3A 99 22 93 22 3A 8D 32 30 30 3A 99 A6 31 29 22 |:.".":.200:..1)"|
00000A80: 11 11 20 52 45 4D 45 4D 42 45 52 20 54 48 49 53 |.. REMEMBER THIS|
00000A90: 20 4F 50 54 49 4F 4E 20 44 45 4C 45 54 45 53 20 | OPTION DELETES |
00000AA0: 54 48 49 53 22 00 E5 12 46 00 97 38 33 39 2C 30 |THIS"...F..839,0|
00000AB0: 3A 99 22 93 22 3A 8D 32 30 30 3A 99 A6 31 29 22 |:.".":.200:..1)"|
00000AC0: 11 11 20 52 45 4D 45 4D 42 45 52 20 54 48 49 53 |.. REMEMBER THIS|
00000AD0: 20 4F 50 54 49 4F 4E 20 44 45 4C 45 54 45 53 20 | OPTION DELETES |
00000AE0: 54 48 49 53 22 00 12 13 47 00 99 A6 31 29 22 20 |THIS"...G...1)" |
00000AF0: 50 52 4F 47 52 41 4D 20 41 4E 44 20 4C 45 41 56 |PROGRAM AND LEAV|
00000B00: 45 53 20 59 4F 55 52 20 53 54 41 54 45 4D 45 54 |ES YOUR STATEMET|
00000B10: 53 22 00 5C 13 48 00 99 A6 31 29 22 20 41 53 53 |S".\.H...1)" ASS|
00000B20: 45 4D 42 4C 45 44 20 41 42 4F 56 45 20 32 39 39 |EMBLED ABOVE 299|
00000B30: 2E 11 11 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000B40: 9D 9D 9D 9D 9D 9D 12 41 4E 59 20 4B 45 59 20 54 |.......ANY KEY T|
00000B50: 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 6E 13 49 |O CONTINUE.".n.I|
00000B60: 00 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 37 33 00 77 |..K$:.K$."".73.w|
00000B70: 13 4A 00 89 32 31 30 00 80 13 4B 00 4E 4E B2 30 |.J..210...K.NN.0|
00000B80: 00 92 13 4C 00 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 |...L..K$:.K$."".|
00000B90: 37 36 00 BA 13 4D 00 8B 4B 24 B2 C7 28 32 30 29 |76...M..K$..(20)|
00000BA0: A7 4E B2 30 3A 81 55 B2 31 A4 4E 4E 3A 99 22 9D |.N.0:.U.1.NN:.".|
00000BB0: 9D 22 3B 3A 82 55 3A 89 35 37 00 D7 13 4E 00 4E |.";:.U:.57...N.N|
00000BC0: 4E B2 4E 4E AA 31 3A 99 4B 24 3B 3A 8B 4B 24 B2 |N.NN.1:.K$;:.K$.|
00000BD0: C7 28 31 33 29 A7 8E 00 EC 13 4F 00 4E B2 4E AC |.(13).....O.N.N.|
00000BE0: 31 30 AA C5 28 4B 24 29 3A 89 37 36 00 05 14 50 |10..(K$):.76...P|
00000BF0: 00 8F 20 2A 2A 2A 4D 41 49 4E 20 52 64 7F 49 4E |.. ***MAIN Rd.IN|
00000C00: 45 20 2A 2A 2A 00 29 14 51 00 8F 2A 53 3D 53 54 |E ***.).Q..*S=ST|
00000C10: 41 52 54 20 52 41 4D 20 2A 2A 44 30 3D 53 54 41 |ART RAM **D0=STA|
00000C20: 52 54 20 44 41 54 41 2A 2A 00 6D 14 52 00 53 34 |RT DATA**.m.R.S4|
00000C30: B2 30 3A 97 38 33 36 2C 53 34 3A 53 35 B2 30 3A |.0:.836,S4:S5.0:|
00000C40: 97 38 33 37 2C 53 35 3A 8F 2A 2A 2A 2A 2A 2A 53 |.837,S5:.******S|
00000C50: 33 3D 4E 30 20 4F 46 20 52 41 4D 53 2A 2A 44 31 |3=N0 OF RAMS**D1|
00000C60: 3D 4E 30 20 4F 46 20 64 03 53 2A 2A 2A 00 A3 14 |=N0 OF d.S***...|
00000C70: 53 00 4F 50 B2 C2 28 38 32 38 29 3A 53 38 B2 C2 |S.OP..(828):S8..|
00000C80: 28 38 33 30 29 3A 53 39 B2 C2 28 38 33 31 29 3A |(830):S9..(831):|
00000C90: 44 38 B2 C2 28 38 33 32 29 3A 44 39 B2 C2 28 38 |D8..(832):D9..(8|
00000CA0: 33 33 29 00 E8 14 54 00 53 36 B2 C2 28 38 33 34 |33)...T.S6..(834|
00000CB0: 29 3A 53 37 B2 C2 28 38 33 35 29 3A 53 34 B2 C2 |):S7..(835):S4..|
00000CC0: 28 38 33 36 29 3A 53 35 B2 C2 28 38 33 37 29 3A |(836):S5..(837):|
00000CD0: 54 B2 53 34 AC 32 35 36 AA 53 35 3A 53 33 B2 53 |T.S4.256.S5:S3.S|
00000CE0: 38 AC 32 35 36 AA 53 39 00 25 15 55 00 50 B2 B5 |8.256.S9.%.U.P..|
00000CF0: 28 54 AD 36 34 29 3A 51 B2 B5 28 54 AB 50 AC 36 |(T.64):Q..(T.P.6|
00000D00: 34 29 3A 42 B2 B5 28 51 AD 31 36 29 3A 52 B2 B5 |4):B..(Q.16):R..|
00000D10: 28 51 AB 42 AC 31 36 29 3A 44 30 B2 44 38 AC 32 |(Q.B.16):D0.D8.2|
00000D20: 35 36 AA 44 39 00 43 15 56 00 58 B2 44 30 3A 59 |56.D9.C.V.X.D0:Y|
00000D30: B2 31 3A 56 B2 38 33 32 3A 57 B2 38 33 33 3A 8D |.1:V.832:W.833:.|
00000D40: 32 30 35 00 86 15 57 00 53 33 B2 53 38 AC 32 35 |205...W.S3.S8.25|
00000D50: 36 AA 53 39 3A 44 30 B2 44 38 AC 32 35 36 AA 44 |6.S9:D0.D8.256.D|
00000D60: 39 3A 53 B2 53 36 AC 32 35 36 AA 53 37 3A 58 B2 |9:S.S6.256.S7:X.|
00000D70: 53 3A 59 B2 30 3A 56 B2 38 33 34 3A 57 B2 38 33 |S:Y.0:V.834:W.83|
00000D80: 35 3A 8D 32 30 35 00 A2 15 58 00 81 49 B2 30 A4 |5:.205...X..I.0.|
00000D90: 36 33 3A 5A 25 28 49 29 B2 C2 28 53 AA 49 29 3A |63:Z%(I)..(S.I):|
00000DA0: 82 49 00 AE 15 59 00 8B 42 B3 33 A7 39 31 00 DF |.I...Y..B.3.91..|
00000DB0: 15 5A 00 58 B2 53 3A 59 B2 36 34 3A 56 B2 38 33 |.Z.X.S:Y.64:V.83|
00000DC0: 34 3A 57 B2 38 33 35 3A 8D 32 30 35 3A 8F 2A 2A |4:W.835:.205:.**|
00000DD0: 2A 2A 2A 2A 41 44 44 20 36 34 20 54 4F 20 53 00 |****ADD 64 TO S.|
00000DE0: 0C 16 5B 00 99 22 93 22 3B 3A 99 22 13 22 44 30 |..[..".";:."."D0|
00000DF0: 3B 3A 8B 4F 50 B3 B1 30 A7 4F 50 B2 4F 50 AA 31 |;:.OP..0.OP.OP.1|
00000E00: 3A 97 38 32 38 2C 4F 50 3A 89 39 37 00 1A 16 5C |:.828,OP:.97...\|
00000E10: 00 99 22 9D 44 41 54 41 22 3B 00 56 16 5D 00 81 |..".DATA";.V.]..|
00000E20: 4A B2 30 A4 31 34 3A 41 24 B2 C4 28 5A 25 28 4A |J.0.14:A$..(Z%(J|
00000E30: AA 42 AC 31 36 29 29 3A 41 24 B2 C9 28 41 24 2C |.B.16)):A$..(A$,|
00000E40: C3 28 41 24 29 AB 31 29 3A 99 41 24 3B 22 2C 22 |.(A$).1):.A$;","|
00000E50: 3B 54 B2 54 AA 31 00 70 16 5E 00 8B 54 B1 B2 53 |;T.T.1.p.^..T..S|
00000E60: 33 A7 3A 97 38 32 39 2C 31 3A 99 3A 89 31 31 30 |3.:.829,1:.:.110|
00000E70: 00 A9 16 5F 00 82 4A 3A 54 B2 54 AA 31 3A 41 24 |..._..J:T.T.1:A$|
00000E80: B2 C4 28 5A 25 28 28 42 AC 31 36 AA 31 35 29 29 |..(Z%((B.16.15))|
00000E90: 3A 99 41 24 3A 8B 54 B1 B2 53 33 A7 97 38 32 39 |:.A$:.T..S3..829|
00000EA0: 2C 31 3A 99 3A 89 31 31 30 00 B2 16 60 00 89 31 |,1:.:.110...`..1|
00000EB0: 31 30 00 C8 16 61 00 8B 4F 50 B1 53 33 A7 45 B2 |10...a..OP.S3.E.|
00000EC0: 31 3A 97 38 32 39 2C 45 00 D3 16 62 00 99 3A 89 |1:.829,E...b..:.|
00000ED0: 31 31 30 00 DF 16 63 00 86 5A 25 28 36 34 29 00 |110...c..Z%(64).|
00000EE0: EB 16 64 00 86 5A 25 28 36 34 29 00 01 17 65 00 |..d..Z%(64)...e.|
00000EF0: 45 B2 C2 28 38 32 39 29 3A 8B 45 B2 30 A7 20 38 |E..(829):.E.0. 8|
00000F00: 33 00 08 17 66 00 89 34 00 25 17 6E 00 58 B2 54 |3...f..4.%.n.X.T|
00000F10: 3A 59 B2 30 3A 56 B2 38 33 36 3A 57 B2 38 33 37 |:Y.0:V.836:W.837|
00000F20: 3A 8D 32 30 35 00 37 17 6F 00 99 22 52 55 4E 20 |:.205.7.o.."RUN |
00000F30: 31 30 30 3A 22 3B 42 00 6A 17 70 00 97 36 33 31 |100:";B.j.p..631|
00000F40: 2C 31 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 |,19:.632,13:.633|
00000F50: 2C 31 33 3A 97 36 33 34 2C 31 33 3A 97 36 33 33 |,13:.634,13:.633|
00000F60: 2C 31 33 3A 97 31 39 38 2C 35 00 70 17 71 00 80 |,13:.198,5.p.q..|
00000F70: 00 99 17 78 00 99 22 93 11 11 11 11 20 20 4C 49 |...x.."..... LI|
00000F80: 53 54 20 50 52 4F 47 52 41 4D 20 54 4F 20 54 41 |ST PROGRAM TO TA|
00000F90: 50 45 20 22 3A 8D 32 30 30 00 C5 17 79 00 99 A6 |PE ":.200...y...|
00000FA0: 34 29 22 12 53 54 41 52 54 20 4C 49 4E 45 20 4E |4)".START LINE N|
00000FB0: 4F 2E 20 20 20 92 22 3B 3A 4E B2 30 3A 8D 37 35 |O. .";:N.0:.75|
00000FC0: 3A 53 39 B2 4E 00 D6 17 7B 00 4E B2 30 3A 8D 37 |:S9.N...{.N.0:.7|
00000FD0: 35 3A 53 33 B2 4E 00 F8 17 7C 00 85 22 93 11 11 |5:S3.N...|.."...|
00000FE0: 11 11 20 20 12 54 41 50 45 20 54 49 54 4C 45 20 |.. .TAPE TITLE |
00000FF0: 20 20 92 22 3B 4E 46 24 00 2C 18 7D 00 99 C7 28 | .";NF$.,.}...(|
00001000: 31 34 37 29 3A 99 22 13 4F 50 45 4E 31 2C 31 2C |147):.".OPEN1,1,|
00001010: 31 2C 4E 46 24 3A 43 4D 44 20 20 31 3A 4C 49 53 |1,NF$:CMD 1:LIS|
00001020: 54 22 3B 53 39 3B 22 2D 22 3B 53 33 00 48 18 7E |T";S9;"-";S3.H.~|
00001030: 00 99 22 11 11 87 23 31 3A 43 4C 4F 53 45 20 31 |.."...#1:CLOSE 1|
00001040: 3A 47 4F 54 4F 31 32 39 00 72 18 7F 00 97 36 33 |:GOTO129.r....63|
00001050: 31 2C 31 39 3A 81 31 39 B2 30 A4 36 3A 97 36 33 |1,19:.19.0.6:.63|
00001060: 32 AA 31 39 2C 31 33 3A 82 31 39 3A 97 31 39 38 |2.19,13:.19:.198|
00001070: 2C 34 00 78 18 80 00 80 00 7F 18 81 00 89 34 00 |,4.x..........4.|
00001080: A5 18 82 00 99 22 93 11 11 11 11 20 20 52 45 41 |....."..... REA|
00001090: 44 20 50 52 4F 47 52 41 4D 20 46 52 4F 4D 20 54 |D PROGRAM FROM T|
000010A0: 41 50 45 20 22 00 C4 18 83 00 85 22 11 11 20 20 |APE "......".. |
000010B0: 12 54 41 50 45 20 54 49 54 4C 45 20 20 20 92 22 |.TAPE TITLE ."|
000010C0: 3B 4E 46 24 00 E1 18 84 00 9F 31 2C 31 2C 30 2C |;NF$......1,1,0,|
000010D0: 4E 46 24 3A 4B B2 30 3A 4B 39 B2 30 3A 4B 38 B2 |NF$:K.0:K9.0:K8.|
000010E0: 30 00 EB 18 85 00 99 22 93 13 22 00 F5 18 86 00 |0......"..".....|
000010F0: 99 22 93 13 22 00 18 19 87 00 A1 23 31 2C 59 24 |.".."......#1,Y$|
00001100: 3A 59 B2 C6 28 59 24 AA C7 28 30 29 29 3A 97 32 |:Y..(Y$..(0)):.2|
00001110: 30 30 30 30 AA 4B 2C 59 00 43 19 88 00 8B 53 54 |0000.K,Y.C....ST|
00001120: B2 36 34 A7 A0 20 31 3A 81 4C B2 31 A4 34 3A 97 |.64.. 1:.L.1.4:.|
00001130: 32 30 30 30 30 AA 4B AA 4C 2C 30 3A 82 4C 3A 89 |20000.K.L,0:.L:.|
00001140: 31 34 30 00 57 19 89 00 99 59 24 3B 3A 4B B2 4B |140.W....Y$;:K.K|
00001150: AA 31 3A 89 31 33 35 00 6B 19 8A 00 99 59 24 3B |.1:.135.k....Y$;|
00001160: 3A 4B B2 4B AA 31 3A 89 31 33 35 00 73 19 8B 00 |:K.K.1:.135.s...|
00001170: 4B B2 30 00 7B 19 8C 00 4B B2 30 00 86 19 8D 00 |K.0.{...K.0.....|
00001180: 99 22 93 13 22 3B 00 A3 19 8E 00 59 B2 C2 28 32 |."..";.....Y..(2|
00001190: 30 30 30 30 AA 4B 29 3A 8B 59 B2 30 B0 59 B2 31 |0000.K):.Y.0.Y.1|
000011A0: 30 A7 32 00 E0 19 8F 00 59 24 B2 C7 28 59 29 3A |0.2.....Y$..(Y):|
000011B0: 4B B2 4B AA 31 3A 4B 39 B2 B5 28 4B AD 32 35 36 |K.K.1:K9..(K.256|
000011C0: 29 3A 4B 38 B2 B5 28 4B AB 4B 39 AC 32 35 36 29 |):K8..(K.K9.256)|
000011D0: 3A 97 38 32 30 2C 4B 39 3A 97 38 32 31 2C 4B 38 |:.820,K9:.821,K8|
000011E0: 00 F2 19 90 00 8B 59 24 B2 C7 28 31 33 29 A7 31 |......Y$..(13).1|
000011F0: 34 37 00 00 1A 91 00 99 59 24 3B 3A 89 31 34 32 |47......Y$;:.142|
00001200: 00 22 1A 92 00 99 3A 99 22 52 55 4E 20 31 35 30 |."....:."RUN 150|
00001210: 3A 52 45 4D 20 50 4C 45 41 53 45 20 57 41 49 54 |:REM PLEASE WAIT|
00001220: 20 22 00 48 1A 93 00 97 36 33 31 2C 31 39 3A 81 | ".H....631,19:.|
00001230: 49 B2 30 A4 34 3A 97 36 33 32 AA 49 2C 31 33 3A |I.0.4:.632.I,13:|
00001240: 82 3A 97 31 39 38 2C 35 00 4E 1A 94 00 80 00 77 |.:.198,5.N.....w|
00001250: 1A 95 00 4B 39 B2 C2 28 38 32 30 29 3A 4B 38 B2 |...K9..(820):K8.|
00001260: C2 28 38 32 31 29 3A 4B B2 4B 39 AC 32 35 36 AA |.(821):K.K9.256.|
00001270: 4B 38 3A 99 22 93 22 00 80 1A 99 00 89 31 34 32 |K8:."."......142|
00001280: 00 C5 1A C8 00 53 30 B2 31 30 32 34 3A 43 30 B2 |.....S0.1024:C0.|
00001290: 34 30 3A 42 30 B2 35 34 32 37 32 3A 81 43 31 B2 |40:B0.54272:.C1.|
000012A0: 30 A4 33 39 3A 53 31 B2 53 30 AA 43 31 3A 53 32 |0.39:S1.S0.C1:S2|
000012B0: B2 53 30 AA 43 31 AA 43 30 AC 32 34 3A 8D 32 30 |.S0.C1.C0.24:.20|
000012C0: 32 3A 82 43 31 00 F8 1A C9 00 81 43 31 B2 31 A4 |2:.C1......C1.1.|
000012D0: 32 33 3A 53 31 B2 53 30 AA 43 30 AC 43 31 3A 53 |23:S1.S0.C0.C1:S|
000012E0: 32 B2 53 30 AA 43 30 AC 43 31 AA 33 39 3A 8D 32 |2.S0.C0.C1.39:.2|
000012F0: 30 32 3A 82 43 31 3A 8E 00 20 1B CA 00 97 53 32 |02:.C1:.. ....S2|
00001300: 2C 32 31 34 3A 97 53 32 AA 42 30 2C 35 3A 97 53 |,214:.S2.B0,5:.S|
00001310: 31 2C 32 31 34 3A 97 53 31 AA 42 30 2C 35 3A 8E |1,214:.S1.B0,5:.|
00001320: 00 53 1B CD 00 58 B2 58 AA 59 3A 58 42 B2 B5 28 |.S...X.X.Y:XB..(|
00001330: 58 AD 32 35 36 29 3A 58 39 B2 B5 28 58 AB 58 38 |X.256):X9..(X.X8|
00001340: AC 32 35 36 29 3A 97 56 2C 58 38 3A 97 57 2C 58 |.256):.V,X8:.W,X|
00001350: 39 3A 8E 00 70 1B D2 00 49 B2 C2 28 38 33 39 29 |9:..p...I..(839)|
00001360: 3A 99 22 93 22 3A 8B 49 B1 32 30 36 A7 32 31 34 |:.".":.I.206.214|
00001370: 00 AC 1B D3 00 99 22 93 22 49 3A 49 B2 49 AA 31 |......"."I:I.I.1|
00001380: 3A 97 38 33 39 2C 49 3A 99 22 52 55 4E 20 32 31 |:.839,I:."RUN 21|
00001390: 30 3A 52 45 4D 20 57 41 49 54 20 46 4F 52 20 43 |0:REM WAIT FOR C|
000013A0: 4C 45 41 52 20 53 43 52 45 45 4E 22 00 DF 1B D4 |LEAR SCREEN"....|
000013B0: 00 97 36 33 31 2C 31 39 3A 97 36 33 32 2C 31 33 |..631,19:.632,13|
000013C0: 3A 97 36 33 33 2C 31 33 3A 97 36 33 34 2C 31 33 |:.633,13:.634,13|
000013D0: 3A 97 36 33 35 2C 31 33 3A 97 31 39 38 2C 35 00 |:.635,13:.198,5.|
000013E0: E5 1B D5 00 80 00 08 1C D6 00 81 20 49 B2 32 31 |........... I.21|
000013F0: 30 A4 32 31 36 3A 99 49 3A 82 3A 99 22 87 43 48 |0.216:.I:.:.".CH|
00001400: 52 24 28 31 34 37 29 22 00 2F 1C D7 00 97 36 33 |R$(147)"./....63|
00001410: 31 2C 31 39 3A 81 49 B2 31 A4 39 3A 97 36 33 31 |1,19:.I.1.9:.631|
00001420: AA 49 2C 31 33 3A 82 3A 97 31 39 38 2C 31 32 00 |.I,13:.:.198,12.|
00001430: 35 1C D8 00 80 00 00 00 |5....... |
..H.... GOTO300 OR START OF YOUR PROGRAM
**CONVERT DZORY TO BASIC DATA._....53
281,1:.53280,13.K....Z%(64)......".":. 2
00:. BORDER.......1)"... OPTIONS
AVAIABLE".R.....1)" ##############
####":.".".......1)" INSTRUCTIONS ON US
E..............1":..4.....1)" SAVE SPRI
TES AS DATA.............2":..E.....1)"
SAVE MACHINE CODE AS DATA........3":....
....1)" DELETE DATA STATEMENTS.........
..4":..G.....1)" LIST STATEMENTS TO TAP
E..........5":........1)" ASSEMBLE DATA
FROM TAPE..........6":..).....1)" DELE
TE STATEMENTS 0-255..........7":..K.....
1)".KEY IN DESIRED OPTION.".]....K$:.K$.
"".15.}....E(K$)..0.E(K$).7.."..":.14...
...E(K$).20,40,50,60,120,130,70......E(K
$).8..............".":.200:."......INSTR
UCTIONS ON USE OF UTILITY".......1)"
###############################".I.....1
)".SPRITES ARE SAVED AS DATA STATEMENTS.
".Z.....1)" SPRITES 0-47 RAM ADDRESS 122
88-15360 ".......1)".OR MACHINE CODE CAN
BE SAVED AS DATA.".V.....1)".DATA STATE
MENTS CAN BE DELETED.".......1)".THE RES
T OF THIS PROGRAM MAY BE".1.....1)" SELE
TED IF REQUIRED.THIS LEAVES ONLY".^.....
1)" DATA STATEMENTS FOR USER PROGRAMS"..
.....1)"... TO CREATE NEW PROGRAM ."..
.....1)". WAIT FOR READY TO STOP FLAHIN
G ".......1)" IN THIS MODE,THEN SAVE DA
TA TAPE."... ...1)" LOAD NEW DATA AND KE
Y IN PROGRAM.".1.!...1)"... ANY KEY TO C
ONTINUE.".C.%..K$:.K$."".37.J.&..4.O.(..
"..... SPRITES 0-47":.200...)...4)
".FIRST SPRITE NO. .";:N.0:.75:S9.N:.S9.
47.S9.0.41...*...1)".. FOR CONSECUTE SPR
ITES":..4)" . NO.OF SPRITES.";...+
.N.0:.75:S3.N:.(48.S9.S3).0.S3.1.42.:.,.
..1)".. DATA STATEMENTS > 299":N.0.J.-..
.1)". START OF DATA.";:.75:D0.N:.N.300.4
00.....S.12288.64.S9:S6..(S.256):S7..(S.
S6.256):S3.S3.64:OP.0.828,0.W./.E.0:.829
,0:S8..(S3.256):S9..(S3.S8.256)...0..830
,S8:.831,S9:D8..(D0.256):D9..(D0.D8.256)
:.832,D8.3.1..833,D9:.834,S6:.835,S7:.80
:.4.Z.2.."..... RAM TO DATA ":. 2
00...3...4)".START ADDRESS .";:N.0:.7
5:R9.N.I.4...1)".. CONSECUTIVE ADDRESSES
":..4)" .NO.OF ADDRESSES .";.Z.5.N.
0:.75:S3.N...6...1)".. DATA STATEMENTS >
299":N.0.0.7...1)". START OF DATA.";:.7
3:D0.N:.N.300.54.K.8.S.R9:S6..(S.256):S7
..(S.S6.256):OP.0:.828,0:E.0:.829,0...9.
S8..(S3.256):S9..(S3.S8.256).E.:..830,S8
:.831,S9:D8..(D0.256):D9..(D0.D8.256):.8
32,D8...;..833,D9:.834,S6:.835,S7:.80:.4
...<.."..... DELETE DATA ":.200Y.
.G.=...4)".START DATA >299 .";:N.0:.75
:D0.N:.N.300.60...>...1)".. CONSECUTIVE
STATEMENTS ":..4)" .NO.OF STATEMENTS .
";...?.N.0:.75:S3.N.V.@.S.0:S6..(S.256):
S7..(S.S6.256):OP.1:.828,OP:E.0:.829,0..
.A.S8..(S3.256):S9..(S3.S8.256).0.B..830
,S8:.831,S9:D8..(D0.256):D9..(D0.D8.256)
:.832,D8.E.C..833,D9:.834,S6:.835,S7:.80
:.43.S3.64:OP.0.828,0...D..839,0:.".":.2
00:..1)".. REMEMBER THIS OPTION DELETES
THIS"...F..839,0:.".":.200:..1)".. REMEM
BER THIS OPTION DELETES THIS"...G...1)"
PROGRAM AND LEAVES YOUR STATEMETS".\.H..
.1)" ASSEMBLED ABOVE 299................
.......ANY KEY TO CONTINUE.".N.I..K$:.K$
."".73.W.J..210...K.NN.0...L..K$:.K$."".
76...M..K$.G(20).N.0:.U.1.NN:."..";:.U:.
57.W.N.NN.NN.1:.K$;:.K$.G(13).....O.N.N.
10.E(K$):.76...P.. ***MAIN RDINE ***.).
Q..*S=START RAM **D0=START DATA**.M.R.S4
.0:.836,S4:S5.0:.837,S5:.******S3=N0 OF
RAMS**D1=N0 OF D.S***...S.OP.B(828):S8.B
(830):S9.B(831):D8.B(832):D9.B(833)...T.
S6.B(834):S7.B(835):S4.B(836):S5.B(837):
T.S4.256.S5:S3.S8.256.S9.%.U.P..(T.64):Q
..(T.P.64):B..(Q.16):R..(Q.B.16):D0.D8.2
56.D9.C.V.X.D0:Y.1:V.832:W.833:.205...W.
S3.S8.256.S9:D0.D8.256.D9:S.S6.256.S7:X.
S:Y.0:V.834:W.835:.205...X..I.0.63:Z%(I)
.B(S.I):.I...Y..B.3.91...Z.X.S:Y.64:V.83
4:W.835:.205:.******ADD 64 TO S...[.."."
;:."."D0;:.OP..0.OP.OP.1:.828,OP:.97...\
..".DATA";.V.]..J.0.14:A$.D(Z%(J.B.16)):
A$.I(A$,C(A$).1):.A$;",";T.T.1.P.^..T..S
3.:.829,1:.:.110..._..J:T.T.1:A$.D(Z%((B
.16.15)):.A$:.T..S3..829,1:.:.110...`..1
10.H.A..OP.S3.E.1:.829,E.S.B..:.110...C.
.Z%(64)...D..Z%(64)...E.E.B(829):.E.0. 8
3...F..4.%.N.X.T:Y.0:V.836:W.837:.205.7.
O.."RUN 100:";B.J.P..631,19:.632,13:.633
,13:.634,13:.633,13:.198,5.P.Q.....X..".
.... LIST PROGRAM TO TAPE ":.200.E.Y...
4)".START LINE NO. .";:N.0:.75:S9.N.V.
{.N.0:.75:S3.N...|.."..... .TAPE TITLE
.";NF$.,.}..G(147):.".OPEN1,1,1,NF$:CM
D 1:LIST";S9;"-";S3.H.~.."...#1:CLOSE 1
:GOTO129.R...631,19:.19.0.6:.632.19,13:
.19:.198,4.X.........4......"..... REA
D PROGRAM FROM TAPE ".D....".. .TAPE TI
TLE .";NF$......1,1,0,NF$:K.0:K9.0:K8.
0......".."......".."......#1,Y$:Y.F(Y$.
G(0)):.20000.K,Y.C....ST.64. 1:.L.1.4:.
20000.K.L,0:.L:.140.W....Y$;:K.K.1:.135.
K....Y$;:K.K.1:.135.S...K.0.{...K.0.....
."..";.....Y.B(20000.K):.Y.0.Y.10.2.....
Y$.G(Y):K.K.1:K9..(K.256):K8..(K.K9.256)
:.820,K9:.821,K8......Y$.G(13).147......
Y$;:.142."....:."RUN 150:REM PLEASE WAIT
".H....631,19:.I.0.4:.632.I,13:.:.198,5
.N.....W...K9.B(820):K8.B(821):K.K9.256.
K8:."."......142.E.H.S0.1024:C0.40:B0.54
272:.C1.0.39:S1.S0.C1:S2.S0.C1.C0.24:.20
2:.C1...I..C1.1.23:S1.S0.C0.C1:S2.S0.C0.
C1.39:.202:.C1:.. .J..S2,214:.S2.B0,5:.S
1,214:.S1.B0,5:..S.M.X.X.Y:XB..(X.256):X
9..(X.X8.256):.V,X8:.W,X9:..P.R.I.B(839)
:.".":.I.206.214...S.."."I:I.I.1:.839,I:
."RUN 210:REM WAIT FOR CLEAR SCREEN"...T
..631,19:.632,13:.633,13:.634,13:.635,13
:.198,5...U.....V.. I.210.216:.I:.:.".CH
R$(147)"./.W..631,19:.I.1.9:.631.I,13:.:
.198,12.5.X.....
> CLICK IMAGE PREVIEW FOR FULL MODAL