4-17
FILE INFORMATION
FILENAME(S): 4-17
FILE TYPE(S): PRG
FILE SIZE: 650b
FIRST SEEN: 2025-11-30 21:12:26
APPEARS ON: 2 disk(s)
FILE HASH
43b2e1bb4d9d61064c7296ca4c4ec8e82b7f2a6c16f1961abe2db75e58e9a85a
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOTUS SOFT | 4-17 | PRG | DuncanTwain | 16 | 3 | DOWNLOAD FILE |
| PROG 64 WEST | 4-17 | PRG | DuncanTwain | 16 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 34 08 00 00 8F 20 2A 20 46 49 4E 44 20 53 |..4.... * FIND S| 00000010: 4F 4C 55 54 49 4F 4E 53 20 54 4F 20 27 51 55 45 |OLUTIONS TO 'QUE| 00000020: 45 4E 53 27 20 50 55 5A 5A 4C 45 20 46 4F 52 20 |ENS' PUZZLE FOR | 00000030: 36 34 20 2A 00 3A 08 01 00 3A 00 63 08 02 00 97 |64 *.:...:.c....| 00000040: 20 35 33 32 38 30 2C 35 3A 20 97 20 35 33 32 38 | 53280,5: . 5328| 00000050: 31 2C 35 3A 20 8F 20 47 52 45 45 4E 20 53 43 52 |1,5: . GREEN SCR| 00000060: 45 45 4E 00 97 08 09 00 8F 20 2A 20 47 45 4E 45 |EEN...... * GENE| 00000070: 52 41 54 45 20 52 41 4E 44 4F 4D 20 53 54 41 52 |RATE RANDOM STAR| 00000080: 54 20 50 4F 53 49 54 49 4F 4E 53 20 46 4F 52 20 |T POSITIONS FOR | 00000090: 42 4F 41 52 44 3A 2D 00 B0 08 0A 00 85 20 22 90 |BOARD:-...... ".| 000000A0: 53 49 5A 45 20 4F 46 20 42 4F 41 52 44 22 3B 4E |SIZE OF BOARD";N| 000000B0: 00 D7 08 14 00 86 20 51 28 4E 29 3A 20 8F 20 5A |...... Q(N): . Z| 000000C0: 45 52 4F 49 53 45 2C 20 41 4E 44 20 52 41 4E 44 |EROISE, AND RAND| 000000D0: 4F 4D 49 53 45 3A 2D 00 FB 08 1E 00 81 20 4A B2 |OMISE:-...... J.| 000000E0: 31 20 A4 20 4E 3A 20 51 28 4A 29 B2 30 3A 20 82 |1 . N: Q(J).0: .| 000000F0: 3A 20 81 20 4A B2 31 20 A4 20 4E 00 1E 09 28 00 |: . J.1 . N...(.| 00000100: 52 B2 31 20 AA 20 B5 28 BB 28 31 29 AC 4E 29 3A |R.1 . .(.(1).N):| 00000110: 20 8B 20 51 28 52 29 B1 30 20 89 20 34 30 00 2C | . Q(R).0 . 40.,| 00000120: 09 32 00 51 28 52 29 B2 4A 3A 20 82 00 5D 09 63 |.2.Q(R).J: ..].c| 00000130: 00 8F 20 2A 20 54 45 53 54 20 42 4F 41 52 44 3B |.. * TEST BOARD;| 00000140: 20 45 58 43 48 41 4E 47 45 20 49 46 20 4E 4F 54 | EXCHANGE IF NOT| 00000150: 20 53 55 43 43 45 53 53 46 55 4C 3A 2D 00 6D 09 | SUCCESSFUL:-.m.| 00000160: 64 00 81 20 4A B2 31 20 A4 20 4E AB 31 00 7D 09 |d.. J.1 . N.1.}.| 00000170: 6E 00 81 20 4B B2 4A AA 31 20 A4 20 4E 00 A5 09 |n.. K.J.1 . N...| 00000180: 78 00 8B 20 B6 28 51 28 4A 29 AB 51 28 4B 29 29 |x.. .(Q(J).Q(K))| 00000190: 20 B3 B1 20 4B AB 4A 20 A7 20 82 3A 20 82 3A 20 | .. K.J . .: .: | 000001A0: 89 20 32 30 30 00 B9 09 82 00 52 B2 31 20 AA 20 |. 200.....R.1 . | 000001B0: B5 28 BB 28 31 29 AC 4E 29 00 CF 09 8C 00 8B 20 |.(.(1).N)...... | 000001C0: 52 B2 4A 20 B0 20 52 B2 4B 20 89 20 31 33 30 00 |R.J . R.K . 130.| 000001D0: FA 09 96 00 54 45 4D 50 B2 51 28 52 29 3A 20 51 |....TEMP.Q(R): Q| 000001E0: 28 52 29 B2 51 28 4B 29 3A 20 51 28 4B 29 B2 54 |(R).Q(K): Q(K).T| 000001F0: 45 4D 50 3A 20 89 20 31 30 30 00 24 0A C7 00 8F |EMP: . 100.$....| 00000200: 20 2A 20 50 52 49 4E 54 20 44 49 41 47 52 41 4D | * PRINT DIAGRAM| 00000210: 3B 20 47 4F 20 4F 4E 20 54 4F 20 44 4F 20 4D 4F |; GO ON TO DO MO| 00000220: 52 45 3A 2D 00 3D 0A C8 00 81 20 4A B2 31 20 A4 |RE:-.=.... J.1 .| 00000230: 20 4E 3A 20 81 20 4B B2 31 20 A4 20 4E 00 56 0A | N: . K.1 . N.V.| 00000240: D2 00 8B 20 4B B3 B1 51 28 4A 29 20 A7 20 99 20 |... K..Q(J) . . | 00000250: 22 12 05 D7 22 3B 00 6F 0A DC 00 8B 20 4B B2 20 |"...";.o.... K. | 00000260: 51 28 4A 29 20 A7 20 99 20 22 12 90 20 22 3B 00 |Q(J) . . ".. ";.| 00000270: 7E 0A E6 00 82 3A 20 99 3A 20 82 3A 20 99 00 87 |~....: .: .: ...| 00000280: 0A 2C 01 89 20 33 30 00 00 00 |.,.. 30... |
..4.... * FIND SOLUTIONS TO 'QUEENS' PUZ ZLE FOR 64 *.:...:.C.... 53280,5: . 5328 1,5: . GREEN SCREEN...... * GENERATE RAN DOM START POSITIONS FOR BOARD:-...... ". SIZE OF BOARD";N.W.... Q(N): . ZEROISE, AND RANDOMISE:-...... J.1 . N: Q(J).0: . : . J.1 . N...(.R.1 . .(.(1).N): . Q(R). 0 . 40.,.2.Q(R).J: ..].C.. * TEST BOARD; EXCHANGE IF NOT SUCCESSFUL:-.M.D.. J.1 . N.1.}.N.. K.J.1 . N...X.. .(Q(J).Q(K)) .. K.J . .: .: . 200.....R.1 . .(.(1).N ).O.... R.J . R.K . 130.....TEMP.Q(R): Q (R).Q(K): Q(K).TEMP: . 100.$.G.. * PRINT DIAGRAM; GO ON TO DO MORE:-.=.H.. J.1 . N: . K.1 . N.V.R.. K..Q(J) . . "..W";.O .... K. Q(J) . . ".. ";.~....: .: .: ... .,.. 30...
> CLICK IMAGE PREVIEW FOR FULL MODAL