UH.ULTRAPLOT2.94
FILE INFORMATION
FILENAME(S): UH.ULTRAPLOT2.94
FILE TYPE(S): PRG
FILE SIZE: 7.5K
FIRST SEEN: 2025-10-20 14:30:31
APPEARS ON: 1 disk(s)
FILE HASH
8c476ab27e6d2ed3dad2b117f1746560ce8a0d7d3d1991903a58b76c6f3f1818
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UH ULTRA DRAW | UH.ULTRAPLOT2.94 | PRG | Treasure Chest - Klaus Der Suhler | 9 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 14 40 03 00 97 34 37 2C 30 3A 97 34 38 2C |.@.@...47,0:.48,|
00000010: 36 38 3A 9C 00 62 40 0A 00 8F 20 2D 2D 2D 2D 2D |68:..b@... -----|
00000020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000040: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000060: 2D 2D 00 B0 40 14 00 8F 20 21 20 54 48 49 53 20 |--..@... ! THIS |
00000070: 50 52 4F 47 52 41 4D 20 57 41 53 20 57 52 49 54 |PROGRAM WAS WRIT|
00000080: 54 45 4E 20 45 4E 54 49 52 4C 59 20 42 59 20 41 |TEN ENTIRLY BY A|
00000090: 4C 41 4E 20 43 48 41 50 55 54 2C 20 57 48 4F 20 |LAN CHAPUT, WHO |
000000A0: 52 45 53 45 52 56 45 53 20 41 4C 4C 20 20 20 21 |RESERVES ALL !|
000000B0: 00 FE 40 28 00 8F 20 21 20 52 49 47 48 54 53 2E |..@(.. ! RIGHTS.|
000000C0: 20 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 49 | THIS PROGRAM I|
000000D0: 53 20 46 4F 52 20 46 52 45 45 20 44 49 53 54 52 |S FOR FREE DISTR|
000000E0: 49 42 55 54 49 4F 4E 20 4F 4E 4C 59 2E 20 20 41 |IBUTION ONLY. A|
000000F0: 4E 59 20 51 55 45 53 54 49 4F 4E 53 20 21 00 4C |NY QUESTIONS !.L|
00000100: 41 32 00 8F 20 21 20 4F 52 20 43 4F 4D 4D 45 4E |A2.. ! OR COMMEN|
00000110: 54 53 20 4D 41 59 20 42 45 20 41 44 44 52 45 53 |TS MAY BE ADDRES|
00000120: 53 45 44 20 54 4F 20 42 52 55 43 45 20 43 48 41 |SED TO BRUCE CHA|
00000130: 50 55 54 20 4F 4E 2D 4C 49 4E 20 4F 4E 20 54 48 |PUT ON-LIN ON TH|
00000140: 45 20 42 4F 41 52 44 20 20 20 20 21 00 9A 41 3C |E BOARD !..A<|
00000150: 00 8F 20 21 20 53 48 4F 50 50 45 20 54 41 4C 4B |.. ! SHOPPE TALK|
00000160: 20 28 35 31 37 29 20 38 33 32 2D 32 30 33 30 2C | (517) 832-2030,|
00000170: 20 4F 52 20 4F 4E 20 51 55 41 4E 54 55 4D 20 4C | OR ON QUANTUM L|
00000180: 49 4E 4B 20 55 4E 44 45 52 20 54 48 45 20 4E 41 |INK UNDER THE NA|
00000190: 4D 45 20 20 20 20 20 20 20 21 00 E8 41 46 00 8F |ME !..AF..|
000001A0: 20 21 20 41 20 42 52 55 43 45 20 43 48 41 50 55 | ! A BRUCE CHAPU|
000001B0: 54 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |T. |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001E0: 20 20 20 20 20 20 20 21 00 36 42 50 00 8F 20 21 | !.6BP.. !|
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000230: 20 20 20 20 20 21 00 84 42 5A 00 8F 20 21 20 54 | !..BZ.. ! T|
00000240: 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 44 |HIS PROGRAM IS D|
00000250: 45 53 49 47 4E 45 44 20 54 4F 20 57 4F 52 4B 20 |ESIGNED TO WORK |
00000260: 57 49 54 48 20 38 30 20 43 4F 4C 55 4D 4E 20 4F |WITH 80 COLUMN O|
00000270: 55 54 50 55 54 20 4F 4E 4C 59 20 55 53 49 4E 47 |UTPUT ONLY USING|
00000280: 20 20 20 21 00 D1 42 64 00 8F 21 20 54 48 45 20 | !..Bd..! THE |
00000290: 55 4C 54 52 41 20 48 49 52 45 53 20 50 52 4F 47 |ULTRA HIRES PROG|
000002A0: 52 41 4D 2E 20 20 41 56 41 49 4C 41 42 4C 45 20 |RAM. AVAILABLE |
000002B0: 46 52 4F 4D 20 52 55 4E 20 4D 41 47 41 5A 49 4E |FROM RUN MAGAZIN|
000002C0: 45 20 41 4E 44 20 4F 4E 4C 49 4E 45 20 20 20 20 |E AND ONLINE |
000002D0: 21 00 1E 43 6E 00 8F 21 20 4F 4E 20 51 55 41 4E |!..Cn..! ON QUAN|
000002E0: 54 55 4D 20 4C 49 4E 4B 2E 20 20 20 20 20 20 20 |TUM LINK. |
000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 21 00 6B | !.k|
00000320: 43 78 00 8F 21 20 20 20 20 20 20 20 20 20 20 20 |Cx..! |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000360: 20 20 20 20 20 20 20 20 20 20 21 00 B8 43 88 00 | !..C..|
00000370: 8F 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.! |
00000380: 20 20 20 20 20 20 20 20 20 20 56 45 52 53 49 4F | VERSIO|
00000390: 4E 20 32 2E 39 33 20 20 20 20 20 20 20 20 20 20 |N 2.93 |
000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003B0: 20 20 20 20 20 20 20 21 00 05 44 8C 00 8F 2D 2D | !..D...--|
000003C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000400: 2D 2D 2D 2D 2D 00 35 44 96 00 FE 25 3A 40 57 41 |-----.5D...%:@WA|
00000410: 4C 52 55 53 3A 56 4E B2 35 30 30 3A 8F 20 4D 41 |LRUS:VN.500:. MA|
00000420: 58 20 4E 55 4D 42 45 52 20 4F 46 20 44 41 54 41 |X NUMBER OF DATA|
00000430: 20 50 4E 54 53 00 72 44 AA 00 86 58 28 56 4E 29 | PNTS.rD...X(VN)|
00000440: 2C 59 28 56 4E 29 3A FE 1C 31 3A FE 02 30 3A 8B |,Y(VN):..1:..0:.|
00000450: C2 28 34 39 31 35 32 29 B3 B1 36 30 A7 FE 11 22 |.(49152)..60..."|
00000460: 52 4F 4D 41 4E 20 46 4F 4E 54 22 2C 50 34 39 31 |ROMAN FONT",P491|
00000470: 35 32 00 9C 44 AB 00 8B C2 28 35 30 31 35 32 29 |52..D....(50152)|
00000480: B3 B1 31 32 34 A7 FE 11 22 47 4F 54 48 49 43 20 |..124..."GOTHIC |
00000490: 46 4F 4E 54 22 2C 50 35 30 31 35 32 00 C8 44 AC |FONT",P50152..D.|
000004A0: 00 8B C2 28 35 31 31 35 32 29 B3 B1 32 35 34 A7 |...(51152)..254.|
000004B0: FE 11 22 43 4F 4D 50 55 54 45 52 20 46 4F 4E 54 |.."COMPUTER FONT|
000004C0: 22 2C 50 35 31 31 35 32 00 F2 44 AD 00 8B C2 28 |",P51152..D....(|
000004D0: 35 32 31 35 32 29 B3 B1 36 30 A7 FE 11 22 43 55 |52152)..60..."CU|
000004E0: 52 53 49 56 45 20 46 4F 4E 54 22 2C 50 35 32 31 |RSIVE FONT",P521|
000004F0: 35 32 00 01 45 B4 00 D7 31 35 39 30 3A 89 38 31 |52..E...1590:.81|
00000500: 30 00 12 45 C8 00 40 DE 2C 30 2C 31 35 3A 40 9C |0..E..@.,0,15:@.|
00000510: 2C 30 00 38 45 D2 00 58 4C B2 31 45 33 38 3A 59 |,0.8E..XL.1E38:Y|
00000520: 4C B2 31 45 33 38 3A 58 48 B2 AB 31 45 33 38 3A |L.1E38:XH..1E38:|
00000530: 59 48 B2 AB 31 45 33 38 00 58 45 DC 00 8F 20 53 |YH..1E38.XE... S|
00000540: 45 54 20 58 48 49 47 48 2C 58 4C 4F 57 2C 59 48 |ET XHIGH,XLOW,YH|
00000550: 49 47 48 2C 59 4C 4F 57 00 64 45 E6 00 81 49 B2 |IGH,YLOW.dE...I.|
00000560: 31 A4 44 4E 00 79 45 F0 00 8B 58 4C B1 58 28 49 |1.DN.yE...XL.X(I|
00000570: 29 A7 58 4C B2 58 28 49 29 00 8E 45 FA 00 8B 59 |).XL.X(I)..E...Y|
00000580: 4C B1 59 28 49 29 A7 59 4C B2 59 28 49 29 00 A3 |L.Y(I).YL.Y(I)..|
00000590: 45 04 01 8B 58 48 B3 58 28 49 29 A7 58 48 B2 58 |E...XH.X(I).XH.X|
000005A0: 28 49 29 00 B8 45 0E 01 8B 59 48 B3 59 28 49 29 |(I)..E...YH.Y(I)|
000005B0: A7 59 48 B2 59 28 49 29 00 BF 45 18 01 82 49 00 |.YH.Y(I)..E...I.|
000005C0: D5 45 22 01 8B 54 24 B2 22 34 22 AF 59 4C B1 30 |.E"..T$."4".YL.0|
000005D0: A7 59 4C B2 30 00 F7 45 2C 01 58 4D B2 36 32 30 |.YL.0..E,.XM.620|
000005E0: AD 28 58 48 AB 58 4C 29 3A 59 4D B2 31 38 30 AD |.(XH.XL):YM.180.|
000005F0: 28 59 48 AB 59 4C 29 00 13 46 36 01 58 41 B2 AB |(YH.YL)..F6.XA..|
00000600: 58 4C AC 58 4D AA 35 3A 59 41 B2 AB 59 4C AC 59 |XL.XM.5:YA..YL.Y|
00000610: 4D AA 33 00 21 46 40 01 8B 58 4C B1 30 A7 34 33 |M.3.!F@..XL.0.43|
00000620: 30 00 36 46 54 01 40 E5 2C 58 41 2C 30 2C 58 41 |0.6FT.@.,XA,0,XA|
00000630: 2C 31 39 31 2C 31 00 55 46 59 01 8B 54 58 B2 30 |,191,1.UFY..TX.0|
00000640: A7 40 E5 2C 58 41 AA 31 2C 30 2C 58 41 AA 31 2C |.@.,XA.1,0,XA.1,|
00000650: 31 39 31 2C 31 00 6B 46 5E 01 8B 54 58 B2 31 A7 |191,1.kF^..TX.1.|
00000660: 54 31 B2 54 53 3A 54 32 B2 54 53 00 85 46 68 01 |T1.TS:T2.TS..Fh.|
00000670: 8B 54 58 B2 30 A7 54 31 B2 58 41 3A 54 32 B2 36 |.TX.0.T1.XA:T2.6|
00000680: 32 38 AB 58 41 00 94 46 72 01 81 49 B2 30 A4 59 |28.XA..Fr..I.0.Y|
00000690: 48 A9 59 49 00 C5 46 7C 01 40 E5 2C 58 41 AB 54 |H.YI..F|.@.,XA.T|
000006A0: 31 2C 31 39 32 AB 28 49 AC 59 4D AA 59 41 29 2C |1,192.(I.YM.YA),|
000006B0: 58 41 AA 54 32 2C 31 39 32 AB 28 49 AC 59 4D AA |XA.T2,192.(I.YM.|
000006C0: 59 41 29 2C 31 00 CC 46 86 01 82 49 00 DC 46 90 |YA),1..F...I..F.|
000006D0: 01 81 49 B2 30 A4 59 4C A9 AB 59 49 00 0D 47 9A |..I.0.YL..YI..G.|
000006E0: 01 40 E5 2C 58 41 AB 54 31 2C 31 39 32 AB 28 49 |.@.,XA.T1,192.(I|
000006F0: AC 59 4D AA 59 41 29 2C 58 41 AA 54 32 2C 31 39 |.YM.YA),XA.T2,19|
00000700: 32 AB 28 49 AC 59 4D AA 59 41 29 2C 31 00 14 47 |2.(I.YM.YA),1..G|
00000710: A4 01 82 49 00 22 47 AE 01 8B 59 4C B1 30 A7 35 |...I."G...YL.0.5|
00000720: 34 30 00 3F 47 C2 01 40 E5 2C 30 2C 31 39 32 AB |40.?G..@.,0,192.|
00000730: 59 41 2C 36 32 38 2C 31 39 32 AB 59 41 2C 31 00 |YA,628,192.YA,1.|
00000740: 62 47 C7 01 8B 54 58 B2 30 A7 40 E5 2C 30 2C 31 |bG...TX.0.@.,0,1|
00000750: 39 31 AB 59 41 2C 36 32 38 2C 31 39 31 AB 59 41 |91.YA,628,191.YA|
00000760: 2C 31 00 78 47 CC 01 8B 54 58 B2 31 A7 54 31 B2 |,1.xG...TX.1.T1.|
00000770: 54 53 3A 54 32 B2 54 53 00 94 47 D6 01 8B 54 58 |TS:T2.TS..G...TX|
00000780: B2 30 A7 54 31 B2 AB 59 41 3A 54 32 B2 AB 31 39 |.0.T1..YA:T2..19|
00000790: 32 AA 59 41 00 A4 47 E0 01 81 49 B2 58 49 A4 58 |2.YA..G...I.XI.X|
000007A0: 48 A9 58 49 00 D1 47 EA 01 40 E5 2C 49 AC 58 4D |H.XI..G..@.,I.XM|
000007B0: AA 58 41 2C 31 39 32 AB 59 41 AB 54 31 2C 49 AC |.XA,192.YA.T1,I.|
000007C0: 58 4D AA 58 41 2C 31 39 32 AB 59 41 AA 54 32 2C |XM.XA,192.YA.T2,|
000007D0: 31 00 D8 47 F4 01 82 49 00 E8 47 FE 01 81 49 B2 |1..G...I..G...I.|
000007E0: 30 A4 58 4C A9 AB 58 49 00 15 48 08 02 40 E5 2C |0.XL..XI..H..@.,|
000007F0: 49 AC 58 4D AA 58 41 2C 31 39 32 AB 59 41 AB 54 |I.XM.XA,192.YA.T|
00000800: 31 2C 49 AC 58 4D AA 58 41 2C 31 39 32 AB 59 41 |1,I.XM.XA,192.YA|
00000810: AA 54 32 2C 31 00 1C 48 12 02 82 49 00 28 48 1C |.T2,1..H...I.(H.|
00000820: 02 81 49 B2 31 A4 44 4E 00 52 48 26 02 58 28 49 |..I.1.DN.RH&.X(I|
00000830: 29 B2 58 28 49 29 AC 58 4D AA 58 41 3A 59 28 49 |).X(I).XM.XA:Y(I|
00000840: 29 B2 31 39 32 AB 28 59 28 49 29 AC 59 4D AA 59 |).192.(Y(I).YM.Y|
00000850: 41 29 00 59 48 30 02 82 49 00 65 48 44 02 81 49 |A).YH0..I.eHD..I|
00000860: B2 31 A4 44 4E 00 7F 48 4E 02 8B 53 59 B2 30 A7 |.1.DN..HN..SY.0.|
00000870: 40 EB 54 2C 58 28 49 29 2C 59 28 49 29 2C 31 00 |@.T,X(I),Y(I),1.|
00000880: AB 48 58 02 8B 53 59 B2 31 A7 3A 40 E1 2C 58 28 |.HX..SY.1.:@.,X(|
00000890: 49 29 AB 53 2C 59 28 49 29 AB 53 2C 58 28 49 29 |I).S,Y(I).S,X(I)|
000008A0: AA 53 2C 59 28 49 29 AA 53 2C 31 00 E7 48 62 02 |.S,Y(I).S,1..Hb.|
000008B0: 8B 53 59 B2 32 A7 40 E1 2C 58 28 49 29 AB 53 2C |.SY.2.@.,X(I).S,|
000008C0: 59 28 49 29 AB 53 2C 58 28 49 29 AA 53 2C 59 28 |Y(I).S,X(I).S,Y(|
000008D0: 49 29 AA 53 2C 31 3A 40 DF 2C 58 28 49 29 2C 59 |I).S,1:@.,X(I),Y|
000008E0: 28 49 29 2C 32 35 35 00 04 49 6C 02 8B 53 59 B2 |(I),255..Il..SY.|
000008F0: 33 A7 40 E2 2C 31 2C 58 28 49 29 2C 59 28 49 29 |3.@.,1,X(I),Y(I)|
00000900: 2C 53 2C 53 00 32 49 76 02 8B 53 59 B2 34 A7 40 |,S,S.2Iv..SY.4.@|
00000910: E2 2C 31 2C 58 28 49 29 2C 59 28 49 29 2C 53 2C |.,1,X(I),Y(I),S,|
00000920: 53 3A 40 DF 2C 58 28 49 29 2C 59 28 49 29 2C 32 |S:@.,X(I),Y(I),2|
00000930: 35 35 00 5E 49 80 02 8B 54 24 B2 22 34 22 AF 53 |55.^I...T$."4".S|
00000940: 59 B2 30 A7 40 E5 2C 58 28 49 29 2C 59 28 49 29 |Y.0.@.,X(I),Y(I)|
00000950: 2C 58 28 49 29 2C 31 39 31 3A 89 37 32 30 00 92 |,X(I),191:.720..|
00000960: 49 8A 02 8B 54 24 B2 22 34 22 AF 53 59 B2 31 A7 |I...T$."4".SY.1.|
00000970: 40 E1 2C 58 28 49 29 AB 53 2C 59 28 49 29 AB 53 |@.,X(I).S,Y(I).S|
00000980: 2C 58 28 49 29 AA 53 2C 31 39 31 2C 31 3A 89 37 |,X(I).S,191,1:.7|
00000990: 32 30 00 D2 49 94 02 8B 54 24 B2 22 34 22 AF 53 |20..I...T$."4".S|
000009A0: 59 B2 32 A7 40 E1 2C 58 28 49 29 AB 53 2C 59 28 |Y.2.@.,X(I).S,Y(|
000009B0: 49 29 AB 53 2C 58 28 49 29 AA 53 2C 31 39 31 2C |I).S,X(I).S,191,|
000009C0: 31 3A 40 DF 2C 58 28 49 29 2C 59 28 29 3A 89 37 |1:@.,X(I),Y():.7|
000009D0: 32 30 00 E3 49 9E 02 8B 54 24 B3 B1 22 34 22 A7 |20..I...T$.."4".|
000009E0: 37 32 30 00 F3 49 A8 02 81 59 B2 59 28 49 29 A4 |720..I...Y.Y(I).|
000009F0: 31 39 31 00 17 4A B2 02 8B 53 59 B2 33 A7 40 E2 |191..J...SY.3.@.|
00000A00: 2C 31 2C 58 28 49 29 2C 59 28 49 29 2C 58 28 49 |,1,X(I),Y(I),X(I|
00000A10: 29 AB 53 2C 59 AB 53 00 4C 4A BC 02 8B 53 59 B2 |).S,Y.S.LJ...SY.|
00000A20: 34 A7 40 E2 2C 31 2C 58 28 49 29 2C 59 28 49 29 |4.@.,1,X(I),Y(I)|
00000A30: 2C 58 28 49 29 AB 53 2C 59 AB 53 3A 40 DF 2C 58 |,X(I).S,Y.S:@.,X|
00000A40: 28 49 29 2C 59 28 49 29 2C 32 35 35 00 53 4A C6 |(I),Y(I),255.SJ.|
00000A50: 02 82 59 00 5A 4A D0 02 82 49 00 68 4A DA 02 8B |..Y.ZJ...I.hJ...|
00000A60: 43 4F B2 30 A7 37 37 30 00 74 4A E4 02 81 49 B2 |CO.0.770.tJ...I.|
00000A70: 32 A4 44 4E 00 95 4A EE 02 40 E5 2C 58 28 49 AB |2.DN..J..@.,X(I.|
00000A80: 31 29 2C 59 28 49 AB 31 29 2C 58 28 49 29 2C 59 |1),Y(I.1),X(I),Y|
00000A90: 28 49 29 2C 31 00 9C 4A F8 02 82 49 00 B0 4A 02 |(I),1..J...I..J.|
00000AA0: 03 40 FE 1F 2C 30 2C 30 2C 30 2C 36 33 39 2C 38 |.@..,0,0,0,639,8|
00000AB0: 00 19 4B 0C 03 40 E0 2C 34 39 31 35 32 2C 30 2C |..K..@.,49152,0,|
00000AC0: 30 2C 31 2C 31 2C 22 12 20 20 20 20 20 20 20 20 |0,1,1,". |
00000AD0: 20 20 52 2D D2 45 54 55 52 4E 20 43 2D 41 44 44 | R-.ETURN C-ADD|
00000AE0: 20 43 48 41 52 41 43 54 45 52 53 20 53 2D 53 41 | CHARACTERS S-SA|
00000AF0: 56 45 20 54 4F 20 44 49 53 4B 20 48 2D 48 41 52 |VE TO DISK H-HAR|
00000B00: 44 43 4F 50 59 20 20 20 20 20 20 20 20 20 20 20 |DCOPY |
00000B10: 20 20 20 20 20 20 20 92 22 00 22 4B 16 03 A1 F9 | ."."K....|
00000B20: 41 24 00 32 4B 20 03 8B 41 24 B2 22 52 22 A7 38 |A$.2K ..A$."R".8|
00000B30: 31 30 00 43 4B 25 03 8B 41 24 B2 22 43 22 A7 32 |10.CK%..A$."C".2|
00000B40: 30 30 30 00 54 4B 26 03 8B 41 24 B2 22 53 22 A7 |000.TK&..A$."S".|
00000B50: 31 38 30 30 00 65 4B 27 03 8B 41 24 B2 22 48 22 |1800.eK'..A$."H"|
00000B60: A7 31 39 30 30 00 6E 4B 28 03 89 37 39 30 00 9F |.1900.nK(..790..|
00000B70: 4B 2A 03 40 DE 2C 30 2C 31 35 3A 40 9C 2C 30 3A |K*.@.,0,15:@.,0:|
00000B80: 40 E0 2C 34 39 31 35 32 2C 31 35 30 2C 30 2C 32 |@.,49152,150,0,2|
00000B90: 2C 34 2C 22 D5 CC D4 D2 C1 20 D0 CC CF D4 22 00 |,4,"..... ....".|
00000BA0: D9 4B 34 03 40 E0 2C 35 30 31 35 32 2C 33 32 2C |.K4.@.,50152,32,|
00000BB0: 31 36 2C 31 2C 32 2C 22 D7 52 49 54 54 45 4E 20 |16,1,2,".RITTEN |
00000BC0: 42 59 3A 20 C1 4C 41 4E 20 C2 52 55 43 45 20 C3 |BY: .LAN .RUCE .|
00000BD0: 48 41 50 55 54 20 CA 52 2E 00 09 4C 3E 03 40 E0 |HAPUT .R...L>.@.|
00000BE0: 2C 34 39 31 35 32 2C 33 32 2C 32 34 2C 31 2C 32 |,49152,32,24,1,2|
00000BF0: 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 20 35 |," 5|
00000C00: 2D 31 30 2D 31 39 38 37 22 00 42 4C 48 03 40 E0 |-10-1987".BLH.@.|
00000C10: 2C 34 39 31 35 32 2C 33 32 2C 34 30 2C 31 2C 32 |,49152,32,40,1,2|
00000C20: 2C 22 D7 48 45 52 45 20 49 53 20 54 48 45 20 44 |,".HERE IS THE D|
00000C30: 41 54 41 20 43 4F 4D 4D 49 4E 47 20 46 52 4F 4D |ATA COMMING FROM|
00000C40: 3F 22 00 68 4C 52 03 40 E0 2C 34 39 31 35 32 2C |?".hLR.@.,49152,|
00000C50: 33 32 2C 34 38 2C 31 2C 32 2C 22 20 31 29 20 C6 |32,48,1,2," 1) .|
00000C60: 55 4E 43 54 49 4F 4E 22 00 8E 4C 5C 03 40 E0 2C |UNCTION"..L\.@.,|
00000C70: 34 39 31 35 32 2C 33 32 2C 35 36 2C 31 2C 32 2C |49152,32,56,1,2,|
00000C80: 22 20 32 29 20 CB 45 59 42 4F 41 52 44 22 00 B5 |" 2) .EYBOARD"..|
00000C90: 4C 66 03 40 E0 2C 34 39 31 35 32 2C 33 32 2C 36 |Lf.@.,49152,32,6|
00000CA0: 34 2C 31 2C 32 2C 22 20 33 29 20 C4 49 53 4B 20 |4,1,2," 3) .ISK |
00000CB0: 46 49 4C 45 22 00 D1 4C 70 03 A1 F9 41 24 3A 8B |FILE"..Lp...A$:.|
00000CC0: D4 28 22 31 32 33 22 2C 41 24 29 B2 30 A7 38 38 |.("123",A$).0.88|
00000CD0: 30 00 FC 4C 7A 03 40 E0 2C 34 39 31 35 32 2C 33 |0..Lz.@.,49152,3|
00000CE0: 32 2C 38 30 2C 31 2C 32 2C 22 D7 48 41 54 20 4B |2,80,1,2,".HAT K|
00000CF0: 49 4E 44 20 4F 46 20 50 4C 4F 54 22 00 2B 4D 84 |IND OF PLOT".+M.|
00000D00: 03 40 E0 2C 34 39 31 35 32 2C 33 32 2C 38 38 2C |.@.,49152,32,88,|
00000D10: 31 2C 32 2C 22 20 31 29 20 C3 41 52 54 45 53 49 |1,2," 1) .ARTESI|
00000D20: 41 4E 20 3C 59 3D 46 28 58 29 3E 00 5A 4D 8E 03 |AN <Y=F(X)>.ZM..|
00000D30: 40 E0 2C 34 39 31 35 32 2C 33 32 2C 39 36 2C 31 |@.,49152,32,96,1|
00000D40: 2C 32 2C 22 20 32 29 20 D0 4F 4C 41 52 20 20 20 |,2," 2) .OLAR |
00000D50: 20 20 3C 52 3D 46 28 4F 29 3E 00 92 4D 98 03 40 | <R=F(O)>..M..@|
00000D60: E0 2C 34 39 31 35 32 2C 33 32 2C 31 30 34 2C 31 |.,49152,32,104,1|
00000D70: 2C 32 2C 22 20 33 29 20 D0 41 52 41 4D 45 54 52 |,2," 3) .ARAMETR|
00000D80: 49 43 20 3C 58 3D 46 28 54 29 2C 59 3D 46 28 54 |IC <X=F(T),Y=F(T|
00000D90: 29 3E 00 BA 4D A2 03 40 E0 2C 34 39 31 35 32 2C |)>..M..@.,49152,|
00000DA0: 33 32 2C 31 31 32 2C 31 2C 32 2C 22 20 34 29 20 |32,112,1,2," 4) |
00000DB0: C2 41 52 20 47 52 41 50 48 22 00 D7 4D AC 03 A1 |.AR GRAPH"..M...|
00000DC0: F9 54 24 3A 8B D4 28 22 31 32 33 34 22 2C 54 24 |.T$:..("1234",T$|
00000DD0: 29 B2 30 A7 39 34 30 00 30 4E B6 03 8B 54 24 B2 |).0.940.0N...T$.|
00000DE0: 22 34 22 AF 41 24 B2 22 31 22 A7 40 E0 2C 34 39 |"4".A$."1".@.,49|
00000DF0: 31 35 32 2C 30 2C 31 32 30 2C 31 2C 32 2C 22 D3 |152,0,120,1,2,".|
00000E00: CF D2 D2 D9 20 C2 C1 D2 C7 D2 C1 D0 C8 D3 20 CE |.... ......... .|
00000E10: CF D4 20 D3 D5 D0 D0 CF D2 D4 C5 C4 20 CC C9 CB |.. ......... ...|
00000E20: C5 20 D4 C8 C1 D4 22 3A FE 0B 35 3A 89 38 31 30 |. ....":..5:.810|
00000E30: 00 41 4E C0 03 8B 41 24 B2 22 33 22 A7 31 32 31 |.AN...A$."3".121|
00000E40: 30 00 52 4E CA 03 8B 41 24 B2 22 32 22 A7 31 34 |0.RN...A$."2".14|
00000E50: 36 30 00 7C 4E D4 03 40 E0 2C 34 39 31 35 32 2C |60.|N..@.,49152,|
00000E60: 33 32 2C 31 32 38 2C 31 2C 32 2C 22 C5 4E 54 45 |32,128,1,2,".NTE|
00000E70: 52 20 C6 55 4E 43 54 49 4F 4E 3A 22 00 BD 4E DE |R .UNCTION:"..N.|
00000E80: 03 8B 54 24 B2 22 32 22 A7 40 E0 2C 34 39 31 35 |..T$."2".@.,4915|
00000E90: 32 2C 33 32 2C 31 33 36 2C 31 2C 32 2C 22 D2 3D |2,32,136,1,2,".=|
00000EA0: D9 2C 20 CF 3D D8 20 54 48 55 53 2C 20 D9 20 49 |., .=. THUS, . I|
00000EB0: 4E 20 54 45 52 4D 53 20 4F 46 20 D8 22 00 EF 4E |N TERMS OF ."..N|
00000EC0: E8 03 8B 54 24 B2 22 31 22 A7 40 E0 2C 34 39 31 |...T$."1".@.,491|
00000ED0: 35 32 2C 33 32 2C 31 33 36 2C 31 2C 32 2C 22 D9 |52,32,136,1,2,".|
00000EE0: 20 49 4E 20 54 45 52 4D 53 20 4F 46 20 D8 22 00 | IN TERMS OF .".|
00000EF0: FE 4E EA 03 8B 53 B2 31 A7 58 B2 58 AA 38 00 0E |.N...S.1.X.X.8..|
00000F00: 4F EB 03 8B 53 B2 32 A7 58 B2 58 AA 31 35 00 1E |O...S.2.X.X.15..|
00000F10: 4F EC 03 8B 53 B2 33 A7 58 B2 58 AA 32 39 00 50 |O...S.3.X.X.29.P|
00000F20: 4F F2 03 8B 54 24 B2 22 33 22 A7 40 E0 2C 34 39 |O...T$."3".@.,49|
00000F30: 31 35 32 2C 33 32 2C 31 33 36 2C 31 2C 32 2C 22 |152,32,136,1,2,"|
00000F40: D8 20 49 4E 20 54 45 52 4D 53 20 4F 46 20 D4 22 |. IN TERMS OF ."|
00000F50: 00 75 4F FC 03 58 B2 30 3A 59 B2 31 34 34 3A 8D |.uO..X.0:Y.144:.|
00000F60: 31 37 30 30 3A 40 9C 2C 30 3A 8B 46 24 B2 22 22 |1700:@.,0:.F$.""|
00000F70: A7 31 31 32 30 00 86 4F 01 04 8B 54 24 B2 22 31 |.1120..O...T$."1|
00000F80: 22 A7 31 31 30 30 00 CE 4F 06 04 8B 54 24 B2 22 |".1100..O...T$."|
00000F90: 33 22 A7 99 22 90 11 31 36 36 30 20 22 46 24 22 |3".."..1660 "F$"|
00000FA0: 3A 52 45 4D 22 3A 99 22 47 4F 54 4F 31 30 34 30 |:REM":."GOTO1040|
00000FB0: 91 91 91 22 3B 3A 97 38 34 32 2C 31 33 3A 97 38 |...";:.842,13:.8|
00000FC0: 34 33 2C 31 33 3A 97 32 30 38 2C 32 3A 80 00 15 |43,13:.208,2:...|
00000FD0: 50 10 04 8B 54 24 B2 22 33 22 A7 40 E0 2C 34 39 |P...T$."3".@.,49|
00000FE0: 31 35 32 2C 33 32 2C 31 35 32 2C 31 2C 32 2C 22 |152,32,152,1,2,"|
00000FF0: D9 20 49 4E 20 54 45 52 4D 53 20 4F 46 20 D4 22 |. IN TERMS OF ."|
00001000: 3A 58 B2 30 3A 59 B2 31 36 30 3A 8D 31 37 30 30 |:X.0:Y.160:.1700|
00001010: 3A 40 9C 2C 30 00 5E 50 1A 04 8B 54 24 B2 22 33 |:@.,0.^P...T$."3|
00001020: 22 A7 99 22 90 11 31 36 37 30 20 22 46 24 22 3A |".."..1670 "F$":|
00001030: 52 45 4D 20 22 3A 99 22 47 4F 54 4F 31 31 32 30 |REM ":."GOTO1120|
00001040: 91 91 91 22 3B 3A 97 38 34 32 2C 31 33 3A 97 38 |...";:.842,13:.8|
00001050: 34 33 2C 31 33 3A 97 32 30 38 2C 32 3A 80 00 64 |43,13:.208,2:..d|
00001060: 50 24 04 8F 00 73 50 39 04 8B 53 B2 30 A7 58 B2 |P$...sP9..S.0.X.|
00001070: 58 AA 35 00 9A 50 4C 04 99 22 90 11 31 36 34 30 |X.5..PL.."..1640|
00001080: 20 22 46 24 22 3A 52 45 4D 22 3A 99 22 47 4F 54 | "F$":REM":."GOT|
00001090: 4F 31 31 32 30 91 91 91 22 3B 00 B7 50 56 04 97 |O1120...";..PV..|
000010A0: 38 34 32 2C 31 33 3A 97 38 34 33 2C 31 33 3A 97 |842,13:.843,13:.|
000010B0: 32 30 38 2C 32 3A 80 00 FA 50 60 04 40 9C 2C 30 |208,2:...P`.@.,0|
000010C0: 3A 40 E0 2C 34 39 31 35 32 2C 31 36 2C 30 2C 31 |:@.,49152,16,0,1|
000010D0: 2C 32 2C 22 D3 54 41 52 54 20 57 49 54 48 20 3A |,2,".TART WITH :|
000010E0: 22 3A 58 B2 32 31 30 3A 59 B2 30 3A 8D 31 37 30 |":X.210:Y.0:.170|
000010F0: 30 3A 42 47 B2 C5 28 46 24 29 00 36 51 6A 04 40 |0:BG..(F$).6Qj.@|
00001100: E0 2C 34 39 31 35 32 2C 31 36 2C 38 2C 31 2C 32 |.,49152,16,8,1,2|
00001110: 2C 22 C5 4E 44 20 57 49 54 48 20 3A 22 3A 58 B2 |,".ND WITH :":X.|
00001120: 32 31 30 3A 59 B2 38 3A 8D 31 37 30 30 3A 45 4E |210:Y.8:.1700:EN|
00001130: B2 C5 28 46 24 29 00 7B 51 74 04 40 E0 2C 34 39 |..(F$).{Qt.@.,49|
00001140: 31 35 32 2C 31 36 2C 31 36 2C 31 2C 32 2C 22 D3 |152,16,16,1,2,".|
00001150: 54 45 50 20 56 41 4C 55 45 20 3A 22 3A 58 B2 32 |TEP VALUE :":X.2|
00001160: 31 30 3A 59 B2 31 36 3A 8D 31 37 30 30 3A 49 4E |10:Y.16:.1700:IN|
00001170: B2 C5 28 46 24 29 3A 44 4E B2 30 00 B3 51 7E 04 |..(F$):DN.0..Q~.|
00001180: 40 E0 2C 34 39 31 35 32 2C 31 36 2C 33 32 2C 31 |@.,49152,16,32,1|
00001190: 2C 32 2C 22 C3 41 4C 43 55 4C 41 54 49 4E 47 2E |,2,".ALCULATING.|
000011A0: 2E 2E 22 3A 81 49 B2 42 47 20 A4 20 45 4E 20 A9 |..":.I.BG . EN .|
000011B0: 20 49 4E 00 E7 51 88 04 8B 54 24 B2 22 33 22 A7 | IN..Q...T$."3".|
000011C0: 44 4E B2 44 4E AA 31 3A 54 B2 49 3A 8D 31 36 36 |DN.DN.1:T.I:.166|
000011D0: 30 3A 59 28 44 4E 29 B2 59 3A 58 28 44 4E 29 B2 |0:Y(DN).Y:X(DN).|
000011E0: 58 3A 89 31 32 30 30 00 0D 52 92 04 44 4E B2 44 |X:.1200..R..DN.D|
000011F0: 4E AA 31 3A 58 28 44 4E 29 B2 49 3A 58 B2 49 3A |N.1:X(DN).I:X.I:|
00001200: 8D 31 36 34 30 3A 59 28 44 4E 29 B2 59 00 26 52 |.1640:Y(DN).Y.&R|
00001210: 9C 04 8B 54 24 B2 22 32 22 A7 58 28 44 4E 29 B2 |...T$."2".X(DN).|
00001220: 59 AC BE 28 58 29 00 3F 52 A6 04 8B 54 24 B2 22 |Y..(X).?R...T$."|
00001230: 32 22 A7 59 28 44 4E 29 B2 59 AC BF 28 58 29 00 |2".Y(DN).Y..(X).|
00001240: 5B 52 B0 04 8B 44 4E B2 56 4E AB 31 A7 31 33 31 |[R...DN.VN.1.131|
00001250: 30 3A D5 82 49 3A 89 31 33 31 30 00 B3 52 BA 04 |0:..I:.1310..R..|
00001260: 40 9C 2C 30 3A 8B 54 24 B2 22 33 22 A7 40 E0 2C |@.,0:.T$."3".@.,|
00001270: 34 39 31 35 32 2C 31 36 2C 31 36 2C 32 2C 32 2C |49152,16,16,2,2,|
00001280: 22 D0 C1 D2 C1 CD C5 D4 D2 C9 C3 A0 C9 D3 A0 CE |"...............|
00001290: CF D4 A0 D3 D5 D0 D0 CF D2 D4 C5 C4 A0 C9 CE A0 |................|
000012A0: C4 C9 D3 CB A0 CD CF C4 C5 22 3A FE 0B 35 3A 89 |.........":..5:.|
000012B0: 38 31 30 00 F8 52 C4 04 40 E0 2C 34 39 31 35 32 |810..R..@.,49152|
000012C0: 2C 31 36 2C 30 2C 32 2C 32 2C 22 CE 41 4D 45 20 |,16,0,2,2,".AME |
000012D0: 4F 46 20 46 49 4C 45 20 57 49 54 48 20 44 41 54 |OF FILE WITH DAT|
000012E0: 41 22 3A 58 B2 33 36 30 3A 59 B2 30 3A 8D 31 37 |A":X.360:Y.0:.17|
000012F0: 30 30 3A 41 24 B2 46 24 00 06 53 CE 04 FE 0F 3A |00:A$.F$..S....:|
00001300: FE 15 3A 49 B2 31 00 1E 53 D8 04 9F 38 2C 38 2C |..:I.1..S...8,8,|
00001310: 38 2C 22 30 3A 22 AA 41 24 AA 22 2C 53 22 00 40 |8,"0:".A$.",S".@|
00001320: 53 E2 04 8B 54 24 B2 22 34 22 A7 A1 23 38 2C 59 |S...T$."4"..#8,Y|
00001330: 28 49 29 3A 58 28 49 29 B2 49 3A 89 31 32 39 30 |(I):X(I).I:.1290|
00001340: 00 50 53 EC 04 A1 23 38 2C 58 3A A1 23 38 2C 59 |.PS...#8,X:.#8,Y|
00001350: 00 62 53 F6 04 58 28 49 29 B2 58 3A 59 28 49 29 |.bS..X(I).X:Y(I)|
00001360: B2 59 00 86 53 00 05 8B 54 24 B2 22 32 22 A7 58 |.Y..S...T$."2".X|
00001370: 28 49 29 B2 59 AC BE 28 58 29 3A 59 28 49 29 B2 |(I).Y..(X):Y(I).|
00001380: 59 AC BF 28 58 29 00 9C 53 0A 05 8B 53 54 B2 30 |Y..(X)..S...ST.0|
00001390: A7 49 B2 49 AA 31 3A 89 31 32 36 30 00 B9 53 14 |.I.I.1:.1260..S.|
000013A0: 05 44 4E B2 49 3A FE 0F 3A FE 15 3A 99 3A A1 41 |.DN.I:..:..:.:.A|
000013B0: 24 3A A1 41 24 3A A1 41 24 00 0A 54 1E 05 4C 57 |$:.A$:.A$..T..LW|
000013C0: B2 31 3A 40 9C 2C 30 3A 40 E0 2C 34 39 31 35 32 |.1:@.,0:@.,49152|
000013D0: 2C 30 2C 30 2C 31 2C 32 2C 22 C3 4F 4E 4E 45 43 |,0,0,1,2,".ONNEC|
000013E0: 54 20 54 48 45 20 50 4F 49 4E 54 53 28 59 2F 4E |T THE POINTS(Y/N|
000013F0: 29 22 3A A1 F9 41 24 3A 8B 41 24 B2 22 59 22 A7 |)":..A$:.A$."Y".|
00001400: 43 4F B2 31 3A D5 43 4F B2 30 00 42 54 32 05 40 |CO.1:.CO.0.BT2.@|
00001410: E0 2C 34 39 31 35 32 2C 30 2C 38 2C 31 2C 32 2C |.,49152,0,8,1,2,|
00001420: 22 30 2D C4 4F 54 20 20 20 20 20 20 20 20 31 2D |"0-.OT 1-|
00001430: C2 4F 58 20 20 20 20 20 20 20 20 32 2D C6 42 4F |.OX 2-.BO|
00001440: 58 22 00 7B 54 3C 05 40 E0 2C 34 39 31 35 32 2C |X".{T<.@.,49152,|
00001450: 30 2C 31 36 2C 31 2C 32 2C 22 33 2D C3 49 52 43 |0,16,1,2,"3-.IRC|
00001460: 4C 45 20 20 20 20 20 34 2D C6 43 49 52 43 4C 45 |LE 4-.CIRCLE|
00001470: 22 20 20 20 20 20 20 20 20 20 20 00 B5 54 46 05 |" ..TF.|
00001480: 40 E0 2C 34 39 31 35 32 2C 30 2C 33 32 2C 31 2C |@.,49152,0,32,1,|
00001490: 32 2C 22 57 48 41 54 20 4B 49 4E 44 20 4F 46 20 |2,"WHAT KIND OF |
000014A0: 50 4F 49 4E 54 53 22 3A A1 F9 46 24 3A 53 59 B2 |POINTS":..F$:SY.|
000014B0: C5 28 46 24 29 00 FC 54 50 05 8B 53 59 B1 30 A7 |.(F$)..TP..SY.0.|
000014C0: 40 E0 2C 34 39 31 35 32 2C 30 2C 34 30 2C 31 2C |@.,49152,0,40,1,|
000014D0: 32 2C 22 D3 49 5A 45 20 4F 46 20 50 4F 49 4E 54 |2,".IZE OF POINT|
000014E0: 53 3F 22 3A 58 B2 32 35 30 3A 59 B2 34 30 3A 8D |S?":X.250:Y.40:.|
000014F0: 31 37 30 30 3A 53 B2 C5 28 46 24 29 00 41 55 5A |1700:S..(F$).AUZ|
00001500: 05 40 E0 2C 34 39 31 35 32 2C 30 2C 34 38 2C 31 |.@.,49152,0,48,1|
00001510: 2C 32 2C 22 D8 2D 48 41 54 43 48 20 4F 52 20 D4 |,2,".-HATCH OR .|
00001520: 49 43 53 28 D8 2F D4 29 22 3A A1 F9 41 24 3A 8B |ICS(./.)":..A$:.|
00001530: 41 24 B2 22 58 22 A7 54 58 B2 30 3A D5 54 58 B2 |A$."X".TX.0:.TX.|
00001540: 31 00 8F 55 64 05 40 E0 2C 34 39 31 35 32 2C 30 |1..Ud.@.,49152,0|
00001550: 2C 35 36 2C 31 2C 32 2C 22 D8 20 4D 41 52 4B 20 |,56,1,2,". MARK |
00001560: 49 4E 54 45 52 56 41 4C 3A 22 3A 58 B2 32 36 35 |INTERVAL:":X.265|
00001570: 3A 59 B2 35 36 3A 8D 31 37 30 30 3A 58 49 B2 C5 |:Y.56:.1700:XI..|
00001580: 28 46 24 29 3A 8B 58 49 B2 30 A7 58 49 B2 31 00 |(F$):.XI.0.XI.1.|
00001590: DD 55 6E 05 40 E0 2C 34 39 31 35 32 2C 30 2C 36 |.Un.@.,49152,0,6|
000015A0: 34 2C 31 2C 32 2C 22 D9 20 4D 41 52 4B 20 49 4E |4,1,2,". MARK IN|
000015B0: 54 45 52 56 41 4C 3A 22 3A 58 B2 32 36 35 3A 59 |TERVAL:":X.265:Y|
000015C0: B2 36 34 3A 8D 31 37 30 30 3A 59 49 B2 C5 28 46 |.64:.1700:YI..(F|
000015D0: 24 29 3A 8B 59 49 B2 30 A7 59 49 B2 31 00 34 56 |$):.YI.0.YI.1.4V|
000015E0: 78 05 8B 54 58 B2 31 A7 54 40 E0 2C 34 39 31 35 |x..TX.1.T@.,4915|
000015F0: 32 2C 30 2C 37 32 2C 31 2C 32 2C 22 D7 48 41 54 |2,0,72,1,2,".HAT|
00001600: 20 53 49 5A 45 20 4F 46 20 54 49 43 53 3A 22 3A | SIZE OF TICS:":|
00001610: 58 B2 33 30 30 3A 59 B2 37 32 3A 8D 31 37 30 30 |X.300:Y.72:.1700|
00001620: 3A 54 53 B2 C5 28 46 24 29 3A 8B 54 53 B2 30 A7 |:TS..(F$):.TS.0.|
00001630: 54 53 B2 31 00 4A 56 A0 05 40 DE 2C 30 2C 31 35 |TS.1.JV..@.,0,15|
00001640: 3A 40 9C 2C 30 3A 89 32 31 30 00 71 56 B4 05 40 |:@.,0:.210.qV..@|
00001650: 54 45 58 54 3A 8B 54 24 B3 B1 22 34 22 A7 99 22 |TEXT:.T$.."4".."|
00001660: 45 4E 54 45 52 20 2A 2C 2A 20 54 4F 20 45 4E 44 |ENTER *,* TO END|
00001670: 22 00 8F 56 BE 05 8B 54 24 B2 22 34 22 A7 99 22 |"..V...T$."4".."|
00001680: 45 4E 54 45 52 20 2A 20 54 4F 20 45 4E 44 22 00 |ENTER * TO END".|
00001690: A8 56 C8 05 8B 54 24 B2 22 31 22 A7 99 22 45 4E |.V...T$."1".."EN|
000016A0: 54 45 52 20 58 2C 59 22 00 C1 56 D2 05 8B 54 24 |TER X,Y"..V...T$|
000016B0: B2 22 32 22 A7 99 22 45 4E 54 45 52 20 52 2C 4F |."2".."ENTER R,O|
000016C0: 22 00 E1 56 DC 05 8B 54 24 B2 22 34 22 A7 99 22 |"..V...T$."4".."|
000016D0: 45 4E 54 45 52 20 42 41 52 20 48 45 49 47 48 54 |ENTER BAR HEIGHT|
000016E0: 22 00 1E 57 E6 05 8B 54 24 B2 22 33 22 A7 99 22 |"..W...T$."3".."|
000016F0: 50 41 52 41 4D 45 54 52 49 43 20 49 53 20 4E 4F |PARAMETRIC IS NO|
00001700: 54 20 53 55 50 50 4F 52 54 45 44 20 49 4E 20 54 |T SUPPORTED IN T|
00001710: 48 49 53 20 4D 4F 44 45 22 3A 89 38 31 30 00 27 |HIS MODE":.810.'|
00001720: 57 F0 05 44 4E B2 31 00 4B 57 FA 05 8B 54 24 B2 |W..DN.1.KW...T$.|
00001730: 22 34 22 A7 99 44 4E 3B 3A 85 59 24 3A 58 24 B2 |"4"..DN;:.Y$:X$.|
00001740: C4 28 44 4E 29 3A 89 31 35 35 30 00 5B 57 04 06 |.(DN):.1550.[W..|
00001750: 99 44 4E 3B 3A 85 58 24 2C 59 24 00 89 57 0E 06 |.DN;:.X$,Y$..W..|
00001760: 8B 58 24 B2 22 2A 22 B0 59 24 B2 22 2A 22 A7 44 |.X$."*".Y$."*".D|
00001770: 4E B2 44 4E AB 31 3A 40 DE 2C 30 2C 31 35 3A 40 |N.DN.1:@.,0,15:@|
00001780: 9C 2C 30 3A 89 31 33 31 30 00 AD 57 18 06 58 B2 |.,0:.1310..W..X.|
00001790: C5 28 58 24 29 3A 59 B2 C5 28 59 24 29 3A 58 28 |.(X$):Y..(Y$):X(|
000017A0: 44 4E 29 B2 58 3A 59 28 44 4E 29 B2 59 00 D3 57 |DN).X:Y(DN).Y..W|
000017B0: 22 06 8B 54 24 B2 22 32 22 A7 58 28 44 4E 29 B2 |"..T$."2".X(DN).|
000017C0: 59 AC BE 28 58 29 3A 59 28 44 4E 29 B2 59 AC BF |Y..(X):Y(DN).Y..|
000017D0: 28 58 29 00 E5 57 2C 06 44 4E B2 44 4E AA 31 3A |(X)..W,.DN.DN.1:|
000017E0: 89 31 35 33 30 00 FA 57 36 06 8F 20 45 52 52 4F |.1530..W6.. ERRO|
000017F0: 52 20 54 52 41 50 50 49 4E 47 00 0D 58 40 06 8B |R TRAPPING..X@..|
00001800: 45 52 B2 32 30 A7 59 B2 30 3A D6 20 82 00 2C 58 |ER.20.Y.0:. ..,X|
00001810: 4A 06 8B 45 52 B2 33 30 A7 99 22 05 42 52 45 41 |J..ER.30..".BREA|
00001820: 4B 22 3A 40 54 45 58 54 3A EA 3A 80 00 51 58 54 |K":@TEXT:.:..QXT|
00001830: 06 8B 45 4C B2 31 30 30 30 30 A7 99 22 05 42 41 |..EL.10000..".BA|
00001840: 44 20 46 55 4E 43 54 49 4F 4E 22 3A D6 20 39 39 |D FUNCTION":. 99|
00001850: 30 00 75 58 59 06 40 54 45 58 54 3A 99 22 05 22 |0.uXY.@TEXT:."."|
00001860: D3 28 45 52 29 22 49 4E 20 4C 49 4E 45 20 22 45 |.(ER)"IN LINE "E|
00001870: 4C 3A EA 3A 80 00 7D 58 5E 06 D6 20 82 00 DA 58 |L:.:..}X^.. ...X|
00001880: 68 06 59 B2 BE 28 58 29 AA BE 28 58 AD 32 29 AA |h.Y..(X)..(X.2).|
00001890: BE 28 58 AD 33 29 AA BE 28 58 AD 34 29 AA BE 28 |.(X.3)..(X.4)..(|
000018A0: 58 AD 35 29 AA BE 28 58 AD 36 29 AA BE 28 58 AD |X.5)..(X.6)..(X.|
000018B0: 37 29 AA BE 28 58 AD 38 29 AA BE 28 58 AD 39 29 |7)..(X.8)..(X.9)|
000018C0: AA BE 28 58 AD 31 30 29 AA BE 28 58 AD 31 31 29 |..(X.10)..(X.11)|
000018D0: AA BE 28 58 AD 31 32 29 3A 8F 00 E0 58 72 06 8E |..(X.12):...Xr..|
000018E0: 00 F3 58 7C 06 58 B2 BF 28 BE 28 BF 28 54 29 29 |..X|.X..(.(.(T))|
000018F0: 29 3A 8F 00 FD 58 86 06 59 B2 54 3A 8F 00 03 59 |):...X..Y.T:...Y|
00001900: 90 06 8E 00 0D 59 A4 06 46 24 B2 22 22 00 16 59 |.....Y..F$.""..Y|
00001910: A9 06 A1 F9 41 24 00 26 59 AE 06 8B 41 24 B2 C7 |....A$.&Y...A$..|
00001920: 28 31 33 29 A7 8E 00 6A 59 B8 06 8B 41 24 B2 C7 |(13)...jY...A$..|
00001930: 28 32 30 29 A7 40 E0 2C 35 32 31 35 32 2C 58 AB |(20).@.,52152,X.|
00001940: 31 36 2C 59 2C 31 2C 32 2C 22 20 22 3A 58 B2 58 |16,Y,1,2," ":X.X|
00001950: AB 31 36 3A 46 24 B2 C8 28 46 24 2C C3 28 46 24 |.16:F$..(F$,.(F$|
00001960: 29 AB 31 29 3A 89 31 37 30 35 00 98 59 C2 06 46 |).1):.1705..Y..F|
00001970: 24 B2 46 24 AA 41 24 3A 40 E0 2C 35 32 31 35 32 |$.F$.A$:@.,52152|
00001980: 2C 58 2C 59 2C 31 2C 32 2C 41 24 3A 58 B2 58 AA |,X,Y,1,2,A$:X.X.|
00001990: 31 36 3A 89 31 37 30 35 00 E8 59 08 07 40 E0 2C |16:.1705..Y..@.,|
000019A0: 34 39 31 35 32 2C 30 2C 30 2C 31 2C 32 2C 22 12 |49152,0,0,1,2,".|
000019B0: 4E 41 4D 45 20 54 4F 20 53 41 56 45 20 49 54 20 |NAME TO SAVE IT |
000019C0: 55 4E 44 45 52 3A 20 20 20 20 20 20 20 20 20 20 |UNDER: |
000019D0: 20 20 20 20 20 20 20 22 3A 58 B2 32 38 38 3A 59 | ":X.288:Y|
000019E0: B2 30 3A 8D 31 37 30 30 00 F6 59 12 07 40 FE 21 |.0:.1700..Y..@.!|
000019F0: 2C 30 2C 30 2C 30 00 07 5A 1C 07 40 94 2C 31 2C |,0,0,0..Z..@.,1,|
00001A00: 46 24 3A 89 37 38 30 00 15 5A 6C 07 40 FE 21 2C |F$:.780..Zl.@.!,|
00001A10: 30 2C 30 2C 30 00 26 5A 76 07 40 48 F4 2C 31 2C |0,0,0.&Zv.@H.,1,|
00001A20: 35 3A 89 37 38 30 00 3F 5A D0 07 53 B2 31 3A 46 |5:.780.?Z..S.1:F|
00001A30: 4F 24 B2 22 52 4F 22 3A 58 B2 30 3A 59 B2 30 00 |O$."RO":X.0:Y.0.|
00001A40: CA 5A D5 07 40 E0 2C 34 39 31 35 32 2C 30 2C 30 |.Z..@.,49152,0,0|
00001A50: 2C 31 2C 31 2C 22 12 D3 49 5A 45 20 3C 22 AA C4 |,1,1,"..IZE <"..|
00001A60: 28 53 29 AA 22 2C 43 4C 52 3D 45 4E 44 3E 20 20 |(S).",CLR=END> |
00001A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001A90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001AA0: 20 20 20 20 20 20 20 20 20 22 3A 58 B2 31 35 30 | ":X.150|
00001AB0: 3A 59 B2 30 3A 8D 31 37 30 30 3A 8B 46 24 B3 B1 |:Y.0:.1700:.F$..|
00001AC0: 22 22 A7 53 B2 C5 28 46 24 29 00 E5 5A D6 07 8B |"".S..(F$)..Z...|
00001AD0: 46 24 B2 22 13 22 A7 40 FE 21 2C 30 2C 30 2C 30 |F$.".".@.!,0,0,0|
00001AE0: 3A 89 37 37 30 00 6F 5B D7 07 40 E0 2C 34 39 31 |:.770.o[..@.,491|
00001AF0: 35 32 2C 30 2C 30 2C 31 2C 31 2C 22 12 C6 4F 4E |52,0,0,1,1,"..ON|
00001B00: 54 20 3C 22 AA 46 4F 24 AA 22 3E 20 20 20 20 20 |T <".FO$."> |
00001B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B40: 20 20 20 20 20 20 20 20 20 20 22 3A 58 B2 31 36 | ":X.16|
00001B50: 30 3A 59 B2 30 3A 8D 31 37 30 30 3A 8B 46 24 B3 |0:Y.0:.1700:.F$.|
00001B60: B1 22 22 A7 46 4F 24 B2 C8 28 46 24 2C 32 29 00 |."".FO$..(F$,2).|
00001B70: 88 5B E4 07 8B 46 4F 24 B2 22 52 4F 22 A7 41 44 |.[...FO$."RO".AD|
00001B80: 52 53 B2 34 39 31 35 32 00 A1 5B E5 07 8B 46 4F |RS.49152..[...FO|
00001B90: 24 B2 22 47 4F 22 A7 41 44 52 53 B2 35 30 31 35 |$."GO".ADRS.5015|
00001BA0: 32 00 BA 5B E6 07 8B 46 4F 24 B2 22 43 4F 22 A7 |2..[...FO$."CO".|
00001BB0: 41 44 52 53 B2 35 31 31 35 32 00 D3 5B E7 07 8B |ADRS.51152..[...|
00001BC0: 46 4F 24 B2 22 43 55 22 A7 41 44 52 53 B2 35 32 |FO$."CU".ADRS.52|
00001BD0: 31 35 32 00 F0 5B E8 07 53 31 B2 53 3A 53 32 B2 |152..[..S1.S:S2.|
00001BE0: 53 3A 8B 53 B2 30 A7 41 44 52 53 B2 37 31 36 38 |S:.S.0.ADRS.7168|
00001BF0: 00 03 5C E9 07 8B 53 B2 30 A7 53 32 B2 30 3A 53 |..\...S.0.S2.0:S|
00001C00: 31 B2 31 00 31 5C EA 07 40 FE 21 2C 30 2C 30 2C |1.1.1\..@.!,0,0,|
00001C10: 30 3A 58 B2 58 31 3A 59 B2 59 31 3A 40 E0 2C 41 |0:X.X1:Y.Y1:@.,A|
00001C20: 44 2C 58 2C 59 2C 53 31 2C 53 32 2C 22 18 92 2E |D,X,Y,S1,S2,"...|
00001C30: 22 00 3F 5C EB 07 8B 53 B2 30 A7 53 50 B2 34 00 |".?\...S.0.SP.4.|
00001C40: 4D 5C EC 07 8B 53 B2 31 A7 53 50 B2 38 00 5C 5C |M\...S.1.SP.8.\\|
00001C50: ED 07 8B 53 B2 32 A7 53 50 B2 31 36 00 96 5C EE |...S.2.SP.16..\.|
00001C60: 07 A1 F9 41 24 3A 8B 41 24 B2 22 1D 22 A7 8B 58 |...A$:.A$."."..X|
00001C70: B3 36 33 39 AB 53 50 A7 40 E0 2C 41 44 2C 58 2C |.639.SP.@.,AD,X,|
00001C80: 59 2C 53 31 2C 53 32 2C 22 2E 22 3A 58 B2 58 AA |Y,S1,S2,".":X.X.|
00001C90: 53 50 3A 5A B2 31 00 C7 5C F8 07 8B 41 24 B2 22 |SP:Z.1..\...A$."|
00001CA0: 9D 22 A7 8B 58 B1 53 50 A7 40 E0 2C 41 44 2C 58 |."..X.SP.@.,AD,X|
00001CB0: 2C 59 2C 53 31 2C 53 32 2C 22 2E 22 3A 58 B2 58 |,Y,S1,S2,".":X.X|
00001CC0: AB 53 50 3A 5A B2 31 00 F8 5C 02 08 8B 41 24 B2 |.SP:Z.1..\...A$.|
00001CD0: 22 91 22 A7 8B 59 B1 53 50 A7 40 E0 2C 41 44 2C |"."..Y.SP.@.,AD,|
00001CE0: 58 2C 59 2C 53 31 2C 53 32 2C 22 2E 22 3A 59 B2 |X,Y,S1,S2,".":Y.|
00001CF0: 59 AB 53 50 3A 5A B2 31 00 2D 5D 0C 08 8B 41 24 |Y.SP:Z.1.-]...A$|
00001D00: B2 22 11 22 A7 8B 59 B3 31 39 39 AB 53 50 A7 40 |."."..Y.199.SP.@|
00001D10: E0 2C 41 44 2C 58 2C 59 2C 53 31 2C 53 32 2C 22 |.,AD,X,Y,S1,S2,"|
00001D20: 2E 22 3A 59 B2 59 AA 53 50 3A 5A B2 31 00 54 5D |.":Y.Y.SP:Z.1.T]|
00001D30: 11 08 8B 5A B2 31 A7 5A B2 30 3A 40 E0 2C 41 44 |...Z.1.Z.0:@.,AD|
00001D40: 2C 58 2C 59 2C 53 31 2C 53 32 2C 22 2E 22 3A 89 |,X,Y,S1,S2,".":.|
00001D50: 32 30 33 30 00 97 5D 16 08 8B 41 24 B2 C7 28 31 |2030..]...A$..(1|
00001D60: 33 29 A7 40 FE 1F 2C 30 2C 30 2C 30 2C 36 33 39 |3).@..,0,0,0,639|
00001D70: 2C 38 3A 40 E0 2C 41 44 2C 58 2C 59 2C 53 31 2C |,8:@.,AD,X,Y,S1,|
00001D80: 53 32 2C 22 2E 05 22 3A 58 31 B2 58 3A 59 31 B2 |S2,"..":X1.X:Y1.|
00001D90: 59 3A 89 32 30 30 35 00 AB 5D 1A 08 8B C6 28 41 |Y:.2005..]....(A|
00001DA0: 24 29 B3 33 32 A7 41 24 B2 22 22 00 FA 5D 20 08 |$).32.A$.""..] .|
00001DB0: 40 E0 2C 41 44 2C 58 2C 59 2C 53 31 2C 53 32 2C |@.,AD,X,Y,S1,S2,|
00001DC0: 22 2E 22 3A 40 E0 2C 41 44 2C 58 2C 59 2C 53 31 |".":@.,AD,X,Y,S1|
00001DD0: 2C 53 32 2C 41 24 3A 40 E0 2C 41 44 2C 58 AA 53 |,S2,A$:@.,AD,X.S|
00001DE0: 50 2C 59 2C 53 31 2C 53 32 2C 22 2E 22 3A 58 B2 |P,Y,S1,S2,".":X.|
00001DF0: 58 AA 53 50 3A 89 32 30 33 30 00 00 00 |X.SP:.2030... |
.@.@...47,0:.48,68:..B@... -------------
----------------------------------------
------------------..@... ! THIS PROGRAM
WAS WRITTEN ENTIRLY BY ALAN CHAPUT, WHO
RESERVES ALL !..@(.. ! RIGHTS. THIS P
ROGRAM IS FOR FREE DISTRIBUTION ONLY. A
NY QUESTIONS !.LA2.. ! OR COMMENTS MAY B
E ADDRESSED TO BRUCE CHAPUT ON-LIN ON TH
E BOARD !..A<.. ! SHOPPE TALK (517) 8
32-2030, OR ON QUANTUM LINK UNDER THE NA
ME !..AF.. ! A BRUCE CHAPUT.
!.6BP.. !
!..BZ.. ! THIS PROGRAM IS DESIGNED
TO WORK WITH 80 COLUMN OUTPUT ONLY USING
!.QBD..! THE ULTRA HIRES PROGRAM. AV
AILABLE FROM RUN MAGAZINE AND ONLINE
!..CN..! ON QUANTUM LINK.
!.K
CX..!
!..C..
.! VERSION 2.93
!..D...--
----------------------------------------
-----------------------------.5D...%:@WA
LRUS:VN.500:. MAX NUMBER OF DATA PNTS.RD
...X(VN),Y(VN):..1:..0:.B(49152)..60..."
ROMAN FONT",P49152..D...B(50152)..124...
"GOTHIC FONT",P50152.HD...B(51152)..254.
.."COMPUTER FONT",P51152..D...B(52152)..
60..."CURSIVE FONT",P52152..E..W1590:.81
0..EH.@.,0,15:@.,0.8ER.XL.1E38:YL.1E38:X
H..1E38:YH..1E38.XE... SET XHIGH,XLOW,YH
IGH,YLOW.DE...I.1.DN.YE...XL.X(I).XL.X(I
)..E...YL.Y(I).YL.Y(I)..E...XH.X(I).XH.X
(I)..E...YH.Y(I).YH.Y(I)..E...I.UE"..T$.
"4".YL.0.YL.0..E,.XM.620.(XH.XL):YM.180.
(YH.YL)..F6.XA..XL.XM.5:YA..YL.YM.3.!F@.
.XL.0.430.6FT.@.,XA,0,XA,191,1.UFY..TX.0
.@.,XA.1,0,XA.1,191,1.KF^..TX.1.T1.TS:T2
.TS..FH..TX.0.T1.XA:T2.628.XA..FR..I.0.Y
H.YI.EF|.@.,XA.T1,192.(I.YM.YA),XA.T2,19
2.(I.YM.YA),1.LF...I..F...I.0.YL..YI..G.
.@.,XA.T1,192.(I.YM.YA),XA.T2,192.(I.YM.
YA),1..G...I."G...YL.0.540.?GB.@.,0,192.
YA,628,192.YA,1.BGG..TX.0.@.,0,191.YA,62
8,191.YA,1.XGL..TX.1.T1.TS:T2.TS..GV..TX
.0.T1..YA:T2..192.YA..G...I.XI.XH.XI.QG.
.@.,I.XM.XA,192.YA.T1,I.XM.XA,192.YA.T2,
1.XG...I..G...I.0.XL..XI..H..@.,I.XM.XA,
192.YA.T1,I.XM.XA,192.YA.T2,1..H...I.(H.
..I.1.DN.RH&.X(I).X(I).XM.XA:Y(I).192.(Y
(I).YM.YA).YH0..I.EHD..I.1.DN.HN..SY.0.
@.T,X(I),Y(I),1..HX..SY.1.:@.,X(I).S,Y(I
).S,X(I).S,Y(I).S,1..HB..SY.2.@.,X(I).S,
Y(I).S,X(I).S,Y(I).S,1:@.,X(I),Y(I),255.
.IL..SY.3.@.,1,X(I),Y(I),S,S.2IV..SY.4.@
.,1,X(I),Y(I),S,S:@.,X(I),Y(I),255.^I...
T$."4".SY.0.@.,X(I),Y(I),X(I),191:.720..
I...T$."4".SY.1.@.,X(I).S,Y(I).S,X(I).S,
191,1:.720.RI...T$."4".SY.2.@.,X(I).S,Y(
I).S,X(I).S,191,1:@.,X(I),Y():.720..I...
T$.."4".720..I...Y.Y(I).191..J...SY.3.@.
,1,X(I),Y(I),X(I).S,Y.S.LJ...SY.4.@.,1,X
(I),Y(I),X(I).S,Y.S:@.,X(I),Y(I),255.SJF
..Y.ZJP..I.HJZ..CO.0.770.TJ...I.2.DN..J.
.@.,X(I.1),Y(I.1),X(I),Y(I),1..J...I..J.
.@..,0,0,0,639,8..K..@.,49152,0,0,1,1,".
R-RETURN C-ADD CHARACTERS S-SA
VE TO DISK H-HARDCOPY .
"."K....A$.2K ..A$."R".810.CK%..A$."C".2
000.TK&..A$."S".1800.EK'..A$."H".1900.NK
(..790..K*.@.,0,15:@.,0:@.,49152,150,0,2
,4,"ULTRA PLOT".YK4.@.,50152,32,16,1,2,"
WRITTEN BY: ALAN BRUCE CHAPUT JR...L>.@.
,49152,32,24,1,2," 5-10-1987
".BLH.@.,49152,32,40,1,2,"WHERE IS THE D
ATA COMMING FROM?".HLR.@.,49152,32,48,1,
2," 1) FUNCTION"..L\.@.,49152,32,56,1,2,
" 2) KEYBOARD"..LF.@.,49152,32,64,1,2,"
3) DISK FILE".QLP...A$:.T("123",A$).0.88
0..LZ.@.,49152,32,80,1,2,"WHAT KIND OF P
LOT".+M..@.,49152,32,88,1,2," 1) CARTESI
AN <Y=F(X)>.ZM..@.,49152,32,96,1,2," 2)
POLAR <R=F(O)>..M..@.,49152,32,104,1
,2," 3) PARAMETRIC <X=F(T),Y=F(T)>..M..@
.,49152,32,112,1,2," 4) BAR GRAPH".WM...
.T$:.T("1234",T$).0.940.0N...T$."4".A$."
1".@.,49152,0,120,1,2,"SORRY BARGRAPHS N
OT SUPPORTED LIKE THAT":..5:.810.AN...A$
."3".1210.RNJ..A$."2".1460.|NT.@.,49152,
32,128,1,2,"ENTER FUNCTION:"..N...T$."2"
.@.,49152,32,136,1,2,"R=Y, O=X THUS, Y I
N TERMS OF X"..N...T$."1".@.,49152,32,13
6,1,2,"Y IN TERMS OF X"..N...S.1.X.X.8..
O...S.2.X.X.15..O...S.3.X.X.29.PO...T$."
3".@.,49152,32,136,1,2,"X IN TERMS OF T"
.UO..X.0:Y.144:.1700:@.,0:.F$."".1120..O
...T$."1".1100.NO...T$."3".."..1660 "F$"
:REM":."GOTO1040...";:.842,13:.843,13:.2
08,2:...P...T$."3".@.,49152,32,152,1,2,"
Y IN TERMS OF T":X.0:Y.160:.1700:@.,0.^P
...T$."3".."..1670 "F$":REM ":."GOTO1120
...";:.842,13:.843,13:.208,2:..DP$...SP9
..S.0.X.X.5..PL.."..1640 "F$":REM":."GOT
O1120...";..PV..842,13:.843,13:.208,2:..
.P`.@.,0:@.,49152,16,0,1,2,"START WITH :
":X.210:Y.0:.1700:BG.E(F$).6QJ.@.,49152,
16,8,1,2,"END WITH :":X.210:Y.8:.1700:EN
.E(F$).{QT.@.,49152,16,16,1,2,"STEP VALU
E :":X.210:Y.16:.1700:IN.E(F$):DN.0..Q~.
@.,49152,16,32,1,2,"CALCULATING...":.I.B
G . EN . IN..Q...T$."3".DN.DN.1:T.I:.166
0:Y(DN).Y:X(DN).X:.1200..R..DN.DN.1:X(DN
).I:X.I:.1640:Y(DN).Y.&R...T$."2".X(DN).
Y..(X).?R...T$."2".Y(DN).Y..(X).[R...DN.
VN.1.1310:U.I:.1310..R..@.,0:.T$."3".@.,
49152,16,16,2,2,"PARAMETRIC IS NOT SUPPO
RTED IN DISK MODE":..5:.810..RD.@.,49152
,16,0,2,2,"NAME OF FILE WITH DATA":X.360
:Y.0:.1700:A$.F$..SN...:..:I.1..SX..8,8,
8,"0:".A$.",S".@S...T$."4"..#8,Y(I):X(I)
.I:.1290.PS...#8,X:.#8,Y.BS..X(I).X:Y(I)
.Y..S...T$."2".X(I).Y..(X):Y(I).Y..(X)..
S...ST.0.I.I.1:.1260..S..DN.I:..:..:.:.A
$:.A$:.A$..T..LW.1:@.,0:@.,49152,0,0,1,2
,"CONNECT THE POINTS(Y/N)":..A$:.A$."Y".
CO.1:UCO.0.BT2.@.,49152,0,8,1,2,"0-DOT
1-BOX 2-FBOX".{T<.@.,49152,
0,16,1,2,"3-CIRCLE 4-FCIRCLE"
..TF.@.,49152,0,32,1,2,"WHAT KIND OF
POINTS":..F$:SY.E(F$)..TP..SY.0.@.,49152
,0,40,1,2,"SIZE OF POINTS?":X.250:Y.40:.
1700:S.E(F$).AUZ.@.,49152,0,48,1,2,"X-HA
TCH OR TICS(X/T)":..A$:.A$."X".TX.0:UTX.
1..UD.@.,49152,0,56,1,2,"X MARK INTERVAL
:":X.265:Y.56:.1700:XI.E(F$):.XI.0.XI.1.
.UN.@.,49152,0,64,1,2,"Y MARK INTERVAL:"
:X.265:Y.64:.1700:YI.E(F$):.YI.0.YI.1.4V
X..TX.1.T@.,49152,0,72,1,2,"WHAT SIZE OF
TICS:":X.300:Y.72:.1700:TS.E(F$):.TS.0.
TS.1.JV .@.,0,15:@.,0:.210.QV..@TEXT:.T$
.."4".."ENTER *,* TO END"..V...T$."4".."
ENTER * TO END"..VH..T$."1".."ENTER X,Y"
.AVR..T$."2".."ENTER R,O"..V...T$."4".."
ENTER BAR HEIGHT"..W...T$."3".."PARAMETR
IC IS NOT SUPPORTED IN THIS MODE":.810.'
W..DN.1.KW...T$."4"..DN;:.Y$:X$.D(DN):.1
550.[W...DN;:.X$,Y$..W...X$."*".Y$."*".D
N.DN.1:@.,0,15:@.,0:.1310..W..X.E(X$):Y.
E(Y$):X(DN).X:Y(DN).Y.SW"..T$."2".X(DN).
Y..(X):Y(DN).Y..(X)..W,.DN.DN.1:.1530..W
6.. ERROR TRAPPING..X@..ER.20.Y.0:V ..,X
J..ER.30..".BREAK":@TEXT:.:..QXT..EL.100
00..".BAD FUNCTION":V 990.UXY.@TEXT:."."
S(ER)"IN LINE "EL:.:..}X^.V ..ZXH.Y..(X)
..(X.2)..(X.3)..(X.4)..(X.5)..(X.6)..(X.
7)..(X.8)..(X.9)..(X.10)..(X.11)..(X.12)
:...XR....X|.X..(.(.(T))):...X..Y.T:...Y
.....Y..F$.""..Y....A$.&Y...A$.G(13)...J
Y...A$.G(20).@.,52152,X.16,Y,1,2," ":X.X
.16:F$.H(F$,C(F$).1):.1705..YB.F$.F$.A$:
@.,52152,X,Y,1,2,A$:X.X.16:.1705..Y..@.,
49152,0,0,1,2,".NAME TO SAVE IT UNDER:
":X.288:Y.0:.1700..Y..@.!
,0,0,0..Z..@.,1,F$:.780..ZL.@.!,0,0,0.&Z
V.@H.,1,5:.780.?ZP.S.1:FO$."RO":X.0:Y.0.
JZU.@.,49152,0,0,1,1,".SIZE <".D(S).",CL
R=END>
":X.150:Y.0:.17
00:.F$.."".S.E(F$)..ZV..F$.".".@.!,0,0,0
:.770.O[W.@.,49152,0,0,1,1,".FONT <".FO$
.">
":X.160:Y.0:.1
700:.F$.."".FO$.H(F$,2)..[...FO$."RO".AD
RS.49152..[...FO$."GO".ADRS.50152..[...F
O$."CO".ADRS.51152.S[...FO$."CU".ADRS.52
152..[..S1.S:S2.S:.S.0.ADRS.7168..\...S.
0.S2.0:S1.1.1\..@.!,0,0,0:X.X1:Y.Y1:@.,A
D,X,Y,S1,S2,"...".?\...S.0.SP.4.M\...S.1
.SP.8.\\...S.2.SP.16..\....A$:.A$."."..X
.639.SP.@.,AD,X,Y,S1,S2,".":X.X.SP:Z.1.G
\...A$."."..X.SP.@.,AD,X,Y,S1,S2,".":X.X
.SP:Z.1..\...A$."."..Y.SP.@.,AD,X,Y,S1,S
2,".":Y.Y.SP:Z.1.-]...A$."."..Y.199.SP.@
.,AD,X,Y,S1,S2,".":Y.Y.SP:Z.1.T]...Z.1.Z
.0:@.,AD,X,Y,S1,S2,".":.2030..]...A$.G(1
3).@..,0,0,0,639,8:@.,AD,X,Y,S1,S2,"..":
X1.X:Y1.Y:.2005..]...F(A$).32.A$.""..] .
@.,AD,X,Y,S1,S2,".":@.,AD,X,Y,S1,S2,A$:@
.,AD,X.SP,Y,S1,S2,".":X.X.SP:.2030...
> CLICK IMAGE PREVIEW FOR FULL MODAL