FREE BLOKS
FILE INFORMATION
FILENAME(S): FREE BLOKS
FILE TYPE(S): PRG
FILE SIZE: 2.4K
FIRST SEEN: 2025-11-30 19:47:19
APPEARS ON: 1 disk(s)
FILE HASH
ff063442f666c36eecfaf43c48ee7e0d04f290e67457b85e5fc420c1dbbfe459
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK 43 2 | FREE BLOKS | PRG | Curtcool, Frank | 22 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 86 50 48 24 28 35 30 30 29 2C |..(....PH$(500),|
00000010: 50 46 24 28 35 30 30 29 2C 47 24 28 35 30 30 29 |PF$(500),G$(500)|
00000020: 2C 53 24 28 35 30 30 29 00 42 08 14 00 41 B2 31 |,S$(500).B...A.1|
00000030: 3A 46 52 24 B2 22 42 4C 4F 43 4B 53 20 46 52 45 |:FR$."BLOCKS FRE|
00000040: 45 22 00 48 08 19 00 8F 00 52 08 1E 00 8D 20 37 |E".H.....R.... 7|
00000050: 39 30 00 58 08 23 00 8F 00 7F 08 28 00 99 22 11 |90.X.#.....(..".|
00000060: 11 11 1D 1D 20 20 20 20 20 20 20 45 52 20 44 49 |.... ER DI|
00000070: 53 4B 20 4E 52 2E 22 41 22 20 4B 4C 41 52 22 00 |SK NR."A" KLAR".|
00000080: 9C 08 32 00 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |..2.."..........|
00000090: 20 20 20 20 20 20 28 4A 2F 4E 29 22 00 A6 08 3C | (J/N)"...<|
000000A0: 00 89 20 31 37 30 00 BC 08 46 00 8D 20 32 31 30 |.. 170...F.. 210|
000000B0: 3A 8D 20 33 30 30 3A 89 20 33 34 30 00 C2 08 4B |:. 300:. 340...K|
000000C0: 00 8F 00 DE 08 50 00 99 22 93 11 11 11 11 11 11 |.....P..".......|
000000D0: 11 1D 20 20 20 20 1D 22 50 48 24 28 41 29 00 FB |.. ."PH$(A)..|
000000E0: 08 5A 00 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 22 50 |.Z.."........."P|
000000F0: 46 24 28 41 29 22 20 22 46 52 24 00 2C 09 5B 00 |F$(A)" "FR$.,.[.|
00000100: 99 22 11 11 11 11 11 11 11 1D 1D 1D 1D 20 45 52 |."........... ER|
00000110: 20 44 45 54 20 44 45 4E 20 52 49 47 54 49 47 45 | DET DEN RIGTIGE|
00000120: 20 44 49 53 4B 20 28 4A 2F 4E 29 22 00 52 09 5C | DISK (J/N)".R.\|
00000130: 00 99 22 11 1D 1D 1D 1D 1D 1D 20 45 4C 4C 45 52 |.."....... ELLER|
00000140: 20 45 52 20 44 55 20 46 5B 52 44 49 47 20 4D 45 | ER DU F[RDIG ME|
00000150: 44 22 00 74 09 5D 00 99 22 11 1D 1D 1D 1D 20 20 |D".t.].."..... |
00000160: 20 20 20 20 20 41 54 20 49 4E 44 4C 5B 53 45 20 | AT INDL[SE |
00000170: 28 46 29 22 00 87 09 6E 00 A1 41 24 3A 8B 41 24 |(F)"...n..A$:.A$|
00000180: B2 22 22 A7 31 31 30 00 9F 09 78 00 8B 41 24 B2 |."".110...x..A$.|
00000190: 22 4A 22 A7 20 41 B2 41 AA 31 3A 89 20 33 30 00 |"J". A.A.1:. 30.|
000001A0: B1 09 82 00 8B 41 24 B2 22 4E 22 A7 20 89 20 33 |.....A$."N". . 3|
000001B0: 30 00 C2 09 8C 00 8B 41 24 B2 22 46 22 A7 20 35 |0......A$."F". 5|
000001C0: 36 30 00 CB 09 96 00 89 31 31 30 00 D1 09 A0 00 |60......110.....|
000001D0: 8F 00 E4 09 AA 00 A1 42 24 3A 8B 42 24 B2 22 22 |.......B$:.B$.""|
000001E0: A7 31 37 30 00 F4 09 B4 00 8B 42 24 B2 22 4A 22 |.170......B$."J"|
000001F0: A7 20 37 30 00 0B 0A BE 00 8B 42 24 B3 B1 B2 22 |. 70......B$..."|
00000200: 4E 22 A7 99 22 93 22 3A 89 39 31 00 14 0A C3 00 |N"..".":.91.....|
00000210: 89 31 37 30 00 1A 0A C8 00 8F 00 2A 0A D2 00 9F |.170.......*....|
00000220: 31 2C 38 2C 31 35 2C 22 49 22 00 41 0A DC 00 98 |1,8,15,"I".A....|
00000230: 31 2C 22 4D 2D 52 22 C7 28 32 35 30 29 C7 28 32 |1,"M-R".(250).(2|
00000240: 29 00 4C 0A E6 00 A1 23 31 2C 46 24 00 63 0A F0 |).L....#1,F$.c..|
00000250: 00 98 31 2C 22 4D 2D 52 22 C7 28 32 35 32 29 C7 |..1,"M-R".(252).|
00000260: 28 32 29 00 6E 0A FA 00 A1 23 31 2C 52 24 00 8F |(2).n....#1,R$..|
00000270: 0A 04 01 42 46 B2 C6 28 46 24 AA C7 28 30 29 29 |...BF..(F$..(0))|
00000280: AA C6 28 52 24 AA C7 28 30 29 29 AC 32 35 36 00 |..(R$..(0)).256.|
00000290: 9D 0A 0E 01 A0 20 31 3A 8D 20 34 34 30 00 A3 0A |..... 1:. 440...|
000002A0: 18 01 8E 00 A9 0A 22 01 8F 00 D5 0A 2C 01 9F 32 |......".....,..2|
000002B0: 2C 38 2C 30 2C 22 24 22 3A 81 54 B2 31 A4 33 32 |,8,0,"$":.T.1.32|
000002C0: 3A A1 23 32 2C 48 24 3A 48 45 24 B2 48 45 24 AA |:.#2,H$:HE$.HE$.|
000002D0: 48 24 3A 82 54 00 E3 0A 36 01 A0 20 32 3A 8D 20 |H$:.T...6.. 2:. |
000002E0: 34 34 30 00 E9 0A 40 01 8E 00 EF 0A 4A 01 8F 00 |440...@.....J...|
000002F0: 18 0B 54 01 50 48 24 28 41 29 B2 C9 28 48 45 24 |..T.PH$(A)..(HE$|
00000300: 2C 32 33 29 3A 48 45 24 B2 22 22 3A 50 46 24 28 |,23):HE$."":PF$(|
00000310: 41 29 B2 C4 28 42 46 29 00 3C 0B 5E 01 8B C3 28 |A)..(BF).<.^...(|
00000320: 50 46 24 28 41 29 29 B3 B2 32 A7 50 46 24 28 41 |PF$(A))..2.PF$(A|
00000330: 29 B2 22 20 22 AA 50 46 24 28 41 29 00 61 0B 68 |)." ".PF$(A).a.h|
00000340: 01 8B C3 28 50 46 24 28 41 29 29 B3 B2 33 A7 50 |...(PF$(A))..3.P|
00000350: 46 24 28 41 29 B2 22 20 20 22 AA 50 46 24 28 41 |F$(A)." ".PF$(A|
00000360: 29 00 85 0B 72 01 8B C3 28 50 46 24 28 41 29 29 |)...r...(PF$(A))|
00000370: B3 B2 34 A7 50 46 24 28 41 29 B2 22 20 22 AA 50 |..4.PF$(A)." ".P|
00000380: 46 24 28 41 29 00 B3 0B 7C 01 47 24 28 41 29 B2 |F$(A)...|.G$(A).|
00000390: 22 22 AA 50 46 24 28 41 29 AA 22 20 20 20 20 20 |"".PF$(A)." |
000003A0: 22 AA 50 48 24 28 41 29 3A 42 46 B2 30 3A 48 24 |".PH$(A):BF.0:H$|
000003B0: B2 22 22 00 BB 0B A4 01 89 38 30 00 C1 0B AE 01 |.""......80.....|
000003C0: 8F 00 CD 0B B8 01 9F 33 2C 38 2C 31 35 00 DD 0B |.......3,8,15...|
000003D0: C2 01 84 33 2C 57 2C 58 24 2C 5A 2C 4A 00 EC 0B |...3,W,X$,Z,J...|
000003E0: CC 01 8B 57 B3 B1 30 A7 20 34 39 30 00 F4 0B D6 |...W..0. 490....|
000003F0: 01 A0 20 33 00 FA 0B E0 01 8E 00 20 0C EA 01 99 |.. 3....... ....|
00000400: 22 93 11 11 11 11 11 11 1D 1D 1D 20 44 49 53 4B |".......... DISK|
00000410: 20 45 52 52 4F 52 20 22 57 3B 58 24 3B 5A 3B 4A | ERROR "W;X$;Z;J|
00000420: 00 3F 0C F4 01 99 22 56 49 4C 20 44 55 20 50 52 |.?...."VIL DU PR|
00000430: 5C 56 45 20 49 47 45 4E 20 28 4A 2F 4E 29 22 00 |\VE IGEN (J/N)".|
00000440: 5B 0C FE 01 A0 20 31 3A 9F 31 2C 38 2C 31 35 2C |[.... 1:.1,8,15,|
00000450: 22 49 22 3A A0 20 31 3A A0 20 33 00 6E 0C 08 02 |"I":. 1:. 3.n...|
00000460: A1 43 24 3A 8B 43 24 B2 22 22 A7 35 32 30 00 7D |.C$:.C$."".520.}|
00000470: 0C 12 02 8B 43 24 B2 22 4A 22 A7 20 8E 00 8E 0C |....C$."J". ....|
00000480: 1C 02 8B 42 24 B2 22 4E 22 A7 20 36 30 30 00 94 |...B$."N". 600..|
00000490: 0C 26 02 8F 00 E0 0C 30 02 99 22 11 11 5C 4E 53 |.&.....0.."..\NS|
000004A0: 4B 45 52 20 44 55 20 41 54 20 53 4F 52 54 45 52 |KER DU AT SORTER|
000004B0: 45 20 45 46 54 45 52 20 42 4C 4B 20 53 54 5C 52 |E EFTER BLK ST\R|
000004C0: 45 4C 53 45 11 20 20 20 20 20 20 20 20 20 20 20 |ELSE. |
000004D0: 20 20 20 20 20 20 20 28 4A 2F 4E 29 11 11 11 22 | (J/N)..."|
000004E0: 00 EA 0C 35 02 8D 31 30 30 30 00 FD 0C 3A 02 A1 |...5..1000...:..|
000004F0: 4B 24 3A 8B 4B 24 B2 22 22 A7 35 37 30 00 0D 0D |K$:.K$."".570...|
00000500: 44 02 8B 4B 24 B2 22 4A 22 A7 36 30 30 00 26 0D |D..K$."J".600.&.|
00000510: 4E 02 8B 4B 24 B3 B1 B2 22 4E 22 A7 8D 31 30 30 |N..K$..."N"..100|
00000520: 30 3A 89 37 30 30 00 2F 0D 53 02 89 35 37 30 00 |0:.700./.S..570.|
00000530: 37 0D 58 02 46 B2 30 00 44 0D 62 02 81 49 B2 31 |7.X.F.0.D.b..I.1|
00000540: A4 41 AB 31 00 5D 0D 6C 02 8B 53 24 28 49 29 B3 |.A.1.].l..S$(I).|
00000550: B2 53 24 28 49 AA 31 29 A7 20 36 37 30 00 6A 0D |.S$(I.1). 670.j.|
00000560: 76 02 54 24 B2 53 24 28 49 29 00 7C 0D 80 02 53 |v.T$.S$(I).|...S|
00000570: 24 28 49 29 B2 53 24 28 49 AA 31 29 00 8B 0D 8A |$(I).S$(I.1)....|
00000580: 02 53 24 28 49 AA 31 29 B2 54 24 00 93 0D 94 02 |.S$(I.1).T$.....|
00000590: 46 B2 31 00 9B 0D 9E 02 82 20 49 00 AA 0D A8 02 |F.1...... I.....|
000005A0: 8B 20 46 B2 31 A7 20 36 30 30 00 B0 0D B2 02 8F |. F.1. 600......|
000005B0: 00 C9 0D BC 02 81 50 B2 31 A4 41 3A 99 22 1D 1D |......P.1.A:."..|
000005C0: 22 53 24 28 50 29 3A 82 50 00 CF 0D C6 02 8F 00 |"S$(P):.P.......|
000005D0: F6 0D D0 02 99 22 11 11 11 1D 1D 1D 20 48 55 53 |....."...... HUS|
000005E0: 4B 20 41 54 20 54 5B 4E 44 45 20 50 52 49 4E 54 |K AT T[NDE PRINT|
000005F0: 45 52 45 4E 20 22 00 1F 0E DA 02 99 22 11 1D 1D |EREN "......"...|
00000600: 1D 20 4F 47 20 54 52 59 4B 20 45 4E 20 54 41 53 |. OG TRYK EN TAS|
00000610: 54 20 46 4F 52 20 55 44 53 4B 52 49 46 54 22 00 |T FOR UDSKRIFT".|
00000620: 32 0E E4 02 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 37 |2....K$:.K$."".7|
00000630: 34 30 00 3B 0E EE 02 9F 34 2C 34 00 48 0E F8 02 |40.;....4,4.H...|
00000640: 98 34 3A 98 34 3A 98 34 00 8A 0E FD 02 98 34 2C |.4:.4:.4......4,|
00000650: 22 20 20 20 20 20 20 20 20 20 20 20 42 4C 4F 43 |" BLOC|
00000660: 4B 53 20 46 52 45 45 2E 20 20 20 20 44 49 53 4B |KS FREE. DISK|
00000670: 45 54 54 45 4E 41 56 4E 2E 20 20 20 20 20 49 44 |ETTENAVN. ID|
00000680: 2E 20 46 4F 52 4D 41 54 2E 22 00 DA 0E FE 02 98 |. FORMAT."......|
00000690: 34 2C 22 20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D |4," -----|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 03 0F 02 03 81 |---------"......|
000006E0: 54 B2 31 A4 41 3A 98 34 2C 22 20 20 20 20 20 20 |T.1.A:.4," |
000006F0: 20 20 20 20 20 20 20 20 20 20 20 22 53 24 28 54 | "S$(T|
00000700: 29 3A 82 00 4E 0F 07 03 98 34 2C C7 28 31 30 29 |):..N....4,.(10)|
00000710: C7 28 31 30 29 C7 28 31 30 29 22 20 20 20 20 20 |.(10).(10)" |
00000720: 20 20 20 20 20 20 20 49 20 41 4C 54 20 45 52 20 | I ALT ER |
00000730: 44 45 52 20 55 44 53 4B 52 45 56 45 54 20 22 41 |DER UDSKREVET "A|
00000740: 22 20 44 49 53 4B 4B 45 54 54 45 52 2E 22 00 5A |" DISKKETTER.".Z|
00000750: 0F 0C 03 A0 34 3A 89 39 30 30 00 60 0F 11 03 8F |....4:.900.`....|
00000760: 00 A7 0F 16 03 97 35 33 32 38 30 2C 36 3A 97 35 |......53280,6:.5|
00000770: 33 32 38 31 2C 36 3A 99 22 93 12 05 20 20 20 20 |3281,6:."... |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007A0: 20 20 20 20 92 22 3B 00 DD 0F 20 03 99 22 12 1C | .";... .."..|
000007B0: 20 20 20 20 20 20 20 05 42 41 4D 20 52 45 54 54 | .BAM RETT|
000007C0: 45 52 20 42 59 20 4B 41 49 20 47 55 53 54 41 46 |ER BY KAI GUSTAF|
000007D0: 53 4F 4E 1C 20 20 20 20 20 20 92 22 3B 00 11 10 |SON. .";...|
000007E0: 2A 03 99 22 12 05 20 20 20 20 20 20 20 20 20 20 |*..".. |
000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."|
00000810: 3B 00 47 10 34 03 99 22 12 1C 20 20 20 20 20 20 |;.G.4..".. |
00000820: 05 4D 55 4C 54 49 43 4F 50 59 20 53 4F 46 54 57 |.MULTICOPY SOFTW|
00000830: 41 52 45 2E 20 20 32 2D 33 2D 31 39 38 35 2E 1C |ARE. 2-3-1985..|
00000840: 20 20 20 20 92 22 3B 00 7B 10 3E 03 99 22 12 05 | .";.{.>.."..|
00000850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000870: 20 20 20 20 20 20 20 20 92 22 3B 00 81 10 48 03 | .";...H.|
00000880: 8E 00 B3 10 84 03 8D 37 39 30 3A 99 22 11 11 11 |.......790:."...|
00000890: 11 11 11 20 20 20 20 20 56 49 4C 20 44 55 20 55 |... VIL DU U|
000008A0: 44 53 4B 52 49 56 45 20 45 4E 47 41 4E 47 20 54 |DSKRIVE ENGANG T|
000008B0: 49 4C 22 00 DD 10 89 03 99 22 11 20 20 20 20 20 |IL"......". |
000008C0: 45 4C 4C 45 52 20 56 49 4C 20 49 4E 44 4C 5B 53 |ELLER VIL INDL[S|
000008D0: 45 20 4D 45 52 45 20 28 4A 2F 4E 29 22 00 F0 10 |E MERE (J/N)"...|
000008E0: 8E 03 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 39 31 30 |...K$:.K$."".910|
000008F0: 00 05 11 93 03 8B 4B 24 B2 22 4A 22 A7 99 22 93 |......K$."J"..".|
00000900: 22 3A 89 39 31 00 17 11 98 03 8B 4B 24 B3 B1 B2 |":.91......K$...|
00000910: 22 4E 22 A7 39 34 30 00 20 11 A2 03 89 39 31 30 |"N".940. ....910|
00000920: 00 4D 11 AC 03 99 22 11 11 11 11 11 1D 1D 1D 1D |.M....".........|
00000930: 4A 41 4D 45 4E 20 53 5D 20 54 41 4B 20 46 4F 52 |JAMEN S] TAK FOR|
00000940: 20 44 45 4E 4E 45 20 47 41 4E 47 2E 22 00 53 11 | DENNE GANG.".S.|
00000950: B6 03 80 00 6C 11 E8 03 81 54 B2 31 A4 41 3A 53 |....l....T.1.A:S|
00000960: 24 28 54 29 B2 47 24 28 54 29 3A 82 00 72 11 F2 |$(T).G$(T):..r..|
00000970: 03 8E 00 00 00 |..... |
..(....PH$(500),PF$(500),G$(500),S$(500)
.B...A.1:FR$."BLOCKS FREE".H.....R.... 7
90.X.#....(.."..... ER DISK NR."A
" KLAR"...2..".......... (J/N)"...<
.. 170...F.. 210:. 300:. 340.B.K.....P..
"......... ."PH$(A)...Z.."........."P
F$(A)" "FR$.,.[.."........... ER DET DEN
RIGTIGE DISK (J/N)".R.\.."....... ELLER
ER DU F[RDIG MED".T.].."..... AT
INDL[SE (F)"...N..A$:.A$."".110...X..A$.
"J". A.A.1:. 30......A$."N". . 30.B....A
$."F". 560.K....110.Q. ........B$:.B$.""
.170......B$."J". 70......B$..."N"..".":
.91...C..170...H...*.R..1,8,15,"I".A....
1,"M-R"G(250)G(2).L....#1,F$.C....1,"M-R
"G(252)G(2).N....#1,R$.....BF.F(F$.G(0))
.F(R$.G(0)).256..... 1:. 440.........".
..U.,..2,8,0,"$":.T.1.32:.#2,H$:HE$.HE$.
H$:.T...6. 2:. 440...@.....J.....T.PH$(
A).I(HE$,23):HE$."":PF$(A).D(BF).<.^..C(
PF$(A))..2.PF$(A)." ".PF$(A).A.H..C(PF$(
A))..3.PF$(A)." ".PF$(A)...R..C(PF$(A))
..4.PF$(A)." ".PF$(A)...|.G$(A)."".PF$(A
)." ".PH$(A):BF.0:H$.""......80.A...
..M....3,8,15...B..3,W,X$,Z,J...L..W..0.
490...V. 3....... ....".......... DISK
ERROR "W;X$;Z;J.?...."VIL DU PR\VE IGEN
(J/N)".[... 1:.1,8,15,"I": 1: 3.N...
.C$:.C$."".520.}....C$."J". .......B$."N
". 600...&.....0.."..\NSKER DU AT SORTER
E EFTER BLK ST\RELSE. (
J/N)..."...5..1000...:..K$:.K$."".570...
D..K$."J".600.&.N..K$..."N"..1000:.700./
.S..570.7.X.F.0.D.B..I.1.A.1.].L..S$(I).
.S$(I.1). 670.J.V.T$.S$(I).|...S$(I).S$(
I.1).....S$(I.1).T$.....F.1...... I.....
. F.1. 600.......I....P.1.A:.".."S$(P):.
P.O.F.....P.."...... HUSK AT T[NDE PRINT
EREN "...Z..".... OG TRYK EN TAST FOR UD
SKRIFT".2....K$:.K$."".740.;....4,4.H...
.4:.4:.4......4," BLOCKS FREE.
DISKETTENAVN. ID. FORMAT.".Z....
4," -----------------------------
---------------------------------"......
T.1.A:.4," "S$(T):..N...
.4,G(10)G(10)G(10)" I ALT ER
DER UDSKREVET "A" DISKKETTER.".Z... 4:.9
00.`..........53280,6:.53281,6:."...
.";.
.. ..".. .BAM RETTER BY KAI GUSTAF
SON. .";...*.."..
.";.G.4.."..
.MULTICOPY SOFTWARE. 2-3-1985.. .";.
{.>.."..
.";...H........790:."......
VIL DU UDSKRIVE ENGANG TIL"......".
ELLER VIL INDL[SE MERE (J/N)"......K$:.K
$."".910......K$."J"..".":.91......K$...
"N".940. ....910.M....".........JAMEN S]
TAK FOR DENNE GANG.".S.....L....T.1.A:S
$(T).G$(T):..R.......
> CLICK IMAGE PREVIEW FOR FULL MODAL