GRAPHICS FACTORY
FILE INFORMATION
FILENAME(S): GRAPHICS FACTORY
FILE TYPE(S): PRG
FILE SIZE: 7.4K
FIRST SEEN: 2025-11-30 17:31:22
APPEARS ON: 1 disk(s)
FILE HASH
d0d4b638a4a2245102f842c8acc33f32ba0d46f3b7722d938024afe423e11733
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CDU JULY 1990 | GRAPHICS FACTORY | PRG | DuncanTwain, UK CD | 29 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 21 08 01 00 8F 20 50 52 4F 47 52 41 4D 3A |..!.... PROGRAM:|
00000010: 20 47 52 41 50 48 49 43 53 20 46 41 43 54 4F 52 | GRAPHICS FACTOR|
00000020: 59 00 44 08 02 00 8F 20 41 55 54 48 4F 52 20 3A |Y.D.... AUTHOR :|
00000030: 20 4D 41 52 43 4F 20 48 2E 20 57 45 53 54 45 52 | MARCO H. WESTER|
00000040: 57 45 45 4C 00 67 08 03 00 8F 20 28 43 29 31 39 |WEEL.g.... (C)19|
00000050: 38 39 2C 20 41 4C 4C 20 52 49 47 48 54 53 20 52 |89, ALL RIGHTS R|
00000060: 45 53 45 52 56 45 44 00 8A 08 04 00 8F 20 48 41 |ESERVED...... HA|
00000070: 41 4B 53 42 45 52 47 45 4E 2C 20 54 48 45 20 4E |AKSBERGEN, THE N|
00000080: 45 54 48 45 52 4C 41 4E 44 53 00 90 08 05 00 3A |ETHERLANDS.....:|
00000090: 00 CE 08 0A 00 99 22 93 22 3A 86 53 43 24 28 32 |......".":.SC$(2|
000000A0: 33 2C 33 38 29 2C 53 31 24 28 32 33 29 2C 47 4C |3,38),S1$(23),GL|
000000B0: 24 28 35 34 29 2C 43 52 24 28 34 36 29 2C 44 28 |$(54),CR$(46),D(|
000000C0: 32 35 35 29 3A 44 4C 24 B2 C7 28 32 30 29 00 1A |255):DL$..(20)..|
000000D0: 09 0F 00 5A 24 B2 22 20 20 20 20 20 20 20 20 20 |...Z$." |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 43 | ":C|
00000100: 59 24 B2 22 12 9C 20 22 3A 52 54 24 B2 C7 28 31 |Y$.".. ":RT$..(1|
00000110: 33 29 3A 43 4C 24 B2 22 9C 22 00 6A 09 14 00 52 |3):CL$.".".j...R|
00000120: 4C 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |L$."............|
00000130: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000140: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 53 51 24 B2 |..........":SQ$.|
00000150: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000160: 11 11 11 11 11 11 11 11 11 22 00 A6 09 19 00 42 |.........".....B|
00000170: 4F B2 34 3A 42 41 B2 31 35 3A 43 41 B2 34 3A 43 |O.4:BA.15:CA.4:C|
00000180: 58 B2 30 3A 50 41 B2 31 3A 4F 50 24 B2 C8 28 53 |X.0:PA.1:OP$..(S|
00000190: 51 24 2C 31 36 29 AA 22 1D 1D 12 1C 43 4F 50 59 |Q$,16)."....COPY|
000001A0: 1D 1D 1D 1D 1D 22 00 F2 09 1E 00 4F 50 24 B2 4F |.....".....OP$.O|
000001B0: 50 24 AA 22 4D 4F 44 49 46 59 22 AA 52 54 24 AA |P$."MODIFY".RT$.|
000001C0: 22 11 11 12 1C 1D 1D 43 52 55 4E 43 48 1D 1D 1D |"......CRUNCH...|
000001D0: 52 45 50 4C 41 43 45 22 AA 52 54 24 AA 22 11 11 |REPLACE".RT$."..|
000001E0: 1D 1D 12 1C 53 43 52 41 54 43 48 1D 1D 56 49 45 |....SCRATCH..VIE|
000001F0: 57 22 00 36 0A 23 00 52 24 28 31 29 B2 C8 28 53 |W".6.#.R$(1)..(S|
00000200: 51 24 2C 31 36 29 AA 22 1D 1D 92 90 43 4F 50 59 |Q$,16)."....COPY|
00000210: 22 3A 52 24 28 32 29 B2 C8 28 53 51 24 2C 31 36 |":R$(2)..(SQ$,16|
00000220: 29 AA C8 28 52 4C 24 2C 31 31 29 AA 22 92 90 4D |)..(RL$,11)."..M|
00000230: 4F 44 49 46 59 22 00 7B 0A 28 00 52 24 28 33 29 |ODIFY".{.(.R$(3)|
00000240: B2 53 51 24 AA 22 91 91 91 91 91 1D 1D 92 90 43 |.SQ$.".........C|
00000250: 52 55 4E 43 48 22 3A 52 24 28 34 29 B2 53 51 24 |RUNCH":R$(4).SQ$|
00000260: AA C8 28 52 4C 24 2C 31 31 29 AA 22 91 91 91 91 |..(RL$,11)."....|
00000270: 91 92 90 52 45 50 4C 41 43 45 22 00 C3 0A 2D 00 |...REPLACE"...-.|
00000280: 52 24 28 35 29 B2 53 51 24 AA 22 91 91 1D 1D 92 |R$(5).SQ$.".....|
00000290: 90 53 43 52 41 54 43 48 22 3A 52 24 28 36 29 B2 |.SCRATCH":R$(6).|
000002A0: 53 51 24 AA C8 28 52 4C 24 2C 31 31 29 AA 22 91 |SQ$..(RL$,11).".|
000002B0: 91 92 90 56 49 45 57 22 3A 43 55 24 B2 22 91 11 |...VIEW":CU$."..|
000002C0: 9D 1D 22 00 F2 0A 32 00 81 44 44 B2 31 A4 32 35 |.."...2..DD.1.25|
000002D0: 35 3A 44 28 44 44 29 B2 39 3A 82 3A 81 44 44 B2 |5:D(DD).9:.:.DD.|
000002E0: 31 A4 36 3A 87 44 32 3A 44 28 44 32 29 B2 44 44 |1.6:.D2:D(D2).DD|
000002F0: 3A 82 00 23 0B 37 00 81 44 44 B2 31 A4 31 36 3A |:..#.7..DD.1.16:|
00000300: 87 44 32 3A 44 28 44 32 29 B2 37 3A 82 3A 81 44 |.D2:D(D2).7:.:.D|
00000310: 44 B2 31 33 35 A4 31 33 38 3A 44 28 44 44 29 B2 |D.135.138:D(DD).|
00000320: 38 3A 82 00 3F 0B 3C 00 81 44 44 B2 31 A4 34 31 |8:..?.<..DD.1.41|
00000330: 3A 87 44 32 3A 44 28 44 32 29 B2 31 30 3A 82 00 |:.D2:D(D2).10:..|
00000340: 89 0B 41 00 83 20 31 35 37 2C 32 39 2C 31 37 2C |..A.. 157,29,17,|
00000350: 31 34 35 2C 31 38 2C 31 34 36 2C 35 2C 32 38 2C |145,18,146,5,28,|
00000360: 33 30 2C 33 31 2C 31 32 39 2C 31 34 34 2C 31 34 |30,31,129,144,14|
00000370: 39 2C 31 35 30 2C 31 35 31 2C 31 35 32 2C 31 35 |9,150,151,152,15|
00000380: 33 2C 31 35 34 2C 31 35 35 00 D5 0B 46 00 83 20 |3,154,155...F.. |
00000390: 31 35 36 2C 31 35 38 2C 31 35 39 2C 31 2C 32 2C |156,158,159,1,2,|
000003A0: 33 2C 34 2C 36 2C 37 2C 38 2C 39 2C 31 30 2C 31 |3,4,6,7,8,9,10,1|
000003B0: 31 2C 31 32 2C 31 33 2C 31 34 2C 31 35 2C 31 36 |1,12,13,14,15,16|
000003C0: 2C 31 39 2C 32 30 2C 32 31 2C 32 32 2C 32 33 2C |,19,20,21,22,23,|
000003D0: 32 34 2C 32 35 00 21 0C 4B 00 83 20 32 36 2C 32 |24,25.!.K.. 26,2|
000003E0: 37 2C 33 34 2C 34 34 2C 35 38 2C 35 39 2C 31 32 |7,34,44,58,59,12|
000003F0: 38 2C 31 33 30 2C 31 33 31 2C 31 33 32 2C 31 33 |8,130,131,132,13|
00000400: 33 2C 31 33 34 2C 31 33 39 2C 31 34 30 2C 31 34 |3,134,139,140,14|
00000410: 31 2C 31 34 32 2C 31 34 33 2C 31 34 37 2C 31 34 |1,142,143,147,14|
00000420: 38 00 5F 0C 50 00 42 4F B2 34 3A 42 41 B2 31 35 |8._.P.BO.4:BA.15|
00000430: 3A 43 41 B2 34 3A 43 58 B2 30 3A 8D 35 38 35 3A |:CA.4:CX.0:.585:|
00000440: 8D 35 39 30 3A 42 4C 24 B2 22 1D 1D 12 1F 20 20 |.590:BL$.".... |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00000460: 7A 0C 55 00 99 22 13 11 92 90 20 53 45 54 54 49 |z.U..".... SETTI|
00000470: 4E 47 20 55 50 2E 2E 2E 20 22 00 A8 0C 5A 00 9F |NG UP... "...Z..|
00000480: 38 2C 38 2C 38 2C 22 30 3A 47 46 2F 44 49 52 2C |8,8,8,"0:GF/DIR,|
00000490: 53 2C 52 22 3A 81 47 4C B2 31 A4 35 34 3A 84 38 |S,R":.GL.1.54:.8|
000004A0: 2C 47 4C 24 28 47 4C 29 00 C2 0C 5F 00 8B 47 4C |,GL$(GL)..._..GL|
000004B0: 24 28 47 4C 29 B3 B1 22 2A 22 A7 4C 47 B2 4C 47 |$(GL).."*".LG.LG|
000004C0: AA 31 00 CB 0C 64 00 82 3A A0 38 00 F8 0C 69 00 |.1...d..:.8...i.|
000004D0: 46 49 24 B2 22 43 52 2F 47 46 20 49 4E 54 52 4F |FI$."CR/GF INTRO|
000004E0: 22 3A 8D 38 35 30 3A 8D 38 37 30 3A 81 57 B2 31 |":.850:.870:.W.1|
000004F0: A4 31 35 30 30 3A 82 57 00 2D 0D 6E 00 9F 38 2C |.1500:.W.-.n..8,|
00000500: 38 2C 38 2C 22 30 3A 43 52 2F 47 46 20 4D 45 4E |8,8,"0:CR/GF MEN|
00000510: 55 2C 53 2C 52 22 3A 81 53 31 B2 31 A4 32 33 3A |U,S,R":.S1.1.23:|
00000520: 84 38 2C 53 31 24 3A 84 38 2C 53 32 24 00 59 0D |.8,S1$:.8,S2$.Y.|
00000530: 73 00 53 31 24 28 53 31 29 B2 53 31 24 AA 53 32 |s.S1$(S1).S1$.S2|
00000540: 24 3A 53 31 24 B2 22 22 3A 53 32 24 B2 22 22 3A |$:S1$."":S2$."":|
00000550: 82 3A A0 38 3A 8D 35 39 30 00 9D 0D 78 00 50 41 |.:.8:.590...x.PA|
00000560: B2 31 3A 53 51 B2 31 3A 52 4C B2 31 3A 51 58 B2 |.1:SQ.1:RL.1:QX.|
00000570: 31 3A 53 58 B2 31 3A 52 58 B2 31 3A 52 56 24 B2 |1:SX.1:RX.1:RV$.|
00000580: 22 12 22 3A 43 4F 24 B2 22 9C 22 3A 48 43 24 B2 |".":CO$.".":HC$.|
00000590: 22 20 22 3A 43 48 24 B2 22 12 9C 20 22 00 CB 0D |" ":CH$.".. "...|
000005A0: 7D 00 43 59 24 B2 53 43 24 28 31 2C 31 29 3A 99 |}.CY$.SC$(1,1):.|
000005B0: 22 13 22 3B 3A 81 53 31 B2 31 A4 32 33 3A 99 22 |".";:.S1.1.23:."|
000005C0: 1D 22 53 31 24 28 53 31 29 3A 82 00 05 0E 82 00 |."S1$(S1):......|
000005D0: 99 53 51 24 22 11 12 9C 20 20 55 53 45 20 90 43 |.SQ$"... USE .C|
000005E0: 52 53 52 9C 20 26 20 90 52 45 54 55 52 4E 9C 20 |RSR. & .RETURN. |
000005F0: 54 4F 20 45 4E 54 45 52 20 43 4F 4D 4D 41 4E 44 |TO ENTER COMMAND|
00000600: 53 20 20 91 22 00 2E 0E 87 00 8B 43 41 24 B2 22 |S ."......CA$."|
00000610: 43 22 A7 8B 28 52 4F B2 37 B0 52 4F B2 32 29 A7 |C"..(RO.7.RO.2).|
00000620: 43 41 24 B2 22 22 3A 4C 47 B2 4C 47 AB 31 00 43 |CA$."":LG.LG.1.C|
00000630: 0E 8C 00 99 22 13 11 22 A6 33 35 29 22 92 90 4E |...."..".35)"..N|
00000640: 45 57 22 00 64 0E 91 00 A1 47 54 24 3A 8B 47 54 |EW".d....GT$:.GT|
00000650: 24 B3 B1 52 54 24 A7 8B 47 54 24 B3 B1 22 9D 22 |$..RT$..GT$.."."|
00000660: A7 31 34 35 00 8D 0E 96 00 8B 47 54 24 B2 52 54 |.145......GT$.RT|
00000670: 24 A7 8D 35 31 30 3A 52 4F B2 37 3A 8D 33 36 30 |$..510:RO.7:.360|
00000680: 3A 8B 43 41 24 B2 22 43 22 A7 31 32 30 00 A7 0E |:.CA$."C".120...|
00000690: 9B 00 8B 47 54 24 B2 52 54 24 A7 8B 43 41 24 B2 |...GT$.RT$..CA$.|
000006A0: 22 41 22 A7 35 37 30 00 D1 0E A0 00 8B 47 54 24 |"A".570......GT$|
000006B0: B2 22 9D 22 A7 99 22 13 11 22 A6 33 30 29 22 92 |.".".."..".30)".|
000006C0: 90 4F 4C 44 1D 1D 12 1C 4E 45 57 22 3A 89 31 36 |.OLD....NEW":.16|
000006D0: 35 00 F1 0E A5 00 A1 47 54 24 3A 8B 47 54 24 B3 |5......GT$:.GT$.|
000006E0: B1 52 54 24 AF 47 54 24 B3 B1 22 1D 22 A7 31 36 |.RT$.GT$..".".16|
000006F0: 35 00 14 0F AA 00 8B 47 54 24 B2 22 1D 22 A7 99 |5......GT$."."..|
00000700: 22 13 11 22 A6 33 30 29 22 12 1C 4F 4C 44 22 3A |"..".30)"..OLD":|
00000710: 89 31 34 30 00 30 0F AF 00 8B 47 54 24 B2 52 54 |.140.0....GT$.RT|
00000720: 24 A7 47 32 B2 31 3A 47 31 B2 36 3A 8D 33 34 30 |$.G2.1:G1.6:.340|
00000730: 00 4C 0F B4 00 99 22 13 11 11 11 11 22 A6 31 31 |.L....".....".11|
00000740: 29 22 92 90 41 44 56 41 4E 43 45 22 00 77 0F B9 |)"..ADVANCE".w..|
00000750: 00 A1 47 54 24 3A 8B 47 54 24 B3 B1 52 54 24 A7 |..GT$:.GT$..RT$.|
00000760: 8B 47 54 24 B3 B1 22 11 22 A7 8B 47 54 24 B3 B1 |.GT$.."."..GT$..|
00000770: 22 9D 22 A7 31 38 35 00 AC 0F BE 00 8B 47 54 24 |".".185......GT$|
00000780: B2 52 54 24 A7 8B 47 4C 24 28 47 31 29 B3 B1 22 |.RT$..GL$(G1).."|
00000790: 2A 22 A7 47 31 B2 47 31 AA 36 3A 47 32 B2 47 31 |*".G1.G1.6:G2.G1|
000007A0: AB 35 3A 8D 33 34 30 3A 89 31 38 35 00 BD 0F C3 |.5:.340:.185....|
000007B0: 00 8B 47 54 24 B2 22 9D 22 A7 32 31 30 00 F3 0F |..GT$.".".210...|
000007C0: C8 00 8B 47 54 24 B2 22 11 22 A7 54 54 B2 31 3A |...GT$.".".TT.1:|
000007D0: 99 22 13 11 11 11 11 1D 1D 12 1C 52 45 56 45 52 |.".........REVER|
000007E0: 53 45 1D 1D 12 1C 41 44 56 41 4E 43 45 22 3A 89 |SE....ADVANCE":.|
000007F0: 32 36 30 00 01 10 CD 00 8D 33 34 30 3A 89 31 38 |260......340:.18|
00000800: 35 00 24 10 D2 00 99 22 13 11 11 11 11 1D 1D 92 |5.$...."........|
00000810: 90 52 45 56 45 52 53 45 1D 1D 12 1C 41 44 56 41 |.REVERSE....ADVA|
00000820: 4E 43 45 22 00 4F 10 D7 00 A1 47 54 24 3A 8B 47 |NCE".O....GT$:.G|
00000830: 54 24 B3 B1 52 54 24 A7 8B 47 54 24 B3 B1 22 11 |T$..RT$..GT$..".|
00000840: 22 A7 8B 47 54 24 B3 B1 22 1D 22 A7 32 31 35 00 |"..GT$..".".215.|
00000850: 76 10 DC 00 8B 47 54 24 B2 52 54 24 A7 47 31 B2 |v....GT$.RT$.G1.|
00000860: 47 31 AB 36 3A 47 32 B2 47 31 AB 35 3A 8D 33 34 |G1.6:G2.G1.5:.34|
00000870: 30 3A 89 32 31 35 00 9C 10 E1 00 8B 47 54 24 B2 |0:.215......GT$.|
00000880: 22 1D 22 A7 99 22 13 11 11 11 11 1D 1D 12 1C 52 |"."..".........R|
00000890: 45 56 45 52 53 45 22 3A 89 31 38 30 00 D0 10 E6 |EVERSE":.180....|
000008A0: 00 8B 47 54 24 B2 22 11 22 A7 54 54 B2 31 3A 99 |..GT$.".".TT.1:.|
000008B0: 22 13 11 11 11 11 1D 1D 12 1C 52 45 56 45 52 53 |".........REVERS|
000008C0: 45 1D 1D 41 44 56 41 4E 43 45 22 3A 89 32 36 30 |E..ADVANCE":.260|
000008D0: 00 FB 10 EB 00 A1 47 54 24 3A 8B 47 54 24 B3 B1 |......GT$:.GT$..|
000008E0: 22 11 22 A7 8B 47 54 24 B3 B1 22 91 22 A7 8B 47 |"."..GT$.."."..G|
000008F0: 54 24 B3 B1 52 54 24 A7 32 33 35 00 20 11 F0 00 |T$..RT$.235. ...|
00000900: 8B 47 54 24 B2 22 11 22 A7 54 54 B2 54 54 AA 31 |.GT$.".".TT.TT.1|
00000910: 3A 8B 54 54 B1 36 A7 54 54 B2 36 3A 89 32 36 30 |:.TT.6.TT.6:.260|
00000920: 00 4A 11 F5 00 8B 47 54 24 B2 22 91 22 A7 54 54 |.J....GT$.".".TT|
00000930: B2 54 54 AB 31 3A 8B 54 54 B3 31 A7 54 54 B2 30 |.TT.1:.TT.1.TT.0|
00000940: 3A 8D 33 35 35 3A 89 31 38 30 00 67 11 FA 00 8B |:.355:.180.g....|
00000950: 47 54 24 B2 52 54 24 AF 47 4C 24 28 46 4C 29 B2 |GT$.RT$.GL$(FL).|
00000960: 22 2A 22 A7 32 33 35 00 78 11 FF 00 8B 47 54 24 |"*".235.x....GT$|
00000970: B2 52 54 24 A7 32 37 30 00 A2 11 04 01 99 C8 28 |.RT$.270.......(|
00000980: 53 51 24 2C 38 29 3B 3A 81 47 58 B2 47 32 A4 47 |SQ$,8);:.GX.G2.G|
00000990: 31 3A 99 22 12 1F 1D 1D 22 47 4C 24 28 47 58 29 |1:."...."GL$(GX)|
000009A0: 3A 82 00 D0 11 09 01 46 4C B2 47 32 AA 54 54 AB |:......FL.G2.TT.|
000009B0: 31 3A 99 C8 28 53 51 24 2C 37 AA 54 54 29 22 92 |1:..(SQ$,7.TT)".|
000009C0: 90 1D 1D 22 47 4C 24 28 46 4C 29 3A 89 32 33 35 |..."GL$(FL):.235|
000009D0: 00 E0 11 0E 01 52 4F B2 31 3A 99 52 24 28 31 29 |.....RO.1:.R$(1)|
000009E0: 00 12 12 13 01 54 47 B2 30 3A A1 47 54 24 3A 81 |.....TG.0:.GT$:.|
000009F0: 47 54 B2 31 A4 34 3A 8B 47 54 24 B2 CA 28 43 55 |GT.1.4:.GT$..(CU|
00000A00: 24 2C 47 54 2C 31 29 A7 54 47 B2 47 54 3A 47 54 |$,GT,1).TG.GT:GT|
00000A10: B2 34 00 39 12 18 01 82 3A 8B 47 54 24 B2 52 54 |.4.9....:.GT$.RT|
00000A20: 24 AF 52 4F B3 B1 32 A7 8D 33 36 30 3A 8B 43 41 |$.RO..2..360:.CA|
00000A30: 24 B2 22 43 22 A7 31 32 30 00 4A 12 1D 01 8B 47 |$."C".120.J....G|
00000A40: 54 24 B2 52 54 24 A7 33 39 35 00 58 12 22 01 8B |T$.RT$.395.X."..|
00000A50: 54 47 B2 30 A7 32 37 35 00 70 12 27 01 91 54 47 |TG.0.275.p.'..TG|
00000A60: 89 33 30 30 2C 33 31 30 2C 33 32 30 2C 33 33 30 |.300,310,320,330|
00000A70: 00 87 12 2C 01 52 4F B2 52 4F AB 32 3A 8B 52 4F |...,.RO.RO.2:.RO|
00000A80: B3 31 A7 52 4F B2 31 00 90 12 31 01 89 33 33 35 |.1.RO.1...1..335|
00000A90: 00 A7 12 36 01 52 4F B2 52 4F AA 32 3A 8B 52 4F |...6.RO.RO.2:.RO|
00000AA0: B1 36 A7 52 4F B2 36 00 B0 12 3B 01 89 33 33 35 |.6.RO.6...;..335|
00000AB0: 00 C7 12 40 01 52 4F B2 52 4F AB 31 3A 8B 52 4F |...@.RO.RO.1:.RO|
00000AC0: B3 31 A7 52 4F B2 31 00 D0 12 45 01 89 33 33 35 |.1.RO.1...E..335|
00000AD0: 00 E7 12 4A 01 52 4F B2 52 4F AA 31 3A 8B 52 4F |...J.RO.RO.1:.RO|
00000AE0: B1 36 A7 52 4F B2 36 00 FB 12 4F 01 99 4F 50 24 |.6.RO.6...O..OP$|
00000AF0: 52 24 28 52 4F 29 3A 89 32 37 35 00 14 13 54 01 |R$(RO):.275...T.|
00000B00: 8B 47 31 B3 36 A7 47 31 B2 36 3A 47 32 B2 31 3A |.G1.6.G1.6:G2.1:|
00000B10: 89 33 35 30 00 2B 13 59 01 8B 47 31 B1 35 33 A7 |.350.+.Y..G1.53.|
00000B20: 47 31 B2 35 34 3A 47 32 B2 34 39 00 49 13 5E 01 |G1.54:G2.49.I.^.|
00000B30: 99 C8 28 53 51 24 2C 38 29 3B 3A 81 47 4C B2 31 |..(SQ$,8);:.GL.1|
00000B40: A4 36 3A 99 42 4C 24 3A 82 00 75 13 63 01 99 C8 |.6:.BL$:..u.c...|
00000B50: 28 53 51 24 2C 38 29 3B 3A 81 47 4C B2 47 32 A4 |(SQ$,8);:.GL.G2.|
00000B60: 47 31 3A 99 22 1D 1D 12 1F 22 47 4C 24 28 47 4C |G1:."...."GL$(GL|
00000B70: 29 3A 82 3A 8E 00 98 13 68 01 99 53 51 24 A6 32 |):.:....h..SQ$.2|
00000B80: 34 29 22 91 91 92 90 43 41 4E 43 45 4C 1D 1D 12 |4)"....CANCEL...|
00000B90: 1C 41 43 43 45 50 54 22 00 B9 13 6D 01 A1 47 54 |.ACCEPT"...m..GT|
00000BA0: 24 3A 8B 47 54 24 B3 B1 52 54 24 A7 8B 47 54 24 |$:.GT$..RT$..GT$|
00000BB0: B3 B1 22 1D 22 A7 33 36 35 00 D0 13 72 01 8B 47 |..".".365...r..G|
00000BC0: 54 24 B2 52 54 24 A7 43 41 24 B2 22 43 22 3A 8E |T$.RT$.CA$."C":.|
00000BD0: 00 FC 13 77 01 8B 47 54 24 B2 22 1D 22 A7 99 53 |...w..GT$."."..S|
00000BE0: 51 24 A6 32 34 29 22 91 91 12 1C 43 41 4E 43 45 |Q$.24)"....CANCE|
00000BF0: 4C 1D 1D 92 90 41 43 43 45 50 54 22 00 1D 14 7C |L....ACCEPT"...||
00000C00: 01 A1 47 54 24 3A 8B 47 54 24 B3 B1 52 54 24 A7 |..GT$:.GT$..RT$.|
00000C10: 8B 47 54 24 B3 B1 22 9D 22 A7 33 38 30 00 2E 14 |.GT$..".".380...|
00000C20: 81 01 8B 47 54 24 B2 22 9D 22 A7 33 36 30 00 45 |...GT$.".".360.E|
00000C30: 14 86 01 8B 47 54 24 B2 52 54 24 A7 43 41 24 B2 |....GT$.RT$.CA$.|
00000C40: 22 41 22 3A 8E 00 69 14 8B 01 91 52 4F 89 34 36 |"A":..i....RO.46|
00000C50: 30 2C 34 30 30 2C 39 31 35 2C 34 39 35 2C 34 34 |0,400,915,495,44|
00000C60: 35 2C 34 32 35 2C 35 37 30 00 85 14 90 01 8B C8 |5,425,570.......|
00000C70: 28 47 4C 24 28 46 4C 29 2C 33 29 B2 22 43 52 2F |(GL$(FL),3)."CR/|
00000C80: 22 A7 31 32 30 00 A1 14 95 01 8D 35 31 30 3A 46 |".120......510:F|
00000C90: 58 24 B2 46 49 24 3A 8B 4C 47 B2 35 34 A7 31 32 |X$.FI$:.LG.54.12|
00000CA0: 30 00 B7 14 9A 01 8D 33 36 30 3A 8B 43 41 24 B2 |0......360:.CA$.|
00000CB0: 22 43 22 A7 31 32 30 00 DA 14 9F 01 8B 47 4C 24 |"C".120......GL$|
00000CC0: 28 46 4C 29 B3 B1 46 32 24 A7 46 49 24 B2 47 4C |(FL)..F2$.FI$.GL|
00000CD0: 24 28 46 4C 29 3A 8D 38 34 35 00 E8 14 A4 01 8D |$(FL):.845......|
00000CE0: 38 37 30 3A 89 36 30 35 00 0B 15 A9 01 8B 47 4C |870:.605......GL|
00000CF0: 24 28 46 4C 29 B3 B1 46 32 24 A7 46 49 24 B2 47 |$(FL)..F2$.FI$.G|
00000D00: 4C 24 28 46 4C 29 3A 8D 38 34 35 00 14 15 AE 01 |L$(FL):.845.....|
00000D10: 8D 38 37 30 00 2E 15 B3 01 A1 47 54 24 3A 8B 47 |.870......GT$:.G|
00000D20: 54 24 B3 B1 C7 28 31 33 33 29 A7 34 33 35 00 3C |T$...(133).435.<|
00000D30: 15 B8 01 8D 35 39 30 3A 89 31 32 30 00 64 15 BD |....590:.120.d..|
00000D40: 01 4C 47 24 B2 47 4C 24 28 46 4C 29 3A 4C 47 B2 |.LG$.GL$(FL):LG.|
00000D50: 4C 47 AB 31 3A 8B 4C 47 B2 30 A7 4C 47 B2 31 3A |LG.1:.LG.0.LG.1:|
00000D60: 89 31 32 30 00 A8 15 C2 01 8D 35 39 30 3A 99 22 |.120......590:."|
00000D70: 13 11 92 90 20 53 43 52 41 54 43 48 49 4E 47 2E |.... SCRATCHING.|
00000D80: 2E 2E 20 22 3B 4C 47 24 3A 47 4C 24 28 46 4C 29 |.. ";LG$:GL$(FL)|
00000D90: B2 47 4C 24 28 4C 47 AA 31 29 3A 47 4C 24 28 4C |.GL$(LG.1):GL$(L|
00000DA0: 47 AA 31 29 B2 22 2A 22 00 D6 15 C7 01 9F 31 35 |G.1)."*"......15|
00000DB0: 2C 38 2C 31 35 3A 98 31 35 2C 22 53 30 3A 22 AA |,8,15:.15,"S0:".|
00000DC0: 4C 47 24 3A A0 31 35 3A 8D 35 39 30 3A 8D 38 33 |LG$:.15:.590:.83|
00000DD0: 30 3A 89 31 32 30 00 F3 15 CC 01 8B C8 28 47 4C |0:.120.......(GL|
00000DE0: 24 28 46 4C 29 2C 33 29 B3 B1 22 43 52 2F 22 A7 |$(FL),3).."CR/".|
00000DF0: 31 32 30 00 16 16 D1 01 8B 47 4C 24 28 46 4C 29 |120......GL$(FL)|
00000E00: B3 B1 46 32 24 A7 46 49 24 B2 47 4C 24 28 46 4C |..F2$.FI$.GL$(FL|
00000E10: 29 3A 8D 38 34 35 00 5D 16 D6 01 8D 35 39 30 3A |):.845.]....590:|
00000E20: 99 22 13 11 12 9C 2E 2E 2E 49 4E 53 45 52 54 20 |.".......INSERT |
00000E30: 4E 45 57 20 44 49 53 4B 20 26 20 50 52 45 53 53 |NEW DISK & PRESS|
00000E40: 22 52 54 24 22 11 1D 1D 1D 12 90 20 43 20 9C 20 |"RT$"...... C . |
00000E50: 54 4F 20 43 4F 50 59 20 22 3B 46 49 24 00 72 16 |TO COPY ";FI$.r.|
00000E60: DB 01 A1 43 24 3A 8B 43 24 B3 B1 22 43 22 A7 34 |...C$:.C$.."C".4|
00000E70: 37 35 00 AD 16 E0 01 8D 37 38 35 3A 99 22 13 11 |75......785:."..|
00000E80: 11 11 11 12 9C 2E 2E 2E 49 4E 53 45 52 54 20 4F |........INSERT O|
00000E90: 52 49 47 49 4E 41 4C 20 44 49 53 4B 20 26 20 50 |RIGINAL DISK & P|
00000EA0: 52 45 53 53 20 90 52 45 54 55 52 4E 22 00 C4 16 |RESS .RETURN"...|
00000EB0: E5 01 A1 52 52 24 3A 8B 52 52 24 B3 B1 52 54 24 |...RR$:.RR$..RT$|
00000EC0: A7 34 38 35 00 D2 16 EA 01 8D 35 39 30 3A 89 31 |.485......590:.1|
00000ED0: 32 30 00 EE 16 EF 01 8B C8 28 47 4C 24 28 46 4C |20.......(GL$(FL|
00000EE0: 29 2C 33 29 B2 22 43 52 2F 22 A7 31 32 30 00 11 |),3)."CR/".120..|
00000EF0: 17 F4 01 8B 47 4C 24 28 46 4C 29 B3 B1 46 32 24 |....GL$(FL)..F2$|
00000F00: A7 46 49 24 B2 47 4C 24 28 46 4C 29 3A 8D 38 34 |.FI$.GL$(FL):.84|
00000F10: 35 00 1F 17 F9 01 8D 38 37 30 3A 89 36 30 35 00 |5......870:.605.|
00000F20: 41 17 FE 01 46 49 24 B2 22 22 3A 4C 47 B2 4C 47 |A...FI$."":LG.LG|
00000F30: AA 31 3A 8B 4C 47 B2 35 35 A7 4C 47 B2 35 34 3A |.1:.LG.55.LG.54:|
00000F40: 8E 00 7A 17 03 02 99 53 51 24 22 11 12 9C 20 90 |..z....SQ$"... .|
00000F50: 52 45 54 55 52 4E 9C 3A 41 43 43 45 50 54 53 20 |RETURN.:ACCEPTS |
00000F60: 4E 41 4D 45 2C 20 90 44 45 4C 9C 3A 44 45 4C 45 |NAME, .DEL.:DELE|
00000F70: 54 45 53 20 4E 41 4D 45 91 22 00 A4 17 08 02 99 |TES NAME."......|
00000F80: 22 13 11 11 11 11 11 11 11 11 11 11 22 A6 32 32 |"...........".22|
00000F90: 29 22 90 92 3F 9D 22 3B 3A 81 57 B2 31 A4 31 30 |)"..?.";:.W.1.10|
00000FA0: 30 3A 82 57 00 BD 17 0D 02 99 22 12 1C 3F 9D 22 |0:.W......"..?."|
00000FB0: 3B 3A 81 57 B2 31 A4 31 30 30 3A 82 57 00 EF 17 |;:.W.1.100:.W...|
00000FC0: 12 02 A1 4E 46 24 3A 8B 28 4E 46 24 B3 22 41 22 |...NF$:.(NF$."A"|
00000FD0: B0 4E 46 24 B1 22 5A 22 29 AF 28 4E 46 24 B3 22 |.NF$."Z").(NF$."|
00000FE0: 30 22 B0 4E 46 24 B1 22 39 22 29 A7 35 32 30 00 |0".NF$."9").520.|
00000FF0: 26 18 17 02 8B C3 28 46 49 24 29 B3 31 35 A7 99 |&.....(FI$).15..|
00001000: 4E 46 24 3B 3A 46 49 24 B2 46 49 24 AA 4E 46 24 |NF$;:FI$.FI$.NF$|
00001010: 3A 8B C3 28 46 49 24 29 B3 31 35 A7 99 22 90 92 |:..(FI$).15.."..|
00001020: 3F 12 1C 9D 22 3B 00 4B 18 1C 02 A1 4E 46 24 3A |?...";.K....NF$:|
00001030: 8B 4E 46 24 B2 52 54 24 AF C3 28 46 49 24 29 B3 |.NF$.RT$..(FI$).|
00001040: 31 36 A7 99 22 12 1C 20 22 3A 8E 00 5D 18 21 02 |16..".. ":..].!.|
00001050: 8B 4E 46 24 B3 B1 44 4C 24 A7 35 35 35 00 98 18 |.NF$..DL$.555...|
00001060: 26 02 8B 46 49 24 B3 B1 22 22 A7 46 49 24 B2 C8 |&..FI$.."".FI$..|
00001070: 28 46 49 24 2C C3 28 46 49 24 29 AB 31 29 3A 99 |(FI$,.(FI$).1):.|
00001080: 22 90 92 9D 3F 12 1C 20 9D 9D 22 3B 3A 8B 46 49 |"...?.. ..";:.FI|
00001090: 24 B2 22 22 A7 35 32 30 00 BB 18 2B 02 8B 28 4E |$."".520...+..(N|
000010A0: 46 24 B1 22 2F 22 AF 4E 46 24 B3 22 3A 22 29 B0 |F$."/".NF$.":").|
000010B0: 4E 46 24 B2 22 20 22 A7 35 33 35 00 D4 18 30 02 |NF$." ".535...0.|
000010C0: 8B 4E 46 24 B3 22 41 22 B0 4E 46 24 B1 22 5A 22 |.NF$."A".NF$."Z"|
000010D0: A7 35 34 30 00 DD 18 35 02 89 35 33 35 00 FF 18 |.540...5..535...|
000010E0: 3A 02 8D 35 39 30 3A 99 22 13 11 92 90 20 49 4E |:..590:.".... IN|
000010F0: 49 54 49 41 4C 49 5A 49 4E 47 2E 2E 2E 20 22 00 |ITIALIZING... ".|
00001100: 34 19 3F 02 81 53 31 B2 31 A4 32 33 3A 81 53 32 |4.?..S1.1.23:.S2|
00001110: B2 31 A4 33 38 3A 53 43 24 28 53 31 2C 53 32 29 |.1.38:SC$(S1,S2)|
00001120: B2 22 12 9C 20 22 3A 82 3A 82 3A 8D 35 38 35 3A |.".. ":.:.:.585:|
00001130: 8D 35 39 30 00 5D 19 44 02 99 22 13 1D 22 43 58 |.590.].D..".."CX|
00001140: 24 3A 43 59 24 B2 53 43 24 28 31 2C 31 29 3A 8D |$:CY$.SC$(1,1):.|
00001150: 37 36 35 3A 8D 38 39 35 3A 89 36 30 35 00 81 19 |765:.895:.605...|
00001160: 49 02 97 35 33 32 38 30 2C 42 4F 3A 97 35 33 32 |I..53280,BO:.532|
00001170: 38 31 2C 42 41 3A 43 58 24 B2 22 92 90 2A 22 3A |81,BA:CX$."..*":|
00001180: 8E 00 B9 19 4E 02 5A 58 B2 30 3A 99 22 13 22 3B |....N.ZX.0:.".";|
00001190: 3A 81 5A B2 31 A4 32 34 3A 99 43 4C 24 22 12 20 |:.Z.1.24:.CL$". |
000011A0: 22 5A 24 3A 5A 58 B2 5A 58 AA 34 30 3A 97 31 30 |"Z$:ZX.ZX.40:.10|
000011B0: 32 33 AA 5A 58 2C 31 36 30 00 EE 19 53 02 97 35 |23.ZX,160...S..5|
000011C0: 35 32 39 35 AA 5A 58 2C 43 41 3A 82 3A 99 43 4C |5295.ZX,CA:.:.CL|
000011D0: 24 22 12 20 22 5A 24 22 91 22 3A 97 32 30 32 33 |$". "Z$".":.2023|
000011E0: 2C 31 36 30 3A 97 35 36 32 39 35 2C 43 41 00 F4 |,160:.56295,CA..|
000011F0: 19 58 02 8E 00 0F 1A 5D 02 A1 50 43 24 3A 8B 50 |.X.....]..PC$:.P|
00001200: 43 24 B2 22 22 A7 8D 37 37 35 3A 89 36 30 35 00 |C$.""..775:.605.|
00001210: 2B 1A 62 02 47 50 B2 44 28 C6 28 50 43 24 29 29 |+.b.GP.D(.(PC$))|
00001220: 3A 8B 47 50 B2 31 30 A7 36 30 35 00 57 1A 67 02 |:.GP.10.605.W.g.|
00001230: 91 47 50 8D 36 37 35 2C 36 34 35 2C 36 33 30 2C |.GP.675,645,630,|
00001240: 36 36 30 2C 36 39 30 2C 36 39 30 2C 36 39 35 2C |660,690,690,695,|
00001250: 37 30 35 2C 37 30 30 00 6B 1A 6C 02 8B 50 43 24 |705,700.k.l..PC$|
00001260: B2 C7 28 31 33 37 29 A7 31 32 30 00 74 1A 71 02 |..(137).120.t.q.|
00001270: 89 36 30 35 00 88 1A 76 02 8B 53 51 B3 31 B0 53 |.605...v..SQ.1.S|
00001280: 51 B1 32 32 A7 36 34 30 00 99 1A 7B 02 53 51 B2 |Q.22.640...{.SQ.|
00001290: 53 51 AA 31 3A 8D 37 34 30 00 9F 1A 80 02 8E 00 |SQ.1:.740.......|
000012A0: B3 1A 85 02 8B 52 4C B3 31 B0 52 4C B1 33 37 A7 |.....RL.1.RL.37.|
000012B0: 36 35 35 00 C4 1A 8A 02 52 4C B2 52 4C AA 31 3A |655.....RL.RL.1:|
000012C0: 8D 37 34 30 00 CA 1A 8F 02 8E 00 DE 1A 94 02 8B |.740............|
000012D0: 53 51 B3 32 B0 53 51 B1 32 34 A7 36 37 30 00 EF |SQ.2.SQ.24.670..|
000012E0: 1A 99 02 53 51 B2 53 51 AB 31 3A 8D 37 34 30 00 |...SQ.SQ.1:.740.|
000012F0: F5 1A 9E 02 8E 00 09 1B A3 02 8B 52 4C B3 32 B0 |...........RL.2.|
00001300: 52 4C B1 33 39 A7 36 38 35 00 1A 1B A8 02 52 4C |RL.39.685.....RL|
00001310: B2 52 4C AB 31 3A 8D 37 34 30 00 20 1B AD 02 8E |.RL.1:.740. ....|
00001320: 00 43 1B B2 02 52 56 24 B2 50 43 24 3A 43 48 24 |.C...RV$.PC$:CH$|
00001330: B2 52 56 24 AA 43 4F 24 AA 48 43 24 3A 8D 37 36 |.RV$.CO$.HC$:.76|
00001340: 35 3A 8E 00 66 1B B7 02 43 4F 24 B2 50 43 24 3A |5:..f...CO$.PC$:|
00001350: 43 48 24 B2 52 56 24 AA 43 4F 24 AA 48 43 24 3A |CH$.RV$.CO$.HC$:|
00001360: 8D 37 36 35 3A 8E 00 89 1B BC 02 48 43 24 B2 50 |.765:......HC$.P|
00001370: 43 24 3A 43 48 24 B2 52 56 24 AA 43 4F 24 AA 48 |C$:CH$.RV$.CO$.H|
00001380: 43 24 3A 8D 37 36 35 3A 8E 00 AF 1B C1 02 50 47 |C$:.765:......PG|
00001390: B2 C6 28 50 43 24 29 AB 31 33 34 3A 91 50 47 89 |..(PC$).134:.PG.|
000013A0: 37 33 30 2C 37 32 35 2C 37 31 30 2C 37 31 35 00 |730,725,710,715.|
000013B0: C2 1B C6 02 8D 37 38 35 3A 8D 35 39 30 3A 89 37 |.....785:.590:.7|
000013C0: 33 35 00 04 1C CB 02 99 53 51 24 22 11 12 9C 20 |35......SQ$"... |
000013D0: 20 92 90 20 47 41 52 42 41 47 45 20 43 4F 4C 4C | .. GARBAGE COLL|
000013E0: 45 43 54 49 4F 4E 20 12 9C 2E 2E 2E 20 50 4C 45 |ECTION ..... PLE|
000013F0: 41 53 45 20 48 4F 4C 44 20 20 91 22 3A 54 48 B2 |ASE HOLD .":TH.|
00001400: B8 28 30 29 00 12 1C D0 02 8D 38 37 30 3A 89 37 |.(0)......870:.7|
00001410: 33 35 00 20 1C D5 02 50 41 B2 31 3A 89 37 33 35 |35. ...PA.1:.735|
00001420: 00 2E 1C DA 02 50 41 B2 32 3A 8D 37 36 35 00 34 |.....PA.2:.765.4|
00001430: 1C DF 02 8E 00 6A 1C E4 02 51 53 B2 53 51 3A 99 |.....j...QS.SQ:.|
00001440: C8 28 53 51 24 2C 53 58 29 C8 28 52 4C 24 2C 52 |.(SQ$,SX).(RL$,R|
00001450: 58 29 43 59 24 C8 28 53 51 24 2C 53 51 29 C8 28 |X)CY$.(SQ$,SQ).(|
00001460: 52 4C 24 2C 52 4C 29 43 58 24 00 8C 1C E9 02 53 |RL$,RL)CX$.....S|
00001470: 58 B2 53 51 3A 51 58 B2 51 53 3A 52 58 B2 52 4C |X.SQ:QX.QS:RX.RL|
00001480: 3A 91 50 41 89 37 35 30 2C 37 35 35 00 A4 1C EE |:.PA.750,755....|
00001490: 02 43 59 24 B2 53 43 24 28 51 58 2C 52 58 29 3A |.CY$.SC$(QX,RX):|
000014A0: 89 37 36 30 00 BF 1C F3 02 43 59 24 B2 43 48 24 |.760.....CY$.CH$|
000014B0: 3A 53 43 24 28 51 58 2C 52 58 29 B2 43 59 24 00 |:SC$(QX,RX).CY$.|
000014C0: C5 1C F8 02 8E 00 E0 1C FD 02 99 C8 28 53 51 24 |............(SQ$|
000014D0: 2C 53 51 29 C8 28 52 4C 24 2C 52 4C 29 43 48 24 |,SQ).(RL$,RL)CH$|
000014E0: 00 04 1D 02 03 53 43 24 28 51 58 2C 52 58 29 B2 |.....SC$(QX,RX).|
000014F0: 43 48 24 3A 43 59 24 B2 53 43 24 28 51 58 2C 52 |CH$:CY$.SC$(QX,R|
00001500: 58 29 3A 8E 00 2B 1D 07 03 99 C8 28 53 51 24 2C |X):..+.....(SQ$,|
00001510: 53 51 29 C8 28 52 4C 24 2C 52 4C 29 43 58 24 3A |SQ).(RL$,RL)CX$:|
00001520: 81 57 B2 31 A4 31 30 30 3A 82 57 00 54 1D 0C 03 |.W.1.100:.W.T...|
00001530: 99 C8 28 53 51 24 2C 53 51 29 C8 28 52 4C 24 2C |..(SQ$,SQ).(RL$,|
00001540: 52 4C 29 43 59 24 3A 81 57 B2 31 A4 31 30 30 3A |RL)CY$:.W.1.100:|
00001550: 82 57 3A 8E 00 77 1D 11 03 8D 35 39 30 3A 8B 52 |.W:..w....590:.R|
00001560: 4F B2 32 A7 46 49 24 B2 46 58 24 3A 46 58 24 B2 |O.2.FI$.FX$:FX$.|
00001570: 22 22 3A 89 37 39 35 00 A0 1D 16 03 8B 52 4F B2 |"":.795......RO.|
00001580: 34 A7 44 4E 24 B2 46 49 24 3A 46 49 24 B2 22 52 |4.DN$.FI$:FI$."R|
00001590: 45 50 4C 41 43 45 4D 45 4E 54 20 46 49 4C 45 22 |EPLACEMENT FILE"|
000015A0: 00 D5 1D 1B 03 99 22 13 11 92 90 20 53 41 56 49 |......".... SAVI|
000015B0: 4E 47 2E 2E 2E 20 22 3B 46 49 24 22 20 22 3A 9F |NG... ";FI$" ":.|
000015C0: 38 2C 38 2C 38 2C 22 30 3A 22 AA 46 49 24 AA 22 |8,8,8,"0:".FI$."|
000015D0: 2C 53 2C 57 22 00 04 1E 20 03 8B C8 28 46 49 24 |,S,W"... ...(FI$|
000015E0: 2C 33 29 B2 22 43 52 2F 22 A7 81 43 52 B2 31 A4 |,3)."CR/"..CR.1.|
000015F0: 34 36 3A 98 38 2C 43 52 24 28 43 52 29 3A 82 3A |46:.8,CR$(CR):.:|
00001600: 89 38 31 30 00 2C 1E 25 03 81 53 31 B2 31 A4 32 |.810.,.%..S1.1.2|
00001610: 33 3A 81 53 32 B2 31 A4 33 38 3A 98 38 2C 53 43 |3:.S2.1.38:.8,SC|
00001620: 24 28 53 31 2C 53 32 29 3A 82 3A 82 00 57 1E 2A |$(S1,S2):.:..W.*|
00001630: 03 A0 38 3A 8B 52 4F B3 B1 34 A7 8B 52 4F B3 B1 |..8:.RO..4..RO..|
00001640: 31 A7 47 4C 24 28 4C 47 29 B2 46 49 24 3A 8D 38 |1.GL$(LG).FI$:.8|
00001650: 33 30 3A 89 38 32 35 00 65 1E 2F 03 8B 52 4F B2 |30:.825.e./..RO.|
00001660: 31 A7 38 32 35 00 A2 1E 34 03 9F 31 35 2C 38 2C |1.825...4..15,8,|
00001670: 31 35 3A 98 31 35 2C 22 53 30 3A 22 AA 44 4E 24 |15:.15,"S0:".DN$|
00001680: 3A 98 31 35 2C 22 52 30 3A 22 AA 44 4E 24 AA 22 |:.15,"R0:".DN$."|
00001690: 3D 22 AA 46 49 24 3A A0 31 35 3A 46 49 24 B2 44 |=".FI$:.15:FI$.D|
000016A0: 4E 24 00 B0 1E 39 03 46 32 24 B2 46 49 24 3A 8E |N$...9.F2$.FI$:.|
000016B0: 00 E4 1E 3E 03 9F 38 2C 38 2C 38 2C 22 30 3A 44 |...>..8,8,8,"0:D|
000016C0: 55 4D 4D 59 20 4E 41 4D 45 2C 53 2C 57 22 3A 81 |UMMY NAME,S,W":.|
000016D0: 47 4C B2 31 A4 35 34 3A 98 38 2C 47 4C 24 28 47 |GL.1.54:.8,GL$(G|
000016E0: 4C 29 3A 82 00 04 1F 43 03 A0 38 3A 9F 31 35 2C |L):....C..8:.15,|
000016F0: 38 2C 31 35 3A 98 31 35 2C 22 53 30 3A 47 46 2F |8,15:.15,"S0:GF/|
00001700: 44 49 52 22 00 29 1F 48 03 98 31 35 2C 22 52 30 |DIR".).H..15,"R0|
00001710: 3A 47 46 2F 44 49 52 3D 44 55 4D 4D 59 20 4E 41 |:GF/DIR=DUMMY NA|
00001720: 4D 45 22 3A A0 31 35 3A 8E 00 4D 1F 4D 03 8D 35 |ME":.15:..M.M..5|
00001730: 39 30 3A 99 22 13 11 92 90 20 4C 4F 41 44 49 4E |90:.".... LOADIN|
00001740: 47 2E 2E 2E 20 22 3B 46 49 24 22 20 22 00 68 1F |G... ";FI$" ".h.|
00001750: 52 03 9F 38 2C 38 2C 38 2C 22 30 3A 22 AA 46 49 |R..8,8,8,"0:".FI|
00001760: 24 AA 22 2C 53 2C 52 22 00 97 1F 57 03 8B C8 28 |$.",S,R"...W...(|
00001770: 46 49 24 2C 33 29 B2 22 43 52 2F 22 A7 81 43 52 |FI$,3)."CR/"..CR|
00001780: B2 31 A4 34 36 3A 84 38 2C 43 52 24 28 43 52 29 |.1.46:.8,CR$(CR)|
00001790: 3A 82 3A 89 38 36 35 00 BF 1F 5C 03 81 53 31 B2 |:.:.865...\..S1.|
000017A0: 31 A4 32 33 3A 81 53 32 B2 31 A4 33 38 3A 84 38 |1.23:.S2.1.38:.8|
000017B0: 2C 53 43 24 28 53 31 2C 53 32 29 3A 82 3A 82 00 |,SC$(S1,S2):.:..|
000017C0: EA 1F 61 03 A0 38 3A 46 32 24 B2 46 49 24 3A 43 |..a..8:F2$.FI$:C|
000017D0: 59 24 B2 53 43 24 28 31 2C 31 29 3A 43 48 24 B2 |Y$.SC$(1,1):CH$.|
000017E0: 53 43 24 28 31 2C 31 29 3A 8E 00 13 20 66 03 42 |SC$(1,1):... f.B|
000017F0: 4F B2 34 3A 42 41 B2 31 35 3A 43 41 B2 34 3A 43 |O.4:BA.15:CA.4:C|
00001800: 58 B2 30 3A 8D 35 38 35 3A 8D 35 39 30 3A 99 22 |X.0:.585:.590:."|
00001810: 13 22 3B 00 2C 20 6B 03 8B C8 28 46 49 24 2C 33 |.";., k...(FI$,3|
00001820: 29 B3 B1 22 43 52 2F 22 A7 38 38 35 00 58 20 70 |).."CR/".885.X p|
00001830: 03 81 43 52 B2 31 A4 34 36 A9 32 3A 99 22 1D 22 |..CR.1.46.2:."."|
00001840: 43 52 24 28 43 52 29 3B 43 52 24 28 43 52 AA 31 |CR$(CR);CR$(CR.1|
00001850: 29 3A 82 3A 89 38 39 30 00 89 20 75 03 81 53 31 |):.:.890.. u..S1|
00001860: B2 31 A4 32 33 3A 99 22 1D 22 3B 3A 81 53 32 B2 |.1.23:.".";:.S2.|
00001870: 31 A4 33 38 3A 99 53 43 24 28 53 31 2C 53 32 29 |1.38:.SC$(S1,S2)|
00001880: 3B 3A 82 3A 99 22 22 3A 82 00 9F 20 7A 03 46 32 |;:.:."":... z.F2|
00001890: 24 B2 46 49 24 3A 8B 52 4F B2 30 A7 39 31 30 00 |$.FI$:.RO.0.910.|
000018A0: CE 20 7F 03 99 53 51 24 22 11 12 9C 22 3B 3A 91 |. ...SQ$"...";:.|
000018B0: 52 4F 89 38 39 35 2C 39 30 30 2C 38 39 35 2C 39 |RO.895,900,895,9|
000018C0: 30 30 2C 38 39 35 2C 39 30 35 2C 39 30 30 00 0B |00,895,905,900..|
000018D0: 21 84 03 99 22 20 90 46 32 9C 3A 53 41 56 45 2C |!..." .F2.:SAVE,|
000018E0: 20 90 46 34 9C 3A 47 41 52 2F 43 4F 4C 2C 20 90 | .F4.:GAR/COL, .|
000018F0: 46 35 9C 3A 50 41 49 4E 54 2C 20 90 46 37 9C 3A |F5.:PAINT, .F7.:|
00001900: 50 4C 4F 54 91 22 3A 89 39 31 30 00 3C 21 89 03 |PLOT.":.910.<!..|
00001910: 99 22 20 20 20 50 52 45 53 53 20 90 46 31 9C 20 |." PRESS .F1. |
00001920: 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4F 50 54 |TO RETURN TO OPT|
00001930: 49 4F 4E 53 20 4D 45 4E 55 2E 91 22 00 42 21 8E |IONS MENU..".B!.|
00001940: 03 8E 00 63 21 93 03 43 52 B2 30 3A 8B C8 28 47 |...c!..CR.0:..(G|
00001950: 4C 24 28 46 4C 29 2C 33 29 B2 22 43 52 2F 22 A7 |L$(FL),3)."CR/".|
00001960: 31 32 30 00 81 21 98 03 4C 47 B2 4C 47 AA 31 3A |120..!..LG.LG.1:|
00001970: 8B 4C 47 B2 35 35 A7 4C 47 B2 35 34 3A 89 31 32 |.LG.55.LG.54:.12|
00001980: 30 00 A4 21 9D 03 8B 47 4C 24 28 46 4C 29 B3 B1 |0..!...GL$(FL)..|
00001990: 46 32 24 A7 46 49 24 B2 47 4C 24 28 46 4C 29 3A |F2$.FI$.GL$(FL):|
000019A0: 8D 38 34 35 00 C6 21 A2 03 8D 35 39 30 3A 8B C3 |.845..!...590:..|
000019B0: 28 46 49 24 29 B1 31 33 A7 46 49 24 B2 C8 28 46 |(FI$).13.FI$..(F|
000019C0: 49 24 2C 31 33 29 00 0A 22 A7 03 46 49 24 B2 22 |I$,13).."..FI$."|
000019D0: 43 52 2F 22 AA 46 49 24 3A 99 22 13 11 92 1D 90 |CR/".FI$:.".....|
000019E0: 20 43 52 55 4E 43 48 49 4E 47 2E 2E 2E 20 22 3B | CRUNCHING... ";|
000019F0: 46 49 24 3A 9F 38 2C 38 2C 38 2C 22 30 3A 22 AA |FI$:.8,8,8,"0:".|
00001A00: 46 49 24 AA 22 2C 53 2C 57 22 00 4D 22 AC 03 53 |FI$.",S,W".M"..S|
00001A10: 31 24 B2 22 22 3A 53 32 24 B2 22 22 3A 81 53 31 |1$."":S2$."":.S1|
00001A20: B2 31 A4 32 33 3A 53 31 24 B2 53 43 24 28 53 31 |.1.23:S1$.SC$(S1|
00001A30: 2C 31 29 3A 53 43 24 28 53 31 2C 31 29 B2 22 22 |,1):SC$(S1,1).""|
00001A40: 3A 4C 31 24 B2 C8 28 53 31 24 2C 32 29 00 83 22 |:L1$..(S1$,2).."|
00001A50: B1 03 52 56 24 B2 C8 28 4C 31 24 2C 31 29 3A 43 |..RV$..(L1$,1):C|
00001A60: 4F 24 B2 C9 28 4C 31 24 2C 31 29 3A 81 53 32 B2 |O$..(L1$,1):.S2.|
00001A70: 32 A4 31 39 3A 53 32 24 B2 53 43 24 28 53 31 2C |2.19:S2$.SC$(S1,|
00001A80: 53 32 29 00 C1 22 B6 03 53 43 24 28 53 31 2C 53 |S2).."..SC$(S1,S|
00001A90: 32 29 B2 22 22 3A 4C 32 24 B2 C8 28 53 32 24 2C |2)."":L2$..(S2$,|
00001AA0: 32 29 3A 8B 4C 32 24 B2 4C 31 24 A7 53 31 24 B2 |2):.L2$.L1$.S1$.|
00001AB0: 53 31 24 AA C9 28 53 32 24 2C 31 29 3A 89 39 39 |S1$..(S2$,1):.99|
00001AC0: 30 00 E7 22 BB 03 4C 31 24 B2 4C 32 24 3A 56 52 |0.."..L1$.L2$:VR|
00001AD0: 24 B2 C8 28 4C 32 24 2C 31 29 3A 4F 43 24 B2 C9 |$..(L2$,1):OC$..|
00001AE0: 28 4C 32 24 2C 31 29 00 20 23 C0 03 8B 56 52 24 |(L2$,1). #...VR$|
00001AF0: B3 B1 52 56 24 A7 8B 4F 43 24 B3 B1 43 4F 24 A7 |..RV$..OC$..CO$.|
00001B00: 53 31 24 B2 53 31 24 AA 53 32 24 3A 52 56 24 B2 |S1$.S1$.S2$:RV$.|
00001B10: 56 52 24 3A 43 4F 24 B2 4F 43 24 3A 89 39 39 30 |VR$:CO$.OC$:.990|
00001B20: 00 31 23 C5 03 8B 56 52 24 B2 52 56 24 A7 39 37 |.1#...VR$.RV$.97|
00001B30: 35 00 49 23 CA 03 52 56 24 B2 56 52 24 3A 53 31 |5.I#..RV$.VR$:S1|
00001B40: 24 B2 53 31 24 AA 56 52 24 00 5A 23 CF 03 8B 4F |$.S1$.VR$.Z#...O|
00001B50: 43 24 B2 43 4F 24 A7 39 38 35 00 72 23 D4 03 43 |C$.CO$.985.r#..C|
00001B60: 4F 24 B2 4F 43 24 3A 53 31 24 B2 53 31 24 AA 4F |O$.OC$:S1$.S1$.O|
00001B70: 43 24 00 87 23 D9 03 53 31 24 B2 53 31 24 AA C9 |C$..#..S1$.S1$..|
00001B80: 28 53 32 24 2C 31 29 00 BF 23 DE 03 82 3A 53 58 |(S2$,1)..#...:SX|
00001B90: 24 B2 53 31 24 3A 53 31 24 B2 53 43 24 28 53 31 |$.S1$:S1$.SC$(S1|
00001BA0: 2C 32 30 29 3A 53 43 24 28 53 31 2C 32 30 29 B2 |,20):SC$(S1,20).|
00001BB0: 22 22 3A 4C 31 24 B2 C8 28 53 31 24 2C 32 29 00 |"":L1$..(S1$,2).|
00001BC0: F6 23 E3 03 52 56 24 B2 C8 28 53 31 24 2C 31 29 |.#..RV$..(S1$,1)|
00001BD0: 3A 43 4F 24 B2 C9 28 4C 31 24 2C 31 29 3A 81 53 |:CO$..(L1$,1):.S|
00001BE0: 32 B2 32 31 A4 33 38 3A 53 32 24 B2 53 43 24 28 |2.21.38:S2$.SC$(|
00001BF0: 53 31 2C 53 32 29 00 15 24 E8 03 53 43 24 28 53 |S1,S2)..$..SC$(S|
00001C00: 31 2C 53 32 29 B2 22 22 3A 4C 32 24 B2 C8 28 53 |1,S2)."":L2$..(S|
00001C10: 32 24 2C 32 29 00 39 24 ED 03 8B 4C 32 24 B2 4C |2$,2).9$...L2$.L|
00001C20: 31 24 A7 53 31 24 B2 53 31 24 AA C9 28 53 32 24 |1$.S1$.S1$..(S2$|
00001C30: 2C 31 29 3A 89 31 30 34 35 00 5F 24 F2 03 4C 31 |,1):.1045._$..L1|
00001C40: 24 B2 4C 32 24 3A 56 52 24 B2 C8 28 4C 32 24 2C |$.L2$:VR$..(L2$,|
00001C50: 31 29 3A 4F 43 24 B2 C9 28 4C 32 24 2C 31 29 00 |1):OC$..(L2$,1).|
00001C60: 99 24 F7 03 8B 56 52 24 B3 B1 52 56 24 A7 8B 4F |.$...VR$..RV$..O|
00001C70: 43 24 B3 B1 43 4F 24 A7 53 31 24 B2 53 31 24 AA |C$..CO$.S1$.S1$.|
00001C80: 53 32 24 3A 52 56 24 B2 56 52 24 3A 43 4F 24 B2 |S2$:RV$.VR$:CO$.|
00001C90: 4F 43 24 3A 89 31 30 34 35 00 AB 24 FC 03 8B 56 |OC$:.1045..$...V|
00001CA0: 52 24 B2 52 56 24 A7 31 30 33 30 00 C3 24 01 04 |R$.RV$.1030..$..|
00001CB0: 52 56 24 B2 56 52 24 3A 53 31 24 B2 53 31 24 AA |RV$.VR$:S1$.S1$.|
00001CC0: 56 52 24 00 D5 24 06 04 8B 43 4F 24 B2 4F 43 24 |VR$..$...CO$.OC$|
00001CD0: A7 31 30 34 30 00 ED 24 0B 04 43 4F 24 B2 4F 43 |.1040..$..CO$.OC|
00001CE0: 24 3A 53 31 24 B2 53 31 24 AA 4F 43 24 00 02 25 |$:S1$.S1$.OC$..%|
00001CF0: 10 04 53 31 24 B2 53 31 24 AA C9 28 53 32 24 2C |..S1$.S1$..(S2$,|
00001D00: 31 29 00 3F 25 15 04 82 3A 98 38 2C 53 58 24 3A |1).?%...:.8,SX$:|
00001D10: 98 38 2C 53 31 24 3A 43 52 B2 43 52 AA 32 3A 43 |.8,S1$:CR.CR.2:C|
00001D20: 52 24 28 43 52 AB 31 29 B2 53 58 24 3A 53 58 24 |R$(CR.1).SX$:SX$|
00001D30: B2 22 22 3A 43 52 24 28 43 52 29 B2 53 31 24 00 |."":CR$(CR).S1$.|
00001D40: 77 25 1A 04 53 31 24 B2 22 22 3A 82 3A A0 38 3A |w%..S1$."":.:.8:|
00001D50: 8D 35 39 30 3A 47 4C 24 28 4C 47 29 B2 46 49 24 |.590:GL$(LG).FI$|
00001D60: 3A 8D 38 33 30 3A 46 32 24 B2 46 49 24 3A 43 52 |:.830:F2$.FI$:CR|
00001D70: B2 30 3A 89 31 32 30 00 00 00 |.0:.120... |
..!.... PROGRAM: GRAPHICS FACTORY.D....
AUTHOR : MARCO H. WESTERWEEL.G.... (C)19
89, ALL RIGHTS RESERVED...... HAAKSBERGE
N, THE NETHERLANDS.....:.N....".":.SC$(2
3,38),S1$(23),GL$(54),CR$(46),D(255):DL$
.G(20).....Z$."
":CY$.".. ":RT$.G(13):CL$."
.".J...RL$."............................
..........":SQ$.".......................
.".....BO.4:BA.15:CA.4:CX.0:PA.1:OP$.H(S
Q$,16)."....COPY.....".....OP$.OP$."MODI
FY".RT$."......CRUNCH...REPLACE".RT$."..
....SCRATCH..VIEW".6.#.R$(1).H(SQ$,16)."
....COPY":R$(2).H(SQ$,16).H(RL$,11)."..M
ODIFY".{.(.R$(3).SQ$.".........CRUNCH":R
$(4).SQ$.H(RL$,11).".......REPLACE".C.-.
R$(5).SQ$."......SCRATCH":R$(6).SQ$.H(RL
$,11)."....VIEW":CU$."...."...2..DD.1.25
5:D(DD).9:.:.DD.1.6:.D2:D(D2).DD:..#.7..
DD.1.16:.D2:D(D2).7:.:.DD.135.138:D(DD).
8:..?.<..DD.1.41:.D2:D(D2).10:....A.. 15
7,29,17,145,18,146,5,28,30,31,129,144,14
9,150,151,152,153,154,155.U.F.. 156,158,
159,1,2,3,4,6,7,8,9,10,11,12,13,14,15,16
,19,20,21,22,23,24,25.!.K.. 26,27,34,44,
58,59,128,130,131,132,133,134,139,140,14
1,142,143,147,148._.P.BO.4:BA.15:CA.4:CX
.0:.585:.590:BL$.".... ".
Z.U..".... SETTING UP... "...Z..8,8,8,"0
:GF/DIR,S,R":.GL.1.54:.8,GL$(GL).B._..GL
$(GL).."*".LG.LG.1.K.D..: 8...I.FI$."CR/
GF INTRO":.850:.870:.W.1.1500:.W.-.N..8,
8,8,"0:CR/GF MENU,S,R":.S1.1.23:.8,S1$:.
8,S2$.Y.S.S1$(S1).S1$.S2$:S1$."":S2$."":
.: 8:.590...X.PA.1:SQ.1:RL.1:QX.1:SX.1:R
X.1:RV$.".":CO$.".":HC$." ":CH$.".. ".K.
}.CY$.SC$(1,1):.".";:.S1.1.23:."."S1$(S1
):.......SQ$"... USE .CRSR. & .RETURN.
TO ENTER COMMANDS ."......CA$."C"..(RO.
7.RO.2).CA$."":LG.LG.1.C...."..".35)"..N
EW".D....GT$:.GT$..RT$..GT$..".".145....
..GT$.RT$..510:RO.7:.360:.CA$."C".120...
...GT$.RT$..CA$."A".570.Q. ..GT$."."..".
.".30)"..OLD....NEW":.165......GT$:.GT$.
.RT$.GT$..".".165......GT$.".".."..".30)
"..OLD":.140.0....GT$.RT$.G2.1:G1.6:.340
.L....".....".11)"..ADVANCE".W....GT$:.G
T$..RT$..GT$.."."..GT$..".".185......GT$
.RT$..GL$(G1).."*".G1.G1.6:G2.G1.5:.340:
.185...C..GT$.".".210...H..GT$.".".TT.1:
.".........REVERSE....ADVANCE":.260...M.
.340:.185.$.R..".........REVERSE....ADVA
NCE".O.W..GT$:.GT$..RT$..GT$.."."..GT$..
".".215.V....GT$.RT$.G1.G1.6:G2.G1.5:.34
0:.215......GT$."."..".........REVERSE":
.180.P....GT$.".".TT.1:.".........REVERS
E..ADVANCE":.260......GT$:.GT$.."."..GT$
.."."..GT$..RT$.235. ....GT$.".".TT.TT.1
:.TT.6.TT.6:.260.J....GT$.".".TT.TT.1:.T
T.1.TT.0:.355:.180.G....GT$.RT$.GL$(FL).
"*".235.X....GT$.RT$.270......H(SQ$,8);:
.GX.G2.G1:."...."GL$(GX):..P...FL.G2.TT.
1:.H(SQ$,7.TT)"...."GL$(FL):.235.....RO.
1:.R$(1).....TG.0:.GT$:.GT.1.4:.GT$.J(CU
$,GT,1).TG.GT:GT.4.9....:.GT$.RT$.RO..2.
.360:.CA$."C".120.J....GT$.RT$.395.X."..
TG.0.275.P.'..TG.300,310,320,330...,.RO.
RO.2:.RO.1.RO.1...1..335...6.RO.RO.2:.RO
.6.RO.6...;..335.G.@.RO.RO.1:.RO.1.RO.1.
P.E..335...J.RO.RO.1:.RO.6.RO.6...O..OP$
R$(RO):.275...T..G1.6.G1.6:G2.1:.350.+.Y
..G1.53.G1.54:G2.49.I.^..H(SQ$,8);:.GL.1
.6:.BL$:..U.C..H(SQ$,8);:.GL.G2.G1:."...
."GL$(GL):.:....H..SQ$.24)"....CANCEL...
.ACCEPT"...M..GT$:.GT$..RT$..GT$..".".36
5.P.R..GT$.RT$.CA$."C":....W..GT$."."..S
Q$.24)"....CANCEL....ACCEPT"...|..GT$:.G
T$..RT$..GT$..".".380......GT$.".".360.E
....GT$.RT$.CA$."A":..I....RO.460,400,91
5,495,445,425,570......H(GL$(FL),3)."CR/
".120......510:FX$.FI$:.LG.54.120......3
60:.CA$."C".120.Z....GL$(FL)..F2$.FI$.GL
$(FL):.845......870:.605......GL$(FL)..F
2$.FI$.GL$(FL):.845......870......GT$:.G
T$..G(133).435.<....590:.120.D...LG$.GL$
(FL):LG.LG.1:.LG.0.LG.1:.120...B..590:."
.... SCRATCHING... ";LG$:GL$(FL).GL$(LG.
1):GL$(LG.1)."*".V.G..15,8,15:.15,"S0:".
LG$: 15:.590:.830:.120...L..H(GL$(FL),3)
.."CR/".120...Q..GL$(FL)..F2$.FI$.GL$(FL
):.845.].V..590:.".......INSERT NEW DISK
& PRESS"RT$"...... C . TO COPY ";FI$.R.
...C$:.C$.."C".475......785:."..........
INSERT ORIGINAL DISK & PRESS .RETURN".D.
...RR$:.RR$..RT$.485.R....590:.120......
H(GL$(FL),3)."CR/".120......GL$(FL)..F2$
.FI$.GL$(FL):.845......870:.605.A...FI$.
"":LG.LG.1:.LG.55.LG.54:..Z....SQ$"... .
RETURN.:ACCEPTS NAME, .DEL.:DELETES NAME
."......"...........".22)"..?.";:.W.1.10
0:.W......"..?.";:.W.1.100:.W......NF$:.
(NF$."A".NF$."Z").(NF$."0".NF$."9").520.
&....C(FI$).15..NF$;:FI$.FI$.NF$:.C(FI$)
.15.."..?...";.K....NF$:.NF$.RT$.C(FI$).
16..".. ":..].!..NF$..DL$.555...&..FI$..
"".FI$.H(FI$,C(FI$).1):."...?.. ..";:.FI
$."".520...+..(NF$."/".NF$.":").NF$." ".
535.T.0..NF$."A".NF$."Z".540...5..535...
:..590:.".... INITIALIZING... ".4.?..S1.
1.23:.S2.1.38:SC$(S1,S2).".. ":.:.:.585:
.590.].D..".."CX$:CY$.SC$(1,1):.765:.895
:.605...I..53280,BO:.53281,BA:CX$."..*":
....N.ZX.0:.".";:.Z.1.24:.CL$". "Z$:ZX.Z
X.40:.1023.ZX,160...S..55295.ZX,CA:.:.CL
$". "Z$".":.2023,160:.56295,CA...X.....]
..PC$:.PC$.""..775:.605.+.B.GP.D(F(PC$))
:.GP.10.605.W.G..GP.675,645,630,660,690,
690,695,705,700.K.L..PC$.G(137).120.T.Q.
.605...V..SQ.1.SQ.22.640...{.SQ.SQ.1:.74
0............RL.1.RL.37.655.D...RL.RL.1:
.740.J..........SQ.2.SQ.24.670.....SQ.SQ
.1:.740............RL.2.RL.39.685.....RL
.RL.1:.740. .....C...RV$.PC$:CH$.RV$.CO$
.HC$:.765:..F...CO$.PC$:CH$.RV$.CO$.HC$:
.765:......HC$.PC$:CH$.RV$.CO$.HC$:.765:
....A.PG.F(PC$).134:.PG.730,725,710,715.
B.F..785:.590:.735...K..SQ$"... .. GARB
AGE COLLECTION ..... PLEASE HOLD .":TH.
.(0)...P..870:.735. .U.PA.1:.735...Z.PA.
2:.765.4.....J...QS.SQ:.H(SQ$,SX)H(RL$,R
X)CY$H(SQ$,SQ)H(RL$,RL)CX$.....SX.SQ:QX.
QS:RX.RL:.PA.750,755.....CY$.SC$(QX,RX):
.760.....CY$.CH$:SC$(QX,RX).CY$.E.......
...H(SQ$,SQ)H(RL$,RL)CH$.....SC$(QX,RX).
CH$:CY$.SC$(QX,RX):..+....H(SQ$,SQ)H(RL$
,RL)CX$:.W.1.100:.W.T....H(SQ$,SQ)H(RL$,
RL)CY$:.W.1.100:.W:..W....590:.RO.2.FI$.
FX$:FX$."":.795. ....RO.4.DN$.FI$:FI$."R
EPLACEMENT FILE".U....".... SAVING... ";
FI$" ":.8,8,8,"0:".FI$.",S,W"... ..H(FI$
,3)."CR/"..CR.1.46:.8,CR$(CR):.:.810.,.%
..S1.1.23:.S2.1.38:.8,SC$(S1,S2):.:..W.*
. 8:.RO..4..RO..1.GL$(LG).FI$:.830:.825.
E./..RO.1.825...4..15,8,15:.15,"S0:".DN$
:.15,"R0:".DN$."=".FI$: 15:FI$.DN$...9.F
2$.FI$:....>..8,8,8,"0:DUMMY NAME,S,W":.
GL.1.54:.8,GL$(GL):....C. 8:.15,8,15:.15
,"S0:GF/DIR".).H..15,"R0:GF/DIR=DUMMY NA
ME": 15:..M.M..590:.".... LOADING... ";F
I$" ".H.R..8,8,8,"0:".FI$.",S,R"...W..H(
FI$,3)."CR/"..CR.1.46:.8,CR$(CR):.:.865.
..\..S1.1.23:.S2.1.38:.8,SC$(S1,S2):.:..
..A. 8:F2$.FI$:CY$.SC$(1,1):CH$.SC$(1,1)
:... F.BO.4:BA.15:CA.4:CX.0:.585:.590:."
.";., K..H(FI$,3).."CR/".885.X P..CR.1.4
6.2:."."CR$(CR);CR$(CR.1):.:.890.. U..S1
.1.23:.".";:.S2.1.38:.SC$(S1,S2);:.:."":
... Z.F2$.FI$:.RO.0.910.N ..SQ$"...";:.
RO.895,900,895,900,895,905,900..!..." .F
2.:SAVE, .F4.:GAR/COL, .F5.:PAINT, .F7.:
PLOT.":.910.<!..." PRESS .F1. TO RETUR
N TO OPTIONS MENU..".B!....C!..CR.0:.H(G
L$(FL),3)."CR/".120..!..LG.LG.1:.LG.55.L
G.54:.120..!...GL$(FL)..F2$.FI$.GL$(FL):
.845.F!...590:.C(FI$).13.FI$.H(FI$,13)..
"..FI$."CR/".FI$:."..... CRUNCHING... ";
FI$:.8,8,8,"0:".FI$.",S,W".M"..S1$."":S2
$."":.S1.1.23:S1$.SC$(S1,1):SC$(S1,1).""
:L1$.H(S1$,2).."..RV$.H(L1$,1):CO$.I(L1$
,1):.S2.2.19:S2$.SC$(S1,S2).A"..SC$(S1,S
2)."":L2$.H(S2$,2):.L2$.L1$.S1$.S1$.I(S2
$,1):.990.."..L1$.L2$:VR$.H(L2$,1):OC$.I
(L2$,1). #...VR$..RV$..OC$..CO$.S1$.S1$.
S2$:RV$.VR$:CO$.OC$:.990.1#E..VR$.RV$.97
5.I#J.RV$.VR$:S1$.S1$.VR$.Z#O..OC$.CO$.9
85.R#T.CO$.OC$:S1$.S1$.OC$..#Y.S1$.S1$.I
(S2$,1)..#...:SX$.S1$:S1$.SC$(S1,20):SC$
(S1,20)."":L1$.H(S1$,2)..#..RV$.H(S1$,1)
:CO$.I(L1$,1):.S2.21.38:S2$.SC$(S1,S2)..
$..SC$(S1,S2)."":L2$.H(S2$,2).9$...L2$.L
1$.S1$.S1$.I(S2$,1):.1045._$..L1$.L2$:VR
$.H(L2$,1):OC$.I(L2$,1)..$...VR$..RV$..O
C$..CO$.S1$.S1$.S2$:RV$.VR$:CO$.OC$:.104
5..$...VR$.RV$.1030.C$..RV$.VR$:S1$.S1$.
VR$.U$...CO$.OC$.1040..$..CO$.OC$:S1$.S1
$.OC$..%..S1$.S1$.I(S2$,1).?%...:.8,SX$:
.8,S1$:CR.CR.2:CR$(CR.1).SX$:SX$."":CR$(
CR).S1$.W%..S1$."":.: 8:.590:GL$(LG).FI$
:.830:F2$.FI$:CR.0:.120...
> CLICK IMAGE PREVIEW FOR FULL MODAL