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

UH.DESIGNER/80

FILE INFORMATION

FILENAME(S): UH.DESIGNER/80

FILE TYPE(S): PRG

FILE SIZE: 8.7K

FIRST SEEN: 2025-10-20 14:30:31

APPEARS ON: 1 disk(s)

FILE HASH

c98fae22947ea61d0efdd314459938bc462295e329b1ee7115aaf6c0bc681cf8

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
UH ULTRA DRAW UH.DESIGNER/80 PRG Treasure Chest - Klaus Der Suhler 26 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 40 29 40 0A 00 8F 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.@)@...---------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000020: 2D 44 45 53 49 47 4E 45  52 00 3F 40 14 00 43 B2  |-DESIGNER.?@..C.|
00000030: C2 28 37 31 36 38 29 3A  8B 43 B2 34 A7 35 30 00  |.(7168):.C.4.50.|
00000040: 5B 40 1E 00 DE 31 2C 31  3A DE 35 3A 97 34 37 2C  |[@...1,1:.5:.47,|
00000050: 30 3A 97 34 38 2C 31 38  30 3A 9C 00 7E 40 28 00  |0:.48,180:..~@(.|
00000060: FE 11 22 55 4C 54 52 41  20 48 49 52 45 53 22 2C  |.."ULTRA HIRES",|
00000070: 42 30 2C 50 37 31 36 38  3A 9E 38 34 34 38 00 E3  |B0,P7168:.8448..|
00000080: 40 32 00 FE 25 3A 42 41  B2 35 33 32 34 38 3A 45  |@2..%:BA.53248:E|
00000090: 24 B2 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |$."             |
000000A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000E0: 20 20 22 00 ED 40 3C 00  D7 32 31 31 30 00 02 41  |  "..@<..2110..A|
000000F0: 46 00 40 57 41 4C 52 55  53 3A FE 0B 33 3A 40 9C  |F.@WALRUS:..3:@.|
00000100: 2C 30 00 45 41 50 00 50  24 B2 22 11 11 11 11 11  |,0.EAP.P$.".....|
00000110: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000120: 11 11 11 11 11 11 11 11  11 11 11 44 45 53 49 47  |...........DESIG|
00000130: 4E 45 52 22 3A 40 E0 2C  42 41 2C 31 2C 31 2C 33  |NER":@.,BA,1,1,3|
00000140: 2C 39 2C 50 24 00 76 41  5A 00 50 24 B2 22 28 41  |,9,P$.vAZ.P$."(A|
00000150: 20 4B 45 52 4E 53 20 50  55 42 4C 49 43 41 54 49  | KERNS PUBLICATI|
00000160: 4F 4E 29 22 3A 40 E0 2C  42 41 2C 31 2C 35 30 2C  |ON)":@.,BA,1,50,|
00000170: 32 2C 32 2C 50 24 00 AD  41 64 00 50 24 B2 22 52  |2,2,P$..Ad.P$."R|
00000180: 45 4D 49 58 45 44 20 42  59 20 52 4F 44 52 58 22  |EMIXED BY RODRX"|
00000190: 3A 40 E0 2C 42 41 2C 31  2C 31 34 30 2C 32 2C 38  |:@.,BA,1,140,2,8|
000001A0: 2C 50 24 3A FE 0B 33 3A  40 54 45 58 54 00 D9 41  |,P$:..3:@TEXT..A|
000001B0: 6E 00 99 22 43 52 45 41  54 45 53 20 41 20 33 44  |n.."CREATES A 3D|
000001C0: 20 44 52 41 57 49 4E 47  20 49 4E 20 33 20 44 49  | DRAWING IN 3 DI|
000001D0: 4D 45 4E 53 49 4F 4E 53  22 00 F5 41 78 00 99 22  |MENSIONS"..Ax.."|
000001E0: 57 49 54 48 20 41 20 4D  4F 56 49 4E 47 20 43 55  |WITH A MOVING CU|
000001F0: 52 53 4F 52 22 00 FE 41  82 00 A1 20 41 24 00 34  |RSOR"..A... A$.4|
00000200: 42 8C 00 86 20 58 42 28  32 30 30 29 2C 59 42 28  |B... XB(200),YB(|
00000210: 32 30 30 29 2C 5A 42 28  32 30 30 29 2C 58 45 28  |200),ZB(200),XE(|
00000220: 32 30 30 29 2C 59 45 28  32 30 30 29 2C 5A 45 28  |200),YE(200),ZE(|
00000230: 32 30 30 29 00 65 42 96  00 86 20 43 28 33 2C 33  |200).eB... C(3,3|
00000240: 29 3A 86 41 44 28 33 36  29 2C 54 58 28 33 36 29  |):.AD(36),TX(36)|
00000250: 2C 54 59 28 33 36 29 2C  42 58 28 33 36 29 2C 42  |,TY(36),BX(36),B|
00000260: 59 28 33 36 29 00 84 42  A0 00 52 58 B2 30 3A 52  |Y(36)..B..RX.0:R|
00000270: 59 B2 30 3A 52 5A B2 30  3A 41 44 28 30 29 B2 31  |Y.0:RZ.0:AD(0).1|
00000280: 36 30 36 34 00 A9 42 AA  00 8F 2D 2D 2D 2D 2D 2D  |6064..B...------|
00000290: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000002A0: 2D 2D 2D 2D 2D 4D 45 4E  55 00 E2 42 B4 00 99 22  |-----MENU..B..."|
000002B0: 41 4E 47 4C 45 53 20 44  52 41 57 20 53 41 56 45  |ANGLES DRAW SAVE|
000002C0: 20 47 45 54 20 52 4F 54  41 54 45 20 48 45 4C 50  | GET ROTATE HELP|
000002D0: 20 46 45 54 43 48 26 53  54 41 53 48 20 20 45 4E  | FETCH&STASH  EN|
000002E0: 44 22 00 0E 43 BE 00 85  22 28 41 29 20 20 28 44  |D"..C..."(A)  (D|
000002F0: 29 20 28 53 29 20 28 47  29 20 28 52 29 20 28 48  |) (S) (G) (R) (H|
00000300: 29 20 28 46 29 20 20 28  45 29 22 3B 53 24 00 23  |) (F)  (E)";S$.#|
00000310: 43 C8 00 8B 20 53 24 B2  22 44 22 20 A7 20 8D 20  |C... S$."D" . . |
00000320: 33 31 30 00 39 43 DC 00  8B 20 53 24 B2 22 41 22  |310.9C... S$."A"|
00000330: 20 A7 20 8D 20 31 33 36  30 00 9C 43 E6 00 8B 20  | . . 1360..C... |
00000340: 53 24 B2 C7 28 31 39 33  29 A7 20 8D 20 31 34 36  |S$..(193). . 146|
00000350: 30 3A 99 22 52 58 22 3B  52 58 3B 22 20 52 59 22  |0:."RX";RX;" RY"|
00000360: 3B 52 59 3B 22 20 52 5A  22 3B 52 5A 3B 22 20 53  |;RY;" RZ";RZ;" S|
00000370: 46 22 3B 53 46 3B 22 20  58 4F 22 3B 58 4F 3B 22  |F";SF;" XO";XO;"|
00000380: 20 59 4F 22 3B 59 4F 3B  22 20 5A 4F 22 3B 5A 4F  | YO";YO;" ZO";ZO|
00000390: 3B 22 20 49 4E 43 22 3B  49 4E 3A 99 00 B1 43 F0  |;" INC";IN:...C.|
000003A0: 00 8B 20 53 24 B2 22 53  22 20 A7 20 8D 20 39 32  |.. S$."S" . . 92|
000003B0: 30 00 C7 43 FA 00 8B 20  53 24 B2 22 47 22 20 A7  |0..C... S$."G" .|
000003C0: 20 8D 20 31 31 34 30 00  E9 43 04 01 8B 20 53 24  | . 1140..C... S$|
000003D0: B2 22 52 22 20 A7 20 40  9C 2C 30 3A 40 DE 2C 30  |."R" . @.,0:@.,0|
000003E0: 2C 37 3A 8D 20 31 34 39  30 00 FF 43 0E 01 8B 20  |,7:. 1490..C... |
000003F0: 53 24 B2 22 45 22 20 A7  20 89 20 32 30 37 30 00  |S$."E" . . 2070.|
00000400: 1B 44 18 01 8B 20 53 24  B2 22 46 22 20 A7 20 8D  |.D... S$."F" . .|
00000410: 20 40 9C 2C 30 3A 8D 32  35 34 30 00 31 44 22 01  | @.,0:.2540.1D".|
00000420: 8B 20 53 24 B2 22 48 22  20 A7 20 8D 20 32 31 32  |. S$."H" . . 212|
00000430: 30 00 3B 44 2C 01 89 20  31 38 30 00 5E 44 36 01  |0.;D,.. 180.^D6.|
00000440: 8F 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.---------------|
00000450: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 44 52 41 57 00 64  |----------DRAW.d|
00000460: 44 68 01 99 00 74 44 72  01 40 9C 2C 30 3A 40 DE  |Dh...tDr.@.,0:@.|
00000470: 2C 30 2C 37 00 84 44 7C  01 40 EB 54 2C 58 4F 2C  |,0,7..D|.@.T,XO,|
00000480: 59 4F 2C 31 00 9F 44 86  01 41 41 B2 31 30 3A 42  |YO,1..D..AA.10:B|
00000490: 42 B2 30 3A 43 43 B2 30  3A 8D 20 32 30 31 30 00  |B.0:CC.0:. 2010.|
000004A0: BA 44 90 01 40 E5 2C 58  4F 2C 59 4F 2C 58 54 AA  |.D..@.,XO,YO,XT.|
000004B0: 58 4F 2C 59 54 AA 59 4F  2C 31 00 CA 44 9A 01 40  |XO,YT.YO,1..D..@|
000004C0: EB 54 2C 58 4F 2C 59 4F  2C 31 00 E5 44 A4 01 41  |.T,XO,YO,1..D..A|
000004D0: 41 B2 30 3A 42 42 B2 31  30 3A 43 43 B2 30 3A 8D  |A.0:BB.10:CC.0:.|
000004E0: 20 32 30 31 30 00 00 45  AE 01 40 E5 2C 58 4F 2C  | 2010..E..@.,XO,|
000004F0: 59 4F 2C 58 54 AA 58 4F  2C 59 54 AA 59 4F 2C 31  |YO,XT.XO,YT.YO,1|
00000500: 00 10 45 B8 01 40 EB 54  2C 58 4F 2C 59 4F 2C 31  |..E..@.T,XO,YO,1|
00000510: 00 2B 45 C2 01 41 41 B2  30 3A 42 42 B2 30 3A 43  |.+E..AA.0:BB.0:C|
00000520: 43 B2 31 30 3A 8D 20 32  30 31 30 00 46 45 CC 01  |C.10:. 2010.FE..|
00000530: 40 E5 2C 58 4F 2C 59 4F  2C 58 54 AA 58 4F 2C 59  |@.,XO,YO,XT.XO,Y|
00000540: 54 AA 59 4F 2C 31 00 63  45 D6 01 41 41 B2 58 43  |T.YO,1.cE..AA.XC|
00000550: 3A 42 42 B2 59 43 3A 43  43 B2 5A 43 3A 8D 20 32  |:BB.YC:CC.ZC:. 2|
00000560: 30 31 30 00 84 45 E0 01  8F 20 20 40 44 52 41 57  |010..E...  @DRAW|
00000570: 2C 58 4F 2C 59 4F 2C 58  54 2B 58 4F 2C 59 54 2B  |,XO,YO,XT+XO,YT+|
00000580: 59 4F 2C 31 00 8D 45 EA  01 A1 20 41 24 00 AA 45  |YO,1..E... A$..E|
00000590: F4 01 41 41 B2 58 43 3A  42 42 B2 59 43 3A 43 43  |..AA.XC:BB.YC:CC|
000005A0: B2 5A 43 3A 8D 20 32 30  31 30 00 C6 45 FE 01 40  |.ZC:. 2010..E..@|
000005B0: EB 54 2C B6 28 58 54 AA  58 4F 29 2C B6 28 59 54  |.T,.(XT.XO),.(YT|
000005C0: AA 59 4F 29 2C 30 00 DE  45 12 02 8B 20 41 24 B2  |.YO),0..E... A$.|
000005D0: 22 1D 22 20 A7 20 58 43  B2 58 43 AA 49 4E 00 F6  |"." . XC.XC.IN..|
000005E0: 45 1C 02 8B 20 41 24 B2  22 9D 22 20 A7 20 58 43  |E... A$."." . XC|
000005F0: B2 58 43 AB 49 4E 00 0E  46 26 02 8B 20 41 24 B2  |.XC.IN..F&.. A$.|
00000600: 22 11 22 20 A7 20 59 43  B2 59 43 AA 49 4E 00 26  |"." . YC.YC.IN.&|
00000610: 46 30 02 8B 20 41 24 B2  22 91 22 20 A7 20 59 43  |F0.. A$."." . YC|
00000620: B2 59 43 AB 49 4E 00 3E  46 3A 02 8B 20 41 24 B2  |.YC.IN.>F:.. A$.|
00000630: 22 49 22 20 A7 20 5A 43  B2 5A 43 AA 49 4E 00 56  |"I" . ZC.ZC.IN.V|
00000640: 46 44 02 8B 20 41 24 B2  22 4F 22 20 A7 20 5A 43  |FD.. A$."O" . ZC|
00000650: B2 5A 43 AB 49 4E 00 6C  46 4E 02 8B 20 41 24 B2  |.ZC.IN.lFN.. A$.|
00000660: 22 46 22 20 A7 20 8D 20  32 33 36 30 00 81 46 58  |"F" . . 2360..FX|
00000670: 02 8B 20 41 24 B2 22 53  22 20 A7 20 8D 20 37 33  |.. A$."S" . . 73|
00000680: 30 00 96 46 62 02 8B 20  41 24 B2 22 4C 22 20 A7  |0..Fb.. A$."L" .|
00000690: 20 8D 20 37 38 30 00 A9  46 6C 02 8B 20 41 24 B2  | . 780..Fl.. A$.|
000006A0: 22 52 22 20 89 20 37 32  30 00 C6 46 76 02 41 41  |"R" . 720..Fv.AA|
000006B0: B2 58 43 3A 42 42 B2 59  43 3A 43 43 B2 5A 43 3A  |.XC:BB.YC:CC.ZC:|
000006C0: 8D 20 32 30 31 30 00 E0  46 80 02 8B 58 54 AA 58  |. 2010..F...XT.X|
000006D0: 4F B3 30 A7 58 43 B2 58  43 AA 31 3A 89 36 33 30  |O.0.XC.XC.1:.630|
000006E0: 00 FC 46 8A 02 8B 58 54  AA 58 4F B1 36 33 39 A7  |..F...XT.XO.639.|
000006F0: 58 43 B2 58 43 AB 31 3A  89 36 33 30 00 16 47 94  |XC.XC.1:.630..G.|
00000700: 02 8B 59 54 AA 59 4F B3  30 A7 59 43 B2 59 43 AA  |..YT.YO.0.YC.YC.|
00000710: 31 3A 89 36 33 30 00 32  47 9E 02 8B 59 54 AA 59  |1:.630.2G...YT.Y|
00000720: 4F B1 31 39 39 A7 59 43  B2 59 43 AB 31 3A 89 36  |O.199.YC.YC.1:.6|
00000730: 33 30 00 48 47 A8 02 40  EB 54 2C 58 54 AA 58 4F  |30.HG..@.T,XT.XO|
00000740: 2C 59 54 AA 59 4F 2C 31  00 C4 47 B2 02 51 B2 51  |,YT.YO,1..G..Q.Q|
00000750: AA 31 3A 8B 51 B1 32 30  A7 51 B2 30 3A 50 4B 24  |.1:.Q.20.Q.0:PK$|
00000760: B2 22 58 43 22 AA C4 28  58 43 29 AA 22 20 59 43  |."XC"..(XC)." YC|
00000770: 22 AA C4 28 59 43 29 AA  22 20 5A 43 22 AA C4 28  |"..(YC)." ZC"..(|
00000780: 5A 43 29 AA 22 20 20 20  20 20 20 20 20 20 20 20  |ZC)."           |
00000790: 20 3C 43 55 52 53 4F 52  20 4B 45 59 53 3E 20 49  | <CURSOR KEYS> I|
000007A0: 2F 4F 20 53 4C 52 20 20  20 20 20 22 3A 40 E0 2C  |/O SLR     ":@.,|
000007B0: 42 41 2C 31 2C 31 2C 31  2C 31 2C 50 4B 24 3A D5  |BA,1,1,1,1,PK$:.|
000007C0: 89 37 31 30 00 F6 47 BC  02 50 24 B2 22 50 52 45  |.710..G..P$."PRE|
000007D0: 53 53 20 5B 20 52 20 5D  20 54 4F 20 52 45 54 55  |SS [ R ] TO RETU|
000007E0: 52 4E 22 3A 40 E0 2C 42  41 2C 34 37 31 2C 31 2C  |RN":@.,BA,471,1,|
000007F0: 31 2C 31 2C 50 24 00 00  48 C6 02 89 20 34 39 30  |1,1,P$..H... 490|
00000800: 00 0C 48 D0 02 40 54 45  58 54 3A 8E 00 35 48 DA  |..H..@TEXT:..5H.|
00000810: 02 8F 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |..--------------|
00000820: 2D 2D 2D 2D 2D 2D 2D 53  54 41 52 54 20 4E 45 57  |-------START NEW|
00000830: 20 4C 49 4E 45 00 3F 48  E4 02 58 53 B2 58 43 00  | LINE.?H..XS.XC.|
00000840: 49 48 EE 02 59 53 B2 59  43 00 53 48 F8 02 5A 53  |IH..YS.YC.SH..ZS|
00000850: B2 5A 43 00 59 48 02 03  8E 00 7E 48 0C 03 8F 2D  |.ZC.YH....~H...-|
00000860: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000870: 2D 2D 2D 2D 2D 2D 4E 45  57 20 4C 49 4E 45 00 8A  |------NEW LINE..|
00000880: 48 16 03 4E 4C B2 4E 4C  AA 31 00 98 48 20 03 58  |H..NL.NL.1..H .X|
00000890: 42 28 4E 4C 29 B2 58 53  00 A6 48 2A 03 59 42 28  |B(NL).XS..H*.YB(|
000008A0: 4E 4C 29 B2 59 53 00 B4  48 34 03 5A 42 28 4E 4C  |NL).YS..H4.ZB(NL|
000008B0: 29 B2 5A 53 00 C2 48 3E  03 58 45 28 4E 4C 29 B2  |).ZS..H>.XE(NL).|
000008C0: 58 43 00 D0 48 48 03 59  45 28 4E 4C 29 B2 59 43  |XC..HH.YE(NL).YC|
000008D0: 00 DE 48 52 03 5A 45 28  4E 4C 29 B2 5A 43 00 FB  |..HR.ZE(NL).ZC..|
000008E0: 48 5C 03 41 41 B2 58 53  3A 42 42 B2 59 53 3A 43  |H\.AA.XS:BB.YS:C|
000008F0: 43 B2 5A 53 3A 8D 20 32  30 31 30 00 11 49 66 03  |C.ZS:. 2010..If.|
00000900: 4E 58 B2 58 54 AA 58 4F  3A 4E 59 B2 59 54 AA 59  |NX.XT.XO:NY.YT.Y|
00000910: 4F 00 2E 49 70 03 41 41  B2 58 43 3A 42 42 B2 59  |O..Ip.AA.XC:BB.Y|
00000920: 43 3A 43 43 B2 5A 43 3A  8D 20 32 30 31 30 00 49  |C:CC.ZC:. 2010.I|
00000930: 49 7A 03 40 E5 2C 4E 58  2C 4E 59 2C 58 54 AA 58  |Iz.@.,NX,NY,XT.X|
00000940: 4F 2C 59 54 AA 59 4F 2C  31 00 5F 49 84 03 58 53  |O,YT.YO,1._I..XS|
00000950: B2 58 43 3A 59 53 B2 59  43 3A 5A 53 B2 5A 43 00  |.XC:YS.YC:ZS.ZC.|
00000960: 65 49 8E 03 8E 00 8D 49  98 03 8F 2D 2D 2D 2D 2D  |eI.....I...-----|
00000970: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000980: 53 54 4F 52 45 20 44 52  41 57 49 4E 47 00 A7 49  |STORE DRAWING..I|
00000990: A2 03 99 22 46 49 4C 45  20 54 4F 20 42 45 20 53  |..."FILE TO BE S|
000009A0: 54 4F 52 45 44 3A 22 00  BD 49 AC 03 85 22 46 49  |TORED:"..I..."FI|
000009B0: 4C 45 20 4E 41 4D 45 3A  20 22 3B 46 24 00 D6 49  |LE NAME: ";F$..I|
000009C0: B6 03 9F 32 2C 38 2C 32  2C 22 30 3A 22 AA 46 24  |...2,8,2,"0:".F$|
000009D0: AA 22 53 2C 57 22 00 E0  49 C0 03 98 32 2C 52 58  |."S,W"..I...2,RX|
000009E0: 00 EA 49 CA 03 98 32 2C  52 59 00 F4 49 D4 03 98  |..I...2,RY..I...|
000009F0: 32 2C 52 5A 00 FE 49 DE  03 98 32 2C 58 4F 00 08  |2,RZ..I...2,XO..|
00000A00: 4A E8 03 98 32 2C 59 4F  00 12 4A F2 03 98 32 2C  |J...2,YO..J...2,|
00000A10: 5A 4F 00 1C 4A FC 03 98  32 2C 53 46 00 26 4A 06  |ZO..J...2,SF.&J.|
00000A20: 04 98 32 2C 4E 4C 00 35  4A 10 04 81 20 49 B2 31  |..2,NL.5J... I.1|
00000A30: 20 A4 20 4E 4C 00 42 4A  1A 04 98 32 2C 58 42 28  | . NL.BJ...2,XB(|
00000A40: 49 29 00 4F 4A 24 04 98  32 2C 59 42 28 49 29 00  |I).OJ$..2,YB(I).|
00000A50: 5C 4A 2E 04 98 32 2C 5A  42 28 49 29 00 69 4A 38  |\J...2,ZB(I).iJ8|
00000A60: 04 98 32 2C 58 45 28 49  29 00 76 4A 42 04 98 32  |..2,XE(I).vJB..2|
00000A70: 2C 59 45 28 49 29 00 83  4A 4C 04 98 32 2C 5A 45  |,YE(I)..JL..2,ZE|
00000A80: 28 49 29 00 8B 4A 56 04  82 20 49 00 92 4A 60 04  |(I)..JV.. I..J`.|
00000A90: A0 32 00 98 4A 6A 04 8E  00 C0 4A 74 04 8F 2D 2D  |.2..Jj....Jt..--|
00000AA0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000AB0: 2D 2D 2D 2D 2D 47 45 54  20 44 52 41 57 49 4E 47  |-----GET DRAWING|
00000AC0: 00 D5 4A 7E 04 85 22 46  49 4C 45 4E 41 4D 45 3A  |..J~.."FILENAME:|
00000AD0: 20 22 3B 46 24 00 EE 4A  88 04 9F 32 2C 38 2C 32  | ";F$..J...2,8,2|
00000AE0: 2C 22 30 3A 22 AA 46 24  AA 22 53 2C 52 22 00 F8  |,"0:".F$."S,R"..|
00000AF0: 4A 92 04 84 32 2C 52 58  00 02 4B 9C 04 84 32 2C  |J...2,RX..K...2,|
00000B00: 52 59 00 0C 4B A6 04 84  32 2C 52 5A 00 16 4B B0  |RY..K...2,RZ..K.|
00000B10: 04 84 32 2C 58 4F 00 20  4B BA 04 84 32 2C 59 4F  |..2,XO. K...2,YO|
00000B20: 00 2A 4B C4 04 84 32 2C  5A 4F 00 34 4B CE 04 84  |.*K...2,ZO.4K...|
00000B30: 32 2C 53 46 00 3E 4B D8  04 84 32 2C 4E 4C 00 4D  |2,SF.>K...2,NL.M|
00000B40: 4B E2 04 81 20 49 B2 31  20 A4 20 4E 4C 00 5A 4B  |K... I.1 . NL.ZK|
00000B50: EC 04 84 32 2C 58 42 28  49 29 00 67 4B F6 04 84  |...2,XB(I).gK...|
00000B60: 32 2C 59 42 28 49 29 00  74 4B 00 05 84 32 2C 5A  |2,YB(I).tK...2,Z|
00000B70: 42 28 49 29 00 81 4B 0A  05 84 32 2C 58 45 28 49  |B(I)..K...2,XE(I|
00000B80: 29 00 8E 4B 14 05 84 32  2C 59 45 28 49 29 00 9B  |)..K...2,YE(I)..|
00000B90: 4B 1E 05 84 32 2C 5A 45  28 49 29 00 A3 4B 28 05  |K...2,ZE(I)..K(.|
00000BA0: 82 20 49 00 AA 4B 32 05  A0 32 00 C1 4B 3C 05 40  |. I..K2..2..K<.@|
00000BB0: 9C 2C 30 3A 40 DE 2C 30  2C 37 3A 8D 20 31 34 39  |.,0:@.,0,7:. 149|
00000BC0: 30 00 C7 4B 46 05 8E 00  EC 4B 50 05 8F 2D 2D 2D  |0..KF....KP..---|
00000BD0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000BE0: 2D 2D 2D 2D 2D 2D 41 4E  47 4C 45 53 00 F2 4B 5A  |------ANGLES..KZ|
00000BF0: 05 99 00 0B 4C 64 05 85  22 52 58 2C 52 59 2C 52  |....Ld.."RX,RY,R|
00000C00: 5A 22 3B 52 58 2C 52 59  2C 52 5A 00 45 4C 6E 05  |Z";RX,RY,RZ.ELn.|
00000C10: 52 58 B2 52 58 AC 33 2E  31 34 31 35 39 AD 31 38  |RX.RX.3.14159.18|
00000C20: 30 3A 52 59 B2 52 59 AC  33 2E 31 34 31 35 39 AD  |0:RY.RY.3.14159.|
00000C30: 31 38 30 3A 52 5A B2 52  5A AC 33 2E 31 34 31 35  |180:RZ.RZ.3.1415|
00000C40: 39 AD 31 38 30 00 67 4C  78 05 85 22 58 4F 2C 59  |9.180.gLx.."XO,Y|
00000C50: 4F 2C 5A 4F 20 28 47 4C  4F 42 41 4C 29 22 3B 58  |O,ZO (GLOBAL)";X|
00000C60: 4F 2C 59 4F 2C 5A 4F 00  76 4C 82 05 8B 58 4F B3  |O,YO,ZO.vL...XO.|
00000C70: 31 A7 58 4F B2 31 00 85  4C 8C 05 8B 59 4F B3 31  |1.XO.1..L...YO.1|
00000C80: A7 59 4F B2 31 00 94 4C  96 05 8B 5A 4F B3 31 A7  |.YO.1..L...ZO.1.|
00000C90: 5A 4F B2 31 00 AE 4C A0  05 85 22 53 43 41 4C 45  |ZO.1..L..."SCALE|
00000CA0: 20 46 41 43 54 4F 52 20  53 46 22 3B 53 46 00 E8  | FACTOR SF";SF..|
00000CB0: 4C AA 05 85 22 49 4E 43  52 45 4D 45 4E 54 20 4F  |L..."INCREMENT O|
00000CC0: 46 20 44 52 41 57 20 50  49 58 45 4C 22 3B 49 4E  |F DRAW PIXEL";IN|
00000CD0: 3A 8B 49 4E B2 30 A7 49  4E B2 31 3A 89 31 34 37  |:.IN.0.IN.1:.147|
00000CE0: 30 3A D5 89 31 34 37 30  00 19 4D B4 05 52 58 B2  |0:..1470..M..RX.|
00000CF0: 30 3A 52 59 B2 30 3A 52  5A B2 30 3A 53 46 B2 31  |0:RY.0:RZ.0:SF.1|
00000D00: 3A 58 4F B2 33 30 30 3A  59 4F B2 31 30 30 3A 5A  |:XO.300:YO.100:Z|
00000D10: 4F B2 30 3A 49 4E B2 31  30 00 24 4D BE 05 8D 20  |O.0:IN.10.$M... |
00000D20: 31 39 30 30 00 2C 4D C8  05 99 3A 8E 00 51 4D D2  |1900.,M...:..QM.|
00000D30: 05 8F 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |..--------------|
00000D40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 52 4F 54 41 54  |-----------ROTAT|
00000D50: 45 00 66 4D DC 05 8B 20  53 24 B2 22 47 22 A7 20  |E.fM... S$."G". |
00000D60: 89 20 31 37 35 30 00 7C  4D E1 05 52 58 B2 4A 58  |. 1750.|M..RX.JX|
00000D70: 3A 52 59 B2 4A 59 3A 52  5A B2 4A 5A 00 DC 4D F0  |:RY.JY:RZ.JZ..M.|
00000D80: 05 50 24 B2 22 55 53 45  20 43 55 52 53 4F 52 20  |.P$."USE CURSOR |
00000D90: 55 50 20 41 4E 44 20 43  55 52 53 4F 52 20 44 4F  |UP AND CURSOR DO|
00000DA0: 57 4E 20 46 4F 52 20 56  41 4C 55 45 20 4F 46 20  |WN FOR VALUE OF |
00000DB0: 52 58 20 54 48 45 4E 20  48 49 54 20 52 45 54 55  |RX THEN HIT RETU|
00000DC0: 52 4E 22 3A 40 E0 2C 42  41 2C 31 2C 31 38 34 2C  |RN":@.,BA,1,184,|
00000DD0: 31 2C 31 2C 50 24 3A 89  31 35 37 30 00 E5 4D FA  |1,1,P$:.1570..M.|
00000DE0: 05 A1 F9 53 24 00 F9 4D  04 06 8B 53 24 B2 22 91  |...S$..M...S$.".|
00000DF0: 22 A7 52 58 B2 52 58 AA  31 00 0D 4E 0E 06 8B 53  |".RX.RX.1..N...S|
00000E00: 24 B2 22 11 22 A7 52 58  B2 52 58 AB 31 00 28 4E  |$.".".RX.RX.1.(N|
00000E10: 18 06 8B 53 24 B2 C7 28  31 33 29 A7 40 DE 2C 30  |...S$..(13).@.,0|
00000E20: 2C 33 3A 89 31 35 39 30  00 52 4E 22 06 52 58 24  |,3:.1590.RN".RX$|
00000E30: B2 C4 28 52 58 29 3A 40  E0 2C 42 41 2C 31 30 30  |..(RX):@.,BA,100|
00000E40: 2C 31 39 32 2C 31 2C 31  2C 22 52 58 20 22 AA 52  |,192,1,1,"RX ".R|
00000E50: 58 24 00 5C 4E 2C 06 89  31 35 33 30 00 BC 4E 36  |X$.\N,..1530..N6|
00000E60: 06 50 24 B2 22 55 53 45  20 43 55 52 53 4F 52 20  |.P$."USE CURSOR |
00000E70: 55 50 20 41 4E 44 20 43  55 52 53 4F 52 20 44 4F  |UP AND CURSOR DO|
00000E80: 57 4E 20 46 4F 52 20 56  41 4C 55 45 20 4F 46 20  |WN FOR VALUE OF |
00000E90: 52 59 20 54 48 45 4E 20  48 49 54 20 52 45 54 55  |RY THEN HIT RETU|
00000EA0: 52 4E 22 3A 40 E0 2C 42  41 2C 31 2C 31 38 34 2C  |RN":@.,BA,1,184,|
00000EB0: 31 2C 31 2C 50 24 3A 89  31 36 34 30 00 C5 4E 40  |1,1,P$:.1640..N@|
00000EC0: 06 A1 F9 53 24 00 D9 4E  4A 06 8B 53 24 B2 22 91  |...S$..NJ..S$.".|
00000ED0: 22 A7 52 59 B2 52 59 AA  31 00 ED 4E 54 06 8B 53  |".RY.RY.1..NT..S|
00000EE0: 24 B2 22 11 22 A7 52 59  B2 52 59 AB 31 00 08 4F  |$.".".RY.RY.1..O|
00000EF0: 5E 06 8B 53 24 B2 C7 28  31 33 29 A7 40 DE 2C 30  |^..S$..(13).@.,0|
00000F00: 2C 34 3A 89 31 36 36 30  00 32 4F 68 06 52 59 24  |,4:.1660.2Oh.RY$|
00000F10: B2 C4 28 52 59 29 3A 40  E0 2C 42 41 2C 31 37 32  |..(RY):@.,BA,172|
00000F20: 2C 31 39 32 2C 31 2C 31  2C 22 52 59 20 22 AA 52  |,192,1,1,"RY ".R|
00000F30: 59 24 00 3C 4F 72 06 89  31 36 30 30 00 9C 4F 7C  |Y$.<Or..1600..O||
00000F40: 06 50 24 B2 22 55 53 45  20 43 55 52 53 4F 52 20  |.P$."USE CURSOR |
00000F50: 55 50 20 41 4E 44 20 43  55 52 53 4F 52 20 44 4F  |UP AND CURSOR DO|
00000F60: 57 4E 20 46 4F 52 20 56  41 4C 55 45 20 4F 46 20  |WN FOR VALUE OF |
00000F70: 52 5A 20 54 48 45 4E 20  48 49 54 20 52 45 54 55  |RZ THEN HIT RETU|
00000F80: 52 4E 22 3A 40 E0 2C 42  41 2C 31 2C 31 38 34 2C  |RN":@.,BA,1,184,|
00000F90: 31 2C 31 2C 50 24 3A 89  31 37 31 30 00 A5 4F 86  |1,1,P$:.1710..O.|
00000FA0: 06 A1 F9 53 24 00 B9 4F  90 06 8B 53 24 B2 22 91  |...S$..O...S$.".|
00000FB0: 22 A7 52 5A B2 52 5A AA  31 00 CD 4F 9A 06 8B 53  |".RZ.RZ.1..O...S|
00000FC0: 24 B2 22 11 22 A7 52 5A  B2 52 5A AB 31 00 E8 4F  |$.".".RZ.RZ.1..O|
00000FD0: A4 06 8B 53 24 B2 C7 28  31 33 29 A7 40 DE 2C 30  |...S$..(13).@.,0|
00000FE0: 2C 37 3A 89 31 37 33 30  00 12 50 AE 06 52 5A 24  |,7:.1730..P..RZ$|
00000FF0: B2 C4 28 52 5A 29 3A 40  E0 2C 42 41 2C 32 33 36  |..(RZ):@.,BA,236|
00001000: 2C 31 39 32 2C 31 2C 31  2C 22 52 5A 20 22 AA 52  |,192,1,1,"RZ ".R|
00001010: 5A 24 00 1C 50 B8 06 89  31 36 37 30 00 3D 50 C2  |Z$..P...1670.=P.|
00001020: 06 40 9C 2C 30 3A 4A 58  B2 52 58 3A 4A 59 B2 52  |.@.,0:JX.RX:JY.R|
00001030: 59 3A 4A 5A B2 52 5A 3A  4B 24 B2 22 22 00 77 50  |Y:JZ.RZ:K$."".wP|
00001040: CC 06 52 58 B2 52 58 AC  33 2E 31 34 31 35 39 AD  |..RX.RX.3.14159.|
00001050: 31 38 30 3A 52 59 B2 52  59 AC 33 2E 31 34 31 35  |180:RY.RY.3.1415|
00001060: 39 AD 31 38 30 3A 52 5A  B2 52 5A AC 33 2E 31 34  |9.180:RZ.RZ.3.14|
00001070: 31 35 39 AD 31 38 30 00  82 50 D6 06 8D 20 31 39  |159.180..P... 19|
00001080: 30 30 00 91 50 E0 06 81  20 49 B2 31 20 A4 20 4E  |00..P... I.1 . N|
00001090: 4C 00 B7 50 EA 06 41 41  B2 58 42 28 49 29 3A 42  |L..P..AA.XB(I):B|
000010A0: 42 B2 59 42 28 49 29 3A  43 43 B2 5A 42 28 49 29  |B.YB(I):CC.ZB(I)|
000010B0: 3A 8D 20 32 30 31 30 00  CD 50 F4 06 52 42 B2 58  |:. 2010..P..RB.X|
000010C0: 54 AA 58 4F 3A 52 45 B2  59 54 AA 59 4F 00 F3 50  |T.XO:RE.YT.YO..P|
000010D0: FE 06 41 41 B2 58 45 28  49 29 3A 42 42 B2 59 45  |..AA.XE(I):BB.YE|
000010E0: 28 49 29 3A 43 43 B2 5A  45 28 49 29 3A 8D 20 32  |(I):CC.ZE(I):. 2|
000010F0: 30 31 30 00 0E 51 08 07  40 E5 2C 52 42 2C 52 45  |010..Q..@.,RB,RE|
00001100: 2C 58 54 AA 58 4F 2C 59  54 AA 59 4F 2C 31 00 15  |,XT.XO,YT.YO,1..|
00001110: 51 12 07 82 49 00 27 51  1C 07 8B 53 24 B2 22 47  |Q...I.'Q...S$."G|
00001120: 22 A7 53 24 B2 22 22 00  7F 51 26 07 50 24 B2 22  |".S$.""..Q&.P$."|
00001130: 50 52 45 53 53 20 5B 20  53 20 5D 20 46 4F 52 20  |PRESS [ S ] FOR |
00001140: 53 54 41 53 48 20 52 4F  55 54 49 4E 45 53 20 4F  |STASH ROUTINES O|
00001150: 52 20 41 4E 59 20 4F 54  48 45 52 20 4B 45 59 20  |R ANY OTHER KEY |
00001160: 46 4F 52 20 4D 41 49 4E  20 4D 45 4E 55 22 3A 40  |FOR MAIN MENU":@|
00001170: E0 2C 42 41 2C 31 2C 31  2C 31 2C 31 2C 50 24 00  |.,BA,1,1,1,1,P$.|
00001180: B8 51 30 07 8B 4B 24 B3  B1 22 52 22 A7 50 24 B2  |.Q0..K$.."R".P$.|
00001190: 22 50 52 45 53 53 20 5B  20 44 20 5D 20 54 4F 20  |"PRESS [ D ] TO |
000011A0: 44 52 41 57 22 3A 40 E0  2C 42 41 2C 31 2C 31 39  |DRAW":@.,BA,1,19|
000011B0: 32 2C 31 2C 31 2C 50 24  00 EC 51 35 07 50 24 B2  |2,1,1,P$..Q5.P$.|
000011C0: 22 50 52 45 53 53 20 5B  20 52 20 5D 20 54 4F 20  |"PRESS [ R ] TO |
000011D0: 52 4F 54 41 54 45 22 3A  40 E0 2C 42 41 2C 34 37  |ROTATE":@.,BA,47|
000011E0: 31 2C 31 39 32 2C 31 2C  31 2C 50 24 00 F5 51 3A  |1,192,1,1,P$..Q:|
000011F0: 07 A1 F9 4B 24 00 25 52  44 07 8B 4B 24 B2 22 53  |...K$.%RD..K$."S|
00001200: 22 A7 4B 24 B2 22 22 3A  46 24 B2 22 22 3A 8D 32  |".K$."":F$."":.2|
00001210: 35 34 30 3A 40 9C 2C 30  3A 40 DE 2C 30 2C 33 3A  |540:@.,0:@.,0,3:|
00001220: 89 31 38 33 30 00 4B 52  4E 07 8B 20 4B 24 B2 22  |.1830.KRN.. K$."|
00001230: 52 22 A7 40 E0 2C 42 41  2C 31 2C 31 39 32 2C 31  |R".@.,BA,1,192,1|
00001240: 2C 31 2C 45 24 3A 89 31  34 39 30 00 82 52 53 07  |,1,E$:.1490..RS.|
00001250: 8B 20 4B 24 B2 22 44 22  A7 40 E0 2C 42 41 2C 31  |. K$."D".@.,BA,1|
00001260: 2C 31 39 32 2C 31 2C 31  2C 45 24 3A 40 E0 2C 42  |,192,1,1,E$:@.,B|
00001270: 41 2C 31 2C 31 2C 31 2C  31 2C 45 24 3A 89 20 33  |A,1,1,1,1,E$:. 3|
00001280: 38 30 00 95 52 58 07 8B  4B 24 B3 B1 22 53 22 A7  |80..RX..K$.."S".|
00001290: 40 54 45 58 54 00 9B 52  62 07 8E 00 C3 52 6C 07  |@TEXT..Rb....Rl.|
000012A0: 8F 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.---------------|
000012B0: 2D 2D 2D 2D 2D 2D 4D 4F  54 49 4F 4E 20 4D 41 54  |------MOTION MAT|
000012C0: 52 49 58 00 DD 52 76 07  43 28 31 2C 31 29 B2 53  |RIX..Rv.C(1,1).S|
000012D0: 46 AC BE 28 52 59 29 AC  BE 28 52 5A 29 00 F7 52  |F..(RY)..(RZ)..R|
000012E0: 80 07 43 28 31 2C 32 29  B2 53 46 AC BE 28 52 59  |..C(1,2).SF..(RY|
000012F0: 29 AC BF 28 52 5A 29 00  0E 53 8A 07 43 28 31 2C  |)..(RZ)..S..C(1,|
00001300: 33 29 B2 53 46 AC 28 AB  BF 28 52 59 29 29 00 3F  |3).SF.(..(RY)).?|
00001310: 53 94 07 43 28 32 2C 31  29 B2 53 46 AC 28 BE 28  |S..C(2,1).SF.(.(|
00001320: 52 58 29 AC 28 AB BF 28  52 5A 29 29 AA BF 28 52  |RX).(..(RZ))..(R|
00001330: 58 29 AC BF 28 52 59 29  AC BE 28 52 5A 29 29 00  |X)..(RY)..(RZ)).|
00001340: 6D 53 9E 07 43 28 32 2C  32 29 B2 53 46 AC 28 BE  |mS..C(2,2).SF.(.|
00001350: 28 52 58 29 AC BE 28 52  5A 29 AA BF 28 52 58 29  |(RX)..(RZ)..(RX)|
00001360: AC BF 28 52 59 29 AC BF  28 52 5A 29 29 00 87 53  |..(RY)..(RZ))..S|
00001370: A8 07 43 28 32 2C 33 29  B2 53 46 AC BF 28 52 58  |..C(2,3).SF..(RX|
00001380: 29 AC BE 28 52 59 29 00  BB 53 B2 07 43 28 33 2C  |)..(RY)..S..C(3,|
00001390: 31 29 B2 53 46 AC 28 28  AB BF 28 52 58 29 29 AC  |1).SF.((..(RX)).|
000013A0: 28 AB BF 28 52 5A 29 29  AA BE 28 52 58 29 AC BF  |(..(RZ))..(RX)..|
000013B0: 28 52 59 29 AC BE 28 52  5A 29 29 00 EA 53 BC 07  |(RY)..(RZ))..S..|
000013C0: 43 28 33 2C 32 29 B2 53  46 AC 28 AB BF 28 52 58  |C(3,2).SF.(..(RX|
000013D0: 29 AC BE 28 52 5A 29 AA  BE 28 52 58 29 AC BF 28  |)..(RZ)..(RX)..(|
000013E0: 52 59 29 AC BF 28 52 5A  29 29 00 04 54 C6 07 43  |RY)..(RZ))..T..C|
000013F0: 28 33 2C 33 29 B2 53 46  AC BE 28 52 58 29 AC BE  |(3,3).SF..(RX)..|
00001400: 28 52 59 29 00 0A 54 D0  07 8E 00 2F 54 DA 07 8F  |(RY)..T..../T...|
00001410: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 54  |---------------T|
00001420: 52 41 4E 53 46 4F 52 4D  20 43 4F 4F 52 44 53 00  |RANSFORM COORDS.|
00001430: 54 54 E4 07 58 54 B2 41  41 AC 43 28 31 2C 31 29  |TT..XT.AA.C(1,1)|
00001440: AA 42 42 AC 43 28 32 2C  31 29 AA 43 43 AC 43 28  |.BB.C(2,1).CC.C(|
00001450: 33 2C 31 29 00 79 54 EE  07 59 54 B2 41 41 AC 43  |3,1).yT..YT.AA.C|
00001460: 28 31 2C 32 29 AA 42 42  AC 43 28 32 2C 32 29 AA  |(1,2).BB.C(2,2).|
00001470: 43 43 AC 43 28 33 2C 32  29 00 9E 54 F8 07 5A 54  |CC.C(3,2)..T..ZT|
00001480: B2 41 41 AC 43 28 31 2C  33 29 AA 42 42 AC 43 28  |.AA.C(1,3).BB.C(|
00001490: 32 2C 33 29 AA 43 43 AC  43 28 33 2C 33 29 00 A4  |2,3).CC.C(3,3)..|
000014A0: 54 02 08 8E 00 CD 54 0C  08 8F 2D 2D 2D 2D 2D 2D  |T.....T...------|
000014B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000014C0: 2D 2D 2D 2D 2D 2D 2D 2D  45 20 4E 20 44 00 DF 54  |--------E N D..T|
000014D0: 16 08 40 9C 2C 30 3A 40  54 45 58 54 3A FE 26 00  |..@.,0:@TEXT:.&.|
000014E0: EF 54 20 08 99 22 41 4C  4C 20 44 4F 4E 45 22 00  |.T .."ALL DONE".|
000014F0: F5 54 2A 08 90 00 3C 55  34 08 8F 2D 2D 2D 2D 2D  |.T*...<U4..-----|
00001500: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001510: 2D 47 4F 54 4F 20 54 45  58 54 20 4D 4F 44 45 2C  |-GOTO TEXT MODE,|
00001520: 50 52 49 4E 54 20 53 54  41 54 55 53 20 41 4E 44  |PRINT STATUS AND|
00001530: 20 45 4E 44 20 50 52 4F  47 52 41 4D 00 4A 55 3E  | END PROGRAM.JU>|
00001540: 08 40 54 45 58 54 3A EA  3A 80 00 7A 55 48 08 8F  |.@TEXT:.:..zUH..|
00001550: 20 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  | ---------------|
00001560: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 48  |---------------H|
00001570: 45 4C 50 20 53 43 52 45  45 4E 00 84 55 52 08 40  |ELP SCREEN..UR.@|
00001580: 54 45 58 54 00 B3 55 5C  08 99 22 43 55 52 53 4F  |TEXT..U\.."CURSO|
00001590: 52 20 4C 45 46 54 20 57  49 4C 4C 20 4D 4F 56 45  |R LEFT WILL MOVE|
000015A0: 20 58 20 43 4F 4F 52 44  49 4E 41 54 45 20 4C 45  | X COORDINATE LE|
000015B0: 46 54 22 00 E4 55 66 08  99 22 43 55 52 53 4F 52  |FT"..Uf.."CURSOR|
000015C0: 20 52 49 47 48 54 20 57  49 4C 4C 20 4D 4F 56 45  | RIGHT WILL MOVE|
000015D0: 20 58 20 43 4F 4F 52 44  49 4E 41 54 45 20 52 49  | X COORDINATE RI|
000015E0: 47 48 54 22 00 0F 56 70  08 99 22 43 55 52 53 4F  |GHT"..Vp.."CURSO|
000015F0: 52 20 55 50 20 57 49 4C  4C 20 4D 4F 56 45 20 59  |R UP WILL MOVE Y|
00001600: 20 43 4F 4F 52 44 49 4E  41 54 45 20 55 50 22 00  | COORDINATE UP".|
00001610: 3E 56 7A 08 99 22 43 55  52 53 4F 52 20 44 4F 57  |>Vz.."CURSOR DOW|
00001620: 4E 20 57 49 4C 4C 20 4D  4F 56 45 20 59 20 43 4F  |N WILL MOVE Y CO|
00001630: 4F 52 44 49 4E 41 54 45  20 44 4F 57 4E 22 00 76  |ORDINATE DOWN".v|
00001640: 56 84 08 99 22 54 48 45  20 5B 20 49 20 5D 20 4B  |V..."THE [ I ] K|
00001650: 45 59 20 57 49 4C 4C 20  4D 4F 56 45 20 5A 20 43  |EY WILL MOVE Z C|
00001660: 4F 4F 52 44 49 4E 41 54  45 20 49 4E 54 4F 20 53  |OORDINATE INTO S|
00001670: 43 52 45 45 4E 22 00 AB  56 8E 08 99 22 54 48 45  |CREEN"..V..."THE|
00001680: 20 5B 20 4F 20 5D 20 4B  45 59 20 57 49 4C 4C 20  | [ O ] KEY WILL |
00001690: 4D 4F 56 45 20 5A 20 43  4F 4F 52 44 49 4E 41 54  |MOVE Z COORDINAT|
000016A0: 45 20 4F 55 54 57 41 52  44 53 22 00 D6 56 98 08  |E OUTWARDS"..V..|
000016B0: 99 22 50 52 45 53 53 20  54 48 45 20 5B 20 53 20  |."PRESS THE [ S |
000016C0: 5D 20 4B 45 59 20 54 4F  20 53 54 41 52 54 20 41  |] KEY TO START A|
000016D0: 20 4C 49 4E 45 22 00 1B  57 A2 08 99 22 50 52 45  | LINE"..W..."PRE|
000016E0: 53 53 20 54 48 45 20 5B  20 4C 20 5D 20 4B 45 59  |SS THE [ L ] KEY|
000016F0: 20 54 4F 20 44 52 41 57  20 4C 49 4E 45 20 46 52  | TO DRAW LINE FR|
00001700: 4F 4D 20 53 54 41 52 54  20 54 4F 20 43 55 52 52  |OM START TO CURR|
00001710: 45 4E 54 20 43 55 52 53  4F 52 22 00 45 57 AC 08  |ENT CURSOR".EW..|
00001720: 99 22 50 52 45 53 53 20  5B 20 52 20 5D 20 54 4F  |."PRESS [ R ] TO|
00001730: 20 52 45 54 55 52 4E 20  54 4F 20 4D 41 49 4E 20  | RETURN TO MAIN |
00001740: 4D 45 4E 55 22 00 4B 57  B6 08 99 00 91 57 C0 08  |MENU".KW.....W..|
00001750: 99 22 49 4E 43 52 45 4D  45 4E 54 20 4F 46 20 4F  |."INCREMENT OF O|
00001760: 46 20 53 54 41 53 48 20  50 49 58 45 4C 20 49 53  |F STASH PIXEL IS|
00001770: 20 41 44 44 45 44 20 54  4F 20 49 4E 43 52 45 4D  | ADDED TO INCREM|
00001780: 45 4E 54 20 4F 46 20 44  52 41 57 20 4D 4F 44 45  |ENT OF DRAW MODE|
00001790: 22 00 D1 57 C5 08 99 22  45 4E 54 45 52 20 54 4F  |"..W..."ENTER TO|
000017A0: 50 20 46 49 52 53 54 20  54 48 45 4E 20 42 4F 54  |P FIRST THEN BOT|
000017B0: 54 4F 4D 20 53 45 43 4F  4E 44 20 42 59 20 50 4F  |TOM SECOND BY PO|
000017C0: 53 49 54 49 4F 4E 49 4E  47 20 43 55 52 53 4F 52  |SITIONING CURSOR|
000017D0: 22 00 0C 58 CA 08 99 22  50 52 45 53 53 20 5B 20  |"..X..."PRESS [ |
000017E0: 54 20 5D 20 46 4F 52 20  54 4F 50 20 4C 45 46 54  |T ] FOR TOP LEFT|
000017F0: 20 43 4F 52 4E 45 52 20  4F 46 20 53 54 41 53 48  | CORNER OF STASH|
00001800: 20 43 4F 4F 52 44 49 4E  41 54 45 22 00 4B 58 D4  | COORDINATE".KX.|
00001810: 08 99 22 50 52 45 53 53  20 5B 20 42 20 5D 20 46  |.."PRESS [ B ] F|
00001820: 4F 52 20 42 4F 54 54 4F  4D 20 52 49 47 48 54 20  |OR BOTTOM RIGHT |
00001830: 43 4F 52 4E 45 52 20 4F  46 20 53 54 41 53 48 20  |CORNER OF STASH |
00001840: 43 4F 4F 52 44 49 4E 41  54 45 22 00 78 58 DE 08  |COORDINATE".xX..|
00001850: 99 22 50 52 45 53 53 20  5B 20 4D 20 5D 20 54 4F  |."PRESS [ M ] TO|
00001860: 20 53 54 41 53 48 20 41  52 45 41 20 49 4E 54 4F  | STASH AREA INTO|
00001870: 20 4D 45 4D 4F 52 59 22  00 AA 58 E8 08 99 22 50  | MEMORY"..X..."P|
00001880: 4F 53 49 54 49 4F 4E 20  43 55 52 53 4F 52 20 54  |OSITION CURSOR T|
00001890: 48 45 4E 20 50 52 45 53  53 20 5B 20 46 20 5D 20  |HEN PRESS [ F ] |
000018A0: 54 4F 20 46 45 54 43 48  20 22 00 B0 58 F2 08 99  |TO FETCH "..X...|
000018B0: 00 E5 58 FC 08 99 22 49  4E 20 4F 52 44 45 52 20  |..X..."IN ORDER |
000018C0: 54 4F 20 44 52 41 57 20  59 4F 55 20 4D 55 53 54  |TO DRAW YOU MUST|
000018D0: 20 46 49 52 53 54 20 53  45 54 20 55 50 20 41 4E  | FIRST SET UP AN|
000018E0: 47 4C 45 53 22 00 2C 59  06 09 99 22 55 53 41 55  |GLES".,Y..."USAU|
000018F0: 4C 4C 59 20 52 58 3D 30  2C 52 59 3D 30 2C 52 5A  |LLY RX=0,RY=0,RZ|
00001900: 3D 30 2C 53 43 41 4C 45  3D 31 2C 20 4F 52 20 53  |=0,SCALE=1, OR S|
00001910: 48 49 46 54 20 41 20 46  4F 52 20 44 45 46 41 55  |HIFT A FOR DEFAU|
00001920: 4C 54 20 56 41 4C 55 45  53 22 3A 99 00 65 59 10  |LT VALUES":..eY.|
00001930: 09 99 22 52 45 54 55 52  4E 49 4E 47 20 54 4F 20  |.."RETURNING TO |
00001940: 4D 41 49 4E 20 4D 45 4E  55 20 43 55 41 53 45 53  |MAIN MENU CUASES|
00001950: 20 41 4E 20 45 52 41 53  45 20 4F 46 20 53 43 52  | AN ERASE OF SCR|
00001960: 45 45 4E 20 22 00 9E 59  1A 09 99 22 59 4F 55 20  |EEN "..Y..."YOU |
00001970: 4D 55 53 54 20 54 48 45  4E 20 52 4F 54 41 54 45  |MUST THEN ROTATE|
00001980: 20 54 4F 20 47 45 54 20  50 49 43 54 55 52 45 20  | TO GET PICTURE |
00001990: 42 49 54 20 4D 41 50 50  45 44 21 22 3A 99 00 BD  |BIT MAPPED!":...|
000019A0: 59 24 09 99 22 50 52 45  53 53 20 41 4E 59 20 4B  |Y$.."PRESS ANY K|
000019B0: 45 59 20 54 4F 20 52 45  54 55 52 4E 22 00 D4 59  |EY TO RETURN"..Y|
000019C0: 2E 09 A1 F9 4B 24 3A 8B  4B 24 A7 99 3A 40 54 45  |....K$:.K$..:@TE|
000019D0: 58 54 3A 8E 00 10 5A 38  09 8F 20 2D 2D 2D 2D 2D  |XT:...Z8.. -----|
000019E0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000019F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001A00: 2D 2D 2D 46 45 54 43 48  20 41 4E 49 4D 41 54 45  |---FETCH ANIMATE|
00001A10: 00 4D 5A 42 09 40 54 45  58 54 3A 85 22 44 45 4C  |.MZB.@TEXT:."DEL|
00001A20: 41 59 20 42 45 54 57 45  45 4E 20 46 52 41 4D 45  |AY BETWEEN FRAME|
00001A30: 53 22 3B 53 4C 3A 40 DE  2C 30 2C 33 3A 40 9C 2C  |S";SL:@.,0,3:@.,|
00001A40: 30 3A 8B 53 4C B3 B2 30  A7 53 4C B2 31 00 64 5A  |0:.SL..0.SL.1.dZ|
00001A50: 4C 09 81 49 B2 30 A4 44  41 AB 31 3A 41 45 B2 41  |L..I.0.DA.1:AE.A|
00001A60: 44 28 49 29 00 84 5A 56  09 40 FE 21 2C 41 45 2C  |D(I)..ZV.@.!,AE,|
00001A70: 46 58 2C 46 59 3A 81 54  B2 30 A4 53 4C 3A 82 3A  |FX,FY:.T.0.SL:.:|
00001A80: 40 9C 2C 30 00 8A 5A 60  09 82 00 BB 5A 6A 09 50  |@.,0..Z`....Zj.P|
00001A90: 24 B2 22 41 4E 49 4D 41  54 45 20 41 47 41 49 4E  |$."ANIMATE AGAIN|
00001AA0: 20 20 5B 20 59 2F 4E 20  5D 22 3A 40 E0 2C 42 41  |  [ Y/N ]":@.,BA|
00001AB0: 2C 31 2C 31 2C 31 2C 31  2C 50 24 00 C4 5A 74 09  |,1,1,1,1,P$..Zt.|
00001AC0: A1 F9 4B 24 00 D8 5A 7E  09 8B 20 4B 24 B2 22 59  |..K$..Z~.. K$."Y|
00001AD0: 22 20 A7 20 32 33 36 30  00 E9 5A 88 09 8B 20 4B  |" . 2360..Z... K|
00001AE0: 24 B2 22 4E 22 20 A7 20  8E 00 F4 5A 92 09 89 20  |$."N" . ...Z... |
00001AF0: 32 34 31 30 00 27 5B 9C  09 8F 2D 2D 2D 2D 2D 2D  |2410.'[...------|
00001B00: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001B10: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001B20: 2D 2D 53 54 41 53 48 00  75 5B A6 09 8B 44 41 B2  |--STASH.u[...DA.|
00001B30: 30 A7 41 44 28 30 29 B2  30 3A 54 58 28 30 29 B2  |0.AD(0).0:TX(0).|
00001B40: 54 58 3A 54 59 28 30 29  B2 54 59 3A 42 58 28 30  |TX:TY(0).TY:BX(0|
00001B50: 29 B2 42 58 3A 42 59 28  30 29 B2 42 59 3A 40 FE  |).BX:BY(0).BY:@.|
00001B60: 1F 2C 30 2C 54 58 2C 54  59 2C 42 58 2C 42 59 3A  |.,0,TX,TY,BX,BY:|
00001B70: 89 32 34 39 30 00 C0 5B  AB 09 8B 41 44 28 44 41  |.2490..[...AD(DA|
00001B80: 29 B1 33 32 30 30 30 A7  50 24 B2 22 53 54 41 53  |).32000.P$."STAS|
00001B90: 48 20 42 55 46 46 45 52  20 49 53 20 46 55 4C 4C  |H BUFFER IS FULL|
00001BA0: 22 3A 40 E0 2C 42 41 2C  34 30 34 2C 31 38 34 2C  |":@.,BA,404,184,|
00001BB0: 31 2C 31 2C 50 24 3A FE  0B 32 3A 89 32 35 33 30  |1,1,P$:..2:.2530|
00001BC0: 00 DB 5B B0 09 40 FE 1F  2C 41 44 28 44 41 29 2C  |..[..@..,AD(DA),|
00001BD0: 54 58 2C 54 59 2C 42 58  2C 42 59 00 F6 5B BA 09  |TX,TY,BX,BY..[..|
00001BE0: 41 45 B2 C2 28 32 35 30  29 AA C2 28 32 35 31 29  |AE..(250)..(251)|
00001BF0: AC 32 35 36 AA 31 00 02  5C C4 09 44 41 B2 44 41  |.256.1..\..DA.DA|
00001C00: AA 31 00 38 5C CE 09 41  44 28 44 41 29 B2 41 45  |.1.8\..AD(DA).AE|
00001C10: 3A 54 58 28 44 41 29 B2  54 58 3A 54 59 28 44 41  |:TX(DA).TX:TY(DA|
00001C20: 29 B2 54 59 3A 42 58 28  44 41 29 B2 42 58 3A 42  |).TY:BX(DA).BX:B|
00001C30: 59 28 44 41 29 B2 42 59  00 7E 5C D8 09 50 24 B2  |Y(DA).BY.~\..P$.|
00001C40: 22 42 55 46 46 45 52 20  41 44 44 52 45 53 53 22  |"BUFFER ADDRESS"|
00001C50: AA C4 28 41 44 28 44 41  29 29 AA 22 20 53 54 41  |..(AD(DA))." STA|
00001C60: 53 48 22 AA C4 28 44 41  29 3A 40 E0 2C 42 41 2C  |SH"..(DA):@.,BA,|
00001C70: 34 30 34 2C 31 38 34 2C  31 2C 31 2C 50 24 00 84  |404,184,1,1,P$..|
00001C80: 5C E2 09 8E 00 B9 5C EC  09 8F 2D 2D 2D 2D 2D 2D  |\.....\...------|
00001C90: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001CA0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001CB0: 2D 2D 2D 2D 53 54 41 53  48 00 E8 5C F6 09 40 DE  |----STASH..\..@.|
00001CC0: 2C 30 2C 35 3A 40 E0 2C  42 41 2C 31 2C 31 2C 31  |,0,5:@.,BA,1,1,1|
00001CD0: 2C 31 2C 45 24 3A 40 E0  2C 42 41 2C 31 2C 31 39  |,1,E$:@.,BA,1,19|
00001CE0: 32 2C 31 2C 31 2C 45 24  00 10 5D FB 09 40 E0 2C  |2,1,1,E$..]..@.,|
00001CF0: 42 41 2C 31 2C 31 2C 31  2C 31 2C 45 24 3A 40 E0  |BA,1,1,1,1,E$:@.|
00001D00: 2C 42 41 2C 31 2C 31 39  32 2C 31 2C 31 2C 45 24  |,BA,1,192,1,1,E$|
00001D10: 00 8D 5D 00 0A 50 24 B2  22 20 28 12 54 92 4F 50  |..]..P$." (.T.OP|
00001D20: 29 20 28 12 42 92 4F 54  54 4F 4D 29 20 28 12 4D  |) (.B.OTTOM) (.M|
00001D30: 92 45 4D 4F 52 59 20 53  54 41 53 48 29 20 28 12  |.EMORY STASH) (.|
00001D40: 43 55 52 53 4F 52 20 4B  45 59 53 92 29 20 28 12  |CURSOR KEYS.) (.|
00001D50: 46 92 45 54 43 48 29 20  28 12 53 92 41 56 45 29  |F.ETCH) (.S.AVE)|
00001D60: 20 28 12 47 92 45 54 29  20 20 20 28 12 52 92 45  | (.G.ET)   (.R.E|
00001D70: 54 55 52 4E 29 22 3A 40  E0 2C 42 41 2C 31 2C 31  |TURN)":@.,BA,1,1|
00001D80: 2C 31 2C 31 2C 50 24 3A  89 32 36 33 30 00 96 5D  |,1,1,P$:.2630..]|
00001D90: 0A 0A A1 F9 46 24 00 A6  5D 14 0A 40 EB 54 2C 46  |....F$..]..@.T,F|
00001DA0: 58 2C 46 59 2C 30 00 CB  5D 1E 0A 8B 20 46 24 B2  |X,FY,0..]... F$.|
00001DB0: 22 91 22 A7 46 59 B2 46  59 AB 28 32 AA 49 4E 29  |".".FY.FY.(2.IN)|
00001DC0: 3A 8B 46 59 B3 30 A7 46  59 B2 30 00 F4 5D 28 0A  |:.FY.0.FY.0..](.|
00001DD0: 8B 20 46 24 B2 22 11 22  A7 46 59 B2 46 59 AA 28  |. F$.".".FY.FY.(|
00001DE0: 32 AA 49 4E 29 3A 8B 46  59 B1 31 39 39 A7 46 59  |2.IN):.FY.199.FY|
00001DF0: B2 31 39 39 00 19 5E 32  0A 8B 20 46 24 B2 22 9D  |.199..^2.. F$.".|
00001E00: 22 A7 46 58 B2 46 58 AB  28 35 AA 49 4E 29 3A 8B  |".FX.FX.(5.IN):.|
00001E10: 46 58 B3 30 A7 46 58 B2  30 00 42 5E 3C 0A 8B 20  |FX.0.FX.0.B^<.. |
00001E20: 46 24 B2 22 1D 22 A7 46  58 B2 46 58 AA 28 35 AA  |F$.".".FX.FX.(5.|
00001E30: 49 4E 29 3A 8B 46 58 B1  36 33 39 A7 46 59 B2 36  |IN):.FX.639.FY.6|
00001E40: 33 39 00 6F 5E 46 0A 40  EB 54 2C 46 58 2C 46 59  |39.o^F.@.T,FX,FY|
00001E50: 2C 31 3A 40 E0 2C 42 41  2C 37 32 2C 31 39 32 2C  |,1:@.,BA,72,192,|
00001E60: 31 2C 31 2C C4 28 46 58  29 AA C4 28 46 59 29 00  |1,1,.(FX)..(FY).|
00001E70: A9 5E 50 0A 8B 20 46 24  B2 22 54 22 20 A7 20 54  |.^P.. F$."T" . T|
00001E80: 58 B2 46 58 3A 54 59 B2  46 59 3A 40 E0 2C 35 33  |X.FX:TY.FY:@.,53|
00001E90: 32 34 38 2C 31 2C 31 38  34 2C 31 2C 31 2C C4 28  |248,1,184,1,1,.(|
00001EA0: 54 58 29 AA C4 28 54 59  29 00 E9 5E 5A 0A 8B 20  |TX)..(TY)..^Z.. |
00001EB0: 46 24 B2 22 42 22 20 A7  20 42 58 B2 46 58 AB 54  |F$."B" . BX.FX.T|
00001EC0: 58 3A 42 59 B2 46 59 AB  54 59 3A 40 E0 2C 35 33  |X:BY.FY.TY:@.,53|
00001ED0: 32 34 38 2C 31 2C 31 39  32 2C 31 2C 31 2C C4 28  |248,1,192,1,1,.(|
00001EE0: 42 58 29 AA C4 28 42 59  29 00 29 5F 64 0A 8B 20  |BX)..(BY).)_d.. |
00001EF0: 46 24 B2 22 52 22 20 A7  20 40 E0 2C 42 41 2C 31  |F$."R" . @.,BA,1|
00001F00: 2C 31 38 34 2C 32 2C 31  2C 45 24 3A 40 E0 2C 42  |,184,2,1,E$:@.,B|
00001F10: 41 2C 31 2C 31 2C 31 2C  31 2C 45 24 3A 40 9C 2C  |A,1,1,1,1,E$:@.,|
00001F20: 30 3A 40 54 45 58 54 3A  8E 00 4B 5F 6E 0A 8B 20  |0:@TEXT:..K_n.. |
00001F30: 46 24 B2 22 4D 22 20 A7  20 8D 20 32 34 36 30 3A  |F$."M" . . 2460:|
00001F40: 46 58 B2 54 58 3A 46 59  B2 54 59 00 6D 5F 78 0A  |FX.TX:FY.TY.m_x.|
00001F50: 8B 20 46 24 B2 22 46 22  20 A7 20 8D 20 32 33 36  |. F$."F" . . 236|
00001F60: 30 3A 46 24 B2 22 22 3A  89 32 35 35 30 00 89 5F  |0:F$."":.2550.._|
00001F70: 82 0A 8B 20 46 24 B2 22  53 22 20 A7 20 8D 20 32  |... F$."S" . . 2|
00001F80: 37 33 30 3A 89 32 35 35  30 00 A5 5F 8C 0A 8B 20  |730:.2550.._... |
00001F90: 46 24 B2 22 47 22 20 A7  20 8D 20 32 39 33 30 3A  |F$."G" . . 2930:|
00001FA0: 89 32 35 35 30 00 B0 5F  96 0A 89 20 32 35 37 30  |.2550.._... 2570|
00001FB0: 00 E2 5F A0 0A 8F 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.._...----------|
00001FC0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001FD0: 2D 2D 2D 2D 2D 2D 2D 2D  53 54 41 53 48 20 53 41  |--------STASH SA|
00001FE0: 56 45 00 EC 5F AA 0A 40  54 45 58 54 00 31 60 B4  |VE.._..@TEXT.1`.|
00001FF0: 0A 85 22 53 41 56 45 20  41 4E 49 4D 41 54 49 4F  |.."SAVE ANIMATIO|
00002000: 4E 20 5B 12 46 49 4C 45  4E 41 4D 45 92 5D 22 3B  |N [.FILENAME.]";|
00002010: 46 24 3A 8B C3 28 46 24  29 B1 35 A7 99 22 4E 41  |F$:..(F$).5.."NA|
00002020: 4D 45 20 54 4F 20 4C 4F  4E 47 22 3A 89 32 37 34  |ME TO LONG":.274|
00002030: 30 00 4A 60 BE 0A 9F 32  2C 38 2C 32 2C 22 30 3A  |0.J`...2,8,2,"0:|
00002040: 22 AA 46 24 AA 22 53 2C  57 22 00 54 60 C8 0A 98  |".F$."S,W".T`...|
00002050: 32 2C 44 41 00 62 60 D2  0A 81 49 B2 30 A4 44 41  |2,DA.b`...I.0.DA|
00002060: AB 31 00 6F 60 DC 0A 98  32 2C 41 44 28 49 29 00  |.1.o`...2,AD(I).|
00002070: 7C 60 DD 0A 98 32 2C 54  58 28 49 29 00 89 60 DE  ||`...2,TX(I)..`.|
00002080: 0A 98 32 2C 54 59 28 49  29 00 96 60 DF 0A 98 32  |..2,TY(I)..`...2|
00002090: 2C 42 58 28 49 29 00 A3  60 E0 0A 98 32 2C 42 59  |,BX(I)..`...2,BY|
000020A0: 28 49 29 00 C6 60 E6 0A  82 3A A0 32 3A 46 49 24  |(I)..`...:.2:FI$|
000020B0: B2 46 24 3A 50 24 B2 22  2E 22 3A 40 9C 2C 30 3A  |.F$:P$.".":@.,0:|
000020C0: 40 DE 2C 30 2C 33 00 D4  60 EB 0A 81 49 B2 30 A4  |@.,0,3..`...I.0.|
000020D0: 44 41 AB 31 00 FF 60 F0  0A 46 49 24 B2 46 49 24  |DA.1..`..FI$.FI$|
000020E0: AA 50 24 3A 8B C3 28 46  49 24 29 B1 31 36 A7 50  |.P$:..(FI$).16.P|
000020F0: 24 B2 22 2B 22 3A 46 49  24 B2 46 24 AA 50 24 00  |$."+":FI$.F$.P$.|
00002100: 19 61 FA 0A 40 FE 21 2C  41 44 28 49 29 2C 54 58  |.a..@.!,AD(I),TX|
00002110: 28 49 29 2C 54 59 28 49  29 00 2B 61 04 0B 40 94  |(I),TY(I).+a..@.|
00002120: 2C 31 2C 46 49 24 3A 40  9C 2C 30 00 33 61 0E 0B  |,1,FI$:@.,0.3a..|
00002130: 82 3A 8E 00 64 61 72 0B  8F 2D 2D 2D 2D 2D 2D 2D  |.:..dar..-------|
00002140: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00002150: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 53 54 41 53 48  |-----------STASH|
00002160: 20 47 45 54 00 6E 61 7C  0B 40 54 45 58 54 00 93  | GET.na|.@TEXT..|
00002170: 61 86 0B 85 22 47 45 54  20 41 4E 49 4D 41 54 49  |a..."GET ANIMATI|
00002180: 4F 4E 20 5B 12 46 49 4C  45 4E 41 4D 45 92 5D 22  |ON [.FILENAME.]"|
00002190: 3B 46 24 00 AC 61 90 0B  9F 32 2C 38 2C 32 2C 22  |;F$..a...2,8,2,"|
000021A0: 30 3A 22 AA 46 24 AA 22  53 2C 52 22 00 B6 61 9A  |0:".F$."S,R"..a.|
000021B0: 0B 84 32 2C 44 41 00 C4  61 A4 0B 81 49 B2 30 A4  |..2,DA..a...I.0.|
000021C0: 44 41 AB 31 00 D1 61 AE  0B 84 32 2C 41 44 28 49  |DA.1..a...2,AD(I|
000021D0: 29 00 DE 61 AF 0B 84 32  2C 54 58 28 49 29 00 EB  |)..a...2,TX(I)..|
000021E0: 61 B0 0B 84 32 2C 54 59  28 49 29 00 F8 61 B1 0B  |a...2,TY(I)..a..|
000021F0: 84 32 2C 42 58 28 49 29  00 05 62 B2 0B 84 32 2C  |.2,BX(I)..b...2,|
00002200: 42 59 28 49 29 00 28 62  B8 0B 82 3A A0 32 3A 46  |BY(I).(b...:.2:F|
00002210: 49 24 B2 46 24 3A 50 24  B2 22 2E 22 3A 40 9C 2C  |I$.F$:P$.".":@.,|
00002220: 30 3A 40 DE 2C 30 2C 33  00 36 62 C2 0B 81 49 B2  |0:@.,0,3.6b...I.|
00002230: 30 A4 44 41 AB 31 00 61  62 CC 0B 46 49 24 B2 46  |0.DA.1.ab..FI$.F|
00002240: 49 24 AA 50 24 3A 8B C3  28 46 49 24 29 B1 31 36  |I$.P$:..(FI$).16|
00002250: A7 50 24 B2 22 2B 22 3A  46 49 24 B2 46 24 AA 50  |.P$."+":FI$.F$.P|
00002260: 24 00 6E 62 D6 0B 40 93  2C 31 2C 46 49 24 00 B5  |$.nb..@.,1,FI$..|
00002270: 62 E0 0B 40 FE 1F 2C 41  44 28 49 29 2C 54 58 28  |b..@..,AD(I),TX(|
00002280: 49 29 2C 54 59 28 49 29  2C 42 58 28 49 29 2C 42  |I),TY(I),BX(I),B|
00002290: 59 28 49 29 3A 41 44 28  49 AA 31 29 B2 C2 28 32  |Y(I):AD(I.1)..(2|
000022A0: 35 30 29 AA C2 28 32 35  31 29 AC 32 35 36 AA 31  |50)..(251).256.1|
000022B0: 3A 40 9C 2C 30 00 BD 62  EA 0B 82 3A 8E 00 00 00  |:@.,0..b...:....|
.@)@...--------------------------DESIGNE
R.?@..C.B(7168):.C.4.50.[@...1,1:.5:.47,
0:.48,180:..~@(..."ULTRA HIRES",B0,P7168
:.8448..@2..%:BA.53248:E$."             
                                        
                          "..@<.W2110..A
F.@WALRUS:..3:@.,0.EAP.P$.".............
...................DESIGNER":@.,BA,1,1,3
,9,P$.VAZ.P$."(A KERNS PUBLICATION)":@.,
BA,1,50,2,2,P$..AD.P$."REMIXED BY RODRX"
:@.,BA,1,140,2,8,P$:..3:@TEXT.YAN.."CREA
TES A 3D DRAWING IN 3 DIMENSIONS"..AX.."
WITH A MOVING CURSOR"..A... A$.4B... XB(
200),YB(200),ZB(200),XE(200),YE(200),ZE(
200).EB... C(3,3):.AD(36),TX(36),TY(36),
BX(36),BY(36)..B .RX.0:RY.0:RZ.0:AD(0).1
6064..B...---------------------------MEN
U..B..."ANGLES DRAW SAVE GET ROTATE HELP
 FETCH&STASH  END"..C..."(A)  (D) (S) (G
) (R) (H) (F)  (E)";S$.#CH.. S$."D" . . 
310.9C... S$."A" . . 1360..C... S$.G(193
). . 1460:."RX";RX;" RY";RY;" RZ";RZ;" S
F";SF;" XO";XO;" YO";YO;" ZO";ZO;" INC";
IN:...C... S$."S" . . 920.GC... S$."G" .
 . 1140..C... S$."R" . @.,0:@.,0,7:. 149
0..C... S$."E" . . 2070..D... S$."F" . .
 @.,0:.2540.1D".. S$."H" . . 2120.;D,.. 
180.^D6..-------------------------DRAW.D
DH...TDR.@.,0:@.,0,7..D|.@.T,XO,YO,1..D.
.AA.10:BB.0:CC.0:. 2010..D..@.,XO,YO,XT.
XO,YT.YO,1.JD..@.T,XO,YO,1..D..AA.0:BB.1
0:CC.0:. 2010..E..@.,XO,YO,XT.XO,YT.YO,1
..E..@.T,XO,YO,1.+EB.AA.0:BB.0:CC.10:. 2
010.FEL.@.,XO,YO,XT.XO,YT.YO,1.CEV.AA.XC
:BB.YC:CC.ZC:. 2010..E...  @DRAW,XO,YO,X
T+XO,YT+YO,1..E... A$..E..AA.XC:BB.YC:CC
.ZC:. 2010.FE..@.T,.(XT.XO),.(YT.YO),0..
E... A$."." . XC.XC.IN..E... A$."." . XC
.XC.IN..F&.. A$."." . YC.YC.IN.&F0.. A$.
"." . YC.YC.IN.>F:.. A$."I" . ZC.ZC.IN.V
FD.. A$."O" . ZC.ZC.IN.LFN.. A$."F" . . 
2360..FX.. A$."S" . . 730..FB.. A$."L" .
 . 780..FL.. A$."R" . 720.FFV.AA.XC:BB.Y
C:CC.ZC:. 2010..F...XT.XO.0.XC.XC.1:.630
..F...XT.XO.639.XC.XC.1:.630..G...YT.YO.
0.YC.YC.1:.630.2G...YT.YO.199.YC.YC.1:.6
30.HG..@.T,XT.XO,YT.YO,1.DG..Q.Q.1:.Q.20
.Q.0:PK$."XC".D(XC)." YC".D(YC)." ZC".D(
ZC)."            <CURSOR KEYS> I/O SLR  
   ":@.,BA,1,1,1,1,PK$:U.710..G..P$."PRE
SS [ R ] TO RETURN":@.,BA,471,1,1,1,P$..
HF.. 490..HP.@TEXT:..5HZ..--------------
-------START NEW LINE.?H..XS.XC.IH..YS.Y
C.SH..ZS.ZC.YH....~H...-----------------
------NEW LINE..H..NL.NL.1..H .XB(NL).XS
..H*.YB(NL).YS..H4.ZB(NL).ZS.BH>.XE(NL).
XC.PHH.YE(NL).YC..HR.ZE(NL).ZC..H\.AA.XS
:BB.YS:CC.ZS:. 2010..IF.NX.XT.XO:NY.YT.Y
O..IP.AA.XC:BB.YC:CC.ZC:. 2010.IIZ.@.,NX
,NY,XT.XO,YT.YO,1._I..XS.XC:YS.YC:ZS.ZC.
EI.....I...---------------------STORE DR
AWING..I..."FILE TO BE STORED:"..I..."FI
LE NAME: ";F$.VI...2,8,2,"0:".F$."S,W"..
I...2,RX..IJ..2,RY..IT..2,RZ..I...2,XO..
J...2,YO..J...2,ZO..J...2,SF.&J...2,NL.5
J... I.1 . NL.BJ...2,XB(I).OJ$..2,YB(I).
\J...2,ZB(I).IJ8..2,XE(I).VJB..2,YE(I)..
JL..2,ZE(I)..JV.. I..J`. 2..JJ....JT..--
---------------------GET DRAWING.UJ~.."F
ILENAME: ";F$..J...2,8,2,"0:".F$."S,R"..
J...2,RX..K...2,RY..K...2,RZ..K...2,XO. 
K...2,YO.*KD..2,ZO.4KN..2,SF.>KX..2,NL.M
K... I.1 . NL.ZK...2,XB(I).GK...2,YB(I).
TK...2,ZB(I)..K...2,XE(I)..K...2,YE(I)..
K...2,ZE(I)..K(.. I..K2. 2.AK<.@.,0:@.,0
,7:. 1490.GKF....KP..-------------------
------ANGLES..KZ....LD.."RX,RY,RZ";RX,RY
,RZ.ELN.RX.RX.3.14159.180:RY.RY.3.14159.
180:RZ.RZ.3.14159.180.GLX.."XO,YO,ZO (GL
OBAL)";XO,YO,ZO.VL...XO.1.XO.1..L...YO.1
.YO.1..L...ZO.1.ZO.1..L .."SCALE FACTOR 
SF";SF..L..."INCREMENT OF DRAW PIXEL";IN
:.IN.0.IN.1:.1470:U.1470..M..RX.0:RY.0:R
Z.0:SF.1:XO.300:YO.100:ZO.0:IN.10.$M... 
1900.,MH..:..QMR..----------------------
---ROTATE.FM... S$."G". . 1750.|M..RX.JX
:RY.JY:RZ.JZ..M..P$."USE CURSOR UP AND C
URSOR DOWN FOR VALUE OF RX THEN HIT RETU
RN":@.,BA,1,184,1,1,P$:.1570..M....S$..M
...S$.".".RX.RX.1..N...S$.".".RX.RX.1.(N
...S$.G(13).@.,0,3:.1590.RN".RX$.D(RX):@
.,BA,100,192,1,1,"RX ".RX$.\N,..1530..N6
.P$."USE CURSOR UP AND CURSOR DOWN FOR V
ALUE OF RY THEN HIT RETURN":@.,BA,1,184,
1,1,P$:.1640.EN@...S$.YNJ..S$.".".RY.RY.
1..NT..S$.".".RY.RY.1..O^..S$.G(13).@.,0
,4:.1660.2OH.RY$.D(RY):@.,BA,172,192,1,1
,"RY ".RY$.<OR..1600..O|.P$."USE CURSOR 
UP AND CURSOR DOWN FOR VALUE OF RZ THEN 
HIT RETURN":@.,BA,1,184,1,1,P$:.1710..O.
...S$..O...S$.".".RZ.RZ.1.MO...S$.".".RZ
.RZ.1..O...S$.G(13).@.,0,7:.1730..P..RZ$
.D(RZ):@.,BA,236,192,1,1,"RZ ".RZ$..P...
1670.=PB.@.,0:JX.RX:JY.RY:JZ.RZ:K$."".WP
L.RX.RX.3.14159.180:RY.RY.3.14159.180:RZ
.RZ.3.14159.180..PV.. 1900..P... I.1 . N
L..P..AA.XB(I):BB.YB(I):CC.ZB(I):. 2010.
MP..RB.XT.XO:RE.YT.YO..P..AA.XE(I):BB.YE
(I):CC.ZE(I):. 2010..Q..@.,RB,RE,XT.XO,Y
T.YO,1..Q...I.'Q...S$."G".S$."".Q&.P$."
PRESS [ S ] FOR STASH ROUTINES OR ANY OT
HER KEY FOR MAIN MENU":@.,BA,1,1,1,1,P$.
.Q0..K$.."R".P$."PRESS [ D ] TO DRAW":@.
,BA,1,192,1,1,P$..Q5.P$."PRESS [ R ] TO 
ROTATE":@.,BA,471,192,1,1,P$..Q:...K$.%R
D..K$."S".K$."":F$."":.2540:@.,0:@.,0,3:
.1830.KRN.. K$."R".@.,BA,1,192,1,1,E$:.1
490..RS.. K$."D".@.,BA,1,192,1,1,E$:@.,B
A,1,1,1,1,E$:. 380..RX..K$.."S".@TEXT..R
B...CRL..---------------------MOTION MAT
RIX..RV.C(1,1).SF..(RY)..(RZ)..R..C(1,2)
.SF..(RY)..(RZ)..S..C(1,3).SF.(..(RY)).?
S..C(2,1).SF.(.(RX).(..(RZ))..(RX)..(RY)
..(RZ)).MS..C(2,2).SF.(.(RX)..(RZ)..(RX)
..(RY)..(RZ))..S..C(2,3).SF..(RX)..(RY).
.S..C(3,1).SF.((..(RX)).(..(RZ))..(RX)..
(RY)..(RZ))..S..C(3,2).SF.(..(RX)..(RZ).
.(RX)..(RY)..(RZ))..TF.C(3,3).SF..(RX)..
(RY)..TP.../TZ..---------------TRANSFORM
 COORDS.TT..XT.AA.C(1,1).BB.C(2,1).CC.C(
3,1).YT..YT.AA.C(1,2).BB.C(2,2).CC.C(3,2
)..T..ZT.AA.C(1,3).BB.C(2,3).CC.C(3,3)..
T....MT...------------------------------
E N D..T..@.,0:@TEXT:.&..T .."ALL DONE".
.T*...<U4..----------------------GOTO TE
XT MODE,PRINT STATUS AND END PROGRAM.JU>
.@TEXT:.:..ZUH.. -----------------------
-------HELP SCREEN..UR.@TEXT..U\.."CURSO
R LEFT WILL MOVE X COORDINATE LEFT"..UF.
."CURSOR RIGHT WILL MOVE X COORDINATE RI
GHT"..VP.."CURSOR UP WILL MOVE Y COORDIN
ATE UP".>VZ.."CURSOR DOWN WILL MOVE Y CO
ORDINATE DOWN".VV..."THE [ I ] KEY WILL 
MOVE Z COORDINATE INTO SCREEN"..V..."THE
 [ O ] KEY WILL MOVE Z COORDINATE OUTWAR
DS".VV..."PRESS THE [ S ] KEY TO START A
 LINE"..W..."PRESS THE [ L ] KEY TO DRAW
 LINE FROM START TO CURRENT CURSOR".EW..
."PRESS [ R ] TO RETURN TO MAIN MENU".KW
.....W..."INCREMENT OF OF STASH PIXEL IS
 ADDED TO INCREMENT OF DRAW MODE".QWE.."
ENTER TOP FIRST THEN BOTTOM SECOND BY PO
SITIONING CURSOR"..XJ.."PRESS [ T ] FOR 
TOP LEFT CORNER OF STASH COORDINATE".KXT
.."PRESS [ B ] FOR BOTTOM RIGHT CORNER O
F STASH COORDINATE".XX..."PRESS [ M ] TO
 STASH AREA INTO MEMORY"..X..."POSITION 
CURSOR THEN PRESS [ F ] TO FETCH "..X...
..X..."IN ORDER TO DRAW YOU MUST FIRST S
ET UP ANGLES".,Y..."USAULLY RX=0,RY=0,RZ
=0,SCALE=1, OR SHIFT A FOR DEFAULT VALUE
S":..EY..."RETURNING TO MAIN MENU CUASES
 AN ERASE OF SCREEN "..Y..."YOU MUST THE
N ROTATE TO GET PICTURE BIT MAPPED!":...
Y$.."PRESS ANY KEY TO RETURN".TY....K$:.
K$..:@TEXT:...Z8.. ---------------------
-------------------FETCH ANIMATE.MZB.@TE
XT:."DELAY BETWEEN FRAMES";SL:@.,0,3:@.,
0:.SL..0.SL.1.DZL..I.0.DA.1:AE.AD(I)..ZV
.@.!,AE,FX,FY:.T.0.SL:.:@.,0..Z`....ZJ.P
$."ANIMATE AGAIN  [ Y/N ]":@.,BA,1,1,1,1
,P$.DZT...K$.XZ~.. K$."Y" . 2360..Z... K
$."N" . ...Z... 2410.'[...--------------
--------------------------STASH.U[...DA.
0.AD(0).0:TX(0).TX:TY(0).TY:BX(0).BX:BY(
0).BY:@..,0,TX,TY,BX,BY:.2490..[...AD(DA
).32000.P$."STASH BUFFER IS FULL":@.,BA,
404,184,1,1,P$:..2:.2530..[..@..,AD(DA),
TX,TY,BX,BY..[..AE.B(250).B(251).256.1..
\D.DA.DA.1.8\N.AD(DA).AE:TX(DA).TX:TY(DA
).TY:BX(DA).BX:BY(DA).BY.~\X.P$."BUFFER 
ADDRESS".D(AD(DA))." STASH".D(DA):@.,BA,
404,184,1,1,P$..\.....\...--------------
----------------------------STASH..\..@.
,0,5:@.,BA,1,1,1,1,E$:@.,BA,1,192,1,1,E$
..]..@.,BA,1,1,1,1,E$:@.,BA,1,192,1,1,E$
..]..P$." (.T.OP) (.B.OTTOM) (.M.EMORY S
TASH) (.CURSOR KEYS.) (.F.ETCH) (.S.AVE)
 (.G.ET)   (.R.ETURN)":@.,BA,1,1,1,1,P$:
.2630..]....F$..]..@.T,FX,FY,0.K]... F$.
".".FY.FY.(2.IN):.FY.0.FY.0..](.. F$."."
.FY.FY.(2.IN):.FY.199.FY.199..^2.. F$.".
".FX.FX.(5.IN):.FX.0.FX.0.B^<.. F$.".".F
X.FX.(5.IN):.FX.639.FY.639.O^F.@.T,FX,FY
,1:@.,BA,72,192,1,1,D(FX).D(FY)..^P.. F$
."T" . TX.FX:TY.FY:@.,53248,1,184,1,1,D(
TX).D(TY)..^Z.. F$."B" . BX.FX.TX:BY.FY.
TY:@.,53248,1,192,1,1,D(BX).D(BY).)_D.. 
F$."R" . @.,BA,1,184,2,1,E$:@.,BA,1,1,1,
1,E$:@.,0:@TEXT:..K_N.. F$."M" . . 2460:
FX.TX:FY.TY.M_X.. F$."F" . . 2360:F$."":
.2550.._... F$."S" . . 2730:.2550.._... 
F$."G" . . 2930:.2550.._... 2570.._ ..--
--------------------------------STASH SA
VE.._..@TEXT.1`..."SAVE ANIMATION [.FILE
NAME.]";F$:.C(F$).5.."NAME TO LONG":.274
0.J`...2,8,2,"0:".F$."S,W".T`H..2,DA.B`R
..I.0.DA.1.O`...2,AD(I).|`...2,TX(I)..`.
..2,TY(I)..`...2,BX(I)..`...2,BY(I).F`..
.: 2:FI$.F$:P$.".":@.,0:@.,0,3.T`...I.0.
DA.1..`..FI$.FI$.P$:.C(FI$).16.P$."+":FI
$.F$.P$..A..@.!,AD(I),TX(I),TY(I).+A..@.
,1,FI$:@.,0.3A...:..DAR..---------------
-------------------STASH GET.NA|.@TEXT..
A..."GET ANIMATION [.FILENAME.]";F$..A..
.2,8,2,"0:".F$."S,R"..A...2,DA.DA...I.0.
DA.1.QA...2,AD(I)..A...2,TX(I)..A...2,TY
(I)..A...2,BX(I)..B...2,BY(I).(B...: 2:F
I$.F$:P$.".":@.,0:@.,0,3.6BB..I.0.DA.1.A
BL.FI$.FI$.P$:.C(FI$).16.P$."+":FI$.F$.P
$.NBV.@.,1,FI$..B..@..,AD(I),TX(I),TY(I)
,BX(I),BY(I):AD(I.1).B(250).B(251).256.1
:@.,0..B...:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL