INDEX 2 BREED

FILE INFORMATION

FILENAME(S): INDEX 2 BREED

FILE TYPE(S): PRG

FILE SIZE: 2.1K

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

APPEARS ON: 1 disk(s)

FILE HASH

e2d29bc0751840ec80685198ace9796e2b986a76599c4292ead8a77599db3e68

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
MEETING PRINTER	INDEX 2 BREED	PRG	DuncanTwain	19	6	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1F 08 08 00 8F 20  53 41 56 45 22 44 49 53  |....... SAVE"DIS|
00000010: 4B 20 53 4F 52 54 20 26  20 50 52 49 4E 54 22 00  |K SORT & PRINT".|
00000020: 45 08 64 00 97 20 35 33  32 38 30 2C 39 3A 97 35  |E.d.. 53280,9:.5|
00000030: 33 32 38 31 2C 39 3A 99  22 81 22 3A 97 35 33 32  |3281,9:.".":.532|
00000040: 37 32 2C 32 33 00 5F 08  6E 00 97 20 35 36 2C 31  |72,23._.n.. 56,1|
00000050: 35 36 3A 8F 20 53 45 54  20 4D 45 4D 54 4F 50 00  |56:. SET MEMTOP.|
00000060: 86 08 78 00 99 22 93 11  11 11 11 11 11 1D 1D 1D  |..x.."..........|
00000070: 1D 1D 1D 1D 44 49 53 4B  20 53 4F 52 54 20 26 20  |....DISK SORT & |
00000080: 50 52 49 4E 54 22 00 9C  08 82 00 9C 3A 57 B2 35  |PRINT"......:W.5|
00000090: 31 3A 4E B2 AB 31 3A 58  B2 32 32 31 00 E6 08 8C  |1:N..1:X.221....|
000000A0: 00 99 22 11 11 1D 1D 50  4C 41 41 54 53 20 44 49  |.."....PLAATS DI|
000000B0: 53 4B 2C 20 45 4E 20 56  55 4C 20 49 44 20 4E 55  |SK, EN VUL ID NU|
000000C0: 4D 4D 45 52 20 49 4E 20  20 20 20 20 20 20 20 20  |MMER IN         |
000000D0: 20 20 12 52 45 54 55 52  4E 92 20 41 4C 4C 45 53  |  .RETURN. ALLES|
000000E0: 20 4F 4B 20 20 22 00 FF  08 96 00 85 22 11 11 1D  | OK  "......"...|
000000F0: 1D 1D 1D 1D 4E 52 20 49  44 20 3D 22 3B 5A 24 00  |....NR ID =";Z$.|
00000100: 41 09 A0 00 42 4C 24 B2  22 20 20 20 20 20 20 20  |A...BL$."       |
00000110: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000120: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000130: 20 22 3A 4C 24 B2 22 49  44 20 3D 20 20 22 AA 5A  | ":L$."ID =  ".Z|
00000140: 24 00 68 09 AA 00 86 46  58 24 28 32 35 36 29 2C  |$.h....FX$(256),|
00000150: 46 54 24 28 32 35 36 29  2C 46 4C 28 32 35 36 29  |FT$(256),FL(256)|
00000160: 2C 54 54 28 32 35 36 29  00 A5 09 B4 00 8F 20 46  |,TT(256)...... F|
00000170: 4F 52 49 3D 31 20 54 4F  20 32 35 36 3A 46 58 24  |ORI=1 TO 256:FX$|
00000180: 28 49 29 3D 22 22 3A 46  54 24 28 49 29 3D 22 22  |(I)="":FT$(I)=""|
00000190: 3A 46 4C 28 49 29 3D 30  3A 54 54 28 49 29 3D 30  |:FL(I)=0:TT(I)=0|
000001A0: 3A 4E 45 58 54 00 CC 09  BE 00 99 22 93 11 11 11  |:NEXT......"....|
000001B0: 11 11 11 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 41  |...............A|
000001C0: 4C 49 47 4E 20 50 41 50  45 52 2C 22 00 F4 09 C8  |LIGN PAPER,"....|
000001D0: 00 99 22 93 11 11 11 11  11 11 11 11 11 11 11 22  |.."............"|
000001E0: 3B A6 31 34 29 3B 22 50  4C 45 41 53 45 20 57 41  |;.14);"PLEASE WA|
000001F0: 49 54 20 22 00 20 0A D2  00 A0 31 35 3A 9F 31 35  |IT ". ....15:.15|
00000200: 2C 38 2C 31 35 3A 9F 31  2C 38 2C 30 2C 22 24 30  |,8,15:.1,8,0,"$0|
00000210: 22 3A 8D 35 39 30 3A A1  23 31 2C 41 24 2C 42 24  |":.590:.#1,A$,B$|
00000220: 00 4C 0A DC 00 A1 23 31  2C 41 24 2C 41 24 3A A1  |.L....#1,A$,A$:.|
00000230: 23 31 2C 41 24 2C 42 24  3A 43 B2 30 3A 8B 41 24  |#1,A$,B$:C.0:.A$|
00000240: B3 B1 22 22 A7 43 B2 C6  28 41 24 29 00 66 0A E6  |.."".C..(A$).f..|
00000250: 00 8B 42 24 B3 B1 22 22  A7 43 B2 43 AA C6 28 42  |..B$.."".C.C..(B|
00000260: 24 29 AC 32 35 36 00 78  0A F0 00 4E B2 4E AA 31  |$).256.x...N.N.1|
00000270: 3A 46 4C 28 4E 29 B2 43  00 8E 0A FA 00 A1 23 31  |:FL(N).C......#1|
00000280: 2C 42 24 3A 8B 53 54 B3  B1 30 A7 33 34 30 00 A1  |,B$:.ST..0.340..|
00000290: 0A 04 01 8B 42 24 B3 B1  C7 28 33 34 29 A7 32 35  |....B$...(34).25|
000002A0: 30 00 AB 0A 0E 01 4E 24  B2 22 22 00 CF 0A 18 01  |0.....N$."".....|
000002B0: A1 23 31 2C 42 24 3A 8B  42 24 B3 B1 C7 28 33 34  |.#1,B$:.B$...(34|
000002C0: 29 A7 4E 24 B2 4E 24 AA  42 24 3A 89 32 38 30 00  |).N$.N$.B$:.280.|
000002D0: DD 0A 22 01 46 58 24 28  4E 29 B2 4E 24 00 F6 0A  |..".FX$(N).N$...|
000002E0: 2C 01 A1 23 31 2C 42 24  3A 8B 42 24 B2 C7 28 33  |,..#1,B$:.B$..(3|
000002F0: 32 29 A7 33 30 30 00 00  0B 36 01 43 24 B2 22 22  |2).300...6.C$.""|
00000300: 00 22 0B 40 01 43 24 B2  43 24 AA 42 24 3A A1 23  |.".@.C$.C$.B$:.#|
00000310: 31 2C 42 24 3A 8B 42 24  B3 B1 22 22 20 20 A7 33  |1,B$:.B$..""  .3|
00000320: 32 30 00 3F 0B 4A 01 46  54 24 28 4E 29 B2 C8 28  |20.?.J.FT$(N)..(|
00000330: 43 24 2C 33 29 3A 8B 53  54 B2 30 A7 32 32 30 00  |C$,3):.ST.0.220.|
00000340: 5A 0B 54 01 A0 31 3A 42  46 B2 46 4C 28 4E 29 3A  |Z.T..1:BF.FL(N):|
00000350: 4E B2 4E AB 31 3A 8D 36  39 30 00 68 0B 5E 01 A0  |N.N.1:.690.h.^..|
00000360: 34 3A 9F 34 2C 34 2C 37  00 A7 0B 68 01 98 34 2C  |4:.4,4,7...h..4,|
00000370: 22 B0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |"...............|
00000380: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000390: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000003A0: C0 C0 C0 C0 C0 AE 22 00  CD 0B 72 01 8F 20 50 52  |......"...r.. PR|
000003B0: 49 4E 54 23 34 2C 43 48  52 24 28 58 29 3B 53 50  |INT#4,CHR$(X);SP|
000003C0: 43 28 35 31 29 3B 43 48  52 24 28 58 29 00 ED 0B  |C(51);CHR$(X)...|
000003D0: 7C 01 54 24 B2 C7 28 58  29 AA 22 20 20 20 20 20  ||.T$..(X)."     |
000003E0: 3E 3E 3E 12 20 22 AA 46  58 24 28 30 29 00 0E 0C  |>>>. ".FX$(0)...|
000003F0: 86 01 8B 4C 24 B3 B1 22  22 A7 54 24 B2 54 24 AA  |...L$.."".T$.T$.|
00000400: 22 A0 A0 28 22 AA 4C 24  AA 22 29 20 92 22 00 2B  |"..(".L$.") .".+|
00000410: 0C 90 01 54 24 B2 54 24  AA CA 28 42 4C 24 2C 31  |...T$.T$..(BL$,1|
00000420: 2C 57 AB C3 28 54 24 29  AB 31 29 00 47 0C 9A 01  |,W..(T$).1).G...|
00000430: 54 24 B2 54 24 AA 22 20  20 20 20 22 AA C7 28 58  |T$.T$."    "..(X|
00000440: 29 3A 98 34 2C 54 24 00  6C 0C A4 01 8F 50 52 49  |):.4,T$.l....PRI|
00000450: 4E 54 23 34 2C 43 48 52  24 28 58 29 3B 53 50 43  |NT#4,CHR$(X);SPC|
00000460: 28 35 31 29 3B 43 48 52  24 28 58 29 00 AB 0C AE  |(51);CHR$(X)....|
00000470: 01 98 34 2C 22 AB C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |..4,"...........|
00000480: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000490: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000004A0: C0 C0 C0 C0 C0 C0 C0 C0  C0 B3 22 00 D0 0C B8 01  |..........".....|
000004B0: 8F 50 52 49 4E 54 23 34  2C 43 48 52 24 28 58 29  |.PRINT#4,CHR$(X)|
000004C0: 3B 53 50 43 28 35 31 29  3B 43 48 52 24 28 58 29  |;SPC(51);CHR$(X)|
000004D0: 00 EC 0C C2 01 4C B2 39  3A 4B B2 B5 28 28 4E AA  |.....L.9:K..((N.|
000004E0: 31 29 AD 32 29 3A 81 49  B2 31 A4 4B 00 26 0D CC  |1).2):.I.1.K.&..|
000004F0: 01 54 24 B2 C7 28 58 29  3A 4A B2 49 3A 8D 36 33  |.T$..(X):J.I:.63|
00000500: 30 3A 54 24 B2 54 24 AA  22 20 22 3A 4A B2 4B AA  |0:T$.T$." ":J.K.|
00000510: 49 3A 8D 36 33 30 3A 54  24 B2 54 24 AA 22 20 20  |I:.630:T$.T$."  |
00000520: 22 AA C7 28 58 29 00 38  0D D6 01 98 34 2C 54 24  |"..(X).8....4,T$|
00000530: 3A 4C B2 4C AA 31 3A 82  00 5F 0D E0 01 8F 20 20  |:L.L.1:.._....  |
00000540: 50 52 49 4E 54 23 34 2C  43 48 52 24 28 58 29 3B  |PRINT#4,CHR$(X);|
00000550: 53 50 43 28 35 31 29 3B  43 48 52 24 28 58 29 00  |SPC(51);CHR$(X).|
00000560: 85 0D EA 01 50 B2 B5 28  28 42 46 AC 31 30 30 AD  |....P..((BF.100.|
00000570: 36 36 34 29 AA 2E 35 29  3A 50 24 B2 CA 28 C4 28  |664)..5):P$..(.(|
00000580: 50 29 2C 32 29 00 BC 0D  F4 01 54 24 B2 C7 28 58  |P),2).....T$..(X|
00000590: 29 AA CA 28 42 4C 24 2C  31 2C 31 34 29 AA C4 28  |)..(BL$,1,14)..(|
000005A0: 42 46 29 AA 22 20 42 4C  4F 43 4B 53 20 28 22 AA  |BF)." BLOCKS (".|
000005B0: 50 24 AA 22 20 25 29 20  46 52 45 45 00 E4 0D FE  |P$." %) FREE....|
000005C0: 01 54 24 B2 54 24 AA CA  28 42 4C 24 2C 31 2C 57  |.T$.T$..(BL$,1,W|
000005D0: AB C3 28 54 24 29 AA 31  29 AA C7 28 58 29 3A 98  |..(T$).1)..(X):.|
000005E0: 34 2C 54 24 00 16 0E 08  02 8F 20 20 46 4F 52 49  |4,T$......  FORI|
000005F0: 3D 4C 54 4F 32 37 3A 50  52 49 4E 54 23 34 2C 43  |=LTO27:PRINT#4,C|
00000600: 48 52 24 28 58 29 3B 53  50 43 28 35 31 29 3B 43  |HR$(X);SPC(51);C|
00000610: 48 52 24 28 58 29 00 21  0E 12 02 8F 20 4E 45 58  |HR$(X).!.... NEX|
00000620: 54 00 60 0E 1C 02 98 34  2C 22 AD C0 C0 C0 C0 C0  |T.`....4,"......|
00000630: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000640: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000650: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 BD 22  |..............."|
00000660: 00 A6 0E 26 02 8F 20 50  52 49 4E 54 23 34 3A 50  |...&.. PRINT#4:P|
00000670: 52 49 4E 54 23 34 3A 50  52 49 4E 54 23 34 3A 50  |RINT#4:PRINT#4:P|
00000680: 52 49 4E 54 23 34 3A 50  52 49 4E 54 23 34 3A 50  |RINT#4:PRINT#4:P|
00000690: 52 49 4E 54 23 34 3A 50  52 49 4E 54 23 34 3A 50  |RINT#4:PRINT#4:P|
000006A0: 52 49 4E 54 23 34 00 B1  0E 30 02 A0 34 3A A0 31  |RINT#4...0..4:.1|
000006B0: 35 00 BB 0E 3A 02 89 20  31 33 30 00 C1 0E 44 02  |5...:.. 130...D.|
000006C0: 80 00 D9 0E 4E 02 84 31  35 2C 45 52 2C 45 52 24  |....N..15,ER,ER$|
000006D0: 3A 8B 45 52 B3 32 30 A7  8E 00 0D 0F 58 02 8B 45  |:.ER.20.....X..E|
000006E0: 52 B2 37 34 B0 45 52 B2  32 31 A7 45 52 24 B2 45  |R.74.ER.21.ER$.E|
000006F0: 52 24 AA 22 2D 2D 49 53  20 44 49 53 4B 20 49 4E  |R$."--IS DISK IN|
00000700: 53 45 52 54 45 44 3F 22  3A 89 36 32 30 00 31 0F  |SERTED?":.620.1.|
00000710: 62 02 45 52 24 B2 22 44  49 53 4B 20 45 52 52 4F  |b.ER$."DISK ERRO|
00000720: 52 22 AA C4 28 45 52 29  AA 22 3A 20 22 AA 45 52  |R"..(ER).": ".ER|
00000730: 24 00 3C 0F 6C 02 99 45  52 24 3A 80 00 61 0F 76  |$.<.l..ER$:..a.v|
00000740: 02 54 B2 54 54 28 4A 29  3A 8B 54 B2 30 A7 54 24  |.T.TT(J):.T.0.T$|
00000750: B2 54 24 AA CA 28 42 4C  24 2C 31 2C 32 34 29 3A  |.T$..(BL$,1,24):|
00000760: 8E 00 7A 0F 80 02 8B 46  4C 28 54 29 B3 31 30 30  |..z....FL(T).100|
00000770: A7 54 24 B2 54 24 AA 22  A0 22 00 93 0F 8A 02 8B  |.T$.T$."."......|
00000780: 46 4C 28 54 29 B3 31 30  20 A7 54 24 B2 54 24 AA  |FL(T).10 .T$.T$.|
00000790: 22 A0 22 00 B6 0F 94 02  54 24 B2 54 24 AA CA 28  |".".....T$.T$..(|
000007A0: C4 28 46 4C 28 54 29 29  2C 32 29 AA 22 A0 22 AA  |.(FL(T)),2).".".|
000007B0: 46 58 24 28 54 29 00 E6  0F 9E 02 8B C3 28 46 58  |FX$(T).......(FX|
000007C0: 24 28 54 29 29 B3 31 36  20 A7 20 54 24 B2 54 24  |$(T)).16 . T$.T$|
000007D0: AA CA 28 42 4C 24 2C 31  2C 31 36 AB C3 28 46 58  |..(BL$,1,16..(FX|
000007E0: 24 28 54 29 29 29 00 02  10 A8 02 54 24 B2 54 24  |$(T))).....T$.T$|
000007F0: AA 22 A0 22 AA C8 28 46  54 24 28 54 29 2C 33 29  |."."..(FT$(T),3)|
00000800: 3A 8E 00 19 10 B2 02 81  49 B2 31 A4 4E 3A 54 54  |:.......I.1.N:TT|
00000810: 28 49 29 B2 49 3A 82 3A  8E 00 4E 10 BC 02 81 49  |(I).I:.:..N....I|
00000820: B2 31 A4 4E AB 31 3A 53  B2 49 3A 81 4A B2 49 AA  |.1.N.1:S.I:.J.I.|
00000830: 31 A4 4E 3A 8B 46 58 24  28 54 54 28 4A 29 29 B3  |1.N:.FX$(TT(J)).|
00000840: 46 58 24 28 54 54 28 53  29 29 A7 53 B2 4A 00 77  |FX$(TT(S)).S.J.w|
00000850: 10 C6 02 82 4A 3A 8B 53  B3 B1 49 A7 54 B2 54 54  |....J:.S..I.T.TT|
00000860: 28 49 29 3A 54 54 28 49  29 B2 54 54 28 53 29 3A  |(I):TT(I).TT(S):|
00000870: 54 54 28 53 29 B2 54 00  80 10 D0 02 82 49 3A 8E  |TT(S).T......I:.|
00000880: 00 00 00                                          |...             |

....... SAVE"DISK SORT & PRINT".E.D.. 53
280,9:.53281,9:.".":.53272,23._.N.. 56,1
56:. SET MEMTOP...X.."..............DISK
 SORT & PRINT"......:W.51:N..1:X.221....
.."....PLAATS DISK, EN VUL ID NUMMER IN 
          .RETURN. ALLES OK  "......"...
....NR ID =";Z$.A. .BL$."               
                         ":L$."ID =  ".Z
$.H....FX$(256),FT$(256),FL(256),TT(256)
...... FORI=1 TO 256:FX$(I)="":FT$(I)=""
:FL(I)=0:TT(I)=0:NEXT.L...."............
.......ALIGN PAPER,"...H.."............"
;.14);"PLEASE WAIT ". .R. 15:.15,8,15:.1
,8,0,"$0":.590:.#1,A$,B$.L....#1,A$,A$:.
#1,A$,B$:C.0:.A$.."".C.F(A$).F....B$..""
.C.C.F(B$).256.X...N.N.1:FL(N).C......#1
,B$:.ST..0.340......B$..G(34).250.....N$
."".O....#1,B$:.B$..G(34).N$.N$.B$:.280.
..".FX$(N).N$...,..#1,B$:.B$.G(32).300..
.6.C$."".".@.C$.C$.B$:.#1,B$:.B$..""  .3
20.?.J.FT$(N).H(C$,3):.ST.0.220.Z.T. 1:B
F.FL(N):N.N.1:.690.H.^. 4:.4,4,7...H..4,
".......................................
..............".M.R.. PRINT#4,CHR$(X);SP
C(51);CHR$(X)...|.T$.G(X)."     >>>. ".F
X$(0)......L$.."".T$.T$."  (".L$.") .".+
...T$.T$.J(BL$,1,W.C(T$).1).G...T$.T$." 
   ".G(X):.4,T$.L....PRINT#4,CHR$(X);SPC
(51);CHR$(X)......4,"...................
..................................".P...
.PRINT#4,CHR$(X);SPC(51);CHR$(X)...B.L.9
:K..((N.1).2):.I.1.K.&.L.T$.G(X):J.I:.63
0:T$.T$." ":J.K.I:.630:T$.T$."  ".G(X).8
.V..4,T$:L.L.1:.._....  PRINT#4,CHR$(X);
SPC(51);CHR$(X).....P..((BF.100.664)..5)
:P$.J(D(P),2).....T$.G(X).J(BL$,1,14).D(
BF)." BLOCKS (".P$." %) FREE.....T$.T$.J
(BL$,1,W.C(T$).1).G(X):.4,T$......  FORI
=LTO27:PRINT#4,CHR$(X);SPC(51);CHR$(X).!
.... NEXT.`....4,"......................
..............................."...&.. P
RINT#4:PRINT#4:PRINT#4:PRINT#4:PRINT#4:P
RINT#4:PRINT#4:PRINT#4...0. 4: 15...:.. 
130.A.D...Y.N..15,ER,ER$:.ER.20.....X..E
R.74.ER.21.ER$.ER$."--IS DISK INSERTED?"
:.620.1.B.ER$."DISK ERROR".D(ER).": ".ER
$.<.L..ER$:..A.V.T.TT(J):.T.0.T$.T$.J(BL
$,1,24):..Z....FL(T).100.T$.T$." "......
FL(T).10 .T$.T$." ".....T$.T$.J(D(FL(T))
,2)." ".FX$(T)......C(FX$(T)).16 . T$.T$
.J(BL$,1,16.C(FX$(T))).....T$.T$." ".H(F
T$(T),3):.......I.1.N:TT(I).I:.:..N....I
.1.N.1:S.I:.J.I.1.N:.FX$(TT(J)).FX$(TT(S
)).S.J.W.F..J:.S..I.T.TT(I):TT(I).TT(S):
TT(S).T...P..I:....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL