HEAD ALIGNMENT
FILE INFORMATION
FILENAME(S): HEAD ALIGNMENT
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-12-02 02:14:52
APPEARS ON: 1 disk(s)
FILE HASH
277fb5bbae4e4af08a0bc10e1b1782662ae257d5227c4105d25745d5a670f00f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PANS TOOLS 07 | HEAD ALIGNMENT | PRG | The BAM Archive | 7 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 40 08 04 00 8F 20 56 49 43 31 35 34 30 20 |..@.... VIC1540 | 00000010: 41 4C 49 47 4E 20 42 59 20 4B 4E 55 44 20 48 41 |ALIGN BY KNUD HA| 00000020: 4E 53 C5 4E 20 44 2E 31 33 2D 36 2D 38 32 20 43 |NS.N D.13-6-82 C| 00000030: 4F 4D 4D CF 44 4F 52 45 20 44 45 4E 4D 41 52 4B |OMM.DORE DENMARK| 00000040: 00 55 08 05 00 99 C7 28 31 34 29 3A 97 35 33 32 |.U.....(14):.532| 00000050: 38 31 2C 31 34 00 89 08 07 00 99 22 93 22 3A 99 |81,14......".":.| 00000060: A3 30 34 29 22 11 11 1C C8 C5 C1 C4 20 C1 CC C9 |.04)"....... ...| 00000070: C7 CE CD C5 CE D4 A0 1F 22 3A 99 A3 39 29 22 D6 |........":..9)".| 00000080: C9 C3 20 31 35 34 30 20 22 00 A0 08 08 00 99 A3 |.. 1540 ".......| 00000090: 35 29 22 41 4E 44 20 43 42 4D 20 32 30 33 31 22 |5)"AND CBM 2031"| 000000A0: 00 A8 08 0A 00 99 3A 99 00 B7 08 0F 00 44 4E B2 |......:......DN.| 000000B0: 30 38 3A 54 B2 31 37 00 BE 08 14 00 A0 31 00 F2 |08:T.17......1..| 000000C0: 08 23 00 99 3A 99 A3 30 33 29 22 C9 4E 53 45 52 |.#..:..03)".NSER| 000000D0: 54 20 41 4C 49 47 4E 4D 45 4E 54 20 44 49 53 4B |T ALIGNMENT DISK| 000000E0: 20 20 20 20 20 50 52 45 53 53 20 12 53 50 41 43 | PRESS .SPAC| 000000F0: 45 92 00 06 09 25 00 A1 48 24 3A 8B 48 24 B3 B1 |E....%..H$:.H$..| 00000100: 22 20 22 A7 33 37 00 0F 09 27 00 99 22 93 22 00 |" ".37...'..".".| 00000110: 1C 09 28 00 9F 31 2C 44 4E 2C 31 35 00 2D 09 32 |..(..1,DN,15.-.2| 00000120: 00 49 24 B2 22 49 22 3A 98 31 2C 49 24 00 36 09 |.I$."I":.1,I$.6.| 00000130: 4E 00 99 22 93 22 00 5D 09 50 00 99 22 13 22 3A |N..".".].P..".":| 00000140: 99 A3 30 32 29 22 11 11 1C 20 20 20 2A 20 C3 CF |..02)"... * ..| 00000150: CD CD C1 CE C4 D3 20 2A 20 20 20 1F 22 00 8B 09 |...... * ."...| 00000160: 52 00 99 A3 30 37 29 22 20 20 20 20 20 20 20 20 |R...07)" | 00000170: 22 3A 99 A3 30 32 29 22 11 12 49 92 20 3D 20 4F |":..02)"..I. = O| 00000180: 4E 45 20 53 54 45 50 20 49 4E 22 00 AA 09 53 00 |NE STEP IN"...S.| 00000190: 99 A3 30 32 29 22 11 12 4F 92 20 3D 20 4F 4E 45 |..02)"..O. = ONE| 000001A0: 20 53 54 45 50 20 4F 55 54 22 00 CA 09 54 00 99 | STEP OUT"...T..| 000001B0: A3 30 32 29 22 11 12 42 92 20 3D 20 42 55 4D 50 |.02)"..B. = BUMP| 000001C0: 20 20 20 20 20 20 20 20 20 22 00 E6 09 55 00 99 | "...U..| 000001D0: A3 30 32 29 22 11 12 48 92 20 3D 20 48 59 53 54 |.02)"..H. = HYST| 000001E0: 45 52 45 53 49 53 00 FE 09 57 00 99 A3 30 32 29 |ERESIS...W...02)| 000001F0: 22 11 12 44 92 20 3D 20 44 4F 4E 45 20 22 00 19 |"..D. = DONE "..| 00000200: 0A 58 00 99 A3 30 32 29 22 11 12 54 92 20 3D 20 |.X...02)"..T. = | 00000210: 52 2F 57 20 54 45 53 54 22 00 37 0A 59 00 99 A3 |R/W TEST".7.Y...| 00000220: 30 32 29 22 11 54 52 41 43 4B 20 4E 52 3A 20 20 |02)".TRACK NR: | 00000230: 20 9D 9D 9D 22 3B 54 00 56 0A 5A 00 4A 42 B2 31 | ...";T.V.Z.JB.1| 00000240: 37 36 3A A1 42 24 3A 8B 42 24 B2 22 22 A7 8D 31 |76:.B$:.B$.""..1| 00000250: 35 30 3A 89 39 30 00 72 0A 64 00 8B 42 24 B2 22 |50:.90.r.d..B$."| 00000260: 49 22 A7 3A 54 B2 54 AA 31 3A 8D 31 35 30 3A 89 |I".:T.T.1:.150:.| 00000270: 38 30 00 8E 0A 6E 00 8B 42 24 B2 22 4F 22 A7 3A |80...n..B$."O".:| 00000280: 54 B2 54 AB 31 3A 8D 31 35 30 3A 89 38 30 00 AF |T.T.1:.150:.80..| 00000290: 0A 73 00 8B 42 24 B2 22 42 22 A7 4A 42 B2 31 39 |.s..B$."B".JB.19| 000002A0: 32 3A 54 B2 31 37 3A 8D 31 35 30 3A 89 38 30 00 |2:T.17:.150:.80.| 000002B0: C7 0A 78 00 8B 42 24 B2 22 48 22 A7 4A 42 B2 31 |..x..B$."H".JB.1| 000002C0: 37 36 3A 89 B2 30 30 00 DC 0A 7D 00 8B 42 24 B2 |76:..00...}..B$.| 000002D0: 22 44 22 A7 54 B2 31 3A 89 35 30 30 00 F3 0A 82 |"D".T.1:.500....| 000002E0: 00 8B 42 24 B2 22 54 22 A7 8D 38 30 30 3A 89 31 |..B$."T"..800:.1| 000002F0: 32 30 30 00 04 0B 8C 00 8B 42 24 B3 B1 22 54 22 |200......B$.."T"| 00000300: A7 89 38 30 00 32 0B 96 00 8B 54 B3 31 A7 99 A3 |..80.2....T.1...| 00000310: 30 32 29 22 12 1C 11 4D 49 4E 2E 20 31 22 3A 81 |02)"...MIN. 1":.| 00000320: 58 B2 31 A4 35 30 30 3A 82 3A 99 22 93 22 3A 54 |X.1.500:.:.".":T| 00000330: B2 31 00 63 0B 9B 00 8B 54 B1 33 35 A7 99 A3 30 |.1.c....T.35...0| 00000340: 32 29 22 12 9C 11 4D 41 58 2E 20 33 35 22 3A 81 |2)"...MAX. 35":.| 00000350: 58 B2 31 A4 35 30 30 3A 82 3A 99 22 93 22 3A 54 |X.1.500:.:.".":T| 00000360: B2 33 35 00 80 0B 9D 00 98 31 2C 22 4D 2D 57 22 |.35......1,"M-W"| 00000370: C7 28 36 29 C7 28 30 29 C7 28 31 29 C7 28 54 29 |.(6).(0).(1).(T)| 00000380: 00 9E 0B A0 00 98 31 2C 22 4D 2D 57 22 C7 28 30 |......1,"M-W".(0| 00000390: 29 C7 28 30 29 C7 28 31 29 C7 28 4A 42 29 00 B3 |).(0).(1).(JB)..| 000003A0: 0B AA 00 98 31 2C 22 4D 2D 52 22 C7 28 30 29 C7 |....1,"M-R".(0).| 000003B0: 28 30 29 00 D8 0B B4 00 A1 23 31 2C 58 24 3A 59 |(0)......#1,X$:Y| 000003C0: 24 B2 58 24 AA C7 28 30 29 3A 8B C6 28 59 24 29 |$.X$..(0):..(Y$)| 000003D0: B1 31 32 37 A7 31 37 30 00 DE 0B BE 00 8E 00 EA |.127.170........| 000003E0: 0B C8 00 48 59 B2 48 59 AA 31 00 09 0C D2 00 8B |...HY.HY.1......| 000003F0: 48 59 AF 31 A7 D4 B2 54 AA 34 3A 8D 31 35 30 3A |HY.1...T.4:.150:| 00000400: 54 B2 54 AB 34 3A 89 38 30 00 22 0C DC 00 54 B2 |T.T.4:.80."...T.| 00000410: 54 AB 34 3A 8D 31 35 30 3A 54 B2 54 AA 34 3A 89 |T.4:.150:T.T.4:.| 00000420: 38 30 00 49 0C F4 01 99 22 93 11 11 1C 20 C1 C4 |80.I....".... ..| 00000430: CA D5 D3 D4 CD C5 CE D4 20 CF C6 20 D4 D2 C1 C3 |........ .. ....| 00000440: CB 31 20 20 D3 D4 CF D0 22 00 90 0C FE 01 99 22 |.1 ...."......"| 00000450: 11 11 1F 20 C1 44 4A 55 53 54 20 43 41 52 52 49 |... .DJUST CARRI| 00000460: 41 47 45 20 4C 49 4D 49 54 20 53 54 4F 50 20 50 |AGE LIMIT STOP P| 00000470: 4C 41 54 45 20 46 4F 52 20 30 2E 30 31 30 20 20 |LATE FOR 0.010 | 00000480: 49 4E 43 48 20 43 4C 45 41 52 41 4E 43 45 20 22 |INCH CLEARANCE "| 00000490: 00 D1 0C 08 02 99 22 20 42 45 54 57 45 45 4E 20 |......" BETWEEN | 000004A0: 4C 49 4D 49 54 20 53 54 4F 50 20 2D 20 20 50 4C |LIMIT STOP - PL| 000004B0: 41 54 45 20 41 4E 44 20 48 55 42 20 4F 46 20 20 |ATE AND HUB OF | 000004C0: 20 20 20 20 53 54 45 50 50 45 52 20 43 41 4D 2E | STEPPER CAM.| 000004D0: 22 00 FB 0C 12 02 99 A3 35 29 22 11 11 11 D0 52 |".......5)"....R| 000004E0: 45 53 53 20 12 53 50 41 43 45 92 22 3A 99 A3 36 |ESS .SPACE.":..6| 000004F0: 29 22 11 57 48 45 4E 20 CF CB 22 00 04 0D 1C 02 |)".WHEN ..".....| 00000500: 8D 31 35 30 00 1A 0D 26 02 A1 43 24 3A 8B 43 24 |.150...&..C$:.C$| 00000510: B3 B1 22 20 22 A7 89 35 34 30 00 2F 0D 30 02 4A |.." "..540./.0.J| 00000520: 42 B2 31 39 32 3A 54 B2 31 37 3A 8D 31 35 30 00 |B.192:T.17:.150.| 00000530: 3A 0D 35 02 4A 42 B2 31 37 36 00 55 0D 3A 02 99 |:.5.JB.176.U.:..| 00000540: 22 93 11 11 11 20 C9 53 20 43 41 54 53 20 45 59 |".... .S CATS EY| 00000550: 45 20 4F 4B 3F 00 6D 0D 44 02 99 22 11 11 11 11 |E OK?.m.D.."....| 00000560: 20 D0 52 C5 53 53 20 12 D9 2F CE 92 22 00 86 0D | .R.SS ../.."...| 00000570: 4E 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 8D 31 35 |N..A$:.A$.""..15| 00000580: 30 3A 89 35 39 30 00 97 0D 58 02 8B 41 24 B2 22 |0:.590...X..A$."| 00000590: 59 22 A7 89 38 30 30 00 A7 0D 62 02 8B 41 24 B2 |Y"..800...b..A$.| 000005A0: 22 4E 22 A7 89 37 38 00 B9 0D 64 02 8B 41 24 B3 |"N"..78...d..A$.| 000005B0: B1 22 59 22 A7 89 35 39 30 00 D3 0D 20 03 41 46 |."Y"..590... .AF| 000005C0: B2 30 3A A0 37 3A A0 31 35 3A 9F 31 35 2C 44 4E |.0:.7:.15:.15,DN| 000005D0: 2C 31 35 00 EE 0D 34 03 99 22 93 22 3A 99 A3 37 |,15...4..".":..7| 000005E0: 29 22 11 11 1C D2 2F D7 20 D4 C5 D3 D4 22 00 19 |)"..../. ...."..| 000005F0: 0E 3E 03 99 22 11 11 1F 20 C9 4E 53 45 52 54 20 |.>.."... .NSERT | 00000600: 46 4F 52 4D 41 54 45 44 20 44 49 53 4B 20 20 20 |FORMATED DISK | 00000610: 20 20 20 20 A0 20 20 20 22 00 34 0E 48 03 99 A3 | . ".4.H...| 00000620: 36 29 22 11 11 11 D0 52 45 53 53 20 12 53 50 41 |6)"....RESS .SPA| 00000630: 43 45 92 22 00 49 0E 52 03 A1 44 24 3A 8B 44 24 |CE.".I.R..D$:.D$| 00000640: B3 B1 22 20 22 A7 38 35 30 00 6D 0E 5C 03 4E 24 |.." ".850.m.\.N$| 00000650: B2 22 4E 22 AA C4 28 30 29 AA 22 3A 22 3A 46 44 |."N"..(0).":":FD| 00000660: 24 B2 22 54 45 53 54 22 3A 41 46 B2 30 00 84 0E |$."TEST":AF.0...| 00000670: 66 03 99 22 11 1C 20 CE 45 57 49 4E 47 20 54 45 |f..".. .EWING TE| 00000680: 53 54 1F 22 00 A7 0E 70 03 41 47 B2 30 3A 98 31 |ST."...p.AG.0:.1| 00000690: 35 2C 4E 24 2C 46 44 24 3A 8D 31 30 30 30 3A 8B |5,N$,FD$:.1000:.| 000006A0: 41 47 A7 41 46 B2 31 00 C8 0E 7A 03 99 22 11 11 |AG.AF.1...z.."..| 000006B0: 20 4E 45 57 49 4E 47 20 54 45 53 54 22 3B 3A 8B | NEWING TEST";:.| 000006C0: 41 46 A7 99 22 12 22 3B 00 D9 0E 84 03 99 42 24 |AF..".";......B$| 000006D0: 3A 8B 41 46 A7 31 31 30 30 00 E9 0E 8E 03 81 49 |:.AF.1100......I| 000006E0: B2 31 A4 31 30 30 30 3A 82 00 F9 0E 98 03 9F 37 |.1.1000:.......7| 000006F0: 2C 44 4E 2C 37 2C 22 23 22 00 21 0F A2 03 99 22 |,DN,7,"#".!...."| 00000700: 11 1C 20 D7 52 49 54 45 2F 52 45 41 44 20 54 45 |.. .RITE/READ TE| 00000710: 53 54 53 11 1F 22 3A 81 54 52 B2 31 A4 33 35 A9 |STS..":.TR.1.35.| 00000720: 32 00 2A 0F A7 03 41 47 B2 30 00 41 0F A8 03 98 |2.*...AG.0.A....| 00000730: 31 35 2C 22 55 32 22 3B 37 3B 30 3B 54 52 3B 41 |15,"U2";7;0;TR;A| 00000740: 47 00 55 0F B6 03 8D 31 30 30 30 3A 8B 41 47 B2 |G.U....1000:.AG.| 00000750: 30 A7 39 38 30 00 63 0F C0 03 8B 41 47 B3 33 A7 |0.980.c....AG.3.| 00000760: 39 34 30 00 6C 0F CA 03 41 46 B2 31 00 92 0F D4 |940.l...AF.1....| 00000770: 03 99 22 11 57 52 49 54 45 2F 52 45 41 44 20 54 |..".WRITE/READ T| 00000780: 52 41 43 4B 22 54 52 3B 3A 8B 41 47 A7 99 22 12 |RACK"TR;:.AG..".| 00000790: 22 3B 00 9F 0F D9 03 99 42 24 22 20 22 41 24 00 |";......B$" "A$.| 000007A0: A5 0F DE 03 82 00 AC 0F E3 03 A0 37 00 B6 0F E5 |...........7....| 000007B0: 03 89 31 32 30 30 00 CA 0F E8 03 84 31 35 2C 41 |..1200......15,A| 000007C0: 24 2C 42 24 2C 43 24 2C 44 24 00 E0 0F F2 03 8B |$,B$,C$,D$......| 000007D0: 41 24 B3 B1 22 30 30 22 A7 41 47 B2 41 47 AA 31 |A$.."00".AG.AG.1| 000007E0: 00 E6 0F FE 03 8E 00 11 10 4C 04 99 22 11 11 1D |.........L.."...| 000007F0: 50 52 45 45 53 20 12 53 50 41 43 45 92 20 54 4F |PREES .SPACE. TO| 00000800: 20 20 20 20 20 20 20 20 43 4F 4E 54 49 4E 55 45 | CONTINUE| 00000810: 22 00 28 10 56 04 99 22 11 20 12 52 92 20 54 4F |".(.V..". .R. TO| 00000820: 20 52 45 50 45 41 D4 22 00 3D 10 60 04 A1 4B 24 | REPEA.".=.`..K$| 00000830: 3A 8B 4B 24 B2 22 20 22 A7 89 39 32 30 00 50 10 |:.K$." "..920.P.| 00000840: 6A 04 8B 4B 24 B3 B1 22 52 22 A7 89 31 31 32 30 |j..K$.."R"..1120| 00000850: 00 59 10 74 04 89 38 30 30 00 5F 10 7E 04 8E 00 |.Y.t..800._.~...| 00000860: 79 10 B0 04 99 A3 34 29 22 11 1C D4 C5 D3 D4 20 |y.....4)"...... | 00000870: C6 C9 CE C9 D3 C8 C5 C4 22 00 AA 10 C4 04 99 22 |........"......"| 00000880: 11 1F 20 20 20 20 20 D0 52 45 53 53 20 12 53 50 |.. .RESS .SP| 00000890: 41 43 45 92 20 20 20 20 20 20 20 20 20 A0 20 46 |ACE. . F| 000008A0: 4F 52 20 52 45 50 45 41 54 22 00 C9 10 CE 04 99 |OR REPEAT"......| 000008B0: 22 11 20 20 20 20 4F 52 20 12 46 92 20 46 4F 52 |". OR .F. FOR| 000008C0: 20 46 49 4E 49 53 48 20 22 00 DD 10 D8 04 A1 41 | FINISH "......A| 000008D0: 24 3A 8B 41 24 B2 22 20 22 A7 89 35 30 00 EF 10 |$:.A$." "..50...| 000008E0: E2 04 8B 41 24 B3 B1 22 46 22 A7 31 32 34 30 00 |...A$.."F".1240.| 000008F0: 00 00 00 00 33 |....3 |
..@.... VIC1540 ALIGN BY KNUD HANSEN D.1
3-6-82 COMMODORE DENMARK.U....G(14):.532
81,14......".":..04)"...HEAD ALIGNMENT .
":..9)"VIC 1540 ". .....5)"AND CBM 2031"
......:......DN.08:T.17..... 1...#..:..0
3)"INSERT ALIGNMENT DISK PRESS .SPAC
E....%..H$:.H$.." ".37...'.."."...(..1,D
N,15.-.2.I$."I":.1,I$.6.N..".".].P..".":
..02)"... * COMMANDS * ."...R...07)"
":..02)"..I. = ONE STEP IN"...S.
..02)"..O. = ONE STEP OUT".J.T...02)"..B
. = BUMP "...U...02)"..H. = HYST
ERESIS...W...02)"..D. = DONE "...X...02)
"..T. = R/W TEST".7.Y...02)".TRACK NR:
...";T.V.Z.JB.176:.B$:.B$.""..150:.90.R
.D..B$."I".:T.T.1:.150:.80...N..B$."O".:
T.T.1:.150:.80...S..B$."B".JB.192:T.17:.
150:.80.G.X..B$."H".JB.176:..00...}..B$.
"D".T.1:.500......B$."T"..800:.1200.....
.B$.."T"..80.2....T.1...02)"...MIN. 1":.
X.1.500:.:.".":T.1.C....T.35...02)"...MA
X. 35":.X.1.500:.:.".":T.35......1,"M-W"
G(6)G(0)G(1)G(T)... ..1,"M-W"G(0)G(0)G(1
)G(JB)......1,"M-R"G(0)G(0).X....#1,X$:Y
$.X$.G(0):.F(Y$).127.170.........H.HY.HY
.1...R..HY.1.T.T.4:.150:T.T.4:.80."...T.
T.4:.150:T.T.4:.80.I....".... ADJUSTMENT
OF TRACK1 STOP"......"... ADJUST CARRI
AGE LIMIT STOP PLATE FOR 0.010 INCH CLE
ARANCE ".Q...." BETWEEN LIMIT STOP - PL
ATE AND HUB OF STEPPER CAM.".......
5)"...PRESS .SPACE.":..6)".WHEN OK".....
.150...&..C$:.C$.." "..540./.0.JB.192:T.
17:.150.:.5.JB.176.U.:..".... IS CATS EY
E OK?.M.D..".... PRESS .Y/N."...N..A$:.A
$.""..150:.590...X..A$."Y"..800...B..A$.
"N"..78...D..A$.."Y"..590.S. .AF.0: 7: 1
5:.15,DN,15...4..".":..7)"...R/W TEST"..
.>.."... INSERT FORMATED DISK
".4.H...6)"...PRESS .SPACE.".I.R..D$:.D$
.." ".850.M.\.N$."N".D(0).":":FD$."TEST"
:AF.0...F..".. NEWING TEST."...P.AG.0:.1
5,N$,FD$:.1000:.AG.AF.1.H.Z..".. NEWING
TEST";:.AF..".";.Y....B$:.AF.1100......I
.1.1000:.......7,DN,7,"#".!....".. WRITE
/READ TESTS..":.TR.1.35.2.*...AG.0.A....
15,"U2";7;0;TR;AG.U....1000:.AG.0.980.C.
...AG.3.940.L.J.AF.1...T..".WRITE/READ T
RACK"TR;:.AG..".";...Y..B$" "A$.........
.. 7......1200.J....15,A$,B$,C$,D$......
A$.."00".AG.AG.1.........L.."...PREES .S
PACE. TO CONTINUE".(.V..". .R. TO
REPEAT".=.`..K$:.K$." "..920.P.J..K$.."
R"..1120.Y.T..800._.~...Y.....4)"..TEST
FINISHED"...D..".. PRESS .SPACE.
FOR REPEAT".I.N..". OR .F. FOR
FINISH "...X..A$:.A$." "..50......A$.."
F".1240.....3
> CLICK IMAGE PREVIEW FOR FULL MODAL