CD BLOCKS FREE
FILE INFORMATION
FILENAME(S): CD BLOCKS FREE
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 21:10:22
APPEARS ON: 1 disk(s)
FILE HASH
e5954b458dd82fc53fcf3ab3bb90b78be1a8eab3e7d65380db1470784558a98b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NEW WAVE INT | CD BLOCKS FREE | PRG | DuncanTwain | 3 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |.......*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000020: 3D 08 14 00 8F 2A 2A 2A 44 49 53 4B 20 46 49 4C |=....***DISK FIL|
00000030: 45 20 53 26 54 20 56 32 2E 30 2A 2A 2A 00 5B 08 |E S&T V2.0***.[.|
00000040: 1E 00 8F 2A 2A 2A 28 43 29 20 31 39 38 36 20 53 |...***(C) 1986 S|
00000050: 54 4F 41 54 53 4F 46 54 2A 2A 2A 00 7A 08 28 00 |TOATSOFT***.z.(.|
00000060: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A CC 00 80 08 32 00 3A |*********....2.:|
00000080: 00 8A 08 3C 00 9E 35 35 35 39 00 CF 08 46 00 97 |...<..5559...F..|
00000090: 38 30 38 2C 32 32 35 3A 4D 25 B2 35 30 30 3A 86 |808,225:M%.500:.|
000000A0: 4E 24 28 4D 25 29 2C 53 24 28 4D 25 29 3A 55 25 |N$(M%),S$(M%):U%|
000000B0: B2 30 3A 9F 31 35 2C 38 2C 31 35 3A 97 35 33 32 |.0:.15,8,15:.532|
000000C0: 38 30 2C 31 32 3A 97 35 33 32 38 31 2C 31 32 00 |80,12:.53281,12.|
000000D0: E7 08 50 00 99 22 90 93 11 8E 08 31 2E 20 41 55 |..P..".....1. AU|
000000E0: 54 4F 20 41 44 44 22 00 FC 08 5A 00 99 22 32 2E |TO ADD"...Z.."2.|
000000F0: 20 46 49 4E 44 20 53 50 41 43 45 22 00 10 09 64 | FIND SPACE"...d|
00000100: 00 99 22 33 2E 20 44 49 52 45 43 54 4F 52 59 22 |.."3. DIRECTORY"|
00000110: 00 28 09 6E 00 99 22 34 2E 20 44 45 4C 45 54 45 |.(.n.."4. DELETE|
00000120: 20 41 20 44 49 53 4B 22 00 3C 09 78 00 99 22 35 | A DISK".<.x.."5|
00000130: 2E 20 4C 4F 41 44 20 46 49 4C 45 22 00 50 09 82 |. LOAD FILE".P..|
00000140: 00 99 22 36 2E 20 53 41 56 45 20 46 49 4C 45 22 |.."6. SAVE FILE"|
00000150: 00 6A 09 8C 00 99 22 37 2E 20 43 48 41 4E 47 45 |.j...."7. CHANGE|
00000160: 20 41 4E 20 45 4E 54 52 59 22 00 7E 09 96 00 99 | AN ENTRY".~....|
00000170: 22 38 2E 20 56 49 45 57 20 46 49 4C 45 22 00 8D |"8. VIEW FILE"..|
00000180: 09 A0 00 99 22 39 2E 20 51 55 49 54 22 00 AA 09 |...."9. QUIT"...|
00000190: AA 00 99 22 11 1D 9E 43 48 4F 4F 53 45 20 31 2D |..."...CHOOSE 1-|
000001A0: 39 90 22 3A 97 31 39 38 2C 30 00 BD 09 B4 00 A1 |9.":.198,0......|
000001B0: 41 24 3A 8B 41 24 B2 22 22 A7 31 38 30 00 D5 09 |A$:.A$."".180...|
000001C0: BE 00 41 25 B2 B6 28 C6 28 41 24 29 AB 34 38 29 |..A%..(.(A$).48)|
000001D0: 3A 99 22 93 22 00 05 0A C8 00 91 41 25 8D 31 33 |:."."......A%.13|
000001E0: 31 30 2C 32 33 30 2C 31 36 35 30 2C 35 31 30 2C |10,230,1650,510,|
000001F0: 36 38 30 2C 38 34 30 2C 39 37 30 2C 31 31 39 30 |680,840,970,1190|
00000200: 2C 31 36 32 30 00 0D 0A D2 00 89 38 30 00 13 0A |,1620......80...|
00000210: DC 00 3A 00 1F 0A E6 00 8B 55 25 B2 30 A7 8E 00 |..:......U%.0...|
00000220: 4D 0A F0 00 85 20 22 90 20 45 4E 54 45 52 20 54 |M.... ". ENTER T|
00000230: 4F 54 41 4C 20 46 49 4C 45 20 53 49 5A 45 20 49 |OTAL FILE SIZE I|
00000240: 4E 20 42 4C 4F 43 4B 53 20 22 3B 46 24 00 69 0A |N BLOCKS ";F$.i.|
00000250: FA 00 5A 25 B2 C3 28 46 24 29 3A 8B 5A 25 B3 31 |..Z%..(F$):.Z%.1|
00000260: B0 5A 25 B1 33 A7 32 33 30 00 81 0A 04 01 46 24 |.Z%.3.230.....F$|
00000270: B2 C8 28 22 30 30 30 22 2C 33 AB 5A 25 29 AA 46 |..("000",3.Z%).F|
00000280: 24 00 A0 0A 0E 01 56 25 B2 C5 28 46 24 29 3A 42 |$.....V%..(F$):B|
00000290: 25 B2 36 36 34 3A 44 24 B2 22 22 3A 4E 25 B2 30 |%.664:D$."":N%.0|
000002A0: 00 B5 0A 18 01 8B 56 25 B3 30 B0 56 25 B1 36 36 |......V%.0.V%.66|
000002B0: 34 A7 32 33 30 00 C4 0A 22 01 81 5A B2 55 25 A4 |4.230..."..Z.U%.|
000002C0: 31 A9 AB 31 00 D7 0A 2C 01 44 25 B2 C5 28 53 24 |1..1...,.D%..(S$|
000002D0: 28 5A 29 29 AB 56 25 00 E5 0A 36 01 8B 44 25 B3 |(Z)).V%...6..D%.|
000002E0: 30 A7 33 33 30 00 04 0B 40 01 8B 44 25 B3 42 25 |0.330...@..D%.B%|
000002F0: A7 42 25 B2 44 25 3A 44 24 B2 4E 24 28 5A 29 3A |.B%.D%:D$.N$(Z):|
00000300: 4E 25 B2 5A 00 0A 0B 4A 01 82 00 18 0B 54 01 8B |N%.Z...J.....T..|
00000310: 4E 25 B2 30 A7 34 37 30 00 49 0B 5E 01 99 22 11 |N%.0.470.I.^..".|
00000320: 11 20 42 45 53 54 20 50 4C 41 43 45 20 46 4F 52 |. BEST PLACE FOR|
00000330: 20 54 48 49 53 20 22 46 24 22 20 42 4C 4F 43 4B | THIS "F$" BLOCK|
00000340: 20 46 49 4C 45 20 49 53 22 00 6B 0B 68 01 99 22 | FILE IS".k.h.."|
00000350: 11 20 4F 4E 20 54 48 45 20 44 49 53 4B 20 4E 41 |. ON THE DISK NA|
00000360: 4D 45 44 20 27 22 44 24 22 27 22 00 91 0B 72 01 |MED '"D$"'"...r.|
00000370: 99 22 20 57 48 49 43 48 20 49 53 20 4E 4F 2E 22 |." WHICH IS NO."|
00000380: 4E 25 22 49 4E 20 54 48 49 53 20 46 49 4C 45 2E |N%"IN THIS FILE.|
00000390: 22 00 BA 0B 7C 01 99 22 11 20 54 48 49 53 20 57 |"...|..". THIS W|
000003A0: 49 4C 4C 20 4C 45 41 56 45 22 42 25 22 42 4C 4F |ILL LEAVE"B%"BLO|
000003B0: 43 4B 53 20 46 52 45 45 2E 22 00 D6 0B 86 01 99 |CKS FREE."......|
000003C0: 22 11 20 41 4D 4D 45 4E 44 20 4E 4F 57 20 3C 59 |". AMMEND NOW <Y|
000003D0: 2F 4E 3E 20 3F 22 00 E9 0B 90 01 A1 41 24 3A 8B |/N> ?"......A$:.|
000003E0: 41 24 B2 22 22 A7 34 30 30 00 F7 0B 9A 01 8B 41 |A$."".400......A|
000003F0: 24 B2 22 4E 22 A7 8E 00 35 0C A4 01 5A 24 B2 CA |$."N"...5...Z$..|
00000400: 28 C4 28 42 25 29 2C 32 29 3A 4C 25 B2 C3 28 5A |(.(B%),2):L%..(Z|
00000410: 24 29 3A 5A 24 B2 C8 28 22 30 30 30 22 2C 33 AB |$):Z$..("000",3.|
00000420: 4C 25 29 AA 5A 24 3A 53 24 28 4E 25 29 B2 5A 24 |L%).Z$:S$(N%).Z$|
00000430: 3A 43 25 B2 31 00 48 0C AE 01 99 22 11 20 41 4D |:C%.1.H....". AM|
00000440: 4D 45 4E 44 45 44 2E 22 00 6D 0C B8 01 99 22 11 |MENDED.".m....".|
00000450: 11 11 1D 50 52 45 53 53 20 41 4E 59 20 4B 45 59 |...PRESS ANY KEY|
00000460: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 80 0C | TO CONTINUE"...|
00000470: C2 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 35 30 |...A$:.A$."".450|
00000480: 00 86 0C CC 01 8E 00 B6 0C D6 01 99 22 11 20 54 |............". T|
00000490: 48 49 53 20 52 45 43 4F 52 44 20 57 49 4C 4C 20 |HIS RECORD WILL |
000004A0: 4E 4F 54 20 46 49 54 20 41 4E 59 20 44 49 53 4B |NOT FIT ANY DISK|
000004B0: 53 20 49 4E 20 22 00 CA 0C E0 01 99 22 11 20 54 |S IN "......". T|
000004C0: 48 49 53 20 46 49 4C 45 2E 22 00 D3 0C EA 01 89 |HIS FILE."......|
000004D0: 34 34 30 00 D9 0C F4 01 3A 00 E5 0C FE 01 8B 55 |440.....:......U|
000004E0: 25 B2 30 A7 8E 00 FA 0C 08 02 99 22 20 44 45 4C |%.0........" DEL|
000004F0: 45 54 45 20 44 49 53 4B 53 22 00 0D 0D 12 02 85 |ETE DISKS"......|
00000500: 20 22 11 20 46 52 4F 4D 20 22 3B 46 25 00 1F 0D | ". FROM ";F%...|
00000510: 1C 02 85 20 22 20 20 54 4F 20 20 22 3B 54 25 00 |... " TO ";T%.|
00000520: 31 0D 26 02 8B 46 25 B3 30 B0 54 25 B1 55 25 A7 |1.&..F%.0.T%.U%.|
00000530: 8E 00 3E 0D 30 02 8B 54 25 B3 46 25 A7 8E 00 52 |..>.0..T%.F%...R|
00000540: 0D 3A 02 99 22 11 20 4F 4B 20 3C 59 2F 4E 3E 20 |.:..". OK <Y/N> |
00000550: 3F 22 00 65 0D 44 02 A1 41 24 3A 8B 41 24 B2 22 |?".e.D..A$:.A$."|
00000560: 22 A7 35 38 30 00 75 0D 4E 02 8B 41 24 B2 22 59 |".580.u.N..A$."Y|
00000570: 22 A7 36 31 30 00 7B 0D 58 02 8E 00 8F 0D 62 02 |".610.{.X.....b.|
00000580: 55 25 B2 55 25 AB 28 54 25 AB 46 25 AA 31 29 00 |U%.U%.(T%.F%.1).|
00000590: 9E 0D 6C 02 81 5A B2 54 25 AA 31 A4 55 25 00 BC |..l..Z.T%.1.U%..|
000005A0: 0D 76 02 4E 24 28 46 25 29 B2 4E 24 28 5A 29 3A |.v.N$(F%).N$(Z):|
000005B0: 53 24 28 46 25 29 B2 53 24 28 5A 29 00 C8 0D 80 |S$(F%).S$(Z)....|
000005C0: 02 46 25 B2 46 25 AA 31 00 D3 0D 8A 02 82 3A 43 |.F%.F%.1......:C|
000005D0: 25 B2 31 00 D9 0D 94 02 8E 00 DF 0D 9E 02 3A 00 |%.1...........:.|
000005E0: F9 0D A8 02 85 20 22 4C 4F 41 44 20 46 49 4C 45 |..... "LOAD FILE|
000005F0: 4E 41 4D 45 20 22 3B 46 24 00 14 0E B2 02 4C 25 |NAME ";F$.....L%|
00000600: B2 C3 28 46 24 29 3A 8B 4C 25 B3 31 B0 4C 25 B1 |..(F$):.L%.1.L%.|
00000610: 31 32 A7 8E 00 36 0E BC 02 98 31 35 2C 22 49 30 |12...6....15,"I0|
00000620: 22 3A 9F 32 2C 38 2C 32 2C 46 24 AA 22 20 43 2F |":.2,8,2,F$." C/|
00000630: 44 2C 53 2C 52 22 00 57 0E C6 02 84 31 35 2C 41 |D,S,R".W....15,A|
00000640: 24 2C 42 24 2C 43 24 2C 44 24 3A 8B 41 24 B1 22 |$,B$,C$,D$:.A$."|
00000650: 30 30 22 A7 37 39 30 00 61 0E D0 02 84 32 2C 55 |00".790.a....2,U|
00000660: 25 00 7E 0E DA 02 99 22 11 22 55 25 22 52 45 43 |%.~...."."U%"REC|
00000670: 4F 52 44 53 20 54 4F 20 4C 4F 41 44 2E 22 00 8A |ORDS TO LOAD."..|
00000680: 0E E4 02 81 5A B2 31 A4 55 25 00 9D 0E EE 02 84 |....Z.1.U%......|
00000690: 32 2C 4E 24 28 5A 29 2C 53 24 28 5A 29 00 A8 0E |2,N$(Z),S$(Z)...|
000006A0: F8 02 82 3A 43 25 B2 30 00 AF 0E 02 03 A0 32 00 |...:C%.0......2.|
000006B0: C3 0E 0C 03 84 31 35 2C 41 24 2C 42 24 2C 43 24 |.....15,A$,B$,C$|
000006C0: 2C 44 24 00 DC 0E 16 03 99 22 11 22 41 24 22 20 |,D$......"."A$" |
000006D0: 22 42 24 3A 99 43 24 22 20 22 44 24 00 FF 0E 20 |"B$:.C$" "D$... |
000006E0: 03 99 22 11 20 50 52 45 53 53 20 41 4E 59 20 4B |..". PRESS ANY K|
000006F0: 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 |EY TO CONTINUE".|
00000700: 12 0F 2A 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 38 |..*..A$:.A$."".8|
00000710: 31 30 00 18 0F 34 03 8E 00 1E 0F 3E 03 3A 00 2A |10...4.....>.:.*|
00000720: 0F 48 03 8B 55 25 B2 30 A7 8E 00 44 0F 52 03 85 |.H..U%.0...D.R..|
00000730: 20 22 53 41 56 45 20 46 49 4C 45 4E 41 4D 45 20 | "SAVE FILENAME |
00000740: 22 3B 46 24 00 5F 0F 5C 03 4C 25 B2 C3 28 46 24 |";F$._.\.L%..(F$|
00000750: 29 3A 8B 4C 25 B3 31 B0 4C 25 B1 31 32 A7 8E 00 |):.L%.1.L%.12...|
00000760: 87 0F 66 03 98 31 35 2C 22 49 30 22 3A 9F 32 2C |..f..15,"I0":.2,|
00000770: 38 2C 32 2C 22 40 30 3A 22 AA 46 24 AA 22 20 43 |8,2,"@0:".F$." C|
00000780: 2F 44 2C 53 2C 57 22 00 A8 0F 70 03 84 31 35 2C |/D,S,W"...p..15,|
00000790: 41 24 2C 42 24 2C 43 24 2C 44 24 3A 8B 41 24 B1 |A$,B$,C$,D$:.A$.|
000007A0: 22 30 30 22 A7 37 39 30 00 C5 0F 7A 03 99 22 11 |"00".790...z..".|
000007B0: 22 55 25 22 52 45 43 4F 52 44 53 20 54 4F 20 53 |"U%"RECORDS TO S|
000007C0: 41 56 45 2E 22 00 CF 0F 84 03 98 32 2C 55 25 00 |AVE."......2,U%.|
000007D0: DB 0F 8E 03 81 5A B2 31 A4 55 25 00 E8 0F 98 03 |.....Z.1.U%.....|
000007E0: 98 32 2C 4E 24 28 5A 29 00 F5 0F A2 03 98 32 2C |.2,N$(Z)......2,|
000007F0: 53 24 28 5A 29 00 00 10 AC 03 82 3A 43 25 B2 30 |S$(Z)......:C%.0|
00000800: 00 09 10 B6 03 89 37 37 30 00 0F 10 C0 03 3A 00 |......770.....:.|
00000810: 1B 10 CA 03 8B 55 25 B2 30 A7 8E 00 46 10 D4 03 |.....U%.0...F...|
00000820: 99 22 93 11 20 43 48 41 4E 47 45 20 57 48 49 43 |.".. CHANGE WHIC|
00000830: 48 20 45 4E 54 52 59 20 28 20 31 20 54 4F 22 55 |H ENTRY ( 1 TO"U|
00000840: 25 22 29 20 22 3B 00 4F 10 DE 03 85 20 5A 25 00 |%") ";.O.... Z%.|
00000850: 61 10 E8 03 8B 5A 25 B3 31 B0 5A 25 B1 55 25 A7 |a....Z%.1.Z%.U%.|
00000860: 8E 00 83 10 F2 03 99 22 11 11 20 44 49 53 4B 20 |.......".. DISK |
00000870: 4E 41 4D 45 20 20 3D 20 20 20 22 3B 4E 24 28 5A |NAME = ";N$(Z|
00000880: 25 29 3B 00 A4 10 FC 03 85 20 22 9D 9D 9D 9D 9D |%);...... ".....|
00000890: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000008A0: 22 3B 5A 24 00 B4 10 06 04 8B 5A 24 B2 22 22 A7 |";Z$......Z$."".|
000008B0: 31 31 30 30 00 E6 10 10 04 4C 25 B2 C3 28 5A 24 |1100.....L%..(Z$|
000008C0: 29 3A 5A 24 B2 5A 24 AA C8 28 22 2E 2E 2E 2E 2E |):Z$.Z$..(".....|
000008D0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 2E 2E 22 2C |........... ..",|
000008E0: 31 39 AB 4C 25 29 00 05 11 1A 04 54 24 B2 22 22 |19.L%).....T$.""|
000008F0: 3A 81 5A B2 31 A4 31 39 3A 43 24 B2 CA 28 5A 24 |:.Z.1.19:C$..(Z$|
00000900: 2C 5A 2C 31 29 00 1C 11 24 04 8B 5A B2 31 37 A7 |,Z,1)...$..Z.17.|
00000910: 43 24 B2 22 20 22 3A 89 31 30 38 30 00 2F 11 2E |C$." ":.1080./..|
00000920: 04 8B 43 24 B2 22 20 22 A7 43 24 B2 22 2E 22 00 |..C$." ".C$.".".|
00000930: 44 11 38 04 54 24 B2 54 24 AA 43 24 3A 82 3A 5A |D.8.T$.T$.C$:.:Z|
00000940: 24 B2 54 24 00 57 11 42 04 4E 24 28 5A 25 29 B2 |$.T$.W.B.N$(Z%).|
00000950: 5A 24 3A 43 25 B2 31 00 86 11 4C 04 99 22 11 11 |Z$:C%.1...L.."..|
00000960: 20 42 4C 4F 43 4B 53 20 46 52 45 45 20 3D 20 20 | BLOCKS FREE = |
00000970: 20 22 3B 53 24 28 5A 25 29 3B 3A 85 22 9D 9D 9D | ";S$(Z%);:."...|
00000980: 9D 9D 22 3B 59 24 00 96 11 56 04 8B 5A 24 B2 22 |..";Y$...V..Z$."|
00000990: 22 A7 31 31 34 30 00 B7 11 60 04 4C 25 B2 C3 28 |".1140...`.L%..(|
000009A0: 59 24 29 3A 59 24 B2 C8 28 22 30 30 30 22 2C 33 |Y$):Y$..("000",3|
000009B0: AB 4C 25 29 AA 59 24 00 CA 11 6A 04 53 24 28 5A |.L%).Y$...j.S$(Z|
000009C0: 25 29 B2 59 24 3A 43 25 B2 31 00 E2 11 74 04 99 |%).Y$:C%.1...t..|
000009D0: 22 11 11 1D 1D 4D 4F 52 45 20 3C 59 2F 4E 3E 20 |"....MORE <Y/N> |
000009E0: 3F 22 00 F6 11 7E 04 A1 41 24 3A 8B 41 24 B2 22 |?"...~..A$:.A$."|
000009F0: 22 A7 31 31 35 30 00 06 12 88 04 8B 41 24 B2 22 |".1150......A$."|
00000A00: 59 22 A7 39 38 30 00 0C 12 92 04 8E 00 12 12 9C |Y".980..........|
00000A10: 04 3A 00 1E 12 A6 04 8B 55 25 B2 30 A7 8E 00 2A |.:......U%.0...*|
00000A20: 12 B0 04 81 5A B2 31 A4 55 25 00 42 12 BA 04 99 |....Z.1.U%.B....|
00000A30: 5A A3 35 29 4E 24 28 5A 29 A3 32 35 29 53 24 28 |Z.5)N$(Z).25)S$(|
00000A40: 5A 29 00 4A 12 C4 04 A1 41 24 00 5C 12 CE 04 8B |Z).J....A$.\....|
00000A50: 41 24 B2 22 85 22 A7 8D 31 32 38 30 00 62 12 D8 |A$."."..1280.b..|
00000A60: 04 82 00 85 12 E2 04 99 22 11 20 50 52 45 53 53 |........". PRESS|
00000A70: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT|
00000A80: 49 4E 55 45 22 00 99 12 EC 04 A1 41 24 3A 8B 41 |INUE"......A$:.A|
00000A90: 24 B2 22 22 A7 31 32 36 30 00 9F 12 F6 04 8E 00 |$."".1260.......|
00000AA0: B5 12 00 05 A1 41 24 3A 8B 41 24 B3 B1 22 88 22 |.....A$:.A$.."."|
00000AB0: A7 31 32 38 30 00 BB 12 0A 05 8E 00 C1 12 14 05 |.1280...........|
00000AC0: 3A 00 E9 12 1E 05 99 22 93 20 49 4E 53 45 52 54 |:......". INSERT|
00000AD0: 20 44 49 53 4B 20 54 48 45 4E 20 50 52 45 53 53 | DISK THEN PRESS|
00000AE0: 20 41 4E 59 20 4B 45 59 22 00 02 13 28 05 97 31 | ANY KEY"...(..1|
00000AF0: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 97 31 39 38 |98,0:.198,1:.198|
00000B00: 2C 30 00 1A 13 32 05 98 31 35 2C 22 49 30 22 3A |,0...2..15,"I0":|
00000B10: 9F 32 2C 38 2C 32 2C 22 23 22 00 41 13 3C 05 98 |.2,8,2,"#".A.<..|
00000B20: 31 35 2C 22 42 2D 52 22 3B 32 3B 30 3B 31 38 3B |15,"B-R";2;0;18;|
00000B30: 30 3A 98 31 35 2C 22 42 2D 50 22 3B 32 3B 31 34 |0:.15,"B-P";2;14|
00000B40: 34 00 4B 13 46 05 4E 24 B2 22 22 00 57 13 50 05 |4.K.F.N$."".W.P.|
00000B50: 81 49 B2 31 A4 31 36 00 6B 13 5A 05 A1 23 32 2C |.I.1.16.k.Z..#2,|
00000B60: 58 24 3A 58 25 B2 C6 28 58 24 29 00 84 13 64 05 |X$:X%..(X$)...d.|
00000B70: 8B 58 25 B2 31 36 30 B0 58 25 B2 33 32 A7 58 24 |.X%.160.X%.32.X$|
00000B80: B2 22 2E 22 00 91 13 6E 05 4E 24 B2 4E 24 AA 58 |."."...n.N$.N$.X|
00000B90: 24 00 97 13 78 05 82 00 CD 13 82 05 A1 23 32 2C |$...x........#2,|
00000BA0: 58 24 3A A1 23 32 2C 58 24 3A A1 23 32 2C 58 24 |X$:.#2,X$:.#2,X$|
00000BB0: 3A 4E 24 B2 4E 24 AA 22 20 22 AA 58 24 3A A1 23 |:N$.N$." ".X$:.#|
00000BC0: 32 2C 58 24 3A 4E 24 B2 4E 24 AA 58 24 00 E7 13 |2,X$:N$.N$.X$...|
00000BD0: 8C 05 98 31 35 2C 22 4D 2D 52 22 3B C7 28 32 35 |...15,"M-R";.(25|
00000BE0: 30 29 3B C7 28 32 29 00 01 14 96 05 A1 23 31 35 |0);.(2)......#15|
00000BF0: 2C 58 24 3A 4C 25 B2 C6 28 58 24 AA C7 28 30 29 |,X$:L%..(X$..(0)|
00000C00: 29 00 1B 14 A0 05 98 31 35 2C 22 4D 2D 52 22 3B |)......15,"M-R";|
00000C10: C7 28 32 35 32 29 3B C7 28 32 29 00 35 14 AA 05 |.(252);.(2).5...|
00000C20: A1 23 31 35 2C 58 24 3A 48 25 B2 C6 28 58 24 AA |.#15,X$:H%..(X$.|
00000C30: C7 28 30 29 29 00 3F 14 B4 05 A0 32 2C 31 35 00 |.(0)).?....2,15.|
00000C40: 75 14 BE 05 46 24 B2 CA 28 C4 28 32 35 36 AC 48 |u...F$..(.(256.H|
00000C50: 25 AA 4C 25 29 2C 32 29 3A 4C 25 B2 C3 28 46 24 |%.L%),2):L%..(F$|
00000C60: 29 3A 46 24 B2 C8 28 22 30 30 30 22 2C 33 AB 4C |):F$..("000",3.L|
00000C70: 25 29 AA 46 24 00 7C 14 C8 05 A0 32 00 88 14 D2 |%).F$.|....2....|
00000C80: 05 55 25 B2 55 25 AA 31 00 9C 14 DC 05 99 22 11 |.U%.U%.1......".|
00000C90: 20 52 45 43 4F 52 44 20 3A 22 55 25 00 B0 14 E6 | RECORD :"U%....|
00000CA0: 05 99 22 11 11 20 4E 41 4D 45 20 3A 20 22 4E 24 |..".. NAME : "N$|
00000CB0: 00 C2 14 F0 05 99 22 20 46 52 45 45 20 3A 20 22 |......" FREE : "|
00000CC0: 46 24 00 D7 14 FA 05 99 22 11 1D 41 44 44 20 3C |F$......"..ADD <|
00000CD0: 59 2F 4E 3E 20 3F 22 00 EB 14 04 06 A1 41 24 3A |Y/N> ?"......A$:|
00000CE0: 8B 41 24 B2 22 22 A7 31 35 34 30 00 01 15 0E 06 |.A$."".1540.....|
00000CF0: 8B 41 24 B2 22 4E 22 A7 55 25 B2 55 25 AB 31 3A |.A$."N".U%.U%.1:|
00000D00: 8E 00 1E 15 18 06 4E 24 28 55 25 29 B2 4E 24 3A |......N$(U%).N$:|
00000D10: 53 24 28 55 25 29 B2 46 24 3A 43 25 B2 31 00 32 |S$(U%).F$:C%.1.2|
00000D20: 15 22 06 99 22 11 20 4D 4F 52 45 20 3C 59 2F 4E |."..". MORE <Y/N|
00000D30: 3E 22 00 46 15 2C 06 A1 41 24 3A 8B 41 24 B2 22 |>".F.,..A$:.A$."|
00000D40: 22 A7 31 35 38 30 00 54 15 36 06 8B 41 24 B2 22 |".1580.T.6..A$."|
00000D50: 4E 22 A7 8E 00 5E 15 40 06 89 31 33 31 30 00 64 |N"...^.@..1310.d|
00000D60: 15 4A 06 3A 00 96 15 54 06 8B 43 25 B2 31 A7 99 |.J.:...T..C%.1..|
00000D70: 22 11 05 12 20 21 20 46 49 4C 45 20 4E 4F 54 20 |"... ! FILE NOT |
00000D80: 53 41 56 45 44 20 21 92 22 3A 81 44 B2 30 A4 35 |SAVED !.":.D.0.5|
00000D90: 30 30 3A 82 3A 8E 00 A1 15 5E 06 9E 36 34 37 33 |00:.:....^..6473|
00000DA0: 38 00 A7 15 68 06 3A 00 B5 15 72 06 9E 38 32 38 |8...h.:...r..828|
00000DB0: 3A 89 34 34 30 00 00 00 A2 3C A0 00 B9 C6 15 9D |:.440....<......|
00000DC0: 00 03 C8 E8 D0 F6 60 A9 01 20 C3 FF A9 24 8D F0 |......`.. ...$..|
00000DD0: 03 A9 30 8D F1 03 A9 01 A2 08 A0 00 20 BA FF A9 |..0......... ...|
00000DE0: 02 A2 F0 A0 03 20 BD FF 20 C0 FF A9 40 20 90 FF |..... .. ...@ ..|
00000DF0: A2 01 20 C6 FF 20 90 FF 20 CF FF 20 CF FF 20 CF |.. .. .. .. .. .|
00000E00: FF 20 CF FF C9 00 F0 3A 20 CC FF 20 E4 FF C9 20 |. .....: .. ... |
00000E10: D0 03 20 C4 03 A2 01 20 C6 FF 20 CF FF A8 20 CF |.. .... .. ... .|
00000E20: FF 48 98 AA 68 20 CD BD A9 20 20 D2 FF 20 CF FF |.H..h ... .. ..|
00000E30: C9 00 D0 08 A9 0D 20 D2 FF 4C 73 03 20 D2 FF 4C |...... ..Ls. ..L|
00000E40: A2 03 A9 01 20 C3 FF 20 CC FF A9 CC 85 B2 60 20 |.... .. ......` |
00000E50: E4 FF C9 20 D0 F9 60 00 A0 73 03 20 D2 FF 4C A2 |... ..`..s. ..L.|
00000E60: 03 A9 01 20 C3 FF 20 CC FF A9 CC 85 B2 60 20 E4 |... .. ......` .|
00000E70: FF C9 20 D0 F9 60 00 A0 96 9C 00 00 42 80 02 AC |.. ..`......B...|
00000E80: 9D 00 |.. |
.......************************.=....***
DISK FILE S&T V2.0***.[....***(C) 1986 S
TOATSOFT***.Z.(..***********************
*L...2.:...<..5559.O.F..808,225:M%.500:.
N$(M%),S$(M%):U%.0:.15,8,15:.53280,12:.5
3281,12...P..".....1. AUTO ADD"...Z.."2.
FIND SPACE"...D.."3. DIRECTORY".(.N.."4
. DELETE A DISK".<.X.."5. LOAD FILE".P..
.."6. SAVE FILE".J...."7. CHANGE AN ENTR
Y".~...."8. VIEW FILE"... .."9. QUIT"...
..."...CHOOSE 1-9.":.198,0......A$:.A$."
".180.U...A%..(F(A$).48):."."...H..A%.13
10,230,1650,510,680,840,970,1190,1620...
R..80.....:......U%.0...M.... ". ENTER T
OTAL FILE SIZE IN BLOCKS ";F$.I...Z%.C(F
$):.Z%.1.Z%.3.230.....F$.H("000",3.Z%).F
$. ...V%.E(F$):B%.664:D$."":N%.0......V%
.0.V%.664.230.D."..Z.U%.1..1.W.,.D%.E(S$
(Z)).V%...6..D%.0.330...@..D%.B%.B%.D%:D
$.N$(Z):N%.Z...J.....T..N%.0.470.I.^..".
. BEST PLACE FOR THIS "F$" BLOCK FILE IS
".K.H..". ON THE DISK NAMED '"D$"'"...R.
." WHICH IS NO."N%"IN THIS FILE."...|.."
. THIS WILL LEAVE"B%"BLOCKS FREE.".V....
". AMMEND NOW <Y/N> ?"......A$:.A$."".40
0......A$."N"...5...Z$.J(D(B%),2):L%.C(Z
$):Z$.H("000",3.L%).Z$:S$(N%).Z$:C%.1.H.
...". AMMENDED.".M...."....PRESS ANY KEY
TO CONTINUE"...B..A$:.A$."".450...L....
.V..". THIS RECORD WILL NOT FIT ANY DISK
S IN ".J....". THIS FILE.".S....440.Y...
:......U%.0........" DELETE DISKS"......
". FROM ";F%...... " TO ";T%.1.&..F%.
0.T%.U%...>.0..T%.F%...R.:..". OK <Y/N>
?".E.D..A$:.A$."".580.U.N..A$."Y".610.{.
X.....B.U%.U%.(T%.F%.1)...L..Z.T%.1.U%..
.V.N$(F%).N$(Z):S$(F%).S$(Z).H...F%.F%.1
.S....:C%.1.Y.........:...... "LOAD FILE
NAME ";F$.....L%.C(F$):.L%.1.L%.12...6..
..15,"I0":.2,8,2,F$." C/D,S,R".W.F..15,A
$,B$,C$,D$:.A$."00".790.A.P..2,U%.~.Z.."
."U%"RECORDS TO LOAD."......Z.1.U%......
2,N$(Z),S$(Z)......:C%.0..... 2.C....15,
A$,B$,C$,D$......"."A$" "B$:.C$" "D$...
..". PRESS ANY KEY TO CONTINUE"...*..A$:
.A$."".810...4.....>.:.*.H..U%.0...D.R..
"SAVE FILENAME ";F$._.\.L%.C(F$):.L%.1.
L%.12.....F..15,"I0":.2,8,2,"@0:".F$." C
/D,S,W"...P..15,A$,B$,C$,D$:.A$."00".790
.E.Z.."."U%"RECORDS TO SAVE.".O....2,U%.
.....Z.1.U%......2,N$(Z)......2,S$(Z)...
...:C%.0......770.....:...J..U%.0...F.T.
.".. CHANGE WHICH ENTRY ( 1 TO"U%") ";.O
.... Z%.A....Z%.1.Z%.U%........".. DISK
NAME = ";N$(Z%);...... ".............
........";Z$......Z$."".1100.....L%.C(Z$
):Z$.Z$.H("................ ..",19.L%)..
...T$."":.Z.1.19:C$.J(Z$,Z,1)...$..Z.17.
C$." ":.1080./....C$." ".C$.".".D.8.T$.T
$.C$:.:Z$.T$.W.B.N$(Z%).Z$:C%.1...L.."..
BLOCKS FREE = ";S$(Z%);:.".....";Y$..
.V..Z$."".1140...`.L%.C(Y$):Y$.H("000",3
.L%).Y$.J.J.S$(Z%).Y$:C%.1...T.."....MOR
E <Y/N> ?"...~..A$:.A$."".1150......A$."
Y".980...........:......U%.0...*....Z.1.
U%.B....Z.5)N$(Z).25)S$(Z).J.D..A$.\.N..
A$."."..1280.B.X........". PRESS ANY KEY
TO CONTINUE"......A$:.A$."".1260.......
.....A$:.A$..".".1280.......A...:......"
. INSERT DISK THEN PRESS ANY KEY"...(..1
98,0:.198,1:.198,0...2..15,"I0":.2,8,2,"
#".A.<..15,"B-R";2;0;18;0:.15,"B-P";2;14
4.K.F.N$."".W.P..I.1.16.K.Z..#2,X$:X%.F(
X$)...D..X%.160.X%.32.X$."."...N.N$.N$.X
$...X...M....#2,X$:.#2,X$:.#2,X$:N$.N$."
".X$:.#2,X$:N$.N$.X$......15,"M-R";G(25
0);G(2)......#15,X$:L%.F(X$.G(0))... ..1
5,"M-R";G(252);G(2).5....#15,X$:H%.F(X$.
G(0)).?... 2,15.U...F$.J(D(256.H%.L%),2)
:L%.C(F$):F$.H("000",3.L%).F$.|.H. 2...R
.U%.U%.1......". RECORD :"U%......".. NA
ME : "N$.B...." FREE : "F$.W...."..ADD <
Y/N> ?"......A$:.A$."".1540......A$."N".
U%.U%.1:......N$(U%).N$:S$(U%).F$:C%.1.2
."..". MORE <Y/N>".F.,..A$:.A$."".1580.T
.6..A$."N"...^.@..1310.D.J.:...T..C%.1..
"... ! FILE NOT SAVED !.":.D.0.500:.:...
.^..64738...H.:...R..828:.440....< ..F..
..H.P.`.. C..$....0....... . ...... . ..
...@ .... F. .. O. O. O. O.I..: L. ..I
P. D... F. O.. O.H..H M.. R. O.I.P... R
.LS. R.L.... C. L..L..` ..I P.`. S. R.L.
... C. L..L..` ..I P.`. ....B.....
> CLICK IMAGE PREVIEW FOR FULL MODAL