SIGN WRITER
FILE INFORMATION
FILENAME(S): SIGN WRITER
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 16:09:40
APPEARS ON: 1 disk(s)
FILE HASH
720e2d64a6201ced97bfaa329a0b0806f81746557fa2853d04ebf442ea508047
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SSD OF COSMOS | SIGN WRITER | PRG | BrainSkull, Sammlung | 4 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2B 08 00 00 8B C2 28 34 39 31 35 32 29 B3 |..+.....(49152).| 00000010: B1 31 36 39 A7 93 22 38 30 32 20 48 49 52 45 53 |.169.."802 HIRES| 00000020: 20 4D 43 4F 44 45 22 2C 38 2C 31 00 3A 08 01 00 | MCODE",8,1.:...| 00000030: 9E 34 39 34 31 37 2C 35 30 30 00 44 08 02 00 89 |.49417,500.D....| 00000040: 33 30 30 30 00 61 08 03 00 97 35 33 32 37 32 2C |3000.a....53272,| 00000050: 28 C2 28 35 33 32 37 32 29 AF 32 34 30 29 AA 31 |(.(53272).240).1| 00000060: 32 00 78 08 05 00 86 57 28 38 30 29 2C 42 28 38 |2.x....W(80),B(8| 00000070: 30 29 2C 56 28 38 30 29 00 94 08 07 00 97 35 33 |0),V(80)......53| 00000080: 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 |280,0:.53281,0:.| 00000090: 22 93 1E 22 00 BD 08 08 00 99 22 93 1D 1D 1D 1D |".."......".....| 000000A0: 1D 1D 1D 1D 1D 12 20 20 20 20 20 20 20 20 20 20 |...... | 000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 E5 08 | "...| 000000C0: 0A 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 20 |...".......... | 000000D0: 20 20 20 53 49 47 4E 20 20 57 52 49 54 45 52 20 | SIGN WRITER | 000000E0: 20 20 20 20 22 00 0D 09 0B 00 99 22 1D 1D 1D 1D | "......"....| 000000F0: 1D 1D 1D 1D 1D 12 20 20 20 20 20 20 20 20 20 20 |...... | 00000100: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 51 09 | ".Q.| 00000110: 14 00 85 22 11 11 1D 1D 4D 45 53 53 41 47 45 3A |..."....MESSAGE:| 00000120: 20 22 3B 42 24 3A 8B 42 24 B2 22 22 A7 99 22 91 | ";B$:.B$.""..".| 00000130: 91 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00000140: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 89 32 | ":.2| 00000150: 30 00 6D 09 16 00 85 22 1D 1D 11 11 48 45 49 47 |0.m...."....HEIG| 00000160: 48 54 3A 20 28 31 2D 39 29 22 3B 48 49 00 AA 09 |HT: (1-9)";HI...| 00000170: 17 00 8B 48 49 B1 39 B0 48 49 B3 31 A7 99 22 91 |...HI.9.HI.1..".| 00000180: 91 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001A0: 20 20 20 20 20 22 3A 89 32 32 00 C6 09 19 00 85 | ":.22......| 000001B0: 22 1D 1D 11 11 57 49 44 54 48 3A 20 28 31 2D 31 |"....WIDTH: (1-1| 000001C0: 30 29 22 3B 57 49 00 04 0A 1A 00 8B 57 49 B1 31 |0)";WI......WI.1| 000001D0: 30 B0 57 49 B3 31 A7 99 22 91 91 91 91 20 20 20 |0.WI.1..".... | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "| 00000200: 3A 89 32 35 00 36 0A 1C 00 99 22 11 11 20 50 52 |:.25.6....".. PR| 00000210: 45 53 53 20 53 48 46 54 2F 53 50 43 20 46 4F 52 |ESS SHFT/SPC FOR| 00000220: 20 52 45 56 45 52 53 45 20 49 4E 20 43 48 41 52 | REVERSE IN CHAR| 00000230: 41 43 54 45 52 22 00 7A 0A 1D 00 85 22 1D 1D 43 |ACTER".z...."..C| 00000240: 48 41 52 41 43 54 45 52 3A 20 22 3B 43 48 24 3A |HARACTER: ";CH$:| 00000250: 8B 43 48 24 B2 22 22 A7 99 22 91 91 91 91 20 20 |.CH$.""..".... | 00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000270: 20 20 20 20 20 22 3A 89 32 39 00 A0 0A 1E 00 99 | ":.29......| 00000280: 22 1D 1D 11 11 50 52 49 4E 54 20 49 4E 20 46 52 |"....PRINT IN FR| 00000290: 4F 4D 20 42 4F 52 44 45 52 20 28 30 2D 39 29 22 |OM BORDER (0-9)"| 000002A0: 00 CD 0A 1F 00 99 22 C2 20 20 20 C2 20 20 20 C2 |......". . .| 000002B0: 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 | . . . .| 000002C0: 20 20 20 C2 20 20 20 C2 20 20 20 C2 22 00 FA 0A | . . ."...| 000002D0: 20 00 99 22 30 20 20 20 31 20 20 20 32 20 20 20 | .."0 1 2 | 000002E0: 33 20 20 20 34 20 20 20 35 20 20 20 36 20 20 20 |3 4 5 6 | 000002F0: 37 20 20 20 38 20 20 20 39 22 00 38 0B 21 00 85 |7 8 9".8.!..| 00000300: 49 42 24 3A 8B 49 42 24 B2 22 22 A7 99 22 91 91 |IB$:.IB$."".."..| 00000310: 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000330: 20 20 20 22 3A 89 33 30 00 7D 0B 22 00 49 42 B2 | ":.30.}.".IB.| 00000340: C5 28 49 42 24 29 3A 8B 49 42 B1 39 B0 49 42 B3 |.(IB$):.IB.9.IB.| 00000350: 30 A7 99 22 91 91 91 91 20 20 20 20 20 20 20 20 |0..".... | 00000360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000370: 20 20 20 20 20 20 20 20 22 3A 89 33 30 00 87 0B | ":.30...| 00000380: 23 00 8D 32 35 30 30 00 93 0B 28 00 99 22 93 22 |#..2500...(.."."| 00000390: 3B 42 24 00 A2 0B 2D 00 81 49 B2 31 A4 C3 28 42 |;B$...-..I.1..(B| 000003A0: 24 29 00 B7 0B 32 00 57 28 49 29 B2 C2 28 31 30 |$)...2.W(I)..(10| 000003B0: 32 34 AA 49 AB 31 29 00 BD 0B 3C 00 82 00 D4 0B |24.I.1)...<.....| 000003C0: 41 00 9F 36 2C 34 2C 36 3A 98 36 2C C7 28 32 31 |A..6,4,6:.6,.(21| 000003D0: 29 3A A0 36 00 DD 0B 42 00 9F 34 2C 34 00 EF 0B |):.6...B..4,4...| 000003E0: 44 00 81 4B B2 C3 28 42 24 29 A4 31 A9 AB 31 00 |D..K..(B$).1..1.| 000003F0: FA 0B 46 00 81 49 B2 30 A4 38 00 17 0C 50 00 42 |..F..I.0.8...P.B| 00000400: 28 49 29 B2 C2 28 31 32 32 38 38 AA 57 28 4B 29 |(I)..(12288.W(K)| 00000410: AC 38 AA 49 AB 31 29 00 1E 0C 5A 00 82 49 00 27 |.8.I.1)...Z..I.'| 00000420: 0C 64 00 4D 4D B2 31 00 33 0C 6E 00 81 4D 43 B2 |.d.MM.1.3.n..MC.| 00000430: 30 A4 37 00 41 0C 78 00 8B 4D 43 B2 30 A7 31 34 |0.7.A.x..MC.0.14| 00000440: 30 00 4D 0C 82 00 4D 4D B2 4D 4D AC 32 00 57 0C |0.M...MM.MM.2.W.| 00000450: 8C 00 8D 32 30 30 30 00 5F 0C 96 00 82 4D 43 00 |...2000._....MC.| 00000460: 66 0C B4 00 82 4B 00 6C 0C BE 00 8A 00 83 0C C8 |f....K.l........| 00000470: 00 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 |..A$:.A$...(13).| 00000480: 32 30 30 00 89 0C D2 00 8E 00 A2 0C 2C 01 53 24 |200.........,.S$| 00000490: B2 22 1E 12 20 53 49 47 4E 20 57 52 49 54 45 52 |.".. SIGN WRITER| 000004A0: 20 22 00 B8 0C 31 01 97 35 33 32 38 30 2C 30 3A | "...1..53280,0:| 000004B0: 97 35 33 32 38 31 2C 30 00 C9 0C 36 01 99 22 93 |.53281,0...6..".| 000004C0: 11 11 11 11 11 11 11 1E 22 00 E5 0C 3B 01 99 A6 |........"...;...| 000004D0: 32 30 AB 37 29 22 12 20 20 20 20 20 20 20 20 20 |20.7)". | 000004E0: 20 20 20 20 22 00 F3 0C 40 01 99 A6 32 30 AB 37 | "...@...20.7| 000004F0: 29 53 24 00 0F 0D 45 01 99 A6 32 30 AB 37 29 22 |)S$...E...20.7)"| 00000500: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 |. ".| 00000510: 1B 0D 4A 01 99 22 11 11 11 11 22 00 36 0D 54 01 |..J.."....".6.T.| 00000520: 99 A6 32 30 AB 37 29 22 1C 42 59 20 41 2E 20 42 |..20.7)".BY A. B| 00000530: 41 49 4E 45 53 22 00 49 0D 7C 01 A1 41 24 3A 8B |AINES".I.|..A$:.| 00000540: 41 24 B2 22 22 A7 33 38 30 00 53 0D 86 01 89 33 |A$."".380.S....3| 00000550: 30 30 32 00 60 0D F4 01 9F 31 35 2C 38 2C 31 35 |002.`....15,8,15| 00000560: 00 75 0D FE 01 84 31 35 2C 45 4E 2C 45 4D 24 2C |.u....15,EN,EM$,| 00000570: 45 53 2C 45 54 00 7D 0D 08 02 A0 31 35 00 93 0D |ES,ET.}....15...| 00000580: 12 02 99 22 93 11 11 44 49 53 4B 20 45 52 52 4F |..."...DISK ERRO| 00000590: 52 3A 22 00 AF 0D 1C 02 99 22 11 11 22 45 4E 22 |R:"......".."EN"| 000005A0: 2C 22 45 4D 24 22 2C 22 45 53 22 2C 22 45 54 00 |,"EM$","ES","ET.| 000005B0: DE 0D 21 02 8B 45 4E B2 36 32 A7 99 22 11 11 49 |..!..EN.62.."..I| 000005C0: 4E 53 45 52 54 20 54 48 45 20 43 4F 52 52 45 43 |NSERT THE CORREC| 000005D0: 54 20 44 49 53 4B 20 50 4C 45 41 53 45 22 00 E7 |T DISK PLEASE"..| 000005E0: 0D 22 02 8D 32 30 30 00 ED 0D 26 02 8A 00 F8 0D |."..200...&.....| 000005F0: D0 07 81 49 B2 31 A4 38 00 09 0E DA 07 56 28 49 |...I.1.8.....V(I| 00000600: 29 B2 42 28 49 29 AF 4D 4D 00 28 0E E4 07 8B 56 |).B(I).MM.(....V| 00000610: 28 49 29 B2 4D 4D A7 50 52 24 B2 50 52 24 AA 48 |(I).MM.PR$.PR$.H| 00000620: 45 24 3A 89 32 30 33 35 00 38 0E EE 07 50 52 24 |E$:.2035.8...PR$| 00000630: B2 50 52 24 AA 48 32 24 00 3E 0E F3 07 82 00 46 |.PR$.H2$.>.....F| 00000640: 0E F4 07 A1 41 24 00 57 0E F5 07 8B 41 24 B2 22 |....A$.W....A$."| 00000650: 20 22 A7 8D 32 30 30 00 64 0E F7 07 81 44 44 B2 | "..200.d....DD.| 00000660: 31 A4 57 49 00 6F 0E F8 07 98 34 2C 50 52 24 00 |1.WI.o....4,PR$.| 00000670: 75 0E F9 07 82 00 81 0E FD 07 50 52 24 B2 50 31 |u.........PR$.P1| 00000680: 24 00 87 0E 02 08 8E 00 A4 0E C4 09 8B 43 48 24 |$............CH$| 00000690: B2 22 A0 22 A7 43 48 24 B2 22 12 20 92 22 3A 89 |.".".CH$.". .":.| 000006A0: 32 35 30 35 00 B5 0E C6 09 43 48 24 B2 C8 28 43 |2505.....CH$..(C| 000006B0: 48 24 2C 31 29 00 C1 0E C9 09 81 49 B2 31 A4 48 |H$,1)......I.1.H| 000006C0: 49 00 D1 0E CE 09 48 45 24 B2 48 45 24 AA 43 48 |I.....HE$.HE$.CH| 000006D0: 24 00 E1 0E D3 09 48 32 24 B2 48 32 24 AA 22 20 |$.....H2$.H2$." | 000006E0: 22 00 E7 0E D8 09 82 00 F5 0E E2 09 81 49 B2 31 |"............I.1| 000006F0: A4 49 42 AC 38 00 05 0F EC 09 50 31 24 B2 50 31 |.IB.8.....P1$.P1| 00000700: 24 AA 22 20 22 00 0B 0F F6 09 82 00 17 0F 00 0A |$." "...........| 00000710: 50 52 24 B2 50 31 24 00 47 0F 0A 0A 50 32 24 B2 |PR$.P1$.G...P2$.| 00000720: 50 31 24 AA 48 45 24 3A 8B C3 28 50 32 24 29 B1 |P1$.HE$:..(P2$).| 00000730: 37 39 A7 49 42 B2 49 42 AB 31 3A 50 31 24 B2 22 |79.IB.IB.1:P1$."| 00000740: 22 3A 89 32 35 33 30 00 4D 0F 1E 0A 8E 00 56 0F |":.2530.M.....V.| 00000750: B8 0B 89 33 30 30 00 84 0F BA 0B 99 C7 28 31 34 |...300.......(14| 00000760: 32 29 20 3A 99 22 93 1D 1D 1D 1D 11 11 11 11 1D |2) :."..........| 00000770: 4C 4F 41 44 20 43 48 41 52 41 43 54 45 52 20 53 |LOAD CHARACTER S| 00000780: 45 54 3F 22 00 A2 0F BD 0B A1 41 24 3A 8B 41 24 |ET?"......A$:.A$| 00000790: B3 B1 22 4E 22 AF 41 24 B3 B1 22 59 22 A7 33 30 |.."N".A$.."Y".30| 000007A0: 30 35 00 B0 0F BF 0B 8B 41 24 B2 22 4E 22 A7 33 |05......A$."N".3| 000007B0: 00 BA 0F C2 0B 89 35 30 30 30 00 C4 0F CC 0B 99 |......5000......| 000007C0: 22 90 22 3B 00 D6 0F D1 0B 9F 31 35 2C 38 2C 31 |".";......15,8,1| 000007D0: 35 2C 22 49 30 22 00 F0 0F D6 0B 9F 33 2C 38 2C |5,"I0"......3,8,| 000007E0: 30 2C 22 30 3A 22 AA 46 24 AA 22 2C 50 2C 52 22 |0,"0:".F$.",P,R"| 000007F0: 00 05 10 E0 0B 84 31 35 2C 45 4D 2C 45 4E 24 2C |......15,EM,EN$,| 00000800: 45 54 2C 45 53 00 21 10 EA 0B 8B 45 4E A7 99 45 |ET,ES.!....EN..E| 00000810: 4E 3B 45 4D 24 3B 45 54 3B 45 53 3A 89 34 30 30 |N;EM$;ET;ES:.400| 00000820: 30 00 52 10 3A 0C 97 31 35 37 2C 31 32 38 3A 97 |0.R.:..157,128:.| 00000830: 31 38 35 2C 30 3A 97 37 38 30 2C 30 3A 97 37 38 |185,0:.780,0:.78| 00000840: 31 2C 30 3A 97 37 38 32 2C 34 38 3A 9E 36 35 34 |1,0:.782,48:.654| 00000850: 39 33 00 67 10 3C 0C 84 31 35 2C 45 4D 2C 45 4E |93.g.<..15,EM,EN| 00000860: 24 2C 45 54 2C 45 53 00 83 10 3E 0C 8B 45 4E A7 |$,ET,ES...>..EN.| 00000870: 99 45 4E 3B 45 4D 24 3B 45 54 3B 45 53 3A 89 34 |.EN;EM$;ET;ES:.4| 00000880: 30 30 30 00 91 10 44 0C A0 31 35 3A A0 33 3A 89 |000...D..15:.3:.| 00000890: 33 00 9E 10 A0 0F A0 31 35 3A A0 33 3A 80 00 D0 |3......15:.3:...| 000008A0: 10 88 13 99 22 93 1D 11 11 49 4E 53 45 52 54 20 |...."....INSERT | 000008B0: 44 49 53 4B 20 46 4F 52 20 52 45 41 44 49 4E 47 |DISK FOR READING| 000008C0: 2E 2E 2E 50 52 45 53 53 20 52 45 54 55 52 4E 22 |...PRESS RETURN"| 000008D0: 00 E9 10 89 13 9C 3A 86 46 46 24 28 31 34 34 29 |......:.FF$(144)| 000008E0: 2C 47 47 24 28 31 34 34 29 00 01 11 92 13 A1 41 |,GG$(144)......A| 000008F0: 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 35 30 31 |$:.A$...(13).501| 00000900: 30 00 31 11 97 13 99 22 91 20 20 20 20 20 20 20 |0.1....". | 00000910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000930: 22 00 41 11 9C 13 9F 31 2C 38 2C 30 2C 22 24 30 |".A....1,8,0,"$0| 00000940: 22 00 4F 11 A1 13 A1 23 31 2C 41 24 2C 42 24 00 |".O....#1,A$,B$.| 00000950: 5D 11 A6 13 A1 23 31 2C 41 24 2C 42 24 00 6B 11 |]....#1,A$,B$.k.| 00000960: B0 13 A1 23 31 2C 41 24 2C 42 24 00 73 11 BA 13 |...#1,A$,B$.s...| 00000970: 43 B2 30 00 87 11 C4 13 8B 41 24 B3 B1 22 22 A7 |C.0......A$.."".| 00000980: 43 B2 C6 28 41 24 29 00 A1 11 CE 13 8B 42 24 B3 |C..(A$)......B$.| 00000990: B1 22 22 A7 43 B2 43 AA C6 28 42 24 29 AC 32 35 |."".C.C..(B$).25| 000009A0: 36 00 B8 11 E2 13 A1 23 31 2C 42 24 3A 8B 53 54 |6......#1,B$:.ST| 000009B0: B3 B1 30 A7 36 30 38 30 00 CC 11 70 17 8B 42 24 |..0.6080...p..B$| 000009C0: B3 B1 C7 28 33 34 29 A7 35 30 39 30 00 F9 11 7A |...(34).5090...z| 000009D0: 17 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 C7 28 33 |..#1,B$:.B$...(3| 000009E0: 34 29 A7 46 46 24 28 4A 29 B2 46 46 24 28 4A 29 |4).FF$(J).FF$(J)| 000009F0: AA 42 24 3A 89 36 30 31 30 00 13 12 84 17 A1 23 |.B$:.6010......#| 00000A00: 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 32 29 A7 36 |1,B$:.B$..(32).6| 00000A10: 30 32 30 00 1D 12 8E 17 43 24 B2 22 22 00 3E 12 |020.....C$."".>.| 00000A20: 98 17 43 24 B2 43 24 AA 42 24 3A A1 23 31 2C 42 |..C$.C$.B$:.#1,B| 00000A30: 24 3A 8B 42 24 B3 B1 22 22 A7 36 30 34 30 00 54 |$:.B$.."".6040.T| 00000A40: 12 B6 17 8B 53 54 B2 30 A7 4A B2 4A AA 31 3A 89 |....ST.0.J.J.1:.| 00000A50: 35 30 33 30 00 75 12 C0 17 46 46 24 28 4A 29 B2 |5030.u...FF$(J).| 00000A60: 46 46 24 28 4A 29 AA 22 20 42 4C 4F 43 4B 53 20 |FF$(J)." BLOCKS | 00000A70: 46 52 45 45 22 00 7C 12 CA 17 A0 31 00 86 12 CF |FREE".|....1....| 00000A80: 17 99 22 93 22 3B 00 91 12 58 1B 81 49 B2 30 A4 |..".";...X..I.0.| 00000A90: 4A 00 B2 12 62 1B 8B C9 28 46 46 24 28 49 29 2C |J...b...(FF$(I),| 00000AA0: 37 29 B2 22 2E 43 48 52 53 45 54 22 A7 8D 38 30 |7).".CHRSET"..80| 00000AB0: 30 30 00 B8 12 6C 1B 82 00 D4 12 71 1B 99 4C AA |00...l.....q..L.| 00000AC0: 31 3B A3 34 29 3B 22 53 45 45 20 4E 45 57 20 44 |1;.4);"SEE NEW D| 00000AD0: 49 53 4B 22 00 F1 12 76 1B 99 22 11 11 45 4E 54 |ISK"...v.."..ENT| 00000AE0: 45 52 20 59 4F 55 52 20 43 48 4F 49 43 45 2E 22 |ER YOUR CHOICE."| 00000AF0: 3B 00 06 13 80 1B 85 41 3A 8B 41 B3 31 B0 41 B1 |;......A:.A.1.A.| 00000B00: 4A A7 37 30 34 30 00 14 13 8A 1B 46 24 B2 47 47 |J.7040.....F$.GG| 00000B10: 24 28 41 29 00 25 13 8F 1B 8B 41 B2 4C AA 31 A7 |$(A).%....A.L.1.| 00000B20: 89 35 30 30 30 00 2F 13 94 1B 89 33 30 32 30 00 |.5000./....3020.| 00000B30: 39 13 40 1F 4C B2 4C AA 31 00 4B 13 4A 1F 47 47 |9.@.L.L.1.K.J.GG| 00000B40: 24 28 4C 29 B2 46 46 24 28 49 29 00 6E 13 72 1F |$(L).FF$(I).n.r.| 00000B50: 99 4C 3B A3 34 29 3B C8 28 46 46 24 28 49 29 2C |.L;.4);.(FF$(I),| 00000B60: C3 28 46 46 24 28 49 29 29 AB 37 29 3A 8E 00 00 |.(FF$(I)).7):...| 00000B70: 00 |. |
..+....B(49152)..169.."802 HIRES MCODE",
8,1.:....49417,500.D....3000.A....53272,
(B(53272).240).12.X....W(80),B(80),V(80)
......53280,0:.53281,0:.".."......".....
...... "......"....
...... SIGN WRITER "......"....
...... ".Q...."....
MESSAGE: ";B$:.B$."".."....
":.20.M...."....HEIGHT: (1-9
)";HI......HI.9.HI.1.."....
":.22.F...."....WID
TH: (1-10)";WI......WI.10.WI.1.."....
":.25.6..
..".. PRESS SHFT/SPC FOR REVERSE IN CHAR
ACTER".Z...."..CHARACTER: ";CH$:.CH$."".
.".... ":.29. ....
"....PRINT IN FROM BORDER (0-9)".M...."B
B B B B B B B B B"...
.."0 1 2 3 4 5 6 7 8
9".8.!..IB$:.IB$."".."....
":.30.}.".IB.E(IB$):.
IB.9.IB.0.."....
":.30...#..2500...(..".";B$...-.
.I.1.C(B$)...2.W(I).B(1024.I.1)...<...T.
A..6,4,6:.6,G(21): 6...B..4,4...D..K.C(B
$).1..1...F..I.0.8...P.B(I).B(12288.W(K)
.8.I.1)...Z..I.'.D.MM.1.3.N..MC.0.7.A.X.
.MC.0.140.M...MM.MM.2.W....2000._....MC.
F....K.L.......H..A$:.A$..G(13).200...R.
....,.S$.".. SIGN WRITER "...1..53280,0:
.53281,0.I.6.."........."...;...20.7)".
"...@...20.7)S$...E...20.7)"
. "...J.."....".6.T...20.7)"
.BY A. BAINES".I.|..A$:.A$."".380.S....3
002.`....15,8,15.U....15,EN,EM$,ES,ET.}.
.. 15......"...DISK ERROR:"......".."EN"
,"EM$","ES","ET...!..EN.62.."..INSERT TH
E CORRECT DISK PLEASE"..."..200...&.....
P..I.1.8...Z.V(I).B(I).MM.(....V(I).MM.P
R$.PR$.HE$:.2035.8...PR$.PR$.H2$.>.....F
....A$.W....A$." "..200.D....DD.1.WI.O..
..4,PR$.U.........PR$.P1$.........D..CH$
." ".CH$.". .":.2505...F.CH$.H(CH$,1).A.
I..I.1.HI.Q.N.HE$.HE$.CH$...S.H2$.H2$."
"...X........I.1.IB.8.....P1$.P1$." "...
........PR$.P1$.G...P2$.P1$.HE$:.C(P2$).
79.IB.IB.1:P1$."":.2530.M.....V....300..
....G(142) :."..........LOAD CHARACTER S
ET?"......A$:.A$.."N".A$.."Y".3005......
A$."N".3...B..5000.D.L..".";.V.Q..15,8,1
5,"I0"...V..3,8,0,"0:".F$.",P,R"......15
,EM,EN$,ET,ES.!....EN..EN;EM$;ET;ES:.400
0.R.:..157,128:.185,0:.780,0:.781,0:.782
,48:.65493.G.<..15,EM,EN$,ET,ES...>..EN.
.EN;EM$;ET;ES:.4000...D. 15: 3:.3... . 1
5: 3:..P...."....INSERT DISK FOR READING
...PRESS RETURN"......:.FF$(144),GG$(144
)......A$:.A$..G(13).5010.1....".
".A....1
,8,0,"$0".O....#1,A$,B$.]....#1,A$,B$.K.
...#1,A$,B$.S...C.0...D..A$.."".C.F(A$).
..N..B$.."".C.C.F(B$).256......#1,B$:.ST
..0.6080.L.P..B$..G(34).5090...Z..#1,B$:
.B$..G(34).FF$(J).FF$(J).B$:.6010......#
1,B$:.B$.G(32).6020.....C$."".>...C$.C$.
B$:.#1,B$:.B$.."".6040.T....ST.0.J.J.1:.
5030.U...FF$(J).FF$(J)." BLOCKS FREE".|.
J. 1...O..".";...X..I.0.J...B..I(FF$(I),
7).".CHRSET"..8000...L...T.Q..L.1;.4);"S
EE NEW DISK"...V.."..ENTER YOUR CHOICE."
;......A:.A.1.A.J.7040.....F$.GG$(A).%..
..A.L.1..5000./....3020.9.@.L.L.1.K.J.GG
$(L).FF$(I).N.R..L;.4);H(FF$(I),C(FF$(I)
).7):....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL