ALIGN VI
FILE INFORMATION
FILENAME(S): ALIGN VI
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-12-01 01:48:45
APPEARS ON: 1 disk(s)
FILE HASH
ca97d054ec51a04fe7e725b37ebcf136597911d0f463e51d9892d1cc96665156
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0022A | ALIGN VI | PRG | hedning, Mattias H00r | 29 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 05 00 97 20 35 33 32 38 30 2C 30 3A |....... 53280,0:|
00000010: 97 35 33 32 38 31 2C 30 3A 97 36 34 36 2C 34 00 |.53281,0:.646,4.|
00000020: 2D 08 0A 00 9F 20 31 35 2C 38 2C 31 35 00 48 08 |-.... 15,8,15.H.|
00000030: 14 00 98 31 35 2C 22 4D 2D 52 22 C7 28 30 29 C7 |...15,"M-R".(0).|
00000040: 28 32 38 29 C7 28 31 29 00 61 08 1E 00 A1 23 31 |(28).(1).a....#1|
00000050: 35 2C 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 |5,A$:A..(A$..(0)|
00000060: 29 00 6E 08 28 00 42 B2 41 20 B0 20 31 32 00 8D |).n.(.B.A . 12..|
00000070: 08 32 00 98 31 35 2C 22 4D 2D 57 22 C7 28 30 29 |.2..15,"M-W".(0)|
00000080: C7 28 32 38 29 C7 28 31 29 C7 28 42 29 00 AD 08 |.(28).(1).(B)...|
00000090: 3C 00 98 31 35 2C 22 4D 2D 57 22 C7 28 33 32 29 |<..15,"M-W".(32)|
000000A0: C7 28 30 29 C7 28 31 29 C7 28 33 32 29 00 C6 08 |.(0).(1).(32)...|
000000B0: 46 00 98 31 35 2C 22 4D 2D 45 22 C7 28 34 34 29 |F..15,"M-E".(44)|
000000C0: C7 28 31 39 33 29 00 F1 08 64 00 99 22 93 11 11 |.(193)...d.."...|
000000D0: 11 11 11 11 11 11 20 20 20 20 20 20 20 20 20 20 |...... |
000000E0: 20 20 31 35 34 31 20 41 4C 49 47 4E 4D 45 4E 54 | 1541 ALIGNMENT|
000000F0: 22 00 07 09 69 00 49 B2 31 37 3A 41 B2 AB 32 3A |"...i.I.17:A..2:|
00000100: 97 36 34 36 2C 31 33 00 30 09 6E 00 99 22 11 11 |.646,13.0.n.."..|
00000110: 20 20 20 20 20 20 20 20 20 49 4E 53 45 52 54 20 | INSERT |
00000120: 53 54 41 4E 44 41 52 44 20 44 49 53 4B 11 11 22 |STANDARD DISK.."|
00000130: 00 3C 09 73 00 97 36 34 36 2C 31 34 00 66 09 78 |.<.s..646,14.f.x|
00000140: 00 99 22 20 20 20 20 20 20 20 50 52 45 53 53 20 |.." PRESS |
00000150: 12 20 52 45 54 55 52 4E 20 92 20 57 48 45 4E 20 |. RETURN . WHEN |
00000160: 52 45 41 44 59 22 00 70 09 7A 00 49 B2 49 AA 41 |READY".p.z.I.I.A|
00000170: 00 8D 09 7C 00 8B 20 49 B2 39 20 B0 20 49 B2 31 |...|.. I.9 . I.1|
00000180: 39 20 A7 41 B2 AB 41 3A 89 20 31 32 32 00 A3 09 |9 .A..A:. 122...|
00000190: 7E 00 8B 20 49 B2 31 33 20 A7 20 97 20 36 34 36 |~.. I.13 . . 646|
000001A0: 2C 31 32 00 B9 09 7F 00 8B 20 49 B3 B1 31 33 20 |,12...... I..13 |
000001B0: A7 20 97 20 36 34 36 2C 49 00 D0 09 8C 00 99 A3 |. . 646,I.......|
000001C0: 31 33 29 22 91 12 20 52 45 54 55 52 4E 20 92 22 |13)".. RETURN ."|
000001D0: 00 E6 09 96 00 A1 41 24 3A 8B 41 24 B2 C7 28 31 |......A$:.A$..(1|
000001E0: 33 29 A7 31 37 30 00 EF 09 A0 00 89 31 32 32 00 |3).170......122.|
000001F0: FC 09 AA 00 83 20 31 36 39 2C 34 38 00 09 0A B4 |..... 169,48....|
00000200: 00 83 20 31 33 33 2C 36 39 00 16 0A BE 00 83 20 |.. 133,69...... |
00000210: 31 36 39 2C 30 30 00 23 0A C8 00 83 20 31 33 33 |169,00.#.... 133|
00000220: 2C 36 33 00 34 0A D2 00 83 20 37 36 2C 31 37 37 |,63.4.... 76,177|
00000230: 2C 32 34 33 00 3A 0A DC 00 3A 00 6A 0A E6 00 44 |,243.:...:.j...D|
00000240: 24 28 30 29 B2 22 30 30 22 3A 44 24 28 31 29 B2 |$(0)."00":D$(1).|
00000250: 22 30 31 22 3A 44 24 28 32 29 B2 22 31 30 22 3A |"01":D$(2)."10":|
00000260: 44 24 28 33 29 B2 22 31 31 22 00 78 0A F0 00 53 |D$(3)."11".x...S|
00000270: 49 44 B2 35 34 32 37 32 00 86 0A FA 00 86 20 46 |ID.54272...... F|
00000280: 44 24 28 31 36 29 00 AD 0A 04 01 46 44 24 28 30 |D$(16).....FD$(0|
00000290: 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |)." |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 D4 0A | "...|
000002B0: 0E 01 46 44 24 28 31 29 B2 22 43 4C 45 41 4E 20 |..FD$(1)."CLEAN |
000002C0: 52 45 41 44 20 4F 46 20 54 52 41 43 4B 20 20 20 |READ OF TRACK |
000002D0: 20 20 20 22 00 FB 0A 18 01 46 44 24 28 32 29 B2 | ".....FD$(2).|
000002E0: 22 43 4C 4F 53 45 20 54 4F 20 48 41 4C 46 57 41 |"CLOSE TO HALFWA|
000002F0: 59 20 50 4F 49 4E 54 20 20 20 22 00 22 0B 22 01 |Y POINT ".".".|
00000300: 46 44 24 28 33 29 B2 22 45 58 41 43 54 4C 59 20 |FD$(3)."EXACTLY |
00000310: 48 41 4C 46 20 42 45 54 57 45 45 4E 20 20 20 20 |HALF BETWEEN |
00000320: 20 22 00 49 0B 2C 01 46 44 24 28 39 29 B2 22 43 | ".I.,.FD$(9)."C|
00000330: 4C 4F 53 45 20 54 4F 20 48 41 4C 46 57 41 59 20 |LOSE TO HALFWAY |
00000340: 50 4F 49 4E 54 20 20 20 22 00 69 0B 36 01 54 B2 |POINT ".i.6.T.|
00000350: 31 38 3A 4E 31 24 B2 22 3F 22 3A 4E 32 24 B2 22 |18:N1$."?":N2$."|
00000360: 3F 22 3A 54 52 B2 32 35 35 00 75 0B 54 01 98 31 |?":TR.255.u.T..1|
00000370: 35 2C 22 49 22 00 7E 0B 5E 01 99 22 93 22 00 84 |5,"I".~.^.."."..|
00000380: 0B 7C 01 3A 00 9B 0B 86 01 98 31 35 2C 22 4D 2D |.|.:......15,"M-|
00000390: 52 22 C7 28 30 29 C7 28 32 38 29 00 B6 0B 90 01 |R".(0).(28).....|
000003A0: A1 23 31 35 2C 41 24 3A 8B 41 24 B2 22 22 A7 41 |.#15,A$:.A$."".A|
000003B0: 24 B2 C7 28 30 29 00 C2 0B 9A 01 41 B2 C6 28 41 |$..(0).....A..(A|
000003C0: 24 29 00 CD 0B A4 01 43 56 B2 33 AF 41 00 FB 0B |$).....CV.3.A...|
000003D0: AE 01 41 B2 28 31 35 39 AF 41 29 B0 28 39 36 AA |..A.(159.A).(96.|
000003E0: 33 32 AC 28 28 54 B1 31 37 29 AA 28 54 B1 32 34 |32.((T.17).(T.24|
000003F0: 29 AA 28 54 B1 33 30 30 29 29 29 00 1C 0C B8 01 |).(T.300))).....|
00000400: 98 31 35 2C 22 4D 2D 57 22 C7 28 30 29 C7 28 32 |.15,"M-W".(0).(2|
00000410: 38 29 C7 28 31 29 C7 28 41 B0 34 29 00 22 0C D6 |8).(1).(A.4)."..|
00000420: 01 3A 00 4B 0C E0 01 99 22 13 99 11 20 20 20 20 |.:.K...."... |
00000430: 20 20 20 20 20 20 41 4C 49 47 4E 20 54 48 45 20 | ALIGN THE |
00000440: 31 35 34 31 20 44 52 49 56 45 22 00 72 0C EA 01 |1541 DRIVE".r...|
00000450: 99 22 9C 11 54 52 41 43 4B 20 23 20 46 52 4F 4D |."..TRACK # FROM|
00000460: 20 53 54 45 50 50 45 52 3A 22 54 22 9D 20 20 20 | STEPPER:"T". |
00000470: 20 22 00 91 0C F4 01 99 22 9E 11 48 45 41 44 20 | "......"..HEAD |
00000480: 50 4F 53 49 54 49 4F 4E 3A 9A 22 46 44 24 28 45 |POSITION:."FD$(E|
00000490: 29 00 CD 0C FE 01 54 24 B2 C4 28 54 52 29 3A 53 |).....T$..(TR):S|
000004A0: 24 B2 C4 28 53 45 29 3A 8B 45 B3 B1 31 A7 54 24 |$..(SE):.E..1.T$|
000004B0: B2 22 3F 3F 22 3A 4E 31 24 B2 22 3F 22 3A 4E 32 |."??":N1$."?":N2|
000004C0: 24 B2 22 3F 22 3A 53 24 B2 22 3F 3F 22 00 F0 0C |$."?":S$."??"...|
000004D0: 08 02 99 22 1E 11 54 52 41 43 4B 20 23 20 41 53 |..."..TRACK # AS|
000004E0: 20 52 45 41 44 3A 20 20 22 C9 28 54 24 2C 32 29 | READ: ".(T$,2)|
000004F0: 00 11 0D 12 02 99 22 53 45 43 54 4F 52 20 23 20 |......"SECTOR # |
00000500: 41 53 20 52 45 41 44 3A 20 22 C9 28 53 24 2C 32 |AS READ: ".(S$,2|
00000510: 29 00 34 0D 1C 02 99 22 96 11 49 44 20 4F 46 20 |).4...."..ID OF |
00000520: 54 52 41 43 4B 20 52 45 41 44 3A 20 22 4E 31 24 |TRACK READ: "N1$|
00000530: 3B 4E 32 24 00 66 0D 21 02 99 22 11 11 98 2D 2D |;N2$.f.!.."...--|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000560: 2D 2D 2D 2D 2D 22 00 79 0D 26 02 99 22 11 97 43 |-----".y.&.."..C|
00000570: 4F 4D 4D 41 4E 44 53 3A 22 00 A7 0D 30 02 99 22 |OMMANDS:"...0.."|
00000580: 11 20 20 9A 46 31 97 20 3D 20 4D 4F 56 45 20 48 |. .F1. = MOVE H|
00000590: 45 41 44 4F 55 54 20 28 4C 4F 57 45 52 20 54 52 |EADOUT (LOWER TR|
000005A0: 41 43 4B 20 23 29 22 00 D5 0D 3A 02 99 22 20 20 |ACK #)"...:.." |
000005B0: 9A 46 33 97 20 3D 20 4D 4F 56 45 20 48 45 41 44 |.F3. = MOVE HEAD|
000005C0: 20 49 4E 20 28 48 49 47 48 45 52 20 54 52 41 43 | IN (HIGHER TRAC|
000005D0: 4B 20 23 29 22 00 FA 0D 3F 02 99 22 20 20 9A 46 |K #)"...?.." .F|
000005E0: 35 97 20 3D 20 4D 4F 56 45 20 48 45 41 44 20 54 |5. = MOVE HEAD T|
000005F0: 4F 20 54 52 41 43 4B 23 31 22 00 20 0E 41 02 99 |O TRACK#1". .A..|
00000600: 22 20 20 9A 46 37 97 20 3D 20 4D 4F 56 45 20 48 |" .F7. = MOVE H|
00000610: 45 41 44 20 54 4F 20 54 52 41 43 4B 23 33 35 22 |EAD TO TRACK#35"|
00000620: 00 42 0E 44 02 99 22 20 20 9A 46 38 97 20 3D 20 |.B.D.." .F8. = |
00000630: 54 45 52 4D 49 4E 41 54 45 20 50 52 4F 47 52 41 |TERMINATE PROGRA|
00000640: 4D 22 00 6A 0E 4E 02 99 22 20 20 20 9A 49 97 20 |M".j.N.." .I. |
00000650: 3D 20 49 4E 49 54 49 41 4C 49 5A 45 20 28 54 4F |= INITIALIZE (TO|
00000660: 20 54 52 41 43 4B 20 31 38 29 00 7F 0E 58 02 A1 | TRACK 18)...X..|
00000670: 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 00 |A$:A..(A$..(0)).|
00000680: 8E 0E 62 02 8B 41 B2 31 34 30 A7 38 30 30 00 9F |..b..A.140.800..|
00000690: 0E 67 02 8B 41 B2 31 33 35 A7 8D 34 30 30 30 00 |.g..A.135..4000.|
000006A0: B0 0E 69 02 8B 41 B2 31 33 36 A7 8D 34 30 31 30 |..i..A.136..4010|
000006B0: 00 C9 0E 6C 02 8B 41 B2 31 33 33 AF 54 B1 31 A7 |...l..A.133.T.1.|
000006C0: 43 B2 AB 31 3A 89 36 39 30 00 E2 0E 76 02 8B 41 |C..1:.690...v..A|
000006D0: B2 31 33 34 AF 54 B3 33 35 A7 43 B2 31 3A 89 36 |.134.T.35.C.1:.6|
000006E0: 39 30 00 08 0F 80 02 8B 41 B2 37 33 A7 98 31 35 |90......A.73..15|
000006F0: 2C 22 49 22 3A 54 B2 31 38 3A 45 B2 30 3A 41 B2 |,"I":T.18:E.0:A.|
00000700: 32 31 34 3A 89 34 32 30 00 11 0F 8A 02 89 38 39 |214:.420......89|
00000710: 30 00 17 0F A8 02 3A 00 27 0F B2 02 43 56 B2 28 |0.....:.'...CV.(|
00000720: 43 56 AA 43 29 AF 33 00 3D 0F BC 02 54 B2 54 AA |CV.C).3.=...T.T.|
00000730: 43 AC 2E 35 3A 8B 54 B3 31 A7 54 B2 31 00 4C 0F |C..5:.T.1.T.1.L.|
00000740: C6 02 8B 54 B1 33 36 A7 54 B2 33 36 00 58 0F D0 |...T.36.T.36.X..|
00000750: 02 42 B2 41 AF 32 35 32 00 63 0F DA 02 43 B2 42 |.B.A.252.c...C.B|
00000760: AA 43 56 00 82 0F E4 02 98 31 35 2C 22 4D 2D 57 |.CV......15,"M-W|
00000770: 22 C7 28 30 29 C7 28 32 38 29 C7 28 31 29 C7 28 |".(0).(28).(1).(|
00000780: 43 29 00 8A 0F EE 02 45 B2 30 00 93 0F F8 02 89 |C).....E.0......|
00000790: 33 39 30 00 99 0F 16 03 3A 00 BA 0F 20 03 98 31 |390.....:... ..1|
000007A0: 35 2C 22 4D 2D 57 22 C7 28 30 29 C7 28 32 38 29 |5,"M-W".(0).(28)|
000007B0: C7 28 31 29 C7 28 32 34 30 29 00 D3 0F 2A 03 81 |.(1).(240)...*..|
000007C0: 49 B2 53 49 44 A4 53 49 44 AA 32 33 3A 97 49 2C |I.SID.SID.23:.I,|
000007D0: 30 3A 82 00 E6 0F 34 03 81 4B B2 31 A4 31 30 30 |0:....4..K.1.100|
000007E0: 3A A1 41 24 3A 82 00 10 10 3E 03 A0 31 35 3A 99 |:.A$:....>..15:.|
000007F0: 22 93 22 3A 97 35 33 32 38 30 2C 31 34 3A 97 35 |".":.53280,14:.5|
00000800: 33 32 38 31 2C 36 3A 97 36 34 36 2C 31 34 3A 80 |3281,6:.646,14:.|
00000810: 00 16 10 70 03 3A 00 22 10 7A 03 8C 3A 43 24 B2 |...p.:.".z..:C$.|
00000820: 22 22 00 3E 10 84 03 81 4B B2 31 A4 31 31 3A 87 |"".>....K.1.11:.|
00000830: 58 3A 43 24 B2 43 24 AA C7 28 58 29 3A 82 00 5B |X:C$.C$..(X):..[|
00000840: 10 8E 03 98 31 35 2C 22 4D 2D 57 22 C7 28 30 29 |....15,"M-W".(0)|
00000850: C7 28 33 29 C7 28 31 31 29 43 24 00 61 10 A2 03 |.(3).(11)C$.a...|
00000860: 3A 00 81 10 B6 03 98 31 35 2C 22 4D 2D 57 22 C7 |:......15,"M-W".|
00000870: 28 30 29 C7 28 30 29 C7 28 31 29 C7 28 32 30 38 |(0).(0).(1).(208|
00000880: 29 00 87 10 CA 03 3A 00 9D 10 DE 03 98 31 35 2C |).....:......15,|
00000890: 22 4D 2D 52 22 C7 28 30 29 C7 28 30 29 00 B6 10 |"M-R".(0).(0)...|
000008A0: E8 03 A1 23 31 35 2C 45 24 3A 45 B2 C6 28 45 24 |...#15,E$:E..(E$|
000008B0: AA C7 28 30 29 29 00 C6 10 F2 03 8B 45 B1 31 32 |..(0))......E.12|
000008C0: 37 20 89 36 38 30 00 CC 10 06 04 3A 00 E3 10 10 |7 .680.....:....|
000008D0: 04 8B 45 B2 33 A7 48 5A B2 31 30 30 30 3A 8D 31 |..E.3.HZ.1000:.1|
000008E0: 31 39 30 00 FE 10 1A 04 8B 45 B2 32 B0 45 B2 39 |190......E.2.E.9|
000008F0: A7 48 5A B2 31 35 30 30 3A 8D 31 31 39 30 00 0C |.HZ.1500:.1190..|
00000900: 11 24 04 8B 45 B3 B1 31 A7 33 39 30 00 12 11 42 |.$..E..1.390...B|
00000910: 04 3A 00 2D 11 4C 04 98 31 35 2C 22 4D 2D 52 22 |.:.-.L..15,"M-R"|
00000920: C7 28 32 32 29 C7 28 30 29 C7 28 34 29 00 3A 11 |.(22).(0).(4).:.|
00000930: 56 04 A1 23 31 35 2C 4E 31 24 00 47 11 60 04 A1 |V..#15,N1$.G.`..|
00000940: 23 31 35 2C 4E 32 24 00 61 11 6A 04 A1 23 31 35 |#15,N2$.a.j..#15|
00000950: 2C 58 24 3A 54 52 B2 C6 28 58 24 AA C7 28 30 29 |,X$:TR..(X$..(0)|
00000960: 29 00 7B 11 74 04 A1 23 31 35 2C 58 24 3A 53 45 |).{.t..#15,X$:SE|
00000970: B2 C6 28 58 24 AA C7 28 30 29 29 00 84 11 7E 04 |..(X$..(0))...~.|
00000980: 89 33 39 30 00 8A 11 9C 04 3A 00 A3 11 A6 04 81 |.390.....:......|
00000990: 49 B2 53 49 44 A4 53 49 44 AA 32 33 3A 97 49 2C |I.SID.SID.23:.I,|
000009A0: 30 3A 82 00 B0 11 B0 04 97 53 49 44 AA 35 2C 39 |0:.......SID.5,9|
000009B0: 00 BD 11 BA 04 97 53 49 44 AA 36 2C 39 00 CC 11 |......SID.6,9...|
000009C0: C4 04 97 53 49 44 AA 32 34 2C 31 35 00 DC 11 CE |...SID.24,15....|
000009D0: 04 97 53 49 44 AA 31 2C 45 AA 32 30 00 E9 11 D8 |..SID.1,E.20....|
000009E0: 04 97 53 49 44 2C 31 37 37 00 01 12 E2 04 97 53 |..SID,177......S|
000009F0: 49 44 AA 34 2C 31 37 3A 81 49 B2 31 A4 35 30 3A |ID.4,17:.I.1.50:|
00000A00: 82 00 12 12 EC 04 8F 20 50 CF 53 49 44 2B 32 34 |....... P.SID+24|
00000A10: 2C 30 00 18 12 F6 04 8E 00 32 12 00 05 97 41 31 |,0.......2....A1|
00000A20: 2C 38 35 3A 97 53 31 2C 31 35 30 3A 97 57 31 2C |,85:.S1,150:.W1,|
00000A30: 36 35 00 48 12 0A 05 8F 20 46 4F 52 4B 3D 31 54 |65.H.... FORK=1T|
00000A40: 4F 31 30 30 30 3A 4E C5 00 4E 12 14 05 8E 00 60 |O1000:N..N.....`|
00000A50: 12 A0 0F 54 B2 31 3A 53 B2 30 3A 89 34 30 32 30 |...T.1:S.0:.4020|
00000A60: 00 73 12 AA 0F 54 B2 33 35 3A 53 B2 30 3A 89 34 |.s...T.35:S.0:.4|
00000A70: 30 32 30 00 99 12 B4 0F 9F 38 2C 38 2C 38 2C 22 |020......8,8,8,"|
00000A80: 23 22 3A 98 31 35 2C 22 55 31 3A 22 3B 38 3B 30 |#":.15,"U1:";8;0|
00000A90: 3B 54 3B 53 3A A0 38 3A 8E 00 00 00 |;T;S:.8:.... |
....... 53280,0:.53281,0:.646,4.-.... 15
,8,15.H....15,"M-R"G(0)G(28)G(1).A....#1
5,A$:A.F(A$.G(0)).N.(.B.A . 12...2..15,"
M-W"G(0)G(28)G(1)G(B)...<..15,"M-W"G(32)
G(0)G(1)G(32).F.F..15,"M-E"G(44)G(193)..
.D.."......... 1541 ALIGNMENT
"...I.I.17:A..2:.646,13.0.N.."..
INSERT STANDARD DISK..".<.S..646,14.F.X
.." PRESS . RETURN . WHEN READY".P
.Z.I.I.A...|.. I.9 . I.19 .A..A:. 122...
~.. I.13 . . 646,12..... I..13 . . 646,
I.P.....13)".. RETURN ."......A$:.A$.G(1
3).170... ..122...... 169,48...... 133,6
9...... 169,00.#.H.. 133,63.4.R.. 76,177
,243.:...:.J...D$(0)."00":D$(1)."01":D$(
2)."10":D$(3)."11".X...SID.54272...... F
D$(16).....FD$(0)."
".T...FD$(1)."CLEAN READ OF TRACK
".....FD$(2)."CLOSE TO HALFWAY POINT
".".".FD$(3)."EXACTLY HALF BETWEEN
".I.,.FD$(9)."CLOSE TO HALFWAY POINT
".I.6.T.18:N1$."?":N2$."?":TR.255.U.T..1
5,"I".~.^.."."...|.:......15,"M-R"G(0)G(
28)......#15,A$:.A$."".A$.G(0).B...A.F(A
$).M...CV.3.A.....A.(159.A).(96.32.((T.1
7).(T.24).(T.300)))......15,"M-W"G(0)G(2
8)G(1)G(A.4).".V.:.K...."... AL
IGN THE 1541 DRIVE".R...."..TRACK # FROM
STEPPER:"T". "......"..HEAD POSITION
:."FD$(E).M...T$.D(TR):S$.D(SE):.E..1.T$
."??":N1$."?":N2$."?":S$."??"......"..TR
ACK # AS READ: "I(T$,2)......"SECTOR #
AS READ: "I(S$,2).4...."..ID OF TRACK RE
AD: "N1$;N2$.F.!.."...------------------
---------------------".Y.&.."..COMMANDS:
"...0..". .F1. = MOVE HEADOUT (LOWER TR
ACK #)".U.:.." .F3. = MOVE HEAD IN (HIG
HER TRACK #)"...?.." .F5. = MOVE HEAD T
O TRACK#1". .A.." .F7. = MOVE HEAD TO T
RACK#35".B.D.." .F8. = TERMINATE PROGRA
M".J.N.." .I. = INITIALIZE (TO TRACK 1
8)..X..A$:A.F(A$.G(0))...B..A.140.800..
.G..A.135..4000...I..A.136..4010.I.L..A.
133.T.1.C..1:.690...V..A.134.T.35.C.1:.6
90......A.73..15,"I":T.18:E.0:A.214:.420
......890.....:.'...CV.(CV.C).3.=...T.T.
C..5:.T.1.T.1.L.F..T.36.T.36.X.P.B.A.252
.C.Z.C.B.CV......15,"M-W"G(0)G(28)G(1)G(
C).....E.0......390.....:... ..15,"M-W"G
(0)G(28)G(1)G(240).S.*..I.SID.SID.23:.I,
0:....4..K.1.100:.A$:....>. 15:.".":.532
80,14:.53281,6:.646,14:....P.:.".Z..:C$.
"".>....K.1.11:.X:C$.C$.G(X):..[....15,"
M-W"G(0)G(3)G(11)C$.A...:......15,"M-W"G
(0)G(0)G(1)G(208)...J.:......15,"M-R"G(0
)G(0)......#15,E$:E.F(E$.G(0)).F....E.12
7 .680.L...:......E.3.HZ.1000:.1190.....
.E.2.E.9.HZ.1500:.1190...$..E..1.390...B
.:.-.L..15,"M-R"G(22)G(0)G(4).:.V..#15,N
1$.G.`..#15,N2$.A.J..#15,X$:TR.F(X$.G(0)
).{.T..#15,X$:SE.F(X$.G(0))...~..390....
.:......I.SID.SID.23:.I,0:.......SID.5,9
......SID.6,9.L.D..SID.24,15...N..SID.1,
E.20...X..SID,177......SID.4,17:.I.1.50:
....... POSID+24,0.......2....A1,85:.S1,
150:.W1,65.H.... FORK=1TO1000:NE.N.....`
. .T.1:S.0:.4020.S...T.35:S.0:.4020.....
.8,8,8,"#":.15,"U1:";8;0;T;S: 8:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL