CROSSWORD 128
FILE INFORMATION
FILENAME(S): CROSSWORD 128
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-11-30 18:12:16
APPEARS ON: 1 disk(s)
FILE HASH
60c9208cfb9c5f30d42e8a5947ae1d7543ae95c921a5baa04fc345ddf0dbba8e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 48 S 2 | CROSSWORD 128 | PRG | Sailor, Ganheden | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 38 1C 0A 00 99 C7 28 31 34 29 22 93 20 20 |..8.....(14)". |
00000010: C3 52 4F 53 53 D7 4F 52 44 20 C3 52 45 41 54 4F |.ROSS.ORD .REATO|
00000020: 52 20 2D 2D 20 42 59 20 CD 41 52 4B 20 CA 4F 52 |R -- BY .ARK .OR|
00000030: 44 41 4E 22 3A FE 0B 32 00 68 1C 0F 00 86 58 24 |DAN":..2.h....X$|
00000040: 28 31 30 29 2C 42 4C 28 31 33 2C 31 30 29 2C 41 |(10),BL(13,10),A|
00000050: 43 24 28 39 39 29 2C 44 4E 24 28 39 39 29 2C 43 |C$(99),DN$(99),C|
00000060: 4C 24 28 31 2C 39 39 29 00 7B 1C 14 00 E7 30 2C |L$(1,99).{....0,|
00000070: 31 3A E7 34 2C 31 3A E7 31 2C 36 00 94 1C 19 00 |1:.4,1:.1,6.....|
00000080: DE 32 2C 31 2C 32 31 3A FE 1A 30 2C 32 31 2C 33 |.2,1,21:..0,21,3|
00000090: 39 2C 32 34 00 ED 1C 1E 00 43 4C 24 B2 22 31 30 |9,24.....CL$."10|
000000A0: 22 3A 85 22 C8 4F 57 20 4D 41 4E 59 20 43 4F 4C |":.".OW MANY COL|
000000B0: 55 4D 4E 53 20 28 44 45 46 41 55 4C 54 20 3D 20 |UMNS (DEFAULT = |
000000C0: 31 30 29 22 3B 43 4C 24 3A 43 4C B2 C5 28 43 4C |10)";CL$:CL..(CL|
000000D0: 24 29 3A 8B 43 4C B1 31 33 A7 99 22 D4 4F 4F 20 |$):.CL.13..".OO |
000000E0: 4D 41 4E 59 22 3A FE 0B 31 3A 89 33 30 00 43 1D |MANY":..1:.30.C.|
000000F0: 23 00 52 4F 24 B2 22 31 30 22 3A 85 22 C8 4F 57 |#.RO$."10":.".OW|
00000100: 20 4D 41 4E 59 20 52 4F 57 53 20 28 44 45 46 41 | MANY ROWS (DEFA|
00000110: 55 4C 54 20 3D 20 31 30 29 22 3B 52 4F 24 3A 52 |ULT = 10)";RO$:R|
00000120: 4F B2 C5 28 52 4F 24 29 3A 8B 52 4F B1 31 30 A7 |O..(RO$):.RO.10.|
00000130: 99 22 D4 4F 4F 20 4D 41 4E 59 22 3A FE 0B 31 3A |.".OO MANY":..1:|
00000140: 89 33 35 00 4D 1D 28 00 99 22 93 22 3B 00 68 1D |.35.M.(..".";.h.|
00000150: 2D 00 53 B2 34 3A 8B 52 4F AD 32 B3 B1 B5 28 52 |-.S.4:.RO.2...(R|
00000160: 4F AD 32 29 A7 53 B2 30 00 A8 1D 32 00 55 58 B2 |O.2).S.0...2.UX.|
00000170: 28 31 33 AB 43 4C 29 AD 32 AC 32 34 AA 53 3A 55 |(13.CL).2.24.S:U|
00000180: 59 B2 28 31 30 AB 52 4F 29 AD 32 AC 31 36 AA 34 |Y.(10.RO).2.16.4|
00000190: 3A 4C 58 B2 55 58 AA 43 4C AC 32 34 3A 4C 59 B2 |:LX.UX.CL.24:LY.|
000001A0: 55 59 AA 52 4F AC 31 36 00 D2 1D 37 00 58 B2 31 |UY.RO.16...7.X.1|
000001B0: 3A 59 B2 31 3A 44 58 B2 B5 28 28 55 58 AA 38 29 |:Y.1:DX..((UX.8)|
000001C0: AD 38 29 3A 44 59 B2 B5 28 28 55 59 AA 34 29 AD |.8):DY..((UY.4).|
000001D0: 38 29 00 F2 1D 3C 00 45 24 B2 C7 28 32 37 29 3A |8)...<.E$..(27):|
000001E0: 4F 24 B2 45 24 AA 22 4F 22 3A 4C 24 B2 C7 28 31 |O$.E$."O":L$..(1|
000001F0: 33 29 00 1A 1E 41 00 81 54 B2 31 A4 34 30 3A 53 |3)...A..T.1.40:S|
00000200: 50 24 B2 53 50 24 AA 22 20 20 22 3A 55 55 24 B2 |P$.SP$." ":UU$.|
00000210: 55 55 24 AA 22 A4 A4 22 3A 82 00 79 1E 46 00 42 |UU$."..":..y.F.B|
00000220: 4D 24 B2 22 A7 A4 A4 A4 A4 BA A4 A4 A4 A4 BA A4 |M$."............|
00000230: A4 A4 A4 BA A4 A4 A4 A4 BA A4 A4 A4 A4 BA A4 A4 |................|
00000240: A4 A4 BA A4 A4 A4 A4 BA A4 A4 A4 A4 BA A4 A4 A4 |................|
00000250: A4 BA A4 A4 A4 A4 BA A4 A4 A4 A4 BA A4 A4 A4 A4 |................|
00000260: BA A4 A4 A4 A4 BA 22 3A 42 4D 24 B2 C8 28 42 4D |......":BM$..(BM|
00000270: 24 2C 43 4C AC 35 AA 31 29 00 D5 1E 4B 00 4D 24 |$,CL.5.1)...K.M$|
00000280: B2 22 A7 20 20 20 20 AA 20 20 20 20 AA 20 20 20 |.". . . |
00000290: 20 AA 20 20 20 20 AA 20 20 20 20 AA 20 20 20 20 | . . . |
000002A0: AA 20 20 20 20 AA 20 20 20 20 AA 20 20 20 20 AA |. . . .|
000002B0: 20 20 20 20 AA 20 20 20 20 AA 20 20 20 20 AA 20 | . . . |
000002C0: 20 20 20 AA 22 3A 4D 24 B2 C8 28 4D 24 2C 43 4C | .":M$..(M$,CL|
000002D0: AC 35 AA 31 29 00 EC 1E 50 00 81 54 B2 31 A4 31 |.5.1)...P..T.1.1|
000002E0: 30 3A 4E 24 28 54 29 B2 4D 24 3A 82 00 16 1F 55 |0:N$(T).M$:....U|
000002F0: 00 55 4E 24 B2 45 24 AA C7 28 34 35 29 AA C7 28 |.UN$.E$..(45)..(|
00000300: 34 39 29 3A 55 46 24 B2 45 24 AA C7 28 34 35 29 |49):UF$.E$..(45)|
00000310: AA C7 28 34 38 29 00 40 1F 5A 00 50 43 24 B2 45 |..(48).@.Z.PC$.E|
00000320: 24 AA C7 28 35 31 29 AA C7 28 32 31 29 3A 50 44 |$..(51)..(21):PD|
00000330: 24 B2 45 24 AA C7 28 35 31 29 AA C7 28 33 36 29 |$.E$..(51)..(36)|
00000340: 00 53 1F 5F 00 E1 31 2C 55 58 2C 55 59 2C 4C 58 |.S._..1,UX,UY,LX|
00000350: 2C 4C 59 00 82 1F 64 00 81 54 B2 31 A4 43 4C AB |,LY...d..T.1.CL.|
00000360: 31 3A E5 31 2C 55 58 AA 54 AC 32 34 2C 55 59 A4 |1:.1,UX.T.24,UY.|
00000370: 55 58 AA 54 AC 32 34 2C 55 59 AA 52 4F AC 31 36 |UX.T.24,UY.RO.16|
00000380: 3A 82 00 B1 1F 69 00 81 54 B2 31 A4 52 4F AB 31 |:....i..T.1.RO.1|
00000390: 3A E5 31 2C 55 58 2C 55 59 AA 54 AC 31 36 A4 55 |:.1,UX,UY.T.16.U|
000003A0: 58 AA 43 4C AC 32 34 2C 55 59 AA 54 AC 31 36 3A |X.CL.24,UY.T.16:|
000003B0: 82 00 EA 1F 6E 00 43 48 24 B2 22 41 42 43 44 45 |....n.CH$."ABCDE|
000003C0: 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 55 |FGHIJKLMNOPQRSTU|
000003D0: 56 57 58 59 5A 20 91 11 9D 1D 22 AA C7 28 31 33 |VWXYZ ...."..(13|
000003E0: 29 AA 22 2B 2D 5C 22 AA 45 24 00 4D 20 73 00 49 |)."+-\".E$.M s.I|
000003F0: 4E 24 B2 C8 28 43 48 24 2C 32 36 29 AA 22 C1 C2 |N$..(CH$,26)."..|
00000400: C3 C4 C5 C6 C7 C8 C9 CA CB CC CD CE CF D0 D1 D2 |................|
00000410: D3 D4 D5 D6 D7 D8 D9 DA 31 32 33 34 35 36 37 38 |........12345678|
00000420: 39 30 2B 2D 5C 2C 2E 2F 3C 3E 3F 3A 3B 3D 5B 5D |90+-\,./<>?:;=[]|
00000430: 21 23 24 25 26 27 28 29 20 A4 22 AA C7 28 33 34 |!#$%&'() ."..(34|
00000440: 29 AA C7 28 32 30 29 AA C7 28 31 33 29 00 6A 20 |)..(20)..(13).j |
00000450: 78 00 E0 31 2C 44 58 2C 44 59 2C 22 20 22 2C 31 |x..1,DX,DY," ",1|
00000460: 3A 4F 56 B2 31 3A 52 56 B2 30 00 A1 20 7D 00 99 |:OV.1:RV.0.. }..|
00000470: 22 12 1F 20 20 20 20 20 D5 53 45 20 43 55 52 53 |".. .SE CURS|
00000480: 4F 52 20 4B 45 59 53 20 54 4F 20 53 45 4C 45 43 |OR KEYS TO SELEC|
00000490: 54 20 42 4F 58 20 20 20 20 20 20 22 45 24 22 4D |T BOX "E$"M|
000004A0: 22 00 D3 20 82 00 99 22 12 9B 20 2B 20 46 4F 52 |".. ...".. + FOR|
000004B0: 20 41 43 52 4F 53 53 20 54 59 50 49 4E 47 2C 20 | ACROSS TYPING, |
000004C0: 2D 20 46 4F 52 20 44 4F 57 4E 20 54 59 50 49 4E |- FOR DOWN TYPIN|
000004D0: 47 20 22 00 05 21 87 00 99 22 12 9F 20 5C 20 54 |G "..!...".. \ T|
000004E0: 4F 20 53 48 55 54 20 4F 46 46 20 41 55 54 4F 4D |O SHUT OFF AUTOM|
000004F0: 41 54 49 43 20 43 55 52 53 4F 52 20 4D 4F 56 45 |ATIC CURSOR MOVE|
00000500: 4D 45 4E 54 22 00 37 21 8C 00 99 22 12 9A 20 20 |MENT".7!...".. |
00000510: D2 C5 D4 D5 D2 CE 20 54 4F 20 43 52 45 41 54 45 |...... TO CREATE|
00000520: 20 42 4C 41 4E 4B 53 2C 20 C5 D3 C3 20 54 4F 20 | BLANKS, ... TO |
00000530: 45 58 49 54 20 20 22 00 3D 21 96 00 EB 00 5B 21 |EXIT ".=!....[!|
00000540: 9B 00 A1 F9 41 24 3A 41 B2 D4 28 43 48 24 2C 41 |....A$:A..(CH$,A|
00000550: 24 29 3A 8B 41 B2 30 A7 31 35 35 00 68 21 A0 00 |$):.A.0.155.h!..|
00000560: 8B 41 24 B2 45 24 A7 ED 00 75 21 A5 00 8B 41 B1 |.A$.E$...u!...A.|
00000570: 32 37 A7 FE 18 00 94 21 AA 00 E0 31 2C 43 58 AA |27.....!...1,CX.|
00000580: 44 58 2C 43 59 AA 44 59 2C 4C 45 24 2C 52 56 3A |DX,CY.DY,LE$,RV:|
00000590: 52 56 B2 30 00 BE 21 AF 00 91 41 AB 32 37 8D 33 |RV.0..!...A.27.3|
000005A0: 32 30 2C 33 31 30 2C 33 33 30 2C 33 30 30 2C 33 |20,310,330,300,3|
000005B0: 34 30 2C 33 36 35 2C 33 37 30 2C 33 37 35 00 D8 |40,365,370,375..|
000005C0: 21 B4 00 58 B2 28 43 58 AD 33 29 AA 31 3A 59 B2 |!..X.(CX.3).1:Y.|
000005D0: 28 43 59 AD 32 29 AA 31 00 F1 21 B9 00 8B 42 4C |(CY.2).1..!...BL|
000005E0: 28 58 2C 59 29 B2 31 A7 52 56 B2 31 3A 4F 56 B2 |(X,Y).1.RV.1:OV.|
000005F0: 30 00 16 22 BE 00 4C 45 24 B2 CA 28 58 24 28 59 |0.."..LE$..(X$(Y|
00000600: 29 2C 58 2C 31 29 3A 8B 4C 45 24 B2 22 22 A7 4C |),X,1):.LE$."".L|
00000610: 45 24 B2 22 20 22 00 35 22 C3 00 E0 31 2C 43 58 |E$." ".5"...1,CX|
00000620: AA 44 58 2C 43 59 AA 44 59 2C 4C 45 24 2C 4F 56 |.DX,CY.DY,LE$,OV|
00000630: 3A 4F 56 B2 31 00 44 22 C8 00 8B 41 24 B2 4C 24 |:OV.1.D"...A$.L$|
00000640: A7 32 32 35 00 50 22 CD 00 FE 19 3A 89 32 33 35 |.225.P"....:.235|
00000650: 00 76 22 D2 00 8B 42 4C 41 4E 4B 28 58 2C 59 29 |.v"...BLANK(X,Y)|
00000660: B2 31 A7 43 43 B2 30 3A 8D 33 35 30 3A 42 4C 28 |.1.CC.0:.350:BL(|
00000670: 58 2C 59 29 B2 30 00 AD 22 D7 00 52 56 B2 30 3A |X,Y).0.."..RV.0:|
00000680: 4C 45 24 B2 41 24 3A 58 24 28 59 29 B2 C8 28 58 |LE$.A$:X$(Y)..(X|
00000690: 24 28 59 29 AA 53 50 24 2C 58 AB 31 29 AA 41 24 |$(Y).SP$,X.1).A$|
000006A0: AA CA 28 58 24 28 59 29 2C 58 AA 31 29 00 CC 22 |..(X$(Y),X.1).."|
000006B0: DC 00 E0 31 2C 43 58 AA 44 58 2C 43 59 AA 44 59 |...1,CX.DX,CY.DY|
000006C0: 2C 4C 45 24 2C 4F 56 3A 4F 56 B2 31 00 E5 22 E1 |,LE$,OV:OV.1..".|
000006D0: 00 8B 44 49 B2 31 A7 97 32 30 38 2C 31 3A 97 38 |..DI.1..208,1:.8|
000006E0: 34 32 2C 31 37 00 FE 22 E6 00 8B 44 49 B2 32 A7 |42,17.."...DI.2.|
000006F0: 97 32 30 38 2C 31 3A 97 38 34 32 2C 32 39 00 04 |.208,1:.842,29..|
00000700: 23 EB 00 EC 00 3B 23 F5 00 E7 30 2C 35 3A 99 22 |#....;#...0,5:."|
00000710: 93 90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000720: C3 41 4C 43 55 4C 41 54 49 4E 47 20 2E 2E 2E 20 |.ALCULATING ... |
00000730: 20 20 20 20 20 20 20 20 20 20 22 00 59 23 FA 00 | ".Y#..|
00000740: 8D 33 38 30 3A 8F 20 46 49 47 55 52 45 20 41 43 |.380:. FIGURE AC|
00000750: 52 4F 53 53 2F 44 4F 57 4E 00 72 23 FF 00 8D 35 |ROSS/DOWN.r#...5|
00000760: 32 30 3A 8F 20 41 53 4B 20 46 4F 52 20 43 4C 55 |20:. ASK FOR CLU|
00000770: 45 53 00 8A 23 04 01 8D 36 33 30 3A 8F 20 50 52 |ES..#...630:. PR|
00000780: 49 4E 54 20 50 55 5A 5A 4C 45 00 C2 23 09 01 DE |INT PUZZLE..#...|
00000790: 32 2C 2C 32 31 3A 99 22 93 D0 52 45 53 53 20 2A |2,,21:."..RESS *|
000007A0: 20 54 4F 20 50 52 49 4E 54 20 41 4E 4F 54 48 45 | TO PRINT ANOTHE|
000007B0: 52 2C 20 CB 20 54 4F 20 50 52 49 4E 54 20 CB C5 |R, . TO PRINT ..|
000007C0: D9 22 00 DE 23 0B 01 99 2C 22 C1 44 4A 55 53 54 |."..#...,".DJUST|
000007D0: 20 50 41 50 45 52 20 46 49 52 53 54 2E 22 00 03 | PAPER FIRST."..|
000007E0: 24 0E 01 A1 F9 41 24 3A 8B 41 24 B2 22 4B 22 A7 |$....A$:.A$."K".|
000007F0: 4B 45 B2 31 3A 8D 36 33 30 3A 4B 45 B2 30 3A 89 |KE.1:.630:KE.0:.|
00000800: 32 36 35 00 19 24 10 01 8B 41 24 B2 22 2A 22 A7 |265..$...A$."*".|
00000810: 8D 36 33 30 3A 89 32 36 35 00 39 24 13 01 99 22 |.630:.265.9$..."|
00000820: 93 C4 4F 20 41 4E 4F 54 48 45 52 20 50 55 5A 5A |..O ANOTHER PUZZ|
00000830: 4C 45 3F 20 20 D9 2F CE 22 00 4C 24 18 01 A1 F9 |LE? ./.".L$....|
00000840: 41 24 3A 8B 41 24 B2 22 59 22 A7 8A 00 5D 24 1D |A$:.A$."Y"...]$.|
00000850: 01 8B 41 24 B3 B1 22 4E 22 A7 32 38 30 00 68 24 |..A$.."N".280.h$|
00000860: 22 01 DE 30 2C 31 3A 80 00 83 24 2C 01 43 58 B2 |"..0,1:...$,.CX.|
00000870: 43 58 AA 33 3A 8B 43 58 B2 B1 43 4C AC 33 A7 43 |CX.3:.CX..CL.3.C|
00000880: 58 B2 30 00 89 24 31 01 8E 00 A4 24 36 01 43 59 |X.0..$1....$6.CY|
00000890: B2 43 59 AA 32 3A 8B 43 59 B2 B1 52 4F AC 32 A7 |.CY.2:.CY..RO.2.|
000008A0: 43 59 B2 30 00 AA 24 3B 01 8E 00 C6 24 40 01 43 |CY.0..$;....$@.C|
000008B0: 59 B2 43 59 AB 32 3A 8B 43 59 B3 30 A7 43 59 B2 |Y.CY.2:.CY.0.CY.|
000008C0: 52 4F AC 32 AB 32 00 CC 24 45 01 8E 00 E8 24 4A |RO.2.2..$E....$J|
000008D0: 01 43 58 B2 43 58 AB 33 3A 8B 43 58 B3 30 A7 43 |.CX.CX.3:.CX.0.C|
000008E0: 58 B2 43 4C AC 33 AB 33 00 EE 24 4F 01 8E 00 01 |X.CL.3.3..$O....|
000008F0: 25 54 01 42 4C 28 58 2C 59 29 B2 31 3A 43 43 B2 |%T.BL(X,Y).1:CC.|
00000900: 31 00 2D 25 59 01 58 24 28 59 29 B2 C8 28 58 24 |1.-%Y.X$(Y)..(X$|
00000910: 28 59 29 AA 53 50 24 2C 58 AB 31 29 AA 22 20 22 |(Y).SP$,X.1)." "|
00000920: AA CA 28 58 24 28 59 29 2C 58 AA 31 29 00 4F 25 |..(X$(Y),X.1).O%|
00000930: 5E 01 58 58 B2 28 43 58 AC 38 29 AA 55 58 AA 32 |^.XX.(CX.8).UX.2|
00000940: 3A 59 59 B2 28 43 59 AC 38 29 AA 55 59 AA 32 00 |:YY.(CY.8).UY.2.|
00000950: 6C 25 63 01 E1 43 43 2C 58 58 2C 59 59 2C 58 58 |l%c..CC,XX,YY,XX|
00000960: AA 32 30 2C 59 59 AA 31 32 2C 2C 31 00 72 25 68 |.20,YY.12,,1.r%h|
00000970: 01 8E 00 7D 25 6D 01 44 49 B2 32 3A 8E 00 88 25 |...}%m.DI.2:...%|
00000980: 72 01 44 49 B2 31 3A 8E 00 93 25 77 01 44 49 B2 |r.DI.1:...%w.DI.|
00000990: 30 3A 8E 00 A0 25 7C 01 81 59 B2 31 A4 52 4F 57 |0:...%|..Y.1.ROW|
000009A0: 00 B5 25 81 01 81 58 B2 31 A4 43 4C 3A 5A 24 B2 |..%...X.1.CL:Z$.|
000009B0: 58 24 28 59 29 00 C2 25 86 01 8B 58 B3 43 4C A7 |X$(Y)..%...X.CL.|
000009C0: FE 18 00 D5 25 8B 01 8B 58 B2 31 A7 8D 34 35 30 |....%...X.1..450|
000009D0: 3A 89 34 31 30 00 EF 25 90 01 8B CA 28 5A 24 2C |:.410..%....(Z$,|
000009E0: 58 AB 31 2C 31 29 B2 22 20 22 A7 8D 34 35 30 00 |X.1,1)." "..450.|
000009F0: F6 25 95 01 FE 19 00 03 26 9A 01 8B 59 B3 52 4F |.%......&...Y.RO|
00000A00: A7 FE 18 00 16 26 9F 01 8B 59 B2 31 A7 8D 34 38 |.....&...Y.1..48|
00000A10: 30 3A 89 34 33 30 00 33 26 A4 01 8B CA 28 58 24 |0:.430.3&....(X$|
00000A20: 28 59 AB 31 29 2C 58 2C 31 29 B2 22 20 22 A7 8D |(Y.1),X,1)." "..|
00000A30: 34 38 30 00 3A 26 A9 01 FE 19 00 42 26 AE 01 4B |480.:&.....B&..K|
00000A40: B2 30 00 4A 26 B3 01 82 3A 82 00 50 26 B8 01 8E |.0.J&...:..P&...|
00000A50: 00 75 26 C2 01 8B CA 28 5A 24 2C 58 2C 31 29 B2 |.u&....(Z$,X,1).|
00000A60: 22 20 22 B0 CA 28 5A 24 2C 58 AA 31 2C 31 29 B2 |" "..(Z$,X.1,1).|
00000A70: 22 20 22 A7 8E 00 C8 26 C7 01 4E 42 B2 4E 42 AA |" "....&..NB.NB.|
00000A80: 31 3A 4B B2 31 3A 4E 24 B2 CA 28 C4 28 4E 42 29 |1:K.1:N$..(.(NB)|
00000A90: 2C 32 29 3A 4E 24 28 59 29 B2 C8 28 4E 24 28 59 |,2):N$(Y)..(N$(Y|
00000AA0: 29 2C 28 58 AB 31 29 AC 35 AA 31 29 AA 4E 24 AA |),(X.1).5.1).N$.|
00000AB0: CA 28 4E 24 28 59 29 2C 28 58 AB 31 29 AC 35 AA |.(N$(Y),(X.1).5.|
00000AC0: 32 AA C3 28 4E 24 29 29 00 E8 26 CC 01 50 B2 D4 |2..(N$))..&..P..|
00000AD0: 28 5A 24 2C 22 20 22 2C 58 AA 32 29 3A 8B 50 B2 |(Z$," ",X.2):.P.|
00000AE0: 30 A7 50 B2 43 4C AA 31 00 00 27 D1 01 41 43 24 |0.P.CL.1..'..AC$|
00000AF0: 28 4E 42 29 B2 CA 28 5A 24 2C 58 2C 50 AB 58 29 |(NB)..(Z$,X,P.X)|
00000B00: 00 06 27 D6 01 8E 00 2E 27 E0 01 8B CA 28 5A 24 |..'.....'....(Z$|
00000B10: 2C 58 2C 31 29 B2 22 20 22 B0 CA 28 58 24 28 59 |,X,1)." "..(X$(Y|
00000B20: AA 31 29 2C 58 2C 31 29 B2 22 20 22 A7 8E 00 82 |.1),X,1)." "....|
00000B30: 27 E5 01 8B 4B B2 30 A7 4E 42 B2 4E 42 AA 31 3A |'...K.0.NB.NB.1:|
00000B40: 4E 24 B2 CA 28 C4 28 4E 42 29 2C 32 29 3A 4E 24 |N$..(.(NB),2):N$|
00000B50: 28 59 29 B2 C8 28 4E 24 28 59 29 2C 28 58 AB 31 |(Y)..(N$(Y),(X.1|
00000B60: 29 AC 35 AA 31 29 AA 4E 24 AA CA 28 4E 24 28 59 |).5.1).N$..(N$(Y|
00000B70: 29 2C 28 58 AB 31 29 AC 35 AA 32 AA C3 28 4E 24 |),(X.1).5.2..(N$|
00000B80: 29 29 00 8E 27 EA 01 81 54 B2 59 A4 52 4F 00 AE |))..'...T.Y.RO..|
00000B90: 27 EF 01 8B CA 28 58 24 28 54 29 2C 58 2C 31 29 |'....(X$(T),X,1)|
00000BA0: B2 22 20 22 A7 54 B2 52 4F 3A 89 35 30 35 00 CF |." ".T.RO:.505..|
00000BB0: 27 F4 01 44 4E 24 28 4E 42 29 B2 44 4E 24 28 4E |'..DN$(NB).DN$(N|
00000BC0: 42 29 AA CA 28 58 24 28 54 29 2C 58 2C 31 29 00 |B)..(X$(T),X,1).|
00000BD0: D5 27 F9 01 82 00 DB 27 FE 01 8E 00 11 28 08 02 |.'.....'.....(..|
00000BE0: E7 30 2C 31 3A FE 1A 30 2C 32 31 2C 33 39 2C 32 |.0,1:..0,21,39,2|
00000BF0: 34 2C 31 3A 99 22 9B D4 59 50 45 20 41 20 43 4C |4,1:."..YPE A CL|
00000C00: 55 45 20 46 4F 52 20 45 41 43 48 20 57 4F 52 44 |UE FOR EACH WORD|
00000C10: 22 00 1D 28 0D 02 81 54 B2 31 A4 4E 42 00 41 28 |"..(...T.1.NB.A(|
00000C20: 12 02 8B 41 43 24 28 54 29 B3 B1 22 22 A7 58 24 |...AC$(T).."".X$|
00000C30: B2 41 43 24 28 54 29 3A 41 44 B2 30 3A 8D 35 35 |.AC$(T):AD.0:.55|
00000C40: 30 00 65 28 17 02 8B 44 4E 24 28 54 29 B3 B1 22 |0.e(...DN$(T).."|
00000C50: 22 A7 58 24 B2 44 4E 24 28 54 29 3A 41 44 B2 31 |".X$.DN$(T):AD.1|
00000C60: 3A 8D 35 35 30 00 6D 28 1C 02 82 3A 8E 00 A1 28 |:.550.m(...:...(|
00000C70: 26 02 99 22 1D 13 11 22 C8 28 C8 28 53 50 24 2C |&.."...".(.(SP$,|
00000C80: 28 34 30 AB C3 28 58 24 29 29 AD 32 29 AA 22 12 |(40..(X$)).2).".|
00000C90: 9A 22 AA 58 24 AA 22 92 22 AA 53 50 24 2C 33 39 |.".X$.".".SP$,39|
00000CA0: 29 00 B9 28 2B 02 FE 1A 32 2C 32 34 2C 33 37 2C |)..(+...2,24,37,|
00000CB0: 32 34 3A 99 22 A4 9D 22 3B 00 CD 28 30 02 42 24 |24:."..";..(0.B$|
00000CC0: B2 22 22 3A 8D 35 38 30 3A 99 22 93 22 00 DE 28 |."":.580:."."..(|
00000CD0: 35 02 FE 1A 30 2C 32 31 2C 33 39 2C 32 34 00 E4 |5...0,21,39,24..|
00000CE0: 28 3A 02 8E 00 EA 28 44 02 EB 00 08 29 49 02 A1 |(:....(D....)I..|
00000CF0: F9 41 24 3A 41 B2 D4 28 49 4E 24 2C 41 24 29 3A |.A$:A..(IN$,A$):|
00000D00: 8B 41 B2 30 A7 35 38 35 00 1C 29 4E 02 8B 41 B2 |.A.0.585..)N..A.|
00000D10: 38 38 A7 8D 36 32 30 3A 89 36 30 35 00 28 29 53 |88..620:.605.()S|
00000D20: 02 8B 41 B2 38 39 A7 ED 00 35 29 58 02 42 24 B2 |..A.89...5)X.B$.|
00000D30: 42 24 AA 41 24 00 44 29 5D 02 99 41 24 4F 24 22 |B$.A$.D)]..A$O$"|
00000D40: A4 9D 22 3B 00 4A 29 62 02 EC 00 5D 29 67 02 43 |..";.J)b...])g.C|
00000D50: 4C 24 28 41 44 2C 54 29 B2 42 24 3A 8E 00 7A 29 |L$(AD,T).B$:..z)|
00000D60: 6C 02 8B 42 24 B3 B1 22 22 A7 42 24 B2 C8 28 42 |l..B$.."".B$..(B|
00000D70: 24 2C C3 28 42 24 29 AB 31 29 00 80 29 71 02 8E |$,.(B$).1)..)q..|
00000D80: 00 B3 29 76 02 DE 30 3A 99 22 93 C9 46 20 53 50 |..)v..0:."..F SP|
00000D90: 41 43 49 4E 47 2F 55 4E 44 45 52 4C 49 4E 49 4E |ACING/UNDERLININ|
00000DA0: 47 20 44 4F 4E 27 54 20 57 4F 52 4B 20 52 49 47 |G DON'T WORK RIG|
00000DB0: 48 54 22 00 DF 29 7B 02 99 22 4F 4E 20 59 4F 55 |HT"..){.."ON YOU|
00000DC0: 52 20 50 52 49 4E 54 45 52 2C 20 43 48 41 4E 47 |R PRINTER, CHANG|
00000DD0: 45 20 4C 49 4E 45 53 20 38 35 2D 39 30 2E 22 00 |E LINES 85-90.".|
00000DE0: 10 2A 80 02 99 22 12 D4 55 52 4E 20 4F 4E 20 50 |.*..."..URN ON P|
00000DF0: 52 49 4E 54 45 52 2E 20 20 D0 52 45 53 53 20 D2 |RINTER. .RESS .|
00000E00: 45 54 55 52 4E 20 54 4F 20 42 45 47 49 4E 2E 22 |ETURN TO BEGIN."|
00000E10: 00 25 2A 85 02 A1 F9 41 24 3A 8B 41 24 B3 B1 4C |.%*....A$:.A$..L|
00000E20: 24 A7 36 34 35 00 2E 2A 8A 02 9F 34 2C 34 00 4B |$.645..*...4,4.K|
00000E30: 2A 8F 02 54 42 24 B2 C8 28 53 50 24 2C 28 38 30 |*..TB$..(SP$,(80|
00000E40: AB 28 43 4C AC 35 29 29 AD 32 29 00 56 2A 94 02 |.(CL.5)).2).V*..|
00000E50: 98 34 2C 50 43 24 00 6F 2A 99 02 98 34 2C 54 42 |.4,PC$.o*...4,TB|
00000E60: 24 22 20 22 C8 28 55 55 24 2C 43 4C AC 35 29 00 |$" ".(UU$,CL.5).|
00000E70: 9C 2A 9E 02 81 54 B2 31 A4 52 4F 57 3A 4D 31 24 |.*...T.1.ROW:M1$|
00000E80: B2 4D 24 3A 4D 32 24 B2 4E 24 28 54 29 3A 4D 33 |.M$:M2$.N$(T):M3|
00000E90: 24 B2 42 4D 24 3A 4D 34 24 B2 4D 24 00 B8 2A A8 |$.BM$:M4$.M$..*.|
00000EA0: 02 81 49 B2 31 A4 43 4C 3A 54 24 B2 CA 28 58 24 |..I.1.CL:T$..(X$|
00000EB0: 28 54 29 2C 49 2C 31 29 00 D2 2A AD 02 8B 54 24 |(T),I,1)..*...T$|
00000EC0: B2 22 20 22 A7 FE 18 3A 4B 24 B2 22 A6 A6 A6 A6 |." "...:K$."....|
00000ED0: A6 22 00 F7 2A B2 02 4D 31 24 B2 C8 28 4D 31 24 |."..*..M1$..(M1$|
00000EE0: 2C 49 AC 35 AB 34 29 AA 4B 24 AA CA 28 4D 31 24 |,I.5.4).K$..(M1$|
00000EF0: 2C 49 AC 35 AA 32 29 00 1C 2B B7 02 4D 32 24 B2 |,I.5.2)..+..M2$.|
00000F00: C8 28 4D 32 24 2C 49 AC 35 AB 34 29 AA 4B 24 AA |.(M2$,I.5.4).K$.|
00000F10: CA 28 4D 32 24 2C 49 AC 35 AA 32 29 00 41 2B BC |.(M2$,I.5.2).A+.|
00000F20: 02 4D 33 24 B2 C8 28 4D 33 24 2C 49 AC 35 AB 34 |.M3$..(M3$,I.5.4|
00000F30: 29 AA 4B 24 AA CA 28 4D 33 24 2C 49 AC 35 AA 32 |).K$..(M3$,I.5.2|
00000F40: 29 00 66 2B C1 02 4D 34 24 B2 C8 28 4D 34 24 2C |).f+..M4$..(M4$,|
00000F50: 49 AC 35 AB 34 29 AA 4B 24 AA CA 28 4D 34 24 2C |I.5.4).K$..(M4$,|
00000F60: 49 AC 35 AA 32 29 00 72 2B C6 02 FE 19 3A 89 37 |I.5.2).r+....:.7|
00000F70: 32 30 00 95 2B CB 02 4D 34 24 B2 C8 28 4D 34 24 |20..+..M4$..(M4$|
00000F80: 2C 49 AC 35 AB 32 29 AA 54 24 AA CA 28 4D 34 24 |,I.5.2).T$..(M4$|
00000F90: 2C 49 AC 35 29 00 9B 2B D0 02 82 00 B6 2B DA 02 |,I.5)..+.....+..|
00000FA0: 8B 4B 45 B2 31 A7 4D 35 24 B2 4D 34 24 3A D5 4D |.KE.1.M5$.M4$:.M|
00000FB0: 35 24 B2 4D 31 24 00 C4 2B DF 02 98 34 2C 54 42 |5$.M1$..+...4,TB|
00000FC0: 24 4D 32 24 00 D2 2B E4 02 98 34 2C 54 42 24 4D |$M2$..+...4,TB$M|
00000FD0: 31 24 00 E0 2B E9 02 98 34 2C 54 42 24 4D 35 24 |1$..+...4,TB$M5$|
00000FE0: 00 EE 2B EE 02 98 34 2C 54 42 24 4D 31 24 00 FC |..+...4,TB$M1$..|
00000FF0: 2B F3 02 98 34 2C 54 42 24 4D 33 24 00 02 2C F8 |+...4,TB$M3$..,.|
00001000: 02 82 00 17 2C FD 02 A0 34 3A 9F 34 2C 34 2C 37 |....,...4:.4,4,7|
00001010: 3A 98 34 2C 50 44 24 00 4A 2C 02 03 98 34 3A 98 |:.4,PD$.J,...4:.|
00001020: 34 2C 55 4E 24 22 C1 20 C3 20 D2 20 CF 20 D3 20 |4,UN$". . . . . |
00001030: D3 22 55 46 24 2C 2C 2C 55 4E 24 22 C4 20 CF 20 |."UF$,,,UN$". . |
00001040: D7 20 CE 22 55 46 24 3A 98 34 00 58 2C 07 03 41 |. ."UF$:.4.X,..A|
00001050: 43 B2 30 3A 44 4E B2 30 00 6C 2C 0C 03 EB FC 41 |C.0:DN.0.l,....A|
00001060: 43 B2 B1 4E 42 AF 44 4E B2 B1 4E 42 00 90 2C 11 |C..NB.DN..NB..,.|
00001070: 03 EB 3A 41 43 B2 41 43 AA 31 3A EC FC 43 4C 24 |..:AC.AC.1:..CL$|
00001080: 28 30 2C 41 43 29 B3 B1 22 22 B0 41 43 B1 4E 42 |(0,AC).."".AC.NB|
00001090: 00 B4 2C 16 03 EB 3A 44 4E B2 44 4E AA 31 3A EC |..,...:DN.DN.1:.|
000010A0: FC 43 4C 24 28 31 2C 44 4E 29 B3 B1 22 22 B0 44 |.CL$(1,DN).."".D|
000010B0: 4E B1 4E 42 00 E4 2C 1B 03 41 24 B2 C9 28 22 20 |N.NB..,..A$..(" |
000010C0: 22 AA C4 28 41 43 29 2C 32 29 AA 22 2D 22 3A 8B |"..(AC),2)."-":.|
000010D0: 43 4C 24 28 30 2C 41 43 29 B2 22 22 A7 41 24 B2 |CL$(0,AC)."".A$.|
000010E0: 22 20 20 22 00 14 2D 20 03 44 24 B2 C9 28 22 20 |" "..- .D$..(" |
000010F0: 22 AA C4 28 44 4E 29 2C 32 29 AA 22 2D 22 3A 8B |"..(DN),2)."-":.|
00001100: 43 4C 24 28 31 2C 44 4E 29 B2 22 22 A7 44 24 B2 |CL$(1,DN)."".D$.|
00001110: 22 20 20 22 00 4D 2D 25 03 58 24 B2 41 24 AA C8 |" ".M-%.X$.A$..|
00001120: 28 43 4C 24 28 30 2C 41 43 29 AA 53 50 24 2C 33 |(CL$(0,AC).SP$,3|
00001130: 36 29 AA 22 20 22 AA 44 24 AA C8 28 43 4C 24 28 |6)." ".D$..(CL$(|
00001140: 31 2C 44 4E 29 AA 53 50 24 2C 33 36 29 00 57 2D |1,DN).SP$,36).W-|
00001150: 2A 03 98 34 2C 58 24 00 5D 2D 2F 03 EC 00 64 2D |*..4,X$.]-/...d-|
00001160: 34 03 A0 34 00 6A 2D 39 03 8E 00 00 00 |4..4.j-9..... |
..8....G(14)". CROSSWORD CREATOR -- BY
MARK JORDAN":..2.H....X$(10),BL(13,10),A
C$(99),DN$(99),CL$(1,99).{....0,1:.4,1:.
1,6......2,1,21:..0,21,39,24.....CL$."10
":."HOW MANY COLUMNS (DEFAULT = 10)";CL$
:CL.E(CL$):.CL.13.."TOO MANY":..1:.30.C.
#.RO$."10":."HOW MANY ROWS (DEFAULT = 10
)";RO$:RO.E(RO$):.RO.10.."TOO MANY":..1:
.35.M.(..".";.H.-.S.4:.RO.2...(RO.2).S.0
...2.UX.(13.CL).2.24.S:UY.(10.RO).2.16.4
:LX.UX.CL.24:LY.UY.RO.16.R.7.X.1:Y.1:DX.
.((UX.8).8):DY..((UY.4).8)...<.E$.G(27):
O$.E$."O":L$.G(13)...A..T.1.40:SP$.SP$."
":UU$.UU$."..":..Y.F.BM$."............
........................................
..............":BM$.H(BM$,CL.5.1).U.K.M$
.". . . . . . . .
. . . . . .":M$.H(M$,CL
.5.1)...P..T.1.10:N$(T).M$:....U.UN$.E$.
G(45).G(49):UF$.E$.G(45).G(48).@.Z.PC$.E
$.G(51).G(21):PD$.E$.G(51).G(36).S._..1,
UX,UY,LX,LY...D..T.1.CL.1:.1,UX.T.24,UY.
UX.T.24,UY.RO.16:....I..T.1.RO.1:.1,UX,U
Y.T.16.UX.CL.24,UY.T.16:....N.CH$."ABCDE
FGHIJKLMNOPQRSTUVWXYZ ....".G(13)."+-\".
E$.M S.IN$.H(CH$,26)."ABCDEFGHIJKLMNOPQR
STUVWXYZ1234567890+-\,./<>?:;=[]!#$%&'()
.".G(34).G(20).G(13).J X..1,DX,DY," ",1
:OV.1:RV.0.. }..".. USE CURSOR KEYS
TO SELECT BOX "E$"M".S ...".. + FOR
ACROSS TYPING, - FOR DOWN TYPING "..!..
.".. \ TO SHUT OFF AUTOMATIC CURSOR MOVE
MENT".7!...".. RETURN TO CREATE BLANKS,
ESC TO EXIT ".=!....[!....A$:A.T(CH$,A
$):.A.0.155.H! ..A$.E$...U!...A.27.....!
...1,CX.DX,CY.DY,LE$,RV:RV.0..!...A.27.3
20,310,330,300,340,365,370,375.X!..X.(CX
.3).1:Y.(CY.2).1..!...BL(X,Y).1.RV.1:OV.
0.."..LE$.J(X$(Y),X,1):.LE$."".LE$." ".5
"C..1,CX.DX,CY.DY,LE$,OV:OV.1.D"H..A$.L$
.225.P"M...:.235.V"R..BLANK(X,Y).1.CC.0:
.350:BL(X,Y).0.."W.RV.0:LE$.A$:X$(Y).H(X
$(Y).SP$,X.1).A$.J(X$(Y),X.1).L"...1,CX.
DX,CY.DY,LE$,OV:OV.1.."...DI.1..208,1:.8
42,17.."...DI.2..208,1:.842,29..#....;#.
..0,5:.".. CALCULATING ...
".Y#...380:. FIGURE ACROSS/DOW
N.R#...520:. ASK FOR CLUES..#...630:. PR
INT PUZZLE.B#...2,,21:.".PRESS * TO PRIN
T ANOTHER, K TO PRINT KEY"..#...,"ADJUST
PAPER FIRST."..$....A$:.A$."K".KE.1:.63
0:KE.0:.265..$...A$."*"..630:.265.9$..."
.DO ANOTHER PUZZLE? Y/N".L$....A$:.A$."
Y"...]$...A$.."N".280.H$"..0,1:...$,.CX.
CX.3:.CX..CL.3.CX.0..$1....$6.CY.CY.2:.C
Y..RO.2.CY.0..$;...F$@.CY.CY.2:.CY.0.CY.
RO.2.2.L$E....$J.CX.CX.3:.CX.0.CX.CL.3.3
..$O....%T.BL(X,Y).1:CC.1.-%Y.X$(Y).H(X$
(Y).SP$,X.1)." ".J(X$(Y),X.1).O%^.XX.(CX
.8).UX.2:YY.(CY.8).UY.2.L%C..CC,XX,YY,XX
.20,YY.12,,1.R%H...}%M.DI.2:...%R.DI.1:.
..%W.DI.0:.. %|..Y.1.ROW..%...X.1.CL:Z$.
X$(Y).B%...X.CL....U%...X.1..450:.410..%
...J(Z$,X.1,1)." "..450..%......&...Y.RO
.....&...Y.1..480:.430.3&...J(X$(Y.1),X,
1)." "..480.:&.....B&..K.0.J&...:..P&...
.U&B..J(Z$,X,1)." ".J(Z$,X.1,1)." "...H&
G.NB.NB.1:K.1:N$.J(D(NB),2):N$(Y).H(N$(Y
),(X.1).5.1).N$.J(N$(Y),(X.1).5.2.C(N$))
..&L.P.T(Z$," ",X.2):.P.0.P.CL.1..'Q.AC$
(NB).J(Z$,X,P.X)..'V....'...J(Z$,X,1)."
".J(X$(Y.1),X,1)." "....'...K.0.NB.NB.1:
N$.J(D(NB),2):N$(Y).H(N$(Y),(X.1).5.1).N
$.J(N$(Y),(X.1).5.2.C(N$))..'...T.Y.RO..
'...J(X$(T),X,1)." ".T.RO:.505.O'..DN$(N
B).DN$(NB).J(X$(T),X,1).U'.....'.....(..
.0,1:..0,21,39,24,1:.".TYPE A CLUE FOR E
ACH WORD"..(...T.1.NB.A(...AC$(T).."".X$
.AC$(T):AD.0:.550.E(...DN$(T).."".X$.DN$
(T):AD.1:.550.M(...:...(&.."..."H(H(SP$,
(40.C(X$)).2)."..".X$.".".SP$,39)..(+...
2,24,37,24:."..";.M(0.B$."":.580:."."..(
5...0,21,39,24..(:....(D....)I...A$:A.T(
IN$,A$):.A.0.585..)N..A.88..620:.605.()S
..A.89...5)X.B$.B$.A$.D)]..A$O$"..";.J)B
...])G.CL$(AD,T).B$:..Z)L..B$.."".B$.H(B
$,C(B$).1)..)Q....)V..0:.".IF SPACING/UN
DERLINING DON'T WORK RIGHT"..){.."ON YOU
R PRINTER, CHANGE LINES 85-90."..*...".T
URN ON PRINTER. PRESS RETURN TO BEGIN."
.%*....A$:.A$..L$.645..*...4,4.K*..TB$.H
(SP$,(80.(CL.5)).2).V*...4,PC$.O*...4,TB
$" "H(UU$,CL.5)..*...T.1.ROW:M1$.M$:M2$.
N$(T):M3$.BM$:M4$.M$..*...I.1.CL:T$.J(X$
(T),I,1).R*...T$." "...:K$."....."..*..M
1$.H(M1$,I.5.4).K$.J(M1$,I.5.2)..+..M2$.
H(M2$,I.5.4).K$.J(M2$,I.5.2).A+..M3$.H(M
3$,I.5.4).K$.J(M3$,I.5.2).F+A.M4$.H(M4$,
I.5.4).K$.J(M4$,I.5.2).R+F...:.720..+K.M
4$.H(M4$,I.5.2).T$.J(M4$,I.5)..+P....+Z.
.KE.1.M5$.M4$:UM5$.M1$.D+...4,TB$M2$.R+.
..4,TB$M1$..+...4,TB$M5$..+...4,TB$M1$..
+...4,TB$M3$..,.....,.. 4:.4,4,7:.4,PD$.
J,...4:.4,UN$"A C R O S S"UF$,,,UN$"D O
W N"UF$:.4.X,..AC.0:DN.0.L,....AC..NB.DN
..NB..,...:AC.AC.1:..CL$(0,AC).."".AC.NB
..,...:DN.DN.1:..CL$(1,DN).."".DN.NB..,.
.A$.I(" ".D(AC),2)."-":.CL$(0,AC)."".A$.
" "..- .D$.I(" ".D(DN),2)."-":.CL$(1,DN
)."".D$." ".M-%.X$.A$.H(CL$(0,AC).SP$,3
6)." ".D$.H(CL$(1,DN).SP$,36).W-*..4,X$.
]-/...D-4. 4.J-9.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL