ALIGN 1541
FILE INFORMATION
FILENAME(S): ALIGN 1541
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:07:15
APPEARS ON: 1 disk(s)
FILE HASH
9505e7a94ef83784e35a81927cf9817f94abef80d285e1b5b84e780b843ba199
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CHB SERVICE DISK | ALIGN 1541 | PRG | DuncanTwain | 14 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 8F 22 20 2A 2A 2A 2A 2A 2A 2A |..'.d.." *******| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 6E 00 8F 22 20 2A |*******.M.n.." *| 00000030: 2A 2A 20 C1 4C 49 47 4E 4D 45 4E 54 20 31 35 34 |** .LIGNMENT 154| 00000040: 31 20 20 42 59 20 C7 C3 D3 20 2A 2A 2A 00 73 08 |1 BY ... ***.s.| 00000050: 78 00 8F 22 20 2A 2A 2A 20 C9 44 45 45 20 55 4E |x.." *** .DEE UN| 00000060: 44 20 C2 41 53 49 43 20 D6 45 52 53 49 4F 4E 20 |D .ASIC .ERSION | 00000070: 2A 2A 2A 00 99 08 82 00 8F 22 20 2A 2A 2A 20 20 |***......" *** | 00000080: 20 20 20 20 20 56 4F 4E 20 C1 CE D4 C9 D2 C1 CD | VON .......| 00000090: 20 20 20 20 20 20 2A 2A 2A 00 BF 08 8C 00 8F 22 | ***......"| 000000A0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 000000C0: CD 08 96 00 9C 3A 99 22 93 0E 08 22 3B 00 EB 08 |.....:."...";...| 000000D0: A0 00 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 |...53281,0:.5328| 000000E0: 30 2C 30 3A 8F 20 46 41 52 42 45 00 11 09 AA 00 |0,0:. FARBE.....| 000000F0: 53 59 B2 20 33 35 36 34 20 3A 8F 20 53 59 53 20 |SY. 3564 :. SYS | 00000100: 41 44 52 45 53 53 45 20 46 55 45 52 20 54 45 53 |ADRESSE FUER TES| 00000110: 54 00 2F 09 B4 00 43 4F 4C 4F 55 52 B2 35 3A 86 |T./...COLOUR.5:.| 00000120: 20 43 4F 4C 4F 55 52 28 43 4F 4C 4F 55 52 29 00 | COLOUR(COLOUR).| 00000130: 49 09 BE 00 8D 32 35 30 20 3A 8F 20 5A 45 49 47 |I....250 :. ZEIG| 00000140: 45 20 42 45 46 45 48 4C 45 00 62 09 C8 00 9E 28 |E BEFEHLE.b....(| 00000150: 53 59 29 20 20 3A 8F 20 46 55 45 48 52 45 20 41 |SY) :. FUEHRE A| 00000160: 55 53 00 71 09 D2 00 58 B2 C2 28 37 38 37 29 AA |US.q...X..(787).| 00000170: 31 00 97 09 DC 00 3A 20 20 20 20 20 20 20 20 20 |1.....: | 00000180: 8F 20 41 42 42 52 55 43 48 20 44 55 52 43 48 20 |. ABBRUCH DURCH | 00000190: 44 45 4C 2F 53 50 43 00 A6 09 E6 00 91 58 89 32 |DEL/SPC......X.2| 000001A0: 34 30 2C 31 35 30 00 C3 09 F0 00 9E 36 35 34 30 |40,150......6540| 000001B0: 39 3A 80 3A 8F 20 50 52 4F 47 52 41 4D 4D 20 45 |9:.:. PROGRAMM E| 000001C0: 4E 44 45 00 E0 09 FA 00 8F 20 5A 45 49 47 45 20 |NDE...... ZEIGE | 000001D0: 42 45 46 45 48 4C 45 20 2B 20 54 41 53 54 45 4E |BEFEHLE + TASTEN| 000001E0: 00 F5 09 04 01 8C 3A 81 20 49 B2 31 20 A4 20 43 |......:. I.1 . C| 000001F0: 4F 4C 4F 55 52 00 13 0A 0E 01 87 20 43 4F 4C 4F |OLOUR...... COLO| 00000200: 55 52 20 28 49 29 20 3A 8F 20 46 41 52 42 43 4F |UR (I) :. FARBCO| 00000210: 44 45 53 00 21 0A 18 01 82 3A 99 22 93 0E 08 22 |DES.!....:."..."| 00000220: 3B 00 3B 0A 22 01 87 20 41 24 3A 54 42 B2 30 3A |;.;.".. A$:TB.0:| 00000230: 8F 20 54 41 42 55 4C 41 54 4F 52 00 4A 0A 2C 01 |. TABULATOR.J.,.| 00000240: 42 24 B2 C8 28 41 24 2C 31 29 00 6B 0A 36 01 8B |B$..(A$,1).k.6..| 00000250: C5 28 42 24 29 B1 30 A7 99 C7 28 43 4F 28 C5 28 |.(B$).0...(CO(.(| 00000260: 42 24 29 29 29 3B 3A 89 33 37 30 00 7E 0A 40 01 |B$)));:.370.~.@.| 00000270: 8B 42 24 B2 22 21 22 A7 99 3A 89 33 37 30 00 8F |.B$."!"..:.370..| 00000280: 0A 4A 01 8B 42 24 B2 22 23 22 A7 8D 33 39 30 00 |.J..B$."#"..390.| 00000290: 9F 0A 54 01 8B 42 24 B2 22 2A 22 A7 34 32 30 00 |..T..B$."*".420.| 000002A0: B0 0A 5E 01 99 A3 54 42 29 41 24 3A 89 32 39 30 |..^...TB)A$:.290| 000002B0: 00 C8 0A 68 01 8F 20 55 45 42 45 52 4C 45 53 45 |...h.. UEBERLESE| 000002C0: 20 5A 45 49 43 48 45 4E 00 DC 0A 72 01 41 24 B2 | ZEICHEN...r.A$.| 000002D0: CA 28 41 24 2C 32 29 3A 89 33 30 30 00 F6 0A 7C |.(A$,2):.300...|| 000002E0: 01 8F 20 5A 45 4E 54 52 49 45 52 45 20 53 54 52 |.. ZENTRIERE STR| 000002F0: 49 4E 47 20 41 24 00 15 0B 86 01 41 24 B2 CA 28 |ING A$.....A$..(| 00000300: 41 24 2C 32 29 3A 54 42 B2 32 30 AB 28 C3 28 41 |A$,2):TB.20.(.(A| 00000310: 24 29 AD 32 29 00 1B 0B 90 01 8E 00 2C 0B 9A 01 |$).2).......,...| 00000320: 8F 20 44 41 54 45 4E 20 45 4E 44 45 00 4D 0B A4 |. DATEN ENDE.M..| 00000330: 01 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............| 00000340: 11 11 11 11 11 11 11 11 11 11 11 22 3B 00 72 0B |...........";.r.| 00000350: AE 01 41 24 B2 22 20 C4 52 55 45 43 4B 45 20 44 |..A$." .RUECKE D| 00000360: 49 45 20 3C D2 C5 D4 D5 D2 CE 3E 20 D4 41 53 54 |IE <......> .AST| 00000370: 45 22 00 8A 0B B8 01 8D 33 39 30 3A 99 A3 54 42 |E"......390:..TB| 00000380: 29 22 9A 22 41 24 22 13 22 3B 00 A1 0B C2 01 A1 |)"."A$".";......| 00000390: 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 34 35 |A$:.A$...(13).45| 000003A0: 30 00 A7 0B CC 01 8E 00 C2 0B D6 01 8F 20 44 41 |0............ DA| 000003B0: 54 45 4E 20 46 55 45 52 20 46 41 52 42 43 4F 44 |TEN FUER FARBCOD| 000003C0: 45 53 00 DA 0B E0 01 83 20 31 35 33 20 3A 8F 20 |ES...... 153 :. | 000003D0: 48 45 4C 4C 20 47 52 55 45 4E 00 F1 0B EA 01 83 |HELL GRUEN......| 000003E0: 20 31 35 35 20 3A 8F 20 48 45 4C 4C 20 47 52 41 | 155 :. HELL GRA| 000003F0: 55 00 03 0C F4 01 83 20 31 35 38 20 3A 8F 20 47 |U...... 158 :. G| 00000400: 45 4C 42 00 17 0C FE 01 83 20 20 31 38 20 3A 8F |ELB...... 18 :.| 00000410: 20 52 45 56 45 52 53 00 2A 0C 08 02 83 20 20 20 | REVERS.*.... | 00000420: 35 20 3A 8F 20 57 45 49 53 53 00 30 0C 12 02 3A |5 :. WEISS.0...:| 00000430: 00 46 0C 1C 02 8F 20 44 41 54 45 4E 20 46 55 45 |.F.... DATEN FUE| 00000440: 52 20 54 45 58 54 00 76 0C 26 02 83 22 31 23 2A |R TEXT.v.&.."1#*| 00000450: 2A 2A 20 C1 4C 49 47 4E 4D 45 4E 54 20 31 35 34 |** .LIGNMENT 154| 00000460: 31 20 28 C3 29 20 31 39 38 34 20 42 59 20 C7 C3 |1 (.) 1984 BY ..| 00000470: D3 20 2A 2A 2A 22 00 A6 0C 30 02 83 22 35 23 A3 |. ***"...0.."5#.| 00000480: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 00000490: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 000004A0: A3 A3 A3 A3 A3 22 00 D2 0C 3A 02 83 22 21 21 32 |....."...:.."!!2| 000004B0: 23 C3 55 52 53 4F 52 20 D5 50 20 2F 20 C4 4F 57 |#.URSOR .P / .OW| 000004C0: 4E 20 20 3D 3E 20 D4 52 41 43 4B 20 20 2B 2F 2D |N => .RACK +/-| 000004D0: 20 31 00 FC 0C 44 02 83 22 21 23 C3 55 52 53 4F | 1...D.."!#.URSO| 000004E0: 52 20 CC 45 46 54 2F D2 49 47 48 54 20 3D 3E 20 |R .EFT/.IGHT => | 000004F0: D3 45 43 54 4F 52 20 2B 2F 2D 20 31 00 1D 0D 4E |.ECTOR +/- 1...N| 00000500: 02 83 22 21 21 33 23 C6 31 20 3D 3E 20 D4 52 41 |.."!!3#.1 => .RA| 00000510: 43 4B 20 3D 20 30 20 20 20 20 20 20 22 00 3B 0D |CK = 0 ".;.| 00000520: 58 02 83 22 23 C6 33 20 3D 3E 20 D3 45 43 54 4F |X.."#.3 => .ECTO| 00000530: 52 20 3D 20 30 20 20 20 20 20 22 00 59 0D 62 02 |R = 0 ".Y.b.| 00000540: 83 22 23 C6 34 20 3D 3E 20 C1 55 54 4F 53 54 45 |."#.4 => .UTOSTE| 00000550: 50 20 4F 4E 20 20 20 20 22 00 77 0D 6C 02 83 22 |P ON ".w.l.."| 00000560: 23 C6 35 20 3D 3E 20 C9 4E 49 54 20 20 20 20 20 |#.5 => .NIT | 00000570: 20 20 20 20 20 20 22 00 95 0D 76 02 83 22 23 C6 | "...v.."#.| 00000580: 36 20 3D 3E 20 C1 55 54 4F 49 4E 49 54 20 4F 4E |6 => .UTOINIT ON| 00000590: 2F 4F 46 46 22 00 B3 0D 80 02 83 22 23 C6 37 20 |/OFF"......"#.7 | 000005A0: 3D 3E 20 C2 55 4D 50 20 20 20 20 20 20 20 20 20 |=> .UMP | 000005B0: 20 20 22 00 BC 0D 8A 02 83 22 21 35 00 CF 0D 94 | "......"!5....| 000005C0: 02 83 22 23 C4 C5 CC 20 3D 3E 20 D1 55 49 54 00 |.."#... => .UIT.| 000005D0: E2 0D 9E 02 83 22 23 D3 D0 C3 20 3D 3E 20 C8 45 |....."#... => .E| 000005E0: 4C 50 00 E9 0D A8 02 83 2A 00 00 00 43 20 A9 0F |LP......*...C ..| 000005F0: A9 00 8D F7 10 8D F8 10 20 26 10 A9 01 A2 00 8D |........ &......| 00000600: A6 0F 8E A7 0F A9 8B A2 0F 20 2D 0F A9 92 A2 0F |......... -.....| 00000610: 20 2D 0F AD F8 10 F0 03 20 D0 0E A9 A0 A2 0F A0 | -...... .......| 00000620: 09 20 2F 0F A9 99 A2 0F 20 2D 0F 8D F9 10 20 26 |. /..... -.... &| 00000630: 10 AD F9 10 C9 0B D0 0C AD F7 10 F0 07 A9 92 A2 |................| 00000640: 0F 20 2D 0F 20 E4 FF F0 CA A2 00 8E F8 10 20 53 |. -. ......... S| 00000650: 0E 4C 12 0E C9 11 D0 06 EE A6 0F 4C D0 0E C9 91 |.L.........L....| 00000660: D0 06 CE A6 0F 4C D0 0E C9 85 D0 07 A9 01 8D A6 |.....L..........| 00000670: 0F D0 5E C9 8A D0 07 A2 01 8E F8 10 D0 53 C9 1D |..^..........S..| 00000680: D0 06 EE A7 0F 4C D0 0E C9 9D D0 06 CE A7 0F 4C |.....L.........L| 00000690: D0 0E C9 86 D0 07 A9 00 8D A7 0F F0 34 C9 87 D0 |............4...| 000006A0: 05 68 68 4C 0B 0E C9 88 D0 05 68 68 4C FA 0D C9 |.hhL......hhL...| 000006B0: 14 D0 04 A9 00 F0 06 C9 20 D0 0A A9 01 8D 13 03 |........ .......| 000006C0: 68 68 68 68 60 C9 8B D0 08 AD F7 10 49 FF 8D F7 |hhhh`.......I...| 000006D0: 10 AD F8 10 F0 1D 18 6D A6 0F F0 0C C9 24 90 10 |.......m.....$..| 000006E0: CE F8 10 CE F8 10 D0 0B EE F8 10 EE F8 10 D0 03 |................| 000006F0: 8D A6 0F AD A6 0F D0 02 A9 01 C9 24 90 02 A9 23 |...........$...#| 00000700: 8D A6 0F AE A7 0F C9 1F 90 06 E0 11 90 02 A2 10 |................| 00000710: C9 19 90 06 E0 12 90 02 A2 11 C9 12 90 06 E0 13 |................| 00000720: 90 02 A2 12 E0 15 90 02 A2 14 8E A7 0F 60 A0 07 |.............`..| 00000730: 8D 45 0F 8E 46 0F 8C FB 10 A9 08 20 B1 FF A9 6F |.E..F...... ...o| 00000740: 20 93 FF A2 00 BD 34 12 20 A8 FF E8 88 D0 F6 A9 | .....4. .......| 00000750: 0D 20 A8 FF 20 AE FF A9 08 20 B1 FF A9 6F 20 93 |. .. .... ...o .| 00000760: FF A2 00 BD 85 0F 20 A8 FF E8 E0 07 D0 F5 20 AE |...... ....... .| 00000770: FF A9 08 20 B4 FF A9 6F 20 96 FF 20 A5 FF 48 20 |... ...o .. ..H | 00000780: AB FF 68 30 D2 60 4D 2D 52 01 00 01 4D 2D 57 01 |..h0.`M-R...M-W.| 00000790: 00 01 C0 4D 2D 57 01 00 01 B0 4D 2D 57 01 00 01 |...M-W....M-W...| 000007A0: 80 4D 2D 57 08 00 02 01 00 0D 20 D0 10 93 99 0E |.M-W...... .....| 000007B0: 08 20 2A 2A 2A 96 20 C1 4C 49 47 4E 4D 45 4E 54 |. ***. .LIGNMENT| 000007C0: 20 31 35 34 31 20 28 43 29 20 31 39 38 34 20 42 | 1541 (C) 1984 B| 000007D0: 59 20 1C C7 C3 D3 20 99 2A 2A 2A 0D 0D 20 2A 2A |Y .... .***.. **| 000007E0: 2A 20 20 20 96 42 41 53 45 44 20 4F 4E 20 41 4E |* .BASED ON AN| 000007F0: 20 49 44 45 41 20 42 59 20 1C C1 CE D4 C9 D2 C1 | IDEA BY .......| 00000800: CD 20 20 99 2A 2A 2A 00 A9 00 8D 20 D0 8D 21 D0 |. .***.... ..!.| 00000810: 60 A2 00 38 E9 0A 90 03 E8 D0 F8 69 0A 48 8A 20 |`..8.......i.H. | 00000820: 23 10 AA 68 09 30 60 AD A6 0F 20 10 10 8E 71 10 |#..h.0`... ...q.| 00000830: 8D 72 10 AD A7 0F 20 10 10 8D 85 10 8E 84 10 AD |.r.... .........| 00000840: F9 10 C9 02 B0 04 A9 00 F0 03 18 69 12 20 10 10 |...........i. ..| 00000850: 8E 99 10 8D 9A 10 20 D0 10 13 9B 0D 0D 0D 0D 0D |...... .........| 00000860: 0D 0D 0D 0D 20 20 20 20 D4 52 41 43 4B 20 20 3A |.... .RACK :| 00000870: 20 05 30 31 9B 20 20 20 20 20 20 D3 45 43 54 4F | .01. .ECTO| 00000880: 52 20 3A 20 05 30 30 0D 9B 0D 0D 0D 20 20 20 20 |R : .00..... | 00000890: C5 52 52 4F 52 20 20 3A 20 05 30 30 9B 20 20 20 |.RROR : .00. | 000008A0: 20 20 20 C9 4E 49 54 20 20 20 3A 20 12 00 AD F7 | .NIT : ....| 000008B0: 10 D0 0F 20 D0 10 1E 20 4D 41 4E 55 45 4C 4C 20 |... ... MANUELL | 000008C0: 00 60 20 D0 10 81 20 20 41 55 54 4F 20 20 20 00 |.` ... AUTO .| 000008D0: 60 68 8D DC 10 68 8D DD 10 20 EE 10 AD 34 12 20 |`h...h... ...4. | 000008E0: 16 E7 F0 05 20 EE 10 D0 F3 20 EE 10 6C DC 10 EE |.... .... ..l...| 000008F0: DC 10 D0 03 EE DD 10 60 00 00 00 00 00 |.......`..... |
..'.D.." ******************************. M.N.." *** ALIGNMENT 1541 BY GCS ***.S. X.." *** IDEE UND BASIC VERSION ***..... ." *** VON ANTIRAM ***......" ******************************.M....:." ...";... ..53281,0:.53280,0:. FARBE..... SY. 3564 :. SYS ADRESSE FUER TEST./...CO LOUR.5:. COLOUR(COLOUR).I....250 :. ZEIG E BEFEHLE.B.H..(SY) :. FUEHRE AUS.Q.R.X .B(787).1.....: . ABBRUCH DURCH DEL/SPC......X.240,150.C....65409:.:. PR OGRAMM ENDE...... ZEIGE BEFEHLE + TASTEN ......:. I.1 . COLOUR...... COLOUR (I) : . FARBCODES.!....:."...";.;.".. A$:TB.0: . TABULATOR.J.,.B$.H(A$,1).K.6..E(B$).0. .G(CO(E(B$)));:.370.~.@..B$."!"..:.370.. .J..B$."#"..390...T..B$."*".420...^...TB )A$:.290.H.H.. UEBERLESE ZEICHEN...R.A$. J(A$,2):.300...|.. ZENTRIERE STRING A$.. ...A$.J(A$,2):TB.20.(C(A$).2).......,... . DATEN ENDE.M...."..................... ...";.R...A$." DRUECKE DIE <RETURN> TAST E"......390:..TB)"."A$".";...B..A$:.A$.. G(13).450...L...B.V.. DATEN FUER FARBCOD ES.Z.... 153 :. HELL GRUEN...... 155 :. HELL GRAU...... 158 :. GELB...... 18 :. REVERS.*.... 5 :. WEISS.0...:.F.... D ATEN FUER TEXT.V.&.."1#*** ALIGNMENT 154 1 (C) 1984 BY GCS ***"...0.."5#......... .............................".R.:.."!!2 #CURSOR UP / DOWN => TRACK +/- 1...D.. "!#CURSOR LEFT/RIGHT => SECTOR +/- 1...N .."!!3#F1 => TRACK = 0 ".;.X.."#F3 => SECTOR = 0 ".Y.B.."#F4 => AUTOSTE P ON ".W.L.."#F5 => INIT ". ..V.."#F6 => AUTOINIT ON/OFF"......"#F7 => BUMP "......"!5.O...."#DEL => QUIT......"#SPC => HELP......*...C .. ........ &............... -..... -...... P.. .. . /..... -.... &....I.P......... . -. ...J..... S.L..I.P....LP.I.P.N..LP. I.P......P^I.P......PSI.P....LP.I.P.N..L P.I.P.......4I.P.HHL..I.P.HHL..I.P.....I P......HHHH`I.P....I..........M....I$.. N..N..P.......P.......P...I$...#......I. ........I.........I..................` . .E..F...... ...O .....4. ....P... .. ... . ...O ....... .....P. .... ...O .. ..H ..H0R`M-R...M-W....M-W....M-W....M-W.... .. P..... ***. ALIGNMENT 1541 (C) 1984 B Y .GCS .***.. *** .BASED ON AN IDEA BY .ANTIRAM .***.... P.!P`..8.....P.I.H. #..H.0`... ...Q..R.... ...........I..... ...I. ........ P............ TRACK : .01. SECTOR : .00..... ERROR : .00. INIT : .....P. P.. MANUELL .` P.. AUTO .`H...H... ...4. .... ..P . ..L.....P....`.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL