UH.PAINTEDIT 1.1
FILE INFORMATION
FILENAME(S): UH.PAINTEDIT 1.1
FILE TYPE(S): PRG
FILE SIZE: 4.9K
FIRST SEEN: 2025-10-20 14:30:31
APPEARS ON: 1 disk(s)
FILE HASH
16939926c49e679c672e057c255ad0f2a48ee981f3e666038ccd7ccb0bd49ee7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UH ULTRA DRAW | UH.PAINTEDIT 1.1 | PRG | Treasure Chest - Klaus Der Suhler | 10 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 14 40 01 00 DE 31 2C 31 3A DE 35 3A 99 C7 |.@.@...1,1:.5:..|
00000010: 28 31 34 29 00 1B 40 02 00 D7 36 00 38 40 03 00 |(14)..@...6.8@..|
00000020: FE 11 22 55 4C 54 52 41 20 48 49 52 45 53 22 2C |.."ULTRA HIRES",|
00000030: 42 30 2C 50 37 31 36 38 00 46 40 05 00 9E 38 34 |B0,P7168.F@...84|
00000040: 34 38 3A 89 31 30 00 A3 40 06 00 FE 15 3A 99 22 |48:.10..@....:."|
00000050: 93 D0 4C 45 41 53 45 20 49 4E 53 45 52 54 20 44 |..LEASE INSERT D|
00000060: 49 53 4B 20 57 49 54 48 20 1C D5 4C 54 52 41 20 |ISK WITH ..LTRA |
00000070: C8 49 52 45 53 20 D6 31 2E 31 9F 20 4E 41 4D 45 |.IRES .1.1. NAME|
00000080: 44 20 27 D5 CC D4 D2 C1 20 C8 C9 D2 C5 D3 27 2E |D '..... .....'.|
00000090: 2E 2E C8 49 54 20 41 20 4B 45 59 22 3A A1 F9 41 |...IT A KEY":..A|
000000A0: 24 3A 8A 00 CC 40 0A 00 8F 20 55 4C 54 52 41 2D |$:...@... ULTRA-|
000000B0: 48 49 52 45 53 20 40 50 41 49 4E 54 20 47 52 41 |HIRES @PAINT GRA|
000000C0: 50 48 49 43 53 20 45 44 49 54 4F 52 00 EC 40 14 |PHICS EDITOR..@.|
000000D0: 00 8F 20 42 59 20 4D 41 52 4B 20 53 50 52 55 49 |.. BY MARK SPRUI|
000000E0: 45 4C 4C 20 30 34 2F 31 38 2F 38 36 00 00 41 19 |ELL 04/18/86..A.|
000000F0: 00 97 34 37 2C 30 3A 97 34 38 2C 31 33 32 3A 9C |..47,0:.48,132:.|
00000100: 00 0B 41 1C 00 D7 31 30 30 30 30 00 12 41 1E 00 |..A...10000..A..|
00000110: FE 25 00 29 41 28 00 81 54 B2 31 A4 38 3A 87 5A |.%.)A(..T.1.8:.Z|
00000120: 3A 4E 28 54 29 B2 5A 3A 82 00 43 41 2D 00 83 31 |:N(T).Z:..CA-..1|
00000130: 32 38 2C 36 34 2C 33 32 2C 31 36 2C 38 2C 34 2C |28,64,32,16,8,4,|
00000140: 32 2C 31 00 63 41 32 00 81 54 B2 31 A4 38 3A 87 |2,1.cA2..T.1.8:.|
00000150: 45 2C 46 3A 58 28 54 29 B2 45 3A 59 28 54 29 B2 |E,F:X(T).E:Y(T).|
00000160: 46 3A 82 00 9F 41 37 00 83 35 36 2C 32 33 2C 37 |F:...A7..56,23,7|
00000170: 35 2C 33 37 2C 39 34 2C 35 31 2C 31 30 38 2C 36 |5,37,94,51,108,6|
00000180: 35 2C 31 32 32 2C 37 39 2C 31 34 30 2C 39 33 2C |5,122,79,140,93,|
00000190: 31 35 35 2C 31 30 37 2C 31 36 39 2C 31 32 31 00 |155,107,169,121.|
000001A0: AB 41 3C 00 86 50 28 38 2C 38 29 00 B1 41 63 00 |.A<..P(8,8)..Ac.|
000001B0: 3A 00 C1 41 64 00 8F 20 44 52 41 57 20 47 52 49 |:..Ad.. DRAW GRI|
000001C0: 44 00 C7 41 65 00 3A 00 D5 41 69 00 40 44 52 57 |D..Ae.:..Ai.@DRW|
000001D0: 4D 4F 44 2C 30 00 E1 41 6E 00 40 DE 2C 31 34 2C |MOD,0..An.@.,14,|
000001E0: 31 00 EA 41 78 00 40 9C 2C 30 00 02 42 7D 00 40 |1..Ax.@.,0..B}.@|
000001F0: 57 41 4C 52 55 53 3A 81 54 B2 31 A4 31 35 30 30 |WALRUS:.T.1.1500|
00000200: 3A 82 00 14 42 80 00 40 DE 2C 31 34 2C 31 34 3A |:...B..@.,14,14:|
00000210: 40 9C 2C 30 00 2B 42 81 00 8D 34 30 30 30 3A 40 |@.,0.+B...4000:@|
00000220: 9C 2C 30 3A 40 DE 2C 31 34 2C 31 00 42 42 82 00 |.,0:@.,14,1.BB..|
00000230: 40 E1 2C 35 30 2C 32 30 2C 31 39 30 2C 31 33 32 |@.,50,20,190,132|
00000240: 2C 31 00 53 42 AA 00 81 54 B2 33 34 A4 31 33 32 |,1.SB...T.34.132|
00000250: A9 31 34 00 67 42 B4 00 40 E5 2C 35 30 2C 54 2C |.14.gB..@.,50,T,|
00000260: 31 39 30 2C 54 2C 31 00 6D 42 BE 00 82 00 7C 42 |190,T,1.mB....|B|
00000270: BF 00 8B 46 B2 31 A7 46 B2 30 3A 8E 00 82 42 C0 |...F.1.F.0:...B.|
00000280: 00 3A 00 AC 42 C3 00 8F 20 44 52 41 57 20 4E 45 |.:..B... DRAW NE|
00000290: 57 20 40 50 41 49 4E 54 20 47 52 41 50 48 49 43 |W @PAINT GRAPHIC|
000002A0: 20 44 49 53 50 4C 41 59 20 42 4F 58 00 B2 42 C5 | DISPLAY BOX..B.|
000002B0: 00 3A 00 CA 42 C8 00 40 E1 2C 34 30 30 2C 35 30 |.:..B..@.,400,50|
000002C0: 2C 35 35 30 2C 31 31 30 2C 31 00 E2 42 D2 00 40 |,550,110,1..B..@|
000002D0: E1 2C 34 32 30 2C 35 35 2C 35 33 30 2C 31 30 35 |.,420,55,530,105|
000002E0: 2C 31 00 E8 42 2B 01 3A 00 01 43 2C 01 8F 20 44 |,1..B+.:..C,.. D|
000002F0: 49 53 50 4C 41 59 20 47 52 49 44 20 43 45 4C 4C |ISPLAY GRID CELL|
00000300: 53 00 07 43 2D 01 3A 00 12 43 36 01 81 44 B2 31 |S..C-.:..C6..D.1|
00000310: A4 38 00 20 43 40 01 3A 20 20 81 43 B2 31 A4 38 |.8. C@.: .C.1.8|
00000320: 00 45 43 4A 01 3A 20 20 20 40 E0 2C 35 35 32 39 |.ECJ.: @.,5529|
00000330: 36 2C 58 28 43 29 2C 59 28 44 29 2C 31 2C 32 2C |6,X(C),Y(D),1,2,|
00000340: 22 92 18 4F 22 00 4E 43 54 01 3A 20 20 82 00 54 |"..O".NCT.: ..T|
00000350: 43 5E 01 82 00 63 43 68 01 8B 46 B2 31 A7 46 B2 |C^...cCh..F.1.F.|
00000360: 30 3A 8E 00 69 43 8F 01 3A 00 79 43 90 01 8F 20 |0:..iC..:.yC... |
00000370: 4D 41 49 4E 20 4C 4F 4F 50 00 7F 43 91 01 3A 00 |MAIN LOOP..C..:.|
00000380: 89 43 95 01 8D 32 31 30 30 00 95 43 9A 01 41 B2 |.C...2100..C..A.|
00000390: 31 3A 42 B2 31 00 B5 43 9F 01 40 E0 2C 35 35 32 |1:B.1..C..@.,552|
000003A0: 39 36 2C 58 28 41 29 2C 59 28 42 29 2C 31 2C 32 |96,X(A),Y(B),1,2|
000003B0: 2C 22 05 20 22 00 D4 43 A4 01 40 E0 2C 35 35 32 |,". "..C..@.,552|
000003C0: 39 36 2C 58 28 41 29 2C 59 28 42 29 2C 31 2C 32 |96,X(A),Y(B),1,2|
000003D0: 2C 22 2A 22 00 DD 43 B8 01 A1 F9 41 24 00 F4 43 |,"*"..C....A$..C|
000003E0: BA 01 8B 41 24 B2 22 13 22 A7 8D 35 30 35 30 3A |...A$."."..5050:|
000003F0: 89 34 34 30 00 11 44 BB 01 8B 41 24 B2 22 93 22 |.440..D...A$."."|
00000400: A7 8D 36 30 30 30 3A 8D 37 30 30 30 3A 89 34 31 |..6000:.7000:.41|
00000410: 30 00 2A 44 BD 01 8B 41 24 B2 C7 28 33 32 29 A7 |0.*D...A$..(32).|
00000420: 8D 35 30 34 30 3A 89 34 34 30 00 42 44 BE 01 8B |.5040:.440.BD...|
00000430: 41 24 B2 22 50 22 B0 41 24 B2 22 D0 22 A7 38 30 |A$."P".A$.".".80|
00000440: 30 30 00 5D 44 BF 01 8B 41 24 B2 22 51 22 B0 41 |00.]D...A$."Q".A|
00000450: 24 B2 22 D1 22 A7 40 54 45 58 54 3A 80 00 7B 44 |$.".".@TEXT:..{D|
00000460: C0 01 8B 41 24 B2 22 56 22 B0 41 24 B2 22 D6 22 |...A$."V".A$."."|
00000470: A7 8D 33 30 30 30 3A 89 34 34 30 00 99 44 C1 01 |..3000:.440..D..|
00000480: 8B 41 24 B2 22 48 22 B0 41 24 B2 22 C8 22 A7 8D |.A$."H".A$."."..|
00000490: 34 32 30 30 3A 89 34 34 30 00 B0 44 C2 01 8B 41 |4200:.440..D...A|
000004A0: 24 B2 22 1D 22 A7 8D 35 30 30 30 3A 89 36 30 30 |$."."..5000:.600|
000004B0: 00 C7 44 CC 01 8B 41 24 B2 22 9D 22 A7 8D 35 30 |..D...A$."."..50|
000004C0: 31 30 3A 89 36 30 30 00 DE 44 D6 01 8B 41 24 B2 |10:.600..D...A$.|
000004D0: 22 11 22 A7 8D 35 30 32 30 3A 89 36 30 30 00 F5 |"."..5020:.600..|
000004E0: 44 E0 01 8B 41 24 B2 22 91 22 A7 8D 35 30 33 30 |D...A$."."..5030|
000004F0: 3A 89 36 30 30 00 FE 44 4E 02 89 34 34 30 00 39 |:.600..DN..440.9|
00000500: 45 58 02 40 E0 2C 35 35 32 39 36 2C 58 28 41 29 |EX.@.,55296,X(A)|
00000510: 2C 59 28 42 29 2C 31 2C 32 2C 22 05 20 22 3A 40 |,Y(B),1,2,". ":@|
00000520: E0 2C 35 35 32 39 36 2C 58 28 41 29 2C 59 28 42 |.,55296,X(A),Y(B|
00000530: 29 2C 31 2C 32 2C 22 2A 22 00 91 45 62 02 8B 50 |),1,2,"*"..Eb..P|
00000540: 28 41 AA 4F 2C 42 AA 51 29 B2 31 A7 40 E0 2C 35 |(A.O,B.Q).1.@.,5|
00000550: 35 32 39 36 2C 58 28 41 AA 4F 29 2C 59 28 42 AA |5296,X(A.O),Y(B.|
00000560: 51 29 2C 31 2C 32 2C 22 05 20 22 3A 40 E0 2C 35 |Q),1,2,". ":@.,5|
00000570: 35 32 39 36 2C 58 28 41 AA 4F 29 2C 59 28 42 AA |5296,X(A.O),Y(B.|
00000580: 51 29 2C 31 2C 32 2C 22 12 20 92 22 3A 89 34 34 |Q),1,2,". .":.44|
00000590: 30 00 D9 45 6C 02 40 E0 2C 35 35 32 39 36 2C 58 |0..El.@.,55296,X|
000005A0: 28 41 AA 4F 29 2C 59 28 42 AA 51 29 2C 31 2C 32 |(A.O),Y(B.Q),1,2|
000005B0: 2C 22 05 20 22 3A 40 E0 2C 35 35 32 39 36 2C 58 |,". ":@.,55296,X|
000005C0: 28 41 AA 4F 29 2C 59 28 42 AA 51 29 2C 31 2C 32 |(A.O),Y(B.Q),1,2|
000005D0: 2C 22 4F 22 3A 89 34 34 30 00 DF 45 33 08 3A 00 |,"O":.440..E3.:.|
000005E0: F2 45 34 08 8F 20 49 4E 53 54 52 55 43 54 49 4F |.E4.. INSTRUCTIO|
000005F0: 4E 53 00 F8 45 35 08 3A 00 0E 46 3D 08 8F 20 20 |NS..E5.:..F=.. |
00000600: 3E 3E 20 52 49 47 48 54 20 41 52 52 4F 57 00 51 |>> RIGHT ARROW.Q|
00000610: 46 3E 08 40 E5 2C 35 30 30 2C 31 34 35 2C 35 30 |F>.@.,500,145,50|
00000620: 30 2C 31 35 35 2C 31 3A 40 E5 2C 35 30 30 2C 31 |0,155,1:@.,500,1|
00000630: 35 35 2C 35 33 30 2C 31 35 35 2C 31 3A 40 E5 2C |55,530,155,1:@.,|
00000640: 35 30 30 2C 31 34 35 2C 35 33 30 2C 31 34 35 2C |500,145,530,145,|
00000650: 31 00 7F 46 48 08 40 E5 2C 35 33 30 2C 31 34 35 |1..FH.@.,530,145|
00000660: 2C 35 33 30 2C 31 34 30 2C 31 3A 40 E5 2C 35 33 |,530,140,1:@.,53|
00000670: 30 2C 31 35 35 2C 35 33 30 2C 31 36 30 2C 31 00 |0,155,530,160,1.|
00000680: AD 46 52 08 40 E5 2C 35 33 30 2C 31 36 30 2C 35 |.FR.@.,530,160,5|
00000690: 35 30 2C 31 35 30 2C 31 3A 40 E5 2C 35 33 30 2C |50,150,1:@.,530,|
000006A0: 31 34 30 2C 35 35 30 2C 31 35 30 2C 31 00 BE 46 |140,550,150,1..F|
000006B0: 5C 08 40 DF 2C 35 32 30 2C 31 35 30 2C 31 00 D3 |\.@.,520,150,1..|
000006C0: 46 65 08 8F 20 20 3C 3C 20 4C 45 46 54 20 41 52 |Fe.. << LEFT AR|
000006D0: 52 4F 57 00 16 47 66 08 40 E5 2C 34 36 30 2C 31 |ROW..Gf.@.,460,1|
000006E0: 34 35 2C 34 36 30 2C 31 35 35 2C 31 3A 40 E5 2C |45,460,155,1:@.,|
000006F0: 34 33 30 2C 31 35 35 2C 34 36 30 2C 31 35 35 2C |430,155,460,155,|
00000700: 31 3A 40 E5 2C 34 33 30 2C 31 34 35 2C 34 36 30 |1:@.,430,145,460|
00000710: 2C 31 34 35 2C 31 00 44 47 70 08 40 E5 2C 34 33 |,145,1.DGp.@.,43|
00000720: 30 2C 31 34 35 2C 34 33 30 2C 31 34 30 2C 31 3A |0,145,430,140,1:|
00000730: 40 E5 2C 34 33 30 2C 31 35 35 2C 34 33 30 2C 31 |@.,430,155,430,1|
00000740: 36 30 2C 31 00 72 47 7A 08 40 E5 2C 34 33 30 2C |60,1.rGz.@.,430,|
00000750: 31 36 30 2C 34 31 30 2C 31 35 30 2C 31 3A 40 E5 |160,410,150,1:@.|
00000760: 2C 34 33 30 2C 31 34 30 2C 34 31 30 2C 31 35 30 |,430,140,410,150|
00000770: 2C 31 00 83 47 84 08 40 DF 2C 34 32 30 2C 31 35 |,1..G..@.,420,15|
00000780: 30 2C 31 00 96 47 8D 08 8F 20 20 5E 5E 20 55 50 |0,1..G... ^^ UP|
00000790: 20 41 52 52 4F 57 00 AF 47 8E 08 40 E5 2C 34 36 | ARROW..G..@.,46|
000007A0: 35 2C 31 34 35 2C 34 39 35 2C 31 34 35 2C 31 00 |5,145,495,145,1.|
000007B0: DD 47 98 08 40 E5 2C 34 36 35 2C 31 34 35 2C 34 |.G..@.,465,145,4|
000007C0: 36 35 2C 31 33 35 2C 31 3A 40 E5 2C 34 39 35 2C |65,135,1:@.,495,|
000007D0: 31 34 35 2C 34 39 35 2C 31 33 35 2C 31 00 0B 48 |145,495,135,1..H|
000007E0: A2 08 40 E5 2C 34 36 35 2C 31 33 35 2C 34 35 30 |..@.,465,135,450|
000007F0: 2C 31 33 35 2C 31 3A 40 E5 2C 34 39 35 2C 31 33 |,135,1:@.,495,13|
00000800: 35 2C 35 31 30 2C 31 33 35 2C 31 00 39 48 AC 08 |5,510,135,1.9H..|
00000810: 40 E5 2C 34 35 30 2C 31 33 35 2C 34 38 30 2C 31 |@.,450,135,480,1|
00000820: 32 37 2C 31 3A 40 E5 2C 35 31 30 2C 31 33 35 2C |27,1:@.,510,135,|
00000830: 34 38 30 2C 31 32 37 2C 31 00 4A 48 B6 08 40 DF |480,127,1.JH..@.|
00000840: 2C 34 37 30 2C 31 34 30 2C 31 00 5B 48 C0 08 8F |,470,140,1.[H...|
00000850: 20 44 4F 57 4E 20 41 52 52 4F 57 00 74 48 CA 08 | DOWN ARROW.tH..|
00000860: 40 E5 2C 34 36 35 2C 31 35 35 2C 34 39 35 2C 31 |@.,465,155,495,1|
00000870: 35 35 2C 31 00 A2 48 D4 08 40 E5 2C 34 36 35 2C |55,1..H..@.,465,|
00000880: 31 35 35 2C 34 36 35 2C 31 36 35 2C 31 3A 40 E5 |155,465,165,1:@.|
00000890: 2C 34 39 35 2C 31 35 35 2C 34 39 35 2C 31 36 35 |,495,155,495,165|
000008A0: 2C 31 00 D0 48 DE 08 40 E5 2C 34 36 35 2C 31 36 |,1..H..@.,465,16|
000008B0: 35 2C 34 35 30 2C 31 36 35 2C 31 3A 40 E5 2C 34 |5,450,165,1:@.,4|
000008C0: 39 35 2C 31 36 35 2C 35 31 30 2C 31 36 35 2C 31 |95,165,510,165,1|
000008D0: 00 FE 48 E8 08 40 E5 2C 34 35 30 2C 31 36 35 2C |..H..@.,450,165,|
000008E0: 34 38 30 2C 31 37 33 2C 31 3A 40 E5 2C 35 31 30 |480,173,1:@.,510|
000008F0: 2C 31 36 35 2C 34 38 30 2C 31 37 33 2C 31 00 0F |,165,480,173,1..|
00000900: 49 F2 08 40 DF 2C 34 36 37 2C 31 35 36 2C 31 00 |I..@.,467,156,1.|
00000910: 28 49 FC 08 40 E1 2C 32 35 30 2C 31 32 30 2C 35 |(I..@.,250,120,5|
00000920: 38 30 2C 31 39 39 2C 31 00 52 49 06 09 40 E0 2C |80,199,1.RI..@.,|
00000930: 35 35 32 39 36 2C 32 36 30 2C 31 32 33 2C 31 2C |55296,260,123,1,|
00000940: 31 2C 22 15 C9 4E 53 54 52 55 43 54 49 4F 4E 53 |1,"..NSTRUCTIONS|
00000950: 0E 22 00 81 49 10 09 40 E0 2C 35 35 32 39 36 2C |."..I..@.,55296,|
00000960: 32 36 30 2C 31 33 33 2C 31 2C 31 2C 22 D5 53 45 |260,133,1,1,".SE|
00000970: 20 43 55 52 53 4F 52 20 4B 45 59 53 20 3E 3E 3E | CURSOR KEYS >>>|
00000980: 22 00 B0 49 1A 09 40 E0 2C 35 35 32 39 36 2C 32 |"..I..@.,55296,2|
00000990: 36 30 2C 31 34 34 2C 31 2C 31 2C 22 C8 CF CD C5 |60,144,1,1,"....|
000009A0: 20 54 4F 20 48 4F 4D 45 20 43 55 52 53 4F 52 22 | TO HOME CURSOR"|
000009B0: 00 DD 49 24 09 40 E0 2C 35 35 32 39 36 2C 32 36 |..I$.@.,55296,26|
000009C0: 30 2C 31 35 35 2C 31 2C 31 2C 22 C3 CC D2 20 54 |0,155,1,1,"... T|
000009D0: 4F 20 42 4C 41 4E 4B 20 47 52 49 44 22 00 0A 4A |O BLANK GRID"..J|
000009E0: 2E 09 40 E0 2C 35 35 32 39 36 2C 32 36 30 2C 31 |..@.,55296,260,1|
000009F0: 36 36 2C 31 2C 31 2C 22 D6 20 54 4F 20 56 49 45 |66,1,1,". TO VIE|
00000A00: 57 20 50 41 54 54 45 52 4E 22 00 44 4A 38 09 40 |W PATTERN".DJ8.@|
00000A10: E0 2C 35 35 32 39 36 2C 32 36 30 2C 31 37 37 2C |.,55296,260,177,|
00000A20: 31 2C 31 2C 22 D1 20 54 4F 20 51 55 49 54 20 20 |1,1,". TO QUIT |
00000A30: 20 D3 D0 C1 C3 C5 20 54 4F 20 53 45 54 2F 55 4E | ..... TO SET/UN|
00000A40: 53 45 54 22 00 75 4A 3D 09 40 E0 2C 35 35 32 39 |SET".uJ=.@.,5529|
00000A50: 36 2C 32 36 30 2C 31 38 38 2C 31 2C 31 2C 22 20 |6,260,188,1,1," |
00000A60: 20 20 20 20 20 C8 20 46 4F 52 20 4D 4F 52 45 20 | . FOR MORE |
00000A70: 48 45 4C 50 22 00 7B 4A 42 09 3A 00 A2 4A 4C 09 |HELP".{JB.:..JL.|
00000A80: 40 E0 2C 35 35 32 39 36 2C 32 35 2C 31 35 30 2C |@.,55296,25,150,|
00000A90: 32 2C 32 2C 22 D0 41 49 4E 54 20 C5 44 49 54 4F |2,2,".AINT .DITO|
00000AA0: 52 22 00 CD 4A 56 09 40 E0 2C 35 35 32 39 36 2C |R"..JV.@.,55296,|
00000AB0: 36 30 2C 31 37 30 2C 31 2C 31 2C 22 42 59 20 CD |60,170,1,1,"BY .|
00000AC0: 41 52 4B 20 D3 50 52 55 49 45 4C 4C 22 00 F6 4A |ARK .PRUIELL"..J|
00000AD0: 60 09 40 E0 2C 35 35 32 39 36 2C 36 30 2C 31 38 |`.@.,55296,60,18|
00000AE0: 30 2C 31 2C 31 2C 22 20 D3 51 55 49 52 52 45 4C |0,1,1," .QUIRREL|
00000AF0: 59 CD 20 4F 4E 22 00 17 4B 6A 09 40 E0 2C 35 35 |Y. ON"..Kj.@.,55|
00000B00: 32 39 36 2C 36 35 2C 31 39 30 2C 31 2C 32 2C 22 |296,65,190,1,2,"|
00000B10: D1 2D 4C 49 4E 4B 22 00 1D 4B C4 09 8E 00 23 4B |.-LINK"..K....#K|
00000B20: B7 0B 3A 00 41 4B B8 0B 8F 20 56 49 45 57 20 50 |..:.AK... VIEW P|
00000B30: 41 54 54 45 52 4E 20 53 55 42 52 4F 55 54 49 4E |ATTERN SUBROUTIN|
00000B40: 45 00 47 4B C2 0B 3A 00 66 4B CC 0B 8F 20 41 44 |E.GK..:.fK... AD|
00000B50: 44 20 50 41 52 41 4D 45 54 45 52 53 20 46 4F 52 |D PARAMETERS FOR|
00000B60: 20 50 41 49 4E 54 00 6C 4B D6 0B 3A 00 77 4B E0 | PAINT.lK..:.wK.|
00000B70: 0B 81 44 B2 31 A4 38 00 85 4B EA 0B 3A 20 20 81 |..D.1.8..K..: .|
00000B80: 43 B2 31 A4 38 00 A9 4B F4 0B 3A 20 20 20 20 8B |C.1.8..K..: .|
00000B90: 50 28 43 2C 44 29 B2 31 A7 50 43 28 44 29 B2 50 |P(C,D).1.PC(D).P|
00000BA0: 43 28 44 29 AA 4E 28 43 29 00 B2 4B FE 0B 3A 20 |C(D).N(C)..K..: |
00000BB0: 20 82 00 B8 4B 08 0C 82 00 C7 4B 0D 0C 8B 46 B2 | ...K.....K...F.|
00000BC0: 31 A7 46 B2 30 3A 8E 00 DC 4B 12 0C 40 E1 2C 35 |1.F.0:...K..@.,5|
00000BD0: 2C 32 30 2C 34 35 2C 31 33 32 2C 31 00 F0 4B 1C |,20,45,132,1..K.|
00000BE0: 0C 8F 20 50 52 49 4E 54 20 4E 55 4D 42 45 52 53 |.. PRINT NUMBERS|
00000BF0: 00 FB 4B 26 0C 81 54 B2 31 A4 38 00 20 4C 2B 0C |..K&..T.1.8. L+.|
00000C00: 50 24 B2 C4 28 50 43 28 54 29 29 3A 50 B2 C3 28 |P$..(PC(T)):P..(|
00000C10: 50 24 29 3A 50 24 B2 C9 28 50 24 2C 50 AB 31 29 |P$):P$..(P$,P.1)|
00000C20: 00 38 4C 2D 0C 8B C3 28 50 24 29 B2 31 A7 50 24 |.8L-...(P$).1.P$|
00000C30: B2 22 30 30 22 AA 50 24 00 4F 4C 2E 0C 8B C3 28 |."00".P$.OL....(|
00000C40: 50 24 29 B2 32 A7 50 24 B2 22 30 22 AA 50 24 00 |P$).2.P$."0".P$.|
00000C50: 6E 4C 30 0C 3A 20 20 40 E0 2C 35 35 32 39 36 2C |nL0.: @.,55296,|
00000C60: 31 30 2C 59 28 54 29 2C 31 2C 31 2C 50 24 00 74 |10,Y(T),1,1,P$.t|
00000C70: 4C 3A 0C 82 00 90 4C 3F 0C 40 F4 2C 32 32 30 2C |L:....L?.@.,220,|
00000C80: 35 35 2C 31 31 35 2C 35 30 2C 34 32 30 2C 35 35 |55,115,50,420,55|
00000C90: 00 A8 4C 41 0C 40 E1 2C 34 32 30 2C 35 35 2C 35 |..LA.@.,420,55,5|
00000CA0: 33 30 2C 31 30 35 2C 31 00 E8 4C 44 0C 40 DF 2C |30,105,1..LD.@.,|
00000CB0: 34 32 31 2C 35 36 2C 31 2C 50 43 28 31 29 2C 50 |421,56,1,PC(1),P|
00000CC0: 43 28 32 29 2C 50 43 28 33 29 2C 50 43 28 34 29 |C(2),PC(3),PC(4)|
00000CD0: 2C 50 43 28 35 29 2C 50 43 28 36 29 2C 50 43 28 |,PC(5),PC(6),PC(|
00000CE0: 37 29 2C 50 43 28 38 29 00 FD 4C 4E 0C 81 54 B2 |7),PC(8)..LN..T.|
00000CF0: 31 A4 38 3A 50 43 28 54 29 B2 30 3A 82 00 03 4D |1.8:PC(T).0:...M|
00000D00: 58 0C 8E 00 20 4D 9F 0F A1 F9 41 24 3A 40 54 45 |X... M....A$:@TE|
00000D10: 58 54 3A 9B 20 33 30 30 30 AB 34 39 39 39 3A 80 |XT:. 3000.4999:.|
00000D20: 00 32 4D A0 0F 8F 20 48 45 4C 50 20 53 43 52 45 |.2M... HELP SCRE|
00000D30: 45 4E 00 4A 4D B4 0F 40 E1 2C 31 37 30 2C 36 32 |EN.JM..@.,170,62|
00000D40: 2C 34 37 30 2C 31 33 37 2C 31 00 5A 4D BE 0F 40 |,470,137,1.ZM..@|
00000D50: DF 2C 31 37 31 2C 36 33 2C 30 00 7B 4D C8 0F 40 |.,171,63,0.{M..@|
00000D60: E0 2C 35 35 32 39 36 2C 33 31 30 2C 36 35 2C 31 |.,55296,310,65,1|
00000D70: 2C 31 2C 22 15 C8 45 4C 50 0E 22 00 B6 4D D2 0F |,1,"..ELP."..M..|
00000D80: 40 E0 2C 35 35 32 39 36 2C 31 38 30 2C 37 37 2C |@.,55296,180,77,|
00000D90: 31 2C 31 2C 22 D5 53 45 20 27 D0 27 20 54 4F 20 |1,1,".SE '.' TO |
00000DA0: 50 52 49 4E 54 20 4F 55 54 20 4E 45 57 20 50 41 |PRINT OUT NEW PA|
00000DB0: 49 4E 54 20 20 22 00 F4 4D DC 0F 40 E0 2C 35 35 |INT "..M..@.,55|
00000DC0: 32 39 36 2C 31 38 30 2C 38 37 2C 31 2C 31 2C 22 |296,180,87,1,1,"|
00000DD0: 47 52 41 50 48 49 43 53 2E 20 20 D9 4F 55 20 57 |GRAPHICS. .OU W|
00000DE0: 49 4C 4C 20 4E 45 45 44 20 54 4F 20 50 52 4F 56 |ILL NEED TO PROV|
00000DF0: 49 44 45 22 00 2D 4E E6 0F 40 E0 2C 35 35 32 39 |IDE".-N..@.,5529|
00000E00: 36 2C 31 38 30 2C 39 37 2C 31 2C 31 2C 22 54 48 |6,180,97,1,1,"TH|
00000E10: 45 20 53 45 43 4F 4E 44 41 52 59 20 41 44 44 52 |E SECONDARY ADDR|
00000E20: 45 53 53 20 46 4F 52 20 54 48 45 20 22 00 68 4E |ESS FOR THE ".hN|
00000E30: F0 0F 40 E0 2C 35 35 32 39 36 2C 31 38 30 2C 31 |..@.,55296,180,1|
00000E40: 30 37 2C 31 2C 31 2C 22 50 52 49 4E 54 45 52 2E |07,1,1,"PRINTER.|
00000E50: 20 20 C2 45 20 53 55 52 45 20 59 4F 55 20 41 52 | .E SURE YOU AR|
00000E60: 45 20 55 53 49 4E 47 22 00 9A 4E FA 0F 40 E0 2C |E USING"..N..@.,|
00000E70: 35 35 32 39 36 2C 31 38 30 2C 31 31 37 2C 31 2C |55296,180,117,1,|
00000E80: 31 2C 22 12 D5 4C 54 52 41 20 C8 49 52 45 53 20 |1,"..LTRA .IRES |
00000E90: D6 31 2E 31 92 21 21 20 20 22 00 D1 4E 04 10 40 |.1.1.!! "..N..@|
00000EA0: E0 2C 35 35 32 39 36 2C 31 38 30 2C 31 32 37 2C |.,55296,180,127,|
00000EB0: 31 2C 31 2C 22 20 20 20 20 20 20 C8 49 54 20 41 |1,1," .IT A|
00000EC0: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
00000ED0: 22 00 17 4F 09 10 40 E1 2C 31 39 30 2C 31 33 38 |"..O..@.,190,138|
00000EE0: 2C 34 38 30 2C 31 34 32 2C 31 3A 40 DF 2C 31 39 |,480,142,1:@.,19|
00000EF0: 31 2C 31 33 39 2C 31 3A 40 E1 2C 34 37 31 2C 36 |1,139,1:@.,471,6|
00000F00: 34 2C 34 38 30 2C 31 34 32 2C 31 3A 40 DF 2C 34 |4,480,142,1:@.,4|
00000F10: 37 32 2C 36 35 2C 31 00 2F 4F 0E 10 40 FE 1F 2C |72,65,1./O..@..,|
00000F20: 30 2C 31 37 30 2C 36 32 2C 33 31 35 2C 38 33 00 |0,170,62,315,83.|
00000F30: 4A 4F 18 10 41 44 B2 C2 28 32 35 30 29 AA C2 28 |JO..AD..(250)..(|
00000F40: 32 35 31 29 AC 32 35 36 AA 31 00 50 4F 22 10 8E |251).256.1.PO"..|
00000F50: 00 6B 4F 68 10 8F 20 42 52 49 4E 47 20 55 50 20 |.kOh.. BRING UP |
00000F60: 48 45 4C 50 20 53 43 52 45 45 4E 00 84 4F 72 10 |HELP SCREEN..Or.|
00000F70: 40 FE 1F 2C 41 44 2C 31 37 30 2C 36 32 2C 33 31 |@..,AD,170,62,31|
00000F80: 35 2C 39 30 00 95 4F 7C 10 40 FE 21 2C 30 2C 31 |5,90..O|.@.!,0,1|
00000F90: 37 30 2C 36 32 00 9E 4F 86 10 A1 F9 41 24 00 B0 |70,62..O....A$..|
00000FA0: 4F 90 10 40 FE 21 2C 41 44 2C 31 37 30 2C 36 32 |O..@.!,AD,170,62|
00000FB0: 00 B6 4F 9A 10 8E 00 D2 4F 87 13 A1 F9 41 24 3A |..O.....O....A$:|
00000FC0: 40 54 45 58 54 3A 9B 34 30 30 30 AB 34 39 39 39 |@TEXT:.4000.4999|
00000FD0: 3A 80 00 E3 4F 88 13 8B 41 AA 31 B1 38 A7 41 B2 |:...O...A.1.8.A.|
00000FE0: 38 3A 8E 00 F8 4F 8D 13 41 B2 41 AA 31 3A 4F B2 |8:...O..A.A.1:O.|
00000FF0: AB 31 3A 51 B2 30 3A 8E 00 09 50 92 13 8B 41 AB |.1:Q.0:...P...A.|
00001000: 31 B3 31 A7 41 B2 31 3A 8E 00 1D 50 97 13 41 B2 |1.1.A.1:...P..A.|
00001010: 41 AB 31 3A 4F B2 31 3A 51 B2 30 3A 8E 00 2E 50 |A.1:O.1:Q.0:...P|
00001020: 9C 13 8B 42 AA 31 B1 38 A7 42 B2 38 3A 8E 00 43 |...B.1.8.B.8:..C|
00001030: 50 A1 13 42 B2 42 AA 31 3A 51 B2 AB 31 3A 4F B2 |P..B.B.1:Q..1:O.|
00001040: 30 3A 8E 00 54 50 A6 13 8B 42 AB 31 B3 31 A7 42 |0:..TP...B.1.1.B|
00001050: B2 31 3A 8E 00 68 50 AB 13 42 B2 42 AB 31 3A 51 |.1:..hP..B.B.1:Q|
00001060: B2 31 3A 4F B2 30 3A 8E 00 8D 50 B0 13 8B 50 28 |.1:O.0:...P...P(|
00001070: 41 2C 42 29 B2 31 A7 50 28 41 2C 42 29 B2 30 3A |A,B).1.P(A,B).0:|
00001080: 8E 3A D5 50 28 41 2C 42 29 B2 31 3A 8E 00 0C 51 |.:.P(A,B).1:...Q|
00001090: BA 13 8B 50 28 41 2C 42 29 B2 31 A7 40 E0 2C 35 |...P(A,B).1.@.,5|
000010A0: 35 32 39 36 2C 58 28 41 29 2C 59 28 42 29 2C 31 |5296,X(A),Y(B),1|
000010B0: 2C 32 2C 22 05 20 22 3A 40 E0 2C 35 35 32 39 36 |,2,". ":@.,55296|
000010C0: 2C 58 28 41 29 2C 59 28 42 29 2C 31 2C 32 2C 22 |,X(A),Y(B),1,2,"|
000010D0: 12 20 92 22 3A D5 40 E0 2C 35 35 32 39 36 2C 58 |. .":.@.,55296,X|
000010E0: 28 41 29 2C 59 28 42 29 2C 31 2C 32 2C 22 05 20 |(A),Y(B),1,2,". |
000010F0: 22 3A 40 E0 2C 35 35 32 39 36 2C 58 28 41 29 2C |":@.,55296,X(A),|
00001100: 59 28 42 29 2C 31 2C 32 2C 22 4F 22 00 15 51 C4 |Y(B),1,2,"O"..Q.|
00001110: 13 89 34 31 30 00 26 51 70 17 8F 20 43 4C 45 41 |..410.&Qp.. CLEA|
00001120: 52 20 47 52 49 44 00 41 51 75 17 40 F4 2C 32 30 |R GRID.AQu.@.,20|
00001130: 30 2C 30 2C 31 34 35 2C 31 31 35 2C 34 39 2C 31 |0,0,145,115,49,1|
00001140: 39 00 4E 51 7A 17 46 B2 31 3A 8D 31 33 30 00 5B |9.NQz.F.1:.130.[|
00001150: 51 84 17 46 B2 31 3A 8D 33 30 30 00 61 51 8E 17 |Q..F.1:.300.aQ..|
00001160: 8E 00 74 51 58 1B 8F 20 43 4C 45 41 52 20 50 4F |..tQX.. CLEAR PO|
00001170: 49 4E 54 53 00 7F 51 62 1B 81 54 B2 31 A4 38 00 |INTS..Qb..T.1.8.|
00001180: 8D 51 6C 1B 3A 20 81 20 55 B2 31 A4 38 00 9D 51 |.Ql.: . U.1.8..Q|
00001190: 76 1B 3A 20 20 50 28 54 2C 55 29 B2 30 00 A5 51 |v.: P(T,U).0..Q|
000011A0: 80 1B 3A 20 82 00 AB 51 8A 1B 82 00 B1 51 94 1B |..: ...Q.....Q..|
000011B0: 8E 00 CB 51 40 1F 8F 20 50 52 49 4E 54 20 50 41 |...Q@.. PRINT PA|
000011C0: 49 4E 54 20 47 52 41 50 48 49 43 00 E4 51 4A 1F |INT GRAPHIC..QJ.|
000011D0: 40 FE 1F 2C 41 44 2C 33 39 39 2C 34 39 2C 31 35 |@..,AD,399,49,15|
000011E0: 35 2C 37 30 00 ED 51 54 1F 40 9C 2C 30 00 FC 51 |5,70..QT.@.,0..Q|
000011F0: 5E 1F 40 FE 21 2C 41 44 2C 30 2C 30 00 0A 52 68 |^.@.!,AD,0,0..Rh|
00001200: 1F 46 B2 31 3A 8D 33 30 32 30 00 1A 52 6D 1F 54 |.F.1:.3020..Rm.T|
00001210: 24 B2 22 22 3A 50 24 B2 22 22 00 25 52 72 1F 81 |$."":P$."".%Rr..|
00001220: 54 B2 31 A4 38 00 4A 52 7C 1F 50 24 B2 C4 28 50 |T.1.8.JR|.P$..(P|
00001230: 43 28 54 29 29 3A 50 B2 C3 28 50 24 29 3A 50 24 |C(T)):P..(P$):P$|
00001240: B2 C9 28 50 24 2C 50 AB 31 29 00 62 52 86 1F 8B |..(P$,P.1).bR...|
00001250: C3 28 50 24 29 B2 31 A7 50 24 B2 22 30 30 22 AA |.(P$).1.P$."00".|
00001260: 50 24 00 79 52 90 1F 8B C3 28 50 24 29 B2 32 A7 |P$.yR....(P$).2.|
00001270: 50 24 B2 22 30 22 AA 50 24 00 8A 52 9A 1F 54 24 |P$."0".P$..R..T$|
00001280: B2 54 24 AA 50 24 AA 22 2C 22 00 90 52 A4 1F 82 |.T$.P$.","..R...|
00001290: 00 A5 52 A9 1F 54 24 B2 C8 28 54 24 2C C3 28 54 |..R..T$..(T$,.(T|
000012A0: 24 29 AB 31 29 00 C0 52 AE 1F 40 E0 2C 35 35 32 |$).1)..R..@.,552|
000012B0: 39 36 2C 31 37 30 2C 33 35 2C 31 2C 31 2C 54 24 |96,170,35,1,1,T$|
000012C0: 00 FD 52 B8 1F 40 E0 2C 35 35 32 39 36 2C 30 2C |..R..@.,55296,0,|
000012D0: 39 30 2C 31 2C 31 2C 22 C5 4E 54 45 52 20 53 45 |90,1,1,".NTER SE|
000012E0: 43 4F 4E 44 41 52 59 20 41 44 44 52 45 53 53 20 |CONDARY ADDRESS |
000012F0: 46 4F 52 20 50 52 49 4E 54 45 52 3A 22 00 1E 53 |FOR PRINTER:"..S|
00001300: BD 1F A1 F9 41 24 3A 8B C6 28 41 24 29 B3 34 38 |....A$:..(A$).48|
00001310: B0 C6 28 41 24 29 B1 35 37 A7 38 31 32 35 00 39 |..(A$).57.8125.9|
00001320: 53 BF 1F 40 E0 2C 35 35 32 39 36 2C 33 30 30 2C |S..@.,55296,300,|
00001330: 39 30 2C 31 2C 31 2C 41 24 00 52 53 C0 1F 40 F4 |90,1,1,A$.RS..@.|
00001340: 2C 30 2C 31 31 35 2C 34 30 30 2C 31 30 2C 30 2C |,0,115,400,10,0,|
00001350: 39 30 00 5F 53 C2 1F 53 41 B2 C5 28 41 24 29 00 |90._S..SA..(A$).|
00001360: 6C 53 C7 1F 40 48 F4 2C 31 2C 53 41 00 7A 53 CC |lS..@H.,1,SA.zS.|
00001370: 1F 40 9C 2C 30 3A 89 31 33 30 00 8D 53 10 27 40 |.@.,0:.130..S.'@|
00001380: 54 45 58 54 3A 99 D3 28 45 52 29 3A 80 00 00 00 |TEXT:..(ER):....|
.@.@...1,1:.5:.G(14)..@..W6.8@...."ULTRA
HIRES",B0,P7168.F@...8448:.10..@....:."
.PLEASE INSERT DISK WITH .ULTRA HIRES V1
.1. NAMED 'ULTRA HIRES'...HIT A KEY":..A
$:..L@... ULTRA-HIRES @PAINT GRAPHICS ED
ITOR..@... BY MARK SPRUIELL 04/18/86..A.
..47,0:.48,132:...A..W10000..A...%.)A(..
T.1.8:.Z:N(T).Z:..CA-..128,64,32,16,8,4,
2,1.CA2..T.1.8:.E,F:X(T).E:Y(T).F:...A7.
.56,23,75,37,94,51,108,65,122,79,140,93,
155,107,169,121..A<..P(8,8)..AC.:.AAD..
DRAW GRID.GAE.:.UAI.@DRWMOD,0..AN.@.,14,
1..AX.@.,0..B}.@WALRUS:.T.1.1500:...B..@
.,14,14:@.,0.+B...4000:@.,0:@.,14,1.BB..
@.,50,20,190,132,1.SB...T.34.132.14.GB..
@.,50,T,190,T,1.MB....|B...F.1.F.0:...B.
.:..BC.. DRAW NEW @PAINT GRAPHIC DISPLAY
BOX..BE.:.JBH.@.,400,50,550,110,1..BR.@
.,420,55,530,105,1..B+.:..C,.. DISPLAY G
RID CELLS..C-.:..C6..D.1.8. C@.: .C.1.8
.ECJ.: @.,55296,X(C),Y(D),1,2,"..O".NC
T.: ..TC^...CCH..F.1.F.0:..IC..:.YC...
MAIN LOOP.C..:..C...2100..C..A.1:B.1..C
..@.,55296,X(A),Y(B),1,2,". ".TC..@.,552
96,X(A),Y(B),1,2,"*"..C....A$..C...A$.".
"..5050:.440..D...A$."."..6000:.7000:.41
0.*D...A$.G(32)..5040:.440.BD...A$."P".A
$."P".8000.]D...A$."Q".A$."Q".@TEXT:..{D
...A$."V".A$."V"..3000:.440..DA..A$."H".
A$."H"..4200:.440..DB..A$."."..5000:.600
.GDL..A$."."..5010:.600..DV..A$."."..502
0:.600..D...A$."."..5030:.600..DN..440.9
EX.@.,55296,X(A),Y(B),1,2,". ":@.,55296,
X(A),Y(B),1,2,"*"..EB..P(A.O,B.Q).1.@.,5
5296,X(A.O),Y(B.Q),1,2,". ":@.,55296,X(A
.O),Y(B.Q),1,2,". .":.440.YEL.@.,55296,X
(A.O),Y(B.Q),1,2,". ":@.,55296,X(A.O),Y(
B.Q),1,2,"O":.440..E3.:..E4.. INSTRUCTIO
NS..E5.:..F=.. >> RIGHT ARROW.QF>.@.,50
0,145,500,155,1:@.,500,155,530,155,1:@.,
500,145,530,145,1.FH.@.,530,145,530,140
,1:@.,530,155,530,160,1..FR.@.,530,160,5
50,150,1:@.,530,140,550,150,1..F\.@.,520
,150,1.SFE.. << LEFT ARROW..GF.@.,460,1
45,460,155,1:@.,430,155,460,155,1:@.,430
,145,460,145,1.DGP.@.,430,145,430,140,1:
@.,430,155,430,160,1.RGZ.@.,430,160,410,
150,1:@.,430,140,410,150,1..G..@.,420,15
0,1..G... ^^ UP ARROW..G..@.,465,145,49
5,145,1..G..@.,465,145,465,135,1:@.,495,
145,495,135,1..H..@.,465,135,450,135,1:@
.,495,135,510,135,1.9H..@.,450,135,480,1
27,1:@.,510,135,480,127,1.JH..@.,470,140
,1.[H... DOWN ARROW.THJ.@.,465,155,495,1
55,1..HT.@.,465,155,465,165,1:@.,495,155
,495,165,1.PH..@.,465,165,450,165,1:@.,4
95,165,510,165,1..H..@.,450,165,480,173,
1:@.,510,165,480,173,1..I..@.,467,156,1.
(I..@.,250,120,580,199,1.RI..@.,55296,26
0,123,1,1,".INSTRUCTIONS."..I..@.,55296,
260,133,1,1,"USE CURSOR KEYS >>>"..I..@.
,55296,260,144,1,1,"HOME TO HOME CURSOR"
..I$.@.,55296,260,155,1,1,"CLR TO BLANK
GRID"..J..@.,55296,260,166,1,1,"V TO VIE
W PATTERN".DJ8.@.,55296,260,177,1,1,"Q T
O QUIT SPACE TO SET/UNSET".UJ=.@.,5529
6,260,188,1,1," H FOR MORE HELP".{J
B.:..JL.@.,55296,25,150,2,2,"PAINT EDITO
R".MJV.@.,55296,60,170,1,1,"BY MARK SPRU
IELL"..J`.@.,55296,60,180,1,1," SQUIRREL
YM ON"..KJ.@.,55296,65,190,1,2,"Q-LINK".
.KD...#K..:.AK... VIEW PATTERN SUBROUTIN
E.GKB.:.FKL.. ADD PARAMETERS FOR PAINT.L
KV.:.WK...D.1.8..K..: .C.1.8..K..: .
P(C,D).1.PC(D).PC(D).N(C)..K..: ...K...
.GK...F.1.F.0:...K..@.,5,20,45,132,1..K.
.. PRINT NUMBERS..K&..T.1.8. L+.P$.D(PC(
T)):P.C(P$):P$.I(P$,P.1).8L-..C(P$).1.P$
."00".P$.OL...C(P$).2.P$."0".P$.NL0.: @
.,55296,10,Y(T),1,1,P$.TL:....L?.@.,220,
55,115,50,420,55..LA.@.,420,55,530,105,1
..LD.@.,421,56,1,PC(1),PC(2),PC(3),PC(4)
,PC(5),PC(6),PC(7),PC(8)..LN..T.1.8:PC(T
).0:...MX... M....A$:@TEXT:. 3000.4999:.
.2M .. HELP SCREEN.JM..@.,170,62,470,137
,1.ZM..@.,171,63,0.{MH.@.,55296,310,65,1
,1,".HELP."..MR.@.,55296,180,77,1,1,"USE
'P' TO PRINT OUT NEW PAINT "..M..@.,55
296,180,87,1,1,"GRAPHICS. YOU WILL NEED
TO PROVIDE".-N..@.,55296,180,97,1,1,"TH
E SECONDARY ADDRESS FOR THE ".HN..@.,552
96,180,107,1,1,"PRINTER. BE SURE YOU AR
E USING"..N..@.,55296,180,117,1,1,".ULTR
A HIRES V1.1.!! ".QN..@.,55296,180,127,
1,1," HIT A KEY TO CONTINUE"..O..@.
,190,138,480,142,1:@.,191,139,1:@.,471,6
4,480,142,1:@.,472,65,1./O..@..,0,170,62
,315,83.JO..AD.B(250).B(251).256.1.PO"..
.KOH.. BRING UP HELP SCREEN..OR.@..,AD,1
70,62,315,90..O|.@.!,0,170,62..O....A$..
O..@.!,AD,170,62..O....RO....A$:@TEXT:.4
000.4999:...O...A.1.8.A.8:...O..A.A.1:O.
.1:Q.0:...P...A.1.1.A.1:...P..A.A.1:O.1:
Q.0:...P...B.1.8.B.8:..CP..B.B.1:Q..1:O.
0:..TP...B.1.1.B.1:..HP..B.B.1:Q.1:O.0:.
..P...P(A,B).1.P(A,B).0:.:UP(A,B).1:...Q
...P(A,B).1.@.,55296,X(A),Y(B),1,2,". ":
@.,55296,X(A),Y(B),1,2,". .":U@.,55296,X
(A),Y(B),1,2,". ":@.,55296,X(A),Y(B),1,2
,"O"..QD..410.&QP.. CLEAR GRID.AQU.@.,20
0,0,145,115,49,19.NQZ.F.1:.130.[Q..F.1:.
300.AQ....TQX.. CLEAR POINTS.QB..T.1.8.
.QL.: . U.1.8..QV.: P(T,U).0..Q..: ...Q
.....Q....KQ@.. PRINT PAINT GRAPHIC..QJ.
@..,AD,399,49,155,70..QT.@.,0..Q^.@.!,AD
,0,0..RH.F.1:.3020..RM.T$."":P$."".%RR..
T.1.8.JR|.P$.D(PC(T)):P.C(P$):P$.I(P$,P.
1).BR...C(P$).1.P$."00".P$.YR...C(P$).2.
P$."0".P$..R..T$.T$.P$.","..R.....R..T$.
H(T$,C(T$).1)..R..@.,55296,170,35,1,1,T$
..R..@.,55296,0,90,1,1,"ENTER SECONDARY
ADDRESS FOR PRINTER:"..S....A$:.F(A$).48
.F(A$).57.8125.9S..@.,55296,300,90,1,1,A
$.RS..@.,0,115,400,10,0,90._SB.SA.E(A$).
LSG.@H.,1,SA.ZSL.@.,0:.130..S.'@TEXT:.S(
ER):....
> CLICK IMAGE PREVIEW FOR FULL MODAL