SIGN MAKER
FILE INFORMATION
FILENAME(S): SIGN MAKER
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-10-19 22:35:59
APPEARS ON: 1 disk(s)
FILE HASH
006d43ed8c66204dac8a3e2dac04b3422e9bc2d34536c2d0a656a45c944449f8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ECA III | SIGN MAKER | PRG | Radd Maxx | 1 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 01 00 8F 20 20 53 49 47 4E 20 4D 41 |....... SIGN MA| 00000010: 4B 45 52 00 29 08 02 00 8F 20 20 20 42 59 20 4B |KER.).... BY K| 00000020: 45 4E 20 41 4D 42 45 52 47 00 49 08 03 00 8F 20 |EN AMBERG.I.... | 00000030: 20 20 20 20 20 31 38 33 32 20 42 52 49 41 52 57 | 1832 BRIARW| 00000040: 4F 4F 44 20 54 45 52 52 2E 00 6E 08 04 00 8F 20 |OOD TERR..n.... | 00000050: 20 20 20 20 20 20 53 4F 55 54 48 20 42 45 4C 4D | SOUTH BELM| 00000060: 41 52 2C 20 4E 2E 4A 2E 20 30 37 37 31 39 00 79 |AR, N.J. 07719.y| 00000070: 08 0A 00 86 20 41 28 37 29 00 86 08 0F 00 86 20 |.... A(7)...... | 00000080: 42 28 38 2C 38 29 00 B3 08 14 00 8B 20 C2 28 32 |B(8,8)...... .(2| 00000090: 31 33 29 20 B2 20 33 39 20 A7 20 53 B2 34 39 31 |13) . 39 . S.491| 000000A0: 35 32 3A 8D 32 30 30 30 3A 5A B2 31 30 3A 89 20 |52:.2000:Z.10:. | 000000B0: 31 30 30 00 C3 08 1E 00 5A B2 32 3A 53 B2 33 32 |100.....Z.2:S.32| 000000C0: 37 36 38 00 CC 08 64 00 9F 34 2C 34 00 D5 08 6E |768...d..4,4...n| 000000D0: 00 99 22 93 22 00 F3 08 78 00 99 22 11 11 11 22 |.."."...x.."..."| 000000E0: 3B A3 5A AA 35 29 3B 22 53 49 47 4E 20 4D 41 4B |;.Z.5);"SIGN MAK| 000000F0: 45 52 22 00 10 09 82 00 99 22 11 22 3B A3 5A 29 |ER"......".";.Z)| 00000100: 3B 22 12 46 31 92 20 3D 20 42 41 4E 4E 45 52 22 |;".F1. = BANNER"| 00000110: 00 32 09 8C 00 99 22 11 22 3B A3 5A 29 3B 22 12 |.2....".";.Z);".| 00000120: 46 33 92 20 3D 20 53 49 4E 47 4C 45 20 50 41 47 |F3. = SINGLE PAG| 00000130: 45 22 00 52 09 96 00 99 22 11 22 3B A3 5A 29 3B |E".R....".";.Z);| 00000140: 22 12 46 35 92 20 3D 20 46 4F 52 4D 20 46 45 45 |".F5. = FORM FEE| 00000150: 44 22 00 75 09 A0 00 99 22 11 22 3B A3 5A 29 3B |D".u....".";.Z);| 00000160: 22 12 46 37 92 20 3D 20 45 58 49 54 20 50 52 4F |".F7. = EXIT PRO| 00000170: 47 52 41 4D 22 00 8C 09 AA 00 A1 20 41 24 3A 8B |GRAM"...... A$:.| 00000180: 20 41 24 20 B2 20 22 22 A7 31 37 30 00 A7 09 B4 | A$ . "".170....| 00000190: 00 8B 20 41 24 B3 22 85 22 20 B0 20 41 24 B1 22 |.. A$."." . A$."| 000001A0: 88 22 A7 20 31 31 30 00 BE 09 BE 00 8B 20 41 24 |.". 110...... A$| 000001B0: B2 22 88 22 20 A7 20 98 34 3A A0 34 3A 80 00 DB |."." . .4:.4:...| 000001C0: 09 C8 00 8B 20 41 24 B2 22 87 22 20 A7 20 98 34 |.... A$."." . .4| 000001D0: 2C C7 28 31 32 29 3A 89 31 31 30 00 F5 09 D2 00 |,.(12):.110.....| 000001E0: 8B 20 41 24 B2 22 85 22 20 A7 20 8D 20 35 30 30 |. A$."." . . 500| 000001F0: 3A 89 31 31 30 00 10 0A DC 00 8B 20 41 24 B2 22 |:.110...... A$."| 00000200: 86 22 20 A7 20 8D 20 34 30 30 30 3A 89 31 31 30 |." . . 4000:.110| 00000210: 00 19 0A E6 00 89 31 31 30 00 22 0A F4 01 99 22 |......110."...."| 00000220: 93 22 00 3D 0A FE 01 99 22 50 4C 45 41 53 45 20 |.".=...."PLEASE | 00000230: 45 4E 54 45 52 20 50 48 52 41 53 45 22 00 53 0A |ENTER PHRASE".S.| 00000240: 00 02 99 22 20 54 4F 20 42 45 20 50 52 49 4E 54 |..." TO BE PRINT| 00000250: 45 44 22 00 5C 0A 03 02 85 20 41 24 00 69 0A 08 |ED".\.... A$.i..| 00000260: 02 4C 50 B2 C3 28 41 24 29 00 76 0A 12 02 81 20 |.LP..(A$).v.... | 00000270: 43 B2 31 A4 4C 50 00 81 0A 1C 02 8D 20 31 30 30 |C.1.LP...... 100| 00000280: 30 00 89 0A 26 02 82 20 43 00 8F 0A 30 02 8E 00 |0...&.. C...0...| 00000290: AE 0A E8 03 4C 31 24 B2 22 20 20 20 20 20 20 20 |....L1$." | 000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 BF | "..| 000002B0: 0A F2 03 58 24 B2 CA 28 41 24 2C 43 2C 31 29 00 |...X$..(A$,C,1).| 000002C0: CC 0A F3 03 53 43 B2 C6 28 58 24 29 00 D7 0A F4 |....SC..(X$)....| 000002D0: 03 8D 20 33 30 30 30 00 E7 0A F7 03 43 53 B2 53 |.. 3000.....CS.S| 000002E0: AA 28 53 43 AC 38 29 00 F7 0A FC 03 81 20 49 20 |.(SC.8)...... I | 000002F0: B2 20 30 20 A4 20 37 00 08 0B 06 04 41 28 49 29 |. 0 . 7.....A(I)| 00000300: B2 C2 28 43 53 AA 49 29 00 0E 0B 10 04 82 00 20 |..(CS.I)....... | 00000310: 0B 1A 04 81 20 42 49 54 B2 37 A4 30 20 A9 AB 31 |.... BIT.7.0 ..1| 00000320: 00 34 0B 24 04 81 20 42 59 54 45 20 B2 20 37 A4 |.4.$.. BYTE . 7.| 00000330: 30 A9 AB 31 00 55 0B 2E 04 8B 20 28 41 28 42 59 |0..1.U.... (A(BY| 00000340: 54 45 29 AF 28 32 AE 42 49 54 29 29 20 A7 20 89 |TE).(2.BIT)) . .| 00000350: 20 31 31 30 30 00 6A 0B 38 04 4C 31 24 B2 4C 31 | 1100.j.8.L1$.L1| 00000360: 24 AA 22 20 20 20 20 20 20 22 00 75 0B 42 04 89 |$." ".u.B..| 00000370: 20 31 31 31 30 00 8A 0B 4C 04 4C 31 24 B2 4C 31 | 1110...L.L1$.L1| 00000380: 24 AA 22 2A 2A 2A 2A 2A 2A 22 00 95 0B 56 04 82 |$."******"...V..| 00000390: 20 42 59 54 45 00 A0 0B 60 04 98 34 2C 4C 31 24 | BYTE...`..4,L1$| 000003A0: 00 AB 0B 6A 04 98 34 2C 4C 31 24 00 CA 0B 79 04 |...j..4,L1$...y.| 000003B0: 4C 31 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |L1$." | 000003C0: 20 20 20 20 20 20 20 20 20 22 00 D4 0B 7E 04 82 | "...~..| 000003D0: 20 42 49 54 00 DA 0B 88 04 8E 00 01 0C D0 07 99 | BIT............| 000003E0: 3A 99 22 49 20 41 4D 20 4D 4F 56 49 4E 47 20 54 |:."I AM MOVING T| 000003F0: 48 45 20 43 48 41 52 41 43 54 45 52 20 53 45 54 |HE CHARACTER SET| 00000400: 22 00 22 0C DA 07 99 22 54 48 49 53 20 54 41 4B |"."...."THIS TAK| 00000410: 45 53 20 41 20 4D 49 4E 55 54 45 2E 2E 2E 2E 2E |ES A MINUTE.....| 00000420: 2E 22 00 2F 0C E4 07 97 35 36 33 33 34 2C 30 00 |."./....56334,0.| 00000430: 39 0C EE 07 97 31 2C 35 31 00 48 0C F8 07 81 20 |9....1,51.H.... | 00000440: 41 B2 31 A4 32 30 34 37 00 60 0C 02 08 97 34 39 |A.1.2047.`....49| 00000450: 31 35 32 AA 41 2C C2 28 35 33 32 34 38 AA 41 29 |152.A,.(53248.A)| 00000460: 00 68 0C 0C 08 82 20 41 00 72 0C 16 08 97 31 2C |.h.... A.r....1,| 00000470: 35 35 00 81 0C 20 08 97 35 36 33 33 34 2C 31 32 |55... ..56334,12| 00000480: 39 00 87 0C 2A 08 8E 00 9B 0C B8 0B 8B 53 43 B3 |9...*........SC.| 00000490: 33 32 A7 53 43 B2 31 32 38 3A 8E 00 A8 0C C2 0B |32.SC.128:......| 000004A0: 8B 53 43 B3 36 34 A7 8E 00 BE 0C CC 0B 8B 53 43 |.SC.64........SC| 000004B0: B3 39 36 A7 53 43 B2 53 43 AB 36 34 3A 8E 00 D5 |.96.SC.SC.64:...| 000004C0: 0C D6 0B 8B 53 43 B3 31 32 38 A7 53 43 B2 53 43 |....SC.128.SC.SC| 000004D0: AB 33 32 3A 8E 00 EA 0C E0 0B 8B 53 43 B3 31 36 |.32:.......SC.16| 000004E0: 30 A7 53 43 B2 31 32 38 3A 8E 00 01 0D EA 0B 8B |0.SC.128:.......| 000004F0: 53 43 B3 31 39 32 A7 53 43 B2 53 43 AB 36 34 3A |SC.192.SC.SC.64:| 00000500: 8E 00 19 0D F4 0B 8B 53 43 B3 32 35 35 A7 53 43 |.......SC.255.SC| 00000510: B2 53 43 AB 31 32 38 3A 8E 00 25 0D FE 0B 53 43 |.SC.128:..%...SC| 00000520: B2 39 34 3A 8E 00 2E 0D A0 0F 99 22 93 22 00 4B |.94:.......".".K| 00000530: 0D A2 0F 99 22 11 11 45 4E 54 45 52 20 55 50 20 |...."..ENTER UP | 00000540: 54 4F 20 35 20 4C 49 4E 45 53 22 00 65 0D A3 0F |TO 5 LINES".e...| 00000550: 99 22 20 38 20 4F 52 20 4C 45 53 53 20 4C 45 54 |." 8 OR LESS LET| 00000560: 54 45 52 53 22 00 77 0D A4 0F 99 22 20 20 50 45 |TERS".w...." PE| 00000570: 52 20 4C 49 4E 45 22 00 82 0D A5 0F 4C 31 24 B2 |R LINE".....L1$.| 00000580: 22 22 00 9A 0D AA 0F 85 22 45 4E 54 45 52 20 4C |""......"ENTER L| 00000590: 49 4E 45 20 31 22 3B 4C 31 24 00 A9 0D B4 0F 8B |INE 1";L1$......| 000005A0: 4C 31 24 B2 22 22 A7 20 8E 00 C7 0D B9 0F 4C B2 |L1$."". ......L.| 000005B0: 31 3A 4C 24 28 31 29 B2 C8 28 4C 31 24 2C 38 29 |1:L$(1)..(L1$,8)| 000005C0: 3A 4C 31 24 B2 22 22 00 DF 0D BE 0F 85 22 45 4E |:L1$.""......"EN| 000005D0: 54 45 52 20 4C 49 4E 45 20 32 22 3B 4C 31 24 00 |TER LINE 2";L1$.| 000005E0: F1 0D C8 0F 8B 4C 31 24 B2 22 22 A7 20 34 31 30 |.....L1$."". 410| 000005F0: 30 00 0F 0E CD 0F 4C B2 32 3A 4C 24 28 32 29 B2 |0.....L.2:L$(2).| 00000600: C8 28 4C 31 24 2C 38 29 3A 4C 31 24 B2 22 22 00 |.(L1$,8):L1$."".| 00000610: 27 0E D2 0F 85 22 45 4E 54 45 52 20 4C 49 4E 45 |'...."ENTER LINE| 00000620: 20 33 22 3B 4C 31 24 00 39 0E DC 0F 8B 4C 31 24 | 3";L1$.9....L1$| 00000630: B2 22 22 A7 20 34 31 30 30 00 57 0E E1 0F 4C B2 |."". 4100.W...L.| 00000640: 33 3A 4C 24 28 33 29 B2 C8 28 4C 31 24 2C 38 29 |3:L$(3)..(L1$,8)| 00000650: 3A 4C 31 24 B2 22 22 00 6F 0E E6 0F 85 22 45 4E |:L1$."".o...."EN| 00000660: 54 45 52 20 4C 49 4E 45 20 34 22 3B 4C 31 24 00 |TER LINE 4";L1$.| 00000670: 81 0E F0 0F 8B 4C 31 24 B2 22 22 A7 20 34 31 30 |.....L1$."". 410| 00000680: 30 00 9F 0E F5 0F 4C B2 34 3A 4C 24 28 34 29 B2 |0.....L.4:L$(4).| 00000690: C8 28 4C 31 24 2C 38 29 3A 4C 31 24 B2 22 22 00 |.(L1$,8):L1$."".| 000006A0: B7 0E FA 0F 85 22 45 4E 54 45 52 20 4C 49 4E 45 |....."ENTER LINE| 000006B0: 20 35 22 3B 4C 31 24 00 C9 0E FF 0F 8B 4C 31 24 | 5";L1$......L1$| 000006C0: B2 22 22 A7 20 34 31 30 30 00 E0 0E 01 10 4C B2 |."". 4100.....L.| 000006D0: 35 3A 4C 24 28 35 29 B2 C8 28 4C 31 24 2C 38 29 |5:L$(5)..(L1$,8)| 000006E0: 00 EB 0E 04 10 57 B2 31 32 AC 4C 00 02 0F 0E 10 |.....W.12.L.....| 000006F0: 57 31 B2 B5 28 28 36 30 AB 57 29 AD 32 29 20 AA |W1..((60.W).2) .| 00000700: 20 35 00 13 0F 18 10 81 20 57 20 B2 20 31 20 A4 | 5...... W . 1 .| 00000710: 20 57 31 00 1E 0F 22 10 98 34 2C 22 20 22 00 24 | W1..."..4," ".$| 00000720: 0F 2C 10 82 00 35 0F 36 10 81 20 58 20 B2 20 20 |.,...5.6.. X . | 00000730: 31 20 A4 20 4C 00 40 0F 40 10 8D 20 35 30 30 30 |1 . L.@.@.. 5000| 00000740: 00 46 0F 45 10 82 00 4C 0F 4A 10 8E 00 5C 0F 88 |.F.E...L.J...\..| 00000750: 13 4C 4C B2 C3 28 4C 24 28 58 29 29 00 6E 0F 92 |.LL..(L$(X)).n..| 00000760: 13 81 20 58 31 20 B2 20 31 20 A4 20 4C 4C 00 84 |.. X1 . 1 . LL..| 00000770: 0F 9C 13 57 24 B2 20 CA 28 4C 24 28 58 29 2C 58 |...W$. .(L$(X),X| 00000780: 31 2C 31 29 00 93 0F A6 13 53 43 20 B2 20 C6 28 |1,1).....SC . .(| 00000790: 57 24 29 00 9E 0F B0 13 8D 20 33 30 30 30 00 AE |W$)...... 3000..| 000007A0: 0F BA 13 43 53 B2 53 AA 28 53 43 AC 38 29 00 BF |...CS.S.(SC.8)..| 000007B0: 0F C4 13 81 20 58 32 20 B2 20 30 20 A4 20 37 00 |.... X2 . 0 . 7.| 000007C0: D5 0F CE 13 42 28 58 31 2C 58 32 29 B2 C2 28 43 |....B(X1,X2)..(C| 000007D0: 53 AA 58 32 29 00 DE 0F D8 13 82 20 58 32 00 E7 |S.X2)...... X2..| 000007E0: 0F E2 13 82 20 58 31 00 00 10 EC 13 4C 43 B2 B5 |.... X1.....LC..| 000007F0: 28 28 38 30 AB 28 4C 4C AC 31 30 29 29 AD 32 29 |((80.(LL.10)).2)| 00000800: 00 0B 10 F6 13 50 4C 24 B2 22 22 00 1B 10 FB 13 |.....PL$."".....| 00000810: 8B 20 4C 43 B2 30 A7 35 31 35 30 00 2D 10 00 14 |. LC.0.5150.-...| 00000820: 81 20 58 31 20 B2 20 31 20 A4 20 4C 43 00 3D 10 |. X1 . 1 . LC.=.| 00000830: 0A 14 50 4C 24 B2 50 4C 24 AA 22 20 22 00 43 10 |..PL$.PL$." ".C.| 00000840: 14 14 82 00 4F 10 1E 14 53 4C 24 B2 50 4C 24 00 |....O...SL$.PL$.| 00000850: 5E 10 70 17 81 20 58 32 B2 30 20 A4 20 37 00 6E |^.p.. X2.0 . 7.n| 00000860: 10 7A 17 81 20 58 31 B2 31 20 A4 20 4C 4C 00 83 |.z.. X1.1 . LL..| 00000870: 10 84 17 81 20 42 49 54 B2 37 20 A4 20 30 20 A9 |.... BIT.7 . 0 .| 00000880: 20 AB 31 00 A4 10 8E 17 8B 28 42 28 58 31 2C 58 | .1......(B(X1,X| 00000890: 32 29 20 AF 20 28 32 AE 42 49 54 29 29 20 A7 20 |2) . (2.BIT)) . | 000008A0: 36 30 34 35 00 BB 10 98 17 50 4C 24 B2 50 4C 24 |6045.....PL$.PL$| 000008B0: AA 22 20 22 3A 89 20 36 30 35 30 00 D5 10 9D 17 |." ":. 6050.....| 000008C0: 50 4C 24 B2 50 4C 24 AA CA 28 4C 24 28 58 29 2C |PL$.PL$..(L$(X),| 000008D0: 58 31 2C 31 29 00 DF 10 A2 17 82 20 42 49 54 00 |X1,1)...... BIT.| 000008E0: F0 10 AC 17 50 4C 24 B2 50 4C 24 AA 22 20 20 22 |....PL$.PL$." "| 000008F0: 00 F9 10 B6 17 82 20 58 31 00 04 11 C0 17 98 34 |...... X1......4| 00000900: 2C 50 4C 24 00 10 11 CA 17 50 4C 24 B2 53 4C 24 |,PL$.....PL$.SL$| 00000910: 00 19 11 D4 17 82 20 58 32 00 24 11 DE 17 98 34 |...... X2.$....4| 00000920: 2C 22 20 22 00 2F 11 E8 17 98 34 2C 22 20 22 00 |," "./....4," ".| 00000930: 3A 11 F2 17 98 34 2C 22 20 22 00 45 11 FC 17 98 |:....4," ".E....| 00000940: 34 2C 22 20 22 00 4B 11 06 18 8E 00 00 00 |4," ".K....... |
....... SIGN MAKER.).... BY KEN AMBER
G.I.... 1832 BRIARWOOD TERR..N....
SOUTH BELMAR, N.J. 07719.Y.... A(7
)...... B(8,8)...... B(213) . 39 . S.491
52:.2000:Z.10:. 100.C...Z.2:S.32768.L.D.
.4,4.U.N.."."...X.."...";.Z.5);"SIGN MAK
ER"......".";.Z);".F1. = BANNER".2....".
";.Z);".F3. = SINGLE PAGE".R....".";.Z);
".F5. = FORM FEED".U. ..".";.Z);".F7. =
EXIT PROGRAM"...... A$:. A$ . "".170....
.. A$."." . A$.".". 110...... A$."." . .
4: 4:....H.. A$."." . .4,G(12):.110...R.
. A$."." . . 500:.110...... A$."." . . 4
000:.110......110."....".".=...."PLEASE
ENTER PHRASE".S...." TO BE PRINTED".\...
. A$.I...LP.C(A$).V.... C.1.LP...... 100
0...&.. C...0.......L1$."
".....X$.J(A$,C,1).L...SC.F(X$).W..
.. 3000.....CS.S.(SC.8)...... I . 0 . 7.
....A(I).B(CS.I)....... .... BIT.7.0 ..1
.4.$.. BYTE . 7.0..1.U.... (A(BYTE).(2.B
IT)) . . 1100.J.8.L1$.L1$." ".U.B..
1110...L.L1$.L1$."******"...V.. BYTE. .
`..4,L1$...J..4,L1$.J.Y.L1$."
".T.~.. BIT.Z.......P..:."I AM
MOVING THE CHARACTER SET".".Z.."THIS TAK
ES A MINUTE......"./....56334,0.9....1,5
1.H.... A.1.2047.`....49152.A,B(53248.A)
.H.... A.R....1,55... ..56334,129...*...
.....SC.32.SC.128:....B..SC.64.....L..SC
.96.SC.SC.64:..U.V..SC.128.SC.SC.32:....
...SC.160.SC.128:.......SC.192.SC.SC.64:
.......SC.255.SC.SC.128:..%...SC.94:....
..".".K...."..ENTER UP TO 5 LINES".E...
." 8 OR LESS LETTERS".W...." PER LINE".
....L1$.""......"ENTER LINE 1";L1$......
L1$."". ..G...L.1:L$(1).H(L1$,8):L1$."".
....."ENTER LINE 2";L1$...H..L1$."". 410
0...M.L.2:L$(2).H(L1$,8):L1$."".'.R.."EN
TER LINE 3";L1$.9....L1$."". 4100.W...L.
3:L$(3).H(L1$,8):L1$."".O...."ENTER LINE
4";L1$......L1$."". 4100.....L.4:L$(4).
H(L1$,8):L1$.""......"ENTER LINE 5";L1$.
I....L1$."". 4100.....L.5:L$(5).H(L1$,8)
.....W.12.L.....W1..((60.W).2) . 5......
W . 1 . W1..."..4," ".$.,...5.6.. X .
1 . L.@.@.. 5000.F.E...L.J...\...LL.C(L$
(X)).N.... X1 . 1 . LL.....W$. J(L$(X),X
1,1).....SC . F(W$)...... 3000.....CS.S.
(SC.8)...D.. X2 . 0 . 7.U.N.B(X1,X2).B(C
S.X2)...X.. X2...... X1.....LC..((80.(LL
.10)).2).....PL$.""...... LC.0.5150.-...
. X1 . 1 . LC.=...PL$.PL$." ".C.....O...
SL$.PL$.^.P.. X2.0 . 7.N.Z.. X1.1 . LL..
.... BIT.7 . 0 . .1......(B(X1,X2) . (2.
BIT)) . 6045.....PL$.PL$." ":. 6050.U...
PL$.PL$.J(L$(X),X1,1)...... BIT.....PL$.
PL$." "...... X1......4,PL$...J.PL$.SL$
...T.. X2.$....4," "./....4," ".:....4,"
".E....4," ".K.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL