_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

INDEX 3 BR.+SORT

FILE INFORMATION

FILENAME(S): INDEX 3 BR.+SORT

FILE TYPE(S): PRG

FILE SIZE: 1.6K

FIRST SEEN: 2025-11-30 21:26:51

APPEARS ON: 1 disk(s)

FILE HASH

8d06621c171d6c905cf4a6594d733759cf27d534cc0e93a4a2c3b3e3805fc8d5

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
MEETING PRINTER INDEX 3 BR.+SORT PRG DuncanTwain 19 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 21 08 05 00 97 35  33 32 38 30 2C 30 3A 97  |..!....53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A  97 35 33 32 37 32 2C 32  |53281,0:.53272,2|
00000020: 33 00 3F 08 0A 00 99 22  93 11 11 9A 20 20 20 20  |3.?...."....    |
00000030: 44 49 53 4B 20 45 54 49  4B 45 54 54 45 4E 22 00  |DISK ETIKETTEN".|
00000040: 70 08 14 00 99 22 11 11  5A 49 54 20 44 45 20 47  |p...."..ZIT DE G|
00000050: 4F 45 44 45 20 53 43 48  49 4A 46 20 49 4E 20 44  |OEDE SCHIJF IN D|
00000060: 45 20 44 52 49 56 45 20  3F 20 28 4A 2F 4E 29 22  |E DRIVE ? (J/N)"|
00000070: 00 79 08 1E 00 89 32 36  30 00 A4 08 28 00 86 43  |.y....260...(..C|
00000080: 24 28 31 30 30 29 2C 48  28 31 30 30 29 2C 52 24  |$(100),H(100),R$|
00000090: 28 39 30 29 2C 54 24 28  34 29 3A 43 53 24 B2 C7  |(90),T$(4):CS$..|
000000A0: 28 33 34 29 00 C0 08 32  00 9F 31 35 2C 38 2C 31  |(34)...2..15,8,1|
000000B0: 35 2C 22 49 30 22 3A 8D  32 33 30 3A 99 22 93 22  |5,"I0":.230:."."|
000000C0: 00 E4 08 3C 00 9F 32 2C  38 2C 30 2C 22 24 30 22  |...<..2,8,0,"$0"|
000000D0: 3A 8D 32 33 30 3A 99 22  93 22 3A A1 23 32 2C 41  |:.230:.".":.#2,A|
000000E0: 24 2C 42 24 00 19 09 46  00 A1 23 32 2C 41 24 2C  |$,B$...F..#2,A$,|
000000F0: 42 24 3A 8B 53 54 A7 43  24 B2 22 20 42 4C 4F 43  |B$:.ST.C$." BLOC|
00000100: 4B 53 20 46 52 45 45 2E  22 3A 58 B2 50 AA 4C 3A  |KS FREE.":X.P.L:|
00000110: 8D 32 32 30 3A 89 31 35  30 00 2F 09 50 00 A1 23  |.220:.150./.P..#|
00000120: 32 2C 41 24 2C 42 24 3A  4E 24 B2 C7 28 30 29 00  |2,A$,B$:N$..(0).|
00000130: 4F 09 5A 00 48 B2 C6 28  41 24 AA 4E 24 29 AA C6  |O.Z.H..(A$.N$)..|
00000140: 28 42 24 AA 4E 24 29 AC  32 35 36 3A 99 48 3B 00  |(B$.N$).256:.H;.|
00000150: 5A 09 64 00 A1 23 32 2C  41 24 00 74 09 6E 00 8B  |Z.d..#2,A$.t.n..|
00000160: 41 24 B2 22 22 A7 41 24  B2 22 20 22 3A 99 41 24  |A$."".A$." ":.A$|
00000170: 3A 89 37 30 00 86 09 78  00 99 41 24 3B 3A 43 24  |:.70...x..A$;:C$|
00000180: B2 43 24 AA 41 24 00 B2  09 82 00 8B 41 24 B2 43  |.C$.A$......A$.C|
00000190: 53 24 A7 4C B2 C3 28 43  24 29 3A 43 24 B2 C8 28  |S$.L..(C$):C$..(|
000001A0: 43 24 2C 4C AB 31 29 3A  8D 31 36 30 3A 43 24 B2  |C$,L.1):.160:C$.|
000001B0: 22 22 00 BB 09 8C 00 89  31 30 30 00 CC 09 96 00  |""......100.....|
000001C0: A0 32 3A 8D 32 33 30 3A  89 32 39 30 00 E5 09 A0  |.2:.230:.290....|
000001D0: 00 8B 50 B2 2E 35 A7 50  B2 50 AA 2E 35 3A 46 24  |..P..5.P.P..5:F$|
000001E0: B2 43 24 3A 8E 00 05 0A  AA 00 8B 50 B2 31 A7 50  |.C$:.......P.1.P|
000001F0: B2 50 AA 2E 35 3A 49 44  24 B2 CA 28 43 24 2C 32  |.P..5:ID$..(C$,2|
00000200: 2C 35 29 3A 8E 00 1B 0A  B4 00 50 B2 50 AA 2E 35  |,5):......P.P..5|
00000210: 3A 8B 50 B3 B1 B5 28 50  29 A7 8E 00 3C 0A BE 00  |:.P...(P)...<...|
00000220: 58 B2 31 3A 81 49 B2 31  A4 50 AB 31 3A 8B 43 24  |X.1:.I.1.P.1:.C$|
00000230: B1 43 24 28 49 29 A7 58  B2 49 AA 31 00 42 0A C8  |.C$(I).X.I.1.B..|
00000240: 00 82 00 6E 0A D2 00 81  49 B2 50 A4 58 AA 31 A9  |...n....I.P.X.1.|
00000250: AB 31 3A 43 24 28 49 29  B2 43 24 28 49 AB 31 29  |.1:C$(I).C$(I.1)|
00000260: 3A 48 28 49 29 B2 48 28  49 AB 31 29 3A 82 00 84  |:H(I).H(I.1):...|
00000270: 0A DC 00 43 24 28 58 29  B2 43 24 3A 48 28 58 29  |...C$(X).C$:H(X)|
00000280: B2 48 3A 8E 00 99 0A E6  00 84 31 35 2C 46 31 2C  |.H:.......15,F1,|
00000290: 46 32 24 2C 46 33 2C 46  34 00 D6 0A F0 00 8B 46  |F2$,F3,F4......F|
000002A0: 31 A7 99 22 12 20 46 20  4F 20 55 20 54 20 20 20  |1..". F O U T   |
000002B0: 20 20 20 20 20 20 20 20  20 20 20 11 20 22 20 46  |           . " F|
000002C0: 32 24 22 92 22 3A 99 22  11 20 56 45 52 44 45 52  |2$".":.". VERDER|
000002D0: 20 4A 2F 4E 3F 22 00 E2  0A FA 00 8B 46 31 B2 30  | J/N?"......F1.0|
000002E0: A7 8E 00 FF 0A 04 01 A1  51 24 3A 8B 51 24 B3 B1  |........Q$:.Q$..|
000002F0: 22 4A 22 AF 51 24 B3 B1  22 4E 22 A7 32 36 30 00  |"J".Q$.."N".260.|
00000300: 0D 0B 0E 01 8B 51 24 B2  22 4E 22 A7 80 00 21 0B  |.....Q$."N"...!.|
00000310: 18 01 A0 32 3A A0 31 35  3A 99 22 93 22 3A 8A 34  |...2:.15:.".":.4|
00000320: 30 00 2C 0B 22 01 9F 34  2C 34 2C 37 00 6A 0B 2C  |0.,."..4,4,7.j.,|
00000330: 01 81 51 B2 31 A4 37 36  3A 54 24 28 31 29 B2 54  |..Q.1.76:T$(1).T|
00000340: 24 28 31 29 AA 22 2D 22  3A 54 24 28 33 29 B2 54  |$(1)."-":T$(3).T|
00000350: 24 28 33 29 AA 22 20 22  3A 82 3A 54 24 28 33 29  |$(3)." ":.:T$(3)|
00000360: B2 54 24 28 33 29 AA 22  20 22 00 A7 0B 36 01 54  |.T$(3)." "...6.T|
00000370: 24 28 31 29 B2 22 20 20  22 AA 54 24 28 31 29 AA  |$(1)."  ".T$(1).|
00000380: 22 20 20 22 3A 99 22 99  11 20 47 45 45 46 20 44  |"  ":.".. GEEF D|
00000390: 45 20 4E 41 41 4D 20 56  41 4E 20 44 45 20 44 49  |E NAAM VAN DE DI|
000003A0: 53 4B 45 54 54 45 22 00  E3 0B 37 01 85 22 20 20  |SKETTE"...7.."  |
000003B0: 20 20 20 20 20 11 28 4D  41 58 20 33 31 20 4C 45  |     .(MAX 31 LE|
000003C0: 54 54 45 52 53 29 20 20  20 20 20 20 20 20 20 20  |TTERS)          |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 11 22 3B  |             .";|
000003E0: 58 58 24 00 FE 0B 38 01  58 59 24 B2 22 22 3A 59  |XX$...8.XY$."":Y|
000003F0: 59 24 B2 22 22 3A 47 B2  C3 28 58 58 24 29 00 47  |Y$."":G..(XX$).G|
00000400: 0C 39 01 8B 47 B1 33 31  A7 99 22 91 91 20 20 20  |.9..G.31.."..   |
00000410: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000420: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000430: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000440: 1C 91 91 91 91 91 22 00  55 0C 3A 01 8B 47 B1 33  |......".U.:..G.3|
00000450: 31 A7 33 31 31 00 6C 0C  3B 01 47 47 B2 28 33 31  |1.311.l.;.GG.(31|
00000460: AB 47 29 AD 32 3A 47 24  B2 22 20 22 00 87 0C 3C  |.G).2:G$." "...<|
00000470: 01 81 4A B2 30 A4 47 47  AB 31 3A 58 59 24 B2 58  |..J.0.GG.1:XY$.X|
00000480: 59 24 AA 47 24 3A 82 00  9B 0C 3D 01 59 59 24 B2  |Y$.G$:....=.YY$.|
00000490: 58 59 24 AA 58 58 24 AA  58 59 24 00 BC 0C 3E 01  |XY$.XX$.XY$...>.|
000004A0: 47 31 B2 C3 28 59 59 24  29 3A 8B 47 31 B1 33 33  |G1..(YY$):.G1.33|
000004B0: A7 59 59 24 B2 59 59 24  AA 22 20 22 00 D7 0C 40  |.YY$.YY$." "...@|
000004C0: 01 48 B2 30 3A 54 24 28  32 29 B2 AA 49 44 24 AA  |.H.0:T$(2)..ID$.|
000004D0: 22 20 22 AA 59 59 24 00  16 0D 4A 01 81 51 B2 31  |" ".YY$...J..Q.1|
000004E0: A4 34 35 3A 48 24 B2 C4  28 48 28 51 AA 31 29 29  |.45:H$..(H(Q.1))|
000004F0: 3A 8B C3 28 48 24 29 B2  32 A7 48 24 B2 22 20 22  |:..(H$).2.H$." "|
00000500: AA 48 24 3A 8B 48 28 51  AA 31 29 B2 30 A7 48 24  |.H$:.H(Q.1).0.H$|
00000510: B2 22 20 20 20 22 00 53  0D 54 01 52 24 28 51 29  |."   ".S.T.R$(Q)|
00000520: B2 22 2D 22 AA C8 28 48  24 AA 22 20 22 AA 43 24  |."-"..(H$." ".C$|
00000530: 28 51 AA 31 29 AA 22 20  20 20 20 20 20 20 20 20  |(Q.1)."         |
00000540: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 22 2C  |              ",|
00000550: 32 34 29 00 59 0D 5E 01  82 00 6B 0D 63 01 51 31  |24).Y.^...k.c.Q1|
00000560: B2 B5 28 28 50 AA 32 29  AD 33 29 00 77 0D 68 01  |..((P.2).3).w.h.|
00000570: 81 51 B2 31 A4 51 31 00  A7 0D 72 01 52 24 28 51  |.Q.1.Q1...r.R$(Q|
00000580: 29 B2 22 2A 20 22 AA 52  24 28 51 29 AA 52 24 28  |)."* ".R$(Q).R$(|
00000590: 51 AA 51 31 29 AA 52 24  28 51 AA 51 31 AA 51 31  |Q.Q1).R$(Q.Q1.Q1|
000005A0: 29 AA 22 2D 20 2A 22 00  AD 0D 7C 01 82 00 E5 0D  |)."- *"...|.....|
000005B0: 90 01 98 34 2C 54 24 28  33 29 3A 98 34 2C 54 24  |...4,T$(3):.4,T$|
000005C0: 28 31 29 3A 98 34 2C 22  20 22 3B C7 28 31 34 29  |(1):.4," ";.(14)|
000005D0: 3B 54 24 28 32 29 3B C7  28 31 35 29 3A 98 34 2C  |;T$(2);.(15):.4,|
000005E0: 54 24 28 31 29 00 0F 0E  9A 01 81 51 B2 31 A4 51  |T$(1)......Q.1.Q|
000005F0: 31 3A 98 34 2C 52 24 28  51 29 3A 82 3A 98 34 2C  |1:.4,R$(Q):.:.4,|
00000600: 54 24 28 31 29 3A 98 34  2C 54 24 28 33 29 3B 00  |T$(1):.4,T$(3);.|
00000610: 16 0E AE 01 A0 34 00 43  0E B8 01 99 22 9A 93 20  |.....4.C....".. |
00000620: 57 49 4C 54 20 55 20 4E  4F 47 20 4D 45 45 52 20  |WILT U NOG MEER |
00000630: 44 49 53 4B 48 4F 45 53  4A 45 53 3F 20 28 4A 2F  |DISKHOESJES? (J/|
00000640: 4E 29 22 00 61 0E BD 01  A1 20 49 24 3A 8B 49 24  |N)".a.... I$:.I$|
00000650: B3 B1 22 4A 22 AF 49 24  B3 B1 22 4E 22 A7 34 34  |.."J".I$.."N".44|
00000660: 35 00 71 0E C2 01 8B 49  24 B2 22 4A 22 A7 89 31  |5.q....I$."J"..1|
00000670: 30 00 7F 0E CC 01 8B 49  24 B2 22 4E 22 A7 80 00  |0......I$."N"...|
00000680: 00 00                                             |..              |
..!....53280,0:.53281,0:.53272,23.?...."
....    DISK ETIKETTEN".P...."..ZIT DE G
OEDE SCHIJF IN DE DRIVE ? (J/N)".Y....26
0...(..C$(100),H(100),R$(90),T$(4):CS$.G
(34)...2..15,8,15,"I0":.230:."."...<..2,
8,0,"$0":.230:.".":.#2,A$,B$...F..#2,A$,
B$:.ST.C$." BLOCKS FREE.":X.P.L:.220:.15
0./.P..#2,A$,B$:N$.G(0).O.Z.H.F(A$.N$).F
(B$.N$).256:.H;.Z.D..#2,A$.T.N..A$."".A$
." ":.A$:.70...X..A$;:C$.C$.A$......A$.C
S$.L.C(C$):C$.H(C$,L.1):.160:C$.""......
100.L... 2:.230:.290... ..P..5.P.P..5:F$
.C$:.......P.1.P.P..5:ID$.J(C$,2,5):....
..P.P..5:.P...(P)...<...X.1:.I.1.P.1:.C$
.C$(I).X.I.1.B.H...N.R..I.P.X.1..1:C$(I)
.C$(I.1):H(I).H(I.1):......C$(X).C$:H(X)
.H:.......15,F1,F2$,F3,F4.V....F1..". F 
O U T              . " F2$".":.". VERDER
 J/N?"......F1.0........Q$:.Q$.."J".Q$..
"N".260......Q$."N"...!... 2: 15:.".":.4
0.,."..4,4,7.J.,..Q.1.76:T$(1).T$(1)."-"
:T$(3).T$(3)." ":.:T$(3).T$(3)." "...6.T
$(1)."  ".T$(1)."  ":.".. GEEF DE NAAM V
AN DE DISKETTE"...7.."       .(MAX 31 LE
TTERS)                       .";XX$...8.
XY$."":YY$."":G.C(XX$).G.9..G.31.."..   
                                        
        ......".U.:..G.31.311.L.;.GG.(31
.G).2:G$." "...<..J.0.GG.1:XY$.XY$.G$:..
..=.YY$.XY$.XX$.XY$...>.G1.C(YY$):.G1.33
.YY$.YY$." ".W.@.H.0:T$(2)..ID$." ".YY$.
..J..Q.1.45:H$.D(H(Q.1)):.C(H$).2.H$." "
.H$:.H(Q.1).0.H$."   ".S.T.R$(Q)."-".H(H
$." ".C$(Q.1)."                       ",
24).Y.^...K.C.Q1..((P.2).3).W.H..Q.1.Q1.
..R.R$(Q)."* ".R$(Q).R$(Q.Q1).R$(Q.Q1.Q1
)."- *"...|........4,T$(3):.4,T$(1):.4,"
 ";G(14);T$(2);G(15):.4,T$(1)......Q.1.Q
1:.4,R$(Q):.:.4,T$(1):.4,T$(3);..... 4.C
....".. WILT U NOG MEER DISKHOESJES? (J/
N)".A.... I$:.I$.."J".I$.."N".445.Q.B..I
$."J"..10..L..I$."N".....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL