FILBESKYTTER
FILE INFORMATION
FILENAME(S): FILBESKYTTER
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 20:19:23
APPEARS ON: 1 disk(s)
FILE HASH
4d2e4462db260fafd8cb4278a9d59c118cd56480d559d778eb380d58ffdeec9b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES | FILBESKYTTER | PRG | Curtcool, Malcom | 2 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 00 00 97 35 33 32 38 30 2C 31 35 3A |.......53280,15:|
00000010: 97 35 33 32 38 31 2C 31 35 3A 99 22 90 22 00 2B |.53281,15:.".".+|
00000020: 08 01 00 86 20 54 59 24 28 34 29 00 3C 08 02 00 |.... TY$(4).<...|
00000030: 54 59 24 28 31 29 B2 22 53 45 51 22 00 4D 08 03 |TY$(1)."SEQ".M..|
00000040: 00 54 59 24 28 32 29 B2 22 50 52 47 22 00 5E 08 |.TY$(2)."PRG".^.|
00000050: 04 00 54 59 24 28 33 29 B2 22 55 53 52 22 00 6F |..TY$(3)."USR".o|
00000060: 08 05 00 54 59 24 28 34 29 B2 22 52 45 4C 22 00 |...TY$(4)."REL".|
00000070: 75 08 06 00 8F 00 92 08 07 00 8F 20 4C 4F 43 4B |u.......... LOCK|
00000080: 20 49 4E 20 55 50 50 45 52 43 41 43 45 20 4D 4F | IN UPPERCACE MO|
00000090: 44 45 00 98 08 08 00 8F 00 A9 08 09 00 99 C7 28 |DE.............(|
000000A0: 31 34 32 29 3B C7 28 38 29 00 C5 08 0A 00 86 20 |142);.(8)...... |
000000B0: 42 4C 25 28 32 35 35 29 20 3A 8F 20 52 45 41 44 |BL%(255) :. READ|
000000C0: 2D 44 41 54 41 00 DF 08 0B 00 86 20 57 25 28 32 |-DATA...... W%(2|
000000D0: 35 35 29 3A 8F 20 57 4F 52 4B 2D 44 41 54 41 00 |55):. WORK-DATA.|
000000E0: FE 08 0C 00 54 52 B2 31 38 3A 53 45 B2 31 3A 8F |....TR.18:SE.1:.|
000000F0: 20 46 30 52 53 54 45 20 53 45 4B 54 4F 52 00 1B | F0RSTE SEKTOR..|
00000100: 09 0D 00 4F 50 24 B2 22 53 50 55 4C 57 4E 45 22 |...OP$."SPULWNE"|
00000110: 3A 8F 20 4F 50 54 49 4F 4E 45 52 00 39 09 0F 00 |:. OPTIONER.9...|
00000120: 43 4C 24 B2 C7 28 31 34 37 29 3A 8F 20 43 4C 45 |CL$..(147):. CLE|
00000130: 41 52 20 53 43 52 45 45 4E 00 3F 09 10 00 8F 00 |AR SCREEN.?.....|
00000140: 57 09 11 00 8F 20 52 45 41 44 20 28 4E 45 58 54 |W.... READ (NEXT|
00000150: 29 20 42 4C 4F 43 4B 00 5D 09 12 00 8F 00 67 09 |) BLOCK.].....g.|
00000160: 13 00 8D 20 31 32 31 00 71 09 14 00 8D 20 31 32 |... 121.q.... 12|
00000170: 34 00 8B 09 15 00 8F 46 52 45 4D 53 54 49 4C 20 |4......FREMSTIL |
00000180: 41 52 42 45 4A 44 53 4B 4F 50 49 00 91 09 16 00 |ARBEJDSKOPI.....|
00000190: 8F 00 A1 09 17 00 81 20 4E B2 30 20 A4 20 32 35 |....... N.0 . 25|
000001A0: 35 00 B4 09 18 00 3A 20 57 25 28 4E 29 B2 42 4C |5.....: W%(N).BL|
000001B0: 25 28 4E 29 00 BB 09 19 00 82 4E 00 E8 09 1B 00 |%(N)......N.....|
000001C0: 99 43 4C 24 3B 22 93 20 4E 52 20 20 4C 4E 47 44 |.CL$;". NR LNGD|
000001D0: 20 20 46 49 4C 4E 41 56 4E 20 20 20 20 20 20 20 | FILNAVN |
000001E0: 20 20 20 54 59 50 45 22 00 12 0A 1C 00 99 22 20 | TYPE"......" |
000001F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000200: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000210: 2D 22 00 21 0A 1D 00 81 20 46 4C B2 30 20 A4 20 |-".!.... FL.0 . |
00000220: 37 00 32 0A 1E 00 3A 20 46 42 B2 32 AA 33 32 AC |7.2...: FB.2.32.|
00000230: 46 4C 00 40 0A 1F 00 3A 99 22 20 22 3B 46 4C 3B |FL.@...:." ";FL;|
00000240: 00 60 0A 20 00 3A 99 20 57 25 28 46 42 AA 32 38 |.`. .:. W%(FB.28|
00000250: 29 AA 32 35 36 AC 57 25 28 46 42 AA 32 39 29 2C |).256.W%(FB.29),|
00000260: 00 75 0A 21 00 3A 81 4E B2 46 42 AA 33 20 A4 20 |.u.!.:.N.FB.3 . |
00000270: 46 42 AA 31 38 00 86 0A 22 00 3A 20 99 C7 28 57 |FB.18...".: ..(W|
00000280: 25 28 4E 29 29 3B 00 8E 0A 23 00 3A 82 4E 00 9A |%(N));...#.:.N..|
00000290: 0A 24 00 3A 20 99 22 20 22 3B 00 B9 0A 25 00 3A |.$.: ." ";...%.:|
000002A0: 20 8B 57 25 28 46 42 29 AF 20 31 32 38 20 A7 99 | .W%(FB). 128 ..|
000002B0: 20 22 20 22 3B 3A 89 34 30 00 D6 0A 26 00 3A 20 | " ";:.40...&.: |
000002C0: 8B 57 25 28 46 42 29 B2 30 A7 99 22 2D 2D 44 45 |.W%(FB).0.."--DE|
000002D0: 4C 22 3A 89 34 35 00 E2 0A 27 00 3A 20 99 22 2A |L":.45...'.: ."*|
000002E0: 22 3B 00 01 0B 28 00 3A 20 8B 57 25 28 46 42 29 |";...(.: .W%(FB)|
000002F0: AF 20 36 34 20 A7 20 99 20 22 3E 22 3B 3A 89 34 |. 64 . . ">";:.4|
00000300: 32 00 0D 0B 29 00 3A 20 99 22 20 22 3B 00 1E 0B |2...).: ." ";...|
00000310: 2A 00 3A 20 58 B2 57 25 28 46 42 29 AF 37 00 39 |*.: X.W%(FB).7.9|
00000320: 0B 2B 00 3A 20 8B 58 B1 34 A7 99 22 45 52 52 4F |.+.: .X.4.."ERRO|
00000330: 52 20 21 21 22 3A 89 34 35 00 47 0B 2C 00 3A 20 |R !!":.45.G.,.: |
00000340: 99 54 59 24 28 58 29 00 4F 0B 2D 00 82 46 4C 00 |.TY$(X).O.-..FL.|
00000350: 73 0B 2E 00 99 3A 99 A3 37 29 3B 22 45 4E 54 45 |s....:..7);"ENTE|
00000360: 52 20 4E 20 46 4F 52 20 4E 45 58 54 20 42 4C 4F |R N FOR NEXT BLO|
00000370: 43 4B 22 00 8A 0B 2F 00 99 A3 31 33 29 3B 22 45 |CK".../...13);"E|
00000380: 20 46 4F 52 20 45 58 49 54 22 00 A4 0B 30 00 99 | FOR EXIT"...0..|
00000390: A3 31 30 29 3B 22 4F 52 20 46 49 4C 45 4E 55 4D |.10);"OR FILENUM|
000003A0: 4D 45 52 22 00 B6 0B 31 00 A1 41 24 3A 8B 41 24 |MER"...1..A$:.A$|
000003B0: B2 22 22 A7 34 39 00 CC 0B 32 00 8B 41 24 B2 22 |."".49...2..A$."|
000003C0: 4E 22 A7 8D 20 31 30 32 3A 89 32 30 00 EE 0B 33 |N".. 102:.20...3|
000003D0: 00 8B 41 24 B2 22 45 22 A7 8D 31 31 30 3A 99 A3 |..A$."E"..110:..|
000003E0: 39 29 3B 22 53 4C 55 54 22 3A 89 31 35 32 00 04 |9);"SLUT":.152..|
000003F0: 0C 34 00 8B 41 24 B3 22 30 22 B0 41 24 B1 22 37 |.4..A$."0".A$."7|
00000400: 22 A7 34 39 00 10 0C 35 00 8D 35 34 3A 89 32 37 |".49...5..54:.27|
00000410: 00 23 0C 36 00 99 3A 99 22 4F 50 54 49 4F 4E 45 |.#.6..:."OPTIONE|
00000420: 52 3A 22 00 41 0C 37 00 99 22 20 53 3D 55 4E 44 |R:".A.7.." S=UND|
00000430: 45 4C 45 54 45 20 54 4F 20 53 45 51 20 2D 20 22 |ELETE TO SEQ - "|
00000440: 3B 00 5A 0C 38 00 99 22 50 3D 55 4E 44 45 4C 45 |;.Z.8.."P=UNDELE|
00000450: 54 45 20 54 4F 20 50 52 47 22 00 78 0C 39 00 99 |TE TO PRG".x.9..|
00000460: 22 20 55 3D 55 4E 44 45 4C 45 54 45 20 54 4F 20 |" U=UNDELETE TO |
00000470: 55 53 52 20 2D 20 22 3B 00 91 0C 3A 00 99 22 4C |USR - ";...:.."L|
00000480: 3D 55 4E 44 45 4C 45 54 45 20 54 4F 20 52 45 4C |=UNDELETE TO REL|
00000490: 22 00 AF 0C 3B 00 99 22 20 57 3D 57 52 49 54 45 |"...;.." W=WRITE|
000004A0: 50 52 4F 54 45 43 54 20 4F 4E 20 2D 20 22 3B 00 |PROTECT ON - ";.|
000004B0: C8 0C 3C 00 99 22 4E 3D 4E 4F 20 57 52 49 54 45 |..<.."N=NO WRITE|
000004C0: 50 52 4F 54 45 43 54 22 00 DA 0C 3D 00 A1 42 24 |PROTECT"...=..B$|
000004D0: 3A 8B 42 24 B2 22 22 A7 36 31 00 E2 0C 3E 00 4B |:.B$."".61...>.K|
000004E0: B2 30 00 F2 0C 3F 00 81 4E B2 31 A4 C3 28 4F 50 |.0...?..N.1..(OP|
000004F0: 24 29 00 0B 0D 40 00 3A 20 8B 42 24 B2 CA 28 4F |$)...@.: .B$..(O|
00000500: 50 24 2C 4E 2C 31 29 A7 4B B2 4E 00 12 0D 41 00 |P$,N,1).K.N...A.|
00000510: 82 4E 00 24 0D 42 00 46 42 B2 32 AA 33 32 AC C5 |.N.$.B.FB.2.32..|
00000520: 28 41 24 29 00 3F 0D 43 00 91 20 4B 20 89 37 32 |(A$).?.C.. K .72|
00000530: 2C 37 37 2C 38 32 2C 38 37 2C 39 32 2C 39 36 00 |,77,82,87,92,96.|
00000540: 47 0D 44 00 89 36 31 00 4D 0D 45 00 8F 00 63 0D |G.D..61.M.E...c.|
00000550: 46 00 8F 20 53 45 51 45 4E 54 49 41 4C 20 46 49 |F.. SEQENTIAL FI|
00000560: 4C 45 53 00 69 0D 47 00 8F 00 7B 0D 48 00 8B 57 |LES.i.G...{.H..W|
00000570: 25 28 46 42 29 B3 B1 30 A7 39 37 00 8D 0D 49 00 |%(FB)..0.97...I.|
00000580: 57 25 28 46 42 29 B2 31 32 39 29 3A 8E 00 93 0D |W%(FB).129):....|
00000590: 4A 00 8F 00 A7 0D 4B 00 8F 20 50 52 4F 47 52 41 |J.....K.. PROGRA|
000005A0: 4D 20 46 49 4C 45 53 00 AD 0D 4C 00 8F 00 BF 0D |M FILES...L.....|
000005B0: 4D 00 8B 57 25 28 46 42 29 B3 B1 30 A7 39 37 00 |M..W%(FB)..0.97.|
000005C0: D0 0D 4E 00 57 25 28 46 42 29 B2 31 33 30 3A 8E |..N.W%(FB).130:.|
000005D0: 00 D6 0D 4F 00 8F 00 E7 0D 50 00 8F 20 55 53 45 |...O.....P.. USE|
000005E0: 52 20 46 49 4C 45 53 00 ED 0D 51 00 8F 00 FF 0D |R FILES...Q.....|
000005F0: 52 00 8B 57 25 28 46 42 29 B3 B1 30 A7 39 37 00 |R..W%(FB)..0.97.|
00000600: 10 0E 53 00 57 25 28 46 42 29 B2 31 33 31 3A 8E |..S.W%(FB).131:.|
00000610: 00 16 0E 54 00 8F 00 2B 0E 55 00 8F 20 52 45 4C |...T...+.U.. REL|
00000620: 41 54 49 56 45 20 46 49 4C 45 53 00 31 0E 56 00 |ATIVE FILES.1.V.|
00000630: 8F 00 43 0E 57 00 8B 57 25 28 46 42 29 B3 B1 30 |..C.W..W%(FB)..0|
00000640: A7 39 37 00 54 0E 58 00 57 25 28 46 42 29 B2 31 |.97.T.X.W%(FB).1|
00000650: 33 32 3A 8E 00 5A 0E 59 00 8F 00 6E 0E 5A 00 8F |32:..Z.Y...n.Z..|
00000660: 20 50 52 4F 43 45 43 54 20 46 49 4C 45 53 00 74 | PROCECT FILES.t|
00000670: 0E 5B 00 8F 00 8B 0E 5C 00 57 25 28 46 42 29 B2 |.[.....\.W%(FB).|
00000680: 57 25 28 46 42 29 B0 36 34 3A 8E 00 91 0E 5D 00 |W%(FB).64:....].|
00000690: 8F 00 A7 0E 5E 00 8F 20 55 4E 50 52 4F 54 45 43 |....^.. UNPROTEC|
000006A0: 54 20 46 49 4C 45 53 00 AD 0E 5F 00 8F 00 C5 0E |T FILES..._.....|
000006B0: 60 00 57 25 28 46 42 29 B2 57 25 28 46 42 29 AF |`.W%(FB).W%(FB).|
000006C0: 31 39 31 3A 8E 00 F6 0E 61 00 99 22 49 4B 4B 45 |191:....a.."IKKE|
000006D0: 20 4C 55 4B 4B 45 44 45 20 46 49 4C 45 52 20 4B | LUKKEDE FILER K|
000006E0: 41 4E 20 49 4B 4B 45 20 55 4E 44 45 4C 45 54 45 |AN IKKE UNDELETE|
000006F0: 53 20 21 21 22 3B 00 FC 0E 62 00 8E 00 02 0F 63 |S !!";...b.....c|
00000700: 00 8F 00 22 0F 64 00 8F 20 43 48 45 43 4B 20 4F |...".d.. CHECK O|
00000710: 4D 20 44 45 52 20 45 52 20 46 4F 52 53 4B 45 4C |M DER ER FORSKEL|
00000720: 4C 45 00 28 0F 65 00 8F 00 31 0F 66 00 49 44 B2 |LE.(.e...1.f.ID.|
00000730: 31 00 3F 0F 67 00 81 4E B2 30 A4 20 32 35 35 00 |1.?.g..N.0. 255.|
00000740: 59 0F 68 00 3A 20 8B 42 4C 25 28 4E 29 B3 B1 57 |Y.h.: .BL%(N)..W|
00000750: 25 28 4E 29 A7 49 44 B2 30 00 60 0F 69 00 82 4E |%(N).ID.0.`.i..N|
00000760: 00 6E 0F 6A 00 8B 49 44 B2 31 A7 31 31 38 00 74 |.n.j..ID.1.118.t|
00000770: 0F 6B 00 8F 00 99 0F 6C 00 8F 20 42 45 4B 52 41 |.k.....l.. BEKRA|
00000780: 45 46 54 45 20 41 54 20 4F 50 44 41 54 45 52 49 |EFTE AT OPDATERI|
00000790: 4E 47 20 30 4E 53 4B 45 53 00 9F 0F 6D 00 8F 00 |NG 0NSKES...m...|
000007A0: BF 0F 6E 00 99 22 30 4E 53 4B 45 53 20 4F 50 44 |..n.."0NSKES OPD|
000007B0: 41 54 45 52 49 4E 47 20 28 4A 2F 4E 29 3F 22 00 |ATERING (J/N)?".|
000007C0: D2 0F 6F 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |..o..A$:.A$."".1|
000007D0: 31 31 00 E2 0F 70 00 8B 41 24 B2 22 4E 22 A7 31 |11...p..A$."N".1|
000007E0: 31 38 00 F3 0F 71 00 8B 41 24 B3 B1 22 4A 22 A7 |18...q..A$.."J".|
000007F0: 31 31 31 00 FC 0F 72 00 8D 31 33 38 00 02 10 73 |111...r..138...s|
00000800: 00 8F 00 23 10 74 00 8F 20 43 48 45 43 4B 20 4F |...#.t.. CHECK O|
00000810: 4D 20 44 49 52 45 43 54 4F 52 59 20 45 52 20 53 |M DIRECTORY ER S|
00000820: 4C 55 54 00 29 10 75 00 8F 00 5A 10 76 00 54 52 |LUT.).u...Z.v.TR|
00000830: B2 57 25 28 30 29 3A 8B 54 52 B2 30 A7 99 22 49 |.W%(0):.TR.0.."I|
00000840: 4B 4B 45 20 46 4C 45 52 45 20 46 49 4C 45 52 22 |KKE FLERE FILER"|
00000850: 3B C7 28 39 29 3A 89 31 35 32 00 67 10 77 00 53 |;.(9):.152.g.w.S|
00000860: 45 B2 57 25 28 31 29 00 6D 10 78 00 8E 00 A9 10 |E.W%(1).m.x.....|
00000870: 79 00 99 22 95 93 11 11 11 11 11 11 11 11 11 11 |y.."............|
00000880: 11 11 11 20 20 20 49 4E 50 55 54 20 30 4E 53 4B |... INPUT 0NSK|
00000890: 45 44 45 20 44 49 53 4B 45 54 54 45 20 46 4F 52 |EDE DISKETTE FOR|
000008A0: 20 53 4C 45 54 54 45 2D 22 00 D3 10 7A 00 99 22 | SLETTE-"...z.."|
000008B0: 20 20 20 20 20 42 45 53 4B 59 54 54 45 4C 53 45 | BESKYTTELSE|
000008C0: 20 26 20 54 41 53 54 20 53 50 41 43 45 2E 20 21 | & TAST SPACE. !|
000008D0: 21 21 22 00 F4 10 7B 00 A1 41 24 3A 8B 41 24 B3 |!!"...{..A$:.A$.|
000008E0: B1 22 20 22 A7 31 32 33 3A 8B 41 24 B2 22 20 22 |." ".123:.A$." "|
000008F0: A7 31 32 34 00 07 11 7C 00 9F 31 35 2C 38 2C 31 |.124...|..15,8,1|
00000900: 35 2C 22 49 30 3A 22 00 16 11 7D 00 9F 38 2C 38 |5,"I0:"...}..8,8|
00000910: 2C 38 2C 22 23 22 00 2D 11 7E 00 98 31 35 2C 22 |,8,"#".-.~..15,"|
00000920: 55 31 22 3B 38 3B 30 3B 54 52 3B 53 45 00 3F 11 |U1";8;0;TR;SE.?.|
00000930: 7F 00 98 31 35 2C 22 42 2D 50 22 3B 38 3B 30 00 |...15,"B-P";8;0.|
00000940: 4E 11 80 00 81 4E B2 30 20 A4 20 32 35 35 00 6A |N....N.0 . 255.j|
00000950: 11 81 00 3A 20 A1 23 38 2C 41 24 3A 8B 41 24 B2 |...: .#8,A$:.A$.|
00000960: 22 22 A7 41 24 B2 C7 28 30 29 00 7D 11 82 00 3A |"".A$..(0).}...:|
00000970: 20 42 4C 25 28 4E 29 B2 C6 28 41 24 29 00 84 11 | BL%(N)..(A$)...|
00000980: 83 00 82 4E 00 8B 11 84 00 A0 38 00 93 11 85 00 |...N......8.....|
00000990: A0 31 35 00 99 11 86 00 8E 00 9F 11 87 00 8E 00 |.15.............|
000009A0: B3 11 88 00 8F 20 53 4B 52 49 56 20 45 4E 20 42 |..... SKRIV EN B|
000009B0: 4C 4F 4B 00 B9 11 89 00 8F 00 C6 11 8A 00 9F 31 |LOK............1|
000009C0: 35 2C 38 2C 31 35 00 D5 11 8B 00 9F 38 2C 38 2C |5,8,15......8,8,|
000009D0: 38 2C 22 23 22 00 E7 11 8C 00 98 31 35 2C 22 42 |8,"#"......15,"B|
000009E0: 2D 50 22 3B 38 3B 30 00 F4 11 8D 00 81 4E B2 30 |-P";8;0......N.0|
000009F0: A4 32 35 35 00 07 12 8E 00 3A 20 98 38 2C C7 28 |.255.....: .8,.(|
00000A00: 57 25 28 4E 29 29 3B 00 25 12 8F 00 3A 20 8F 20 |W%(N));.%...: . |
00000A10: 48 4F 53 4B 20 53 45 4D 49 4B 4F 4C 4F 4E 20 21 |HOSK SEMIKOLON !|
00000A20: 21 21 21 21 21 00 2C 12 90 00 82 4E 00 43 12 91 |!!!!!.,....N.C..|
00000A30: 00 98 31 35 2C 22 55 32 22 3B 38 3B 30 3B 54 52 |..15,"U2";8;0;TR|
00000A40: 3B 53 45 00 4A 12 92 00 A0 38 00 52 12 93 00 A0 |;SE.J....8.R....|
00000A50: 31 35 00 58 12 94 00 8E 00 5E 12 95 00 8F 00 79 |15.X.....^.....y|
00000A60: 12 96 00 8F 20 4F 50 44 41 54 45 52 20 44 49 53 |.... OPDATER DIS|
00000A70: 4B 2D 49 4E 44 48 4F 4C 44 00 7F 12 97 00 8F 00 |K-INDHOLD.......|
00000A80: 9E 12 98 00 8B 41 24 B2 22 4A 22 A7 9F 31 35 2C |.....A$."J"..15,|
00000A90: 38 2C 31 35 2C 22 56 30 3A 22 3A A0 31 35 00 A4 |8,15,"V0:":.15..|
00000AA0: 12 99 00 80 00 00 00 20 |....... |
.......53280,15:.53281,15:.".".+.... TY$
(4).<...TY$(1)."SEQ".M...TY$(2)."PRG".^.
..TY$(3)."USR".O...TY$(4)."REL".U.......
... LOCK IN UPPERCACE MODE............G(
142);G(8).E.... BL%(255) :. READ-DATA...
... W%(255):. WORK-DATA.....TR.18:SE.1:.
F0RSTE SEKTOR.....OP$."SPULWNE":. OPTIO
NER.9...CL$.G(147):. CLEAR SCREEN.?.....
W.... READ (NEXT) BLOCK.].....G.... 121.
Q.... 124......FREMSTIL ARBEJDSKOPI.....
....... N.0 . 255.....: W%(N).BL%(N)....
..N......CL$;". NR LNGD FILNAVN
TYPE"......" ------------------------
---------".!.... FL.0 . 7.2...: FB.2.32.
FL.@...:." ";FL;.`. .:. W%(FB.28).256.W%
(FB.29),.U.!.:.N.FB.3 . FB.18...".: .G(W
%(N));...#.:.N...$.: ." ";...%.: .W%(FB)
. 128 .. " ";:.40.V.&.: .W%(FB).0.."--DE
L":.45...'.: ."*";...(.: .W%(FB). 64 . .
">";:.42...).: ." ";...*.: X.W%(FB).7.9
.+.: .X.4.."ERROR !!":.45.G.,.: .TY$(X).
O.-..FL.S....:..7);"ENTER N FOR NEXT BLO
CK".../...13);"E FOR EXIT"...0...10);"OR
FILENUMMER"...1..A$:.A$."".49.L.2..A$."
N".. 102:.20...3..A$."E"..110:..9);"SLUT
":.152...4..A$."0".A$."7".49...5..54:.27
.#.6..:."OPTIONER:".A.7.." S=UNDELETE TO
SEQ - ";.Z.8.."P=UNDELETE TO PRG".X.9..
" U=UNDELETE TO USR - ";...:.."L=UNDELET
E TO REL"...;.." W=WRITEPROTECT ON - ";.
H.<.."N=NO WRITEPROTECT".Z.=..B$:.B$."".
61...>.K.0...?..N.1.C(OP$)...@.: .B$.J(O
P$,N,1).K.N...A..N.$.B.FB.2.32.E(A$).?.C
.. K .72,77,82,87,92,96.G.D..61.M.E...C.
F.. SEQENTIAL FILES.I.G...{.H..W%(FB)..0
.97...I.W%(FB).129):....J.....K.. PROGRA
M FILES...L.....M..W%(FB)..0.97.P.N.W%(F
B).130:..V.O.....P.. USER FILES...Q.....
R..W%(FB)..0.97...S.W%(FB).131:....T...+
.U.. RELATIVE FILES.1.V...C.W..W%(FB)..0
.97.T.X.W%(FB).132:..Z.Y...N.Z.. PROCECT
FILES.T.[.....\.W%(FB).W%(FB).64:....].
....^.. UNPROTECT FILES..._...E.`.W%(FB)
.W%(FB).191:....A.."IKKE LUKKEDE FILER K
AN IKKE UNDELETES !!";...B.....C...".D..
CHECK OM DER ER FORSKELLE.(.E...1.F.ID.
1.?.G..N.0. 255.Y.H.: .BL%(N)..W%(N).ID.
0.`.I..N.N.J..ID.1.118.T.K.....L.. BEKRA
EFTE AT OPDATERING 0NSKES...M.....N.."0N
SKES OPDATERING (J/N)?".R.O..A$:.A$."".1
11...P..A$."N".118...Q..A$.."J".111...R.
.138...S...#.T.. CHECK OM DIRECTORY ER S
LUT.).U...Z.V.TR.W%(0):.TR.0.."IKKE FLER
E FILER";G(9):.152.G.W.SE.W%(1).M.X.....
Y.."............... INPUT 0NSKEDE DISK
ETTE FOR SLETTE-".S.Z.." BESKYTTELSE
& TAST SPACE. !!!"...{..A$:.A$.." ".123
:.A$." ".124...|..15,8,15,"I0:"...}..8,8
,8,"#".-.~..15,"U1";8;0;TR;SE.?...15,"B
-P";8;0.N....N.0 . 255.J...: .#8,A$:.A$.
"".A$.G(0).}...: BL%(N).F(A$)......N....
. 8..... 15.................. SKRIV EN B
LOK.......F....15,8,15.U....8,8,8,"#"...
...15,"B-P";8;0......N.0.255.....: .8,G(
W%(N));.%...: . HOSK SEMIKOLON !!!!!!.,.
...N.C....15,"U2";8;0;TR;SE.J... 8.R...
15.X.....^.....Y.... OPDATER DISK-INDHOL
D...........A$."J"..15,8,15,"V0:": 15..
.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL