SPRIT+MT IN DATA

00000000: 01 08 18 08 02 00 97 35  33 32 38 31 2C 31 3A 97  |.......53281,1:.|
00000010: 35 33 32 38 30 2C 31 33  00 24 08 03 00 86 5A 25  |53280,13.$....Z%|
00000020: 28 36 34 29 00 3C 08 04  00 99 22 93 22 3A 8D 20  |(64).<....".":. |
00000030: 32 30 30 3A 8F 20 42 45  52 44 45 52 00 66 08 05  |200:. BERDER.f..|
00000040: 00 99 A6 31 29 22 20 20  20 20 20 11 11 1F 20 20  |...1)"     ...  |
00000050: 20 20 20 20 4F 50 54 49  4F 4E 53 20 41 56 41 49  |    OPTIONS AVAI|
00000060: 4C 41 42 4C 45 22 00 92  08 06 00 99 A6 31 29 22  |LABLE".......1)"|
00000070: 20 20 20 20 20 20 20 20  20 20 20 23 23 23 23 23  |           #####|
00000080: 23 23 23 23 23 23 23 23  23 23 23 23 22 3A 99 22  |############":."|
00000090: 11 22 00 C4 08 07 00 99  A6 31 29 22 20 20 49 4E  |.".......1)"  IN|
000000A0: 53 54 52 55 4B 54 49 4F  4E 53 20 4F 4E 20 55 53  |STRUKTIONS ON US|
000000B0: 45 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |E...............|
000000C0: 31 22 3A 99 00 F6 08 08  00 99 A6 31 29 22 20 20  |1":........1)"  |
000000D0: 53 41 56 45 20 53 50 52  49 54 45 53 20 41 53 20  |SAVE SPRITES AS |
000000E0: 44 41 54 41 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |DATA............|
000000F0: 2E 2E 32 22 3A 99 00 28  09 09 00 99 A6 31 29 22  |..2":..(.....1)"|
00000100: 20 20 53 41 56 45 20 4D  41 43 48 49 4E 45 20 43  |  SAVE MACHINE C|
00000110: 4F 44 45 20 41 53 20 44  41 54 41 2E 2E 2E 2E 2E  |ODE AS DATA.....|
00000120: 2E 2E 2E 2E 33 22 3A 99  00 5A 09 0A 00 99 A6 31  |....3":..Z.....1|
00000130: 29 22 20 20 44 45 4C 45  54 45 20 44 41 54 41 20  |)"  DELETE DATA |
00000140: 53 54 41 54 45 4D 45 4E  54 53 2E 2E 2E 2E 2E 2E  |STATEMENTS......|
00000150: 2E 2E 2E 2E 2E 2E 34 22  3A 99 00 8C 09 0B 00 99  |......4":.......|
00000160: A6 31 29 22 20 20 4C 49  53 54 20 53 54 41 54 45  |.1)"  LIST STATE|
00000170: 4D 45 4E 54 53 20 54 4F  20 44 49 53 4B 2E 2E 2E  |MENTS TO DISK...|
00000180: 2E 2E 2E 2E 2E 2E 2E 2E  35 22 3A 99 00 BE 09 0C  |........5":.....|
00000190: 00 99 A6 31 29 22 20 20  41 53 53 45 4D 42 4C 45  |...1)"  ASSEMBLE|
000001A0: 20 44 41 54 41 20 46 52  4F 4D 20 44 49 53 4B 2E  | DATA FROM DISK.|
000001B0: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 36 22 3A 99 00 F0  |..........6":...|
000001C0: 09 0D 00 99 A6 31 29 22  20 20 44 45 4C 45 54 45  |.....1)"  DELETE|
000001D0: 20 53 54 41 54 45 4D 45  4E 54 53 20 30 2D 32 35  | STATEMENTS 0-25|
000001E0: 35 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 37 22 3A 99  |5...........7":.|
000001F0: 00 1A 0A 0E 00 99 A6 31  29 22 11 20 20 20 20 20  |.......1)".     |
00000200: 20 20 12 4B 45 59 20 49  4E 20 44 45 53 49 52 45  |  .KEY IN DESIRE|
00000210: 44 20 4F 50 54 49 4F 4E  92 22 00 2E 0A 0F 00 A1  |D OPTION."......|
00000220: 4B 24 3A 8B 4B 24 B2 22  22 20 A7 20 31 35 00 63  |K$:.K$."" . 15.c|
00000230: 0A 10 00 8B 20 C5 28 4B  24 29 B3 30 20 B0 20 C5  |.... .(K$).0 . .|
00000240: 28 4B 24 29 B1 37 20 A7  20 99 22 20 20 20 20 20  |(K$).7 . ."     |
00000250: 20 20 20 20 20 20 20 20  20 20 20 91 91 20 22 3A  |           .. ":|
00000260: 89 31 34 00 85 0A 11 00  91 C5 28 4B 24 29 8D 32  |.14.......(K$).2|
00000270: 30 2C 34 30 2C 35 30 2C  36 30 2C 31 32 30 2C 31  |0,40,50,60,120,1|
00000280: 33 30 2C 37 30 00 97 0A  12 00 8B 20 C5 28 4B 24  |30,70...... .(K$|
00000290: 29 B2 38 20 A7 20 90 00  9D 0A 13 00 80 00 D1 0A  |).8 . ..........|
000002A0: 14 00 99 22 93 22 3A 8D  32 30 30 3A 99 22 11 11  |...".":.200:."..|
000002B0: 11 1D 1D 49 4E 53 54 55  4B 54 49 4F 4E 53 20 4F  |...INSTUKTIONS O|
000002C0: 4E 20 55 53 45 20 4F 46  20 55 54 49 4C 49 54 59  |N USE OF UTILITY|
000002D0: 22 00 FB 0A 15 00 99 A6  31 29 22 20 23 23 23 23  |".......1)" ####|
000002E0: 23 23 23 23 23 23 23 23  23 23 23 23 23 23 23 23  |################|
000002F0: 23 23 23 23 23 23 23 23  23 11 22 00 2C 0B 16 00  |#########.".,...|
00000300: 99 A6 31 29 22 20 53 50  52 49 54 45 53 20 41 52  |..1)" SPRITES AR|
00000310: 45 20 53 41 56 45 44 20  41 53 20 44 41 54 41 20  |E SAVED AS DATA |
00000320: 53 54 41 54 45 4D 45 4E  54 53 2E 22 00 5C 0B 17  |STATEMENTS.".\..|
00000330: 00 99 A6 31 29 22 20 53  50 52 49 54 45 53 20 30  |...1)" SPRITES 0|
00000340: 2D 34 37 20 52 41 4D 20  41 44 44 52 45 53 53 20  |-47 RAM ADDRESS |
00000350: 31 32 32 38 38 2D 31 35  33 36 30 22 00 8D 0B 18  |12288-15360"....|
00000360: 00 99 A6 31 29 22 20 4F  52 20 4D 41 43 48 49 4E  |...1)" OR MACHIN|
00000370: 45 20 43 4F 44 45 20 43  41 4E 20 42 45 20 53 41  |E CODE CAN BE SA|
00000380: 56 45 44 20 41 53 20 44  41 54 41 2E 22 00 B8 0B  |VED AS DATA."...|
00000390: 19 00 99 A6 31 29 22 20  44 41 54 41 20 53 54 41  |....1)" DATA STA|
000003A0: 54 45 4D 45 4E 54 53 20  43 41 4E 20 42 45 20 44  |TEMENTS CAN BE D|
000003B0: 45 4C 45 54 45 44 2E 22  00 E3 0B 1A 00 99 A6 31  |ELETED.".......1|
000003C0: 29 22 20 54 48 45 20 52  45 53 54 20 4F 46 20 54  |)" THE REST OF T|
000003D0: 48 49 53 20 50 52 4F 47  52 41 4D 20 4D 41 59 20  |HIS PROGRAM MAY |
000003E0: 42 45 22 00 14 0C 1B 00  99 A6 31 29 22 20 44 45  |BE".......1)" DE|
000003F0: 4C 45 54 45 44 20 49 46  20 52 45 51 55 49 52 45  |LETED IF REQUIRE|
00000400: 44 2E 20 54 48 49 53 20  4C 45 41 56 45 53 20 4F  |D. THIS LEAVES O|
00000410: 4E 4C 59 22 00 42 0C 1C  00 99 A6 31 29 22 20 44  |NLY".B.....1)" D|
00000420: 41 54 41 20 53 54 41 54  45 4D 45 4E 54 53 20 46  |ATA STATEMENTS F|
00000430: 4F 52 20 55 53 45 52 20  50 52 4F 47 52 41 4D 53  |OR USER PROGRAMS|
00000440: 2E 22 00 6F 0C 1D 00 99  A6 31 29 22 20 20 20 20  |.".o.....1)"    |
00000450: 20 20 20 20 20 11 11 12  54 4F 20 43 52 45 41 54  |     ...TO CREAT|
00000460: 45 20 4E 45 57 20 50 52  4F 47 52 41 4D 92 22 00  |E NEW PROGRAM.".|
00000470: 9D 0C 1E 00 99 A6 31 29  22 11 20 20 20 57 41 49  |......1)".   WAI|
00000480: 54 20 46 4F 52 20 52 45  41 44 59 20 54 4F 20 53  |T FOR READY TO S|
00000490: 54 4F 50 20 46 4C 41 53  48 49 4E 47 22 00 CE 0C  |TOP FLASHING"...|
000004A0: 1F 00 99 A6 31 29 22 20  49 4E 20 54 48 49 53 20  |....1)" IN THIS |
000004B0: 4D 4F 44 45 2C 20 54 48  45 4E 20 53 41 56 45 20  |MODE, THEN SAVE |
000004C0: 44 41 54 41 20 4F 4E 20  44 49 53 4B 2E 22 00 FB  |DATA ON DISK."..|
000004D0: 0C 20 00 99 A6 31 29 22  20 4C 4F 41 44 20 4E 45  |. ...1)" LOAD NE|
000004E0: 57 20 44 41 54 41 20 41  4E 44 20 4B 45 59 20 49  |W DATA AND KEY I|
000004F0: 4E 20 50 52 4F 47 52 41  4D 2E 22 00 20 0D 21 00  |N PROGRAM.". .!.|
00000500: 99 A6 31 29 22 11 11 20  20 20 12 41 4E 59 20 4B  |..1)"..   .ANY K|
00000510: 45 59 20 54 4F 20 43 4F  4E 54 49 4E 55 45 92 22  |EY TO CONTINUE."|
00000520: 00 35 0D 25 00 A1 4B 24  3A 8B 20 4B 24 B2 22 22  |.5.%..K$:. K$.""|
00000530: 20 A7 20 33 37 00 3C 0D  26 00 89 34 00 62 0D 28  | . 37.<.&..4.b.(|
00000540: 00 99 22 93 11 11 11 11  20 20 20 20 20 20 20 20  |..".....        |
00000550: 53 50 52 49 54 45 53 20  30 2D 34 37 22 3A 8D 32  |SPRITES 0-47":.2|
00000560: 30 30 00 A1 0D 29 00 99  A6 31 29 22 12 46 49 52  |00...)...1)".FIR|
00000570: 53 54 20 53 50 52 49 54  45 20 4E 4F 2E 92 22 3B  |ST SPRITE NO..";|
00000580: 3A 4E B2 30 3A 8D 37 35  3A 53 39 B2 4E 3A 8B 20  |:N.0:.75:S9.N:. |
00000590: 53 39 B1 34 37 20 B0 20  53 39 B3 30 20 A7 20 34  |S9.47 . S9.0 . 4|
000005A0: 31 00 E0 0D 2A 00 99 A6  31 29 22 11 11 20 20 46  |1...*...1)"..  F|
000005B0: 4F 52 20 43 4F 4E 53 45  43 55 54 49 56 45 20 53  |OR CONSECUTIVE S|
000005C0: 50 52 49 54 45 53 22 3A  99 A6 34 29 22 20 12 4E  |PRITES":..4)" .N|
000005D0: 4F 2E 20 4F 46 20 53 50  52 49 54 45 53 92 22 3B  |O. OF SPRITES.";|
000005E0: 00 0B 0E 2B 00 4E B2 30  3A 8D 37 35 3A 53 33 B2  |...+.N.0:.75:S3.|
000005F0: 4E 3A 8B 28 34 38 AB 53  39 AB 53 33 29 B3 30 20  |N:.(48.S9.S3).0 |
00000600: B0 20 53 33 B3 31 20 A7  20 34 32 00 32 0E 2C 00  |. S3.1 . 42.2.,.|
00000610: 99 A6 31 29 22 11 11 20  44 41 54 41 20 53 54 41  |..1)".. DATA STA|
00000620: 54 45 4D 45 4E 54 53 20  3E 20 32 39 39 22 3A 4E  |TEMENTS > 299":N|
00000630: B2 30 00 66 0E 2D 00 99  A6 31 29 22 20 20 12 53  |.0.f.-...1)"  .S|
00000640: 54 41 52 54 20 4F 46 20  44 41 54 41 92 22 3B 3A  |TART OF DATA.";:|
00000650: 8D 20 37 35 3A 44 4F B2  4E 3A 8B 20 4E B3 33 30  |. 75:DO.N:. N.30|
00000660: 30 20 A7 20 34 34 00 A8  0E 2E 00 53 B2 31 32 32  |0 . 44.....S.122|
00000670: 38 38 AA 36 34 AC 53 39  3A 53 36 B2 B5 28 53 AD  |88.64.S9:S6..(S.|
00000680: 32 35 36 29 3A 53 37 B2  B5 28 53 AB 53 36 AC 32  |256):S7..(S.S6.2|
00000690: 35 36 29 3A 53 33 B2 53  33 AC 36 34 3A 4F 50 B2  |56):S3.S3.64:OP.|
000006A0: 30 3A 97 38 32 38 2C 30  00 D4 0E 2F 00 45 B2 30  |0:.828,0.../.E.0|
000006B0: 3A 97 38 32 39 2C 30 3A  53 38 B2 B5 28 53 33 AD  |:.829,0:S8..(S3.|
000006C0: 32 35 36 29 3A 53 39 B2  B5 28 53 33 AB 53 38 AC  |256):S9..(S3.S8.|
000006D0: 32 35 36 29 00 0D 0F 30  00 97 38 33 30 2C 53 38  |256)...0..830,S8|
000006E0: 3A 97 38 33 31 2C 53 39  3A 44 38 B2 B5 28 44 4F  |:.831,S9:D8..(DO|
000006F0: AD 32 35 36 29 3A 44 39  B2 B5 28 44 4F AB 44 38  |.256):D9..(DO.D8|
00000700: AC 32 35 36 29 3A 97 38  33 32 2C 44 38 00 30 0F  |.256):.832,D8.0.|
00000710: 31 00 97 38 33 33 2C 44  39 3A 97 38 33 34 2C 53  |1..833,D9:.834,S|
00000720: 36 3A 97 38 33 35 2C 53  37 3A 8D 38 30 3A 89 34  |6:.835,S7:.80:.4|
00000730: 00 54 0F 32 00 99 22 93  11 11 11 11 20 20 20 20  |.T.2..".....    |
00000740: 20 20 52 41 4D 20 54 4F  20 44 41 54 41 20 22 3A  |  RAM TO DATA ":|
00000750: 8D 32 30 30 00 81 0F 33  00 99 A6 34 29 22 20 20  |.200...3...4)"  |
00000760: 20 20 20 12 53 54 41 52  54 20 41 44 44 52 45 53  |   .START ADDRES|
00000770: 53 92 22 3B 3A 4E B2 30  3A 8D 37 35 3A 52 39 B2  |S.";:N.0:.75:R9.|
00000780: 4E 00 C2 0F 34 00 99 A6  31 29 22 11 11 20 43 4F  |N...4...1)".. CO|
00000790: 4E 53 45 43 55 54 49 56  45 20 41 44 44 52 45 53  |NSECUTIVE ADDRES|
000007A0: 53 45 53 20 20 22 3A 99  A6 34 29 22 20 20 12 4E  |SES  ":..4)"  .N|
000007B0: 4F 2E 20 4F 46 20 41 44  44 52 45 53 53 45 53 92  |O. OF ADDRESSES.|
000007C0: 22 3B 00 D3 0F 35 00 4E  B2 30 3A 8D 37 35 3A 53  |";...5.N.0:.75:S|
000007D0: 33 B2 4E 00 FB 0F 36 00  99 A6 31 29 22 11 11 20  |3.N...6...1)".. |
000007E0: 20 44 41 54 41 20 53 54  41 54 45 4D 45 4E 54 53  | DATA STATEMENTS|
000007F0: 20 3E 20 32 39 39 22 3A  4E B2 30 00 2E 10 37 00  | > 299":N.0...7.|
00000800: 99 A6 31 29 22 20 12 53  54 41 52 54 20 4F 46 20  |..1)" .START OF |
00000810: 44 41 54 41 92 22 3B 3A  8D 20 37 35 3A 44 4F B2  |DATA.";:. 75:DO.|
00000820: 4E 3A 8B 20 4E B3 33 30  30 20 A7 20 35 34 00 68  |N:. N.300 . 54.h|
00000830: 10 38 00 53 B2 52 39 3A  53 36 B2 B5 28 53 AD 32  |.8.S.R9:S6..(S.2|
00000840: 35 36 29 3A 53 37 B2 B5  28 53 AB 53 36 AC 32 35  |56):S7..(S.S6.25|
00000850: 36 29 3A 4F 50 B2 30 3A  97 38 32 38 2C 30 3A 45  |6):OP.0:.828,0:E|
00000860: B2 30 3A 97 32 39 2C 30  00 89 10 39 00 53 38 B2  |.0:.29,0...9.S8.|
00000870: B5 28 53 33 AD 32 35 36  29 3A 53 39 B2 B5 28 53  |.(S3.256):S9..(S|
00000880: 33 AB 53 38 AC 32 35 36  29 00 C2 10 3A 00 97 38  |3.S8.256)...:..8|
00000890: 33 30 2C 53 38 3A 97 38  33 31 2C 53 39 3A 44 38  |30,S8:.831,S9:D8|
000008A0: B2 B5 28 44 4F AD 32 35  36 29 3A 44 39 B2 B5 28  |..(DO.256):D9..(|
000008B0: 44 4F AB 44 38 AC 32 35  38 29 3A 97 38 33 32 2C  |DO.D8.258):.832,|
000008C0: 44 38 00 E5 10 3B 00 97  38 33 33 2C 44 39 3A 97  |D8...;..833,D9:.|
000008D0: 38 33 34 2C 53 36 3A 97  38 33 35 2C 53 37 3A 8D  |834,S6:.835,S7:.|
000008E0: 38 30 3A 89 34 00 05 11  3C 00 99 22 93 11 11 11  |80:.4...<.."....|
000008F0: 11 20 20 44 45 4C 45 54  45 20 44 41 54 41 20 22  |.  DELETE DATA "|
00000900: 3A 8D 32 30 30 00 3E 11  3D 00 99 A6 34 29 22 20  |:.200.>.=...4)" |
00000910: 12 53 54 41 52 54 20 44  41 54 41 20 3E 20 32 39  |.START DATA > 29|
00000920: 39 92 22 3B 3A 4E B2 30  3A 8D 37 35 3A 44 4F B2  |9.";:N.0:.75:DO.|
00000930: 4E 3A 8B 20 4E B3 33 30  30 20 A7 20 36 30 00 7F  |N:. N.300 . 60..|
00000940: 11 3E 00 99 A6 31 29 22  11 11 20 43 4F 4E 53 45  |.>...1)".. CONSE|
00000950: 43 55 54 49 56 45 20 53  54 41 54 45 4D 45 4E 54  |CUTIVE STATEMENT|
00000960: 53 20 22 3A 99 A6 34 29  22 20 12 4E 4F 2E 20 4F  |S ":..4)" .NO. O|
00000970: 46 20 53 54 41 54 45 4D  45 4E 54 53 92 22 3B 00  |F STATEMENTS.";.|
00000980: 90 11 3F 00 4E B2 30 3A  8D 37 35 3A 53 33 B2 4E  |..?.N.0:.75:S3.N|
00000990: 00 CB 11 40 00 53 B2 30  3A 53 36 B2 B5 28 53 AD  |...@.S.0:S6..(S.|
000009A0: 32 35 36 29 3A 53 37 B2  B5 28 53 AB 53 36 AC 32  |256):S7..(S.S6.2|
000009B0: 35 36 29 3A 4F 50 B2 31  3A 97 38 32 38 2C 4F 50  |56):OP.1:.828,OP|
000009C0: 3A 45 B2 30 3A 97 38 32  39 2C 30 00 EC 11 41 00  |:E.0:.829,0...A.|
000009D0: 53 38 B2 B5 28 53 33 AD  32 35 36 29 3A 53 39 B2  |S8..(S3.256):S9.|
000009E0: B5 28 53 33 AB 53 38 AC  32 35 36 29 00 25 12 42  |.(S3.S8.256).%.B|
000009F0: 00 97 38 33 30 2C 53 38  3A 97 38 33 31 2C 53 39  |..830,S8:.831,S9|
00000A00: 3A 44 38 B2 B5 28 44 4F  AD 32 35 36 29 3A 44 39  |:D8..(DO.256):D9|
00000A10: B2 B5 28 44 4F AB 44 38  AC 32 35 36 29 3A 97 38  |..(DO.D8.256):.8|
00000A20: 33 32 2C 44 38 00 48 12  43 00 97 38 33 33 2C 44  |32,D8.H.C..833,D|
00000A30: 39 3A 97 38 33 34 2C 53  36 3A 97 38 33 35 2C 53  |9:.834,S6:.835,S|
00000A40: 37 3A 8D 38 30 3A 89 34  00 83 12 46 00 97 38 33  |7:.80:.4...F..83|
00000A50: 39 2C 30 3A 99 22 93 22  3A 99 A6 31 29 22 11 11  |9,0:.".":..1)"..|
00000A60: 20 52 45 4D 45 4D 42 45  52 20 54 48 49 53 20 4F  | REMEMBER THIS O|
00000A70: 50 54 49 4F 4E 20 44 45  4C 45 54 45 53 20 54 48  |PTION DELETES TH|
00000A80: 49 53 22 00 B1 12 47 00  99 A6 31 29 22 20 50 52  |IS"...G...1)" PR|
00000A90: 4F 47 52 41 4D 20 41 4E  44 20 4C 45 41 56 45 53  |OGRAM AND LEAVES|
00000AA0: 20 59 4F 55 52 20 53 54  41 54 45 4D 45 4E 54 53  | YOUR STATEMENTS|
00000AB0: 22 00 FB 12 48 00 99 A6  31 29 22 20 41 53 53 45  |"...H...1)" ASSE|
00000AC0: 4D 42 4C 45 44 20 41 42  4F 56 45 20 32 39 39 2E  |MBLED ABOVE 299.|
00000AD0: 11 11 11 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
00000AE0: 9D 9D 9D 9D 9D 12 41 4E  59 20 4B 45 59 20 54 4F  |......ANY KEY TO|
00000AF0: 20 43 4F 4E 54 49 4E 55  45 92 22 00 10 13 49 00  | CONTINUE."...I.|
00000B00: A1 4B 24 3A 8B 20 4B 24  B2 22 22 20 A7 20 37 33  |.K$:. K$."" . 73|
00000B10: 00 19 13 4A 00 89 32 31  30 00 22 13 4B 00 4E 4E  |...J..210.".K.NN|
00000B20: B2 30 00 37 13 4C 00 A1  20 4B 24 3A 8B 4B 24 B2  |.0.7.L.. K$:.K$.|
00000B30: 22 22 20 A7 20 37 36 00  66 13 4D 00 8B 20 4B 24  |"" . 76.f.M.. K$|
00000B40: B2 C7 28 32 30 29 20 A7  20 4E 4E B2 30 3A 81 20  |..(20) . NN.0:. |
00000B50: 55 B2 31 20 A4 20 4E 4E  3A 99 22 9D 9D 22 3B 3A  |U.1 . NN:."..";:|
00000B60: 82 55 3A 89 37 35 00 85  13 4E 00 4E 4E B2 4E 4E  |.U:.75...N.NN.NN|
00000B70: AA 31 3A 99 4B 24 3B 3A  8B 20 4B 24 B2 C7 28 31  |.1:.K$;:. K$..(1|
00000B80: 33 29 A7 20 8E 00 9A 13  4F 00 4E B2 4E AC 31 30  |3). ....O.N.N.10|
00000B90: AA C5 28 4B 24 29 3A 89  37 36 00 B2 13 50 00 8F  |..(K$):.76...P..|
00000BA0: 20 2A 2A 2A 4D 41 49 4E  20 52 64 7F 49 4E 45 2A  | ***MAIN Rd.INE*|
00000BB0: 2A 2A 00 D8 13 51 00 8F  20 2A 53 3D 53 54 41 52  |**...Q.. *S=STAR|
00000BC0: 54 20 52 41 4D 20 2A 2A  44 4F 3D 53 54 41 52 54  |T RAM **DO=START|
00000BD0: 20 44 41 54 41 20 2A 2A  00 19 14 52 00 53 34 B2  | DATA **...R.S4.|
00000BE0: 30 3A 97 38 33 36 2C 53  34 3A 53 35 B2 30 3A 97  |0:.836,S4:S5.0:.|
00000BF0: 38 33 37 2C 53 35 3A 8F  20 2A 2A 2A 53 33 3D 4E  |837,S5:. ***S3=N|
00000C00: 4F 20 4F 46 20 52 41 4D  53 2A 2A 44 31 3D 4E 4F  |O OF RAMS**D1=NO|
00000C10: 20 4F 46 20 64 03 53 2A  2A 00 4F 14 53 00 4F 50  | OF d.S**.O.S.OP|
00000C20: B2 C2 28 38 32 38 29 3A  53 38 B2 C2 28 38 33 30  |..(828):S8..(830|
00000C30: 29 3A 53 39 B2 C2 28 38  33 31 29 3A 44 38 B2 C2  |):S9..(831):D8..|
00000C40: 28 38 33 32 29 3A 44 39  B2 C2 28 38 33 33 29 00  |(832):D9..(833).|
00000C50: 94 14 54 00 53 36 B2 C2  28 38 33 34 29 3A 53 37  |..T.S6..(834):S7|
00000C60: B2 C2 28 38 33 35 29 3A  53 34 B2 C2 28 38 33 36  |..(835):S4..(836|
00000C70: 29 3A 53 35 B2 C2 28 38  33 37 29 3A 54 B2 53 34  |):S5..(837):T.S4|
00000C80: AC 32 35 36 AA 53 35 3A  53 33 B2 53 38 AC 32 35  |.256.S5:S3.S8.25|
00000C90: 36 AA 53 39 00 D1 14 55  00 50 B2 B5 28 54 AD 36  |6.S9...U.P..(T.6|
00000CA0: 34 29 3A 51 B2 B5 28 54  AB 50 AC 36 34 29 3A 42  |4):Q..(T.P.64):B|
00000CB0: B2 B5 28 51 AD 31 36 29  3A 52 B2 B5 28 51 AB 42  |..(Q.16):R..(Q.B|
00000CC0: AC 31 36 29 3A 44 4F B2  44 38 AC 32 35 36 AA 44  |.16):DO.D8.256.D|
00000CD0: 39 00 EF 14 56 00 58 B2  44 4F 3A 59 B2 31 3A 56  |9...V.X.DO:Y.1:V|
00000CE0: B2 38 33 32 3A 57 B2 38  33 33 3A 8D 32 30 35 00  |.832:W.833:.205.|
00000CF0: 32 15 57 00 53 33 B2 53  38 AC 32 35 36 AA 53 39  |2.W.S3.S8.256.S9|
00000D00: 3A 44 4F B2 44 38 AC 32  35 36 AA 44 39 3A 53 B2  |:DO.D8.256.D9:S.|
00000D10: 53 36 AC 32 35 36 AA 53  37 3A 58 B2 53 3A 59 B2  |S6.256.S7:X.S:Y.|
00000D20: 30 3A 56 B2 38 33 34 3A  57 B2 38 33 35 3A 8D 32  |0:V.834:W.835:.2|
00000D30: 30 35 00 4E 15 58 00 81  49 B2 30 A4 36 33 3A 5A  |05.N.X..I.0.63:Z|
00000D40: 25 28 49 29 B2 C2 28 53  AA 49 29 3A 82 49 00 5D  |%(I)..(S.I):.I.]|
00000D50: 15 59 00 8B 20 42 B3 33  20 A7 20 39 31 00 8D 15  |.Y.. B.3 . 91...|
00000D60: 5A 00 58 B2 53 3A 59 B2  36 34 3A 56 B2 38 33 34  |Z.X.S:Y.64:V.834|
00000D70: 3A 57 B2 38 33 35 3A 8D  32 30 35 3A 8F 20 2A 2A  |:W.835:.205:. **|
00000D80: 41 44 44 20 36 34 20 54  4F 20 53 2A 2A 00 BF 15  |ADD 64 TO S**...|
00000D90: 5B 00 99 22 93 22 3B 3A  99 22 13 22 44 4F 3B 3A  |[..".";:."."DO;:|
00000DA0: 8B 20 4F 50 B3 B1 30 20  A7 20 4F 50 20 B2 4F 50  |. OP..0 . OP .OP|
00000DB0: 20 AA 31 3A 97 38 32 38  2C 4F 50 3A 89 39 37 00  | .1:.828,OP:.97.|
00000DC0: CD 15 5C 00 99 22 9D 44  41 54 41 22 3B 00 0D 16  |..\..".DATA";...|
00000DD0: 5D 00 81 20 4A B2 30 20  A4 20 31 34 3A 41 24 B2  |].. J.0 . 14:A$.|
00000DE0: C4 28 5A 25 28 4A AA 42  AC 31 36 29 29 3A 41 24  |.(Z%(J.B.16)):A$|
00000DF0: B2 C9 28 41 24 2C C3 28  41 24 29 AB 31 29 3A 99  |..(A$,.(A$).1):.|
00000E00: 41 24 3B 22 2C 22 3B 3A  54 B2 54 AA 31 00 28 16  |A$;",";:T.T.1.(.|
00000E10: 5E 00 8B 20 54 B1 B2 53  33 A7 3A 97 38 32 39 2C  |^.. T..S3.:.829,|
00000E20: 31 3A 99 3A 89 31 31 30  00 60 16 5F 00 82 4A 3A  |1:.:.110.`._..J:|
00000E30: 54 B2 54 AA 31 3A 41 24  B2 C4 28 5A 25 28 42 AC  |T.T.1:A$..(Z%(B.|
00000E40: 31 36 AA 31 35 29 29 3A  99 41 24 3A 8B 54 B1 B2  |16.15)):.A$:.T..|
00000E50: 53 33 A7 97 38 32 39 2C  31 3A 99 3A 89 31 31 30  |S3..829,1:.:.110|
00000E60: 00 69 16 60 00 89 31 31  30 00 82 16 61 00 8B 20  |.i.`..110...a.. |
00000E70: 4F 50 B1 53 33 20 A7 20  45 B2 31 3A 97 38 32 39  |OP.S3 . E.1:.829|
00000E80: 2C 45 00 8D 16 62 00 99  3A 89 31 31 30 00 93 16  |,E...b..:.110...|
00000E90: 63 00 8F 00 9F 16 64 00  86 5A 25 28 36 34 29 00  |c.....d..Z%(64).|
00000EA0: B7 16 65 00 45 B2 C2 28  38 32 39 29 3A 8B 20 45  |..e.E..(829):. E|
00000EB0: B2 30 20 A7 20 38 33 00  BE 16 66 00 89 34 00 DB  |.0 . 83...f..4..|
00000EC0: 16 6E 00 58 B2 54 3A 59  B2 30 3A 56 B2 38 33 36  |.n.X.T:Y.0:V.836|
00000ED0: 3A 57 B2 38 33 37 3A 8D  32 30 35 00 ED 16 6F 00  |:W.837:.205...o.|
00000EE0: 99 22 52 55 4E 20 31 30  30 3A 22 3B 42 00 20 17  |."RUN 100:";B. .|
00000EF0: 70 00 97 36 33 31 2C 31  39 3A 97 36 33 32 2C 31  |p..631,19:.632,1|
00000F00: 33 3A 97 36 33 33 2C 31  33 3A 97 36 33 34 2C 31  |3:.633,13:.634,1|
00000F10: 33 3A 97 36 33 35 2C 31  33 3A 97 31 39 38 2C 35  |3:.635,13:.198,5|
00000F20: 00 26 17 71 00 80 00 4E  17 78 00 99 22 93 11 11  |.&.q...N.x.."...|
00000F30: 11 11 20 4C 49 53 54 20  50 52 4F 47 52 41 4D 20  |.. LIST PROGRAM |
00000F40: 54 4F 20 44 49 53 4B 20  22 3A 8D 32 30 30 00 7E  |TO DISK ":.200.~|
00000F50: 17 79 00 99 A6 34 29 22  12 20 53 54 41 52 54 20  |.y...4)". START |
00000F60: 4C 49 4E 45 20 4E 4F 2E  20 20 20 20 20 20 92 22  |LINE NO.      ."|
00000F70: 3B 3A 4E B2 30 3A 8D 37  35 3A 53 39 B2 4E 00 BD  |;:N.0:.75:S9.N..|
00000F80: 17 7A 00 99 A6 31 29 22  11 11 20 4C 49 53 54 20  |.z...1)".. LIST |
00000F90: 50 52 4F 47 52 41 4D 20  4F 4E 4C 59 20 20 22 3A  |PROGRAM ONLY  ":|
00000FA0: 99 A6 34 29 22 20 20 20  12 46 49 4E 41 4C 20 4C  |..4)"   .FINAL L|
00000FB0: 49 4E 45 20 4E 4F 2E 20  20 20 92 22 3B 00 CE 17  |INE NO.   .";...|
00000FC0: 7B 00 4E B2 30 3A 8D 37  35 3A 53 33 B2 4E 00 ED  |{.N.0:.75:S3.N..|
00000FD0: 17 7C 00 85 22 93 11 11  11 11 20 12 46 49 4C 45  |.|.."..... .FILE|
00000FE0: 20 54 49 54 4C 45 20 92  22 3B 4E 46 24 00 1F 18  | TITLE .";NF$...|
00000FF0: 7D 00 99 C7 28 31 34 37  29 3A 99 22 93 4F 50 45  |}...(147):.".OPE|
00001000: 4E 31 2C 38 2C 31 2C 4E  46 24 3A 43 4D 44 31 3A  |N1,8,1,NF$:CMD1:|
00001010: 4C 49 53 54 22 3B 53 39  3B 22 2D 22 3B 53 33 00  |LIST";S9;"-";S3.|
00001020: 42 18 7E 00 99 22 11 11  50 52 49 4E 54 23 31 3A  |B.~.."..PRINT#1:|
00001030: 43 4C 4F 53 45 20 31 2C  38 3A 47 4F 54 4F 31 32  |CLOSE 1,8:GOTO12|
00001040: 39 22 00 6C 18 7F 00 97  36 33 31 2C 31 39 3A 81  |9".l....631,19:.|
00001050: 49 39 B2 30 A4 36 3A 97  36 33 32 AA 49 39 2C 31  |I9.0.6:.632.I9,1|
00001060: 33 3A 82 49 39 3A 97 31  39 38 2C 34 00 72 18 80  |3:.I9:.198,4.r..|
00001070: 00 80 00 79 18 81 00 89  34 00 9D 18 82 00 99 22  |...y....4......"|
00001080: 93 11 11 11 20 52 45 41  44 20 50 52 4F 47 52 41  |.... READ PROGRA|
00001090: 4D 20 46 52 4F 4D 20 44  49 53 4B 20 22 00 BB 18  |M FROM DISK "...|
000010A0: 83 00 85 22 11 11 20 20  12 46 49 4C 45 20 54 49  |..."..  .FILE TI|
000010B0: 54 4C 45 20 20 92 22 3B  4E 46 24 00 D8 18 84 00  |TLE  .";NF$.....|
000010C0: 9F 31 2C 38 2C 30 2C 4E  46 24 3A 4B B2 30 3A 4B  |.1,8,0,NF$:K.0:K|
000010D0: 39 B2 30 3A 4B 38 B2 30  00 E1 18 86 00 99 22 93  |9.0:K8.0......".|
000010E0: 22 00 04 19 87 00 A1 23  31 2C 59 24 3A 59 B2 C6  |"......#1,Y$:Y..|
000010F0: 28 59 24 AA C7 28 30 29  29 3A 97 32 30 30 30 30  |(Y$..(0)):.20000|
00001100: AA 4B 2C 59 00 38 19 88  00 8B 20 53 54 B2 36 34  |.K,Y.8.... ST.64|
00001110: 20 A7 20 A0 20 31 2C 38  3A 81 20 4C B2 31 20 A4  | . . 1,8:. L.1 .|
00001120: 20 34 3A 97 32 30 30 30  30 AA 4B AA 4C 2C 30 3A  | 4:.20000.K.L,0:|
00001130: 82 20 4C 3A 89 31 34 30  00 4C 19 8A 00 99 59 24  |. L:.140.L....Y$|
00001140: 3B 3A 4B B2 4B AA 31 3A  89 31 33 35 00 54 19 8C  |;:K.K.1:.135.T..|
00001150: 00 4B B2 30 00 5E 19 8D  00 99 22 93 22 3B 00 7F  |.K.0.^....".";..|
00001160: 19 8E 00 59 B2 C2 28 32  30 30 30 30 AA 4B 29 3A  |...Y..(20000.K):|
00001170: 8B 59 B2 30 20 B0 20 59  B2 31 30 20 A7 20 32 00  |.Y.0 . Y.10 . 2.|
00001180: BC 19 8F 00 59 24 B2 C7  28 59 29 3A 4B B2 4B AA  |....Y$..(Y):K.K.|
00001190: 31 3A 4B 39 B2 B5 28 4B  AD 32 35 36 29 3A 4B 38  |1:K9..(K.256):K8|
000011A0: B2 B5 28 4B AB 4B 39 AC  32 35 36 29 3A 97 38 32  |..(K.K9.256):.82|
000011B0: 30 2C 4B 39 3A 97 38 32  31 2C 4B 38 00 D0 19 90  |0,K9:.821,K8....|
000011C0: 00 8B 20 59 24 B2 C7 28  31 33 29 A7 20 31 34 37  |.. Y$..(13). 147|
000011D0: 00 DE 19 91 00 99 59 24  3B 3A 89 31 34 32 00 00  |......Y$;:.142..|
000011E0: 1A 93 00 99 3A 99 22 52  55 4E 20 31 35 30 3A 52  |....:."RUN 150:R|
000011F0: 45 4D 20 50 4C 45 41 53  45 20 57 41 49 54 20 22  |EM PLEASE WAIT "|
00001200: 00 26 1A 94 00 97 36 33  31 2C 31 39 3A 81 49 B2  |.&....631,19:.I.|
00001210: 30 A4 34 3A 97 36 33 32  AA 49 2C 31 33 3A 82 3A  |0.4:.632.I,13:.:|
00001220: 97 31 39 38 2C 35 00 2C  1A 95 00 80 00 55 1A 96  |.198,5.,.....U..|
00001230: 00 4B 39 B2 C2 28 38 32  30 29 3A 4B 38 B2 C2 28  |.K9..(820):K8..(|
00001240: 38 32 31 29 3A 4B B2 4B  39 AC 32 35 36 AA 4B 38  |821):K.K9.256.K8|
00001250: 3A 99 22 13 22 00 5E 1A  99 00 89 31 34 32 00 A3  |:.".".^....142..|
00001260: 1A C8 00 53 30 B2 31 30  32 34 3A 43 30 B2 34 30  |...S0.1024:C0.40|
00001270: 3A 42 30 B2 35 34 32 37  32 3A 81 43 31 B2 30 A4  |:B0.54272:.C1.0.|
00001280: 33 39 3A 53 31 B2 53 30  AA 43 31 3A 53 32 B2 53  |39:S1.S0.C1:S2.S|
00001290: 30 AA 43 31 AA 43 30 AC  32 34 3A 8D 32 30 32 3A  |0.C1.C0.24:.202:|
000012A0: 82 43 31 00 D6 1A C9 00  81 43 31 B2 31 A4 32 33  |.C1......C1.1.23|
000012B0: 3A 53 31 B2 53 30 AA 43  30 AC 43 31 3A 53 32 B2  |:S1.S0.C0.C1:S2.|
000012C0: 53 30 AA 43 30 AC 43 31  AA 33 39 3A 8D 32 30 32  |S0.C0.C1.39:.202|
000012D0: 3A 82 43 31 3A 8E 00 FE  1A CA 00 97 53 32 2C 32  |:.C1:.......S2,2|
000012E0: 31 34 3A 97 53 32 AA 42  30 2C 35 3A 97 53 31 2C  |14:.S2.B0,5:.S1,|
000012F0: 32 31 34 3A 97 53 31 AA  42 30 2C 35 3A 8E 00 31  |214:.S1.B0,5:..1|
00001300: 1B CD 00 58 B2 58 AA 59  3A 58 38 B2 B5 28 58 AD  |...X.X.Y:X8..(X.|
00001310: 32 35 36 29 3A 58 39 B2  B5 28 58 AB 58 38 AC 32  |256):X9..(X.X8.2|
00001320: 35 36 29 3A 97 56 2C 58  38 3A 97 57 2C 58 39 3A  |56):.V,X8:.W,X9:|
00001330: 8E 00 4E 1B D2 00 49 B2  C2 28 38 33 39 29 3A 99  |..N...I..(839):.|
00001340: 22 93 22 3A 8B 49 B1 32  30 36 A7 32 31 34 00 8A  |".":.I.206.214..|
00001350: 1B D3 00 99 22 93 22 49  3A 49 B2 49 AA 31 3A 97  |...."."I:I.I.1:.|
00001360: 38 33 39 2C 49 3A 99 22  52 55 4E 20 32 31 30 3A  |839,I:."RUN 210:|
00001370: 52 45 4D 20 57 41 49 54  20 46 4F 52 20 43 4C 45  |REM WAIT FOR CLE|
00001380: 41 52 20 53 43 52 45 45  4E 22 00 BD 1B D4 00 97  |AR SCREEN"......|
00001390: 36 33 31 2C 31 39 3A 97  36 33 32 2C 31 33 3A 97  |631,19:.632,13:.|
000013A0: 36 33 33 2C 31 33 3A 97  36 33 34 2C 31 33 3A 97  |633,13:.634,13:.|
000013B0: 36 33 35 2C 31 33 3A 97  31 39 38 2C 35 00 C3 1B  |635,13:.198,5...|
000013C0: D5 00 80 00 E9 1B D6 00  81 49 B2 32 31 30 A4 32  |.........I.210.2|
000013D0: 31 36 3A 99 49 3A 82 3A  99 22 50 52 49 4E 54 43  |16:.I:.:."PRINTC|
000013E0: 48 52 24 28 31 34 37 29  22 00 10 1C D7 00 97 36  |HR$(147)"......6|
000013F0: 33 31 2C 31 39 3A 81 49  B2 31 A4 39 3A 97 36 33  |31,19:.I.1.9:.63|
00001400: 31 AA 49 2C 31 33 3A 82  3A 97 31 39 38 2C 31 32  |1.I,13:.:.198,12|
00001410: 00 16 1C D8 00 80 00 00  00 FF 2E                 |...........     |

.......53281,1:.53280,13.$....Z%(64).<..
..".":. 200:. BERDER.F.....1)"     ...  
    OPTIONS AVAILABLE".......1)"        
   #################":.".".D.....1)"  IN
STRUKTIONS ON USE...............1":.....
...1)"  SAVE SPRITES AS DATA............
..2":..(.....1)"  SAVE MACHINE CODE AS D
ATA.........3":..Z.....1)"  DELETE DATA 
STATEMENTS............4":........1)"  LI
ST STATEMENTS TO DISK...........5":.....
...1)"  ASSEMBLE DATA FROM DISK.........
..6":........1)"  DELETE STATEMENTS 0-25
5...........7":........1)".       .KEY I
N DESIRED OPTION."......K$:.K$."" . 15.C
.... E(K$).0 . E(K$).7 . ."             
   .. ":.14......E(K$).20,40,50,60,120,1
30,70...... E(K$).8 . ........Q....".":.
200:.".....INSTUKTIONS ON USE OF UTILITY
".......1)" ############################
#.".,.....1)" SPRITES ARE SAVED AS DATA 
STATEMENTS.".\.....1)" SPRITES 0-47 RAM 
ADDRESS 12288-15360".......1)" OR MACHIN
E CODE CAN BE SAVED AS DATA.".......1)" 
DATA STATEMENTS CAN BE DELETED.".......1
)" THE REST OF THIS PROGRAM MAY BE".....
..1)" DELETED IF REQUIRED. THIS LEAVES O
NLY".B.....1)" DATA STATEMENTS FOR USER 
PROGRAMS.".O.....1)"         ...TO CREAT
E NEW PROGRAM.".......1)".   WAIT FOR RE
ADY TO STOP FLASHING".N.....1)" IN THIS 
MODE, THEN SAVE DATA ON DISK."... ...1)"
 LOAD NEW DATA AND KEY IN PROGRAM.". .!.
..1)"..   .ANY KEY TO CONTINUE.".5.%..K$
:. K$."" . 37.<.&..4.B.(..".....        
SPRITES 0-47":.200...)...1)".FIRST SPRIT
E NO..";:N.0:.75:S9.N:. S9.47 . S9.0 . 4
1...*...1)"..  FOR CONSECUTIVE SPRITES":
..4)" .NO. OF SPRITES.";...+.N.0:.75:S3.
N:.(48.S9.S3).0 . S3.1 . 42.2.,...1)".. 
DATA STATEMENTS > 299":N.0.F.-...1)"  .S
TART OF DATA.";:. 75:DO.N:. N.300 . 44..
...S.12288.64.S9:S6..(S.256):S7..(S.S6.2
56):S3.S3.64:OP.0:.828,0.T./.E.0:.829,0:
S8..(S3.256):S9..(S3.S8.256)...0..830,S8
:.831,S9:D8..(DO.256):D9..(DO.D8.256):.8
32,D8.0.1..833,D9:.834,S6:.835,S7:.80:.4
.T.2..".....      RAM TO DATA ":.200...3
...4)"     .START ADDRESS.";:N.0:.75:R9.
N.B.4...1)".. CONSECUTIVE ADDRESSES  ":.
.4)"  .NO. OF ADDRESSES.";.S.5.N.0:.75:S
3.N...6...1)"..  DATA STATEMENTS > 299":
N.0...7...1)" .START OF DATA.";:. 75:DO.
N:. N.300 . 54.H.8.S.R9:S6..(S.256):S7..
(S.S6.256):OP.0:.828,0:E.0:.29,0...9.S8.
.(S3.256):S9..(S3.S8.256).B.:..830,S8:.8
31,S9:D8..(DO.256):D9..(DO.D8.258):.832,
D8...;..833,D9:.834,S6:.835,S7:.80:.4...
<..".....  DELETE DATA ":.200.>.=...4)" 
.START DATA > 299.";:N.0:.75:DO.N:. N.30
0 . 60..>...1)".. CONSECUTIVE STATEMENT
S ":..4)" .NO. OF STATEMENTS.";...?.N.0:
.75:S3.N.K.@.S.0:S6..(S.256):S7..(S.S6.2
56):OP.1:.828,OP:E.0:.829,0...A.S8..(S3.
256):S9..(S3.S8.256).%.B..830,S8:.831,S9
:D8..(DO.256):D9..(DO.D8.256):.832,D8.H.
C..833,D9:.834,S6:.835,S7:.80:.4...F..83
9,0:.".":..1)".. REMEMBER THIS OPTION DE
LETES THIS"...G...1)" PROGRAM AND LEAVES
 YOUR STATEMENTS"...H...1)" ASSEMBLED AB
OVE 299.......................ANY KEY TO
 CONTINUE."...I..K$:. K$."" . 73...J..21
0.".K.NN.0.7.L.. K$:.K$."" . 76.F.M.. K$
.G(20) . NN.0:. U.1 . NN:."..";:.U:.75..
.N.NN.NN.1:.K$;:. K$.G(13). ....O.N.N.10
.E(K$):.76...P.. ***MAIN RDINE***.X.Q..
 *S=START RAM **DO=START DATA **...R.S4.
0:.836,S4:S5.0:.837,S5:. ***S3=NO OF RAM
S**D1=NO OF D.S**.O.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.Q.U.P..(T.64):Q..(T
.P.64):B..(Q.16):R..(Q.B.16):DO.D8.256.D
9...V.X.DO:Y.1:V.832:W.833:.205.2.W.S3.S
8.256.S9:DO.D8.256.D9:S.S6.256.S7:X.S:Y.
0:V.834:W.835:.205.N.X..I.0.63:Z%(I).B(S
.I):.I.].Y.. B.3 . 91...Z.X.S:Y.64:V.834
:W.835:.205:. **ADD 64 TO S**...[..".";:
."."DO;:. OP..0 . OP .OP .1:.828,OP:.97.
M.\..".DATA";...].. J.0 . 14:A$.D(Z%(J.B
.16)):A$.I(A$,C(A$).1):.A$;",";:T.T.1.(.
^.. T..S3.:.829,1:.:.110.`._..J:T.T.1:A$
.D(Z%(B.16.15)):.A$:.T..S3..829,1:.:.110
.I.`..110...A.. OP.S3 . E.1:.829,E...B..
:.110...C.....D..Z%(64)...E.E.B(829):. E
.0 . 83...F..4...N.X.T:Y.0:V.836:W.837:.
205...O.."RUN 100:";B. .P..631,19:.632,1
3:.633,13:.634,13:.635,13:.198,5.&.Q...N
.X.."..... LIST PROGRAM TO DISK ":.200.~
.Y...4)". START LINE NO.      .";:N.0:.7
5:S9.N...Z...1)".. LIST PROGRAM ONLY  ":
..4)"   .FINAL LINE NO.   .";.N.{.N.0:.7
5:S3.N...|.."..... .FILE TITLE .";NF$...
}..G(147):.".OPEN1,8,1,NF$:CMD1:LIST";S9
;"-";S3.B.~.."..PRINT#1:CLOSE 1,8:GOTO12
9".L...631,19:.I9.0.6:.632.I9,13:.I9:.1
98,4.R.....Y....4......".... READ PROGRA
M FROM DISK "......"..  .FILE TITLE  .";
NF$.X....1,8,0,NF$:K.0:K9.0:K8.0......".
"......#1,Y$:Y.F(Y$.G(0)):.20000.K,Y.8..
.. ST.64 .   1,8:. L.1 . 4:.20000.K.L,0:
. L:.140.L....Y$;:K.K.1:.135.T...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.P.... Y$.G(13). 147
......Y$;:.142......:."RUN 150:REM PLEAS
E WAIT ".&....631,19:.I.0.4:.632.I,13:.:
.198,5.,.....U...K9.B(820):K8.B(821):K.K
9.256.K8:.".".^....142...H.S0.1024:C0.40
:B0.54272:.C1.0.39:S1.S0.C1:S2.S0.C1.C0.
24:.202:.C1.V.I..C1.1.23:S1.S0.C0.C1:S2.
S0.C0.C1.39:.202:.C1:....J..S2,214:.S2.B
0,5:.S1,214:.S1.B0,5:..1.M.X.X.Y:X8..(X.
256):X9..(X.X8.256):.V,X8:.W,X9:..N.R.I.
B(839):.".":.I.206.214...S.."."I:I.I.1:.
839,I:."RUN 210:REM WAIT FOR CLEAR SCREE
N"...T..631,19:.632,13:.633,13:.634,13:.
635,13:.198,5.C.U.....V..I.210.216:.I:.:
."PRINTCHR$(147)"...W..631,19:.I.1.9:.63
1.I,13:.:.198,12...X.......

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL