BAM READ & PRINT

FILE INFORMATION

FILENAME(S): BAM READ & PRINT

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-11-30 21:23:45

APPEARS ON: 1 disk(s)

FILE HASH

3e0eb90bfb3b04e56e268bd792fb5ca86d41450065b35c9fd20031e339d0a431

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
C64 HULP 25 1	BAM READ & PRINT	PRG	DuncanTwain	10	7	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 09 08 01 00 89 31  30 00 1D 08 02 00 42 41  |.......10.....BA|
00000010: 4D 20 44 49 53 50 4C 41  59 20 26 20 99 00 30 08  |M DISPLAY & ..0.|
00000020: 03 00 81 20 43 4F 4D 4D  4F 44 B0 45 20 36 34 2C  |... COMMOD.E 64,|
00000030: 00 47 08 04 00 AB 31 35  34 31 20 44 49 53 4B 20  |.G....1541 DISK |
00000040: 44 52 49 56 45 20 26 00  5A 08 05 00 AB 31 35 32  |DRIVE &.Z....152|
00000050: 35 AD 31 35 32 36 20 99  45 52 00 70 08 06 00 42  |5.1526 .ER.p...B|
00000060: 59 20 4D 20 41 20 4B 45  56 45 4C 53 91 20 50 45  |Y M A KEVELS. PE|
00000070: 00 83 08 07 00 41 50 52  49 4C 20 33 30 2C 20 31  |.....APRIL 30, 1|
00000080: 39 38 34 00 89 08 0A 00  9C 00 A5 08 0F 00 97 35  |984............5|
00000090: 33 32 38 30 2C 38 3A 97  35 33 32 38 31 2C 31 3A  |3280,8:.53281,1:|
000000A0: 99 22 90 22 3B 00 C9 08  14 00 53 50 24 B2 22 20  |.".";.....SP$." |
000000B0: 20 20 20 20 20 20 20 22  3A 4E 55 24 B2 22 31 32  |       ":NU$."12|
000000C0: 33 34 35 36 37 38 39 30  22 00 F5 08 19 00 99 22  |34567890"......"|
000000D0: 93 20 20 20 20 20 42 41  4D 20 44 49 53 50 4C 41  |.     BAM DISPLA|
000000E0: 59 20 42 59 20 4D 4F 52  54 4F 4E 20 4B 45 56 45  |Y BY MORTON KEVE|
000000F0: 4C 53 4F 4E 22 00 21 09  1E 00 99 22 11 11 11 11  |LSON".!...."....|
00000100: 11 20 20 20 20 20 20 20  20 20 20 12 53 92 43 52  |.          .S.CR|
00000110: 45 45 4E 20 4F 52 20 12  50 92 52 49 4E 54 45 52  |EEN OR .P.RINTER|
00000120: 22 00 35 09 28 00 A1 50  52 24 3A 8B 50 52 24 B2  |".5.(..PR$:.PR$.|
00000130: 22 22 89 34 30 00 45 09  32 00 86 53 45 25 28 33  |"".40.E.2..SE%(3|
00000140: 35 2C 32 31 29 00 5B 09  3C 00 9F 31 35 2C 38 2C  |5,21).[.<..15,8,|
00000150: 31 35 3A 98 31 35 2C 22  49 30 22 00 6A 09 46 00  |15:.15,"I0".j.F.|
00000160: 9F 31 2C 38 2C 32 2C 22  23 22 00 81 09 50 00 98  |.1,8,2,"#"...P..|
00000170: 31 35 2C 22 55 31 3A 22  3B 32 3B 30 3B 31 38 3B  |15,"U1:";2;0;18;|
00000180: 30 00 93 09 5A 00 98 31  35 2C 22 42 2D 50 3A 22  |0...Z..15,"B-P:"|
00000190: 32 3B 34 00 AD 09 64 00  81 54 52 B2 31 A4 33 35  |2;4...d..TR.1.35|
000001A0: 3A 99 22 93 54 52 41 43  4B 22 3B 54 52 00 D5 09  |:.".TRACK";TR...|
000001B0: 6E 00 A1 23 31 2C 43 4F  24 3A 53 45 25 28 54 52  |n..#1,CO$:SE%(TR|
000001C0: 2C 32 31 29 B2 C6 28 C9  28 C7 28 30 29 AA 43 4F  |,21)..(.(.(0).CO|
000001D0: 24 2C 31 29 29 00 E9 09  78 00 81 47 52 B2 30 A4  |$,1))...x..GR.0.|
000001E0: 32 3A A1 23 31 2C 47 52  24 00 01 0A 82 00 47 25  |2:.#1,GR$.....G%|
000001F0: B2 C6 28 C9 28 C7 28 30  29 AA 47 52 24 2C 31 29  |..(.(.(0).GR$,1)|
00000200: 29 00 0D 0A 8C 00 81 42  54 B2 30 A4 37 00 1E 0A  |)......BT.0.7...|
00000210: 96 00 43 4B B2 32 AE 42  54 20 AF 20 47 25 00 2D  |..CK.2.BT . G%.-|
00000220: 0A A0 00 42 4C B2 42 54  AA 38 AC 47 52 00 3C 0A  |...BL.BT.8.GR.<.|
00000230: AA 00 8B 42 4C B1 32 30  89 32 30 30 00 56 0A B4  |...BL.20.200.V..|
00000240: 00 8B 43 4B A7 53 45 25  28 54 52 2C 42 4C 29 B2  |..CK.SE%(TR,BL).|
00000250: 31 3A 89 32 30 30 00 67  0A BE 00 53 45 25 28 54  |1:.200.g...SE%(T|
00000260: 52 2C 42 4C 29 B2 30 00  75 0A C8 00 82 42 54 2C  |R,BL).0.u....BT,|
00000270: 47 52 2C 54 52 00 80 0A  D2 00 A0 31 3A A0 31 35  |GR,TR......1:.15|
00000280: 00 91 0A DC 00 8B 50 52  24 B2 22 50 22 89 34 30  |......PR$."P".40|
00000290: 30 00 C0 0A E6 00 99 22  20 20 20 20 3C 3C 3C 3C  |0......"    <<<<|
000002A0: 3C 3C 3C 3C 3C 3C 20 54  52 41 43 4B 20 20 4E 55  |<<<<<< TRACK  NU|
000002B0: 4D 42 45 52 20 3E 3E 3E  3E 3E 3E 3E 3E 3E 3E 22  |MBER >>>>>>>>>>"|
000002C0: 00 E4 0A F0 00 99 22 20  20 20 20 22 3B 3A 81 49  |......"    ";:.I|
000002D0: B2 31 A4 33 3A 99 53 50  24 3B C4 28 49 29 3B 3A  |.1.3:.SP$;.(I);:|
000002E0: 82 49 3A 99 00 0A 0B FA  00 99 22 20 20 20 20 22  |.I:......."    "|
000002F0: 3B 3A 81 49 B2 31 A4 33  3A 99 4E 55 24 3B 3A 82  |;:.I.1.3:.NU$;:.|
00000300: 49 3A 99 22 31 32 33 34  35 22 00 16 0B 04 01 99  |I:."12345"......|
00000310: 22 42 4C 4B 23 22 00 23  0B 0E 01 81 42 4C B2 30  |"BLK#".#....BL.0|
00000320: A4 31 39 00 4C 0B 18 01  54 B2 33 34 AA 31 38 AC  |.19.L...T.34.18.|
00000330: 28 42 4C B1 31 38 29 AA  31 31 AC 28 42 4C B2 31  |(BL.18).11.(BL.1|
00000340: 38 29 AA 35 AC 28 42 4C  B2 31 37 29 00 67 0B 22  |8).5.(BL.17).g."|
00000350: 01 99 C9 28 22 20 20 20  22 AA C4 28 42 4C 29 AA  |...("   "..(BL).|
00000360: 22 20 22 2C 34 29 3B 00  73 0B 2C 01 81 54 52 B2  |" ",4);.s.,..TR.|
00000370: 31 A4 54 00 8C 0B 36 01  99 CA 28 C4 28 53 45 25  |1.T...6...(.(SE%|
00000380: 28 54 52 2C 42 4C 29 29  2C 32 29 3B 00 94 0B 40  |(TR,BL)),2);...@|
00000390: 01 82 54 52 00 AC 0B 4A  01 99 CA 28 C4 28 53 45  |..TR...J...(.(SE|
000003A0: 25 28 54 52 2C 42 4C 29  29 2C 32 29 00 B4 0B 54  |%(TR,BL)),2)...T|
000003B0: 01 82 42 4C 00 C1 0B 5E  01 99 22 20 32 30 20 22  |..BL...^.." 20 "|
000003C0: 3B 00 CE 0B 68 01 81 54  52 B2 31 A4 31 37 00 E7  |;...h..TR.1.17..|
000003D0: 0B 72 01 99 CA 28 C4 28  53 45 25 28 54 52 2C 32  |.r...(.(SE%(TR,2|
000003E0: 30 29 29 2C 32 29 3B 00  EF 0B 7C 01 82 54 52 00  |0)),2);...|..TR.|
000003F0: F8 0B 86 01 89 35 34 30  00 05 0C 90 01 9F 34 2C  |.....540......4,|
00000400: 34 3A 98 34 2C 00 36 0C  9A 01 98 34 2C 22 20 20  |4:.4,.6....4,"  |
00000410: 20 20 3C 3C 3C 3C 3C 3C  3C 3C 3C 3C 20 54 52 41  |  <<<<<<<<<< TRA|
00000420: 43 4B 20 20 4E 55 4D 42  45 52 20 3E 3E 3E 3E 3E  |CK  NUMBER >>>>>|
00000430: 3E 3E 3E 3E 3E 22 00 5F  0C A4 01 98 34 2C 22 20  |>>>>>"._....4," |
00000440: 20 20 20 22 3B 3A 81 49  B2 31 A4 33 3A 98 34 2C  |   ";:.I.1.3:.4,|
00000450: 53 50 24 3B C4 28 49 29  3B 3A 82 49 3A 98 34 00  |SP$;.(I);:.I:.4.|
00000460: 8B 0C AE 01 98 34 2C 22  20 20 20 20 22 3B 3A 81  |.....4,"    ";:.|
00000470: 49 B2 31 A4 33 3A 98 34  2C 4E 55 24 3B 3A 82 49  |I.1.3:.4,NU$;:.I|
00000480: 3A 98 34 2C 22 31 32 33  34 35 22 00 99 0C B8 01  |:.4,"12345".....|
00000490: 98 34 2C 22 42 4C 4B 23  22 00 A6 0C C2 01 81 42  |.4,"BLK#"......B|
000004A0: 4C B2 30 A4 32 30 00 CF  0C CC 01 54 B2 33 34 AA  |L.0.20.....T.34.|
000004B0: 31 38 AC 28 42 4C B1 31  38 29 AA 31 31 AC 28 42  |18.(BL.18).11.(B|
000004C0: 4C B2 31 38 29 AA 35 AC  28 42 4C B2 31 37 29 00  |L.18).5.(BL.17).|
000004D0: EC 0C D6 01 98 34 2C C9  28 22 20 20 20 22 AA C4  |.....4,.("   "..|
000004E0: 28 42 4C 29 AA 22 20 22  2C 34 29 3B 00 F8 0C E0  |(BL)." ",4);....|
000004F0: 01 81 54 52 B2 31 A4 54  00 13 0D EA 01 98 34 2C  |..TR.1.T......4,|
00000500: CA 28 C4 28 53 45 25 28  54 52 2C 42 4C 29 29 2C  |.(.(SE%(TR,BL)),|
00000510: 32 29 3B 00 1B 0D F4 01  82 54 52 00 35 0D FE 01  |2);......TR.5...|
00000520: 98 34 2C CA 28 C4 28 53  45 25 28 54 52 2C 42 4C  |.4,.(.(SE%(TR,BL|
00000530: 29 29 2C 32 29 00 3D 0D  08 02 82 42 4C 00 4D 0D  |)),2).=....BL.M.|
00000540: 12 02 98 34 2C 3A A0 34  3A 89 32 33 30 00 60 0D  |...4,:.4:.230.`.|
00000550: 1C 02 A1 41 24 3A 8B 41  24 B2 22 22 89 35 34 30  |...A$:.A$."".540|
00000560: 00 8B 0D 26 02 99 3A 99  22 48 49 54 20 41 20 4B  |...&..:."HIT A K|
00000570: 45 59 20 57 48 45 4E 20  4E 45 58 54 20 44 49 53  |EY WHEN NEXT DIS|
00000580: 4B 20 49 53 20 52 45 41  44 59 22 00 9E 0D 30 02  |K IS READY"...0.|
00000590: A1 41 24 3A 8B 41 24 B2  22 22 89 35 36 30 00 A6  |.A$:.A$."".560..|
000005A0: 0D 3A 02 89 31 30 00 00  00 00                    |.:..10....      |

.......10.....BAM DISPLAY & ..0.... COMM
OD.E 64,.G....1541 DISK DRIVE &.Z....152
5.1526 .ER.P...BY M A KEVELS. PE.....APR
IL 30, 1984............53280,8:.53281,1:
.".";.I...SP$."        ":NU$."1234567890
"......".     BAM DISPLAY BY MORTON KEVE
LSON".!....".....          .S.CREEN OR .
P.RINTER".5.(..PR$:.PR$."".40.E.2..SE%(3
5,21).[.<..15,8,15:.15,"I0".J.F..1,8,2,"
#"...P..15,"U1:";2;0;18;0...Z..15,"B-P:"
2;4...D..TR.1.35:.".TRACK";TR.U.N..#1,CO
$:SE%(TR,21).F(I(G(0).CO$,1))...X..GR.0.
2:.#1,GR$.....G%.F(I(G(0).GR$,1))......B
T.0.7.....CK.2.BT . G%.-. .BL.BT.8.GR.<.
...BL.20.200.V....CK.SE%(TR,BL).1:.200.G
...SE%(TR,BL).0.U.H..BT,GR,TR...R. 1: 15
......PR$."P".400......"    <<<<<<<<<< T
RACK  NUMBER >>>>>>>>>>"......"    ";:.I
.1.3:.SP$;D(I);:.I:......."    ";:.I.1.3
:.NU$;:.I:."12345"......"BLK#".#....BL.0
.19.L...T.34.18.(BL.18).11.(BL.18).5.(BL
.17).G."..I("   ".D(BL)." ",4);.S.,..TR.
1.T...6..J(D(SE%(TR,BL)),2);...@..TR...J
..J(D(SE%(TR,BL)),2)...T..BL.A.^.." 20 "
;.N.H..TR.1.17...R..J(D(SE%(TR,20)),2);.
..|..TR......540......4,4:.4,.6....4,"  
  <<<<<<<<<< TRACK  NUMBER >>>>>>>>>>"._
....4,"    ";:.I.1.3:.4,SP$;D(I);:.I:.4.
.....4,"    ";:.I.1.3:.4,NU$;:.I:.4,"123
45"......4,"BLK#"...B..BL.0.20.O.L.T.34.
18.(BL.18).11.(BL.18).5.(BL.17)...V..4,I
("   ".D(BL)." ",4);......TR.1.T......4,
J(D(SE%(TR,BL)),2);......TR.5....4,J(D(S
E%(TR,BL)),2).=....BL.M....4,: 4:.230.`.
...A$:.A$."".540...&..:."HIT A KEY WHEN 
NEXT DISK IS READY"...0..A$:.A$."".560..
.:..10....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL