_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SPRITE ANIMATOR

FILE INFORMATION

FILENAME(S): SPRITE ANIMATOR

FILE TYPE(S): PRG

FILE SIZE: 6.5K

FIRST SEEN: 2025-11-30 21:21:58

APPEARS ON: 1 disk(s)

FILE HASH

a24120af94d287729946c88fd91fb2bc43e4ee9ba4cc6f8be1ff93ea399aa87b

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
MAD FLOPPY ANGEL SPRITE ANIMATOR PRG DuncanTwain 24 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 00 08 00 00 9E 32  30 36 31 00 00 00 A0 59  |.......2061....Y|
00000010: B9 1A 08 99 3F 03 88 D0  F7 4C 40 03 A9 74 85 FB  |....?....L@..t..|
00000020: A9 08 85 FC A0 00 B1 FB  8D 97 03 C8 B1 FB 8D 98  |................|
00000030: 03 F0 37 C8 B1 FB 85 FD  C8 B1 FB 85 FE A5 FB 18  |..7.............|
00000040: 69 04 85 FB A0 00 90 02  E6 FC B1 FB 91 FD E6 FB  |i...............|
00000050: D0 02 E6 FC E6 FD D0 02  E6 FE A5 FB CD 97 03 D0  |................|
00000060: E9 A5 FC CD 98 03 D0 E2  F0 BA A9 00 85 7A A9 08  |.............z..|
00000070: 85 7B 60 FF FF D9 21 01  08 24 08 01 00 51 31 B2  |.{`...!..$...Q1.|
00000080: C2 28 38 32 39 29 AB 31  39 31 3A 8B 51 31 AB 32  |.(829).191:.Q1.2|
00000090: 34 A7 93 22 3A 2A 20 20  22 2C 38 00 2F 08 02 00  |4..":*  ",8./...|
000000A0: 9E 36 35 34 31 38 00 4C  08 0A 00 8F 20 53 49 4E  |.65418.L.... SIN|
000000B0: 47 4C 45 20 53 50 52 49  54 45 20 41 4E 49 4D 41  |GLE SPRITE ANIMA|
000000C0: 54 4F 52 00 63 08 14 00  8F 20 4D 49 43 48 41 45  |TOR.c.... MICHAE|
000000D0: 4C 20 41 2E 20 45 53 4B  49 4E 00 7B 08 1E 00 8F  |L A. ESKIN.{....|
000000E0: 20 44 45 53 49 47 4E 20  54 45 43 48 4E 4F 4C 4F  | DESIGN TECHNOLO|
000000F0: 47 59 00 8D 08 28 00 8F  20 32 32 20 41 55 47 20  |GY...(.. 22 AUG |
00000100: 31 39 38 34 00 CF 08 2D  00 42 B2 30 3A 81 58 B2  |1984...-.B.0:.X.|
00000110: 34 39 31 35 32 A4 34 39  32 32 34 AB 51 31 3A 42  |49152.49224.Q1:B|
00000120: B2 42 AA C2 28 58 29 3A  82 58 3A 8B 28 42 AB 35  |.B..(X):.X:.(B.5|
00000130: 39 32 38 29 A7 93 22 53  50 52 53 55 50 2E 4F 42  |928).."SPRSUP.OB|
00000140: 4A 22 2C 38 2C 31 00 DF  08 2E 00 97 38 33 30 2C  |J",8,1......830,|
00000150: C6 28 22 53 22 29 00 04  09 2F 00 99 22 93 22 3A  |.("S").../..".":|
00000160: 97 20 35 33 32 38 30 2C  35 3A 97 20 35 33 32 38  |. 53280,5:. 5328|
00000170: 31 2C 36 3A 99 C7 28 31  34 32 29 00 12 09 32 00  |1,6:..(142)...2.|
00000180: 9F 20 31 35 2C 38 2C 31  35 00 22 09 34 00 8B 20  |. 15,8,15.".4.. |
00000190: 52 46 B2 31 20 A7 20 36  30 00 36 09 37 00 86 20  |RF.1 . 60.6.7.. |
000001A0: 41 25 28 31 32 29 2C 42  25 28 31 32 29 00 3F 09  |A%(12),B%(12).?.|
000001B0: 39 00 52 46 B2 31 00 58  09 3C 00 81 20 49 B2 31  |9.RF.1.X.<.. I.1|
000001C0: 20 A4 20 31 32 3A 87 20  41 25 28 49 29 3A 82 00  | . 12:. A%(I):..|
000001D0: 71 09 41 00 81 20 49 B2  31 20 A4 20 31 32 3A 87  |q.A.. I.1 . 12:.|
000001E0: 20 42 25 28 49 29 3A 82  00 AE 09 42 00 53 44 B2  | B%(I):....B.SD.|
000001F0: 35 34 32 37 32 3A 81 49  B2 53 44 A4 53 44 AA 32  |54272:.I.SD.SD.2|
00000200: 34 3A 97 49 2C 30 3A 82  3A 97 53 44 AA 35 2C 31  |4:.I,0:.:.SD.5,1|
00000210: 35 3A 97 53 44 AA 36 2C  32 34 30 3A 97 53 44 AA  |5:.SD.6,240:.SD.|
00000220: 32 34 2C 31 35 00 BB 09  43 00 97 53 44 AA 31 2C  |24,15...C..SD.1,|
00000230: 35 30 00 C5 09 46 00 89  20 31 30 30 00 F8 09 50  |50...F.. 100...P|
00000240: 00 83 20 31 31 32 2C 39  36 2C 31 36 30 2C 39 36  |.. 112,96,160,96|
00000250: 2C 32 30 38 2C 39 36 2C  31 31 32 2C 31 33 38 2C  |,208,96,112,138,|
00000260: 31 36 30 2C 31 33 38 2C  32 30 38 2C 31 33 38 00  |160,138,208,138.|
00000270: 2E 0A 5A 00 83 20 31 34  38 2C 31 30 39 2C 31 37  |..Z.. 148,109,17|
00000280: 32 2C 31 30 39 2C 31 39  36 2C 31 30 39 2C 31 34  |2,109,196,109,14|
00000290: 38 2C 31 33 30 2C 31 37  32 2C 31 33 30 2C 31 39  |8,130,172,130,19|
000002A0: 36 2C 31 33 30 00 3A 0A  64 00 56 B2 35 33 32 34  |6,130.:.d.V.5324|
000002B0: 38 00 47 0A 6E 00 97 20  56 AA 32 31 2C 30 00 61  |8.G.n.. V.21,0.a|
000002C0: 0A 78 00 97 20 56 AA 32  33 2C 32 35 35 3A 97 20  |.x.. V.23,255:. |
000002D0: 56 AA 32 39 2C 32 35 35  00 89 0A C8 00 99 22 93  |V.29,255......".|
000002E0: 05 22 A6 31 31 29 22 12  53 50 52 49 54 45 20 41  |.".11)".SPRITE A|
000002F0: 4E 49 4D 41 54 4F 52 92  22 3A 8D 31 33 30 30 30  |NIMATOR.":.13000|
00000300: 00 92 0A 2C 01 4E 46 B2  30 00 9F 0A 36 01 53 42  |...,.NF.0...6.SB|
00000310: B2 31 30 32 34 30 00 A9  0A 40 01 50 B2 31 36 30  |.10240...@.P.160|
00000320: 00 DD 0A 54 01 97 31 39  38 2C 30 3A 85 22 11 20  |...T..198,0:.". |
00000330: 44 4F 20 59 4F 55 20 57  41 4E 54 20 54 4F 20 41  |DO YOU WANT TO A|
00000340: 55 54 4F 2D 4C 4F 41 44  20 46 49 4C 45 53 22 3B  |UTO-LOAD FILES";|
00000350: 41 24 3A 99 00 F6 0A 5E  01 8B 20 C8 28 41 24 2C  |A$:....^.. .(A$,|
00000360: 31 29 B2 22 59 22 20 A7  20 34 30 30 30 00 FC 0A  |1)."Y" . 4000...|
00000370: 90 01 99 00 35 0B F4 01  8D 31 33 30 30 30 3A 5A  |....5....13000:Z|
00000380: 24 B2 22 22 3A 99 22 93  11 20 45 4E 54 45 52 20  |$."":.".. ENTER |
00000390: 12 46 52 41 4D 45 20 23  22 3B 4E 46 AA 31 3B 22  |.FRAME #";NF.1;"|
000003A0: 46 49 4C 45 20 4E 41 4D  45 92 3A 22 00 5D 0B 58  |FILE NAME.:".].X|
000003B0: 02 99 20 22 11 20 3C 52  45 54 55 52 4E 3E 20 41  |.. ". <RETURN> A|
000003C0: 4C 4F 4E 45 20 46 4F 52  20 4C 41 53 54 20 46 52  |LONE FOR LAST FR|
000003D0: 41 4D 45 22 00 85 0B 59  02 99 22 20 20 27 24 27  |AME"...Y.."  '$'|
000003E0: 20 20 54 4F 20 4C 49 53  54 20 54 48 45 20 44 49  |  TO LIST THE DI|
000003F0: 53 4B 20 44 49 52 45 43  54 4F 52 59 00 AE 0B 5A  |SK DIRECTORY...Z|
00000400: 02 99 22 20 27 45 4E 44  27 20 54 4F 20 45 58 49  |.." 'END' TO EXI|
00000410: 54 20 54 4F 20 54 48 45  20 53 59 53 54 45 4D 20  |T TO THE SYSTEM |
00000420: 4D 45 4E 55 22 00 C6 0B  5C 02 85 20 22 11 59 4F  |MENU"...\.. ".YO|
00000430: 55 52 20 45 4E 54 52 59  3A 22 3B 5A 24 00 D9 0B  |UR ENTRY:";Z$...|
00000440: 76 02 8B 20 5A 24 B2 22  22 20 A7 20 32 30 30 30  |v.. Z$."" . 2000|
00000450: 00 F6 0B 7B 02 8B 20 5A  24 B2 22 24 22 20 A7 20  |...{.. Z$."$" . |
00000460: 8D 20 31 32 30 30 30 3A  89 20 34 30 30 00 0C 0C  |. 12000:. 400...|
00000470: 80 02 8B 20 5A 24 B2 22  45 4E 44 22 20 A7 20 39  |... Z$."END" . 9|
00000480: 39 39 39 00 28 0C 8A 02  8D 20 35 30 30 30 3A 8F  |999.(.... 5000:.|
00000490: 20 4C 4F 41 44 20 46 49  4C 45 20 44 41 54 41 00  | LOAD FILE DATA.|
000004A0: 34 0C 94 02 99 3A 89 20  35 30 30 00 3A 0C D0 07  |4....:. 500.:...|
000004B0: 8F 00 63 0C DA 07 99 3A  53 50 B2 31 30 3A 4E 46  |..c....:SP.10:NF|
000004C0: B2 4E 46 AB 31 3A 8F 20  49 4E 49 54 49 41 4C 20  |.NF.1:. INITIAL |
000004D0: 50 41 52 41 4D 45 54 45  52 53 00 98 0C 02 08 8D  |PARAMETERS......|
000004E0: 31 33 30 30 30 3A 99 20  22 93 99 22 A6 31 33 29  |13000:. "..".13)|
000004F0: 22 12 53 50 52 49 54 45  20 41 4E 49 4D 41 54 4F  |".SPRITE ANIMATO|
00000500: 52 22 3B A3 33 35 29 3B  22 12 50 45 4E 05 22 00  |R";.35);".PEN.".|
00000510: B2 0C 0C 08 99 20 22 11  11 22 3B A3 33 34 29 3B  |..... "..";.34);|
00000520: 22 12 46 41 53 54 45 52  22 00 C7 0C 0E 08 99 20  |".FASTER"...... |
00000530: A3 33 34 29 3B 22 12 53  4C 4F 57 45 52 22 00 DC  |.34);".SLOWER"..|
00000540: 0C 10 08 99 20 A3 33 34  29 3B 22 12 44 49 52 45  |.... .34);".DIRE|
00000550: 43 54 22 00 F1 0C 12 08  99 20 A3 33 34 29 3B 22  |CT"...... .34);"|
00000560: 12 53 43 41 4C 45 20 22  00 0A 0D 14 08 99 20 A3  |.SCALE "...... .|
00000570: 33 34 29 3B 22 12 4E 55  4D 42 45 52 22 3A 99 3A  |34);".NUMBER":.:|
00000580: 99 00 1F 0D 16 08 99 20  A3 33 34 29 3B 22 12 4E  |....... .34);".N|
00000590: 45 57 53 45 51 22 00 34  0D 18 08 99 20 A3 33 34  |EWSEQ".4.... .34|
000005A0: 29 3B 22 12 2A 45 4E 44  2A 20 22 00 53 0D 19 08  |);".*END* ".S...|
000005B0: 99 20 A3 33 30 29 3B 22  99 11 11 11 11 11 12 46  |. .30);".......F|
000005C0: 36 3A 45 44 49 54 05 92  22 3B 00 7F 0D 34 08 81  |6:EDIT..";...4..|
000005D0: 20 49 B2 56 AA 33 39 20  A4 20 56 AA 34 36 3A 97  | I.V.39 . V.46:.|
000005E0: 20 49 2C 31 3A 82 3A 8F  20 57 48 49 54 45 20 53  | I,1:.:. WHITE S|
000005F0: 50 52 49 54 45 53 00 BD  0D 98 08 81 20 49 B2 30  |PRITES...... I.0|
00000600: 20 A4 20 31 31 3A 97 20  56 AA 49 2C 41 25 28 49  | . 11:. V.I,A%(I|
00000610: AA 31 29 3A 82 3A 8F 20  53 45 54 20 58 2C 59 20  |.1):.:. SET X,Y |
00000620: 50 4F 53 49 54 49 4F 4E  53 20 28 45 58 50 41 4E  |POSITIONS (EXPAN|
00000630: 44 45 44 29 00 D4 0D FC  08 97 20 56 AA 31 36 2C  |DED)...... V.16,|
00000640: 30 3A 8F 20 58 20 4D 53  42 20 30 00 0B 0E 60 09  |0:. X MSB 0...`.|
00000650: 81 20 49 B2 30 20 A4 20  35 3A 97 20 32 30 34 30  |. I.0 . 5:. 2040|
00000660: AA 49 2C 50 3A 82 3A 8F  20 53 45 54 20 50 4F 49  |.I,P:.:. SET POI|
00000670: 4E 54 53 20 54 4F 20 46  49 52 53 54 20 42 4C 4F  |NTS TO FIRST BLO|
00000680: 43 4B 00 2B 0E C4 09 97  20 56 AA 32 31 2C 31 36  |CK.+.... V.21,16|
00000690: 3A 8F 20 45 4E 41 42 4C  45 20 53 50 52 49 54 45  |:. ENABLE SPRITE|
000006A0: 20 34 00 70 0E CE 09 99  22 13 11 11 11 11 11 11  | 4.p....".......|
000006B0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000006C0: 12 99 53 50 45 45 44 3D  20 20 20 9D 9D 9D 22 3B  |..SPEED=   ...";|
000006D0: 53 50 3B A3 31 36 29 3B  22 46 4F 52 57 41 52 44  |SP;.16);"FORWARD|
000006E0: 22 3B A3 33 30 29 3B 00  80 0E D8 09 99 20 22 45  |";.30);...... "E|
000006F0: 58 50 41 4E 44 05 22 00  AE 0E E2 09 46 41 B2 30  |XPAND.".....FA.0|
00000700: 3A 46 42 B2 4E 46 3A 46  44 B2 31 3A 8F 20 49 4E  |:FB.NF:FD.1:. IN|
00000710: 49 54 49 41 4C 20 4C 4F  4F 50 20 50 41 52 41 4D  |ITIAL LOOP PARAM|
00000720: 45 54 45 52 53 00 C3 0E  28 0A 81 20 4A B2 46 41  |ETERS...(.. J.FA|
00000730: 20 A4 20 46 42 20 A9 20  46 44 00 D0 0E 5A 0A 4A  | . FB . FD...Z.J|
00000740: 31 B2 4A AA 31 36 30 00  EF 0E 5F 0A 97 20 34 39  |1.J.160..._.. 49|
00000750: 34 37 38 2C 4A 31 3A 8F  20 53 45 54 55 50 20 50  |478,J1:. SETUP P|
00000760: 4F 49 4E 54 45 52 00 12  0F 64 0A 9E 20 34 39 34  |OINTER...d.. 494|
00000770: 34 34 3A 8F 20 4D 4F 56  45 20 53 50 52 49 54 45  |44:. MOVE SPRITE|
00000780: 20 50 4F 49 4E 54 45 52  53 00 21 0F F0 0A 81 20  | POINTERS.!.... |
00000790: 4B B2 31 20 A4 20 53 50  00 39 0F FA 0A A1 20 41  |K.1 . SP.9.... A|
000007A0: 24 3A 8B 20 41 24 B2 22  22 20 A7 20 32 39 34 30  |$:. A$."" . 2940|
000007B0: 00 54 0F FF 0A 8B 20 28  C2 28 35 36 33 32 31 29  |.T.... (.(56321)|
000007C0: 20 AF 20 34 29 A7 20 32  38 32 30 00 5F 0F 00 0B  | . 4). 2820._...|
000007D0: 89 20 36 30 30 30 00 6C  0F 04 0B 41 56 B2 C6 28  |. 6000.l...AV..(|
000007E0: 41 24 29 00 9F 0F 09 0B  8B 20 41 56 B2 31 33 35  |A$)...... AV.135|
000007F0: 20 A7 20 46 43 B2 46 41  3A 46 41 B2 46 42 3A 46  | . FC.FA:FA.FB:F|
00000800: 42 B2 46 43 3A 46 45 B2  31 3A 46 44 B2 AB 46 44  |B.FC:FE.1:FD..FD|
00000810: 3A 89 32 38 39 30 00 CD  0F 0E 0B 8B 20 41 56 B2  |:.2890...... AV.|
00000820: 31 33 33 20 A7 20 53 50  B2 53 50 AB 31 3A 8B 20  |133 . SP.SP.1:. |
00000830: 53 50 B3 30 A7 53 50 B2  30 3A 8F 20 53 50 45 45  |SP.0.SP.0:. SPEE|
00000840: 44 20 55 50 00 FE 0F 18  0B 8B 20 41 56 B2 31 33  |D UP...... AV.13|
00000850: 37 20 A7 20 53 50 B2 53  50 AA 31 3A 8B 20 53 50  |7 . SP.SP.1:. SP|
00000860: B1 34 30 A7 53 50 B2 34  30 3A 8F 20 53 4C 4F 57  |.40.SP.40:. SLOW|
00000870: 20 44 4F 57 4E 00 16 10  22 0B 8B 20 41 56 B2 31  | DOWN...".. AV.1|
00000880: 33 34 20 AF 20 4D 20 A7  20 33 32 30 30 00 30 10  |34 . M . 3200.0.|
00000890: 2C 0B 8B 20 41 56 B2 31  33 34 20 AF 20 A8 20 4D  |,.. AV.134 . . M|
000008A0: 20 A7 20 33 34 30 30 00  4D 10 31 0B 8B 20 41 56  | . 3400.M.1.. AV|
000008B0: B2 31 33 39 20 A7 20 31  31 30 30 30 3A 8F 20 43  |.139 . 11000:. C|
000008C0: 48 41 49 4E 00 67 10 36  0B 8B 20 41 56 B2 31 34  |HAIN.g.6.. AV.14|
000008D0: 30 20 A7 20 39 39 39 39  3A 8F 20 45 4E 44 00 94  |0 . 9999:. END..|
000008E0: 10 3B 0B 8B 20 41 56 B2  31 33 36 20 AF 20 4E 54  |.;.. AV.136 . NT|
000008F0: 20 A7 20 97 20 56 AA 32  31 2C 31 36 3A 4E 54 B2  | . . V.21,16:NT.|
00000900: A8 20 4E 54 3A 89 20 32  38 39 30 00 BC 10 3E 0B  |. NT:. 2890...>.|
00000910: 8B 20 41 56 B2 31 33 36  20 AF 20 A8 20 4E 54 20  |. AV.136 . . NT |
00000920: A7 20 97 20 56 AA 32 31  2C 36 33 3A 4E 54 B2 A8  |. . V.21,63:NT..|
00000930: 20 4E 54 00 F2 10 4A 0B  99 22 13 11 11 11 11 11  | NT...J.."......|
00000940: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000950: 11 12 99 53 50 45 45 44  3D 20 20 20 9D 9D 9D 22  |...SPEED=   ..."|
00000960: 3B 53 50 3B A3 31 36 29  3B 00 13 11 4E 0B 8B 20  |;SP;.16);...N.. |
00000970: 46 44 B2 31 20 A7 20 99  20 22 46 4F 52 57 41 52  |FD.1 . . "FORWAR|
00000980: 44 22 3B 3A 89 20 32 38  39 38 00 24 11 50 0B 99  |D";:. 2898.$.P..|
00000990: 20 22 52 45 56 45 52 53  45 22 3B 00 30 11 52 0B  | "REVERSE";.0.R.|
000009A0: 99 20 A3 33 30 29 3B 00  4E 11 54 0B 8B 20 4D 20  |. .30);.N.T.. M |
000009B0: A7 20 99 20 22 4E 4F 52  4D 41 4C 92 05 22 3A 89  |. . "NORMAL..":.|
000009C0: 20 32 39 34 30 00 5F 11  68 0B 99 20 22 45 58 50  | 2940._.h.. "EXP|
000009D0: 41 4E 44 92 05 22 00 67  11 7C 0B 82 20 4B 00 7E  |AND..".g.|.. K.~|
000009E0: 11 86 0B 8B 20 46 45 20  A7 20 46 45 B2 30 3A 89  |.... FE . FE.0:.|
000009F0: 20 32 36 30 30 00 86 11  90 0B 82 20 4A 00 91 11  | 2600...... J...|
00000A00: B8 0B 89 20 32 36 30 30  00 A6 11 80 0C 8F 20 45  |... 2600...... E|
00000A10: 58 50 41 4E 44 20 53 50  52 49 54 45 53 00 BE 11  |XPAND SPRITES...|
00000A20: 8A 0C 97 20 56 AA 32 33  2C 36 33 3A 97 20 56 AA  |... V.23,63:. V.|
00000A30: 32 39 2C 36 33 00 D5 11  94 0C 8F 20 4C 4F 41 44  |29,63...... LOAD|
00000A40: 20 43 4F 4F 52 44 49 4E  41 54 45 53 00 F4 11 9E  | COORDINATES....|
00000A50: 0C 81 20 49 B2 30 20 A4  20 31 31 3A 97 20 56 AA  |.. I.0 . 11:. V.|
00000A60: 49 2C 41 25 28 49 AA 31  29 3A 82 00 FE 11 A8 0C  |I,A%(I.1):......|
00000A70: 4D B2 A8 20 4D 00 09 12  BC 0C 89 20 32 38 39 30  |M.. M...... 2890|
00000A80: 00 1E 12 48 0D 8F 20 53  48 52 49 4E 4B 20 53 50  |...H.. SHRINK SP|
00000A90: 52 49 54 45 53 00 34 12  52 0D 97 20 56 AA 32 33  |RITES.4.R.. V.23|
00000AA0: 2C 30 3A 97 20 56 AA 32  39 2C 30 00 4B 12 5C 0D  |,0:. V.29,0.K.\.|
00000AB0: 8F 20 4C 4F 41 44 20 43  4F 4F 52 44 49 4E 41 54  |. LOAD COORDINAT|
00000AC0: 45 53 00 6A 12 66 0D 81  20 49 B2 30 20 A4 20 31  |ES.j.f.. I.0 . 1|
00000AD0: 31 3A 97 20 56 AA 49 2C  42 25 28 49 AA 31 29 3A  |1:. V.I,B%(I.1):|
00000AE0: 82 00 74 12 70 0D 4D B2  A8 20 4D 00 7F 12 84 0D  |..t.p.M.. M.....|
00000AF0: 89 20 32 38 39 30 00 96  12 A0 0F 8F 20 46 49 4C  |. 2890...... FIL|
00000B00: 45 20 41 55 54 4F 20 4C  4F 41 44 45 52 00 C5 12  |E AUTO LOADER...|
00000B10: 04 10 8D 31 33 30 30 30  3A 46 24 B2 22 22 3A 99  |...13000:F$."":.|
00000B20: 22 93 11 20 45 4E 54 45  52 20 12 42 41 53 45 20  |".. ENTER .BASE |
00000B30: 46 49 4C 45 20 4E 41 4D  45 92 3A 22 00 ED 12 05  |FILE NAME.:"....|
00000B40: 10 99 20 22 11 20 3C 52  45 54 55 52 4E 3E 20 41  |.. ". <RETURN> A|
00000B50: 4C 4F 4E 45 20 46 4F 52  20 4C 41 53 54 20 46 52  |LONE FOR LAST FR|
00000B60: 41 4D 45 22 00 16 13 06  10 99 22 20 20 27 24 27  |AME"......"  '$'|
00000B70: 20 20 54 4F 20 4C 49 53  54 20 54 48 45 20 44 49  |  TO LIST THE DI|
00000B80: 53 4B 20 44 49 52 45 43  54 4F 52 59 22 00 3F 13  |SK DIRECTORY".?.|
00000B90: 07 10 99 22 20 27 45 4E  44 27 20 54 4F 20 45 58  |..." 'END' TO EX|
00000BA0: 49 54 20 54 4F 20 54 48  45 20 53 59 53 54 45 4D  |IT TO THE SYSTEM|
00000BB0: 20 4D 45 4E 55 22 00 57  13 08 10 85 20 22 11 59  | MENU".W.... ".Y|
00000BC0: 4F 55 52 20 45 4E 54 52  59 3A 22 3B 46 24 00 74  |OUR ENTRY:";F$.t|
00000BD0: 13 0E 10 8B 20 46 24 B2  22 45 4E 44 22 20 A7 20  |.... F$."END" . |
00000BE0: 39 39 39 39 3A 8F 20 45  58 49 54 00 93 13 10 10  |9999:. EXIT.....|
00000BF0: 8B 20 46 24 B2 22 24 22  20 A7 20 8D 20 31 32 30  |. F$."$" . . 120|
00000C00: 30 30 3A 99 3A 89 34 30  30 30 00 A6 13 13 10 8B  |00:.:.4000......|
00000C10: 20 46 24 B2 22 22 20 A7  20 32 30 30 30 00 C1 13  | F$."" . 2000...|
00000C20: 18 10 99 3A 85 22 20 45  4E 54 45 52 20 53 54 41  |...:." ENTER STA|
00000C30: 52 54 20 23 22 3B 46 53  00 DC 13 2C 10 85 22 20  |RT #";FS...,.." |
00000C40: 45 4E 54 45 52 20 45 4E  44 20 20 20 23 22 3B 46  |ENTER END   #";F|
00000C50: 45 3A 99 00 F5 13 36 10  4C 53 B2 31 3A 8F 20 46  |E:....6.LS.1:. F|
00000C60: 49 4C 45 20 53 45 51 20  53 54 45 50 00 09 14 40  |ILE SEQ STEP...@|
00000C70: 10 8B 20 46 45 B3 46 53  20 A7 20 4C 53 B2 AB 31  |.. FE.FS . LS..1|
00000C80: 00 28 14 54 10 56 46 B2  30 3A 8F 20 46 4C 41 47  |.(.T.VF.0:. FLAG|
00000C90: 20 46 4F 52 20 56 41 4C  49 44 20 4C 4F 41 44 00  | FOR VALID LOAD.|
00000CA0: 51 14 68 10 81 20 4C B2  46 53 20 A4 20 46 45 20  |Q.h.. L.FS . FE |
00000CB0: A9 20 4C 53 3A 8F 20 46  49 4C 45 20 4C 4F 41 44  |. LS:. FILE LOAD|
00000CC0: 49 4E 47 20 4C 4F 4F 50  00 6A 14 72 10 54 24 B2  |ING LOOP.j.r.T$.|
00000CD0: C9 28 C4 28 4C 29 2C C3  28 C4 28 4C 29 29 AB 31  |.(.(L),.(.(L)).1|
00000CE0: 29 00 8A 14 7C 10 5A 24  B2 46 24 AA 54 24 3A 8F  |)...|.Z$.F$.T$:.|
00000CF0: 20 43 52 45 41 54 45 20  46 49 4C 45 20 4E 41 4D  | CREATE FILE NAM|
00000D00: 45 00 9F 14 90 10 99 20  22 20 4C 4F 41 44 49 4E  |E...... " LOADIN|
00000D10: 47 20 22 3B 5A 24 00 AA  14 A4 10 8D 20 35 30 30  |G ";Z$...... 500|
00000D20: 30 00 BB 14 AE 10 8B 20  46 B2 30 20 A7 20 56 46  |0...... F.0 . VF|
00000D30: B2 31 00 C3 14 B8 10 82  20 4C 00 F8 14 C2 10 8B  |.1...... L......|
00000D40: 20 56 46 B2 30 20 A7 20  8D 31 33 30 30 30 3A 99  | VF.0 . .13000:.|
00000D50: 3A 99 22 2A 2A 2A 20 4E  4F 20 46 49 4C 45 53 20  |:."*** NO FILES |
00000D60: 4C 4F 41 44 45 44 11 22  3A 89 20 34 31 30 30 00  |LOADED.":. 4100.|
00000D70: 05 15 CC 10 99 3A 89 20  34 31 30 30 00 1D 15 88  |.....:. 4100....|
00000D80: 13 8F 20 46 49 4C 45 20  4C 4F 41 44 20 52 4F 55  |.. FILE LOAD ROU|
00000D90: 54 49 4E 45 00 38 15 9C  13 9F 20 32 2C 38 2C 32  |TINE.8.... 2,8,2|
00000DA0: 2C 22 30 3A 22 AA 5A 24  AA 22 2C 53 2C 52 22 00  |,"0:".Z$.",S,R".|
00000DB0: 43 15 B0 13 8D 20 39 30  30 30 00 55 15 C4 13 8B  |C.... 9000.U....|
00000DC0: 20 46 B2 31 20 A7 20 A0  20 32 3A 8E 00 64 15 D8  | F.1 . . 2:..d..|
00000DD0: 13 81 20 4A B2 30 20 A4  20 36 33 00 7A 15 EC 13  |.. J.0 . 63.z...|
00000DE0: 84 32 2C 4B 3A 8F 20 47  45 54 20 41 20 42 59 54  |.2,K:. GET A BYT|
00000DF0: 45 00 9D 15 00 14 97 20  53 42 AA 4E 46 AC 36 34  |E...... SB.NF.64|
00000E00: AA 4A 2C 4B 3A 8F 20 4C  4F 41 44 20 55 50 20 54  |.J,K:. LOAD UP T|
00000E10: 41 42 4C 45 00 A5 15 14  14 82 20 4A 00 AD 15 28  |ABLE...... J...(|
00000E20: 14 A0 20 32 00 BB 15 3C  14 4E 46 B2 4E 46 AA 31  |.. 2...<.NF.NF.1|
00000E30: 3A 8E 00 D7 15 70 17 8F  20 4C 49 47 48 54 20 50  |:....p.. LIGHT P|
00000E40: 45 4E 20 4D 45 4E 55 20  44 52 49 56 45 52 00 FB  |EN MENU DRIVER..|
00000E50: 15 84 17 58 25 B2 C2 28  35 33 32 36 37 29 AD 34  |...X%..(53267).4|
00000E60: AB 35 3A 59 25 B2 C2 28  35 33 32 36 38 29 AD 38  |.5:Y%..(53268).8|
00000E70: AB 36 00 0E 16 8E 17 8B  20 58 25 B3 33 32 20 A7  |.6...... X%.32 .|
00000E80: 20 32 38 39 30 00 1A 16  98 17 59 25 B2 59 25 AB  | 2890.....Y%.Y%.|
00000E90: 31 00 34 16 A2 17 8B 20  59 25 B3 32 20 B0 20 59  |1.4.... Y%.2 . Y|
00000EA0: 25 B1 32 31 20 A7 20 32  38 39 30 00 4F 16 A7 17  |%.21 . 2890.O...|
00000EB0: 8B 20 B5 28 59 25 AD 32  29 B3 B1 59 25 AD 32 20  |. .(Y%.2)..Y%.2 |
00000EC0: A7 20 32 38 39 30 00 76  16 A9 17 97 20 53 44 AA  |. 2890.v.... SD.|
00000ED0: 31 2C 32 30 AA 35 AC 28  59 25 AD 32 29 3A 8D 31  |1,20.5.(Y%.2):.1|
00000EE0: 33 30 30 30 3A 97 53 44  AA 31 2C 35 30 00 AB 16  |3000:.SD.1,50...|
00000EF0: AC 17 91 20 59 25 AD 32  20 89 20 36 31 30 30 2C  |... Y%.2 . 6100,|
00000F00: 36 31 32 30 2C 36 31 33  30 2C 36 31 34 30 2C 36  |6120,6130,6140,6|
00000F10: 31 35 30 2C 36 31 38 30  2C 36 31 36 30 2C 36 31  |150,6180,6160,61|
00000F20: 37 30 00 BA 16 D4 17 8F  20 53 50 45 45 44 20 55  |70...... SPEED U|
00000F30: 50 00 CC 16 D6 17 41 56  B2 31 33 33 3A 89 20 32  |P.....AV.133:. 2|
00000F40: 38 33 30 00 DC 16 E8 17  8F 20 53 4C 4F 57 20 44  |830...... SLOW D|
00000F50: 4F 57 4E 00 EE 16 EA 17  41 56 B2 31 33 37 3A 89  |OWN.....AV.137:.|
00000F60: 20 32 38 34 30 00 03 17  F2 17 8F 20 52 45 56 45  | 2840...... REVE|
00000F70: 52 53 45 20 54 4F 47 47  4C 45 00 0E 17 F4 17 8D  |RSE TOGGLE......|
00000F80: 20 36 33 30 30 00 20 17  F6 17 41 56 B2 31 33 35  | 6300. ...AV.135|
00000F90: 3A 89 20 32 38 32 35 00  32 17 FC 17 8F 20 53 49  |:. 2825.2.... SI|
00000FA0: 5A 45 20 54 4F 47 47 4C  45 00 3D 17 FE 17 8D 20  |ZE TOGGLE.=.... |
00000FB0: 36 33 30 30 00 4F 17 00  18 41 56 B2 31 33 34 3A  |6300.O...AV.134:|
00000FC0: 89 20 32 38 35 30 00 63  17 06 18 8F 20 4E 55 4D  |. 2850.c.... NUM|
00000FD0: 42 45 52 20 54 4F 47 47  4C 45 00 6E 17 08 18 8D  |BER TOGGLE.n....|
00000FE0: 20 36 33 30 30 00 80 17  0A 18 41 56 B2 31 33 36  | 6300.....AV.136|
00000FF0: 3A 89 20 32 38 37 35 00  8E 17 10 18 8F 20 52 45  |:. 2875...... RE|
00001000: 53 54 41 52 54 00 99 17  12 18 8D 20 36 33 30 30  |START...... 6300|
00001010: 00 A3 17 14 18 89 20 31  30 30 00 AD 17 1A 18 8F  |...... 100......|
00001020: 20 45 4E 44 00 B8 17 1C  18 8D 20 36 33 30 30 00  | END...... 6300.|
00001030: C3 17 1E 18 89 20 39 39  39 39 00 CE 17 24 18 89  |..... 9999...$..|
00001040: 20 32 38 39 30 00 E9 17  9C 18 8F 20 57 41 49 54  | 2890...... WAIT|
00001050: 20 46 4F 52 20 50 45 4E  20 52 45 4C 45 41 53 45  | FOR PEN RELEASE|
00001060: 00 04 18 A6 18 8B 20 28  C2 28 35 36 33 32 31 29  |...... (.(56321)|
00001070: AF 34 29 A7 20 A1 20 41  24 3A 8E 00 0F 18 B0 18  |.4). . A$:......|
00001080: 89 20 36 33 31 30 00 29  18 28 23 8F 20 46 49 4C  |. 6310.).(#. FIL|
00001090: 45 20 53 54 41 54 55 53  20 43 48 45 43 4B 45 52  |E STATUS CHECKER|
000010A0: 00 44 18 2D 23 8F 20 4F  4E 20 45 58 49 54 20 46  |.D.-#. ON EXIT F|
000010B0: 3D 31 20 49 46 20 45 52  52 4F 52 00 4C 18 32 23  |=1 IF ERROR.L.2#|
000010C0: 46 B2 30 00 60 18 3C 23  84 31 35 2C 41 24 2C 42  |F.0.`.<#.15,A$,B|
000010D0: 24 2C 43 24 2C 44 24 00  82 18 50 23 8B 20 C5 28  |$,C$,D$...P#. .(|
000010E0: 41 24 29 B1 30 20 A7 20  99 3A 99 22 2A 2A 2A 20  |A$).0 . .:."*** |
000010F0: 22 42 24 3A 99 3A 46 B2  31 00 88 18 64 23 8E 00  |"B$:.:F.1...d#..|
00001100: 9A 18 0F 27 97 20 56 AA  32 31 2C 30 3A A0 20 31  |...'. V.21,0:. 1|
00001110: 35 00 C1 18 10 27 99 22  93 11 20 12 50 4C 45 41  |5....'.".. .PLEA|
00001120: 53 45 20 56 45 52 49 46  59 20 51 55 49 54 20 43  |SE VERIFY QUIT C|
00001130: 4F 4D 4D 41 4E 44 3A 22  00 F1 18 1A 27 85 20 22  |OMMAND:"....'. "|
00001140: 11 20 44 4F 20 59 4F 55  20 57 41 4E 54 20 54 4F  |. DO YOU WANT TO|
00001150: 20 4C 45 41 56 45 20 54  48 49 53 20 50 52 4F 47  | LEAVE THIS PROG|
00001160: 52 41 4D 3A 22 3B 41 24  00 16 19 24 27 8B 20 C8  |RAM:";A$...$'. .|
00001170: 28 41 24 2C 31 29 B3 B1  22 59 22 20 A7 20 9F 20  |(A$,1).."Y" . . |
00001180: 31 35 2C 38 2C 31 35 3A  89 20 31 30 30 00 3D 19  |15,8,15:. 100.=.|
00001190: 2E 27 99 20 22 11 20 49  4E 53 45 52 54 20 46 4C  |.'. ". INSERT FL|
000011A0: 45 58 49 44 52 41 57 20  4D 41 53 54 45 52 20 44  |EXIDRAW MASTER D|
000011B0: 49 53 4B 22 00 5D 19 38  27 85 20 22 20 41 4E 44  |ISK".].8'. " AND|
000011C0: 20 50 52 45 53 53 20 12  52 45 54 55 52 4E 92 3A  | PRESS .RETURN.:|
000011D0: 22 3B 41 24 00 69 19 42  27 9E 20 35 32 39 39 32  |";A$.i.B'. 52992|
000011E0: 00 75 19 F8 2A 8F 20 43  48 41 49 4E 00 8A 19 FD  |.u..*. CHAIN....|
000011F0: 2A 97 20 56 AA 32 31 2C  30 3A 8D 20 31 33 30 30  |*. V.21,0:. 1300|
00001200: 30 00 B2 19 02 2B 99 20  22 93 11 20 43 48 41 49  |0....+. ".. CHAI|
00001210: 4E 49 4E 47 20 54 4F 20  53 50 52 49 54 45 20 45  |NING TO SPRITE E|
00001220: 44 49 54 4F 52 2E 2E 2E  22 00 F4 19 0C 2B 99 20  |DITOR..."....+. |
00001230: 22 11 20 49 4E 53 45 52  54 20 46 4C 45 58 49 44  |". INSERT FLEXID|
00001240: 52 41 57 20 4D 41 53 54  45 52 20 44 49 53 4B 22  |RAW MASTER DISK"|
00001250: 3A 99 20 22 20 41 4E 44  20 50 52 45 53 53 20 3C  |:. " AND PRESS <|
00001260: 12 52 45 54 55 52 4E 92  3E 22 3B 00 13 1A 16 2B  |.RETURN.>";....+|
00001270: 85 20 41 24 3A 9C 3A 93  20 22 53 50 52 49 54 45  |. A$:.:. "SPRITE|
00001280: 20 45 44 49 54 4F 52 22  2C 38 00 23 1A E0 2E 8F  | EDITOR",8.#....|
00001290: 20 44 49 52 45 43 54 4F  52 59 00 53 1A EA 2E 99  | DIRECTORY.S....|
000012A0: 3A 9E 20 35 32 34 38 30  3A 99 3A 99 22 20 20 20  |:. 52480:.:."   |
000012B0: 20 12 48 49 54 20 41 4E  59 20 4B 45 59 20 57 48  | .HIT ANY KEY WH|
000012C0: 45 4E 20 52 45 41 44 59  92 22 00 74 1A F4 2E 97  |EN READY.".t....|
000012D0: 20 31 39 38 2C 30 3A 92  31 39 38 2C 31 3A 97 31  | 198,0:.198,1:.1|
000012E0: 39 38 2C 30 3A 99 22 93  22 3A 8E 00 7E 1A C8 32  |98,0:.".":..~..2|
000012F0: 8F 20 53 49 44 00 B2 1A  D2 32 97 53 44 AA 34 2C  |. SID....2.SD.4,|
00001300: 31 37 3A 81 49 B2 31 A4  33 30 3A 82 3A 97 53 44  |17:.I.1.30:.:.SD|
00001310: AA 34 2C 31 36 3A 81 49  B2 31 A4 34 30 3A 82 3A  |.4,16:.I.1.40:.:|
00001320: 97 53 44 AA 34 2C 34 3A  8E 00 ED 1A 60 EA 9F 20  |.SD.4,4:....`.. |
00001330: 31 2C 38 2C 31 35 2C 22  53 30 3A 53 50 52 49 54  |1,8,15,"S0:SPRIT|
00001340: 45 20 41 4E 49 4D 41 54  4F 52 22 3A A0 31 3A 94  |E ANIMATOR":.1:.|
00001350: 20 22 53 50 52 49 54 45  20 41 4E 49 4D 41 54 4F  | "SPRITE ANIMATO|
00001360: 52 22 2C 38 00 00 00 B2  31 31 20 A7 20 99 20 22  |R",8....11 . . "|
00001370: 20 20 BA 20 20 20 20 20  20 CC 22 3B 00 0C 0C FE  |  .      .";....|
00001380: 03 8B 20 49 B2 31 38 20  A7 20 99 20 22 20 20 D0  |.. I.18 . . "  .|
00001390: 20 20 20 20 20 20 CF 22  3B 00 29 0C FF 03 8B 20  |      .";.).... |
000013A0: 49 B2 32 30 20 A7 20 99  20 22 20 20 45 58 50 41  |I.20 . . "  EXPA|
000013B0: 4E 44 45 44 22 3B 00 33  0C 01 04 99 3A 82 20 49  |NDED";.3....:. I|
000013C0: 00 55 0C 03 04 99 20 22  20 DD DD DD DD DD DD DD  |.U.... " .......|
000013D0: DD DD DD DD DD DD DD DD  DD DD DD DD DD DD DD DD  |................|
000013E0: DD 22 00 84 0C 06 04 97  20 32 30 34 30 2C 31 33  |."...... 2040,13|
000013F0: 3A 97 20 32 30 34 31 2C  31 33 3A 8F 20 53 45 54  |:. 2041,13:. SET|
00001400: 55 50 53 50 52 49 54 45  20 50 4F 49 4E 54 45 52  |UPSPRITE POINTER|
00001410: 53 00 AF 0C 0B 04 81 20  49 B2 30 20 A4 20 36 32  |S...... I.0 . 62|
00001420: 3A 97 20 38 33 32 AA 49  2C 30 3A 82 3A 8F 20 43  |:. 832.I,0:.:. C|
00001430: 4C 45 41 52 20 53 50 52  49 54 45 53 00 C6 0C 10  |LEAR SPRITES....|
00001440: 04 56 B2 35 33 32 34 38  3A 8F 20 56 49 43 20 42  |.V.53248:. VIC B|
00001450: 41 53 45 00 E8 0C 15 04  97 20 56 AA 32 31 2C 33  |ASE...... V.21,3|
00001460: 3A 8F 20 45 4E 41 42 4C  45 20 53 50 52 49 54 45  |:. ENABLE SPRITE|
00001470: 53 20 30 2C 31 00 12 0D  1A 04 97 20 56 AA 33 39  |S 0,1...... V.39|
00001480: 2C 30 3A 97 20 56 AA 34  30 2C 30 3A 8F 20 53 45  |,0:. V.40,0:. SE|
00001490: 54 20 53 50 52 49 54 45  20 43 4F 4C 4F 52 53 00  |T SPRITE COLORS.|
000014A0: 30 0D 1F 04 97 20 56 AA  31 2C 39 32 3A 8F 20 53  |0.... V.1,92:. S|
000014B0: 50 52 49 54 45 20 31 20  59 20 50 4F 53 00 55 0D  |PRITE 1 Y POS.U.|
000014C0: 24 04 97 20 56 AA 31 36  2C 33 3A 97 20 56 2C 31  |$.. V.16,3:. V,1|
000014D0: 32 3A 8F 20 53 50 52 49  54 45 20 31 20 58 20 50  |2:. SPRITE 1 X P|
000014E0: 4F 53 00 7E 0D 26 04 97  20 56 AA 32 2C 30 3A 97  |OS.~.&.. V.2,0:.|
000014F0: 20 56 AA 33 2C 31 35 37  3A 8F 20 53 50 52 49 54  | V.3,157:. SPRIT|
00001500: 45 20 32 20 58 2C 59 20  50 4F 53 00 A6 0D 28 04  |E 2 X,Y POS...(.|
00001510: 97 20 56 AA 32 33 2C 32  3A 97 20 56 AA 32 39 2C  |. V.23,2:. V.29,|
00001520: 32 3A 8F 20 45 58 50 41  4E 44 20 53 50 52 49 54  |2:. EXPAND SPRIT|
00001530: 45 20 31 00 AC 0D 2E 04  8E 00 C7 0D D0 07 8F 20  |E 1............ |
00001540: 4C 49 53 54 20 4F 55 54  20 53 50 52 49 54 45 20  |LIST OUT SPRITE |
00001550: 44 41 54 41 00 F3 0D D2  07 85 20 22 93 44 4F 20  |DATA...... ".DO |
00001560: 59 4F 55 20 57 41 4E 54  20 54 4F 20 50 52 49 4E  |YOU WANT TO PRIN|
00001570: 54 20 54 48 45 20 44 41  54 41 22 3B 41 24 3A 99  |T THE DATA";A$:.|
00001580: 00 30 0E D3 07 8B 20 41  24 B2 22 59 22 20 A7 20  |.0.... A$."Y" . |
00001590: 85 22 53 45 54 55 50 20  50 41 50 45 52 20 41 4E  |."SETUP PAPER AN|
000015A0: 44 20 48 49 54 20 52 45  54 55 52 4E 22 3B 41 24  |D HIT RETURN";A$|
000015B0: 3A 50 46 B2 31 3A 9F 34  2C 34 3A 9D 34 00 6A 0E  |:PF.1:.4,4:.4.j.|
000015C0: D4 07 8B 50 46 B2 31 20  A7 20 99 20 22 53 50 52  |...PF.1 . . "SPR|
000015D0: 49 54 45 20 44 41 54 41  3A 22 3B C7 28 31 36 29  |ITE DATA:";.(16)|
000015E0: 3B 22 34 36 53 50 52 49  54 45 20 49 4D 41 47 45  |;"46SPRITE IMAGE|
000015F0: 22 3A 89 32 30 31 30 00  82 0E D5 07 99 20 22 93  |":.2010...... ".|
00001600: 53 50 52 49 54 45 20 44  41 54 41 3A 22 3A 99 00  |SPRITE DATA:":..|
00001610: 98 0E DA 07 81 20 49 B2  38 33 32 20 A4 20 38 39  |..... I.832 . 89|
00001620: 34 20 A9 20 33 00 AA 0E  DC 07 8B 20 50 46 B2 31  |4 . 3...... PF.1|
00001630: 20 A7 20 32 30 34 30 00  CA 0E DF 07 99 20 22 52  | . 2040...... "R|
00001640: 4F 57 20 22 3B B5 28 28  49 AB 38 33 32 29 AD 33  |OW ";.((I.832).3|
00001650: 29 3B A3 31 30 29 3B 00  F4 0E EE 07 99 20 C2 28  |);.10);...... .(|
00001660: 49 29 3B A3 31 35 29 3B  C2 28 49 AA 31 29 3B A3  |I);.15);.(I.1);.|
00001670: 32 30 29 3B C2 28 49 AA  32 29 3A 89 20 32 30 36  |20);.(I.2):. 206|
00001680: 30 00 1A 0F F8 07 99 20  22 52 4F 57 20 22 3B B5  |0...... "ROW ";.|
00001690: 28 28 49 AB 38 33 32 29  AD 33 29 3B C7 28 31 36  |((I.832).3);.(16|
000016A0: 29 3B 22 31 30 22 3B 00  51 0F 02 08 99 20 C2 28  |);"10";.Q.... .(|
000016B0: 49 29 3B C7 28 31 36 29  3B 22 31 35 22 3B C2 28  |I);.(16);"15";.(|
000016C0: 49 AA 31 29 3B C7 28 31  36 29 3B 22 32 30 22 3B  |I.1);.(16);"20";|
000016D0: C2 28 49 AA 32 29 3B 3A  8D 20 33 35 30 30 00 5A  |.(I.2);:. 3500.Z|
000016E0: 0F 07 08 99 20 53 24 00  62 0F 0C 08 82 20 49 00  |.... S$.b.... I.|
000016F0: 68 0F 11 08 99 00 92 0F  14 08 8B 20 50 46 B2 31  |h.......... PF.1|
00001700: 20 A7 20 50 46 B2 30 3A  98 34 3A A0 20 34 3A 8F  | . PF.0:.4:. 4:.|
00001710: 20 54 55 52 4E 20 4F 46  46 20 50 52 49 4E 54 00  | TURN OFF PRINT.|
00001720: B1 0F 16 08 85 20 22 53  41 56 45 20 53 50 52 49  |..... "SAVE SPRI|
00001730: 54 45 20 54 4F 20 46 49  4C 45 22 3B 41 24 00 C5  |TE TO FILE";A$..|
00001740: 0F 20 08 8B 20 41 24 B2  22 59 22 20 A7 20 33 30  |. .. A$."Y" . 30|
00001750: 30 30 00 CD 0F 2A 08 89  20 31 00 E4 0F C4 09 8F  |00...*.. 1......|
00001760: 20 44 52 41 57 20 4D 4F  44 45 20 54 4F 47 47 4C  | DRAW MODE TOGGL|
00001770: 45 00 0B 10 CE 09 99 20  22 13 11 11 11 11 11 11  |E...... ".......|
00001780: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001790: 11 22 3B A6 32 37 29 3B  00 24 10 D8 09 8B 20 44  |.";.27);.$.... D|
000017A0: 4D 25 20 A7 20 44 4D 25  B2 30 3A 89 20 32 36 30  |M% . DM%.0:. 260|
000017B0: 30 00 2E 10 E2 09 44 4D  25 B2 31 00 47 10 EC 09  |0.....DM%.1.G...|
000017C0: 99 20 22 12 9C 4D 4F 44  45 3A 20 45 52 41 53 45  |. "..MODE: ERASE|
000017D0: 90 92 22 3B 00 50 10 F6  09 89 20 32 30 00 69 10  |..";.P.... 20.i.|
000017E0: 28 0A 99 20 22 12 9C 4D  4F 44 45 3A 20 44 52 41  |(.. "..MODE: DRA|
000017F0: 57 20 92 90 22 3B 00 72  10 32 0A 89 20 32 30 00  |W ..";.r.2.. 20.|
00001800: 97 10 B8 0B 8F 20 53 50  52 49 54 45 20 53 45 51  |..... SPRITE SEQ|
00001810: 55 45 4E 54 49 41 4C 20  46 49 4C 45 20 48 41 4E  |UENTIAL FILE HAN|
00001820: 44 4C 45 52 00 A1 10 C2  0B 99 20 22 93 22 00 BC  |DLER...... "."..|
00001830: 10 CC 0B 85 20 22 45 4E  54 45 52 20 46 49 4C 45  |.... "ENTER FILE|
00001840: 20 4E 41 4D 45 22 3B 41  24 00 DC 10 D6 0B 9F 20  | NAME";A$...... |
00001850: 32 2C 38 2C 32 2C 22 40  30 3A 22 AA 41 24 AA 22  |2,8,2,"@0:".A$."|
00001860: 2E 53 50 52 2C 53 2C 57  22 00 EE 10 F4 0B 81 20  |.SPR,S,W"...... |
00001870: 49 B2 38 33 32 20 A4 20  38 39 34 00 FA 10 FE 0B  |I.832 . 894.....|
00001880: 98 32 2C C2 28 49 29 00  02 11 08 0C 82 20 49 00  |.2,.(I)...... I.|
00001890: 15 11 0D 0C 98 32 2C 30  3A 8F 20 42 59 54 45 20  |.....2,0:. BYTE |
000018A0: 36 34 00 1D 11 12 0C A0  20 32 00 42 11 1C 0C 99  |64...... 2.B....|
000018B0: 3A 99 22 12 2A 2A 2A 20  53 50 52 49 54 45 20 44  |:.".*** SPRITE D|
000018C0: 41 54 41 20 53 41 56 45  44 20 2A 2A 2A 92 22 00  |ATA SAVED ***.".|
000018D0: 57 11 26 0C 81 20 49 B2  31 20 A4 20 31 30 30 30  |W.&.. I.1 . 1000|
000018E0: 3A 82 20 49 00 5F 11 30  0C 89 20 31 00 83 11 AC  |:. I._.0.. 1....|
000018F0: 0D 8F 20 50 52 49 4E 54  20 45 4E 4C 41 52 47 45  |.. PRINT ENLARGE|
00001900: 44 20 53 50 52 49 54 45  20 50 49 43 54 55 52 45  |D SPRITE PICTURE|
00001910: 00 AB 11 B1 0D 8F 20 4F  4E 20 45 4E 54 52 59 20  |...... ON ENTRY |
00001920: 49 3D 50 4F 49 4E 54 45  52 20 54 4F 20 53 50 52  |I=POINTER TO SPR|
00001930: 49 54 45 20 44 41 54 41  00 D0 11 B6 0D 53 24 B2  |ITE DATA.....S$.|
00001940: C7 28 31 36 29 AA 22 34  30 22 3A 8F 20 54 41 42  |.(16)."40":. TAB|
00001950: 20 54 4F 20 43 4F 4C 55  4D 4E 20 34 30 00 DE 11  | TO COLUMN 40...|
00001960: C0 0D 81 20 4A B2 30 20  A4 20 32 00 E8 11 CA 0D  |... J.0 . 2.....|
00001970: 4D B2 31 32 38 00 0F 12  D4 0D 8B 20 20 C2 28 49  |M.128......  .(I|
00001980: AA 4A 29 20 AF 20 4D 20  A7 20 53 24 B2 53 24 AA  |.J) . M . S$.S$.|
00001990: 22 12 20 92 22 3A 89 20  33 35 36 30 00 1D 12 DE  |". .":. 3560....|
000019A0: 0D 53 24 B2 53 24 AA 22  20 22 00 2A 12 E8 0D 4D  |.S$.S$." ".*...M|
000019B0: B2 B5 28 4D AD 32 29 00  3C 12 F2 0D 8B 20 4D B3  |..(M.2).<.... M.|
000019C0: B1 30 20 A7 20 33 35 34  30 00 44 12 FC 0D 82 20  |.0 . 3540.D.... |
000019D0: 4A 00 4A 12 24 0E 8E 00  00 00 FF 00              |J.J.$.......    |
.......2061... Y....?..P.L@..T...... ...
...H......7H....H.......I... ...........
P.....P.....M..P...M..P......Z...{`..Y!.
.$...Q1.B(829).191:.Q1.24..":*  ",8./...
.65418.L.... SINGLE SPRITE ANIMATOR.C...
. MICHAEL A. ESKIN.{.... DESIGN TECHNOLO
GY...(.. 22 AUG 1984.O.-.B.0:.X.49152.49
224.Q1:B.B.B(X):.X:.(B.5928).."SPRSUP.OB
J",8,1......830,F("S").../..".":. 53280,
5:. 53281,6:.G(142)...2.. 15,8,15.".4.. 
RF.1 . 60.6.7.. A%(12),B%(12).?.9.RF.1.X
.<.. I.1 . 12:. A%(I):..Q.A.. I.1 . 12:.
 B%(I):....B.SD.54272:.I.SD.SD.24:.I,0:.
:.SD.5,15:.SD.6,240:.SD.24,15...C..SD.1,
50.E.F.. 100...P.. 112,96,160,96,208,96,
112,138,160,138,208,138...Z.. 148,109,17
2,109,196,109,148,130,172,130,196,130.:.
D.V.53248.G.N.. V.21,0.A.X.. V.23,255:. 
V.29,255...H.."..".11)".SPRITE ANIMATOR.
":.13000...,.NF.0...6.SB.10240...@.P.160
...T..198,0:.". DO YOU WANT TO AUTO-LOAD
 FILES";A$:....^.. H(A$,1)."Y" . 4000...
....5....13000:Z$."":.".. ENTER .FRAME #
";NF.1;"FILE NAME.:".].X.. ". <RETURN> A
LONE FOR LAST FRAME"...Y.."  '$'  TO LIS
T THE DISK DIRECTORY...Z.." 'END' TO EXI
T TO THE SYSTEM MENU".F.\.. ".YOUR ENTRY
:";Z$.Y.V.. Z$."" . 2000...{.. Z$."$" . 
. 12000:. 400...... Z$."END" . 9999.(...
. 5000:. LOAD FILE DATA.4....:. 500.:.P.
..C.Z..:SP.10:NF.NF.1:. INITIAL PARAMETE
RS......13000:. "..".13)".SPRITE ANIMATO
R";.35);".PEN."...... "..";.34);".FASTER
".G.... .34);".SLOWER"...... .34);".DIRE
CT"...... .34);".SCALE "...... .34);".NU
MBER":.:....... .34);".NEWSEQ".4.... .34
);".*END* ".S.... .30);".......F6:EDIT..
";..4.. I.V.39 . V.46:. I,1:.:. WHITE S
PRITES...... I.0 . 11:. V.I,A%(I.1):.:. 
SET X,Y POSITIONS (EXPANDED).T.... V.16,
0:. X MSB 0...`.. I.0 . 5:. 2040.I,P:.:.
 SET POINTS TO FIRST BLOCK.+.D.. V.21,16
:. ENABLE SPRITE 4.P.N.."...............
..........SPEED=   ...";SP;.16);"FORWARD
";.30);...X.. "EXPAND.".....FA.0:FB.NF:F
D.1:. INITIAL LOOP PARAMETERS.C.(.. J.FA
 . FB . FD.P.Z.J1.J.160..._.. 49478,J1:.
 SETUP POINTER...D.. 49444:. MOVE SPRITE
 POINTERS.!.... K.1 . SP.9.... A$:. A$."
" . 2940.T.... (B(56321) . 4). 2820._...
. 6000.L...AV.F(A$)...... AV.135 . FC.FA
:FA.FB:FB.FC:FE.1:FD..FD:.2890.M.... AV.
133 . SP.SP.1:. SP.0.SP.0:. SPEED UP....
.. AV.137 . SP.SP.1:. SP.40.SP.40:. SLOW
 DOWN...".. AV.134 . M . 3200.0.,.. AV.1
34 . . M . 3400.M.1.. AV.139 . 11000:. C
HAIN.G.6.. AV.140 . 9999:. END...;.. AV.
136 . NT . . V.21,16:NT.. NT:. 2890...>.
. AV.136 . . NT . . V.21,63:NT.. NT...J.
.".........................SPEED=   ..."
;SP;.16);...N.. FD.1 . . "FORWARD";:. 28
98.$.P.. "REVERSE";.0.R.. .30);.N.T.. M 
. . "NORMAL..":. 2940._.H.. "EXPAND..".G
.|.. K.~.... FE . FE.0:. 2600...... J...
... 2600...... EXPAND SPRITES...... V.23
,63:. V.29,63.U.... LOAD COORDINATES....
.. I.0 . 11:. V.I,A%(I.1):......M.. M...
... 2890...H.. SHRINK SPRITES.4.R.. V.23
,0:. V.29,0.K.\.. LOAD COORDINATES.J.F..
 I.0 . 11:. V.I,B%(I.1):..T.P.M.. M....
. 2890... .. FILE AUTO LOADER.E....13000
:F$."":.".. ENTER .BASE FILE NAME.:"....
.. ". <RETURN> ALONE FOR LAST FRAME"....
.."  '$'  TO LIST THE DISK DIRECTORY".?.
..." 'END' TO EXIT TO THE SYSTEM MENU".W
.... ".YOUR ENTRY:";F$.T.... F$."END" . 
9999:. EXIT...... F$."$" . . 12000:.:.40
00...... F$."" . 2000.A....:." ENTER STA
RT #";FS...,.." ENTER END   #";FE:....6.
LS.1:. FILE SEQ STEP...@.. FE.FS . LS..1
.(.T.VF.0:. FLAG FOR VALID LOAD.Q.H.. L.
FS . FE . LS:. FILE LOADING LOOP.J.R.T$.
I(D(L),C(D(L)).1)...|.Z$.F$.T$:. CREATE 
FILE NAME...... " LOADING ";Z$...... 500
0...... F.0 . VF.1.C.... L...B.. VF.0 . 
.13000:.:."*** NO FILES LOADED.":. 4100.
..L..:. 4100...... FILE LOAD ROUTINE.8..
.. 2,8,2,"0:".Z$.",S,R".C.... 9000.U.D..
 F.1 .   2:..D.X.. J.0 . 63.Z....2,K:. G
ET A BYTE...... SB.NF.64.J,K:. LOAD UP T
ABLE...... J...(.  2...<.NF.NF.1:..W.P..
 LIGHT PEN MENU DRIVER.....X%.B(53267).4
.5:Y%.B(53268).8.6...... X%.32 . 2890...
..Y%.Y%.1.4.... Y%.2 . Y%.21 . 2890.O...
. .(Y%.2)..Y%.2 . 2890.V.... SD.1,20.5.(
Y%.2):.13000:.SD.1,50...... Y%.2 . 6100,
6120,6130,6140,6150,6180,6160,6170...T..
 SPEED UP.L.V.AV.133:. 2830...... SLOW D
OWN.....AV.137:. 2840...... REVERSE TOGG
LE...... 6300. ...AV.135:. 2825.2.... SI
ZE TOGGLE.=.... 6300.O...AV.134:. 2850.C
.... NUMBER TOGGLE.N.... 6300.....AV.136
:. 2875...... RESTART...... 6300...... 1
00...... END...... 6300.C.... 9999.N.$..
 2890...... WAIT FOR PEN RELEASE...... (
B(56321).4). . A$:....... 6310.).(#. FIL
E STATUS CHECKER.D.-#. ON EXIT F=1 IF ER
ROR.L.2#F.0.`.<#.15,A$,B$,C$,D$...P#. E(
A$).0 . .:."*** "B$:.:F.1...D#.....'. V.
21,0:  15.A..'.".. .PLEASE VERIFY QUIT C
OMMAND:"....'. ". DO YOU WANT TO LEAVE T
HIS PROGRAM:";A$...$'. H(A$,1).."Y" . . 
15,8,15:. 100.=..'. ". INSERT FLEXIDRAW 
MASTER DISK".].8'. " AND PRESS .RETURN.:
";A$.I.B'. 52992.U..*. CHAIN....*. V.21,
0:. 13000....+. ".. CHAINING TO SPRITE E
DITOR..."....+. ". INSERT FLEXIDRAW MAST
ER DISK":. " AND PRESS <.RETURN.>";....+
. A$:.:. "SPRITE EDITOR",8.#.... DIRECTO
RY.S....:. 52480:.:."    .HIT ANY KEY WH
EN READY.".T.... 198,0:.198,1:.198,0:.".
":..~.H2. SID...R2.SD.4,17:.I.1.30:.:.SD
.4,16:.I.1.40:.:.SD.4,4:....`.. 1,8,15,"
S0:SPRITE ANIMATOR": 1:. "SPRITE ANIMATO
R",8....11 . . "  .      L";...... I.18 
. . "  P      O";.).... I.20 . . "  EXPA
NDED";.3....:. I.U.... " ...............
........."...... 2040,13:. 2041,13:. SET
UPSPRITE POINTERS...... I.0 . 62:. 832.I
,0:.:. CLEAR SPRITES.F...V.53248:. VIC B
ASE...... V.21,3:. ENABLE SPRITES 0,1...
... V.39,0:. V.40,0:. SET SPRITE COLORS.
0.... V.1,92:. SPRITE 1 Y POS.U.$.. V.16
,3:. V,12:. SPRITE 1 X POS.~.&.. V.2,0:.
 V.3,157:. SPRITE 2 X,Y POS...(.. V.23,2
:. V.29,2:. EXPAND SPRITE 1.......G.P.. 
LIST OUT SPRITE DATA...R.. ".DO YOU WANT
 TO PRINT THE DATA";A$:..0.S.. A$."Y" . 
."SETUP PAPER AND HIT RETURN";A$:PF.1:.4
,4:.4.J.T..PF.1 . . "SPRITE DATA:";G(16)
;"46SPRITE IMAGE":.2010...U.. ".SPRITE D
ATA:":....Z.. I.832 . 894 . 3...... PF.1
 . 2040.J.... "ROW ";.((I.832).3);.10);.
..... B(I);.15);B(I.1);.20);B(I.2):. 206
0...... "ROW ";.((I.832).3);G(16);"10";.
Q.... B(I);G(16);"15";B(I.1);G(16);"20";
B(I.2);:. 3500.Z.... S$.B.... I.H.......
... PF.1 . PF.0:.4:  4:. TURN OFF PRINT.
..... "SAVE SPRITE TO FILE";A$.E. .. A$.
"Y" . 3000.M.*.. 1...D.. DRAW MODE TOGGL
E...N.. "........................";.27);
.$.X.. DM% . DM%.0:. 2600.....DM%.1.G...
. "..MODE: ERASE..";.P.... 20.I.(.. "..M
ODE: DRAW ..";.R.2.. 20...... SPRITE SEQ
UENTIAL FILE HANDLER...B.. "."...L.. "EN
TER FILE NAME";A$...V.. 2,8,2,"@0:".A$."
.SPR,S,W"...... I.832 . 894......2,B(I).
..... I......2,0:. BYTE 64.....  2.B....
:.".*** SPRITE DATA SAVED ***.".W.&.. I.
1 . 1000:. I._.0.. 1...... PRINT ENLARGE
D SPRITE PICTURE...... ON ENTRY I=POINTE
R TO SPRITE DATA.P...S$.G(16)."40":. TAB
 TO COLUMN 40...... J.0 . 2...J.M.128...
T..  B(I.J) . M . S$.S$.". .":. 3560....
.S$.S$." ".*...M..(M.2).<.... M..0 . 354
0.D.... J.J.$.......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL