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

UBDEMO

FILE INFORMATION

FILENAME(S): UBDEMO

FILE TYPE(S): PRG

FILE SIZE: 5.8K

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

APPEARS ON: 1 disk(s)

FILE HASH

37bb32bc2b42506e5e7f3144b67bf9f92fce1a6b55184e949d03158d6baadbf5

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
KLAAS JOLANDA UBDEMO PRG DuncanTwain 22 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1C 08 50 00 8F 20  2A 2A 2A 2A 2A 2A 2A 20  |....P.. ******* |
00000010: 54 49 54 4C 45 20 53 43  52 45 45 4E 00 25 08 64  |TITLE SCREEN.%.d|
00000020: 00 DA 32 2C 32 00 3F 08  65 00 97 39 30 30 2C 47  |..2,2.?.e..900,G|
00000030: 54 3A 9C 3A 47 54 B2 C2  28 39 30 30 29 AA 31 00  |T:.:GT..(900).1.|
00000040: 61 08 78 00 D8 33 2C 34  30 2C 31 39 36 2C 37 2C  |a.x..3,40,196,7,|
00000050: 22 C1 42 41 43 55 53 20  D3 4F 46 54 57 41 52 45  |".BACUS .OFTWARE|
00000060: 22 00 85 08 8C 00 D8 32  2C 32 32 2C 31 37 35 2C  |"......2,22,175,|
00000070: 39 2C 22 2A 20 55 4C 54  52 41 42 41 53 49 43 2D  |9,"* ULTRABASIC-|
00000080: 36 34 20 2A 22 00 9F 08  A0 00 81 4E B2 31 A4 31  |64 *"......N.1.1|
00000090: 35 A9 31 30 3A 58 B2 35  34 3A 59 B2 4E AC 38 00  |5.10:X.54:Y.N.8.|
000000A0: B1 08 B4 00 F4 31 2C 58  2C 59 3A F3 31 33 20 3A  |.....1,X,Y:.13 :|
000000B0: F2 00 BD 08 C8 00 EF AB  39 35 3A F5 34 00 DE 08  |........95:.4...|
000000C0: DC 00 81 20 49 B2 31 A4  32 32 3A 44 B2 35 3A 54  |... I.1.22:D.5:T|
000000D0: B2 39 3A 8D 34 32 30 3A  82 3A F5 31 AA 44 00 F3  |.9:.420:.:.1.D..|
000000E0: 08 F0 00 EF 31 38 30 3A  F5 31 35 3A EF AB 38 35  |....180:.15:..85|
000000F0: 3A F5 36 00 12 09 04 01  81 20 49 B2 31 A4 32 32  |:.6...... I.1.22|
00000100: 3A 44 B2 32 2E 35 3A 54  B2 AB 39 3A 8D 34 32 30  |:D.2.5:T..9:.420|
00000110: 3A 82 00 22 09 18 01 F5  36 3A EF 31 38 30 3A F5  |:.."....6:.180:.|
00000120: 31 35 00 3D 09 2C 01 F1  3A F0 AB 39 30 3A F5 31  |15.=.,..:..90:.1|
00000130: 2E 35 3A F0 AB 39 30 3A  F5 33 31 3A F2 00 64 09  |.5:..90:.31:..d.|
00000140: 40 01 EF 39 30 3A F5 32  30 3A F0 AB 34 35 3A F5  |@..90:.20:..45:.|
00000150: 32 30 3A EF AB 39 30 3A  F5 33 35 3A F0 AB 39 30  |20:..90:.35:..90|
00000160: 3A F5 31 33 00 7A 09 54  01 F1 3A F5 33 2E 37 3A  |:.13.z.T..:.3.7:|
00000170: F0 AB 39 30 3A F5 2E 35  3A F2 00 9F 09 68 01 EF  |..90:..5:....h..|
00000180: 39 30 3A F5 32 30 3A F0  34 35 3A F5 32 30 3A EF  |90:.20:.45:.20:.|
00000190: AB 39 30 3A F5 33 35 3A  F0 39 30 3A F5 31 35 00  |.90:.35:.90:.15.|
000001A0: CB 09 7C 01 E0 58 AB 31  30 2C 59 2C 37 2C 30 3A  |..|..X.10,Y,7,0:|
000001B0: E0 58 AA 34 2C 59 AA 33  34 2C 37 2C 30 3A E0 58  |.X.4,Y.34,7,0:.X|
000001C0: AA 34 2C 59 AA 32 35 2C  33 2C 30 00 D6 09 90 01  |.4,Y.25,3,0.....|
000001D0: 82 3A 89 34 34 30 00 E2  09 A4 01 F5 44 3A F0 54  |.:.440......D:.T|
000001E0: 3A 8E 00 F3 09 B8 01 8F  20 57 52 49 54 45 20 4E  |:....... WRITE N|
000001F0: 41 4D 45 00 21 0A CC 01  58 30 B2 31 32 39 3A 59  |AME.!...X0.129:Y|
00000200: 30 B2 31 31 39 3A 53 5A  B2 35 3A 53 51 B2 53 5A  |0.119:SZ.5:SQ.SZ|
00000210: AC BA 28 32 29 3A 41 24  B2 22 54 55 52 54 4C 45  |..(2):A$."TURTLE|
00000220: 22 00 3E 0A E0 01 F4 31  2C 58 30 2C 59 30 3A F0  |".>....1,X0,Y0:.|
00000230: 39 30 3A 81 41 B2 31 A4  36 3A 8D 39 30 30 00 44  |90:.A.1.6:.900.D|
00000240: 0A F4 01 82 00 63 0A 08  02 58 30 B2 31 30 35 3A  |.....c...X0.105:|
00000250: 59 30 B2 37 31 3A 41 24  B2 22 47 52 41 50 48 49  |Y0.71:A$."GRAPHI|
00000260: 43 53 22 00 80 0A 1C 02  F4 31 2C 58 30 2C 59 30  |CS"......1,X0,Y0|
00000270: 3A F0 39 30 3A 81 41 B2  31 A4 38 3A 8D 39 30 30  |:.90:.A.1.8:.900|
00000280: 00 99 0A 30 02 82 3A F0  AB 39 30 3A F5 36 30 3A  |...0..:..90:.60:|
00000290: F0 AB 39 30 3A F5 31 30  30 00 A5 0A 44 02 8F 20  |..90:.100...D.. |
000002A0: 53 4F 55 4E 44 00 C1 0A  58 02 ED 22 45 46 31 30  |SOUND...X.."EF10|
000002B0: 46 46 35 30 30 32 31 30  46 46 31 30 30 30 30 30  |FF500210FF100000|
000002C0: 22 00 D0 0A 6C 02 EE 31  2C 36 30 30 3A E4 31 35  |"...l..1,600:.15|
000002D0: 00 DB 0A 80 02 EC 31 2C  31 32 38 00 F7 0A 94 02  |......1,128.....|
000002E0: D8 33 2C 31 33 30 2C 33  30 2C 36 2C 22 41 4E 44  |.3,130,30,6,"AND|
000002F0: 20 D3 CF D5 CE C4 22 00  02 0B A8 02 EE 32 2C 37  | ....."......2,7|
00000300: 30 30 00 16 0B BC 02 ED  22 33 30 31 30 31 30 31  |00......"3010101|
00000310: 30 31 30 31 30 22 00 21  0B D0 02 EC 32 2C 32 35  |01010".!....2,25|
00000320: 34 00 31 0B E4 02 81 49  B2 31 A4 34 30 30 30 3A  |4.1....I.1.4000:|
00000330: 82 00 42 0B F8 02 E5 33  2C 38 2C 30 2C 34 2C 30  |..B....3,8,0,4,0|
00000340: 2C 30 00 5E 0B 0C 03 FB  32 30 3A EB 33 2C 35 30  |,0.^....20:.3,50|
00000350: 2C 34 3A 81 49 B2 31 A4  35 30 3A 82 3A FC 00 71  |,4:.I.1.50:.:..q|
00000360: 0B 20 03 E5 32 2C 32 2C  35 2C 35 2C 35 2C 30 2C  |. ..2,2,5,5,5,0,|
00000370: 30 00 7C 0B 34 03 EE 32  2C 38 34 30 00 AC 0B 48  |0.|.4..2,840...H|
00000380: 03 ED 22 32 30 32 30 30  38 30 31 30 30 32 30 30  |.."2020080100200|
00000390: 38 30 31 30 30 32 30 31  30 30 31 30 30 32 30 30  |8010020100100200|
000003A0: 30 32 30 46 46 34 30 30  30 30 30 22 00 B7 0B 5C  |020FF400000"...\|
000003B0: 03 EC 32 2C 32 35 35 00  D0 0B 70 03 81 49 B2 31  |..2,255...p..I.1|
000003C0: A4 33 30 30 30 3A 82 3A  E4 30 3A 89 31 38 30 30  |.3000:.:.0:.1800|
000003D0: 00 E9 0B 84 03 43 56 B2  C6 28 CA 28 41 24 2C 41  |.....CV..(.(A$,A|
000003E0: 2C 31 29 29 AB 36 34 3A  F1 00 26 0C 98 03 91 43  |,1)).64:..&....C|
000003F0: 56 89 39 38 30 2C 36 33  39 39 39 2C 31 30 36 30  |V.980,63999,1060|
00000400: 2C 36 33 39 39 39 2C 31  31 32 30 2C 36 33 39 39  |,63999,1120,6399|
00000410: 39 2C 31 31 38 30 2C 31  32 36 30 2C 31 33 32 30  |9,1180,1260,1320|
00000420: 2C 36 33 39 39 39 00 68  0C AC 03 91 43 56 AB 31  |,63999.h....CV.1|
00000430: 30 89 36 33 39 39 39 2C  31 33 38 30 2C 36 33 39  |0.63999,1380,639|
00000440: 39 39 2C 36 33 39 39 39  2C 36 33 39 39 39 2C 31  |99,63999,63999,1|
00000450: 34 32 30 2C 36 33 39 39  39 2C 31 34 38 30 2C 31  |420,63999,1480,1|
00000460: 35 36 30 2C 31 36 32 30  00 96 0C C0 03 91 43 56  |560,1620......CV|
00000470: AB 32 30 89 31 36 38 30  2C 36 33 39 39 39 2C 36  |.20.1680,63999,6|
00000480: 33 39 39 39 2C 36 33 39  39 39 2C 36 33 39 39 39  |3999,63999,63999|
00000490: 2C 36 33 39 39 39 00 C1  0C D4 03 F0 39 30 3A F5  |,63999......90:.|
000004A0: 35 AC 53 5A 3A F0 31 38  30 3A F2 3A F5 53 5A AC  |5.SZ:.180:.:.SZ.|
000004B0: 34 3A F0 34 35 3A F5 53  51 3A F0 34 35 3A F5 53  |4:.45:.SQ:.45:.S|
000004C0: 5A 00 F1 0C E8 03 F0 34  35 3A F5 53 51 3A F0 34  |Z......45:.SQ:.4|
000004D0: 35 3A F5 53 5A AC 34 3A  F0 31 38 30 3A F1 3A F5  |5:.SZ.4:.180:.:.|
000004E0: 32 AC 53 5A 3A F0 AB 39  30 3A F2 3A F5 33 AC 53  |2.SZ:..90:.:.3.S|
000004F0: 5A 00 06 0D FC 03 F1 3A  F0 31 33 35 3A F5 33 AC  |Z......:.135:.3.|
00000500: 53 51 3A F0 34 35 00 10  0D 10 04 89 31 37 32 30  |SQ:.45......1720|
00000510: 00 3D 0D 24 04 F5 33 AC  53 5A 3A F0 39 30 3A F5  |.=.$..3.SZ:.90:.|
00000520: 34 AC 53 5A 3A F2 3A 8D  31 37 34 30 3A F5 33 AC  |4.SZ:.:.1740:.3.|
00000530: 53 5A 3A 8D 31 37 34 30  3A F0 31 38 30 00 4B 0D  |SZ:.1740:.180.K.|
00000540: 38 04 F1 3A F5 53 5A 3A  F0 39 30 00 55 0D 4C 04  |8..:.SZ:.90.U.L.|
00000550: 89 31 37 32 30 00 84 0D  60 04 F0 39 30 3A F2 3A  |.1720...`..90:.:|
00000560: F5 35 AC 53 5A 3A F0 AB  39 30 3A F5 33 AC 53 5A  |.5.SZ:..90:.3.SZ|
00000570: 3A F0 AB 39 30 3A F1 3A  F5 32 2E 35 AC 53 5A 3A  |:..90:.:.2.5.SZ:|
00000580: F0 AB 39 30 00 8C 0D 6A  04 F5 53 5A 00 B2 0D 74  |..90...j..SZ...t|
00000590: 04 F2 3A F5 32 AC 53 5A  3A F0 39 30 3A F5 32 2E  |..:.2.SZ:.90:.2.|
000005A0: 35 30 32 AC 53 5A 3A F0  39 30 3A F2 3A F5 33 AC  |502.SZ:.90:.:.3.|
000005B0: 53 5A 00 BC 0D 88 04 89  31 37 32 30 00 E3 0D 9C  |SZ......1720....|
000005C0: 04 F5 32 AC 53 5A 3A F0  39 30 3A F5 33 AC 53 5A  |..2.SZ:.90:.3.SZ|
000005D0: 3A F0 AB 39 30 3A F2 3A  F5 53 5A 3A F0 39 30 3A  |:..90:.:.SZ:.90:|
000005E0: F5 53 5A 00 FF 0D B0 04  3A 8D 31 37 34 30 3A F5  |.SZ.....:.1740:.|
000005F0: 33 AC 53 5A 3A 8D 31 37  34 30 3A F0 31 38 30 00  |3.SZ:.1740:.180.|
00000600: 0D 0E C4 04 F1 3A F5 53  5A 3A F0 39 30 00 17 0E  |.....:.SZ:.90...|
00000610: D8 04 89 31 37 32 30 00  42 0E EC 04 F2 3A F0 39  |...1720.B....:.9|
00000620: 30 3A F5 35 AC 53 5A 3A  F0 31 38 30 3A F1 3A F5  |0:.5.SZ:.180:.:.|
00000630: 32 2E 35 AC 53 5A 3A F0  39 30 3A F2 3A F5 33 AC  |2.5.SZ:.90:.:.3.|
00000640: 53 5A 00 68 0E 00 05 F1  3A F0 39 30 3A F5 32 2E  |SZ.h....:.90:.2.|
00000650: 35 AC 53 5A 3A F0 31 38  30 3A F2 3A F5 53 5A AC  |5.SZ:.180:.:.SZ.|
00000660: 35 2E 30 32 3A F0 39 30  00 72 0E 14 05 89 31 37  |5.02:.90.r....17|
00000670: 32 30 00 9B 0E 28 05 F5  31 2E 35 AC 53 5A 3A F0  |20...(..1.5.SZ:.|
00000680: 39 30 3A F2 3A F5 35 AC  53 5A 3A F1 3A F0 31 38  |90:.:.5.SZ:.:.18|
00000690: 30 3A F5 35 AC 53 5A 3A  F0 39 30 00 A7 0E 3C 05  |0:.5.SZ:.90...<.|
000006A0: F5 31 2E 35 AC 53 5A 00  B1 0E 50 05 89 31 37 32  |.1.5.SZ...P..172|
000006B0: 30 00 DD 0E 64 05 F0 39  30 3A F2 3A F5 35 AC 53  |0...d..90:.:.5.S|
000006C0: 5A 3A F0 AB 39 30 3A F5  33 AC 53 5A 3A F0 AB 39  |Z:..90:.3.SZ:..9|
000006D0: 30 3A F1 3A F5 35 AC 53  5A 3A F0 39 30 00 E7 0E  |0:.:.5.SZ:.90...|
000006E0: 78 05 89 31 37 32 30 00  13 0F 8C 05 F2 3A F5 32  |x..1720......:.2|
000006F0: AC 53 5A 3A 8D 31 37 36  30 3A F5 32 AC 53 5A 3A  |.SZ:.1760:.2.SZ:|
00000700: F0 AB 39 30 3A F1 3A F5  32 AC 53 5A 3A F0 31 38  |..90:.:.2.SZ:.18|
00000710: 30 3A F2 00 2C 0F A0 05  3A F5 35 2E 31 AC 53 5A  |0:..,...:.5.1.SZ|
00000720: 3A F0 39 30 3A F1 3A F5  33 AC 53 5A 00 36 0F B4  |:.90:.:.3.SZ.6..|
00000730: 05 89 31 37 32 30 00 62  0F C8 05 F2 3A F5 32 AC  |..1720.b....:.2.|
00000740: 53 5A 3A 8D 31 37 36 30  3A F5 32 AC 53 5A 3A F0  |SZ:.1760:.2.SZ:.|
00000750: 31 38 30 3A F1 3A F5 2E  35 AC 53 5A 3A F0 34 30  |180:.:..5.SZ:.40|
00000760: 3A F2 00 79 0F DC 05 F5  32 AC 53 51 3A F0 31 34  |:..y....2.SQ:.14|
00000770: 30 3A F1 3A F5 33 AC 53  5A 00 97 0F F0 05 F0 39  |0:.:.3.SZ......9|
00000780: 30 3A F2 3A F5 35 2E 31  AC 53 5A 3A F0 39 30 3A  |0:.:.5.1.SZ:.90:|
00000790: F1 3A F5 33 AC 53 5A 00  A1 0F 04 06 89 31 37 32  |.:.3.SZ......172|
000007A0: 30 00 CC 0F 18 06 F0 39  30 3A F5 34 AC 53 5A 3A  |0......90:.4.SZ:|
000007B0: F2 3A 8D 31 37 38 30 3A  F0 AB 34 35 3A F5 33 AC  |.:.1780:..45:.3.|
000007C0: 53 51 3A F0 34 35 3A 8D  31 37 34 30 00 DF 0F 2C  |SQ:.45:.1740...,|
000007D0: 06 F0 31 38 30 3A F1 3A  F5 53 5A 3A F0 39 30 00  |..180:.:.SZ:.90.|
000007E0: E9 0F 40 06 89 31 37 32  30 00 18 10 54 06 F2 3A  |..@..1720...T..:|
000007F0: F5 33 AC 53 5A 3A F1 3A  F0 31 38 30 3A F5 31 2E  |.3.SZ:.:.180:.1.|
00000800: 35 AC 53 5A 3A F0 AB 39  30 3A F2 3A F5 35 AC 53  |5.SZ:..90:.:.5.S|
00000810: 5A 3A F1 3A F0 AB 39 30  00 33 10 68 06 F5 31 2E  |Z:.:..90.3.h..1.|
00000820: 35 AC 53 5A 3A F0 AB 39  30 3A F5 35 AC 53 5A 3A  |5.SZ:..90:.5.SZ:|
00000830: F0 39 30 00 3D 10 7C 06  89 31 37 32 30 00 5D 10  |.90.=.|..1720.].|
00000840: 90 06 F0 39 30 3A F2 3A  F5 34 AC 53 5A 3A 8D 31  |...90:.:.4.SZ:.1|
00000850: 37 38 30 3A F5 34 AC 53  5A 3A F0 39 30 00 67 10  |780:.4.SZ:.90.g.|
00000860: A4 06 89 31 37 32 30 00  75 10 B8 06 F1 3A F5 32  |...1720.u....:.2|
00000870: AC 53 5A 3A 8E 00 97 10  CC 06 F0 34 35 3A F5 53  |.SZ:.......45:.S|
00000880: 51 3A F0 34 35 3A F5 53  5A 3A F0 34 35 3A F5 53  |Q:.45:.SZ:.45:.S|
00000890: 51 3A F0 34 35 3A 8E 00  BD 10 E0 06 F0 34 35 3A  |Q:.45:.......45:|
000008A0: F5 53 51 3A F0 34 35 3A  F5 31 2E 33 AC 53 5A 3A  |.SQ:.45:.1.3.SZ:|
000008B0: F0 34 35 3A F5 53 51 3A  F0 34 35 3A 8E 00 E3 10  |.45:.SQ:.45:....|
000008C0: F4 06 F0 AB 34 35 3A F5  53 51 3A F0 AB 34 35 3A  |....45:.SQ:..45:|
000008D0: F5 53 5A 3A F0 AB 34 35  3A F5 53 51 3A F0 AB 34  |.SZ:..45:.SQ:..4|
000008E0: 35 3A 8E 00 FF 10 07 07  8F 20 2A 2A 2A 2A 2A 2A  |5:....... ******|
000008F0: 2A 2A 53 51 49 52 41 4C  20 53 43 52 45 45 4E 00  |**SQIRAL SCREEN.|
00000900: 08 11 08 07 DB 31 2C 31  00 23 11 1C 07 F4 37 2C  |.....1,1.#....7,|
00000910: 38 32 2C 31 38 32 3A F0  39 30 3A F3 39 3A 8D 31  |82,182:.90:.9:.1|
00000920: 39 32 30 00 36 11 30 07  F6 3A F4 32 2C 32 30 2C  |920.6.0..:.2,20,|
00000930: 32 30 3A F0 39 30 00 59  11 44 07 81 49 B2 31 A4  |20:.90.Y.D..I.1.|
00000940: 36 3A 8D 31 39 30 30 3A  EF 34 35 3A F1 3A F5 31  |6:.1900:.45:.:.1|
00000950: 30 3A F2 3A EF 39 30 3A  82 00 71 11 58 07 F6 3A  |0:.:.90:..q.X..:|
00000960: 81 49 B2 31 A4 32 30 30  30 3A 82 3A 89 31 39 36  |.I.1.2000:.:.196|
00000970: 30 00 8F 11 6C 07 F5 31  32 3A F0 AB 31 32 30 3A  |0...l..12:..120:|
00000980: F5 31 32 3A F0 AB 31 32  30 3A F5 31 32 3A 8E 00  |.12:..120:.12:..|
00000990: B0 11 80 07 49 B2 31 36  30 3A FB 31 30 30 30 3A  |....I.160:.1000:|
000009A0: F5 49 3A 49 B2 49 AB 31  3A 8B 49 B3 38 A7 3A FE  |.I:I.I.1:.I.8.:.|
000009B0: 00 BC 11 94 07 F0 38 39  3A FC 3A 8E 00 DA 11 A7  |......89:.:.....|
000009C0: 07 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 46 52 41 43 54  |.. ********FRACT|
000009D0: 41 4C 53 20 53 43 52 45  45 4E 00 E3 11 A8 07 DB  |ALS SCREEN......|
000009E0: 31 2C 31 00 08 12 BC 07  81 49 B2 31 A4 35 3A 53  |1,1......I.1.5:S|
000009F0: B2 33 30 30 3A 53 51 B2  53 3A 53 52 B2 53 3A 53  |.300:SQ.S:SR.S:S|
00000A00: 53 B2 53 3A 4B 58 B2 53  00 20 12 D0 07 F4 30 2C  |S.S:KX.S. ....0,|
00000A10: 31 30 2C 32 AA 31 AC 49  AE 32 2E 38 3A F0 39 30  |10,2.1.I.2.8:.90|
00000A20: 00 43 12 E4 07 91 20 49  20 8D 20 32 30 38 30 2C  |.C.... I . 2080,|
00000A30: 32 31 32 30 2C 32 33 30  30 2C 32 34 38 30 2C 32  |2120,2300,2480,2|
00000A40: 36 36 30 00 49 12 F8 07  82 00 62 12 0C 08 F6 3A  |660.I.....b....:|
00000A50: 20 81 49 B2 31 A4 32 30  30 30 3A 82 3A 89 32 38  | .I.1.2000:.:.28|
00000A60: 34 30 00 6B 12 20 08 8F  20 4B 30 00 76 12 34 08  |40.k. .. K0.v.4.|
00000A70: F5 4B 58 20 3A 8E 00 7F  12 48 08 8F 20 4B 31 00  |.KX :....H.. K1.|
00000A80: 92 12 5C 08 4B 58 B2 53  51 AD 33 3A 20 8D 32 30  |..\.KX.SQ.3: .20|
00000A90: 38 30 00 9B 12 70 08 F0  AB 36 30 00 A5 12 84 08  |80...p...60.....|
00000AA0: 8D 32 30 38 30 00 AE 12  98 08 F0 31 32 30 00 B8  |.2080......120..|
00000AB0: 12 AC 08 8D 32 30 38 30  00 C1 12 C0 08 F0 AB 36  |....2080.......6|
00000AC0: 30 00 CB 12 D4 08 8D 32  30 38 30 00 D1 12 E8 08  |0......2080.....|
00000AD0: 8E 00 DA 12 FC 08 8F 20  4B 32 00 ED 12 10 09 53  |....... K2.....S|
00000AE0: 51 B2 53 53 AD 33 3A 20  8D 32 31 32 30 00 F6 12  |Q.SS.3: .2120...|
00000AF0: 24 09 F0 AB 36 30 00 00  13 38 09 8D 32 31 32 30  |$...60...8..2120|
00000B00: 00 09 13 4C 09 F0 31 32  30 00 13 13 60 09 8D 32  |...L..120...`..2|
00000B10: 31 32 30 00 1C 13 74 09  F0 AB 36 30 00 26 13 88  |120...t...60.&..|
00000B20: 09 8D 32 31 32 30 00 2C  13 9C 09 8E 00 35 13 B0  |..2120.,.....5..|
00000B30: 09 8F 20 4B 33 00 48 13  C4 09 53 53 B2 53 52 AD  |.. K3.H...SS.SR.|
00000B40: 33 3A 20 8D 32 33 30 30  00 51 13 D8 09 F0 AB 36  |3: .2300.Q.....6|
00000B50: 30 00 5B 13 EC 09 8D 32  33 30 30 00 64 13 00 0A  |0.[....2300.d...|
00000B60: F0 31 32 30 00 6E 13 14  0A 8D 32 33 30 30 00 77  |.120.n....2300.w|
00000B70: 13 28 0A F0 AB 36 30 00  81 13 3C 0A 8D 32 33 30  |.(...60...<..230|
00000B80: 30 00 87 13 50 0A 8E 00  90 13 64 0A 8F 20 4B 34  |0...P.....d.. K4|
00000B90: 00 A2 13 78 0A 53 52 B2  53 AD 33 3A 20 8D 32 34  |...x.SR.S.3: .24|
00000BA0: 38 30 00 AB 13 8C 0A F0  AB 36 30 00 B5 13 A0 0A  |80.......60.....|
00000BB0: 8D 32 34 38 30 00 BE 13  B4 0A F0 31 32 30 00 C8  |.2480......120..|
00000BC0: 13 C8 0A 8D 32 34 38 30  00 D1 13 DC 0A F0 AB 36  |....2480.......6|
00000BD0: 30 00 DB 13 F0 0A 8D 32  34 38 30 00 E1 13 04 0B  |0......2480.....|
00000BE0: 8E 00 FA 13 18 0B 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |....... ********|
00000BF0: 2A 2A 2A 20 54 44 50 4F  4C 59 00 11 14 2C 0B DB  |*** TDPOLY...,..|
00000C00: 31 2C 37 3A F4 32 2C 30  38 30 2C 31 32 3A F0 39  |1,7:.2,080,12:.9|
00000C10: 30 00 2D 14 40 0B D8 31  2C 32 30 38 2C 31 30 30  |0.-.@..1,208,100|
00000C20: 2C 32 2C 22 50 4F 4C 59  47 4F 4E 53 22 00 4B 14  |,2,"POLYGONS".K.|
00000C30: 54 0B D8 31 2C 32 30 30  2C 30 39 30 2C 32 2C 22  |T..1,200,090,2,"|
00000C40: 23 20 4F 46 20 53 49 44  45 53 22 00 58 14 68 0B  |# OF SIDES".X.h.|
00000C50: 81 4E 56 B2 33 A4 31 36  00 6B 14 7C 0B 44 B2 4E  |.NV.3.16.k.|.D.N|
00000C60: 56 AC 32 AA 33 3A 8D 33  30 36 30 00 88 14 90 0B  |V.2.3:.3060.....|
00000C70: 81 49 B2 31 A4 4E 56 3A  58 B2 33 36 30 AD 4E 56  |.I.1.NV:X.360.NV|
00000C80: 3A 8D 33 30 38 30 3A 82  00 98 14 A4 0B D3 31 3A  |:.3080:.......1:|
00000C90: 8D 33 30 36 30 3A D3 30  00 9E 14 B8 0B 82 00 A4  |.3060:.0........|
00000CA0: 14 CC 0B F6 00 BA 14 E0  0B 81 49 B2 31 A4 32 30  |..........I.1.20|
00000CB0: 30 30 3A 82 3A 89 33 31  30 30 00 CF 14 F4 0B D8  |00:.:.3100......|
00000CC0: 31 2C 32 33 30 2C 38 30  2C 32 2C 4E 56 3A 8E 00  |1,230,80,2,NV:..|
00000CD0: DC 14 08 0C F5 44 3A F0  AB 58 3A 8E 00 F7 14 1C  |.....D:..X:.....|
00000CE0: 0C 8F 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 20 49 4E  |..*********** IN|
00000CF0: 54 45 52 46 45 52 45 00  03 15 30 0C DB 31 2C 37  |TERFERE...0..1,7|
00000D00: 3A D3 32 00 17 15 44 0C  F4 36 2C 30 2C 31 30 30  |:.2...D..6,0,100|
00000D10: 3A EF 39 30 AB 32 32 00  28 15 58 0C 81 49 B2 32  |:.90.22.(.X..I.2|
00000D20: 32 A4 AB 32 32 A9 AB 31  00 3E 15 6C 0C F5 32 35  |2..22..1.>.l..25|
00000D30: 30 3A F1 3A F5 AB 32 35  30 3A F2 3A F0 31 00 44  |0:.:..250:.:.1.D|
00000D40: 15 80 0C 82 00 5B 15 94  0C F4 36 2C 33 32 30 2C  |.....[....6,320,|
00000D50: 31 30 30 3A EF AB 39 30  AA 32 32 00 6C 15 A8 0C  |100:..90.22.l...|
00000D60: 81 49 B2 32 32 A4 AB 32  32 A9 AB 31 00 83 15 BC  |.I.22..22..1....|
00000D70: 0C F5 32 35 30 3A F1 3A  F5 AB 32 35 30 3A F2 3A  |..250:.:..250:.:|
00000D80: F0 AB 31 00 89 15 D0 0C  82 00 A1 15 E4 0C F6 3A  |..1............:|
00000D90: 81 49 B2 31 A4 32 30 30  30 3A 82 3A 89 33 33 31  |.I.1.2000:.:.331|
00000DA0: 35 00 BD 15 F3 0C 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |5...... ********|
00000DB0: 2A 4D 55 4C 54 49 43 49  52 43 4C 45 53 00 D2 15  |*MULTICIRCLES...|
00000DC0: F8 0C DB 31 2C 31 3A 52  31 B2 35 30 3A 52 32 B2  |...1,1:R1.50:R2.|
00000DD0: 34 35 00 EB 15 0C 0D 81  49 B2 31 A4 37 32 3A 41  |45......I.1.72:A|
00000DE0: 4E B2 49 AC 35 AC FF AD  31 38 30 00 05 16 20 0D  |N.I.5...180... .|
00000DF0: 58 B2 52 32 AC BF 28 41  4E 29 3A 59 B2 52 32 AC  |X.R2..(AN):Y.R2.|
00000E00: BE 28 41 4E 29 00 1D 16  34 0D E1 58 AA 31 36 30  |.(AN)...4..X.160|
00000E10: 2C 59 AA 31 30 30 2C 52  31 2C 35 3A 82 00 33 16  |,Y.100,R1,5:..3.|
00000E20: 39 0D 81 49 B2 31 A4 32  30 30 30 3A 82 3A 89 33  |9..I.1.2000:.:.3|
00000E30: 34 30 30 00 4D 16 48 0D  8F 2A 2A 2A 2A 2A 2A 2A  |400.M.H..*******|
00000E40: 2A 2A 2A 2A 2A 20 47 52  50 41 4B 2E 38 00 53 16  |***** GRPAK.8.S.|
00000E50: 49 0D 8C 00 6A 16 5C 0D  8F 20 47 52 41 50 48 49  |I...j.\.. GRAPHI|
00000E60: 4E 47 20 52 4F 55 54 49  4E 45 00 88 16 70 0D 99  |NG ROUTINE...p..|
00000E70: 22 93 28 50 29 49 45 20  43 48 41 52 54 20 4F 52  |".(P)IE CHART OR|
00000E80: 20 28 42 29 41 52 53 22  00 AB 16 72 0D 89 33 35  | (B)ARS"...r..35|
00000E90: 32 30 3A 3A 3A 8F 20 4A  41 4D 20 46 4F 52 20 44  |20:::. JAM FOR D|
00000EA0: 45 4D 4F 20 2A 2A 2A 2A  2A 2A 2A 00 B3 16 84 0D  |EMO *******.....|
00000EB0: A1 52 24 00 C4 16 98 0D  8B 52 24 B2 22 42 22 A7  |.R$......R$."B".|
00000EC0: 33 37 32 30 00 D6 16 AC  0D 8B 52 24 B3 B1 22 50  |3720......R$.."P|
00000ED0: 22 A7 33 34 36 30 00 E0  16 C0 0D 8D 33 39 34 30  |".3460......3940|
00000EE0: 00 F7 16 D4 0D 8F 20 44  52 41 57 20 50 49 45 20  |...... DRAW PIE |
00000EF0: 26 20 4C 49 4E 45 53 00  03 17 E8 0D DB 31 2C 37  |& LINES......1,7|
00000F00: 3A F4 32 00 1E 17 FC 0D  81 49 B2 31 A4 4E 50 3A  |:.2......I.1.NP:|
00000F10: 44 47 B2 41 28 49 29 AC  33 36 30 AD 41 54 00 28  |DG.A(I).360.AT.(|
00000F20: 17 10 0E 8D 35 32 32 30  00 2E 17 24 0E 82 00 45  |....5220...$...E|
00000F30: 17 38 0E D8 33 2C 31 30  2C 31 36 2C 38 2C 22 D4  |.8..3,10,16,8,".|
00000F40: 4F 54 41 4C 22 00 56 17  4C 0E D8 33 2C 31 35 2C  |OTAL".V.L..3,15,|
00000F50: 38 2C 38 2C 41 54 00 5C  17 60 0E F6 00 71 17 74  |8,8,AT.\.`...q.t|
00000F60: 0E 81 49 B2 31 A4 32 30  30 30 3A 82 3A 89 31 30  |..I.1.2000:.:.10|
00000F70: 30 00 81 17 88 0E 8F 20  42 41 52 20 43 48 41 52  |0...... BAR CHAR|
00000F80: 54 00 8B 17 9C 0E 8D 34  35 30 30 00 94 17 B0 0E  |T......4500.....|
00000F90: DB 31 2C 37 00 B0 17 C4  0E 57 B2 38 AC B5 28 33  |.1,7.....W.8..(3|
00000FA0: 37 AD 28 4E 42 AC 28 4E  44 AA 31 29 29 29 AB 32  |7.(NB.(ND.1))).2|
00000FB0: 00 DF 17 D8 0E 81 4A B2  31 A4 4E 42 3A 81 49 B2  |......J.1.NB:.I.|
00000FC0: 31 A4 4E 44 3A 50 B2 28  57 AA 32 29 AC 28 28 4A  |1.ND:P.(W.2).((J|
00000FD0: AB 31 29 AC 28 4E 44 AA  31 29 AA 49 AB 31 29 00  |.1).(ND.1).I.1).|
00000FE0: 04 18 EC 0E CE 20 50 AA  38 2C 31 30 2C 50 AA 57  |..... P.8,10,P.W|
00000FF0: AA 38 2C 31 30 AA 53 46  AC 56 28 49 2C 4A 29 2C  |.8,10.SF.V(I,J),|
00001000: 43 28 49 29 00 1E 18 00  0F 8B 57 B3 36 B0 53 46  |C(I)......W.6.SF|
00001010: AC 56 28 49 2C 4A 29 B3  33 A7 33 38 38 30 00 30  |.V(I,J).3.3880.0|
00001020: 18 14 0F E0 50 AA 31 30  2C 31 32 2C 43 28 49 29  |....P.10,12,C(I)|
00001030: 00 36 18 28 0F 8F 00 3F  18 3C 0F 82 49 2C 4A 00  |.6.(...?.<..I,J.|
00001040: 45 18 50 0F 90 00 63 18  64 0F 8F 20 44 41 54 41  |E.P...c.d.. DATA|
00001050: 20 43 4F 4C 4C 45 43 54  49 4F 4E 20 46 4F 52 20  | COLLECTION FOR |
00001060: 50 49 45 00 86 18 78 0F  99 22 52 45 41 44 20 44  |PIE...x.."READ D|
00001070: 41 54 41 20 53 54 41 54  45 4D 45 4E 54 53 3F 20  |ATA STATEMENTS? |
00001080: 28 59 2F 4E 29 22 00 A2  18 7D 0F 89 34 32 30 30  |(Y/N)"...}..4200|
00001090: 3A 3A 3A 3A 8F 20 4A 41  4D 20 46 4F 52 20 44 45  |::::. JAM FOR DE|
000010A0: 4D 4F 00 B6 18 8C 0F A1  52 24 3A 8B 52 24 B2 22  |MO......R$:.R$."|
000010B0: 22 A7 33 39 38 30 00 C7  18 A0 0F 8B 52 24 B2 22  |".3980......R$."|
000010C0: 59 22 A7 34 32 30 30 00  E2 18 B4 0F 85 22 4E 55  |Y".4200......"NU|
000010D0: 4D 42 45 52 20 4F 46 20  50 49 45 43 45 53 22 3B  |MBER OF PIECES";|
000010E0: 4E 50 00 FA 18 C8 0F 86  41 28 4E 50 29 2C 41 24  |NP......A(NP),A$|
000010F0: 28 4E 50 29 2C 43 28 4E  50 29 00 13 19 DC 0F 81  |(NP),C(NP)......|
00001100: 49 B2 31 A4 4E 50 3A 85  22 44 41 54 41 22 3B 41  |I.1.NP:."DATA";A|
00001110: 28 49 29 00 26 19 F0 0F  85 22 4C 41 42 45 4C 22  |(I).&...."LABEL"|
00001120: 3B 41 24 28 49 29 00 4D  19 04 10 8B C3 28 41 24  |;A$(I).M.....(A$|
00001130: 28 49 29 29 B1 39 A7 99  22 54 4F 4F 20 4C 4F 4E  |(I)).9.."TOO LON|
00001140: 47 2D 52 45 44 4F 22 3A  89 34 30 38 30 00 5F 19  |G-REDO":.4080._.|
00001150: 18 10 85 22 43 4F 4C 4F  52 22 3B 43 28 49 29 00  |..."COLOR";C(I).|
00001160: 65 19 2C 10 8F 00 76 19  40 10 41 54 B2 41 28 49  |e.,...v.@.AT.A(I|
00001170: 29 AA 41 54 3A 82 00 7C  19 54 10 8E 00 84 19 68  |).AT:..|.T.....h|
00001180: 10 87 4E 50 00 9C 19 7C  10 86 41 28 4E 50 29 2C  |..NP...|..A(NP),|
00001190: 41 24 28 4E 50 29 2C 43  28 4E 50 29 00 AE 19 90  |A$(NP),C(NP)....|
000011A0: 10 81 49 B2 31 A4 4E 50  3A 87 41 28 49 29 00 B9  |..I.1.NP:.A(I)..|
000011B0: 19 A4 10 87 41 24 28 49  29 00 C3 19 B8 10 87 43  |....A$(I)......C|
000011C0: 28 49 29 00 D4 19 CC 10  41 54 B2 41 28 49 29 AA  |(I).....AT.A(I).|
000011D0: 41 54 3A 82 00 DA 19 E0  10 8E 00 E1 19 F4 10 83  |AT:.............|
000011E0: 37 00 F3 19 08 11 83 34  30 2C 22 C6 4F 52 54 59  |7......40,".ORTY|
000011F0: 22 2C 33 00 07 1A 1C 11  83 37 30 2C 22 D3 45 56  |",3......70,".EV|
00001200: 45 4E 54 59 22 2C 34 00  1A 1A 30 11 83 33 30 2C  |ENTY",4...0..30,|
00001210: 22 D4 48 49 52 54 59 22  2C 35 00 2C 1A 44 11 83  |".HIRTY",5.,.D..|
00001220: 35 30 2C 22 C6 49 46 54  59 22 2C 36 00 3F 1A 58  |50,".IFTY",6.?.X|
00001230: 11 83 39 30 2C 22 CE 49  4E 45 54 59 22 2C 37 00  |..90,".INETY",7.|
00001240: 52 1A 6C 11 83 32 30 2C  22 D4 57 45 4E 54 59 22  |R.l..20,".WENTY"|
00001250: 2C 38 00 6A 1A 80 11 83  36 37 2C 22 D3 49 58 54  |,8.j....67,".IXT|
00001260: 59 2D 53 45 56 45 4E 22  2C 39 00 7D 1A 94 11 8F  |Y-SEVEN",9.}....|
00001270: 20 47 45 54 20 42 41 52  20 44 41 54 41 00 A0 1A  | GET BAR DATA...|
00001280: A8 11 99 22 52 45 41 44  20 44 41 54 41 20 53 54  |..."READ DATA ST|
00001290: 41 54 45 4D 45 4E 54 53  3F 20 28 59 2F 4E 29 22  |ATEMENTS? (Y/N)"|
000012A0: 00 B4 1A BC 11 A1 52 24  3A 8B 52 24 B2 22 22 A7  |......R$:.R$."".|
000012B0: 34 35 34 30 00 C5 1A D0  11 8B 52 24 B2 22 59 22  |4540......R$."Y"|
000012C0: A7 34 39 30 30 00 E3 1A  E4 11 85 22 4E 55 4D 42  |.4900......"NUMB|
000012D0: 45 52 20 4F 46 20 44 41  54 41 20 53 45 54 53 22  |ER OF DATA SETS"|
000012E0: 3B 4E 44 00 05 1B F8 11  85 22 4E 55 4D 42 45 52  |;ND......"NUMBER|
000012F0: 20 4F 46 20 42 41 52 53  20 45 41 43 48 20 53 45  | OF BARS EACH SE|
00001300: 54 22 3B 4E 42 00 2E 1B  0C 12 8B 4E 42 AC 28 4E  |T";NB......NB.(N|
00001310: 44 AA 31 29 B1 33 37 A7  99 22 54 4F 4F 20 4D 41  |D.1).37.."TOO MA|
00001320: 4E 59 20 42 41 52 53 22  3A 89 34 35 38 30 00 43  |NY BARS":.4580.C|
00001330: 1B 20 12 86 20 56 28 4E  44 2C 4E 42 29 2C 43 28  |. .. V(ND,NB),C(|
00001340: 4E 44 29 00 59 1B 34 12  81 49 B2 31 A4 4E 44 3A  |ND).Y.4..I.1.ND:|
00001350: 99 22 43 4F 4C 4F 52 22  49 00 63 1B 48 12 85 43  |."COLOR"I.c.H..C|
00001360: 28 49 29 00 69 1B 5C 12  82 00 7D 1B 70 12 81 49  |(I).i.\...}.p..I|
00001370: B2 31 A4 4E 44 3A 81 4A  B2 31 A4 4E 42 00 95 1B  |.1.ND:.J.1.NB...|
00001380: 84 12 99 22 44 41 54 41  20 53 45 54 22 49 3B 22  |..."DATA SET"I;"|
00001390: 42 41 52 22 4A 00 A9 1B  98 12 85 22 56 41 4C 55  |BAR"J......"VALU|
000013A0: 45 22 3B 56 28 49 2C 4A  29 00 B2 1B AC 12 82 4A  |E";V(I,J)......J|
000013B0: 2C 49 00 C6 1B C0 12 81  49 B2 31 A4 4E 44 3A 81  |,I......I.1.ND:.|
000013C0: 4A B2 31 A4 4E 42 00 DF  1B D4 12 8B 4D 58 B3 56  |J.1.NB......MX.V|
000013D0: 28 49 2C 4A 29 A7 4D 58  B2 56 28 49 2C 4A 29 00  |(I,J).MX.V(I,J).|
000013E0: E8 1B E8 12 82 4A 2C 49  00 F6 1B FC 12 53 46 B2  |.....J,I.....SF.|
000013F0: 31 37 30 AD 4D 58 00 FC  1B 10 13 8E 00 02 1C 24  |170.MX.........$|
00001400: 13 8C 00 18 1C 38 13 87  41 24 3A 8B 41 24 B3 B1  |.....8..A$:.A$..|
00001410: 22 FF 22 A7 34 39 32 30  00 20 1C 4C 13 87 4E 44  |".".4920. .L..ND|
00001420: 00 28 1C 60 13 87 4E 42  00 3D 1C 74 13 86 20 56  |.(.`..NB.=.t.. V|
00001430: 28 4E 44 2C 4E 42 29 2C  43 28 4E 44 29 00 49 1C  |(ND,NB),C(ND).I.|
00001440: 88 13 81 49 B2 31 A4 4E  44 00 53 1C 9C 13 87 43  |...I.1.ND.S....C|
00001450: 28 49 29 00 59 1C B0 13  82 00 6D 1C C4 13 81 49  |(I).Y.....m....I|
00001460: B2 31 A4 4E 44 3A 81 4A  B2 31 A4 4E 42 00 79 1C  |.1.ND:.J.1.NB.y.|
00001470: D8 13 87 56 28 49 2C 4A  29 00 82 1C EC 13 82 4A  |...V(I,J)......J|
00001480: 2C 49 00 96 1C 00 14 81  49 B2 31 A4 4E 44 3A 81  |,I......I.1.ND:.|
00001490: 4A B2 31 A4 4E 42 00 AF  1C 14 14 8B 4D 58 B3 56  |J.1.NB......MX.V|
000014A0: 28 49 2C 4A 29 A7 4D 58  B2 56 28 49 2C 4A 29 00  |(I,J).MX.V(I,J).|
000014B0: B8 1C 28 14 82 4A 2C 49  00 C6 1C 3C 14 53 46 B2  |..(..J,I...<.SF.|
000014C0: 31 37 30 AD 4D 58 00 CC  1C 50 14 8E 00 F1 1C 64  |170.MX...P.....d|
000014D0: 14 8F 20 54 55 52 54 4C  45 20 53 45 47 4D 45 4E  |.. TURTLE SEGMEN|
000014E0: 54 20 44 52 41 57 49 4E  47 20 52 4F 55 54 49 4E  |T DRAWING ROUTIN|
000014F0: 45 00 0C 1D 78 14 4A B2  35 30 AC FF AC 32 AD 33  |E...x.J.50...2.3|
00001500: 36 30 3A 4B B2 31 3A F3  43 28 49 29 00 25 1D 8C  |60:K.1:.C(I).%..|
00001510: 14 F0 44 47 AD 32 3A F1  3A F5 31 36 3A F2 3A F0  |..DG.2:.:.16:.:.|
00001520: AB 44 47 AD 32 00 32 1D  A0 14 F5 20 35 30 3A F0  |.DG.2.2.... 50:.|
00001530: 39 30 00 46 1D B4 14 81  4D B2 31 A4 44 47 3A F5  |90.F....M.1.DG:.|
00001540: 4A 3A F0 4B 3A 82 00 5B  1D C8 14 F0 39 30 3A F5  |J:.K:..[....90:.|
00001550: 35 30 3A F0 AB 44 47 AD  32 3A F1 00 78 1D DC 14  |50:..DG.2:..x...|
00001560: F0 31 38 30 3A F5 31 30  3A E0 F8 28 58 29 2C F8  |.180:.10:..(X),.|
00001570: 28 59 29 2C 43 28 49 29  00 AE 1D F0 14 F5 35 35  |(Y),C(I)......55|
00001580: 3A 51 4C B2 30 3A 57 B2  F8 28 41 29 AB 33 36 30  |:QL.0:W..(A).360|
00001590: AC B5 28 F8 28 41 29 AD  33 36 30 29 3A 8B 57 B1  |..(.(A).360):.W.|
000015A0: 31 38 30 AF 57 B3 33 36  30 A7 51 4C B2 31 00 DA  |180.W.360.QL.1..|
000015B0: 1D 04 15 D8 33 2C F8 28  58 29 AB 51 4C AC 38 AC  |....3,.(X).QL.8.|
000015C0: C3 28 41 24 28 49 29 29  2C F8 28 59 29 AA 36 2C  |.(A$(I)),.(Y).6,|
000015D0: 43 28 49 29 2C 41 24 28  49 29 00 05 1E 18 15 D8  |C(I),A$(I)......|
000015E0: 31 2C F8 28 58 29 AB 51  4C AC 38 AC C3 28 41 24  |1,.(X).QL.8..(A$|
000015F0: 28 49 29 29 2C F8 28 59  29 AB 32 2C 43 28 49 29  |(I)),.(Y).2,C(I)|
00001600: 2C 41 28 49 29 00 28 1E  2C 15 57 24 B2 C4 28 B5  |,A(I).(.,.W$..(.|
00001610: 28 41 28 49 29 AC 31 30  30 30 30 AD 41 54 29 AD  |(A(I).10000.AT).|
00001620: 31 30 30 29 AA 22 25 22  00 52 1E 40 15 D8 31 2C  |100)."%".R.@..1,|
00001630: F8 28 58 29 AB 51 4C AC  38 AC C3 28 41 24 28 49  |.(X).QL.8..(A$(I|
00001640: 29 29 2C F8 28 59 29 AB  31 30 2C 43 28 49 29 2C  |)),.(Y).10,C(I),|
00001650: 57 24 00 5F 1E 54 15 F0  31 38 30 3A F5 36 35 00  |W$._.T..180:.65.|
00001660: 71 1E 68 15 F5 31 36 3A  F0 44 47 AD 32 AA 31 38  |q.h..16:.DG.2.18|
00001670: 30 00 77 1E 7C 15 8E 00  92 1E 90 15 83 22 FF 22  |0.w.|........"."|
00001680: 20 3A 8F 20 48 45 41 44  45 52 20 46 4F 52 20 32  | :. HEADER FOR 2|
00001690: 4E 44 00 A5 1E A4 15 83  20 36 2C 34 20 3A 8F 20  |ND...... 6,4 :. |
000016A0: 4E 44 2C 4E 42 00 C4 1E  B8 15 83 20 33 2C 36 2C  |ND,NB...... 3,6,|
000016B0: 39 2C 37 2C 35 2C 34 20  20 20 20 3A 8F 20 43 4F  |9,7,5,4    :. CO|
000016C0: 4C 4F 52 53 00 D2 1E CC  15 83 20 34 2C 34 2C 34  |LORS...... 4,4,4|
000016D0: 2C 34 00 E0 1E E0 15 83  20 35 2C 35 2C 35 2C 35  |,4...... 5,5,5,5|
000016E0: 00 EE 1E F4 15 83 20 36  2C 36 2C 36 2C 36 00 FC  |...... 6,6,6,6..|
000016F0: 1E 08 16 83 20 37 2C 37  2C 37 2C 37 00 0A 1F 1C  |.... 7,7,7,7....|
00001700: 16 83 20 38 2C 38 2C 38  2C 38 00 18 1F 30 16 83  |.. 8,8,8,8...0..|
00001710: 20 33 2C 33 2C 33 2C 33  00 26 1F 44 16 83 20 36  | 3,3,3,3.&.D.. 6|
00001720: 2C 36 2C 36 2C 36 00 34  1F 58 16 83 20 38 2C 38  |,6,6,6.4.X.. 8,8|
00001730: 2C 38 2C 38 00 00 00 0F                           |,8,8....        |
....P.. ******* TITLE SCREEN.%.D.Z2,2.?.
E..900,GT:.:GT.B(900).1.A.X.X3,40,196,7,
"ABACUS SOFTWARE".....X2,22,175,9,"* ULT
RABASIC-64 *"... ..N.1.15.10:X.54:Y.N.8.
.....1,X,Y:.13 :....H...95:.4...... I.1.
22:D.5:T.9:.420:.:.1.D......180:.15:..85
:.6...... I.1.22:D.2.5:T..9:.420:.."....
6:.180:.15.=.,..:..90:.1.5:..90:.31:..D.
@..90:.20:..45:.20:..90:.35:..90:.13.Z.T
..:.3.7:..90:..5:....H..90:.20:.45:.20:.
.90:.35:.90:.15.K.|..X.10,Y,7,0:.X.4,Y.3
4,7,0:.X.4,Y.25,3,0.V....:.440......D:.T
:....... WRITE NAME.!.L.X0.129:Y0.119:SZ
.5:SQ.SZ..(2):A$."TURTLE".>....1,X0,Y0:.
90:.A.1.6:.900.D.....C...X0.105:Y0.71:A$
."GRAPHICS"......1,X0,Y0:.90:.A.1.8:.900
...0..:..90:.60:..90:.100...D.. SOUND.A.
X.."EF10FF500210FF100000".P.L..1,600:.15
......1,128.....X3,130,30,6,"AND SOUND".
.....2,700......"301010101010".!.P..2,25
4.1....I.1.4000:..B....3,8,0,4,0,0.^....
20:.3,50,4:.I.1.50:.:..Q. ..2,2,5,5,5,0,
0.|.4..2,840...H.."202008010020080100201
00100200020FF400000"...\..2,255.P.P..I.1
.3000:.:.0:.1800.....CV.F(J(A$,A,1)).64:
..&....CV.980,63999,1060,63999,1120,6399
9,1180,1260,1320,63999.H....CV.10.63999,
1380,63999,63999,63999,1420,63999,1480,1
560,1620......CV.20.1680,63999,63999,639
99,63999,63999.A.T..90:.5.SZ:.180:.:.SZ.
4:.45:.SQ:.45:.SZ......45:.SQ:.45:.SZ.4:
.180:.:.2.SZ:..90:.:.3.SZ......:.135:.3.
SQ:.45......1720.=.$..3.SZ:.90:.4.SZ:.:.
1740:.3.SZ:.1740:.180.K.8..:.SZ:.90.U.L.
.1720...`..90:.:.5.SZ:..90:.3.SZ:..90:.:
.2.5.SZ:..90...J..SZ...T..:.2.SZ:.90:.2.
502.SZ:.90:.:.3.SZ......1720......2.SZ:.
90:.3.SZ:..90:.:.SZ:.90:.SZ.....:.1740:.
3.SZ:.1740:.180...D..:.SZ:.90...X..1720.
B....:.90:.5.SZ:.180:.:.2.5.SZ:.90:.:.3.
SZ.H....:.90:.2.5.SZ:.180:.:.SZ.5.02:.90
.R....1720...(..1.5.SZ:.90:.:.5.SZ:.:.18
0:.5.SZ:.90...<..1.5.SZ...P..1720...D..9
0:.:.5.SZ:..90:.3.SZ:..90:.:.5.SZ:.90...
X..1720......:.2.SZ:.1760:.2.SZ:..90:.:.
2.SZ:.180:..,. .:.5.1.SZ:.90:.:.3.SZ.6..
..1720.B.H..:.2.SZ:.1760:.2.SZ:.180:.:..
5.SZ:.40:..Y....2.SQ:.140:.:.3.SZ......9
0:.:.5.1.SZ:.90:.:.3.SZ......1720.L....9
0:.4.SZ:.:.1780:..45:.3.SQ:.45:.1740...,
..180:.:.SZ:.90...@..1720...T..:.3.SZ:.:
.180:.1.5.SZ:..90:.:.5.SZ:.:..90.3.H..1.
5.SZ:..90:.5.SZ:.90.=.|..1720.]....90:.:
.4.SZ:.1780:.4.SZ:.90.G....1720.U....:.2
.SZ:....L..45:.SQ:.45:.SZ:.45:.SQ:.45:..
.....45:.SQ:.45:.1.3.SZ:.45:.SQ:.45:....
....45:.SQ:..45:.SZ:..45:.SQ:..45:......
. ********SQIRAL SCREEN......1,1.#....7,
82,182:.90:.9:.1920.6.0..:.2,20,20:.90.Y
.D..I.1.6:.1900:.45:.:.10:.:.90:..Q.X..:
.I.1.2000:.:.1960...L..12:..120:.12:..12
0:.12:......I.160:.1000:.I:I.I.1:.I.8.:.
......89:.:..Z.... ********FRACTALS SCRE
EN......1,1......I.1.5:S.300:SQ.S:SR.S:S
S.S:KX.S. .P..0,10,2.1.I.2.8:.90.C.... I
 . 2080,2120,2300,2480,2660.I.....B....:
 .I.1.2000:.:.2840.K. .. K0.V.4..KX :..
.H.. K1...\.KX.SQ.3: .2080...P...60.....
.2080......120......2080.A.....60.K.T..2
080.Q.....Z.... K2.....SQ.SS.3: .2120...
$...60...8..2120...L..120...`..2120...T.
..60.&....2120.,.....5.... K3.H.D.SS.SR.
3: .2300.Q.X...60.[....2300.D....120.N..
..2300.W.(...60...<..2300...P.....D.. K4
...X.SR.S.3: .2480.......60... ..2480...
...120.H.H..2480.Q.....60......2480.....
....... *********** TDPOLY...,..1,7:.2,0
80,12:.90.-.@.X1,208,100,2,"POLYGONS".K.
T.X1,200,090,2,"# OF SIDES".X.H..NV.3.16
.K.|.D.NV.2.3:.3060......I.1.NV:X.360.NV
:.3080:......S1:.3060:S0.........L......
..I.1.2000:.:.3100.O...X1,230,80,2,NV:..
.....D:..X:.......*********** INTERFERE.
..0..1,7:S2...D..6,0,100:.90.22.(.X..I.2
2..22..1.>.L..250:.:..250:.:.1.D.....[..
..6,320,100:..90.22.L....I.22..22..1....
..250:.:..250:.:..1...P........:.I.1.200
0:.:.3315...... *********MULTICIRCLES.R.
...1,1:R1.50:R2.45......I.1.72:AN.I.5...
180... .X.R2..(AN):Y.R2..(AN)...4..X.160
,Y.100,R1,5:..3.9..I.1.2000:.:.3400.M.H.
.************ GRPAK.8.S.I...J.\.. GRAPHI
NG ROUTINE...P..".(P)IE CHART OR (B)ARS"
...R..3520:::. JAM FOR DEMO *******.....
.R$.D....R$."B".3720.V....R$.."P".3460..
....3940...T.. DRAW PIE & LINES......1,7
:.2......I.1.NP:DG.A(I).360.AT.(....5220
...$...E.8.X3,10,16,8,"TOTAL".V.L.X3,15,
8,8,AT.\.`...Q.T..I.1.2000:.:.100...... 
BAR CHART......4500......1,7...D.W.8..(3
7.(NB.(ND.1))).2...X..J.1.NB:.I.1.ND:P.(
W.2).((J.1).(ND.1).I.1).....N P.8,10,P.W
.8,10.SF.V(I,J),C(I)......W.6.SF.V(I,J).
3.3880.0....P.10,12,C(I).6.(...?.<..I,J.
E.P...C.D.. DATA COLLECTION FOR PIE...X.
."READ DATA STATEMENTS? (Y/N)"...}..4200
::::. JAM FOR DEMO......R$:.R$."".3980.G
. ..R$."Y".4200......"NUMBER OF PIECES";
NP...H..A(NP),A$(NP),C(NP)......I.1.NP:.
"DATA";A(I).&...."LABEL";A$(I).M....C(A$
(I)).9.."TOO LONG-REDO":.4080._...."COLO
R";C(I).E.,...V.@.AT.A(I).AT:..|.T.....H
..NP...|..A(NP),A$(NP),C(NP)......I.1.NP
:.A(I)......A$(I).C....C(I).T.L.AT.A(I).
AT:..Z..........7......40,"FORTY",3.....
.70,"SEVENTY",4...0..30,"THIRTY",5.,.D..
50,"FIFTY",6.?.X..90,"NINETY",7.R.L..20,
"TWENTY",8.J....67,"SIXTY-SEVEN",9.}....
 GET BAR DATA. ...."READ DATA STATEMENTS
? (Y/N)"......R$:.R$."".4540.E.P..R$."Y"
.4900......"NUMBER OF DATA SETS";ND.....
."NUMBER OF BARS EACH SET";NB......NB.(N
D.1).37.."TOO MANY BARS":.4580.C. .. V(N
D,NB),C(ND).Y.4..I.1.ND:."COLOR"I.C.H..C
(I).I.\...}.P..I.1.ND:.J.1.NB......"DATA
 SET"I;"BAR"J......"VALUE";V(I,J)......J
,I.F....I.1.ND:.J.1.NB...T..MX.V(I,J).MX
.V(I,J)......J,I.....SF.170.MX.........$
.....8..A$:.A$..".".4920. .L..ND.(.`..NB
.=.T.. V(ND,NB),C(ND).I....I.1.ND.S....C
(I).Y.....M.D..I.1.ND:.J.1.NB.Y.X..V(I,J
)......J,I......I.1.ND:.J.1.NB......MX.V
(I,J).MX.V(I,J)...(..J,I.F.<.SF.170.MX.L
.P.....D.. TURTLE SEGMENT DRAWING ROUTIN
E...X.J.50...2.360:K.1:.C(I).%....DG.2:.
:.16:.:..DG.2.2. .. 50:.90.F....M.1.DG:.
J:.K:..[.H..90:.50:..DG.2:..X....180:.10
:..(X),.(Y),C(I)......55:QL.0:W..(A).360
..(.(A).360):.W.180.W.360.QL.1.Z...X3,.(
X).QL.8.C(A$(I)),.(Y).6,C(I),A$(I).....X
1,.(X).QL.8.C(A$(I)),.(Y).2,C(I),A(I).(.
,.W$.D(.(A(I).10000.AT).100)."%".R.@.X1,
.(X).QL.8.C(A$(I)),.(Y).10,C(I),W$._.T..
180:.65.Q.H..16:.DG.2.180.W.|........"."
 :. HEADER FOR 2ND...... 6,4 :. ND,NB.D.
... 3,6,9,7,5,4    :. COLORS.R.L.. 4,4,4
,4...... 5,5,5,5...... 6,6,6,6...... 7,7
,7,7...... 8,8,8,8...0.. 3,3,3,3.&.D.. 6
,6,6,6.4.X.. 8,8,8,8....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL