DISK LOCK
FILE INFORMATION
FILENAME(S): DISK LOCK
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 18:12:08
APPEARS ON: 1 disk(s)
FILE HASH
3cf0963954cc5af40e8d7f06e0487114a6ead9f6fae9d9cb612df4ae4710ee94
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 35 S 2 | DISK LOCK | PRG | Sailor, Ganheden | 9 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 05 00 8D 36 30 31 30 30 3A 9C 00 26 |.......60100:..&|
00000010: 08 14 00 97 35 33 32 38 30 2C 36 3A 97 35 33 32 |....53280,6:.532|
00000020: 38 31 2C 30 3A 8C 00 4B 08 16 00 99 22 93 08 0E |81,0:..K...."...|
00000030: 9E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C4 |. .|
00000040: 49 53 4B 20 CC 4F 43 4B 45 52 22 00 6F 08 18 00 |ISK .OCKER".o...|
00000050: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 42 59 |." BY|
00000060: 20 D2 55 54 48 20 C1 2E 20 C8 49 43 4B 53 22 00 | .UTH .. .ICKS".|
00000070: 8C 08 1E 00 81 20 49 B2 30 20 A4 20 34 3A 87 20 |..... I.0 . 4:. |
00000080: 46 24 28 49 29 3A 82 3A 43 54 B2 30 00 A6 08 28 |F$(I):.:CT.0...(|
00000090: 00 83 20 44 45 4C 2C 53 45 51 2C 50 52 47 2C 55 |.. DEL,SEQ,PRG,U|
000000A0: 53 52 2C 52 45 4C 00 BE 08 32 00 81 20 49 B2 30 |SR,REL...2.. I.0|
000000B0: 20 A4 20 34 3A 87 20 4C 24 28 49 29 3A 82 00 DD | . 4:. L$(I):...|
000000C0: 08 3C 00 83 20 44 45 4C 3C 2C 53 45 51 3C 2C 50 |.<.. DEL<,SEQ<,P|
000000D0: 52 47 3C 2C 55 53 52 3C 2C 52 45 4C 3C 00 EA 08 |RG<,USR<,REL<...|
000000E0: 46 00 54 B2 31 38 3A 53 B2 31 00 15 09 50 00 99 |F.T.18:S.1...P..|
000000F0: 22 11 11 11 20 20 20 20 20 20 20 20 20 05 C4 20 |"... .. |
00000100: 9A 2D 20 CC 4F 43 4B 20 41 20 57 48 4F 4C 45 20 |.- .OCK A WHOLE |
00000110: 44 49 53 4B 22 00 39 09 52 00 99 22 20 20 20 20 |DISK".9.R.." |
00000120: 20 20 20 20 20 05 C6 20 9A 2D 20 CC 4F 43 4B 20 | .. .- .OCK |
00000130: 4F 4E 45 20 46 49 4C 45 22 00 61 09 54 00 99 22 |ONE FILE".a.T.."|
00000140: 20 20 20 20 20 20 20 20 20 05 D1 20 9A 2D 20 D1 | .. .- .|
00000150: 55 49 54 20 54 48 49 53 20 50 52 4F 47 52 41 4D |UIT THIS PROGRAM|
00000160: 22 00 8A 09 58 00 99 22 11 20 20 20 20 20 20 20 |"...X..". |
00000170: 20 20 D0 52 45 53 53 20 05 C4 9A 2C 20 05 C6 9A | .RESS ..., ...|
00000180: 2C 20 4F 52 20 05 D1 9A 2E 22 00 9C 09 5A 00 A1 |, OR ...."...Z..|
00000190: 51 24 3A 8B 51 24 B2 22 22 A7 39 30 00 B3 09 5C |Q$:.Q$."".90...\|
000001A0: 00 8B 51 24 B2 22 44 22 B0 51 24 B2 22 C4 22 A7 |..Q$."D".Q$.".".|
000001B0: 31 30 30 00 CA 09 5E 00 8B 51 24 B2 22 46 22 B0 |100...^..Q$."F".|
000001C0: 51 24 B2 22 C6 22 A7 31 30 30 00 ED 09 60 00 8B |Q$.".".100...`..|
000001D0: 51 24 B2 22 51 22 B0 51 24 B2 22 D1 22 A7 4D 4D |Q$."Q".Q$.".".MM|
000001E0: B2 2E 3A 8D 36 30 30 30 30 3A 89 39 30 00 F5 09 |..:.60000:.90...|
000001F0: 63 00 89 39 30 00 2A 0A 64 00 4D 4D B2 31 3A 99 |c..90.*.d.MM.1:.|
00000200: 22 05 11 11 C9 4E 53 45 52 54 20 44 49 53 4B 20 |"....NSERT DISK |
00000210: 54 4F 20 42 45 20 4C 4F 43 4B 45 44 20 49 4E 20 |TO BE LOCKED IN |
00000220: 44 52 49 56 45 20 41 4E 44 22 00 3E 0A 69 00 99 |DRIVE AND".>.i..|
00000230: 22 50 52 45 53 53 20 D3 D0 C1 C3 C5 2E 22 00 53 |"PRESS ......".S|
00000240: 0A 6A 00 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 |.j..A$:.A$.." ".|
00000250: 31 30 36 00 8E 0A 78 00 99 22 93 1E 22 3A 99 20 |106...x.."..":. |
00000260: A3 34 29 22 12 20 23 20 22 3B A3 38 29 22 20 C4 |.4)". # ";.8)" .|
00000270: 49 52 45 43 54 4F 52 59 20 CE 41 4D 45 20 22 3B |IRECTORY .AME ";|
00000280: A3 32 37 29 22 20 C6 49 4C 45 20 92 05 22 00 94 |.27)" .ILE .."..|
00000290: 0A 7D 00 99 00 A2 0A 82 00 9F 20 31 35 2C 38 2C |.}........ 15,8,|
000002A0: 31 35 00 AF 0A 8C 00 98 31 35 2C 22 49 30 22 00 |15......15,"I0".|
000002B0: C4 0A 96 00 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 |.....15,EN,EM$,E|
000002C0: 54 2C 45 53 00 EC 0A A0 00 8B 20 45 4E B3 B1 30 |T,ES...... EN..0|
000002D0: 20 A7 20 99 22 20 20 20 20 20 20 44 4F 53 20 45 | . ." DOS E|
000002E0: 52 52 4F 52 22 3A 89 20 31 30 35 30 00 FD 0A AA |RROR":. 1050....|
000002F0: 00 9F 20 37 2C 38 2C 37 2C 22 23 30 22 00 11 0B |.. 7,8,7,"#0"...|
00000300: B4 00 98 31 35 2C 22 55 31 22 37 3B 30 3B 54 3B |...15,"U1"7;0;T;|
00000310: 53 00 26 0B BE 00 84 31 35 2C 45 4E 2C 45 4D 24 |S.&....15,EN,EM$|
00000320: 2C 45 54 2C 45 53 00 4E 0B C8 00 8B 20 45 4E B3 |,ET,ES.N.... EN.|
00000330: B1 30 20 A7 20 99 22 20 20 20 20 20 20 44 4F 53 |.0 . ." DOS|
00000340: 20 45 52 52 4F 52 22 3A 89 20 31 30 30 30 00 6D | ERROR":. 1000.m|
00000350: 0B D2 00 98 31 35 2C 22 4D 2D 52 22 3B C7 28 30 |....15,"M-R";.(0|
00000360: 29 3B C7 28 33 29 3B C7 28 32 35 35 29 00 7B 0B |);.(3);.(255).{.|
00000370: DC 00 42 54 B2 54 3A 42 53 B2 53 00 8D 0B E6 00 |..BT.T:BS.S.....|
00000380: 98 31 35 2C 22 42 2D 50 22 3B 37 3B 30 00 98 0B |.15,"B-P";7;0...|
00000390: F0 00 A1 23 37 2C 54 24 00 AE 0B FA 00 8B 20 54 |...#7,T$...... T|
000003A0: 24 B2 22 22 20 A7 20 54 24 B2 C7 28 30 29 00 B9 |$."" . T$..(0)..|
000003B0: 0B 04 01 A1 23 37 2C 53 24 00 CF 0B 0E 01 8B 20 |....#7,S$...... |
000003C0: 53 24 B2 22 22 20 A7 20 53 24 B2 C7 28 30 29 00 |S$."" . S$..(0).|
000003D0: E3 0B 18 01 54 B2 C6 28 54 24 29 3A 53 B2 C6 28 |....T..(T$):S..(|
000003E0: 53 24 29 00 F1 0B 2C 01 81 20 49 B2 30 20 A4 20 |S$)...,.. I.0 . |
000003F0: 37 00 05 0C 36 01 98 31 35 2C 22 42 2D 50 22 3B |7...6..15,"B-P";|
00000400: 37 3B 32 AA 42 00 10 0C 40 01 A1 23 37 2C 42 24 |7;2.B...@..#7,B$|
00000410: 00 1E 0C 4A 01 81 20 4A B2 30 20 A4 20 34 00 3F |...J.. J.0 . 4.?|
00000420: 0C 54 01 8B 20 42 24 B2 C7 28 31 32 38 AA 4A 29 |.T.. B$..(128.J)|
00000430: 20 A7 20 42 24 B2 46 24 28 4A 29 3A 4A B2 34 00 | . B$.F$(J):J.4.|
00000440: 60 0C 5E 01 8B 20 42 24 B2 C7 28 31 39 32 AA 4A |`.^.. B$..(192.J|
00000450: 29 20 A7 20 42 24 B2 4C 24 28 4A 29 3A 4A B2 34 |) . B$.L$(J):J.4|
00000460: 00 68 0C 68 01 82 20 4A 00 7C 0C F4 01 98 31 35 |.h.h.. J.|....15|
00000470: 2C 22 42 2D 50 22 3B 37 3B 35 AA 42 00 8B 0C FE |,"B-P";7;5.B....|
00000480: 01 81 20 4B B2 30 20 A4 20 31 35 00 96 0C 08 02 |.. K.0 . 15.....|
00000490: A1 23 37 2C 43 24 00 AC 0C 12 02 8B 20 43 24 B2 |.#7,C$...... C$.|
000004A0: 22 22 20 A7 20 43 24 B2 C7 28 30 29 00 B8 0C 1C |"" . C$..(0)....|
000004B0: 02 43 B2 C6 28 43 24 29 00 CE 0C 26 02 8B 20 43 |.C..(C$)...&.. C|
000004C0: 24 B2 C7 28 30 29 20 A7 20 45 B2 45 AA 31 00 ED |$..(0) . E.E.1..|
000004D0: 0C 30 02 8B 20 43 B1 33 31 20 AF 20 43 B3 39 31 |.0.. C.31 . C.91|
000004E0: 20 A7 20 43 43 24 B2 43 43 24 AA 43 24 00 0B 0D | . CC$.CC$.C$...|
000004F0: 3A 02 8B 20 45 B2 31 36 20 AF 20 54 B2 30 20 A7 |:.. E.16 . T.0 .|
00000500: 20 4B B2 31 35 3A 89 20 39 39 30 00 13 0D 44 02 | K.15:. 990...D.|
00000510: 82 20 4B 00 1F 0D 4E 02 43 54 B2 43 54 AA 31 00 |. K...N.CT.CT.1.|
00000520: 54 0D 20 03 99 20 A3 34 29 43 54 3B A3 38 29 43 |T. .. .4)CT;.8)C|
00000530: 43 24 3B A3 32 38 29 42 24 3A 43 43 24 B2 C7 28 |C$;.28)B$:CC$..(|
00000540: 30 29 3A 45 B2 30 3A 44 24 B2 42 24 3A 42 24 B2 |0):E.0:D$.B$:B$.|
00000550: C7 28 30 29 00 6A 0D 2A 03 8B 20 51 24 B2 22 46 |.(0).j.*.. Q$."F|
00000560: 22 20 A7 20 8D 20 32 30 30 30 00 80 0D 34 03 8B |" . . 2000...4..|
00000570: 20 51 24 B2 22 44 22 20 A7 20 8D 20 32 30 33 30 | Q$."D" . . 2030|
00000580: 00 8B 0D 3E 03 42 B2 42 AA 33 32 00 93 0D 48 03 |...>.B.B.32...H.|
00000590: 82 20 49 00 AA 0D 52 03 8B 20 54 B3 B1 30 20 A7 |. I...R.. T..0 .|
000005A0: 20 42 B2 30 3A 89 20 31 38 30 00 D5 0D DE 03 8B | B.0:. 180......|
000005B0: 20 51 24 B2 22 44 22 20 A7 20 51 24 B2 C7 28 30 | Q$."D" . Q$..(0|
000005C0: 29 3A 42 B2 30 3A 54 B2 42 54 3A 53 B2 42 53 3A |):B.0:T.BT:S.BS:|
000005D0: 89 20 31 38 30 00 DD 0D E8 03 A0 20 37 00 F2 0D |. 180...... 7...|
000005E0: F2 03 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C |...15,EN,EM$,ET,|
000005F0: 45 53 00 FB 0D 1A 04 A0 20 31 35 00 1C 0E 24 04 |ES...... 15...$.|
00000600: 8B 20 45 4E B3 B1 30 20 A7 20 99 3A 99 3A 99 20 |. EN..0 . .:.:. |
00000610: 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 51 0E 2E |EN,EM$,ET,ES.Q..|
00000620: 04 99 22 11 9E 20 20 20 20 C5 4E 44 20 CF 46 20 |..".. .ND .F |
00000630: C4 49 52 45 43 54 4F 52 59 20 2E 2E 2E 20 D0 52 |.IRECTORY ... .R|
00000640: 45 53 53 20 D3 D0 C1 C3 C5 22 3A 97 31 39 38 2C |ESS .....":.198,|
00000650: 2E 00 67 0E 38 04 A1 41 24 3A 8B 41 24 B3 B1 22 |..g.8..A$:.A$.."|
00000660: 20 22 A7 31 30 38 30 00 6F 0E 42 04 89 32 30 00 | ".1080.o.B..20.|
00000670: A3 0E D0 07 99 20 A3 35 29 22 9A C3 48 41 4E 47 |..... .5)"..HANG|
00000680: 45 20 54 48 49 53 20 46 49 4C 45 3F 20 28 05 D9 |E THIS FILE? (..|
00000690: 9A 2F 05 CE 9A 2F 05 D1 9A 29 05 22 3A 97 31 39 |./.../...).":.19|
000006A0: 38 2C 2E 00 E1 0E D5 07 A1 41 24 3A 8B 41 24 B3 |8,.......A$:.A$.|
000006B0: B1 22 4E 22 AF 41 24 B3 B1 22 59 22 AF 41 24 B3 |."N".A$.."Y".A$.|
000006C0: B1 22 CE 22 AF 41 24 B3 B1 22 D9 22 AF 41 24 B3 |.".".A$..".".A$.|
000006D0: B1 22 51 22 AF 41 24 B3 B1 22 D1 22 A7 32 30 30 |."Q".A$..".".200|
000006E0: 35 00 F7 0E DA 07 8B 41 24 B2 22 4E 22 B0 41 24 |5......A$."N".A$|
000006F0: B2 22 CE 22 A7 20 8E 00 22 0F E4 07 8B 41 24 B2 |.".". .."....A$.|
00000700: 22 51 22 B0 41 24 B2 22 D1 22 A7 8D 36 30 30 30 |"Q".A$."."..6000|
00000710: 30 3A 8B 28 41 42 29 A7 A0 37 3A A0 31 35 3A 89 |0:.(AB)..7:.15:.|
00000720: 32 30 00 30 0F EE 07 81 20 4A B2 30 20 A4 20 34 |20.0.... J.0 . 4|
00000730: 00 51 0F F8 07 8B 20 44 24 B2 46 24 28 4A 29 20 |.Q.... D$.F$(J) |
00000740: A7 20 44 24 B2 C7 28 31 39 32 AA 4A 29 3A 4A B2 |. D$..(192.J):J.|
00000750: 34 00 72 0F 02 08 8B 20 44 24 B2 4C 24 28 4A 29 |4.r.... D$.L$(J)|
00000760: 20 A7 20 44 24 B2 C7 28 31 32 38 AA 4A 29 3A 4A | . D$..(128.J):J|
00000770: B2 34 00 7A 0F 0C 08 82 20 4A 00 8E 0F 16 08 98 |.4.z.... J......|
00000780: 31 35 2C 22 42 2D 50 22 3B 37 3B 32 AA 42 00 99 |15,"B-P";7;2.B..|
00000790: 0F 20 08 98 37 2C 44 24 3B 00 AF 0F 2A 08 98 31 |. ..7,D$;...*..1|
000007A0: 35 2C 22 55 32 22 37 3B 30 3B 42 54 3B 42 53 00 |5,"U2"7;0;BT;BS.|
000007B0: E4 0F B8 0B 8B 20 45 4E B3 B1 30 30 20 A7 20 99 |..... EN..00 . .|
000007C0: 3A 99 22 20 20 44 49 53 4B 20 20 45 52 52 4F 52 |:." DISK ERROR|
000007D0: 22 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A 89 20 |"EN,EM$,ET,ES:. |
000007E0: 31 30 30 30 00 F8 0F C2 0B 98 31 35 2C 22 42 2D |1000......15,"B-|
000007F0: 50 22 3B 37 3B 35 AA 42 00 FE 0F CC 0B 8E 00 3F |P";7;5.B.......?|
00000800: 10 60 EA 41 42 B2 2E 3A 99 22 11 20 20 9A C1 52 |.`.AB..:.". ..R|
00000810: 45 20 59 4F 55 20 53 55 52 45 20 59 4F 55 20 57 |E YOU SURE YOU W|
00000820: 41 4E 54 20 54 4F 20 51 55 49 54 3F 20 28 05 D9 |ANT TO QUIT? (..|
00000830: 9A 2F 05 CE 9A 29 05 22 3A 97 31 39 38 2C 2E 00 |./...).":.198,..|
00000840: 6E 10 6A EA A1 41 24 3A 8B 41 24 B3 B1 22 4E 22 |n.j..A$:.A$.."N"|
00000850: AF 41 24 B3 B1 22 CE 22 AF 41 24 B3 B1 22 59 22 |.A$..".".A$.."Y"|
00000860: AF 41 24 B3 B1 22 D9 22 A7 36 30 30 31 30 00 8D |.A$..".".60010..|
00000870: 10 74 EA 8B 41 24 B2 22 59 22 B0 41 24 B2 22 D9 |.t..A$."Y".A$.".|
00000880: 22 A7 41 42 B2 31 3A 89 36 30 30 34 30 00 C0 10 |".AB.1:.60040...|
00000890: 7E EA 99 22 91 20 20 20 20 20 20 20 20 20 20 20 |~..". |
000008A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008B0: 20 20 20 20 20 20 20 20 20 20 20 91 91 22 3A 8E | ..":.|
000008C0: 00 CC 10 88 EA 8B 28 4D 4D 29 A7 8E 00 09 11 8D |......(MM)......|
000008D0: EA A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C 22 52 |..15:.15,8,15,"R|
000008E0: 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 3D |0:HELLO CONNECT=|
000008F0: 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A 84 |HELLO CONNECT":.|
00000900: 31 35 2C 45 52 3A A0 31 35 00 17 11 92 EA 8B 45 |15,ER:.15......E|
00000910: 52 B3 B1 36 33 A7 80 00 2E 11 9C EA 93 22 48 45 |R..63........"HE|
00000920: 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 2C 38 00 44 |LLO CONNECT",8.D|
00000930: 11 C4 EA 97 35 33 32 38 30 2C 36 3A 97 35 33 32 |....53280,6:.532|
00000940: 38 31 2C 33 00 79 11 CE EA 99 22 93 08 0E 1C B0 |81,3.y....".....|
00000950: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000960: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000970: C0 C0 C0 C0 C0 C0 AE 22 3B 00 94 11 D8 EA 81 41 |.......";......A|
00000980: B2 31 A4 32 33 3A 99 22 DD 22 A6 33 38 29 22 DD |.1.23:.".".38)".|
00000990: 22 3B 3A 82 00 C7 11 E2 EA 99 22 AD C0 C0 C0 C0 |";:.......".....|
000009A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009C0: C0 BD 9D 94 C0 13 22 00 F0 11 EC EA 99 22 13 11 |......"......"..|
000009D0: 11 1D 95 20 20 20 20 20 20 20 20 20 20 CC CF C1 |... ...|
000009E0: C4 D3 D4 C1 D2 20 D0 52 45 53 45 4E 54 53 3A 22 |..... .RESENTS:"|
000009F0: 00 28 12 F1 EA 99 22 11 11 11 11 1D 20 20 20 20 |.(...."..... |
00000A00: 20 20 20 20 20 20 05 12 20 20 20 20 20 20 20 20 | .. |
00000A10: 20 20 20 20 20 20 20 20 20 20 92 20 20 20 20 20 | . |
00000A20: 20 20 20 20 20 1D 22 3B 00 5D 12 F6 EA 99 22 1D | .";.]....".|
00000A30: 20 20 20 20 20 20 20 20 20 20 05 12 20 20 20 C4 | .. .|
00000A40: 49 53 4B 20 CC 4F 43 4B 45 52 20 20 20 20 9A 20 |ISK .OCKER . |
00000A50: 92 20 20 20 20 20 20 20 20 20 1D 22 3B 00 92 12 |. .";...|
00000A60: FB EA 99 22 1D 20 20 20 20 20 20 20 20 20 20 05 |...". .|
00000A70: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000A80: 20 20 20 9A 20 92 20 20 20 20 20 20 20 20 20 1D | . . .|
00000A90: 22 3B 00 C7 12 00 EB 99 22 1D 20 20 20 20 20 20 |";......". |
00000AA0: 20 20 20 20 05 12 20 20 20 C2 59 20 D2 55 54 48 | .. .Y .UTH|
00000AB0: 20 C8 49 43 4B 53 20 20 9A 20 92 20 20 20 20 20 | .ICKS . . |
00000AC0: 20 20 20 20 1D 22 3B 00 FC 12 05 EB 99 22 1D 20 | .";......". |
00000AD0: 20 20 20 20 20 20 20 20 20 05 12 20 20 20 20 20 | .. |
00000AE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 9A 20 92 | . .|
00000AF0: 20 20 20 20 20 20 20 20 20 1D 22 3B 00 31 13 0A | .";.1..|
00000B00: EB 99 22 1D 20 20 20 20 20 20 20 20 20 20 05 12 |..". ..|
00000B10: 20 28 C3 29 4F 50 59 52 49 47 48 54 20 31 39 38 | (.)OPYRIGHT 198|
00000B20: 37 20 9A 20 92 20 20 20 20 20 20 20 20 20 1D 22 |7 . . ."|
00000B30: 3B 00 66 13 0C EB 99 22 1D 20 20 20 20 20 20 20 |;.f....". |
00000B40: 20 20 20 05 12 20 20 20 20 20 20 20 20 20 20 20 | .. |
00000B50: 20 20 20 20 20 20 20 9A 20 92 20 20 20 20 20 20 | . . |
00000B60: 20 20 20 1D 22 3B 00 8F 13 0F EB 99 22 1D 20 20 | .";......". |
00000B70: 20 20 20 20 20 20 20 20 20 12 9A 20 20 20 20 20 | .. |
00000B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 00 | .".|
00000B90: BE 13 14 EB 99 22 11 11 11 11 11 1D 95 20 20 20 |....."....... |
00000BA0: 20 20 20 20 20 D0 52 45 53 53 20 D3 D0 C1 C3 C5 | .RESS .....|
00000BB0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 00 D5 | TO CONTINUE."..|
00000BC0: 13 1E EB A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 |....A$:.A$.." ".|
00000BD0: 36 30 31 39 30 00 DB 13 23 EB 8E 00 00 00 |60190...#..... |
.......60100:..&....53280,6:.53281,0:..K
....".... DISK LOCKER".O...
." BY RUTH A. HICKS"...... I.
0 . 4:. F$(I):.:CT.0...(.. DEL,SEQ,PRG,U
SR,REL...2.. I.0 . 4:. L$(I):....<.. DEL
<,SEQ<,PRG<,USR<,REL<...F.T.18:S.1...P..
"... .D .- LOCK A WHOLE DISK".9.
R.." .F .- LOCK ONE FILE".A.T.."
.Q .- QUIT THIS PROGRAM"...X.."
. PRESS .D., .F., OR .Q.."...Z..
Q$:.Q$."".90...\..Q$."D".Q$."D".100.J.^.
.Q$."F".Q$."F".100...`..Q$."Q".Q$."Q".MM
..:.60000:.90...C..90.*.D.MM.1:."...INSE
RT DISK TO BE LOCKED IN DRIVE AND".>.I..
"PRESS SPACE.".S.J..A$:.A$.." ".106...X.
."..":. .4)". # ";.8)" DIRECTORY NAME ";
.27)" FILE .."...}........ 15,8,15......
15,"I0".D....15,EN,EM$,ET,ES... .. EN..0
. ." DOS ERROR":. 1050...... 7,8,7
,"#0"......15,"U1"7;0;T;S.&....15,EN,EM$
,ET,ES.N.H.. EN..0 . ." DOS ERROR":
. 1000.M.R..15,"M-R";G(0);G(3);G(255).{.
..BT.T:BS.S......15,"B-P";7;0......#7,T$
...... T$."" . T$.G(0)......#7,S$.O....
S$."" . S$.G(0).....T.F(T$):S.F(S$)...,.
. I.0 . 7...6..15,"B-P";7;2.B...@..#7,B$
...J.. J.0 . 4.?.T.. B$.G(128.J) . B$.F$
(J):J.4.`.^.. B$.G(192.J) . B$.L$(J):J.4
.H.H.. J.|....15,"B-P";7;5.B...... K.0 .
15......#7,C$...... C$."" . C$.G(0)....
.C.F(C$).N.&.. C$.G(0) . E.E.1...0.. C.3
1 . C.91 . CC$.CC$.C$...:.. E.16 . T.0 .
K.15:. 990...D.. K...N.CT.CT.1.T. .. .4
)CT;.8)CC$;.28)B$:CC$.G(0):E.0:D$.B$:B$.
G(0).J.*.. Q$."F" . . 2000...4.. Q$."D"
. . 2030...>.B.B.32...H.. I...R.. T..0 .
B.0:. 180.U.... Q$."D" . Q$.G(0):B.0:T.
BT:S.BS:. 180..... 7......15,EN,EM$,ET,
ES..... 15...$.. EN..0 . .:.:. EN,EM$,E
T,ES.Q....".. END OF DIRECTORY ... PR
ESS SPACE":.198,..G.8..A$:.A$.." ".1080.
O.B..20...P.. .5)".CHANGE THIS FILE? (.Y
./.N./.Q.).":.198,....U..A$:.A$.."N".A$.
."Y".A$.."N".A$.."Y".A$.."Q".A$.."Q".200
5...Z..A$."N".A$."N". .."....A$."Q".A$."
Q"..60000:.(AB). 7: 15:.20.0.... J.0 . 4
.Q.... D$.F$(J) . D$.G(192.J):J.4.R....
D$.L$(J) . D$.G(128.J):J.4.Z.... J......
15,"B-P";7;2.B... ..7,D$;...*..15,"U2"7;
0;BT;BS...... EN..00 . .:." DISK ERROR
"EN,EM$,ET,ES:. 1000...B..15,"B-P";7;5.B
...L...?.`.AB..:.". .ARE YOU SURE YOU W
ANT TO QUIT? (.Y./.N.).":.198,..N.J..A$:
.A$.."N".A$.."N".A$.."Y".A$.."Y".60010..
.T..A$."Y".A$."Y".AB.1:.60040...~..".
..":.
.L....(MM)....... 15:.15,8,15,"R0:HELLO
CONNECT=HELLO CONNECT":.15,ER: 15......E
R..63........"HELLO CONNECT",8.D.D..5328
0,6:.53281,3.Y.N..".....................
.......................";...X..A.1.23:."
.".38)".";:..G....".....................
......................"......".....
LOADSTAR PRESENTS:".(....".....
.. . .";
.]....". .. DISK LOCKER .
. .";......". ..
. . .";.G....".
.. BY RUTH HICKS . . .";.
.....". .. . .
.";.1....". .. (C)OPYR
IGHT 1987 . . .";.F....".
.. . . .";..
....". .. .".
....."....... PRESS SPACE TO CONT
INUE.".U....A$:.A$.." ".60190...#.....
> CLICK IMAGE PREVIEW FOR FULL MODAL