TIDY DIR.1

00000000: 01 08 07 08 64 00 8F 00  0D 08 65 00 8F 00 13 08  |....d.....e.....|
00000010: 66 00 8F 00 19 08 67 00  8F 00 1F 08 68 00 8F 00  |f.....g.....h...|
00000020: 3B 08 6E 00 97 35 33 32  38 30 2C 32 3A 97 35 33  |;.n..53280,2:.53|
00000030: 32 38 31 2C 31 35 3A 99  22 1F 22 00 66 08 78 00  |281,15:.".".f.x.|
00000040: 99 C7 28 31 34 29 22 93  20 20 20 20 20 20 20 20  |..(14)".        |
00000050: 20 2A 2A 20 D4 C9 C4 D9  A0 C4 C9 D2 C5 C3 D4 CF  | ** ............|
00000060: D2 D9 20 2A 2A 22 00 95  08 82 00 99 22 11 11 CC  |.. **"......"...|
00000070: 4F 41 44 20 44 49 53 4B  20 49 4E 20 44 52 49 56  |OAD DISK IN DRIV|
00000080: 45 20 30 2E 20 20 D2 C5  D4 D5 D2 CE 20 3D 20 52  |E 0.  ...... = R|
00000090: 45 41 44 59 2E 00 AC 08  8C 00 A1 5A 24 3A 8B 5A  |EADY.......Z$:.Z|
000000A0: 24 B3 B1 C7 28 31 33 29  89 31 34 30 00 B2 08 96  |$...(13).140....|
000000B0: 00 8F 00 B8 08 97 00 8F  00 BE 08 98 00 8F 00 C4  |................|
000000C0: 08 99 00 8F 00 EC 08 A0  00 44 4E B2 38 3A 44 B2  |.........DN.8:D.|
000000D0: 30 3A 43 32 B2 32 3A 43  43 B2 31 35 3A 54 B2 31  |0:C2.2:CC.15:T.1|
000000E0: 38 3A 53 B2 30 3A 42 50  B2 31 34 34 00 05 09 AA  |8:S.0:BP.144....|
000000F0: 00 9F 43 43 2C 44 4E 2C  43 43 2C 22 49 30 22 3A  |..CC,DN,CC,"I0":|
00000100: 8D 31 30 30 30 00 1D 09  B4 00 9F 43 32 2C 44 4E  |.1000......C2,DN|
00000110: 2C 43 32 2C 22 23 22 3A  8D 31 30 30 30 00 23 09  |,C2,"#":.1000.#.|
00000120: C8 00 8F 00 29 09 C9 00  8F 00 2F 09 CA 00 8F 00  |....)...../.....|
00000130: 4B 09 D2 00 98 43 43 2C  22 55 31 3A 22 43 32 3B  |K....CC,"U1:"C2;|
00000140: 44 3B 54 3B 53 3A 8D 31  30 30 30 00 5F 09 DC 00  |D;T;S:.1000._...|
00000150: 98 43 43 2C 22 42 2D 50  3A 22 43 32 3B 42 50 00  |.CC,"B-P:"C2;BP.|
00000160: 7C 09 E6 00 49 44 24 B2  22 22 3A 4E B2 32 30 3A  ||...ID$."":N.20:|
00000170: 8D 31 30 33 30 3A 49 44  24 B2 5A 24 00 9A 09 F0  |.1030:ID$.Z$....|
00000180: 00 99 22 11 C4 49 53 4B  20 4C 4F 41 44 45 44 20  |.."..ISK LOADED |
00000190: 3A 20 20 22 49 44 24 22  20 22 00 A0 09 2C 01 8F  |:  "ID$" "...,..|
000001A0: 00 A6 09 2D 01 8F 00 AC  09 2E 01 8F 00 B2 09 2F  |...-.........../|
000001B0: 01 8F 00 B8 09 30 01 8F  00 BE 09 31 01 8F 00 CA  |.....0.....1....|
000001C0: 09 36 01 86 53 25 28 31  39 29 00 D8 09 37 01 86  |.6..S%(19)...7..|
000001D0: 46 54 24 28 31 39 32 29  00 E6 09 38 01 86 54 53  |FT$(192)...8..TS|
000001E0: 24 28 31 39 32 29 00 F4  09 39 01 86 4E 46 24 28  |$(192)...9..NF$(|
000001F0: 31 39 32 29 00 02 0A 3A  01 86 46 45 24 28 31 39  |192)...:..FE$(19|
00000200: 32 29 00 10 0A 3B 01 86  53 4B 24 28 31 39 32 29  |2)...;..SK$(192)|
00000210: 00 1B 0A 40 01 86 54 24  28 34 29 00 4F 0A 41 01  |...@..T$(4).O.A.|
00000220: 54 24 28 31 29 B2 22 53  45 51 22 3A 54 24 28 32  |T$(1)."SEQ":T$(2|
00000230: 29 B2 22 50 52 47 22 3A  54 24 28 33 29 B2 22 55  |)."PRG":T$(3)."U|
00000240: 53 52 22 3A 54 24 28 34  29 B2 22 52 45 4C 22 00  |SR":T$(4)."REL".|
00000250: 6A 0A 4A 01 81 49 B2 31  A4 33 30 3A 5A 30 24 B2  |j.J..I.1.30:Z0$.|
00000260: 5A 30 24 AA C7 28 30 29  3A 82 00 70 0A 5E 01 8F  |Z0$..(0):..p.^..|
00000270: 00 76 0A 5F 01 8F 00 7C  0A 60 01 8F 00 84 0A 68  |.v._...|.`.....h|
00000280: 01 53 B2 31 00 8C 0A 72  01 45 B2 31 00 AD 0A 7C  |.S.1...r.E.1...||
00000290: 01 98 43 43 2C 22 55 31  3A 22 43 32 3B 44 3B 54  |..CC,"U1:"C2;D;T|
000002A0: 3B 53 3A 8D 31 30 30 30  3A 42 50 B2 31 00 D0 0A  |;S:.1000:BP.1...|
000002B0: 86 01 98 43 43 2C 22 42  2D 50 3A 22 3B 43 32 3B  |...CC,"B-P:";C2;|
000002C0: 42 50 3A 8D 31 31 30 30  3A 53 25 28 53 29 B2 41  |BP:.1100:S%(S).A|
000002D0: 00 EF 0A 90 01 98 43 43  2C 22 42 2D 50 3A 22 43  |......CC,"B-P:"C|
000002E0: 32 3B 42 50 3A 8D 31 31  30 30 3A 46 54 B2 41 00  |2;BP:.1100:FT.A.|
000002F0: 0E 0B 9A 01 8B 46 54 B2  30 B0 46 54 B2 31 32 38  |.....FT.0.FT.128|
00000300: A7 42 50 B2 42 50 AA 33  31 3A 89 35 30 30 00 3B  |.BP.BP.31:.500.;|
00000310: 0B A4 01 8B 46 54 B3 31  32 38 A7 99 22 11 20 C6  |....FT.128..". .|
00000320: C9 CC C5 A0 C5 D2 D2 CF  D2 20 20 CE 4F 54 20 43  |.........  .OT C|
00000330: 4C 4F 53 45 44 22 3A 89  39 39 39 00 49 0B AE 01  |LOSED":.999.I...|
00000340: 46 54 24 28 45 29 B2 41  24 00 61 0B B8 01 4E B2  |FT$(E).A$.a...N.|
00000350: 32 3A 8D 31 30 34 30 3A  54 53 24 28 45 29 B2 5A  |2:.1040:TS$(E).Z|
00000360: 24 00 7A 0B C2 01 4E B2  31 36 3A 8D 31 30 34 30  |$.z...N.16:.1040|
00000370: 3A 4E 46 24 28 45 29 B2  5A 24 00 93 0B CC 01 4E  |:NF$(E).Z$.....N|
00000380: B2 31 31 3A 8D 31 30 34  30 3A 46 45 24 28 45 29  |.11:.1040:FE$(E)|
00000390: B2 5A 24 00 99 0B D6 01  8F 00 9F 0B D7 01 8F 00  |.Z$.............|
000003A0: A5 0B D8 01 8F 00 C7 0B  E0 01 99 2C 22 20 20 20  |...........,"   |
000003B0: 20 22 4E 46 24 28 45 29  22 20 3A 20 22 54 24 28  | "NF$(E)" : "T$(|
000003C0: 46 54 AB 31 32 38 29 00  D9 0B EA 01 42 50 B2 42  |FT.128).....BP.B|
000003D0: 50 AA 32 3A 45 B2 45 AA  31 00 E9 0B F4 01 8B 42  |P.2:E.E.1......B|
000003E0: 50 B3 32 35 36 89 34 30  30 00 06 0C FE 01 8B 53  |P.256.400......S|
000003F0: 25 28 53 29 B3 B1 32 35  35 A7 53 B2 53 25 28 53  |%(S)..255.S.S%(S|
00000400: 29 3A 89 33 38 30 00 10  0C 08 02 8D 31 31 33 30  |):.380......1130|
00000410: 00 23 0C 12 02 45 B2 45  AB 31 3A 8B 45 B2 30 89  |.#...E.E.1:.E.0.|
00000420: 37 33 30 00 53 0C 1C 02  99 22 C7 52 4F 55 50 20  |730.S....".ROUP |
00000430: 46 49 4C 45 20 49 4E 20  41 4C 50 48 41 42 45 54  |FILE IN ALPHABET|
00000440: 49 43 41 4C 20 4F 52 44  45 52 20 3F 20 28 59 2F  |ICAL ORDER ? (Y/|
00000450: 4E 29 22 00 6E 0C 26 02  A1 5A 24 3A 46 54 24 B2  |N)".n.&..Z$:FT$.|
00000460: 5A 24 3A 8B 5A 24 B2 22  59 22 89 35 37 30 00 7F  |Z$:.Z$."Y".570..|
00000470: 0C 30 02 8B 5A 24 B3 B1  22 4E 22 89 35 35 30 00  |.0..Z$.."N".550.|
00000480: 85 0C 3A 02 8F 00 8B 0C  3B 02 8F 00 91 0C 3C 02  |..:.....;.....<.|
00000490: 8F 00 97 0C 3D 02 8F 00  9D 0C 3E 02 8F 00 B1 0C  |....=.....>.....|
000004A0: 44 02 99 22 11 D3 4F 52  54 49 4E 47 20 2E 2E 2E  |D.."..ORTING ...|
000004B0: 22 00 C1 0C 4E 02 81 49  B2 31 A4 45 3A 4B B2 31  |"...N..I.1.E:K.1|
000004C0: 36 00 EE 0C 58 02 81 4A  B2 31 A4 31 36 3A 8B CA  |6...X..J.1.16:..|
000004D0: 28 4E 46 24 28 49 29 2C  4A 2C 31 29 B2 C7 28 31  |(NF$(I),J,1)..(1|
000004E0: 36 30 29 A7 4B B2 4A AB  31 3A 4A B2 31 36 00 08  |60).K.J.1:J.16..|
000004F0: 0D 62 02 82 4A 3A 53 4B  24 28 49 29 B2 C8 28 4E  |.b..J:SK$(I)..(N|
00000500: 46 24 28 49 29 2C 4B 29  00 2A 0D 6C 02 8B 46 54  |F$(I),K).*.l..FT|
00000510: 24 B2 22 59 22 A7 53 4B  24 28 49 29 B2 46 54 24  |$."Y".SK$(I).FT$|
00000520: 28 49 29 AA 53 4B 24 28  49 29 00 35 0D 76 02 82  |(I).SK$(I).5.v..|
00000530: 49 3A 4D B2 45 00 4B 0D  80 02 4D B2 B5 28 4D AD  |I:M.E.K...M..(M.|
00000540: 32 29 3A 8B 4D B2 30 89  37 33 30 00 59 0D 8A 02  |2):.M.0.730.Y...|
00000550: 4B B2 45 AB 4D 3A 4A B2  30 00 66 0D 94 02 8B 4A  |K.E.M:J.0.f....J|
00000560: B1 4B 89 36 34 30 00 6E  0D 9E 02 49 B2 4A 00 7B  |.K.640.n...I.J.{|
00000570: 0D A8 02 8B 49 B3 30 89  37 30 30 00 94 0D B2 02  |....I.0.700.....|
00000580: 8B 53 4B 24 28 49 AA 4D  29 B3 53 4B 24 28 49 29  |.SK$(I.M).SK$(I)|
00000590: 89 37 31 30 00 A3 0D BC  02 4A B2 4A AA 31 3A 89  |.710.....J.J.1:.|
000005A0: 36 36 30 00 CD 0D C6 02  41 24 B2 46 54 24 28 49  |660.....A$.FT$(I|
000005B0: 29 3A 46 54 24 28 49 29  B2 46 54 24 28 49 AA 4D  |):FT$(I).FT$(I.M|
000005C0: 29 3A 46 54 24 28 49 AA  4D 29 B2 41 24 00 F7 0D  |):FT$(I.M).A$...|
000005D0: C7 02 41 24 B2 54 53 24  28 49 29 3A 54 53 24 28  |..A$.TS$(I):TS$(|
000005E0: 49 29 B2 54 53 24 28 49  AA 4D 29 3A 54 53 24 28  |I).TS$(I.M):TS$(|
000005F0: 49 AA 4D 29 B2 41 24 00  21 0E C8 02 41 24 B2 4E  |I.M).A$.!...A$.N|
00000600: 46 24 28 49 29 3A 4E 46  24 28 49 29 B2 4E 46 24  |F$(I):NF$(I).NF$|
00000610: 28 49 AA 4D 29 3A 4E 46  24 28 49 AA 4D 29 B2 41  |(I.M):NF$(I.M).A|
00000620: 24 00 4B 0E C9 02 41 24  B2 46 45 24 28 49 29 3A  |$.K...A$.FE$(I):|
00000630: 46 45 24 28 49 29 B2 46  45 24 28 49 AA 4D 29 3A  |FE$(I).FE$(I.M):|
00000640: 46 45 24 28 49 AA 4D 29  B2 41 24 00 75 0E CA 02  |FE$(I.M).A$.u...|
00000650: 41 24 B2 53 4B 24 28 49  29 3A 53 4B 24 28 49 29  |A$.SK$(I):SK$(I)|
00000660: B2 53 4B 24 28 49 AA 4D  29 3A 53 4B 24 28 49 AA  |.SK$(I.M):SK$(I.|
00000670: 4D 29 B2 41 24 00 84 0E  D0 02 49 B2 49 AB 4D 3A  |M).A$.....I.I.M:|
00000680: 89 36 38 30 00 8A 0E DA  02 8F 00 90 0E DB 02 8F  |.680............|
00000690: 00 96 0E DC 02 8F 00 B4  0E E4 02 99 22 91 D7 52  |............"..R|
000006A0: 49 54 49 4E 47 20 2E 2E  2E 20 3A 20 20 22 49 44  |ITING ... :  "ID|
000006B0: 24 22 20 22 00 C7 0E EE  02 5A 24 B2 C7 28 30 29  |$" ".....Z$..(0)|
000006C0: AA C7 28 32 35 35 29 00  D3 0E F8 02 53 B2 31 3A  |..(255).....S.1:|
000006D0: 4E B2 31 00 EF 0E 02 03  98 43 43 2C 22 55 31 3A  |N.1......CC,"U1:|
000006E0: 22 43 32 3B 44 3B 54 3B  53 3A 8D 31 30 30 30 00  |"C2;D;T;S:.1000.|
000006F0: F8 0E 0C 03 42 50 B2 32  00 05 0F 16 03 8B 4E B1  |....BP.2......N.|
00000700: 45 89 38 39 30 00 15 0F  20 03 8B 42 50 B3 32 35  |E.890... ..BP.25|
00000710: 36 89 38 34 30 00 31 0F  34 03 98 43 43 2C 22 55  |6.840.1.4..CC,"U|
00000720: 32 3A 22 43 32 3B 44 3B  54 3B 53 3A 8D 31 30 30  |2:"C2;D;T;S:.100|
00000730: 30 00 42 0F 3E 03 53 B2  53 25 28 53 29 3A 89 37  |0.B.>.S.S%(S):.7|
00000740: 37 30 00 57 0F 48 03 98  43 43 2C 22 42 2D 50 3A  |70.W.H..CC,"B-P:|
00000750: 22 3B 43 32 3B 42 50 00  80 0F 52 03 99 2C 22 20  |";C2;BP...R..," |
00000760: 20 20 20 22 4E 46 24 28  4E 29 22 20 3A 20 22 54  |   "NF$(N)" : "T|
00000770: 24 28 C6 28 46 54 24 28  4E 29 29 AB 31 32 38 29  |$(.(FT$(N)).128)|
00000780: 00 A5 0F 5C 03 98 43 32  2C 46 54 24 28 4E 29 3B  |...\..C2,FT$(N);|
00000790: 54 53 24 28 4E 29 3B 4E  46 24 28 4E 29 3B 46 45  |TS$(N);NF$(N);FE|
000007A0: 24 28 4E 29 3B 00 BD 0F  66 03 42 50 B2 42 50 AA  |$(N);...f.BP.BP.|
000007B0: 33 32 3A 4E B2 4E AA 31  3A 89 37 39 30 00 CD 0F  |32:N.N.1:.790...|
000007C0: 7A 03 8B 42 50 B1 32 35  35 89 39 33 30 00 E2 0F  |z..BP.255.930...|
000007D0: 84 03 98 43 43 2C 22 42  2D 50 3A 22 3B 43 32 3B  |...CC,"B-P:";C2;|
000007E0: 42 50 00 EF 0F 8E 03 98  43 32 2C 5A 30 24 3B 00  |BP......C2,Z0$;.|
000007F0: 01 10 98 03 42 50 B2 42  50 AA 33 32 3A 89 38 39  |....BP.BP.32:.89|
00000800: 30 00 1B 10 A2 03 42 50  B2 30 3A 98 43 43 2C 22  |0.....BP.0:.CC,"|
00000810: 42 2D 50 3A 22 3B 43 32  3B 42 50 00 27 10 AC 03  |B-P:";C2;BP.'...|
00000820: 98 43 32 2C 5A 24 3B 00  43 10 B6 03 98 43 43 2C  |.C2,Z$;.C....CC,|
00000830: 22 55 32 3A 22 43 32 3B  44 3B 54 3B 53 3A 8D 31  |"U2:"C2;D;T;S:.1|
00000840: 30 30 30 00 53 10 C0 03  5A 24 B2 C8 28 5A 30 24  |000.S...Z$..(Z0$|
00000850: 2C 32 29 00 6A 10 CA 03  53 B2 53 25 28 53 29 3A  |,2).j...S.S%(S):|
00000860: 8B 53 B2 32 35 35 89 39  39 39 00 86 10 D4 03 98  |.S.255.999......|
00000870: 43 43 2C 22 55 31 3A 22  43 32 3B 44 3B 54 3B 53  |CC,"U1:"C2;D;T;S|
00000880: 3A 8D 31 30 30 30 00 94  10 DE 03 42 50 B2 32 3A  |:.1000.....BP.2:|
00000890: 89 39 30 30 00 A2 10 E7  03 A0 43 32 3A A0 43 43  |.900......C2:.CC|
000008A0: 3A 80 00 A8 10 E8 03 8F  00 AE 10 E9 03 8F 00 B4  |:...............|
000008B0: 10 EA 03 8F 00 D1 10 F2  03 84 43 43 2C 45 4E 2C  |..........CC,EN,|
000008C0: 45 4D 24 2C 45 54 2C 45  53 3A 8B 45 4E B2 30 A7  |EM$,ET,ES:.EN.0.|
000008D0: 8E 00 F7 10 FC 03 99 22  93 20 C4 C9 D3 CB A0 C5  |.......". ......|
000008E0: D2 D2 CF D2 20 22 45 4E  3B 45 4D 24 3B 45 54 3B  |.... "EN;EM$;ET;|
000008F0: 45 53 3A 89 39 39 39 00  FD 10 06 04 8F 00 03 11  |ES:.999.........|
00000900: 07 04 8F 00 09 11 08 04  8F 00 0F 11 09 04 8F 00  |................|
00000910: 19 11 10 04 5A 24 B2 22  22 00 2A 11 1A 04 81 49  |....Z$."".*....I|
00000920: B2 31 A4 4E 3A 8D 31 31  30 30 00 3B 11 24 04 5A  |.1.N:.1100.;.$.Z|
00000930: 24 B2 5A 24 AA 41 24 3A  82 3A 8E 00 41 11 4C 04  |$.Z$.A$:.:..A.L.|
00000940: 8F 00 47 11 4D 04 8F 00  4D 11 4E 04 8F 00 68 11  |..G.M...M.N...h.|
00000950: 56 04 A1 23 43 32 2C 41  24 3A 8B 41 24 B2 22 22  |V..#C2,A$:.A$.""|
00000960: A7 41 24 B2 C7 28 30 29  00 7E 11 60 04 41 B2 C6  |.A$..(0).~.`.A..|
00000970: 28 41 24 29 3A 42 50 B2  42 50 AA 31 3A 8E 00 84  |(A$):BP.BP.1:...|
00000980: 11 6A 04 8F 00 8A 11 6B  04 8F 00 90 11 6C 04 8F  |.j.....k.....l..|
00000990: 00 AE 11 74 04 99 22 11  CF CB 20 54 4F 20 43 4F  |...t.."... TO CO|
000009A0: 4E 54 49 4E 55 45 20 3F  20 28 59 2F 4E 29 00 C2  |NTINUE ? (Y/N)..|
000009B0: 11 7E 04 A1 5A 24 3A 8B  5A 24 B2 22 4E 22 89 39  |.~..Z$:.Z$."N".9|
000009C0: 39 39 00 D4 11 88 04 8B  5A 24 B3 B1 22 59 22 89  |99......Z$.."Y".|
000009D0: 31 31 35 30 00 F7 11 92  04 99 22 91 20 20 20 20  |1150......".    |
000009E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009F0: 20 20 20 91 22 3A 8E 00  00 00 30                 |   .":....0     |

....D.....E.....F.....G.....H...;.N..532
80,2:.53281,15:.".".F.X..G(14)".        
 ** TIDY DIRECTORY **"......"..LOAD DISK
 IN DRIVE 0.  RETURN = READY.......Z$:.Z
$..G(13).140...................D....... 
.DN.8:D.0:C2.2:CC.15:T.18:S.0:BP.144....
..CC,DN,CC,"I0":.1000......C2,DN,C2,"#":
.1000.#.H...).I.../.J...K.R..CC,"U1:"C2;
D;T;S:.1000._....CC,"B-P:"C2;BP.|...ID$.
"":N.20:.1030:ID$.Z$......".DISK LOADED 
:  "ID$" ". .,.....-.........../.....0..
...1...J.6..S%(19).X.7..FT$(192)...8..TS
$(192)...9..NF$(192)...:..FE$(192)...;..
SK$(192)...@..T$(4).O.A.T$(1)."SEQ":T$(2
)."PRG":T$(3)."USR":T$(4)."REL".J.J..I.1
.30:Z0$.Z0$.G(0):..P.^...V._...|.`.....H
.S.1...R.E.1...|..CC,"U1:"C2;D;T;S:.1000
:BP.1.P....CC,"B-P:";C2;BP:.1100:S%(S).A
......CC,"B-P:"C2;BP:.1100:FT.A......FT.
0.FT.128.BP.BP.31:.500.;....FT.128..". F
ILE ERROR  NOT CLOSED":.999.I...FT$(E).A
$.A...N.2:.1040:TS$(E).Z$.Z.B.N.16:.1040
:NF$(E).Z$...L.N.11:.1040:FE$(E).Z$...V.
....W.....X...G....,"    "NF$(E)" : "T$(
FT.128).Y...BP.BP.2:E.E.1......BP.256.40
0......S%(S)..255.S.S%(S):.380......1130
.#...E.E.1:.E.0.730.S...."GROUP FILE IN 
ALPHABETICAL ORDER ? (Y/N)".N.&..Z$:FT$.
Z$:.Z$."Y".570..0..Z$.."N".550...:.....
;.....<.....=.....>.....D..".SORTING ...
".A.N..I.1.E:K.16...X..J.1.16:.J(NF$(I),
J,1).G(160).K.J.1:J.16...B..J:SK$(I).H(N
F$(I),K).*.L..FT$."Y".SK$(I).FT$(I).SK$(
I).5.V..I:M.E.K...M..(M.2):.M.0.730.Y...
K.E.M:J.0.F....J.K.640.N...I.J.{....I.0.
700......SK$(I.M).SK$(I).710.....J.J.1:.
660.M.F.A$.FT$(I):FT$(I).FT$(I.M):FT$(I.
M).A$...G.A$.TS$(I):TS$(I).TS$(I.M):TS$(
I.M).A$.!.H.A$.NF$(I):NF$(I).NF$(I.M):NF
$(I.M).A$.K.I.A$.FE$(I):FE$(I).FE$(I.M):
FE$(I.M).A$.U.J.A$.SK$(I):SK$(I).SK$(I.M
):SK$(I.M).A$...P.I.I.M:.680...Z........
............".WRITING ... :  "ID$" ".G..
.Z$.G(0).G(255).S...S.1:N.1......CC,"U1:
"C2;D;T;S:.1000.....BP.2......N.E.890...
 ..BP.256.840.1.4..CC,"U2:"C2;D;T;S:.100
0.B.>.S.S%(S):.770.W.H..CC,"B-P:";C2;BP.
..R..,"    "NF$(N)" : "T$(F(FT$(N)).128)
...\..C2,FT$(N);TS$(N);NF$(N);FE$(N);...
F.BP.BP.32:N.N.1:.790.M.Z..BP.255.930...
...CC,"B-P:";C2;BP......C2,Z0$;.....BP.B
P.32:.890.....BP.0:.CC,"B-P:";C2;BP.'...
.C2,Z$;.C....CC,"U2:"C2;D;T;S:.1000.S...
Z$.H(Z0$,2).J.J.S.S%(S):.S.255.999...T..
CC,"U1:"C2;D;T;S:.1000.....BP.2:.900....
. C2: CC:....................Q....CC,EN,
EM$,ET,ES:.EN.0........". DISK ERROR "EN
;EM$;ET;ES:.999.........................
....Z$."".*....I.1.N:.1100.;.$.Z$.Z$.A$:
.:..A.L...G.M...M.N...H.V..#C2,A$:.A$.""
.A$.G(0).~.`.A.F(A$):BP.BP.1:....J.....K
.....L.....T..".OK TO CONTINUE ? (Y/N).B
.~..Z$:.Z$."N".999.T....Z$.."Y".1150....
..".                       .":....0

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL