GRAPHIC BAM VIEW

FILE INFORMATION

FILENAME(S): GRAPHIC BAM VIEW

FILE TYPE(S): PRG

FILE SIZE: 1.4K

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

APPEARS ON: 1 disk(s)

FILE HASH

dec7ca1cdf06d11581a71158e743c0389aa04e6d47c602c49dc8c415bd3b9fe2

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
C64 HULP 27 1	GRAPHIC BAM VIEW	PRG	DuncanTwain	11	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 04 2E 04 01 00 99 22  93 54 48 49 53 20 50 52  |.......".THIS PR|
00000010: 4F 47 52 41 4D 20 50 52  4F 56 49 44 45 53 20 41  |OGRAM PROVIDES A|
00000020: 20 47 52 41 50 48 49 43  20 56 49 45 57 22 00 59  | GRAPHIC VIEW".Y|
00000030: 04 02 00 99 22 4F 46 20  54 48 45 20 42 41 4D 20  |...."OF THE BAM |
00000040: 4F 4E 20 54 48 45 20 44  49 53 4B 20 49 4E 20 54  |ON THE DISK IN T|
00000050: 48 45 20 32 30 33 31 2E  22 00 88 04 03 00 99 22  |HE 2031."......"|
00000060: 11 11 53 45 43 54 4F 52  53 20 55 53 45 44 20 41  |..SECTORS USED A|
00000070: 52 45 20 49 4E 44 49 43  41 54 45 44 20 42 59 20  |RE INDICATED BY |
00000080: 41 20 43 52 4F 53 53 22  00 CD 04 04 00 99 22 53  |A CROSS"......"S|
00000090: 48 4F 57 4E 20 49 4E 20  52 45 56 45 52 53 45 20  |HOWN IN REVERSE |
000000A0: 46 49 45 4C 44 2E 22 3A  99 22 11 53 45 43 54 4F  |FIELD.":.".SECTO|
000000B0: 52 53 20 4E 4F 54 20 55  53 45 44 20 41 52 45 20  |RS NOT USED ARE |
000000C0: 53 48 4F 57 4E 20 42 59  20 27 A6 27 22 00 FB 04  |SHOWN BY '.'"...|
000000D0: 05 00 99 22 11 11 54 4F  20 53 54 41 52 54 2C 20  |..."..TO START, |
000000E0: 4C 4F 41 44 20 54 48 45  20 44 49 53 4B 20 54 4F  |LOAD THE DISK TO|
000000F0: 20 42 45 20 56 49 45 57  45 44 22 00 1D 05 06 00  | BE VIEWED".....|
00000100: 99 22 41 4E 44 20 50 52  45 53 53 20 54 48 45 20  |."AND PRESS THE |
00000110: 12 53 50 41 43 45 92 20  4B 45 59 2E 22 00 4C 05  |.SPACE. KEY.".L.|
00000120: 07 00 99 22 11 11 41 54  20 43 4F 4E 43 4C 55 53  |..."..AT CONCLUS|
00000130: 49 4F 4E 2C 20 50 52 45  53 53 20 41 4E 59 20 4B  |ION, PRESS ANY K|
00000140: 45 59 20 54 4F 20 53 54  4F 50 2E 22 00 60 05 08  |EY TO STOP.".`..|
00000150: 00 8D 31 30 30 3A 8B 41  24 B3 B1 22 20 22 A7 38  |..100:.A$.." ".8|
00000160: 00 74 05 09 00 44 24 B2  22 30 22 3A 9F 31 35 2C  |.t...D$."0":.15,|
00000170: 38 2C 31 35 00 A1 05 0A  00 98 31 35 2C 22 49 22  |8,15......15,"I"|
00000180: 44 24 3A 4E 55 24 B2 22  A6 A6 A6 A6 A6 A6 A6 A6  |D$:NU$."........|
00000190: A6 A6 A6 A6 A6 A6 A6 A6  A6 A6 A6 22 3A 5A 34 B2  |...........":Z4.|
000001A0: 31 00 B0 05 0B 00 9F 32  2C 38 2C 32 2C 22 23 22  |1......2,8,2,"#"|
000001B0: 00 D5 05 0C 00 59 24 B2  22 13 11 11 11 11 11 11  |.....Y$.".......|
000001C0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000001D0: 11 11 11 11 22 00 08 06  0D 00 58 24 B2 22 1D 1D  |....".....X$."..|
000001E0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
000001F0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000200: 1D 1D 1D 1D 1D 1D 1D 22  00 34 06 0F 00 96 20 A5  |.......".4.... .|
00000210: 53 28 5A 29 20 B2 20 32  AE 28 53 AB B5 28 53 AD  |S(Z) . 2.(S..(S.|
00000220: 38 29 AC 38 29 20 AF 20  28 53 42 28 B5 28 53 AD  |8).8) . (SB(.(S.|
00000230: 38 29 29 29 00 4C 06 13  00 98 31 35 2C 22 55 31  |8))).L....15,"U1|
00000240: 3A 22 3B 32 3B 44 24 3B  31 38 3B 30 00 5E 06 14  |:";2;D$;18;0.^..|
00000250: 00 98 31 35 2C 22 42 2D  50 22 3B 32 3B 31 00 68  |..15,"B-P";2;1.h|
00000260: 06 15 00 99 22 93 22 3B  00 7A 06 16 00 59 B2 32  |....".";.z...Y.2|
00000270: 33 3A 58 B2 31 3A 8D 32  30 30 00 9E 06 19 00 81  |3:X.1:.200......|
00000280: 49 B2 30 A4 32 30 3A 99  3A 99 22 91 91 22 C9 28  |I.0.20:.:."..".(|
00000290: C4 28 49 29 AA 22 20 22  2C 33 29 3B 3A 82 00 A9  |.(I)." ",3);:...|
000002A0: 06 1E 00 A1 23 32 2C 41  24 00 B4 06 1F 00 A1 23  |....#2,A$......#|
000002B0: 32 2C 41 24 00 BF 06 20  00 A1 23 32 2C 41 24 00  |2,A$... ..#2,A$.|
000002C0: C8 06 23 00 54 53 B2 30  00 D4 06 28 00 81 54 B2  |..#.TS.0...(..T.|
000002D0: 31 A4 33 35 00 F4 06 32  00 A1 23 32 2C 53 43 24  |1.35...2..#2,SC$|
000002E0: 3A 53 43 B2 C6 28 C9 28  C7 28 30 29 AA 53 43 24  |:SC..(.(.(0).SC$|
000002F0: 2C 31 29 29 00 01 07 33  00 54 53 B2 54 53 AA 53  |,1))...3.TS.TS.S|
00000300: 43 00 1B 07 34 00 A1 23  32 2C 41 24 3A 8B 41 24  |C...4..#2,A$:.A$|
00000310: B2 22 22 A7 41 24 B2 C7  28 30 29 00 2B 07 35 00  |."".A$..(0).+.5.|
00000320: 53 42 28 30 29 B2 C6 28  41 24 29 00 45 07 36 00  |SB(0)..(A$).E.6.|
00000330: A1 23 32 2C 41 24 3A 8B  41 24 B2 22 22 A7 41 24  |.#2,A$:.A$."".A$|
00000340: B2 C7 28 30 29 00 55 07  37 00 53 42 28 31 29 B2  |..(0).U.7.SB(1).|
00000350: C6 28 41 24 29 00 6F 07  38 00 A1 23 32 2C 41 24  |.(A$).o.8..#2,A$|
00000360: 3A 8B 41 24 B2 22 22 A7  41 24 B2 C7 28 30 29 00  |:.A$."".A$..(0).|
00000370: 7F 07 39 00 53 42 28 32  29 B2 C6 28 41 24 29 00  |..9.SB(2)..(A$).|
00000380: 93 07 3C 00 59 B2 32 34  3A 58 B2 54 AA 33 3A 8D  |..<.Y.24:X.T.3:.|
00000390: 32 30 30 00 BC 07 41 00  99 C8 28 C9 28 C4 28 54  |200...A...(.(.(T|
000003A0: 29 2C 32 29 2C 31 29 22  11 9D 22 C9 28 C4 28 54  |),2),1)"..".(.(T|
000003B0: 29 2C 31 29 3B 22 9D 91  91 91 22 3B 00 EA 07 44  |),1);"....";...D|
000003C0: 00 8F 20 20 50 52 49 4E  54 54 22 20 20 20 22 53  |..  PRINTT"   "S|
000003D0: 43 22 20 20 22 53 42 28  30 29 22 20 22 53 42 28  |C"  "SB(0)" "SB(|
000003E0: 31 29 22 20 22 53 42 28  32 29 00 FB 07 45 00 8F  |1)" "SB(2)...E..|
000003F0: 20 20 4E 45 58 54 54 3A  45 4E 44 00 07 08 46 00  |  NEXTT:END...F.|
00000400: 81 53 B2 30 A4 32 30 00  14 08 47 00 8B 54 B3 31  |.S.0.20...G..T.1|
00000410: 38 A7 37 36 00 36 08 48  00 8B 54 B1 33 30 AF 53  |8.76.6.H..T.30.S|
00000420: B1 31 36 A7 3A 99 CA 28  4E 55 24 2C 5A 34 2C 31  |.16.:..(NU$,Z4,1|
00000430: 29 3B 3A 89 39 30 00 58  08 49 00 8B 54 B1 32 34  |);:.90.X.I..T.24|
00000440: AF 53 B1 31 37 A7 3A 99  CA 28 4E 55 24 2C 5A 34  |.S.17.:..(NU$,Z4|
00000450: 2C 31 29 3B 3A 89 39 30  00 81 08 4B 00 8B 54 B1  |,1);:.90...K..T.|
00000460: 31 37 AF 53 B1 31 38 A7  99 CA 28 4E 55 24 2C 5A  |17.S.18...(NU$,Z|
00000470: 34 2C 31 29 3B 3A 5A 34  B2 5A 34 AA 31 3A 89 39  |4,1);:Z4.Z4.1:.9|
00000480: 30 00 8B 08 4C 00 99 22  12 22 3B 00 A5 08 50 00  |0...L..".";...P.|
00000490: 8B 20 A5 53 28 53 29 B2  30 20 A7 20 99 22 DB 22  |. .S(S).0 . ."."|
000004A0: 3B 3A 89 39 30 00 C4 08  55 00 99 22 92 DB 22 3B  |;:.90...U.."..";|
000004B0: 3A 8F 52 49 47 48 54 24  28 53 54 52 24 28 53 29  |:.RIGHT$(STR$(S)|
000004C0: 2C 31 29 3B 00 D0 08 5A  00 99 22 91 9D 92 22 3B  |,1);...Z.."...";|
000004D0: 00 D9 08 5B 00 82 53 2C  54 00 E3 08 5F 00 99 22  |...[..S,T..._.."|
000004E0: 13 22 3B 00 F7 08 60 00  98 31 35 2C 22 42 2D 50  |.";...`..15,"B-P|
000004F0: 22 3B 32 3B 31 34 34 00  1B 09 61 00 4E 24 B2 22  |";2;144...a.N$."|
00000500: 22 3A 81 49 B2 31 A4 32  30 3A A1 23 32 2C 41 24  |":.I.1.20:.#2,A$|
00000510: 3A 4E 24 B2 4E 24 AA 41  24 3A 82 00 39 09 62 00  |:N$.N$.A$:..9.b.|
00000520: 99 22 20 20 22 4E 24 22  20 22 54 53 22 42 4C 4F  |."  "N$" "TS"BLO|
00000530: 43 4B 53 20 46 52 45 45  22 00 4F 09 63 00 98 31  |CKS FREE".O.c..1|
00000540: 35 2C 22 49 22 AA 44 24  3A 8D 31 30 30 3A 90 00  |5,"I".D$:.100:..|
00000550: 63 09 64 00 A1 41 24 3A  8B 41 24 B3 B1 22 22 A7  |c.d..A$:.A$.."".|
00000560: 31 30 30 00 75 09 6E 00  A1 41 24 3A 8B 41 24 B3  |100.u.n..A$:.A$.|
00000570: B1 22 22 A7 8E 00 7F 09  78 00 89 20 31 31 30 00  |."".....x.. 110.|
00000580: 97 09 C8 00 99 C8 28 59  24 2C 59 29 C8 28 58 24  |......(Y$,Y).(X$|
00000590: 2C 58 29 22 9D 22 3B 00  9D 09 D2 00 8E 00 00 00  |,X)".";.........|
000005A0: D7                                                |.               |

.......".THIS PROGRAM PROVIDES A GRAPHIC
 VIEW".Y...."OF THE BAM ON THE DISK IN T
HE 2031."......"..SECTORS USED ARE INDIC
ATED BY A CROSS".M...."SHOWN IN REVERSE 
FIELD.":.".SECTORS NOT USED ARE SHOWN BY
 '.'"......"..TO START, LOAD THE DISK TO
 BE VIEWED"......"AND PRESS THE .SPACE. 
KEY.".L...."..AT CONCLUSION, PRESS ANY K
EY TO STOP.".`....100:.A$.." ".8.T...D$.
"0":.15,8,15......15,"I"D$:NU$."........
...........":Z4.1......2,8,2,"#".U...Y$.
"...........................".....X$."..
......................................."
.4.... .S(Z) . 2.(S..(S.8).8) . (SB(.(S.
8))).L....15,"U1:";2;D$;18;0.^....15,"B-
P";2;1.H....".";.Z...Y.23:X.1:.200......
I.0.20:.:.".."I(D(I)." ",3);:.......#2,A
$......#2,A$... ..#2,A$.H.#.TS.0.T.(..T.
1.35...2..#2,SC$:SC.F(I(G(0).SC$,1))...3
.TS.TS.SC...4..#2,A$:.A$."".A$.G(0).+.5.
SB(0).F(A$).E.6..#2,A$:.A$."".A$.G(0).U.
7.SB(1).F(A$).O.8..#2,A$:.A$."".A$.G(0).
.9.SB(2).F(A$)...<.Y.24:X.T.3:.200...A.
.H(I(D(T),2),1)".."I(D(T),1);"....";...D
..  PRINTT"   "SC"  "SB(0)" "SB(1)" "SB(
2)...E..  NEXTT:END...F..S.0.20...G..T.1
8.76.6.H..T.30.S.16.:.J(NU$,Z4,1);:.90.X
.I..T.24.S.17.:.J(NU$,Z4,1);:.90...K..T.
17.S.18..J(NU$,Z4,1);:Z4.Z4.1:.90...L.."
.";...P.. .S(S).0 . .".";:.90.D.U.."..";
:.RIGHT$(STR$(S),1);.P.Z.."...";.Y.[..S,
T..._..".";...`..15,"B-P";2;144...A.N$."
":.I.1.20:.#2,A$:N$.N$.A$:..9.B.."  "N$"
 "TS"BLOCKS FREE".O.C..15,"I".D$:.100:..
C.D..A$:.A$.."".100.U.N..A$:.A$..""....
X.. 110...H..H(Y$,Y)H(X$,X)".";...R.....
W

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL