UNSCRATCH

00000000: 01 10 12 10 0A 00 43 24  B2 C7 28 32 37 29 3A 47  |......C$..(27):G|
00000010: B2 30 00 34 10 14 00 46  4C 24 B2 22 31 35 35 31  |.0.4...FL$."1551|
00000020: 22 3A 55 4E 24 B2 22 30  38 22 3A 44 24 B2 22 30  |":UN$."08":D$."0|
00000030: 22 3A DE 9C 00 4E 10 1E  00 46 52 24 B2 C4 28 B8  |":...N...FR$..(.|
00000040: 28 58 29 29 3A 45 24 B2  C4 28 45 52 52 29 00 6F  |(X)):E$..(ERR).o|
00000050: 10 28 00 81 4A B2 32 A4  36 3A 49 24 28 4A 29 B2  |.(..J.2.6:I$(J).|
00000060: 22 22 3A 82 4A 3A 49 24  28 31 29 B2 22 12 22 00  |"":.J:I$(1).".".|
00000070: 95 10 32 00 99 43 24 AA  22 4E 22 3B 43 24 AA 22  |..2..C$."N";C$."|
00000080: 4F 22 3B 43 24 AA 22 43  22 3A 54 24 B2 22 30 30  |O";C$."C":T$."00|
00000090: 30 30 30 30 22 00 AA 10  3C 00 E7 30 2C 31 3A E7  |0000"...<..0,1:.|
000000A0: 31 2C 38 3A E7 34 2C 31  3A E8 00 C8 10 46 00 81  |1,8:.4,1:....F..|
000000B0: 41 B2 31 A4 34 30 3A 53  24 B2 53 24 AA 22 2D 22  |A.1.40:S$.S$."-"|
000000C0: 3A 82 41 3A D7 34 33 30  00 E4 10 50 00 99 C7 28  |:.A:.430...P...(|
000000D0: 31 34 29 3A 97 31 33 35  31 2C 31 32 38 3A 54 49  |14):.1351,128:TI|
000000E0: 24 B2 54 24 00 FC 10 5A  00 97 C2 28 31 35 33 36  |$.T$...Z...(1536|
000000F0: 29 2C C2 28 C2 28 31 35  33 36 29 29 00 05 11 64  |),.(.(1536))...d|
00000100: 00 89 31 36 30 00 2F 11  6E 00 99 22 13 13 93 11  |..160./.n.."....|
00000110: 1D A0 1D 20 1D A0 1D 20  1D A0 1D 20 1D 12 D5 CE  |... ... ... ....|
00000120: D3 C3 D2 C1 D4 C3 C8 20  D6 31 2E 30 92 11 22 00  |....... .1.0..".|
00000130: 63 11 78 00 99 22 1D 20  1D A0 1D 28 C3 29 20 31  |c.x..". ...(.) 1|
00000140: 39 38 36 20 42 59 20 C2  CF C5 CD CD C5 CC 20 D3  |986 BY ....... .|
00000150: CF C6 D4 D7 C1 D2 C5 1D  A0 1D 20 1D A0 1D 11 22  |.......... ...."|
00000160: AA 53 24 00 AB 11 82 00  E0 2C 30 2C 32 30 2C 53  |.S$......,0,20,S|
00000170: 24 3A E0 2C 32 2C 32 32  2C 22 12 D5 4E 49 54 92  |$:.,2,22,"..NIT.|
00000180: 1D 20 1D 12 C4 52 49 56  45 92 1D 20 1D 12 C6 4C  |. ...RIVE.. ...L|
00000190: 4F 50 50 59 92 1D 20 1D  12 C5 52 52 4F 52 92 1D  |OPPY.. ...RROR..|
000001A0: 20 1D 12 C6 52 45 45 92  22 2C 31 00 E8 11 8C 00  | ...REE.",1.....|
000001B0: E0 31 2C 33 2C 32 34 2C  55 4E 24 2C 30 3A E0 31  |.1,3,24,UN$,0:.1|
000001C0: 2C 31 31 2C 32 34 2C 44  24 2C 30 3A E0 31 2C 31  |,11,24,D$,0:.1,1|
000001D0: 38 2C 32 34 2C 46 4C 24  2C 30 3A E0 31 2C 32 38  |8,24,FL$,0:.1,28|
000001E0: 2C 32 34 2C 45 24 2C 30  00 FD 11 96 00 E0 31 2C  |,24,E$,0......1,|
000001F0: 33 33 2C 32 34 2C 46 52  24 2C 30 3A 8E 00 0E 12  |33,24,FR$,0:....|
00000200: A0 00 8D 31 31 30 3A 45  24 B2 22 2D 31 22 00 18  |...110:E$."-1"..|
00000210: 12 AA 00 99 22 13 13 22  00 3D 12 B4 00 E0 31 2C  |...."..".=....1,|
00000220: 30 33 2C 30 37 2C 49 24  28 31 29 AA 22 C3 48 41  |03,07,I$(1).".HA|
00000230: 4E 47 45 A0 D5 4E 49 54  20 CE 52 2E 92 00 63 12  |NGE..NIT .R...c.|
00000240: BE 00 E0 31 2C 30 33 2C  30 39 2C 49 24 28 32 29  |...1,03,09,I$(2)|
00000250: AA 22 C3 48 41 4E 47 45  A0 C4 52 49 56 45 20 CE  |.".HANGE..RIVE .|
00000260: 52 2E 92 00 86 12 C8 00  E0 31 2C 30 33 2C 31 31  |R........1,03,11|
00000270: 2C 49 24 28 33 29 AA 22  C3 48 41 4E 47 45 A0 C6  |,I$(3).".HANGE..|
00000280: 4C 4F 50 50 59 92 00 AB  12 D2 00 E0 31 2C 30 33  |LOPPY.......1,03|
00000290: 2C 31 33 2C 49 24 28 34  29 AA 22 D5 4E 53 43 52  |,13,I$(4).".NSCR|
000002A0: 41 54 43 48 A0 46 49 4C  45 53 92 00 CC 12 DC 00  |ATCH.FILES......|
000002B0: E0 31 2C 30 33 2C 31 35  2C 49 24 28 35 29 AA 22  |.1,03,15,I$(5)."|
000002C0: C6 4F 52 4D 41 54 20 C4  49 53 4B 92 00 EC 12 E6  |.ORMAT .ISK.....|
000002D0: 00 E0 31 2C 30 33 2C 31  37 2C 49 24 28 36 29 AA  |..1,03,17,I$(6).|
000002E0: 22 C4 49 52 45 43 54 4F  52 59 92 22 00 0F 13 F0  |".IRECTORY."....|
000002F0: 00 E0 31 2C 32 30 2C 31  31 2C 22 D5 53 45 20 2B  |..1,20,11,".SE +|
00000300: 2F 2D 20 54 4F 20 D3 45  4C 45 43 54 A0 20 22 00  |/- TO .ELECT. ".|
00000310: 32 13 FA 00 E0 31 2C 32  30 2C 31 33 2C 22 D5 53  |2....1,20,13,".S|
00000320: 45 20 C5 D3 C3 20 54 4F  20 C5 D8 C9 D4 20 A0 20  |E ... TO .... . |
00000330: A0 22 00 55 13 04 01 E0  31 2C 32 30 2C 30 39 2C  |.".U....1,20,09,|
00000340: 22 D5 53 45 20 D2 C5 D4  D5 D2 CE 20 54 4F 20 D3  |".SE ...... TO .|
00000350: 54 41 52 54 22 00 65 13  0E 01 97 32 33 39 2C 30  |TART".e....239,0|
00000360: 3A A1 F9 47 24 00 93 13  18 01 8B 49 24 28 31 29  |:..G$......I$(1)|
00000370: B2 22 12 22 AF 47 24 B2  22 2B 22 A7 49 24 28 31  |.".".G$."+".I$(1|
00000380: 29 B2 22 22 3A 49 24 28  32 29 B2 22 12 22 3A 89  |)."":I$(2).".":.|
00000390: 31 37 30 00 C1 13 22 01  8B 49 24 28 31 29 B2 22  |170..."..I$(1)."|
000003A0: 12 22 AF 47 24 B2 22 2D  22 A7 49 24 28 31 29 B2  |.".G$."-".I$(1).|
000003B0: 22 22 3A 49 24 28 36 29  B2 22 12 22 3A 89 31 37  |"":I$(6).".":.17|
000003C0: 30 00 EF 13 2C 01 8B 49  24 28 32 29 B2 22 12 22  |0...,..I$(2)."."|
000003D0: AF 47 24 B2 22 2B 22 A7  49 24 28 32 29 B2 22 22  |.G$."+".I$(2).""|
000003E0: 3A 49 24 28 33 29 B2 22  12 22 3A 89 31 37 30 00  |:I$(3).".":.170.|
000003F0: 1D 14 36 01 8B 49 24 28  32 29 B2 22 12 22 AF 47  |..6..I$(2).".".G|
00000400: 24 B2 22 2D 22 A7 49 24  28 32 29 B2 22 22 3A 49  |$."-".I$(2)."":I|
00000410: 24 28 31 29 B2 22 12 22  3A 89 31 37 30 00 4B 14  |$(1).".":.170.K.|
00000420: 40 01 8B 49 24 28 33 29  B2 22 12 22 AF 47 24 B2  |@..I$(3).".".G$.|
00000430: 22 2B 22 A7 49 24 28 33  29 B2 22 22 3A 49 24 28  |"+".I$(3)."":I$(|
00000440: 34 29 B2 22 12 22 3A 89  31 37 30 00 79 14 4A 01  |4).".":.170.y.J.|
00000450: 8B 49 24 28 33 29 B2 22  12 22 AF 47 24 B2 22 2D  |.I$(3).".".G$."-|
00000460: 22 A7 49 24 28 33 29 B2  22 22 3A 49 24 28 32 29  |".I$(3)."":I$(2)|
00000470: B2 22 12 22 3A 89 31 37  30 00 A7 14 54 01 8B 49  |.".":.170...T..I|
00000480: 24 28 34 29 B2 22 12 22  AF 47 24 B2 22 2B 22 A7  |$(4).".".G$."+".|
00000490: 49 24 28 34 29 B2 22 22  3A 49 24 28 35 29 B2 22  |I$(4)."":I$(5)."|
000004A0: 12 22 3A 89 31 37 30 00  D5 14 5E 01 8B 49 24 28  |.":.170...^..I$(|
000004B0: 34 29 B2 22 12 22 AF 47  24 B2 22 2D 22 A7 49 24  |4).".".G$."-".I$|
000004C0: 28 34 29 B2 22 22 3A 49  24 28 33 29 B2 22 12 22  |(4)."":I$(3)."."|
000004D0: 3A 89 31 37 30 00 03 15  68 01 8B 49 24 28 35 29  |:.170...h..I$(5)|
000004E0: B2 22 12 22 AF 47 24 B2  22 2B 22 A7 49 24 28 35  |.".".G$."+".I$(5|
000004F0: 29 B2 22 22 3A 49 24 28  36 29 B2 22 12 22 3A 89  |)."":I$(6).".":.|
00000500: 31 37 30 00 31 15 72 01  8B 49 24 28 35 29 B2 22  |170.1.r..I$(5)."|
00000510: 12 22 AF 47 24 B2 22 2D  22 A7 49 24 28 35 29 B2  |.".G$."-".I$(5).|
00000520: 22 22 3A 49 24 28 34 29  B2 22 12 22 3A 89 31 37  |"":I$(4).".":.17|
00000530: 30 00 5F 15 7C 01 8B 49  24 28 36 29 B2 22 12 22  |0._.|..I$(6)."."|
00000540: AF 47 24 B2 22 2B 22 A7  49 24 28 36 29 B2 22 22  |.G$."+".I$(6).""|
00000550: 3A 49 24 28 31 29 B2 22  12 22 3A 89 31 37 30 00  |:I$(1).".":.170.|
00000560: 8D 15 86 01 8B 49 24 28  36 29 B2 22 12 22 AF 47  |.....I$(6).".".G|
00000570: 24 B2 22 2D 22 A7 49 24  28 36 29 B2 22 22 3A 49  |$."-".I$(6)."":I|
00000580: 24 28 35 29 B2 22 12 22  3A 89 31 37 30 00 A0 15  |$(5).".":.170...|
00000590: 90 01 8B 47 24 B2 C7 28  31 33 29 A7 89 34 37 30  |...G$..(13)..470|
000005A0: 00 C9 15 9A 01 8B 47 24  B2 C7 28 32 37 29 A7 99  |......G$..(27)..|
000005B0: 22 13 13 93 11 1D 42 41  53 49 43 20 56 33 2E 35  |".....BASIC V3.5|
000005C0: 22 3A 99 C7 28 38 29 3A  80 00 D4 15 A4 01 45 24  |":..(8):......E$|
000005D0: B2 22 33 22 00 F3 15 AE  01 D7 34 33 30 3A 8B 45  |."3"......430:.E|
000005E0: 52 52 B2 33 30 A7 45 24  B2 22 34 22 3A 45 52 52  |RR.30.E$."4":ERR|
000005F0: B2 AB 31 00 0D 16 B8 01  DB 38 3A DA 31 2C 36 30  |..1......8:.1,60|
00000600: 30 2C 39 3A DA 31 2C 38  30 30 2C 31 32 00 2F 16  |0,9:.1,800,12./.|
00000610: C2 01 81 57 B2 31 A4 34  30 3A 82 57 3A DA 31 2C  |...W.1.40:.W:.1,|
00000620: 35 30 30 2C 39 3A DA 31  2C 37 30 30 2C 31 32 00  |500,9:.1,700,12.|
00000630: 38 16 CC 01 89 31 36 30  00 4C 16 D6 01 8B 49 24  |8....160.L....I$|
00000640: 28 31 29 B2 22 12 22 A7  89 35 33 30 00 60 16 E0  |(1)."."..530.`..|
00000650: 01 8B 49 24 28 32 29 B2  22 12 22 A7 89 35 37 30  |..I$(2)."."..570|
00000660: 00 74 16 EA 01 8B 49 24  28 33 29 B2 22 12 22 A7  |.t....I$(3).".".|
00000670: 89 36 31 30 00 88 16 F4  01 8B 49 24 28 34 29 B2  |.610......I$(4).|
00000680: 22 12 22 A7 89 36 35 30  00 9D 16 FE 01 8B 49 24  |"."..650......I$|
00000690: 28 35 29 B2 22 12 22 A7  89 31 31 39 30 00 B2 16  |(5)."."..1190...|
000006A0: 08 02 8B 49 24 28 36 29  B2 22 12 22 A7 89 31 36  |...I$(6)."."..16|
000006B0: 34 30 00 F5 16 12 02 99  22 13 13 93 D5 4E 49 54  |40......"....NIT|
000006C0: 20 CE 55 4D 42 45 52 22  C7 28 31 33 29 22 2D 2D  | .UMBER".(13)"--|
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 11 11 22 3A 99 22 CF  |---------..":.".|
000006E0: 4C 44 20 D5 4E 49 54 20  CE 55 4D 42 45 52 3A 20  |LD .NIT .UMBER: |
000006F0: 22 3B 55 4E 24 00 0E 17  1C 02 99 22 11 CE 45 57  |";UN$......"..EW|
00000700: 20 D5 4E 49 54 20 CE 55  4D 42 45 52 22 3B 00 46  | .NIT .UMBER";.F|
00000710: 17 26 02 97 31 33 31 39  2C 32 30 3A 97 31 33 32  |.&..1319,20:.132|
00000720: 30 2C 32 30 3A 97 31 33  32 31 2C C6 28 22 3A 22  |0,20:.1321,.(":"|
00000730: 29 3A 97 31 33 32 32 2C  33 32 3A 97 32 33 39 2C  |):.1322,32:.239,|
00000740: 34 3A 85 55 4E 24 00 4F  17 30 02 89 31 36 30 00  |4:.UN$.O.0..160.|
00000750: 94 17 3A 02 99 22 13 13  93 C4 52 49 56 45 20 CE  |..:.."....RIVE .|
00000760: 55 4D 42 45 52 22 C7 28  31 33 29 22 2D 2D 2D 2D  |UMBER".(13)"----|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D  11 11 22 3A 99 22 CF 4C  |--------..":.".L|
00000780: 44 20 C4 52 49 56 45 20  CE 55 4D 42 45 52 3A 20  |D .RIVE .UMBER: |
00000790: 22 3B 44 24 00 AE 17 44  02 99 22 11 CE 45 57 20  |";D$...D.."..EW |
000007A0: C4 52 49 56 45 20 CE 55  4D 42 45 52 22 3B 00 E5  |.RIVE .UMBER";..|
000007B0: 17 4E 02 97 31 33 31 39  2C 32 30 3A 97 31 33 32  |.N..1319,20:.132|
000007C0: 30 2C 32 30 3A 97 31 33  32 31 2C C6 28 22 3A 22  |0,20:.1321,.(":"|
000007D0: 29 3A 97 31 33 32 32 2C  33 32 3A 97 32 33 39 2C  |):.1322,32:.239,|
000007E0: 34 3A 85 44 24 00 EE 17  58 02 89 31 36 30 00 31  |4:.D$...X..160.1|
000007F0: 18 62 02 99 22 13 13 93  C6 4C 4F 50 50 59 20 D4  |.b.."....LOPPY .|
00000800: 59 50 45 22 C7 28 31 33  29 22 2D 2D 2D 2D 2D 2D  |YPE".(13)"------|
00000810: 2D 2D 2D 2D 2D 11 11 22  3A 99 22 CF 4C 44 20 C6  |-----..":.".LD .|
00000820: 4C 4F 50 50 59 20 D4 59  50 45 3A 20 22 3B 46 4C  |LOPPY .YPE: ";FL|
00000830: 24 00 4A 18 6C 02 99 22  11 CE 45 57 20 C6 4C 4F  |$.J.l.."..EW .LO|
00000840: 50 50 59 20 D4 59 50 45  22 3B 00 82 18 76 02 97  |PPY .YPE";...v..|
00000850: 31 33 31 39 2C 32 30 3A  97 31 33 32 30 2C 32 30  |1319,20:.1320,20|
00000860: 3A 97 31 33 32 31 2C C6  28 22 3A 22 29 3A 97 31  |:.1321,.(":"):.1|
00000870: 33 32 32 2C 33 32 3A 97  32 33 39 2C 34 3A 85 46  |322,32:.239,4:.F|
00000880: 4C 24 00 8B 18 80 02 89  31 36 30 00 C6 18 8A 02  |L$......160.....|
00000890: 99 22 93 93 13 D5 4E 53  43 52 41 54 43 48 22 C7  |."....NSCRATCH".|
000008A0: 28 31 33 29 22 2D 2D 2D  2D 2D 2D 2D 2D 2D 11 22  |(13)"---------."|
000008B0: 3A 99 22 D5 4E 49 54 20  CE 55 4D 42 45 52 20 3A  |:.".NIT .UMBER :|
000008C0: 20 22 3B 55 4E 24 00 E0  18 94 02 99 22 11 C4 52  | ";UN$......"..R|
000008D0: 49 56 45 20 CE 55 4D 42  45 52 3A 20 22 3B 44 24  |IVE .UMBER: ";D$|
000008E0: 00 FB 18 9E 02 99 22 11  C6 4C 4F 50 50 59 20 D4  |......"..LOPPY .|
000008F0: 59 50 45 20 3A 20 22 3B  46 4C 24 00 1A 19 A8 02  |YPE : ";FL$.....|
00000900: 8B C5 28 55 4E 24 29 B3  38 B0 C5 28 55 4E 24 29  |..(UN$).8..(UN$)|
00000910: B1 31 35 A7 45 24 B2 22  30 22 00 36 19 B2 02 8B  |.15.E$."0".6....|
00000920: C5 28 44 24 29 B3 30 B0  C5 28 44 24 29 B1 31 A7  |.(D$).0..(D$).1.|
00000930: 45 24 B2 22 31 22 00 5A  19 BC 02 8B 46 4C 24 B3  |E$."1".Z....FL$.|
00000940: B1 22 31 35 35 31 22 AF  46 4C 24 B3 B1 22 31 35  |."1551".FL$.."15|
00000950: 34 31 22 A7 45 24 B2 22  32 22 00 73 19 C6 02 44  |41".E$."2".s...D|
00000960: B2 C5 28 44 24 29 3A 55  B2 C5 28 55 4E 24 29 3A  |..(D$):U..(UN$):|
00000970: 47 B2 30 00 86 19 D0 02  8B 45 24 B3 B1 22 2D 31  |G.0......E$.."-1|
00000980: 22 A7 89 34 33 30 00 A7  19 DA 02 56 B2 31 36 3A  |"..430.....V.16:|
00000990: 51 B2 33 32 3A 46 B2 32  35 36 3A 54 B2 31 38 3A  |Q.32:F.256:T.18:|
000009A0: 53 B2 31 3A 57 B2 30 00  BE 19 E4 02 5A 24 B2 C7  |S.1:W.0.....Z$..|
000009B0: 28 30 29 3A 44 24 B2 C9  28 44 24 2C 31 29 00 11  |(0):D$..(D$,1)..|
000009C0: 1A EE 02 99 22 11 11 1D  20 1D A0 1D C5 4E 54 45  |...."... ....NTE|
000009D0: 52 20 C6 49 4C 45 4E 41  4D 45 A0 54 4F 20 D5 4E  |R .ILENAME.TO .N|
000009E0: 53 43 52 41 54 43 48 A0  4F 52 20 A0 1D A0 20 A0  |SCRATCH.OR ... .|
000009F0: 20 A0 20 A0 20 A0 2A A0  46 4F 52 20 D7 49 4C 44  | . . .*.FOR .ILD|
00000A00: A0 C3 41 52 44 20 D3 45  41 52 43 48 49 4E 47 2E  |..ARD .EARCHING.|
00000A10: 22 00 50 1A F8 02 97 31  33 31 39 2C 32 30 3A 97  |".P....1319,20:.|
00000A20: 31 33 32 30 2C 32 30 3A  97 31 33 32 31 2C C6 28  |1320,20:.1321,.(|
00000A30: 22 3A 22 29 3A 97 31 33  32 32 2C 33 32 3A 97 32  |":"):.1322,32:.2|
00000A40: 33 39 2C 34 3A 85 22 11  CE 41 4D 45 22 3B 4E 24  |39,4:."..AME";N$|
00000A50: 00 67 1A 02 03 4E 24 B2  C8 28 4E 24 2C 56 29 3A  |.g...N$..(N$,V):|
00000A60: 4C B2 C3 28 4E 24 29 00  7D 1A 0C 03 8B C9 28 4E  |L..(N$).}.....(N|
00000A70: 24 2C 31 29 B3 B1 22 2A  22 A7 38 30 30 00 9B 1A  |$,1).."*".800...|
00000A80: 16 03 4C B2 4C AB 31 3A  4E 24 B2 C8 28 4E 24 2C  |..L.L.1:N$..(N$,|
00000A90: 4C 29 3A 57 B2 31 3A 89  38 32 30 00 A8 1A 20 03  |L):W.1:.820... .|
00000AA0: 8B 4C B2 56 A7 38 32 30  00 C8 1A 2A 03 81 58 B2  |.L.V.820...*..X.|
00000AB0: 4C AA 31 A4 56 3A 4E 24  B2 4E 24 AA C7 28 31 36  |L.1.V:N$.N$..(16|
00000AC0: 30 29 3A 82 3A 4C B2 56  00 E1 1A 34 03 9F 31 2C  |0):.:L.V...4..1,|
00000AD0: 55 2C 31 35 2C 22 49 22  AA 44 24 3A 8D 31 31 33  |U,15,"I".D$:.113|
00000AE0: 30 00 F6 1A 3E 03 9F 32  2C 55 2C 32 2C 22 23 22  |0...>..2,U,2,"#"|
00000AF0: 3A 8D 31 31 33 30 00 11  1B 48 03 98 31 2C 22 55  |:.1130...H..1,"U|
00000B00: 31 3A 22 3B 32 3B 44 3B  54 3B 53 3A 8D 31 31 33  |1:";2;D;T;S:.113|
00000B10: 30 00 2D 1B 52 03 98 31  2C 22 42 2D 50 3A 22 3B  |0.-.R..1,"B-P:";|
00000B20: 32 3B 30 3A A1 23 32 2C  41 24 2C 42 24 00 4D 1B  |2;0:.#2,A$,B$.M.|
00000B30: 5C 03 54 52 B2 C6 28 41  24 AA 5A 24 29 3A 53 43  |\.TR..(A$.Z$):SC|
00000B40: B2 C6 28 42 24 AA 5A 24  29 3A 48 B2 32 00 66 1B  |..(B$.Z$):H.2.f.|
00000B50: 66 03 98 31 2C 22 42 2D  50 3A 22 3B 32 3B 48 3A  |f..1,"B-P:";2;H:|
00000B60: A1 23 32 2C 54 24 00 7E  1B 70 03 43 B2 C6 28 54  |.#2,T$.~.p.C..(T|
00000B70: 24 AA 5A 24 29 3A 8B 43  B1 30 A7 39 32 30 00 99  |$.Z$):.C.0.920..|
00000B80: 1B 7A 03 A1 23 32 2C 41  24 2C 42 24 3A 46 24 B2  |.z..#2,A$,B$:F$.|
00000B90: 22 22 3A 81 58 B2 31 A4  56 00 BA 1B 84 03 A1 23  |"":.X.1.V......#|
00000BA0: 32 2C 54 24 3A 46 24 B2  46 24 AA 54 24 3A 82 3A  |2,T$:F$.F$.T$:.:|
00000BB0: 8B 46 24 B2 22 22 A7 39  34 30 00 D2 1B 8E 03 8B  |.F$."".940......|
00000BC0: 4C B2 30 B0 4E 24 B2 C8  28 46 24 2C 4C 29 A7 39  |L.0.N$..(F$,L).9|
00000BD0: 38 30 00 E5 1B 98 03 48  B2 48 AA 51 3A 8B 48 B3  |80.....H.H.Q:.H.|
00000BE0: 46 A7 38 37 30 00 FE 1B  A2 03 8B 54 52 B1 30 A7  |F.870......TR.0.|
00000BF0: 54 B2 54 52 3A 53 B2 53  43 3A 89 38 34 30 00 22  |T.TR:S.SC:.840."|
00000C00: 1C AC 03 8B 57 A7 99 22  11 20 C5 4E 44 20 4F 46  |....W..". .ND OF|
00000C10: 20 C4 49 52 45 43 54 4F  52 59 22 3A 20 89 31 31  | .IRECTORY": .11|
00000C20: 30 30 00 3B 1C B6 03 99  22 11 A0 C6 49 4C 45 2D  |00.;...."...ILE-|
00000C30: CE 41 4D 45 3A A0 20 22  3B 4E 24 00 5A 1C C0 03  |.AME:. ";N$.Z...|
00000C40: 99 22 A0 CE CF D4 A0 46  4F 55 4E 44 20 49 4E A0  |.".....FOUND IN.|
00000C50: C4 49 52 45 43 54 4F 52  59 22 00 71 1C CA 03 81  |.IRECTORY".q....|
00000C60: 58 B2 31 A4 32 30 30 30  3A 82 3A 89 20 31 31 32  |X.1.2000:.:. 112|
00000C70: 30 00 8B 1C D4 03 41 B2  C6 28 41 24 AA 5A 24 29  |0.....A..(A$.Z$)|
00000C80: 3A 42 B2 C6 28 42 24 AA  5A 24 29 00 A5 1C DE 03  |:B..(B$.Z$).....|
00000C90: 99 22 11 A0 C6 4F 55 4E  44 20 C6 49 4C 45 3A A0  |."...OUND .ILE:.|
00000CA0: 20 22 3B 46 24 00 C4 1C  E8 03 99 22 A0 C1 54 A0  | ";F$......"..T.|
00000CB0: D4 52 41 43 4B 22 3B 41  3B 22 A0 D3 45 43 54 4F  |.RACK";A;"..ECTO|
00000CC0: 52 22 3B 42 00 F4 1C F2  03 99 22 11 A0 D7 41 4E  |R";B......"...AN|
00000CD0: 54 A0 54 4F A0 D2 45 56  49 56 45 A0 54 48 49 53  |T.TO..EVIVE.THIS|
00000CE0: 1D C6 49 4C 45 20 28 59  2F 4E 29 20 3F 20 59 9D  |..ILE (Y/N) ? Y.|
00000CF0: 9D 9D 22 3B 00 09 1D FC  03 85 58 24 3A 8B 58 24  |..";......X$:.X$|
00000D00: B2 22 59 22 A7 31 30 34  30 00 14 1D 06 04 8B 57  |."Y".1040......W|
00000D10: A7 39 32 30 00 38 1D 10  04 99 22 11 20 31 3D 53  |.920.8....". 1=S|
00000D20: 45 51 20 1D 32 3D 50 52  47 A0 1D 33 3D 55 53 52  |EQ .2=PRG..3=USR|
00000D30: A0 1D 34 3D 52 45 4C 22  00 5E 1D 1A 04 99 22 A0  |..4=REL".^....".|
00000D40: C5 4E 54 45 52 A0 C6 49  4C 45 2D D4 59 50 45 20  |.NTER..ILE-.YPE |
00000D50: 28 31 2D 34 29 20 3F 20  31 9D 9D 9D 22 3B 00 7A  |(1-4) ? 1...";.z|
00000D60: 1D 24 04 85 50 3A 8B 50  B3 31 B0 50 B1 34 A7 99  |.$..P:.P.1.P.4..|
00000D70: 22 91 91 22 3A 89 31 30  33 30 00 99 1D 2E 04 98  |"..":.1030......|
00000D80: 31 2C 22 42 2D 50 3A 22  3B 32 3B 48 3A 98 32 2C  |1,"B-P:";2;H:.2,|
00000D90: C7 28 50 AA 31 32 38 29  3B 00 B8 1D 38 04 98 31  |.(P.128);...8..1|
00000DA0: 2C 22 55 32 3A 22 3B 32  3B 44 3B 54 3B 53 3A 8D  |,"U2:";2;D;T;S:.|
00000DB0: 31 31 33 30 3A 47 B2 31  00 E0 1D 42 04 99 22 11  |1130:G.1...B..".|
00000DC0: 20 D5 CE 2D D3 43 52 41  54 43 48 45 44 20 C6 49  | ..-.CRATCHED .I|
00000DD0: 4C 45 3A A0 1D 22 3B 46  24 3A 8B 57 A7 39 32 30  |LE:..";F$:.W.920|
00000DE0: 00 09 1E 4C 04 99 22 11  20 D2 45 56 49 56 45 20  |...L..". .EVIVE |
00000DF0: 4D 4F 52 45 20 C6 49 4C  45 53 20 28 59 2F 4E 29  |MORE .ILES (Y/N)|
00000E00: 20 3F 20 59 9D 9D 9D 22  3B 00 1F 1E 56 04 85 58  | ? Y...";...V..X|
00000E10: 24 3A 8B 58 24 B3 B1 22  59 22 A7 31 31 35 30 00  |$:.X$.."Y".1150.|
00000E20: 2E 1E 60 04 A0 32 3A A0  31 3A 89 36 35 30 00 45  |..`..2:.1:.650.E|
00000E30: 1E 6A 04 84 31 2C 45 2C  4D 24 2C 4A 2C 4B 3A 8B  |.j..1,E,M$,J,K:.|
00000E40: 45 B2 30 A7 8E 00 80 1E  74 04 99 22 11 20 C5 52  |E.0.....t..". .R|
00000E50: 52 4F 52 3A 20 22 3B 45  3B 4D 24 3B 4A 3B 4B 3A  |ROR: ";E;M$;J;K:|
00000E60: 81 57 41 49 B2 31 A4 31  30 30 30 3A 82 57 41 3A  |.WAI.1.1000:.WA:|
00000E70: 42 4F 45 4D 4D 45 4C 20  53 4F 46 54 57 41 52 45  |BOEMMEL SOFTWARE|
00000E80: 00 93 1E 7E 04 A0 32 3A  A0 31 3A 8B 47 B2 30 A7  |...~..2:.1:.G.0.|
00000E90: 31 36 30 00 B2 1E 88 04  99 22 11 20 D2 C5 2D C2  |160......". ..-.|
00000EA0: 55 49 4C 44 49 4E 47 20  56 41 4C 49 44 20 C2 41  |UILDING VALID .A|
00000EB0: 4D 22 00 D4 1E 92 04 99  22 20 4F 4E 20 C4 49 53  |M"......" ON .IS|
00000EC0: 4B 2D D5 4E 49 54 22 3B  55 3B 22 20 C4 52 49 56  |K-.NIT";U;" .RIV|
00000ED0: 45 22 3B 44 00 EF 1E 9C  04 9F 31 2C 55 2C 31 35  |E";D......1,U,15|
00000EE0: 2C 22 56 22 AA 44 24 3A  A0 31 3A 89 31 36 30 00  |,"V".D$:.1:.160.|
00000EF0: 17 1F A6 04 99 22 13 13  93 C6 4F 52 4D 41 54 20  |....."....ORMAT |
00000F00: C4 49 53 4B 22 C7 28 31  33 29 22 2D 2D 2D 2D 2D  |.ISK".(13)"-----|
00000F10: 2D 2D 2D 2D 2D 2D 22 00  45 1F B0 04 99 22 11 C4  |------".E...."..|
00000F20: 4F 20 59 4F 55 20 57 41  4E 54 20 54 4F 20 C6 4F  |O YOU WANT TO .O|
00000F30: 52 4D 41 54 20 41 29 20  D6 45 52 53 49 4F 4E 20  |RMAT A) .ERSION |
00000F40: D6 31 2E 30 22 00 60 1F  BA 04 99 A3 32 32 29 22  |.1.0".`.....22)"|
00000F50: 11 42 29 20 D6 45 52 53  49 4F 4E 20 D6 32 2E 30  |.B) .ERSION .2.0|
00000F60: 00 79 1F C4 04 99 22 11  D3 45 4C 45 43 54 20 41  |.y...."..ELECT A|
00000F70: 2F 42 3A 22 3A A1 F9 41  24 00 8B 1F CE 04 8B 41  |/B:":..A$......A|
00000F80: 24 B2 22 42 22 A7 89 31  33 33 30 00 BE 1F D8 04  |$."B"..1330.....|
00000F90: 97 31 33 31 39 2C 32 30  3A 97 31 33 32 30 2C 32  |.1319,20:.1320,2|
00000FA0: 30 3A 97 31 33 32 31 2C  C6 28 22 3A 22 29 3A 97  |0:.1321,.(":"):.|
00000FB0: 31 33 32 32 2C 33 32 3A  97 32 33 39 2C 34 00 DB  |1322,32:.239,4..|
00000FC0: 1F E2 04 85 22 11 C9 4E  50 55 54 20 C8 45 41 44  |...."..NPUT .EAD|
00000FD0: 45 52 2D CE 41 4D 45 22  3B 48 24 00 0E 20 EC 04  |ER-.AME";H$.. ..|
00000FE0: 97 31 33 31 39 2C 32 30  3A 97 31 33 32 30 2C 32  |.1319,20:.1320,2|
00000FF0: 30 3A 97 31 33 32 31 2C  C6 28 22 3A 22 29 3A 97  |0:.1321,.(":"):.|
00001000: 31 33 32 32 2C 33 32 3A  97 32 33 39 2C 34 00 22  |1322,32:.239,4."|
00001010: 20 F6 04 85 22 11 C9 4E  50 55 54 20 C9 C4 22 3B  | ..."..NPUT ..";|
00001020: 49 24 00 46 20 00 05 99  22 11 D0 52 45 53 53 20  |I$.F ..."..RESS |
00001030: 41 4E 59 20 CB 45 59 20  54 4F 20 D3 54 41 52 54  |ANY .EY TO .TART|
00001040: 22 3A A1 F9 41 24 00 64  20 0A 05 9F 31 2C 38 2C  |":..A$.d ...1,8,|
00001050: 31 35 2C 22 4E 3A 22 AA  48 24 AA 22 2C 22 AA 49  |15,"N:".H$.",".I|
00001060: 24 3A A0 31 00 83 20 14  05 85 22 11 C6 4F 52 4D  |$:.1.. ..."..ORM|
00001070: 41 54 20 41 4E 4F 54 48  45 52 20 C4 49 53 4B 22  |AT ANOTHER .ISK"|
00001080: 3B 58 24 00 95 20 1E 05  8B 58 24 B2 22 59 22 A7  |;X$.. ...X$."Y".|
00001090: 89 31 31 39 30 00 9E 20  28 05 89 31 36 30 00 B3  |.1190.. (..160..|
000010A0: 20 32 05 55 B2 C5 28 55  4E 24 29 3A 44 B2 C5 28  | 2.U..(UN$):D..(|
000010B0: 44 24 29 00 D3 20 3C 05  41 B2 31 3A 56 B2 31 36  |D$).. <.A.1:V.16|
000010C0: 3A 51 24 B2 C7 28 33 34  29 3A 50 24 B2 C7 28 31  |:Q$..(34):P$..(1|
000010D0: 36 30 29 00 F1 20 46 05  54 B2 31 38 3A 53 B2 30  |60).. F.T.18:S.0|
000010E0: 3A 49 24 B2 22 49 22 AA  C9 28 C4 28 44 29 2C 31  |:I$."I"..(.(D),1|
000010F0: 29 00 06 21 50 05 9F 31  2C 55 2C 31 35 2C 49 24  |)..!P..1,U,15,I$|
00001100: 3A 8D 31 36 30 30 00 26  21 5A 05 8D 31 35 36 30  |:.1600.&!Z..1560|
00001110: 3A 46 24 B2 48 24 3A A1  23 32 2C 58 24 2C 58 24  |:F$.H$:.#2,X$,X$|
00001120: 2C 41 24 2C 42 24 00 4D  21 64 05 99 22 11 20 43  |,A$,B$.M!d..". C|
00001130: 55 52 52 45 4E 54 20 C8  45 41 44 45 52 2D CE 41  |URRENT .EADER-.A|
00001140: 4D 45 20 22 3B 51 24 3B  46 24 3B 51 24 00 6D 21  |ME ";Q$;F$;Q$.m!|
00001150: 6E 05 99 22 20 C4 49 53  4B 45 54 54 45 20 C9 C4  |n.." .ISKETTE ..|
00001160: 20 49 53 3A 20 20 22 3B  41 24 3B 42 24 00 9D 21  | IS:  ";A$;B$..!|
00001170: 78 05 99 22 11 20 4E 45  57 20 CE 41 4D 45 20 28  |x..". NEW .AME (|
00001180: 4D 41 58 20 31 36 20 C3  48 41 52 41 43 54 45 52  |MAX 16 .HARACTER|
00001190: 53 29 20 4F 52 20 27 51  55 49 54 27 22 00 C8 21  |S) OR 'QUIT'"..!|
000011A0: 82 05 85 22 20 3F 20 51  55 49 54 9D 9D 9D 9D 9D  |..." ? QUIT.....|
000011B0: 9D 22 3B 4E 24 3A 4C B2  C3 28 4E 24 29 3A 8B 4C  |.";N$:L..(N$):.L|
000011C0: B1 56 A7 20 31 33 38 30  00 DD 21 8C 05 8B 4E 24  |.V. 1380..!...N$|
000011D0: B2 22 51 55 49 54 22 A7  89 31 36 32 30 00 10 22  |."QUIT"..1620.."|
000011E0: 96 05 99 22 11 20 4F 4B  20 54 4F 20 D7 52 49 54  |...". OK TO .RIT|
000011F0: 45 20 4E 45 57 20 C8 45  41 44 45 52 2D CE 41 4D  |E NEW .EADER-.AM|
00001200: 45 20 28 59 2F 4E 29 20  3F 20 59 9D 9D 9D 22 3B  |E (Y/N) ? Y...";|
00001210: 00 26 22 A0 05 85 58 24  3A 8B 58 24 B3 B1 22 59  |.&"...X$:.X$.."Y|
00001220: 22 A7 31 33 38 30 00 34  22 AA 05 8B 4C B2 56 A7  |".1380.4"...L.V.|
00001230: 31 34 37 30 00 4C 22 B4  05 81 58 B2 4C AA 41 A4  |1470.L"...X.L.A.|
00001240: 56 3A 4E 24 B2 4E 24 AA  50 24 3A 82 00 67 22 BE  |V:N$.N$.P$:..g".|
00001250: 05 98 31 2C 22 42 2D 50  3A 22 3B 32 3B 31 34 34  |..1,"B-P:";2;144|
00001260: 3A 98 32 2C 4E 24 3B 00  82 22 C8 05 98 31 2C 22  |:.2,N$;.."...1,"|
00001270: 55 32 3A 22 3B 32 3B 44  3B 54 3B 53 3A 8D 31 36  |U2:";2;D;T;S:.16|
00001280: 30 30 00 95 22 D2 05 98  31 2C 49 24 3A 8D 31 36  |00.."...1,I$:.16|
00001290: 30 30 3A A0 32 00 B8 22  DC 05 99 22 11 20 4F 4C  |00:.2.."...". OL|
000012A0: 44 20 C8 45 41 44 45 52  2D CE 41 4D 45 20 22 3B  |D .EADER-.AME ";|
000012B0: 51 24 3B 46 24 3B 51 24  00 C9 22 E6 05 8D 31 35  |Q$;F$;Q$.."...15|
000012C0: 36 30 3A A0 20 32 3A A0  31 00 EC 22 F0 05 99 22  |60:. 2:.1.."..."|
000012D0: 11 20 4E 45 57 20 C8 45  41 44 45 52 2D CE 41 4D  |. NEW .EADER-.AM|
000012E0: 45 20 22 3B 51 24 3B 48  24 3B 51 24 00 1C 23 FA  |E ";Q$;H$;Q$..#.|
000012F0: 05 99 20 22 11 20 C3 48  41 4E 47 45 20 41 4E 4F  |.. ". .HANGE ANO|
00001300: 54 48 45 52 20 C4 49 53  4B 45 54 54 45 20 28 59  |THER .ISKETTE (Y|
00001310: 2F 4E 29 20 3F 20 59 9D  9D 9D 22 3B 00 31 23 04  |/N) ? Y...";.1#.|
00001320: 06 85 58 24 3A 8B 58 24  B2 22 59 22 A7 31 33 34  |..X$:.X$."Y".134|
00001330: 30 00 41 23 0E 06 99 20  22 93 22 3B 3A 89 31 36  |0.A#... ".";:.16|
00001340: 30 00 5C 23 18 06 9F 32  2C 55 2C 32 2C 22 23 22  |0.\#...2,U,2,"#"|
00001350: 3A 8D 31 36 30 30 3A 48  24 B2 22 22 00 78 23 22  |:.1600:H$."".x#"|
00001360: 06 98 31 2C 22 55 31 3A  22 3B 32 3B 44 3B 54 3B  |..1,"U1:";2;D;T;|
00001370: 53 3A 8D 20 31 36 30 30  00 93 23 2C 06 98 31 2C  |S:. 1600..#,..1,|
00001380: 22 42 2D 50 3A 22 3B 32  3B 31 34 34 3A 81 58 B2  |"B-P:";2;144:.X.|
00001390: 41 A4 56 00 AB 23 36 06  A1 23 32 2C 54 24 3A 48  |A.V..#6..#2,T$:H|
000013A0: 24 B2 48 24 AA 54 24 3A  82 3A 8E 00 C3 23 40 06  |$.H$.T$:.:...#@.|
000013B0: 84 31 2C 45 2C 4D 24 2C  4A 2C 4B 3A 8B 20 45 B2  |.1,E,M$,J,K:. E.|
000013C0: 30 A7 8E 00 DD 23 4A 06  99 22 11 20 45 52 52 4F  |0....#J..". ERRO|
000013D0: 52 3A 20 22 3B 45 3B 4D  24 3B 4A 3B 4B 00 07 24  |R: ";E;M$;J;K..$|
000013E0: 54 06 A0 20 32 3A A0 20  31 3A 81 58 B2 31 A4 31  |T.. 2:. 1:.X.1.1|
000013F0: 30 30 30 3A 82 58 3A 42  4F 45 4D 4D 45 4C 20 53  |000:.X:BOEMMEL S|
00001400: 4F 46 54 57 41 52 45 00  10 24 5E 06 89 31 36 30  |OFTWARE..$^..160|
00001410: 00 47 24 68 06 99 22 13  13 93 C4 49 52 45 43 54  |.G$h.."....IRECT|
00001420: 4F 52 59 22 C7 28 31 33  29 22 2D 2D 2D 2D 2D 2D  |ORY".(13)"------|
00001430: 2D 2D 2D 22 C7 28 31 33  29 3B 43 24 22 54 22 3A  |---".(13);C$"T":|
00001440: 44 B2 C5 28 44 24 29 00  70 24 72 06 99 22 11 11  |D..(D$).p$r.."..|
00001450: 1D 1D 1D 1D 1D 1D 1D C9  4E 53 45 52 54 20 C4 49  |........NSERT .I|
00001460: 53 4B 20 49 4E 54 4F 20  C4 52 49 56 45 20 30 22  |SK INTO .RIVE 0"|
00001470: 00 84 24 7C 06 A1 F9 41  24 3A E8 3A 3A 99 22 11  |..$|...A$:.::.".|
00001480: 11 22 3A EE 00 AF 24 86  06 99 3A 99 3A 99 22 C1  |.":...$...:.:.".|
00001490: 4E 4F 54 48 45 52 20 C4  49 53 4B 3F 20 28 59 2F  |NOTHER .ISK? (Y/|
000014A0: 4E 29 3F 20 20 59 9D 9D  9D 22 3B 3A 85 4F 24 00  |N)?  Y...";:.O$.|
000014B0: C1 24 90 06 8B 4F 24 B2  22 59 22 A7 89 31 36 34  |.$...O$."Y"..164|
000014C0: 30 00 CA 24 9A 06 89 31  36 30 00 00 00           |0..$...160...   |

......C$.G(27):G.0.4...FL$."1551":UN$."0
8":D$."0":...N...FR$.D(.(X)):E$.D(ERR).O
.(..J.2.6:I$(J)."":.J:I$(1)."."...2..C$.
"N";C$."O";C$."C":T$."000000"...<..0,1:.
1,8:.4,1:..H.F..A.1.40:S$.S$."-":.A:W430
...P..G(14):.1351,128:TI$.T$...Z..B(1536
),B(B(1536))...D..160./.N.."..... . . . 
. . ..UNSCRATCH V1.0..".C.X..". . .(C) 1
986 BY BOEMMEL SOFTWARE. . . ..".S$.....
.,0,20,S$:.,2,22,".UNIT.. ..DRIVE.. ..FL
OPPY.. ..ERROR.. ..FREE.",1......1,3,24,
UN$,0:.1,11,24,D$,0:.1,18,24,FL$,0:.1,28
,24,E$,0......1,33,24,FR$,0:.... ..110:E
$."-1"......"..".=....1,03,07,I$(1)."CHA
NGE UNIT NR...C....1,03,09,I$(2)."CHANGE
 DRIVE NR.....H..1,03,11,I$(3)."CHANGE F
LOPPY....R..1,03,13,I$(4)."UNSCRATCH FIL
ES..L....1,03,15,I$(5)."FORMAT DISK.....
..1,03,17,I$(6)."DIRECTORY."......1,20,1
1,"USE +/- TO SELECT  ".2....1,20,13,"US
E ESC TO EXIT    ".U....1,20,09,"USE RET
URN TO START".E....239,0:..G$......I$(1)
.".".G$."+".I$(1)."":I$(2).".":.170.A.".
.I$(1).".".G$."-".I$(1)."":I$(6).".":.17
0...,..I$(2).".".G$."+".I$(2)."":I$(3)."
.":.170...6..I$(2).".".G$."-".I$(2)."":I
$(1).".":.170.K.@..I$(3).".".G$."+".I$(3
)."":I$(4).".":.170.Y.J..I$(3).".".G$."-
".I$(3)."":I$(2).".":.170...T..I$(4)."."
.G$."+".I$(4)."":I$(5).".":.170.U.^..I$(
4).".".G$."-".I$(4)."":I$(3).".":.170...
H..I$(5).".".G$."+".I$(5)."":I$(6).".":.
170.1.R..I$(5).".".G$."-".I$(5)."":I$(4)
.".":.170._.|..I$(6).".".G$."+".I$(6).""
:I$(1).".":.170......I$(6).".".G$."-".I$
(6)."":I$(5).".":.170. ....G$.G(13)..470
.I....G$.G(27)..".....BASIC V3.5":.G(8):
..T...E$."3".....W430:.ERR.30.E$."4":ERR
..1......8:Z1,600,9:Z1,800,12./.B..W.1.4
0:.W:Z1,500,9:Z1,700,12.8.L..160.L.V..I$
(1)."."..530.`....I$(2)."."..570.T....I$
(3)."."..610......I$(4)."."..650......I$
(5)."."..1190......I$(6)."."..1640......
"...UNIT NUMBER"G(13)"-----------..":."O
LD UNIT NUMBER: ";UN$......".NEW UNIT NU
MBER";.F.&..1319,20:.1320,20:.1321,F(":"
):.1322,32:.239,4:.UN$.O.0..160...:.."..
.DRIVE NUMBER"G(13)"------------..":."OL
D DRIVE NUMBER: ";D$...D..".NEW DRIVE NU
MBER";...N..1319,20:.1320,20:.1321,F(":"
):.1322,32:.239,4:.D$...X..160.1.B.."...
FLOPPY TYPE"G(13)"-----------..":."OLD F
LOPPY TYPE: ";FL$.J.L..".NEW FLOPPY TYPE
";...V..1319,20:.1320,20:.1321,F(":"):.1
322,32:.239,4:.FL$......160.F...."...UNS
CRATCH"G(13)"---------.":."UNIT NUMBER :
 ";UN$......".DRIVE NUMBER: ";D$......".
FLOPPY TYPE : ";FL$......E(UN$).8.E(UN$)
.15.E$."0".6....E(D$).0.E(D$).1.E$."1".Z
....FL$.."1551".FL$.."1541".E$."2".S.F.D
.E(D$):U.E(UN$):G.0...P..E$.."-1"..430..
.Z.V.16:Q.32:F.256:T.18:S.1:W.0.....Z$.G
(0):D$.I(D$,1)......"... . .ENTER FILENA
ME TO UNSCRATCH OR  .         * FOR WILD
 CARD SEARCHING.".P....1319,20:.1320,20:
.1321,F(":"):.1322,32:.239,4:.".NAME";N$
.G...N$.H(N$,V):L.C(N$).}....I(N$,1).."*
".800.....L.L.1:N$.H(N$,L):W.1:.820... .
.L.V.820.H.*..X.L.1.V:N$.N$.G(160):.:L.V
...4..1,U,15,"I".D$:.1130...>..2,U,2,"#"
:.1130...H..1,"U1:";2;D;T;S:.1130.-.R..1
,"B-P:";2;0:.#2,A$,B$.M.\.TR.F(A$.Z$):SC
.F(B$.Z$):H.2.F.F..1,"B-P:";2;H:.#2,T$.~
.P.C.F(T$.Z$):.C.0.920...Z..#2,A$,B$:F$.
"":.X.1.V......#2,T$:F$.F$.T$:.:.F$."".9
40.R....L.0.N$.H(F$,L).980.....H.H.Q:.H.
F.870......TR.0.T.TR:S.SC:.840."....W.."
. END OF DIRECTORY": .1100.;....". FILE-
NAME:  ";N$.Z...." NOT FOUND IN DIRECTOR
Y".Q.J..X.1.2000:.:. 1120...T.A.F(A$.Z$)
:B.F(B$.Z$)......". FOUND FILE:  ";F$.D.
..." AT TRACK";A;" SECTOR";B......". WAN
T TO REVIVE THIS.FILE (Y/N) ? Y...";....
..X$:.X$."Y".1040......W.920.8....". 1=S
EQ .2=PRG .3=USR .4=REL".^...." ENTER FI
LE-TYPE (1-4) ? 1...";.Z.$..P:.P.1.P.4..
"..":.1030......1,"B-P:";2;H:.2,G(P.128)
;...8..1,"U2:";2;D;T;S:.1130:G.1...B..".
 UN-SCRATCHED FILE: .";F$:.W.920...L..".
 REVIVE MORE FILES (Y/N) ? Y...";...V..X
$:.X$.."Y".1150...`. 2: 1:.650.E.J..1,E,
M$,J,K:.E.0.....T..". ERROR: ";E;M$;J;K:
.WAI.1.1000:.WA:BOEMMEL SOFTWARE...~. 2:
 1:.G.0.160......". RE-BUILDING VALID BA
M".T...." ON DISK-UNIT";U;" DRIVE";D....
..1,U,15,"V".D$: 1:.160......"...FORMAT 
DISK"G(13)"-----------".E....".DO YOU WA
NT TO FORMAT A) VERSION V1.0".`.....22)"
.B) VERSION V2.0.Y.D..".SELECT A/B:":..A
$...N..A$."B"..1330...X..1319,20:.1320,2
0:.1321,F(":"):.1322,32:.239,4......".IN
PUT HEADER-NAME";H$.. ...1319,20:.1320,2
0:.1321,F(":"):.1322,32:.239,4." ...".IN
PUT ID";I$.F ...".PRESS ANY KEY TO START
":..A$.D ...1,8,15,"N:".H$.",".I$: 1.. .
..".FORMAT ANOTHER DISK";X$.. ...X$."Y".
.1190.. (..160.. 2.U.E(UN$):D.E(D$).S <.
A.1:V.16:Q$.G(34):P$.G(160).. F.T.18:S.0
:I$."I".I(D(D),1)..!P..1,U,15,I$:.1600.&
!Z..1560:F$.H$:.#2,X$,X$,A$,B$.M!D..". C
URRENT HEADER-NAME ";Q$;F$;Q$.M!N.." DIS
KETTE ID IS:  ";A$;B$..!X..". NEW NAME (
MAX 16 CHARACTERS) OR 'QUIT'".H!..." ? Q
UIT......";N$:L.C(N$):.L.V. 1380..!...N$
."QUIT"..1620.."...". OK TO WRITE NEW HE
ADER-NAME (Y/N) ? Y...";.&" ..X$:.X$.."Y
".1380.4"...L.V.1470.L"...X.L.A.V:N$.N$.
P$:..G"...1,"B-P:";2;144:.2,N$;.."H..1,"
U2:";2;D;T;S:.1600.."R..1,I$:.1600: 2.."
...". OLD HEADER-NAME ";Q$;F$;Q$.I"...15
60:  2: 1.."...". NEW HEADER-NAME ";Q$;H
$;Q$..#... ". CHANGE ANOTHER DISKETTE (Y
/N) ? Y...";.1#...X$:.X$."Y".1340.A#... 
".";:.160.\#...2,U,2,"#":.1600:H$."".X#"
..1,"U1:";2;D;T;S:. 1600..#,..1,"B-P:";2
;144:.X.A.V..#6..#2,T$:H$.H$.T$:.:..C#@.
.1,E,M$,J,K:. E.0....#J..". ERROR: ";E;M
$;J;K..$T.  2:  1:.X.1.1000:.X:BOEMMEL S
OFTWARE..$^..160.G$H.."...DIRECTORY"G(13
)"---------"G(13);C$"T":D.E(D$).P$R.."..
.......INSERT DISK INTO DRIVE 0"..$|...A
$:.::."..":...$...:.:."ANOTHER DISK? (Y/
N)?  Y...";:.O$.A$...O$."Y"..1640.J$...1
60...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL