UHDRAW
FILE INFORMATION
FILENAME(S): UHDRAW
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-10-20 14:30:31
APPEARS ON: 1 disk(s)
FILE HASH
4d346678cb66b9946a1123faeed841573817b6ab05e53fb7f8b53890d5261072
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UH ULTRA DRAW | UHDRAW | PRG | Treasure Chest - Klaus Der Suhler | 17 | 20 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 2B 1C 0A 00 FE 25 3A 97 34 37 2C 30 3A 97 |..+....%:.47,0:.|
00000010: 34 38 2C 32 30 30 3A 9C 3A 40 9C 2C 30 3A 40 DE |48,200:.:@.,0:@.|
00000020: 2C 30 2C 32 3A D7 31 30 30 31 30 00 59 1C 14 00 |,0,2:.10010.Y...|
00000030: 86 41 24 28 31 32 29 3A 86 50 28 31 30 30 30 29 |.A$(12):.P(1000)|
00000040: 3A FE 11 22 43 4F 4D 50 55 54 45 52 20 46 4F 4E |:.."COMPUTER FON|
00000050: 54 22 2C 50 31 32 39 39 32 00 7B 1C 32 00 81 54 |T",P12992.{.2..T|
00000060: B2 31 A4 31 32 3A 87 20 41 24 28 54 29 3A 82 3A |.1.12:. A$(T):.:|
00000070: 58 B2 33 32 30 3A 59 B2 31 30 30 00 C2 1C 3C 00 |X.320:Y.100...<.|
00000080: 83 20 44 52 41 57 2C 4C 49 4E 45 2C 42 4F 58 2C |. DRAW,LINE,BOX,|
00000090: 43 49 52 43 4C 45 2C 50 41 49 4E 54 2C 54 45 58 |CIRCLE,PAINT,TEX|
000000A0: 54 2C 53 41 56 45 2C 45 52 41 53 45 2C 42 52 55 |T,SAVE,ERASE,BRU|
000000B0: 53 48 2C 4C 4F 41 44 2C 43 4C 45 41 52 2C 51 55 |SH,LOAD,CLEAR,QU|
000000C0: 49 54 00 D0 1C 64 00 40 44 52 57 4D 4F 44 2C 31 |IT...d.@DRWMOD,1|
000000D0: 00 F5 1C 69 00 40 E0 2C 31 32 39 39 32 2C 36 30 |...i.@.,12992,60|
000000E0: 2C 35 2C 35 2C 35 2C 22 55 4C 54 52 41 20 48 49 |,5,5,5,"ULTRA HI|
000000F0: 2D 52 45 53 22 00 15 1D 6A 00 40 E0 2C 31 32 39 |-RES"...j.@.,129|
00000100: 39 32 2C 31 34 30 2C 37 30 2C 36 2C 36 2C 22 44 |92,140,70,6,6,"D|
00000110: 52 41 57 21 22 00 42 1D 6E 00 40 E5 2C 20 30 2C |RAW!".B.n.@., 0,|
00000120: 31 35 30 2C 36 33 39 2C 31 35 30 2C 31 3A 40 E5 |150,639,150,1:@.|
00000130: 2C 36 33 39 2C 31 35 30 2C 36 33 39 2C 31 39 39 |,639,150,639,199|
00000140: 2C 31 00 6B 1D 78 00 40 E5 2C 20 30 2C 31 35 30 |,1.k.x.@., 0,150|
00000150: 2C 30 2C 31 39 39 2C 31 3A 40 E5 2C 30 2C 31 39 |,0,199,1:@.,0,19|
00000160: 39 2C 36 33 39 2C 31 39 39 2C 31 00 B1 1D 82 00 |9,639,199,1.....|
00000170: 40 E5 2C 20 31 30 30 2C 31 35 30 2C 31 30 30 2C |@., 100,150,100,|
00000180: 31 39 39 2C 31 3A 40 E5 2C 20 32 30 30 2C 31 35 |199,1:@., 200,15|
00000190: 30 2C 32 30 30 2C 31 39 39 2C 31 3A 40 E5 2C 20 |0,200,199,1:@., |
000001A0: 33 30 30 2C 31 35 30 2C 33 30 30 2C 31 39 39 2C |300,150,300,199,|
000001B0: 31 00 F7 1D 8C 00 40 E5 2C 20 34 30 30 2C 31 35 |1.....@., 400,15|
000001C0: 30 2C 34 30 30 2C 31 39 39 2C 31 3A 40 E5 2C 20 |0,400,199,1:@., |
000001D0: 35 30 30 2C 31 35 30 2C 35 30 30 2C 31 39 39 2C |500,150,500,199,|
000001E0: 31 3A 40 E5 2C 20 36 30 30 2C 31 35 30 2C 36 30 |1:@., 600,150,60|
000001F0: 30 2C 31 39 39 2C 31 00 0F 1E 96 00 40 E5 2C 20 |0,199,1.....@., |
00000200: 30 2C 31 37 35 2C 36 30 30 2C 31 37 35 2C 31 00 |0,175,600,175,1.|
00000210: 42 1E A0 00 58 B2 38 3A 81 20 54 B2 31 A4 36 3A |B...X.8:. T.1.6:|
00000220: 40 E0 2C 35 35 32 39 36 2C 58 2C 31 35 32 2C 31 |@.,55296,X,152,1|
00000230: 2C 32 2C 41 24 28 54 29 3A 58 B2 58 AA 31 30 30 |,2,A$(T):X.X.100|
00000240: 3A 82 00 76 1E AA 00 58 B2 38 3A 81 20 54 B2 37 |:..v...X.8:. T.7|
00000250: A4 31 32 3A 40 E0 2C 35 35 32 39 36 2C 58 2C 31 |.12:@.,55296,X,1|
00000260: 37 37 2C 31 2C 32 2C 41 24 28 54 29 3A 58 B2 58 |77,1,2,A$(T):X.X|
00000270: AA 31 30 30 3A 82 00 95 1E B4 00 40 E0 2C 31 32 |.100:......@.,12|
00000280: 39 39 32 2C 36 30 38 2C 31 39 30 2C 31 2C 31 2C |992,608,190,1,1,|
00000290: 22 50 2D 53 22 00 BA 1E BE 00 40 FE 1F 2C 30 2C |"P-S".....@..,0,|
000002A0: 30 2C 31 35 30 2C 36 33 39 2C 31 39 39 3A 8D 20 |0,150,639,199:. |
000002B0: 32 30 30 30 30 3A 40 9C 2C 30 00 CF 1E C8 00 58 |20000:@.,0.....X|
000002C0: B2 33 32 30 3A 59 B2 31 32 35 3A 53 50 B2 35 00 |.320:Y.125:SP.5.|
000002D0: EB 1E C9 00 40 FE 1F 2C 41 44 28 50 29 2C 30 2C |....@..,AD(P),0,|
000002E0: 31 35 30 2C 36 33 39 2C 31 39 39 00 FB 1E CA 00 |150,639,199.....|
000002F0: 40 FE 21 2C 30 2C 30 2C 31 35 30 00 19 1F D2 00 |@.!,0,0,150.....|
00000300: 8D 20 32 30 30 30 30 3A 8F 20 52 45 41 44 20 4E |. 20000:. READ N|
00000310: 45 58 54 20 53 54 41 53 48 00 3A 1F D7 00 8D 20 |EXT STASH.:.... |
00000320: 31 30 30 30 20 3A 8F 20 47 45 54 20 4D 4F 55 53 |1000 :. GET MOUS|
00000330: 45 20 4D 4F 56 45 4D 45 4E 54 00 4A 1F DC 00 8B |E MOVEMENT.J....|
00000340: 20 46 B2 31 20 A7 20 32 37 30 00 63 1F E6 00 40 | F.1 . 270.c...@|
00000350: E5 2C 58 AB 31 2C 59 AA 31 2C 58 AA 31 2C 59 AB |.,X.1,Y.1,X.1,Y.|
00000360: 31 2C 31 00 7C 1F FA 00 40 E5 2C 58 AB 31 2C 59 |1,1.|...@.,X.1,Y|
00000370: AA 31 2C 58 AA 31 2C 59 AB 31 2C 31 00 86 1F 04 |.1,X.1,Y.1,1....|
00000380: 01 89 20 32 31 35 00 94 1F 0E 01 58 50 B2 58 3A |.. 215.....XP.X:|
00000390: 59 50 B2 59 00 A6 1F 18 01 8B 59 B3 31 35 30 20 |YP.Y......Y.150 |
000003A0: A7 20 32 30 30 30 00 C3 1F 2C 01 8F 20 44 45 43 |. 2000...,.. DEC|
000003B0: 49 50 48 45 52 20 49 54 45 4D 20 53 45 4C 45 43 |IPHER ITEM SELEC|
000003C0: 54 45 44 00 DB 1F 36 01 8B 20 59 B1 31 37 35 20 |TED...6.. Y.175 |
000003D0: A7 20 52 B2 31 3A D5 20 52 B2 30 00 EE 1F 40 01 |. R.1:. R.0...@.|
000003E0: 8B 20 58 B1 36 30 30 20 A7 20 32 30 30 30 00 06 |. X.600 . 2000..|
000003F0: 20 4A 01 8B 20 58 B1 35 30 30 20 A7 20 43 B2 36 | J.. X.500 . C.6|
00000400: 3A 89 20 34 30 30 00 1E 20 54 01 8B 20 58 B1 34 |:. 400.. T.. X.4|
00000410: 30 30 20 A7 20 43 B2 35 3A 89 20 34 30 30 00 36 |00 . C.5:. 400.6|
00000420: 20 5E 01 8B 20 58 B1 33 30 30 20 A7 20 43 B2 34 | ^.. X.300 . C.4|
00000430: 3A 89 20 34 30 30 00 4E 20 68 01 8B 20 58 B1 32 |:. 400.N h.. X.2|
00000440: 30 30 20 A7 20 43 B2 33 3A 89 20 34 30 30 00 66 |00 . C.3:. 400.f|
00000450: 20 72 01 8B 20 58 B1 31 30 30 20 A7 20 43 B2 32 | r.. X.100 . C.2|
00000460: 3A 89 20 34 30 30 00 6E 20 7C 01 43 B2 31 00 8C |:. 400.n |.C.1..|
00000470: 20 90 01 8F 20 55 53 45 20 52 26 43 20 54 4F 20 | ... USE R&C TO |
00000480: 46 49 4E 44 20 43 4F 4D 4D 41 4E 44 00 A4 20 9A |FIND COMMAND.. .|
00000490: 01 8B 52 B2 31 A7 20 43 4F B2 43 AA 36 3A D5 20 |..R.1. CO.C.6:. |
000004A0: 43 4F B2 43 00 BA 20 A4 01 40 FE 21 2C 41 44 28 |CO.C.. ..@.!,AD(|
000004B0: 50 AB 31 29 2C 30 2C 31 35 30 00 01 21 C2 01 91 |P.1),0,150..!...|
000004C0: 20 43 4F 20 89 20 31 31 30 30 2C 31 32 30 30 2C | CO . 1100,1200,|
000004D0: 31 33 30 30 2C 31 34 30 30 2C 31 35 30 30 2C 31 |1300,1400,1500,1|
000004E0: 36 30 30 2C 31 37 30 30 2C 31 38 30 30 2C 31 39 |600,1700,1800,19|
000004F0: 30 30 2C 32 30 30 30 2C 32 31 30 30 2C 32 32 30 |00,2000,2100,220|
00000500: 30 00 15 21 E8 03 8F 20 4D 4F 55 53 45 20 52 4F |0..!... MOUSE RO|
00000510: 55 54 49 4E 45 00 1D 21 ED 03 46 B2 30 00 32 21 |UTINE..!..F.0.2!|
00000520: F2 03 8B 20 CF 28 32 29 B1 31 32 37 20 A7 20 46 |... .(2).127 . F|
00000530: B2 31 00 49 21 FC 03 4A B2 CF 28 32 29 20 AF 20 |.1.I!..J..(2) . |
00000540: 31 35 3A 8B 4A B2 30 A7 8E 00 7B 21 06 04 91 20 |15:.J.0...{!... |
00000550: 4A 20 89 20 31 30 33 31 2C 31 30 33 32 2C 31 30 |J . 1031,1032,10|
00000560: 33 33 2C 31 30 33 34 2C 31 30 33 35 2C 31 30 33 |33,1034,1035,103|
00000570: 36 2C 31 30 33 37 2C 31 30 33 38 00 8C 21 07 04 |6,1037,1038..!..|
00000580: 59 B2 59 AB 53 50 3A 89 31 30 34 30 00 A4 21 08 |Y.Y.SP:.1040..!.|
00000590: 04 59 B2 59 AB 53 50 3A 58 B2 58 AA 53 50 3A 89 |.Y.Y.SP:X.X.SP:.|
000005A0: 31 30 34 30 00 B5 21 09 04 58 B2 58 AA 53 50 3A |1040..!..X.X.SP:|
000005B0: 89 31 30 34 30 00 CD 21 0A 04 59 B2 59 AA 53 50 |.1040..!..Y.Y.SP|
000005C0: 3A 58 B2 58 AA 53 50 3A 89 31 30 34 30 00 DE 21 |:X.X.SP:.1040..!|
000005D0: 0B 04 59 B2 59 AA 53 50 3A 89 31 30 34 30 00 F6 |..Y.Y.SP:.1040..|
000005E0: 21 0C 04 59 B2 59 AA 53 50 3A 58 B2 58 AB 53 50 |!..Y.Y.SP:X.X.SP|
000005F0: 3A 89 31 30 34 30 00 07 22 0D 04 58 B2 58 AB 53 |:.1040.."..X.X.S|
00000600: 50 3A 89 31 30 34 30 00 1F 22 0E 04 59 B2 59 AB |P:.1040.."..Y.Y.|
00000610: 53 50 3A 58 B2 58 AB 53 50 3A 89 31 30 34 30 00 |SP:X.X.SP:.1040.|
00000620: 31 22 10 04 8B 58 B1 36 33 30 A7 20 58 B2 36 33 |1"...X.630. X.63|
00000630: 30 00 42 22 11 04 8B 58 B3 31 30 20 A7 20 58 B2 |0.B"...X.10 . X.|
00000640: 31 30 00 54 22 12 04 8B 59 B1 31 39 30 A7 20 59 |10.T"...Y.190. Y|
00000650: B2 31 39 30 00 65 22 13 04 8B 59 B3 31 30 20 A7 |.190.e"...Y.10 .|
00000660: 20 59 B2 31 30 00 6B 22 14 04 8E 00 7E 22 4C 04 | Y.10.k"....~"L.|
00000670: 8F 20 44 52 41 57 20 52 4F 55 54 49 4E 45 00 87 |. DRAW ROUTINE..|
00000680: 22 51 04 53 50 B2 31 00 92 22 56 04 8D 20 31 30 |"Q.SP.1.."V.. 10|
00000690: 30 30 00 BB 22 60 04 8B 46 B2 31 20 A7 20 40 44 |00.."`..F.1 . @D|
000006A0: 52 57 4D 4F 44 2C 30 3A 40 EB 54 2C 58 2C 59 2C |RWMOD,0:@.T,X,Y,|
000006B0: 31 3A 40 44 52 57 4D 4F 44 2C 31 00 EC 22 6A 04 |1:@DRWMOD,1.."j.|
000006C0: 8B 46 B2 30 20 A7 20 40 44 52 57 4D 4F 44 2C 31 |.F.0 . @DRWMOD,1|
000006D0: 3A 40 EB 54 2C 58 2C 59 2C 31 3A 81 54 B2 31 A4 |:@.T,X,Y,1:.T.1.|
000006E0: 31 30 3A 40 EB 54 2C 58 2C 59 2C 31 00 00 23 74 |10:@.T,X,Y,1..#t|
000006F0: 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 31 31 30 |..A$:.A$."".1110|
00000700: 00 12 23 7E 04 8B 41 24 B2 22 20 22 20 A7 20 32 |..#~..A$." " . 2|
00000710: 30 30 00 1D 23 7F 04 89 20 31 31 31 30 00 30 23 |00..#... 1110.0#|
00000720: B0 04 8F 20 4C 49 4E 45 20 52 4F 55 54 49 4E 45 |... LINE ROUTINE|
00000730: 00 39 23 B1 04 53 50 B2 35 00 44 23 BA 04 8D 20 |.9#..SP.5.D#... |
00000740: 31 30 30 30 00 59 23 C4 04 8B 46 B2 31 20 A7 20 |1000.Y#...F.1 . |
00000750: 46 B2 30 3A 89 31 32 34 30 00 87 23 CE 04 40 E5 |F.0:.1240..#..@.|
00000760: 2C 58 AB 31 2C 59 AA 31 2C 58 AA 31 2C 59 AB 31 |,X.1,Y.1,X.1,Y.1|
00000770: 2C 31 3A 40 E5 2C 58 AB 31 2C 59 AA 31 2C 58 AA |,1:@.,X.1,Y.1,X.|
00000780: 31 2C 59 AB 31 2C 31 00 9C 23 D3 04 A1 41 24 3A |1,Y.1,1..#...A$:|
00000790: 8B 41 24 B2 22 22 A7 20 31 32 31 30 00 AC 23 D4 |.A$."". 1210..#.|
000007A0: 04 8B 41 24 B2 22 20 22 A7 32 30 30 00 B7 23 D5 |..A$." ".200..#.|
000007B0: 04 89 20 31 32 31 30 00 D1 23 D8 04 58 31 B2 58 |.. 1210..#..X1.X|
000007C0: 3A 59 31 B2 59 3A 81 54 B2 31 A4 31 30 30 30 3A |:Y1.Y:.T.1.1000:|
000007D0: 82 00 DC 23 DD 04 8D 20 31 30 30 30 00 EB 23 E2 |...#... 1000..#.|
000007E0: 04 8B 46 B2 31 A7 20 31 32 37 30 00 0D 24 EC 04 |..F.1. 1270..$..|
000007F0: 40 E5 2C 58 31 2C 59 31 2C 58 2C 59 2C 31 3A 40 |@.,X1,Y1,X,Y,1:@|
00000800: E5 2C 58 31 2C 59 31 2C 58 2C 59 2C 31 00 21 24 |.,X1,Y1,X,Y,1.!$|
00000810: F1 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 32 34 |...A$:.A$."".124|
00000820: 35 00 32 24 F2 04 8B 41 24 B2 22 20 22 A7 20 32 |5.2$...A$." ". 2|
00000830: 30 30 00 3D 24 F3 04 89 20 31 32 34 35 00 64 24 |00.=$... 1245.d$|
00000840: F6 04 40 44 52 57 4D 4F 44 2C 30 3A 40 E5 2C 58 |..@DRWMOD,0:@.,X|
00000850: 31 2C 59 31 2C 58 2C 59 2C 31 3A 40 44 52 57 4D |1,Y1,X,Y,1:@DRWM|
00000860: 4F 44 2C 31 00 79 24 00 05 A1 41 24 3A 8B 41 24 |OD,1.y$...A$:.A$|
00000870: B2 22 22 A7 20 31 32 31 30 00 8A 24 05 05 8B 41 |."". 1210..$...A|
00000880: 24 B2 22 20 22 A7 20 32 30 30 00 95 24 0A 05 89 |$." ". 200..$...|
00000890: 20 31 32 31 30 00 A7 24 14 05 8F 20 42 4F 58 20 | 1210..$... BOX |
000008A0: 52 4F 55 54 49 4E 45 00 B0 24 15 05 53 50 B2 35 |ROUTINE..$..SP.5|
000008B0: 00 BB 24 1E 05 8D 20 31 30 30 30 00 E1 24 28 05 |..$... 1000..$(.|
000008C0: 8B 46 B2 31 20 A7 20 58 31 B2 58 3A 59 31 B2 59 |.F.1 . X1.X:Y1.Y|
000008D0: 3A 81 54 B2 31 A4 32 30 30 3A 82 3A 89 31 33 34 |:.T.1.200:.:.134|
000008E0: 30 00 0F 25 32 05 40 E5 2C 58 AB 31 2C 59 AA 31 |0..%2.@.,X.1,Y.1|
000008F0: 2C 58 AA 31 2C 59 AB 31 2C 31 3A 40 E5 2C 58 AB |,X.1,Y.1,1:@.,X.|
00000900: 31 2C 59 AA 31 2C 58 AA 31 2C 59 AB 31 2C 31 00 |1,Y.1,X.1,Y.1,1.|
00000910: 1A 25 37 05 89 20 31 33 31 30 00 25 25 3C 05 8D |.%7.. 1310.%%<..|
00000920: 20 31 30 30 30 00 5A 25 41 05 8B 46 B2 31 20 A7 | 1000.Z%A..F.1 .|
00000930: 20 40 44 52 57 4D 4F 44 2C 30 3A 40 E1 2C 58 31 | @DRWMOD,0:@.,X1|
00000940: 2C 59 31 2C 58 2C 59 2C 31 3A 40 44 52 57 4D 4F |,Y1,X,Y,1:@DRWMO|
00000950: 44 2C 31 3A 89 20 31 33 36 30 00 7C 25 46 05 40 |D,1:. 1360.|%F.@|
00000960: E1 2C 58 31 2C 59 31 2C 58 2C 59 2C 31 3A 40 E1 |.,X1,Y1,X,Y,1:@.|
00000970: 2C 58 31 2C 59 31 2C 58 2C 59 2C 31 00 87 25 4B |,X1,Y1,X,Y,1..%K|
00000980: 05 89 20 31 33 34 30 00 9B 25 50 05 A1 41 24 3A |.. 1340..%P..A$:|
00000990: 8B 41 24 B2 22 22 A7 31 33 31 30 00 AC 25 55 05 |.A$."".1310..%U.|
000009A0: 8B 41 24 B2 22 20 22 20 A7 32 30 30 00 B7 25 5A |.A$." " .200..%Z|
000009B0: 05 89 20 31 33 31 30 00 CC 25 78 05 8F 20 43 49 |.. 1310..%x.. CI|
000009C0: 52 43 4C 45 20 52 4F 55 54 49 4E 45 00 D5 25 79 |RCLE ROUTINE..%y|
000009D0: 05 53 50 B2 35 00 E0 25 82 05 8D 20 31 30 30 30 |.SP.5..%... 1000|
000009E0: 00 06 26 8C 05 8B 20 46 B2 31 A7 20 58 43 B2 58 |..&... F.1. XC.X|
000009F0: 3A 59 43 B2 59 3A 81 54 B2 31 A4 32 30 30 3A 82 |:YC.Y:.T.1.200:.|
00000A00: 3A 89 31 34 34 30 00 34 26 96 05 40 E5 2C 58 AB |:.1440.4&..@.,X.|
00000A10: 31 2C 59 AB 31 2C 58 AA 31 2C 59 AA 31 2C 31 3A |1,Y.1,X.1,Y.1,1:|
00000A20: 40 E5 2C 58 AB 31 2C 59 AA 31 2C 58 AA 31 2C 59 |@.,X.1,Y.1,X.1,Y|
00000A30: AB 31 2C 31 00 62 26 97 05 40 E5 2C 58 AB 31 2C |.1,1.b&..@.,X.1,|
00000A40: 59 AB 31 2C 58 AA 31 2C 59 AA 31 2C 31 3A 40 E5 |Y.1,X.1,Y.1,1:@.|
00000A50: 2C 58 AB 31 2C 59 AA 31 2C 58 AA 31 2C 59 AB 31 |,X.1,Y.1,X.1,Y.1|
00000A60: 2C 31 00 6D 26 9B 05 89 20 31 34 31 30 00 78 26 |,1.m&... 1410.x&|
00000A70: A0 05 8D 20 31 30 30 30 00 B7 26 AA 05 8B 46 B2 |... 1000..&...F.|
00000A80: 31 A7 20 40 44 52 57 4D 4F 44 2C 30 3A 40 E2 2C |1. @DRWMOD,0:@.,|
00000A90: 31 2C 58 43 2C 59 43 2C B6 28 58 43 AB 58 29 2C |1,XC,YC,.(XC.X),|
00000AA0: B6 28 59 43 AB 59 29 3A 40 44 52 57 4D 4F 44 2C |.(YC.Y):@DRWMOD,|
00000AB0: 31 3A 89 31 34 37 30 00 FB 26 AF 05 40 EB 54 2C |1:.1470..&..@.T,|
00000AC0: 58 43 AA 28 B6 28 58 43 AB 58 29 29 2C 59 43 AA |XC.(.(XC.X)),YC.|
00000AD0: 28 B6 28 59 43 AB 59 29 29 2C 31 3A 40 EB 54 2C |(.(YC.Y)),1:@.T,|
00000AE0: 58 43 AB 28 B6 28 58 43 AB 58 29 29 2C 59 43 AB |XC.(.(XC.X)),YC.|
00000AF0: 28 B6 28 59 43 AB 59 29 29 2C 31 00 3F 27 B0 05 |(.(YC.Y)),1.?'..|
00000B00: 40 EB 54 2C 58 43 AA 28 B6 28 58 43 AB 58 29 29 |@.T,XC.(.(XC.X))|
00000B10: 2C 59 43 AA 28 B6 28 59 43 AB 59 29 29 2C 31 3A |,YC.(.(YC.Y)),1:|
00000B20: 40 EB 54 2C 58 43 AB 28 B6 28 58 43 AB 58 29 29 |@.T,XC.(.(XC.X))|
00000B30: 2C 59 43 AB 28 B6 28 59 43 AB 59 29 29 2C 31 00 |,YC.(.(YC.Y)),1.|
00000B40: 4A 27 B1 05 89 20 31 34 34 30 00 5F 27 BE 05 A1 |J'... 1440._'...|
00000B50: 41 24 3A 8B 41 24 B2 22 22 A7 20 31 34 31 30 00 |A$:.A$."". 1410.|
00000B60: 70 27 C8 05 8B 41 24 B2 22 20 22 A7 20 32 30 30 |p'...A$." ". 200|
00000B70: 00 7B 27 D2 05 89 20 31 34 31 30 00 8F 27 DC 05 |.{'... 1410..'..|
00000B80: 8F 20 50 41 49 4E 54 20 52 4F 55 54 49 4E 45 00 |. PAINT ROUTINE.|
00000B90: D3 27 DD 05 40 E0 2C 31 32 39 39 32 2C 31 2C 31 |.'..@.,12992,1,1|
00000BA0: 37 30 2C 31 2C 31 2C 22 4E 4F 54 45 3A 20 54 48 |70,1,1,"NOTE: TH|
00000BB0: 45 20 50 41 49 4E 54 20 52 4F 55 54 49 4E 45 20 |E PAINT ROUTINE |
00000BC0: 44 55 4D 50 53 20 59 4F 55 20 49 4E 54 4F 20 54 |DUMPS YOU INTO T|
00000BD0: 48 45 22 00 19 28 DE 05 40 E0 2C 31 32 39 39 32 |HE"..(..@.,12992|
00000BE0: 2C 31 2C 31 38 30 2C 31 2C 31 2C 22 4D 4F 4E 49 |,1,180,1,1,"MONI|
00000BF0: 54 4F 52 20 46 4F 52 20 53 4F 4D 45 20 52 45 41 |TOR FOR SOME REA|
00000C00: 53 4F 4E 2C 20 49 20 41 4D 20 57 4F 52 4B 49 4E |SON, I AM WORKIN|
00000C10: 47 20 4F 4E 20 49 54 21 22 00 4C 28 DF 05 40 E0 |G ON IT!".L(..@.|
00000C20: 2C 31 32 39 39 32 2C 31 2C 31 39 30 2C 31 2C 31 |,12992,1,190,1,1|
00000C30: 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 50 52 |," PR|
00000C40: 45 53 53 20 3C 53 50 41 43 45 3E 22 00 55 28 E0 |ESS <SPACE>".U(.|
00000C50: 05 A1 F9 41 24 00 9A 28 E1 05 40 E0 2C 31 32 39 |...A$..(..@.,129|
00000C60: 39 32 2C 31 2C 31 37 30 2C 31 2C 31 2C 22 18 4E |92,1,170,1,1,".N|
00000C70: 4F 54 45 3A 20 54 48 45 20 50 41 49 4E 54 20 52 |OTE: THE PAINT R|
00000C80: 4F 55 54 49 4E 45 20 44 55 4D 50 53 20 59 4F 55 |OUTINE DUMPS YOU|
00000C90: 20 49 4E 54 4F 20 54 48 45 22 00 E1 28 E2 05 40 | INTO THE"..(..@|
00000CA0: E0 2C 31 32 39 39 32 2C 31 2C 31 38 30 2C 31 2C |.,12992,1,180,1,|
00000CB0: 31 2C 22 18 4D 4F 4E 49 54 4F 52 20 46 4F 52 20 |1,".MONITOR FOR |
00000CC0: 53 4F 4D 45 20 52 45 41 53 4F 4E 2C 20 49 20 41 |SOME REASON, I A|
00000CD0: 4D 20 57 4F 52 4B 49 4E 47 20 4F 4E 20 49 54 21 |M WORKING ON IT!|
00000CE0: 22 00 15 29 E3 05 40 E0 2C 31 32 39 39 32 2C 31 |"..)..@.,12992,1|
00000CF0: 2C 31 39 30 2C 31 2C 31 2C 22 18 20 20 20 20 20 |,190,1,1,". |
00000D00: 20 20 20 20 20 20 20 50 52 45 53 53 20 3C 53 50 | PRESS <SP|
00000D10: 41 43 45 3E 22 00 1F 29 E4 05 89 20 32 30 30 00 |ACE>"..)... 200.|
00000D20: 2A 29 E6 05 8D 20 31 30 30 30 00 3D 29 E7 05 53 |*)... 1000.=)..S|
00000D30: 50 B2 31 3A 40 44 52 57 4D 4F 44 2C 30 00 48 29 |P.1:@DRWMOD,0.H)|
00000D40: E8 05 8D 20 31 30 30 30 00 65 29 F0 05 8B 46 B2 |... 1000.e)...F.|
00000D50: 31 A7 20 40 DF 2C 58 2C 59 2C 31 2C 31 32 38 3A |1. @.,X,Y,1,128:|
00000D60: 89 31 35 34 30 00 8A 29 FA 05 8B 46 B2 30 20 A7 |.1540..)...F.0 .|
00000D70: 20 40 EB 54 2C 58 2C 59 2C 31 3A 40 EB 54 2C 58 | @.T,X,Y,1:@.T,X|
00000D80: 2C 59 2C 31 3A 89 31 35 31 30 00 9F 29 04 06 A1 |,Y,1:.1510..)...|
00000D90: 41 24 3A 8B 41 24 B2 22 22 A7 20 31 35 31 30 00 |A$:.A$."". 1510.|
00000DA0: BC 29 0E 06 8B 41 24 B2 22 20 22 A7 20 40 44 52 |.)...A$." ". @DR|
00000DB0: 57 4D 4F 44 2C 31 3A 20 89 32 30 30 00 C7 29 18 |WMOD,1: .200..).|
00000DC0: 06 89 20 31 35 31 30 00 D7 29 40 06 8F 20 54 45 |.. 1510..)@.. TE|
00000DD0: 58 54 20 4D 4F 44 45 00 E7 29 42 06 53 50 B2 35 |XT MODE..)B.SP.5|
00000DE0: 20 3A 53 24 B2 22 22 00 F2 29 4A 06 8D 20 31 30 | :S$.""..)J.. 10|
00000DF0: 30 30 00 18 2A 4F 06 8B 46 B2 31 A7 20 58 31 B2 |00..*O..F.1. X1.|
00000E00: 58 3A 59 31 B2 59 3A 58 32 B2 58 31 3A 59 32 B2 |X:Y1.Y:X2.X1:Y2.|
00000E10: 59 31 3A 89 31 36 32 30 00 40 2A 51 06 40 EB 54 |Y1:.1620.@*Q.@.T|
00000E20: 2C 58 2C 59 2C 31 3A 40 EB 54 2C 58 2C 59 2C 30 |,X,Y,1:@.T,X,Y,0|
00000E30: 3A A1 41 24 3A 8B 41 24 B2 22 22 A7 31 36 31 30 |:.A$:.A$."".1610|
00000E40: 00 56 2A 52 06 8B 41 24 B2 22 20 22 A7 32 30 30 |.V*R..A$." ".200|
00000E50: 3A D5 31 36 31 30 00 65 2A 54 06 81 54 B2 31 A4 |:.1610.e*T..T.1.|
00000E60: 35 30 30 3A 82 00 75 2A 59 06 53 50 B2 31 3A 8D |500:..u*Y.SP.1:.|
00000E70: 20 31 30 30 30 00 83 2A 5A 06 8B 46 B2 31 A7 31 | 1000..*Z..F.1.1|
00000E80: 36 34 30 00 A4 2A 5E 06 57 B2 B6 28 58 31 AB 58 |640..*^.W..(X1.X|
00000E90: 29 3A 48 B2 B6 28 59 31 AB 59 29 3A 8B 57 B2 36 |):H..(Y1.Y):.W.6|
00000EA0: A7 57 B2 35 00 DB 2A 5F 06 40 E5 2C 58 31 2C 59 |.W.5..*_.@.,X1,Y|
00000EB0: 31 2C 58 31 AA 57 AC 38 2C 59 31 2C 31 3A 40 E5 |1,X1.W.8,Y1,1:@.|
00000EC0: 2C 58 31 2C 59 31 2C 58 31 AA 57 AC 38 2C 59 31 |,X1,Y1,X1.W.8,Y1|
00000ED0: 2C 31 3A 8B 48 B2 37 A7 48 B2 36 00 11 2B 60 06 |,1:.H.7.H.6..+`.|
00000EE0: 40 E1 2C 58 31 2C 59 31 2C 58 31 AA 57 AC 38 2C |@.,X1,Y1,X1.W.8,|
00000EF0: 59 31 AA 48 AC 38 2C 31 3A 40 E1 2C 58 31 2C 59 |Y1.H.8,1:@.,X1,Y|
00000F00: 31 2C 58 31 AA 57 AC 38 2C 59 31 AA 48 AC 38 2C |1,X1.W.8,Y1.H.8,|
00000F10: 31 00 26 2B 67 06 81 54 B2 31 A4 32 30 30 3A 82 |1.&+g..T.1.200:.|
00000F20: 3A 89 31 36 32 35 00 3C 2B 68 06 A1 20 41 24 3A |:.1625.<+h.. A$:|
00000F30: 8B 41 24 B2 22 22 A7 20 31 36 34 30 00 71 2B 6D |.A$."". 1640.q+m|
00000F40: 06 40 E0 2C 35 35 32 39 36 2C 58 31 2C 59 31 2C |.@.,55296,X1,Y1,|
00000F50: 48 2C 57 2C 22 18 22 AA 41 24 AA 22 05 22 3A 58 |H,W,".".A$.".":X|
00000F60: 31 B2 58 31 AA 57 AC 38 3A 53 24 B2 53 24 AA 41 |1.X1.W.8:S$.S$.A|
00000F70: 24 00 8C 2B 6E 06 8B 41 24 B2 C7 28 31 33 29 A7 |$..+n..A$..(13).|
00000F80: 20 31 36 34 39 3A D5 20 31 36 34 30 00 99 2B 71 | 1649:. 1640..+q|
00000F90: 06 46 54 B2 35 35 32 39 36 00 BE 2B 72 06 40 FE |.FT.55296..+r.@.|
00000FA0: 1F 2C 41 44 28 50 29 2C 33 35 30 2C 35 30 2C 36 |.,AD(P),350,50,6|
00000FB0: 33 39 2C 31 35 30 3A 8D 20 32 30 30 30 30 00 D6 |39,150:. 20000..|
00000FC0: 2B 73 06 40 E1 2C 33 35 30 2C 35 30 2C 36 33 39 |+s.@.,350,50,639|
00000FD0: 2C 31 35 30 2C 31 00 01 2C 74 06 40 E0 2C 35 35 |,150,1..,t.@.,55|
00000FE0: 32 39 36 2C 33 35 32 2C 35 32 2C 32 2C 31 2C 22 |296,352,52,2,1,"|
00000FF0: 54 45 58 54 20 45 44 49 54 4F 52 20 4D 45 4E 55 |TEXT EDITOR MENU|
00001000: 22 00 25 2C 75 06 40 E0 2C 35 35 32 39 36 2C 33 |".%,u.@.,55296,3|
00001010: 35 32 2C 38 30 2C 31 2C 31 2C 22 28 4B 29 45 45 |52,80,1,1,"(K)EE|
00001020: 50 20 49 54 22 00 4A 2C 76 06 40 E0 2C 35 35 32 |P IT".J,v.@.,552|
00001030: 39 36 2C 33 35 32 2C 39 30 2C 31 2C 31 2C 22 28 |96,352,90,1,1,"(|
00001040: 45 29 52 41 53 45 20 49 54 22 00 73 2C 77 06 40 |E)RASE IT".s,w.@|
00001050: E0 2C 35 35 32 39 36 2C 33 35 32 2C 31 30 30 2C |.,55296,352,100,|
00001060: 31 2C 31 2C 22 28 43 29 48 41 4E 47 45 20 46 4F |1,1,"(C)HANGE FO|
00001070: 4E 54 22 00 9A 2C 78 06 40 E0 2C 35 35 32 39 36 |NT"..,x.@.,55296|
00001080: 2C 33 35 32 2C 31 31 30 2C 31 2C 31 2C 22 28 55 |,352,110,1,1,"(U|
00001090: 29 4E 44 45 52 4C 49 4E 45 22 00 C0 2C 79 06 40 |)NDERLINE"..,y.@|
000010A0: E0 2C 35 35 32 39 36 2C 33 35 32 2C 31 33 30 2C |.,55296,352,130,|
000010B0: 32 2C 31 2C 22 53 45 4C 45 43 54 49 4F 4E 3A 22 |2,1,"SELECTION:"|
000010C0: 00 C9 2C 7C 06 A1 F9 41 24 00 F4 2C 7D 06 40 FE |..,|...A$..,}.@.|
000010D0: 21 2C 41 44 28 50 AB 31 29 2C 33 35 30 2C 35 30 |!,AD(P.1),350,50|
000010E0: 3A 41 44 28 50 29 B2 41 44 28 50 AB 31 29 3A 50 |:AD(P).AD(P.1):P|
000010F0: B2 50 AB 31 00 07 2D 7E 06 8B 20 41 24 B2 22 4B |.P.1..-~.. A$."K|
00001100: 22 A7 20 31 36 37 30 00 1A 2D 7F 06 8B 20 41 24 |". 1670..-... A$|
00001110: B2 22 45 22 A7 20 31 36 37 35 00 2D 2D 80 06 8B |."E". 1675.--...|
00001120: 20 41 24 B2 22 43 22 A7 20 31 36 38 30 00 40 2D | A$."C". 1680.@-|
00001130: 81 06 8B 20 41 24 B2 22 55 22 A7 20 31 36 39 31 |... A$."U". 1691|
00001140: 00 4B 2D 83 06 89 20 31 36 35 30 00 59 2D 86 06 |.K-... 1650.Y-..|
00001150: 8F 20 4B 45 45 50 20 49 54 00 78 2D 87 06 40 E0 |. KEEP IT.x-..@.|
00001160: 2C 46 54 2C 58 32 2C 59 31 2C 48 2C 57 2C 22 05 |,FT,X2,Y1,H,W,".|
00001170: 22 AA 53 24 AA 22 05 22 00 8C 2D 88 06 40 44 52 |".S$."."..-..@DR|
00001180: 57 4D 4F 44 2C 31 3A 89 20 32 30 30 00 9B 2D 8B |WMOD,1:. 200..-.|
00001190: 06 8F 20 45 52 41 53 45 20 49 54 00 BA 2D 8C 06 |.. ERASE IT..-..|
000011A0: 40 E0 2C 46 54 2C 58 32 2C 59 31 2C 48 2C 57 2C |@.,FT,X2,Y1,H,W,|
000011B0: 22 18 22 AA 53 24 AA 22 05 22 00 CE 2D 8D 06 40 |".".S$."."..-..@|
000011C0: 44 52 57 4D 4F 44 2C 31 3A 89 20 32 30 30 00 FB |DRWMOD,1:. 200..|
000011D0: 2D 90 06 40 E0 2C 46 54 2C 58 32 2C 59 31 2C 48 |-..@.,FT,X2,Y1,H|
000011E0: 2C 57 2C 22 18 22 AA 53 24 AA 22 05 22 3A 8F 20 |,W,".".S$.".":. |
000011F0: 43 48 41 4E 47 45 20 46 4F 4E 54 00 20 2E 91 06 |CHANGE FONT. ...|
00001200: 40 FE 1F 2C 41 44 28 50 29 2C 33 35 30 2C 35 30 |@..,AD(P),350,50|
00001210: 2C 36 33 39 2C 31 35 30 3A 8D 20 32 30 30 30 30 |,639,150:. 20000|
00001220: 00 5D 2E 92 06 40 E1 2C 33 35 30 2C 35 30 2C 36 |.]...@.,350,50,6|
00001230: 33 39 2C 31 35 30 2C 31 3A 40 E0 2C 35 35 32 39 |39,150,1:@.,5529|
00001240: 36 2C 33 35 32 2C 35 32 2C 32 2C 31 2C 22 46 4F |6,352,52,2,1,"FO|
00001250: 4E 54 20 53 45 4C 45 43 54 49 4F 4E 22 00 A5 2E |NT SELECTION"...|
00001260: 93 06 40 E0 2C 35 35 32 39 36 2C 33 35 32 2C 37 |..@.,55296,352,7|
00001270: 30 2C 31 2C 31 2C 22 28 4E 29 4F 52 4D 41 4C 22 |0,1,1,"(N)ORMAL"|
00001280: 3A 40 E0 2C 35 35 32 39 36 2C 33 35 32 2C 38 30 |:@.,55296,352,80|
00001290: 2C 31 2C 31 2C 22 28 53 29 50 45 43 49 41 4C 20 |,1,1,"(S)PECIAL |
000012A0: 46 4F 4E 54 22 00 CB 2E 94 06 40 E0 2C 35 35 32 |FONT".....@.,552|
000012B0: 39 36 2C 33 35 32 2C 31 31 30 2C 31 2C 31 2C 22 |96,352,110,1,1,"|
000012C0: 53 45 4C 45 43 54 49 4F 4E 3A 22 00 D5 2E 95 06 |SELECTION:".....|
000012D0: A1 F9 20 41 24 00 EB 2E 97 06 8B 41 24 B2 22 53 |.. A$......A$."S|
000012E0: 22 A7 20 46 54 B2 31 32 39 39 32 00 2B 2F 99 06 |". FT.12992.+/..|
000012F0: 40 E0 2C 46 54 2C 58 32 2C 59 31 2C 48 2C 57 2C |@.,FT,X2,Y1,H,W,|
00001300: 22 18 22 AA 53 24 AA 22 05 22 3A 40 FE 21 2C 41 |".".S$.".":@.!,A|
00001310: 44 28 50 AB 31 29 2C 33 35 30 2C 35 30 3A 41 44 |D(P.1),350,50:AD|
00001320: 28 50 29 B2 41 44 28 50 AB 31 29 00 36 2F 9A 06 |(P).AD(P.1).6/..|
00001330: 89 20 31 36 35 30 00 49 2F 9B 06 8F 20 55 4E 44 |. 1650.I/... UND|
00001340: 45 52 4C 49 4E 45 20 49 54 00 6C 2F 9C 06 40 E0 |ERLINE IT.l/..@.|
00001350: 2C 46 54 2C 58 32 2C 59 31 2C 48 2C 57 2C 22 15 |,FT,X2,Y1,H,W,".|
00001360: 22 AA 53 24 AA 22 0E 22 AA 22 05 22 00 7E 2F 9D |".S$.".".".".~/.|
00001370: 06 53 24 B2 22 15 22 AA 53 24 AA 22 0E 22 00 89 |.S$.".".S$."."..|
00001380: 2F 9E 06 89 20 31 36 35 30 00 94 2F A4 06 8F 20 |/... 1650../... |
00001390: 53 41 56 45 00 CA 2F A5 06 40 E0 2C 35 35 32 39 |SAVE../..@.,5529|
000013A0: 36 2C 33 32 30 2C 31 37 35 2C 31 2C 31 2C 22 45 |6,320,175,1,1,"E|
000013B0: 4E 54 45 52 20 46 49 4C 45 20 4E 41 4D 45 3A 22 |NTER FILE NAME:"|
000013C0: 3A 49 B2 30 3A 46 24 B2 22 22 00 E3 2F A6 06 A1 |:I.0:F$.""../...|
000013D0: F9 41 24 3A 8B 41 24 B2 C7 28 31 33 29 A7 20 31 |.A$:.A$..(13). 1|
000013E0: 37 35 30 00 0C 30 AE 06 46 24 B2 46 24 AA 41 24 |750..0..F$.F$.A$|
000013F0: 3A 40 E0 2C 31 32 39 39 32 2C 34 34 38 AA 49 AC |:@.,12992,448.I.|
00001400: 38 2C 31 37 35 2C 31 2C 31 2C 41 24 00 1C 30 B8 |8,175,1,1,A$..0.|
00001410: 06 49 B2 49 AA 31 3A 89 31 37 30 32 00 49 30 D6 |.I.I.1:.1702.I0.|
00001420: 06 40 E0 2C 35 35 32 39 36 2C 33 32 30 2C 31 37 |.@.,55296,320,17|
00001430: 35 2C 31 2C 31 2C 22 18 45 4E 54 45 52 20 46 49 |5,1,1,".ENTER FI|
00001440: 4C 45 20 4E 41 4D 45 3A 22 00 6F 30 D7 06 58 24 |LE NAME:".o0..X$|
00001450: B2 22 18 22 AA 46 24 3A 40 E0 2C 31 32 39 39 32 |.".".F$:@.,12992|
00001460: 2C 33 34 38 2C 31 37 35 2C 31 2C 31 2C 58 24 00 |,348,175,1,1,X$.|
00001470: 7B 30 DB 06 40 94 2C 31 2C 46 24 00 85 30 E0 06 |{0..@.,1,F$..0..|
00001480: 89 20 32 30 30 00 91 30 08 07 8F 20 45 52 41 53 |. 200..0... ERAS|
00001490: 45 00 9A 30 12 07 53 50 B2 36 00 A5 30 1C 07 8D |E..0..SP.6..0...|
000014A0: 20 31 30 30 30 00 B4 30 26 07 8B 46 B2 31 A7 20 | 1000..0&..F.1. |
000014B0: 31 38 35 30 00 EC 30 30 07 40 E1 2C 58 AB 33 2C |1850..00.@.,X.3,|
000014C0: 59 AB 33 2C 58 AA 33 2C 59 AA 33 2C 31 3A 81 54 |Y.3,X.3,Y.3,1:.T|
000014D0: B2 31 A4 31 30 3A 82 3A 40 E1 2C 58 AB 33 2C 59 |.1.10:.:@.,X.3,Y|
000014E0: AB 33 2C 58 AA 33 2C 59 AA 33 2C 31 00 01 31 31 |.3,X.3,Y.3,1..11|
000014F0: 07 A1 41 24 3A 8B 41 24 B2 22 22 A7 20 31 38 32 |..A$:.A$."". 182|
00001500: 30 00 12 31 32 07 8B 41 24 B2 22 20 22 A7 20 32 |0..12..A$." ". 2|
00001510: 30 30 00 1D 31 33 07 89 20 31 38 32 30 00 69 31 |00..13.. 1820.i1|
00001520: 3A 07 40 E1 2C 58 AB 34 2C 59 AB 34 2C 58 AA 34 |:.@.,X.4,Y.4,X.4|
00001530: 2C 59 AA 34 2C 31 3A 81 54 B2 30 A4 33 3A 40 E1 |,Y.4,1:.T.0.3:@.|
00001540: 2C 58 AB 54 2C 59 AB 54 2C 58 AA 54 2C 59 AA 54 |,X.T,Y.T,X.T,Y.T|
00001550: 2C 30 3A 82 3A 40 E1 2C 58 AB 34 2C 59 AB 34 2C |,0:.:@.,X.4,Y.4,|
00001560: 58 AA 34 2C 59 AA 34 2C 31 00 7E 31 44 07 A1 41 |X.4,Y.4,1.~1D..A|
00001570: 24 3A 8B 41 24 B2 22 20 22 A7 20 32 30 30 00 89 |$:.A$." ". 200..|
00001580: 31 4E 07 89 20 31 38 32 30 00 98 31 6C 07 8F 20 |1N.. 1820..1l.. |
00001590: 41 49 52 42 52 55 53 48 00 A1 31 6D 07 53 50 B2 |AIRBRUSH..1m.SP.|
000015A0: 35 00 AC 31 6E 07 8D 20 31 30 30 30 00 C8 31 6F |5..1n.. 1000..1o|
000015B0: 07 8B 46 B2 31 20 A7 20 40 44 52 57 4D 4F 44 2C |..F.1 . @DRWMOD,|
000015C0: 30 3A 89 20 31 39 32 30 00 EE 31 76 07 40 EB 54 |0:. 1920..1v.@.T|
000015D0: 2C 58 2C 59 2C 31 3A 81 54 B2 31 A4 31 30 3A 82 |,X,Y,1:.T.1.10:.|
000015E0: 3A 40 EB 54 2C 58 2C 59 2C 31 3A A1 41 24 00 FF |:@.T,X,Y,1:.A$..|
000015F0: 31 77 07 8B 41 24 B2 22 22 A7 20 31 39 30 32 00 |1w..A$."". 1902.|
00001600: 10 32 78 07 8B 41 24 B2 22 20 22 A7 20 32 30 30 |.2x..A$." ". 200|
00001610: 00 1B 32 79 07 89 20 31 39 30 32 00 4B 32 80 07 |..2y.. 1902.K2..|
00001620: 81 20 54 B2 20 31 20 A4 20 31 30 3A 58 4F B2 B5 |. T. 1 . 10:XO..|
00001630: 28 32 30 AC BB 28 31 29 29 AA 31 3A 59 4F B2 B5 |(20..(1)).1:YO..|
00001640: 28 31 30 AC BB 28 31 29 29 AA 31 00 6A 32 85 07 |(10..(1)).1.j2..|
00001650: 40 EB 54 2C 28 58 AB 31 30 29 AB 58 4F 2C 28 59 |@.T,(X.10).XO,(Y|
00001660: AB 35 29 AA 59 4F 2C 31 3A 82 00 8B 32 8A 07 A1 |.5).YO,1:...2...|
00001670: 41 24 3A 8B 41 24 B2 22 22 A7 20 40 44 52 57 4D |A$:.A$."". @DRWM|
00001680: 4F 44 2C 31 3A 89 20 31 39 30 32 00 A7 32 8F 07 |OD,1:. 1902..2..|
00001690: 8B 41 24 B2 22 20 22 A7 20 44 52 57 4D 4F 44 2C |.A$." ". DRWMOD,|
000016A0: 31 3A 89 20 32 30 30 00 BB 32 94 07 44 52 57 4D |1:. 200..2..DRWM|
000016B0: 4F 44 2C 31 3A 89 20 31 39 30 32 00 C7 32 9E 07 |OD,1:. 1902..2..|
000016C0: 40 93 2C 31 2C 46 24 00 D1 32 A8 07 89 20 32 30 |@.,1,F$..2... 20|
000016D0: 30 00 DC 32 D0 07 8F 20 4C 4F 41 44 00 EA 32 D1 |0..2... LOAD..2.|
000016E0: 07 49 B2 30 3A 46 24 B2 22 22 00 16 33 D5 07 40 |.I.0:F$.""..3..@|
000016F0: E0 2C 35 35 32 39 36 2C 33 32 30 2C 31 37 35 2C |.,55296,320,175,|
00001700: 31 2C 31 2C 22 45 4E 54 45 52 20 46 49 4C 45 20 |1,1,"ENTER FILE |
00001710: 4E 41 4D 45 3A 22 00 2F 33 DA 07 A1 F9 41 24 3A |NAME:"./3....A$:|
00001720: 8B 41 24 B2 C7 28 31 33 29 A7 20 32 30 35 30 00 |.A$..(13). 2050.|
00001730: 55 33 E4 07 40 E0 2C 31 32 39 39 32 2C 34 34 38 |U3..@.,12992,448|
00001740: AA 38 AC 49 2C 31 37 35 2C 31 2C 31 2C 41 24 3A |.8.I,175,1,1,A$:|
00001750: 49 B2 49 AA 31 00 62 33 E9 07 46 24 B2 46 24 AA |I.I.1.b3..F$.F$.|
00001760: 41 24 00 6D 33 EE 07 89 20 32 30 31 30 00 9A 33 |A$.m3... 2010..3|
00001770: F8 07 40 E0 2C 35 35 32 39 36 2C 33 32 30 2C 31 |..@.,55296,320,1|
00001780: 37 35 2C 31 2C 31 2C 22 18 45 4E 54 45 52 20 46 |75,1,1,".ENTER F|
00001790: 49 4C 45 20 4E 41 4D 45 3A 22 00 C0 33 F9 07 58 |ILE NAME:"..3..X|
000017A0: 24 B2 22 18 22 AA 46 24 3A 40 E0 2C 31 32 39 39 |$.".".F$:@.,1299|
000017B0: 32 2C 33 34 38 2C 31 37 35 2C 31 2C 31 2C 58 24 |2,348,175,1,1,X$|
000017C0: 00 CC 33 02 08 40 93 2C 31 2C 46 24 00 D6 33 0C |..3..@.,1,F$..3.|
000017D0: 08 89 20 32 30 30 00 E9 33 34 08 8F 20 45 52 41 |.. 200..34.. ERA|
000017E0: 53 45 20 53 43 52 45 45 4E 00 12 34 35 08 40 E0 |SE SCREEN..45.@.|
000017F0: 2C 35 35 32 39 36 2C 33 32 30 2C 31 37 35 2C 31 |,55296,320,175,1|
00001800: 2C 31 2C 22 41 52 45 20 59 4F 55 20 53 55 52 45 |,1,"ARE YOU SURE|
00001810: 3F 22 00 30 34 36 08 A1 F9 41 24 3A 8B 41 24 B2 |?".046...A$:.A$.|
00001820: 22 59 22 A7 20 40 9C 2C 30 20 3A 89 20 32 30 30 |"Y". @.,0 :. 200|
00001830: 00 5A 34 37 08 40 E0 2C 35 35 32 39 36 2C 33 32 |.Z47.@.,55296,32|
00001840: 30 2C 31 37 35 2C 31 2C 31 2C 22 18 41 52 45 20 |0,175,1,1,".ARE |
00001850: 59 4F 55 20 53 55 52 45 3F 22 00 64 34 38 08 89 |YOU SURE?".d48..|
00001860: 20 32 30 30 00 6D 34 3F 08 40 9C 2C 30 00 77 34 | 200.m4?.@.,0.w4|
00001870: 40 08 89 20 32 30 30 00 82 34 98 08 8F 20 51 55 |@.. 200..4... QU|
00001880: 49 54 00 B5 34 99 08 40 E0 2C 35 35 32 39 36 2C |IT..4..@.,55296,|
00001890: 33 32 30 2C 31 37 35 2C 31 2C 31 2C 22 51 55 49 |320,175,1,1,"QUI|
000018A0: 54 2C 20 41 52 45 20 59 4F 55 20 50 4F 53 49 54 |T, ARE YOU POSIT|
000018B0: 49 56 45 3F 22 00 BF 34 9A 08 A1 F9 20 41 24 00 |IVE?"..4.... A$.|
000018C0: 03 35 9B 08 8B 20 41 24 B3 B1 22 59 22 A7 20 40 |.5... A$.."Y". @|
000018D0: E0 2C 35 35 32 39 36 2C 33 32 30 2C 31 37 35 2C |.,55296,320,175,|
000018E0: 31 2C 31 2C 22 18 51 55 49 54 2C 20 41 52 45 20 |1,1,".QUIT, ARE |
000018F0: 59 4F 55 20 50 4F 53 49 54 49 56 45 3F 22 3A 89 |YOU POSITIVE?":.|
00001900: 32 30 30 00 0F 35 9C 08 40 54 45 58 54 3A 80 00 |200..5..@TEXT:..|
00001910: 42 35 10 27 8F 20 47 4F 54 4F 20 54 45 58 54 20 |B5.'. GOTO TEXT |
00001920: 4D 4F 44 45 2C 20 50 52 49 4E 54 20 53 54 41 54 |MODE, PRINT STAT|
00001930: 55 53 20 41 4E 44 20 45 4E 44 20 50 52 4F 47 52 |US AND END PROGR|
00001940: 41 4D 00 5A 35 1A 27 40 54 45 58 54 3A EA 3A 99 |AM.Z5.'@TEXT:.:.|
00001950: D3 28 45 52 29 3B 45 4C 3A 80 00 74 35 E0 2E FE |.(ER);EL:..t5...|
00001960: 0D 23 31 2C 22 44 4F 43 2E 55 4C 54 52 41 48 49 |.#1,"DOC.ULTRAHI|
00001970: 31 2E 31 22 00 8B 35 E1 2E A1 23 31 2C 41 24 3A |1.1"..5...#1,A$:|
00001980: 99 41 24 3B 3A 89 31 32 30 30 31 00 B1 35 20 4E |.A$;:.12001..5 N|
00001990: 50 B2 50 AA 31 3A 41 44 28 50 29 B2 C2 28 32 35 |P.P.1:AD(P)..(25|
000019A0: 30 29 AA C2 28 32 35 31 29 AC 32 35 36 AA 31 3A |0)..(251).256.1:|
000019B0: 8E 00 CE 35 21 4E 41 44 B2 C2 28 32 35 30 29 AA |...5!NAD..(250).|
000019C0: C2 28 32 35 31 29 AC 32 35 36 AA 31 3A 8E 00 00 |.(251).256.1:...|
000019D0: 00 |. |
..+....%:.47,0:.48,200:.:@.,0:@.,0,2:W10
010.Y....A$(12):.P(1000):.."COMPUTER FON
T",P12992.{.2..T.1.12:. A$(T):.:X.320:Y.
100.B.<.. DRAW,LINE,BOX,CIRCLE,PAINT,TEX
T,SAVE,ERASE,BRUSH,LOAD,CLEAR,QUIT.P.D.@
DRWMOD,1...I.@.,12992,60,5,5,5,"ULTRA HI
-RES"...J.@.,12992,140,70,6,6,"DRAW!".B.
N.@., 0,150,639,150,1:@.,639,150,639,199
,1.K.X.@., 0,150,0,199,1:@.,0,199,639,19
9,1.....@., 100,150,100,199,1:@., 200,15
0,200,199,1:@., 300,150,300,199,1.....@.
, 400,150,400,199,1:@., 500,150,500,199,
1:@., 600,150,600,199,1.....@., 0,175,60
0,175,1.B. .X.8:. T.1.6:@.,55296,X,152,1
,2,A$(T):X.X.100:..V...X.8:. T.7.12:@.,5
5296,X,177,1,2,A$(T):X.X.100:......@.,12
992,608,190,1,1,"P-S".....@..,0,0,150,63
9,199:. 20000:@.,0.O.H.X.320:Y.125:SP.5.
..I.@..,AD(P),0,150,639,199...J.@.!,0,0,
150...R.. 20000:. READ NEXT STASH.:.W..
1000 :. GET MOUSE MOVEMENT.J.... F.1 . 2
70.C...@.,X.1,Y.1,X.1,Y.1,1.|...@.,X.1,Y
.1,X.1,Y.1,1...... 215.....XP.X:YP.Y....
..Y.150 . 2000.C.,.. DECIPHER ITEM SELEC
TED...6.. Y.175 . R.1:U R.0...@.. X.600
. 2000.. J.. X.500 . C.6:. 400.. T.. X.4
00 . C.5:. 400.6 ^.. X.300 . C.4:. 400.N
H.. X.200 . C.3:. 400.F R.. X.100 . C.2
:. 400.N |.C.1.. ... USE R&C TO FIND COM
MAND.. ...R.1. CO.C.6:U CO.C.. ..@.!,AD(
P.1),0,150..!B.. CO . 1100,1200,1300,140
0,1500,1600,1700,1800,1900,2000,2100,220
0..!... MOUSE ROUTINE..!..F.0.2!... O(2)
.127 . F.1.I!..J.O(2) . 15:.J.0...{!...
J . 1031,1032,1033,1034,1035,1036,1037,1
038..!..Y.Y.SP:.1040..!..Y.Y.SP:X.X.SP:.
1040..!..X.X.SP:.1040.M!..Y.Y.SP:X.X.SP:
.1040..!..Y.Y.SP:.1040..!..Y.Y.SP:X.X.SP
:.1040.."..X.X.SP:.1040.."..Y.Y.SP:X.X.S
P:.1040.1"...X.630. X.630.B"...X.10 . X.
10.T"...Y.190. Y.190.E"...Y.10 . Y.10.K"
....~"L.. DRAW ROUTINE.."Q.SP.1.."V.. 10
00.."`..F.1 . @DRWMOD,0:@.T,X,Y,1:@DRWMO
D,1.."J..F.0 . @DRWMOD,1:@.T,X,Y,1:.T.1.
10:@.T,X,Y,1..#T..A$:.A$."".1110..#~..A$
." " . 200..#.. 1110.0#... LINE ROUTINE
.9#..SP.5.D#... 1000.Y#D..F.1 . F.0:.124
0..#N.@.,X.1,Y.1,X.1,Y.1,1:@.,X.1,Y.1,X.
1,Y.1,1..#S..A$:.A$."". 1210..#T..A$." "
.200..#U.. 1210.Q#X.X1.X:Y1.Y:.T.1.1000:
...#... 1000..#...F.1. 1270..$..@.,X1,Y1
,X,Y,1:@.,X1,Y1,X,Y,1.!$...A$:.A$."".124
5.2$...A$." ". 200.=$... 1245.D$..@DRWMO
D,0:@.,X1,Y1,X,Y,1:@DRWMOD,1.Y$...A$:.A$
."". 1210..$...A$." ". 200..$... 1210..$
... BOX ROUTINE..$..SP.5..$... 1000..$(.
.F.1 . X1.X:Y1.Y:.T.1.200:.:.1340..%2.@.
,X.1,Y.1,X.1,Y.1,1:@.,X.1,Y.1,X.1,Y.1,1.
.%7.. 1310.%%<.. 1000.Z%A..F.1 . @DRWMOD
,0:@.,X1,Y1,X,Y,1:@DRWMOD,1:. 1360.|%F.@
.,X1,Y1,X,Y,1:@.,X1,Y1,X,Y,1..%K.. 1340.
.%P..A$:.A$."".1310..%U..A$." " .200..%Z
.. 1310.L%X.. CIRCLE ROUTINE.U%Y.SP.5..%
... 1000..&... F.1. XC.X:YC.Y:.T.1.200:.
:.1440.4&..@.,X.1,Y.1,X.1,Y.1,1:@.,X.1,Y
.1,X.1,Y.1,1.B&..@.,X.1,Y.1,X.1,Y.1,1:@.
,X.1,Y.1,X.1,Y.1,1.M&... 1410.X& .. 1000
..&...F.1. @DRWMOD,0:@.,1,XC,YC,.(XC.X),
.(YC.Y):@DRWMOD,1:.1470..&..@.T,XC.(.(XC
.X)),YC.(.(YC.Y)),1:@.T,XC.(.(XC.X)),YC.
(.(YC.Y)),1.?'..@.T,XC.(.(XC.X)),YC.(.(Y
C.Y)),1:@.T,XC.(.(XC.X)),YC.(.(YC.Y)),1.
J'... 1440._'...A$:.A$."". 1410.P'H..A$.
" ". 200.{'R.. 1410..'... PAINT ROUTINE.
S'..@.,12992,1,170,1,1,"NOTE: THE PAINT
ROUTINE DUMPS YOU INTO THE"..(..@.,12992
,1,180,1,1,"MONITOR FOR SOME REASON, I A
M WORKING ON IT!".L(..@.,12992,1,190,1,1
," PRESS <SPACE>".U(....A$..(
..@.,12992,1,170,1,1,".NOTE: THE PAINT R
OUTINE DUMPS YOU INTO THE"..(..@.,12992,
1,180,1,1,".MONITOR FOR SOME REASON, I A
M WORKING ON IT!"..)..@.,12992,1,190,1,1
,". PRESS <SPACE>"..)... 200.
*)... 1000.=)..SP.1:@DRWMOD,0.H)... 1000
.E)...F.1. @.,X,Y,1,128:.1540..)...F.0 .
@.T,X,Y,1:@.T,X,Y,1:.1510..)...A$:.A$."
". 1510..)...A$." ". @DRWMOD,1: .200.G).
.. 1510.W)@.. TEXT MODE..)B.SP.5 :S$."".
.)J.. 1000..*O..F.1. X1.X:Y1.Y:X2.X1:Y2.
Y1:.1620.@*Q.@.T,X,Y,1:@.T,X,Y,0:.A$:.A$
."".1610.V*R..A$." ".200:U1610.E*T..T.1.
500:..U*Y.SP.1:. 1000..*Z..F.1.1640..*^.
W..(X1.X):H..(Y1.Y):.W.6.W.5..*_.@.,X1,Y
1,X1.W.8,Y1,1:@.,X1,Y1,X1.W.8,Y1,1:.H.7.
H.6..+`.@.,X1,Y1,X1.W.8,Y1.H.8,1:@.,X1,Y
1,X1.W.8,Y1.H.8,1.&+G..T.1.200:.:.1625.<
+H.. A$:.A$."". 1640.Q+M.@.,55296,X1,Y1,
H,W,".".A$.".":X1.X1.W.8:S$.S$.A$..+N..A
$.G(13). 1649:U 1640..+Q.FT.55296..+R.@.
.,AD(P),350,50,639,150:. 20000.V+S.@.,35
0,50,639,150,1..,T.@.,55296,352,52,2,1,"
TEXT EDITOR MENU".%,U.@.,55296,352,80,1,
1,"(K)EEP IT".J,V.@.,55296,352,90,1,1,"(
E)RASE IT".S,W.@.,55296,352,100,1,1,"(C)
HANGE FONT"..,X.@.,55296,352,110,1,1,"(U
)NDERLINE"..,Y.@.,55296,352,130,2,1,"SEL
ECTION:".I,|...A$..,}.@.!,AD(P.1),350,50
:AD(P).AD(P.1):P.P.1..-~.. A$."K". 1670.
.-.. A$."E". 1675.--... A$."C". 1680.@-
... A$."U". 1691.K-... 1650.Y-... KEEP I
T.X-..@.,FT,X2,Y1,H,W,".".S$."."..-..@DR
WMOD,1:. 200..-... ERASE IT..-..@.,FT,X2
,Y1,H,W,".".S$.".".N-..@DRWMOD,1:. 200..
-..@.,FT,X2,Y1,H,W,".".S$.".":. CHANGE F
ONT. ...@..,AD(P),350,50,639,150:. 20000
.]...@.,350,50,639,150,1:@.,55296,352,52
,2,1,"FONT SELECTION".....@.,55296,352,7
0,1,1,"(N)ORMAL":@.,55296,352,80,1,1,"(S
)PECIAL FONT".K...@.,55296,352,110,1,1,"
SELECTION:".U..... A$......A$."S". FT.12
992.+/..@.,FT,X2,Y1,H,W,".".S$.".":@.!,A
D(P.1),350,50:AD(P).AD(P.1).6/... 1650.I
/... UNDERLINE IT.L/..@.,FT,X2,Y1,H,W,".
".S$.".".".".~/..S$.".".S$."."../... 165
0../... SAVE.J/..@.,55296,320,175,1,1,"E
NTER FILE NAME:":I.0:F$.""../....A$:.A$.
G(13). 1750..0..F$.F$.A$:@.,12992,448.I.
8,175,1,1,A$..0..I.I.1:.1702.I0V.@.,5529
6,320,175,1,1,".ENTER FILE NAME:".O0W.X$
.".".F$:@.,12992,348,175,1,1,X$.{0..@.,1
,F$..0... 200..0... ERASE..0..SP.6..0...
1000..0&..F.1. 1850..00.@.,X.3,Y.3,X.3,
Y.3,1:.T.1.10:.:@.,X.3,Y.3,X.3,Y.3,1..11
..A$:.A$."". 1820..12..A$." ". 200..13..
1820.I1:.@.,X.4,Y.4,X.4,Y.4,1:.T.0.3:@.
,X.T,Y.T,X.T,Y.T,0:.:@.,X.4,Y.4,X.4,Y.4,
1.~1D..A$:.A$." ". 200..1N.. 1820..1L..
AIRBRUSH..1M.SP.5..1N.. 1000.H1O..F.1 .
@DRWMOD,0:. 1920..1V.@.T,X,Y,1:.T.1.10:.
:@.T,X,Y,1:.A$..1W..A$."". 1902..2X..A$.
" ". 200..2Y.. 1902.K2... T. 1 . 10:XO..
(20..(1)).1:YO..(10..(1)).1.J2..@.T,(X.1
0).XO,(Y.5).YO,1:...2...A$:.A$."". @DRWM
OD,1:. 1902..2...A$." ". DRWMOD,1:. 200.
.2..DRWMOD,1:. 1902.G2..@.,1,F$.Q2... 20
0..2P.. LOAD..2Q.I.0:F$.""..3U.@.,55296,
320,175,1,1,"ENTER FILE NAME:"./3Z...A$:
.A$.G(13). 2050.U3..@.,12992,448.8.I,175
,1,1,A$:I.I.1.B3..F$.F$.A$.M3... 2010..3
..@.,55296,320,175,1,1,".ENTER FILE NAME
:"..3..X$.".".F$:@.,12992,348,175,1,1,X$
.L3..@.,1,F$.V3... 200..34.. ERASE SCREE
N..45.@.,55296,320,175,1,1,"ARE YOU SURE
?".046...A$:.A$."Y". @.,0 :. 200.Z47.@.,
55296,320,175,1,1,".ARE YOU SURE?".D48..
200.M4?.@.,0.W4@.. 200..4... QUIT..4..@
.,55296,320,175,1,1,"QUIT, ARE YOU POSIT
IVE?"..4.... A$..5... A$.."Y". @.,55296,
320,175,1,1,".QUIT, ARE YOU POSITIVE?":.
200..5..@TEXT:..B5.'. GOTO TEXT MODE, PR
INT STATUS AND END PROGRAM.Z5.'@TEXT:.:.
S(ER);EL:..T5....#1,"DOC.ULTRAHI1.1"..5.
..#1,A$:.A$;:.12001..5 NP.P.1:AD(P).B(25
0).B(251).256.1:..N5!NAD.B(250).B(251).2
56.1:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL