'SOLO'SOFT/BASIC

00000000: 01 08 0D 08 01 00 86 54  59 24 28 34 29 00 1E 08  |.......TY$(4)...|
00000010: 02 00 54 59 24 28 31 29  B2 22 53 45 51 22 00 2F  |..TY$(1)."SEQ"./|
00000020: 08 03 00 54 59 24 28 32  29 B2 22 50 52 47 22 00  |...TY$(2)."PRG".|
00000030: 40 08 04 00 54 59 24 28  33 29 B2 22 55 53 52 22  |@...TY$(3)."USR"|
00000040: 00 51 08 05 00 54 59 24  28 34 29 B2 22 52 45 4C  |.Q...TY$(4)."REL|
00000050: 22 00 57 08 06 00 8F 00  74 08 07 00 8F 20 4C 4F  |".W.....t.... LO|
00000060: 43 4B 20 49 4E 20 55 50  50 45 52 43 41 53 45 20  |CK IN UPPERCASE |
00000070: 4D 4F 44 45 00 7A 08 08  00 8F 00 8B 08 09 00 99  |MODE.z..........|
00000080: C7 28 31 34 32 29 3B C7  28 38 29 00 A5 08 0A 00  |.(142);.(8).....|
00000090: 86 42 4C 25 28 32 35 35  29 3A 8F 20 52 45 41 44  |.BL%(255):. READ|
000000A0: 2D 44 41 54 41 00 BE 08  0B 00 86 57 25 28 32 35  |-DATA......W%(25|
000000B0: 35 29 3A 8F 20 57 4F 52  4B 2D 44 41 54 41 00 DD  |5):. WORK-DATA..|
000000C0: 08 0C 00 54 52 B2 31 38  3A 53 45 B2 31 3A 8F 20  |...TR.18:SE.1:. |
000000D0: 46 30 52 53 54 45 20 53  45 4B 54 4F 52 00 FA 08  |F0RSTE SEKTOR...|
000000E0: 0D 00 4F 50 24 B2 22 53  50 55 4C 57 4E 45 22 3A  |..OP$."SPULWNE":|
000000F0: 8F 20 4F 50 54 49 4F 4E  45 52 00 18 09 0F 00 43  |. OPTIONER.....C|
00000100: 4C 24 B2 C7 28 31 34 37  29 3A 8F 20 43 4C 45 41  |L$..(147):. CLEA|
00000110: 52 20 53 43 52 45 45 4E  00 1E 09 10 00 8F 00 34  |R SCREEN.......4|
00000120: 09 11 00 8F 20 52 45 41  44 20 4E 45 58 54 20 42  |.... READ NEXT B|
00000130: 4C 4F 43 4B 00 3A 09 12  00 8F 00 43 09 13 00 8D  |LOCK.:.....C....|
00000140: 31 32 34 00 49 09 14 00  8F 00 64 09 15 00 8F 20  |124.I.....d.... |
00000150: 46 52 45 4D 53 54 49 4C  20 41 52 42 45 4A 44 53  |FREMSTIL ARBEJDS|
00000160: 4B 4F 50 49 00 6A 09 16  00 8F 00 77 09 17 00 81  |KOPI.j.....w....|
00000170: 4E B2 30 A4 32 35 35 00  89 09 18 00 3A 57 25 28  |N.0.255.....:W%(|
00000180: 4E 29 B2 42 4C 25 28 4E  29 00 90 09 19 00 82 4E  |N).BL%(N)......N|
00000190: 00 BD 09 1B 00 99 43 4C  24 3B 22 20 4E 52 20 4C  |......CL$;" NR L|
000001A0: 4E 47 44 20 46 49 4C 4E  41 56 4E 20 20 20 20 20  |NGD FILNAVN     |
000001B0: 20 20 20 20 20 20 20 20  54 59 50 45 22 00 E6 09  |        TYPE"...|
000001C0: 1C 00 99 22 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |..."------------|
000001D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000001E0: 2D 2D 2D 2D 2D 22 00 F2  09 1D 00 81 46 4C B2 30  |-----"......FL.0|
000001F0: A4 37 00 02 0A 1E 00 3A  46 42 B2 32 AA 33 32 AC  |.7.....:FB.2.32.|
00000200: 46 4C 00 10 0A 1F 00 3A  99 22 20 22 3B 46 4C 3B  |FL.....:." ";FL;|
00000210: 00 2F 0A 20 00 3A 99 57  25 28 46 42 AA 32 38 29  |./. .:.W%(FB.28)|
00000220: AA 32 35 36 AC 57 25 28  46 42 AA 32 39 29 2C 00  |.256.W%(FB.29),.|
00000230: 42 0A 21 00 3A 81 4E B2  46 42 AA 33 A4 46 42 AA  |B.!.:.N.FB.3.FB.|
00000240: 31 38 00 52 0A 22 00 3A  99 C7 28 57 25 28 4E 29  |18.R.".:..(W%(N)|
00000250: 29 3B 00 5A 0A 23 00 3A  82 4E 00 65 0A 24 00 3A  |);.Z.#.:.N.e.$.:|
00000260: 99 22 20 22 3B 00 80 0A  25 00 3A 8B 57 25 28 46  |." ";...%.:.W%(F|
00000270: 42 29 AF 31 32 38 A7 99  22 20 22 3B 3A 89 34 30  |B).128.." ";:.40|
00000280: 00 9C 0A 26 00 3A 8B 57  25 28 46 42 29 B2 30 A7  |...&.:.W%(FB).0.|
00000290: 99 22 2D 2D 44 45 4C 22  3A 89 34 35 00 A7 0A 27  |."--DEL":.45...'|
000002A0: 00 3A 99 22 2A 22 3B 00  C1 0A 28 00 3A 8B 57 25  |.:."*";...(.:.W%|
000002B0: 28 46 42 29 AF 36 34 A7  99 22 3E 22 3B 3A 89 34  |(FB).64..">";:.4|
000002C0: 32 00 CC 0A 29 00 3A 99  22 20 22 3B 00 DC 0A 2A  |2...).:." ";...*|
000002D0: 00 3A 58 B2 57 25 28 46  42 29 AF 37 00 F5 0A 2B  |.:X.W%(FB).7...+|
000002E0: 00 3A 8B 58 B1 34 A7 99  22 45 52 52 4F 52 21 21  |.:.X.4.."ERROR!!|
000002F0: 22 3A 89 34 35 00 02 0B  2C 00 3A 99 54 59 24 28  |":.45...,.:.TY$(|
00000300: 58 29 00 0A 0B 2D 00 82  46 4C 00 30 0B 2E 00 99  |X)...-..FL.0....|
00000310: 3A 99 A3 39 29 3B 22 45  4E 54 45 52 20 12 4E 92  |:..9);"ENTER .N.|
00000320: 20 46 4F 52 20 4E 45 58  54 20 42 4C 4F 43 4B 22  | FOR NEXT BLOCK"|
00000330: 00 49 0B 2F 00 99 A3 31  35 29 3B 22 12 45 92 20  |.I./...15);".E. |
00000340: 46 4F 52 20 45 58 49 54  22 00 63 0B 30 00 99 A3  |FOR EXIT".c.0...|
00000350: 31 32 29 3B 22 4F 52 20  46 49 4C 45 4E 55 4D 42  |12);"OR FILENUMB|
00000360: 45 52 22 00 75 0B 31 00  A1 41 24 3A 8B 41 24 B2  |ER".u.1..A$:.A$.|
00000370: 22 22 A7 34 39 00 8A 0B  32 00 8B 41 24 B2 22 4E  |"".49...2..A$."N|
00000380: 22 A7 8D 31 30 32 3A 89  31 39 00 AD 0B 33 00 8B  |"..102:.19...3..|
00000390: 41 24 B2 22 45 22 A7 8D  31 31 30 3A 99 C7 28 39  |A$."E"..110:..(9|
000003A0: 29 3B 22 53 4C 55 54 22  3A 89 31 35 32 00 C3 0B  |);"SLUT":.152...|
000003B0: 34 00 8B 41 24 B3 22 30  22 B0 41 24 B1 22 37 22  |4..A$."0".A$."7"|
000003C0: A7 34 39 00 CF 0B 35 00  8D 35 34 3A 89 32 37 00  |.49...5..54:.27.|
000003D0: E2 0B 36 00 99 3A 99 22  4F 50 54 49 4F 4E 45 52  |..6..:."OPTIONER|
000003E0: 3A 22 00 00 0C 37 00 99  22 20 53 3D 55 4E 44 45  |:"...7.." S=UNDE|
000003F0: 4C 45 54 45 20 54 4F 20  53 45 51 20 2D 20 22 3B  |LETE TO SEQ - ";|
00000400: 00 1C 0C 38 00 99 22 50  3D 55 4E 44 45 4C 45 54  |...8.."P=UNDELET|
00000410: 45 20 54 4F 20 50 52 47  20 2D 20 22 00 3A 0C 39  |E TO PRG - ".:.9|
00000420: 00 99 22 20 55 3D 55 4E  44 45 4C 45 54 45 20 54  |.." U=UNDELETE T|
00000430: 4F 20 55 53 52 20 2D 20  22 3B 00 56 0C 3A 00 99  |O USR - ";.V.:..|
00000440: 22 4C 3D 55 4E 44 45 4C  45 54 45 20 54 4F 20 52  |"L=UNDELETE TO R|
00000450: 45 4C 20 2D 20 22 00 73  0C 3B 00 99 22 20 57 3D  |EL - ".s.;.." W=|
00000460: 57 52 49 54 45 50 52 4F  54 45 43 54 20 4F 4E 2D  |WRITEPROTECT ON-|
00000470: 20 22 3B 00 8F 0C 3C 00  99 22 4E 3D 4E 4F 20 57  | ";...<.."N=NO W|
00000480: 52 49 54 45 50 52 4F 54  45 43 54 20 2D 20 22 00  |RITEPROTECT - ".|
00000490: A1 0C 3D 00 A1 42 24 3A  8B 42 24 B2 22 22 A7 36  |..=..B$:.B$."".6|
000004A0: 31 00 A9 0C 3E 00 4B B2  30 00 B9 0C 3F 00 81 4E  |1...>.K.0...?..N|
000004B0: B2 31 A4 C3 28 4F 50 24  29 00 D1 0C 40 00 3A 8B  |.1..(OP$)...@.:.|
000004C0: 42 24 B2 CA 28 4F 50 24  2C 4E 2C 31 29 A7 4B B2  |B$..(OP$,N,1).K.|
000004D0: 4E 00 D8 0C 41 00 82 4E  00 EA 0C 42 00 46 42 B2  |N...A..N...B.FB.|
000004E0: 32 AA 33 32 AC C5 28 41  24 29 00 06 0D 43 00 91  |2.32..(A$)...C..|
000004F0: 20 4B 20 89 20 37 32 2C  37 37 2C 38 32 2C 38 37  | K . 72,77,82,87|
00000500: 2C 39 32 2C 39 36 00 0E  0D 44 00 89 36 31 00 14  |,92,96...D..61..|
00000510: 0D 45 00 8F 00 2B 0D 46  00 8F 20 53 45 51 55 45  |.E...+.F.. SEQUE|
00000520: 4E 54 49 41 4C 20 46 49  4C 45 53 00 31 0D 47 00  |NTIAL FILES.1.G.|
00000530: 8F 00 43 0D 48 00 8B 57  25 28 46 42 29 B3 B1 30  |..C.H..W%(FB)..0|
00000540: A7 39 37 00 54 0D 49 00  57 25 28 46 42 29 B2 31  |.97.T.I.W%(FB).1|
00000550: 32 39 3A 8E 00 5A 0D 4A  00 8F 00 6E 0D 4B 00 8F  |29:..Z.J...n.K..|
00000560: 20 50 52 4F 47 52 41 4D  20 46 49 4C 45 53 00 74  | PROGRAM FILES.t|
00000570: 0D 4C 00 8F 00 86 0D 4D  00 8B 57 25 28 46 42 29  |.L.....M..W%(FB)|
00000580: B3 B1 30 A7 39 37 00 97  0D 4E 00 57 25 28 46 42  |..0.97...N.W%(FB|
00000590: 29 B2 31 33 30 3A 8E 00  9D 0D 4F 00 8F 00 AE 0D  |).130:....O.....|
000005A0: 50 00 8F 20 55 53 45 52  20 46 49 4C 45 53 00 B4  |P.. USER FILES..|
000005B0: 0D 51 00 8F 00 C6 0D 52  00 8B 57 25 28 46 42 29  |.Q.....R..W%(FB)|
000005C0: B3 B1 30 A7 39 37 00 D7  0D 53 00 57 25 28 46 42  |..0.97...S.W%(FB|
000005D0: 29 B2 31 33 31 3A 8E 00  EC 0D 54 00 8F 20 52 45  |).131:....T.. RE|
000005E0: 4C 41 54 49 56 45 20 46  49 4C 45 53 00 F2 0D 56  |LATIVE FILES...V|
000005F0: 00 8F 00 04 0E 57 00 8B  57 25 28 46 42 29 B3 B1  |.....W..W%(FB)..|
00000600: 30 A7 39 37 00 15 0E 58  00 57 25 28 46 42 29 B2  |0.97...X.W%(FB).|
00000610: 31 33 32 3A 8E 00 1B 0E  59 00 8F 00 2E 0E 5A 00  |132:....Y.....Z.|
00000620: 8F 20 50 52 4F 54 45 43  54 20 46 49 4C 45 00 34  |. PROTECT FILE.4|
00000630: 0E 5B 00 8F 00 4B 0E 5C  00 57 25 28 46 42 29 B2  |.[...K.\.W%(FB).|
00000640: 57 25 28 46 42 29 B0 36  34 3A 8E 00 51 0E 5D 00  |W%(FB).64:..Q.].|
00000650: 8F 00 66 0E 5E 00 8F 20  55 4E 50 52 4F 54 45 43  |..f.^.. UNPROTEC|
00000660: 54 20 46 49 4C 45 00 6C  0E 5F 00 8F 00 84 0E 60  |T FILE.l._.....`|
00000670: 00 57 25 28 46 42 29 B2  57 25 28 46 42 29 AF 31  |.W%(FB).W%(FB).1|
00000680: 39 31 3A 8E 00 B4 0E 61  00 99 22 49 4B 4B 45 2D  |91:....a.."IKKE-|
00000690: 4C 55 4B 4B 45 44 45 20  46 49 4C 45 52 20 4B 41  |LUKKEDE FILER KA|
000006A0: 4E 20 49 4B 4B 45 20 55  4E 44 45 4C 45 54 45 53  |N IKKE UNDELETES|
000006B0: 21 21 22 3B 00 BA 0E 62  00 8E 00 C0 0E 63 00 8F  |!!";...b.....c..|
000006C0: 00 E0 0E 64 00 8F 20 43  48 45 43 4B 20 4F 4D 20  |...d.. CHECK OM |
000006D0: 44 45 52 20 45 52 20 46  4F 52 53 4B 45 4C 4C 45  |DER ER FORSKELLE|
000006E0: 00 E6 0E 65 00 8F 00 EF  0E 66 00 49 44 B2 31 00  |...e.....f.ID.1.|
000006F0: FC 0E 67 00 81 4E B2 30  A4 32 35 35 00 15 0F 68  |..g..N.0.255...h|
00000700: 00 3A 8B 42 4C 25 28 4E  29 B3 B1 57 25 28 4E 29  |.:.BL%(N)..W%(N)|
00000710: A7 49 44 B2 30 00 1C 0F  69 00 82 4E 00 2A 0F 6A  |.ID.0...i..N.*.j|
00000720: 00 8B 49 44 B2 31 A7 31  31 38 00 30 0F 6B 00 8F  |..ID.1.118.0.k..|
00000730: 00 53 0F 6C 00 8F 20 42  45 4B 52 5C 46 54 20 41  |.S.l.. BEKR\FT A|
00000740: 54 20 4F 50 44 41 54 45  52 49 4E 47 20 30 4E 53  |T OPDATERING 0NS|
00000750: 4B 45 53 00 59 0F 6D 00  8F 00 7C 0F 6E 00 99 22  |KES.Y.m...|.n.."|
00000760: 30 4E 53 4B 45 53 20 4F  50 44 41 54 45 52 49 4E  |0NSKES OPDATERIN|
00000770: 47 28 12 4A 92 2F 12 4E  92 29 3F 22 00 8F 0F 6F  |G(.J./.N.)?"...o|
00000780: 00 A1 41 24 3A 8B 41 24  B2 22 22 A7 31 31 31 00  |..A$:.A$."".111.|
00000790: 9F 0F 70 00 8B 41 24 B2  22 4E 22 A7 31 31 38 00  |..p..A$."N".118.|
000007A0: B0 0F 71 00 8B 41 24 B3  B1 22 4A 22 A7 31 31 31  |..q..A$.."J".111|
000007B0: 00 B9 0F 72 00 8D 31 33  38 00 BF 0F 73 00 8F 00  |...r..138...s...|
000007C0: E0 0F 74 00 8F 20 43 48  45 43 4B 20 4F 4D 20 44  |..t.. CHECK OM D|
000007D0: 49 52 45 43 54 4F 52 59  20 45 52 20 53 4C 55 54  |IRECTORY ER SLUT|
000007E0: 00 E6 0F 75 00 8F 00 17  10 76 00 54 52 B2 57 25  |...u.....v.TR.W%|
000007F0: 28 30 29 3A 8B 54 52 B2  30 A7 99 22 49 4B 4B 45  |(0):.TR.0.."IKKE|
00000800: 20 46 4C 45 52 45 20 46  49 4C 45 52 22 3B C7 28  | FLERE FILER";.(|
00000810: 39 29 3A 89 31 35 32 00  24 10 77 00 53 45 B2 57  |9):.152.$.w.SE.W|
00000820: 25 28 31 29 00 2A 10 78  00 8E 00 30 10 79 00 8F  |%(1).*.x...0.y..|
00000830: 00 43 10 7A 00 8F 20 4C  5C 53 20 45 4E 20 42 4C  |.C.z.. L\S EN BL|
00000840: 4F 43 4B 00 49 10 7B 00  8F 00 5C 10 7C 00 9F 31  |OCK.I.{...\.|..1|
00000850: 35 2C 38 2C 31 35 2C 22  49 30 3A 22 00 6B 10 7D  |5,8,15,"I0:".k.}|
00000860: 00 9F 38 2C 38 2C 38 2C  22 23 22 00 82 10 7E 00  |..8,8,8,"#"...~.|
00000870: 98 31 35 2C 22 55 31 22  3B 38 3B 30 3B 54 52 3B  |.15,"U1";8;0;TR;|
00000880: 53 45 00 94 10 7F 00 98  31 35 2C 22 42 2D 50 22  |SE......15,"B-P"|
00000890: 3B 38 3B 30 00 A1 10 80  00 81 4E B2 30 A4 32 35  |;8;0......N.0.25|
000008A0: 35 00 BC 10 81 00 3A A1  23 38 2C 41 24 3A 8B 41  |5.....:.#8,A$:.A|
000008B0: 24 B2 22 22 A7 41 24 B2  C7 28 30 29 00 CE 10 82  |$."".A$..(0)....|
000008C0: 00 3A 42 4C 25 28 4E 29  B2 C6 28 41 24 29 00 D5  |.:BL%(N)..(A$)..|
000008D0: 10 83 00 82 4E 00 DC 10  84 00 A0 38 00 E4 10 85  |....N......8....|
000008E0: 00 A0 31 35 00 EA 10 86  00 8E 00 F0 10 87 00 8F  |..15............|
000008F0: 00 05 11 88 00 8F 20 53  4B 52 49 56 20 45 4E 20  |...... SKRIV EN |
00000900: 42 4C 4F 43 4B 00 0B 11  89 00 8F 00 18 11 8A 00  |BLOCK...........|
00000910: 9F 31 35 2C 38 2C 31 35  00 27 11 8B 00 9F 38 2C  |.15,8,15.'....8,|
00000920: 38 2C 38 2C 22 23 22 00  39 11 8C 00 98 31 35 2C  |8,8,"#".9....15,|
00000930: 22 42 2D 50 22 3B 38 3B  30 00 46 11 8D 00 81 51  |"B-P";8;0.F....Q|
00000940: B2 30 A4 32 35 35 00 57  11 8E 00 98 38 2C C7 28  |.0.255.W....8,.(|
00000950: 57 25 28 51 29 29 3B 00  70 11 8F 00 3A 8F 20 48  |W%(Q));.p...:. H|
00000960: 55 53 4B 20 53 45 4D 49  4B 4F 4C 4F 4E 21 21 21  |USK SEMIKOLON!!!|
00000970: 00 77 11 90 00 82 51 00  8E 11 91 00 98 31 35 2C  |.w....Q......15,|
00000980: 22 55 32 22 3B 38 3B 30  3B 54 52 3B 53 45 00 95  |"U2";8;0;TR;SE..|
00000990: 11 92 00 A0 38 00 9D 11  93 00 A0 31 35 00 A3 11  |....8......15...|
000009A0: 94 00 8E 00 A9 11 95 00  8F 00 C4 11 96 00 8F 20  |............... |
000009B0: 4F 50 44 41 54 45 52 20  44 49 53 4B 2D 49 4E 44  |OPDATER DISK-IND|
000009C0: 48 4F 4C 44 00 CA 11 97  00 8F 00 E9 11 98 00 8B  |HOLD............|
000009D0: 41 24 B2 22 4A 22 A7 9F  31 35 2C 38 2C 31 35 2C  |A$."J"..15,8,15,|
000009E0: 22 56 30 3A 22 3A A0 31  35 00 EF 11 99 00 80 00  |"V0:":.15.......|
000009F0: 00 00 53                                          |..S             |

.......TY$(4).....TY$(1)."SEQ"./...TY$(2
)."PRG".@...TY$(3)."USR".Q...TY$(4)."REL
".W.....T.... LOCK IN UPPERCASE MODE.Z..
........G(142);G(8)......BL%(255):. READ
-DATA......W%(255):. WORK-DATA.....TR.18
:SE.1:. F0RSTE SEKTOR.....OP$."SPULWNE":
. OPTIONER.....CL$.G(147):. CLEAR SCREEN
.......4.... READ NEXT BLOCK.:.....C....
124.I.....D.... FREMSTIL ARBEJDSKOPI.J..
...W....N.0.255.....:W%(N).BL%(N)......N
......CL$;" NR LNGD FILNAVN             
TYPE"......"----------------------------
-----"......FL.0.7.....:FB.2.32.FL.....:
." ";FL;./. .:.W%(FB.28).256.W%(FB.29),.
B.!.:.N.FB.3.FB.18.R.".:.G(W%(N));.Z.#.:
.N.E.$.:." ";...%.:.W%(FB).128.." ";:.40
...&.:.W%(FB).0.."--DEL":.45...'.:."*";.
A.(.:.W%(FB).64..">";:.42.L.).:." ";...*
.:X.W%(FB).7...+.:.X.4.."ERROR!!":.45...
,.:.TY$(X)...-..FL.0....:..9);"ENTER .N.
 FOR NEXT BLOCK".I./...15);".E. FOR EXIT
".C.0...12);"OR FILENUMBER".U.1..A$:.A$.
"".49...2..A$."N"..102:.19...3..A$."E"..
110:.G(9);"SLUT":.152.C.4..A$."0".A$."7"
.49.O.5..54:.27...6..:."OPTIONER:"...7..
" S=UNDELETE TO SEQ - ";...8.."P=UNDELET
E TO PRG - ".:.9.." U=UNDELETE TO USR - 
";.V.:.."L=UNDELETE TO REL - ".S.;.." W=
WRITEPROTECT ON- ";...<.."N=NO WRITEPROT
ECT - "...=..B$:.B$."".61...>.K.0...?..N
.1.C(OP$).Q.@.:.B$.J(OP$,N,1).K.N.X.A..N
...B.FB.2.32.E(A$)...C.. K . 72,77,82,87
,92,96...D..61...E...+.F.. SEQUENTIAL FI
LES.1.G...C.H..W%(FB)..0.97.T.I.W%(FB).1
29:..Z.J...N.K.. PROGRAM FILES.T.L.....M
..W%(FB)..0.97...N.W%(FB).130:....O.....
P.. USER FILES...Q...F.R..W%(FB)..0.97.W
.S.W%(FB).131:....T.. RELATIVE FILES...V
.....W..W%(FB)..0.97...X.W%(FB).132:....
Y.....Z.. PROTECT FILE.4.[...K.\.W%(FB).
W%(FB).64:..Q.]...F.^.. UNPROTECT FILE.L
._.....`.W%(FB).W%(FB).191:....A.."IKKE-
LUKKEDE FILER KAN IKKE UNDELETES!!";...B
.....C.....D.. CHECK OM DER ER FORSKELLE
...E.....F.ID.1...G..N.0.255...H.:.BL%(N
)..W%(N).ID.0...I..N.*.J..ID.1.118.0.K..
.S.L.. BEKR\FT AT OPDATERING 0NSKES.Y.M.
..|.N.."0NSKES OPDATERING(.J./.N.)?"...O
..A$:.A$."".111...P..A$."N".118...Q..A$.
."J".111...R..138...S.....T.. CHECK OM D
IRECTORY ER SLUT...U.....V.TR.W%(0):.TR.
0.."IKKE FLERE FILER";G(9):.152.$.W.SE.W
%(1).*.X...0.Y...C.Z.. L\S EN BLOCK.I.{.
..\.|..15,8,15,"I0:".K.}..8,8,8,"#"...~.
.15,"U1";8;0;TR;SE.....15,"B-P";8;0....
..N.0.255.....:.#8,A$:.A$."".A$.G(0).N..
.:BL%(N).F(A$).U....N..... 8..... 15....
.............. SKRIV EN BLOCK...........
.15,8,15.'....8,8,8,"#".9....15,"B-P";8;
0.F....Q.0.255.W....8,G(W%(Q));.P...:. H
USK SEMIKOLON!!!.W....Q......15,"U2";8;0
;TR;SE..... 8..... 15.............D.... 
OPDATER DISK-INDHOLD.J..........A$."J"..
15,8,15,"V0:": 15.........S

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL