KNIGHT'S TOUR
FILE INFORMATION
FILENAME(S): KNIGHT'S TOUR
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 01:08:03
APPEARS ON: 2 disk(s)
FILE HASH
15b4d8f32c77b3350dcde6d5f4e5101b4cce24f39ab0dcd28e4c81b1619f4a37
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | KNIGHT'S TOUR | PRG | Treasure Chest - Wolfgang Rauprich | 27 | 3 | DOWNLOAD FILE |
| S PIELE | KNIGHT'S TOUR | PRG | Treasure Chest - Wolfgang Rauprich | 27 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 8F 20 2A 2A 2A 20 4B 4E 49 47 |....... *** KNIG|
00000010: 48 54 27 53 20 54 4F 55 52 00 33 08 02 00 8F 20 |HT'S TOUR.3.... |
00000020: 20 20 20 20 46 20 43 48 41 4D 42 45 52 53 20 31 | F CHAMBERS 1|
00000030: 2F 37 39 00 39 08 03 00 8F 00 52 08 04 00 8F 20 |/79.9.....R.... |
00000040: 2A 2A 2A 20 50 45 54 20 55 53 45 52 20 47 52 4F |*** PET USER GRO|
00000050: 55 50 00 6E 08 05 00 8F 20 20 20 20 20 53 4F 46 |UP.n.... SOF|
00000060: 54 57 41 52 45 20 45 58 43 48 41 4E 47 45 00 83 |TWARE EXCHANGE..|
00000070: 08 06 00 8F 20 20 20 20 20 50 4F 20 42 4F 58 20 |.... PO BOX |
00000080: 33 37 31 00 A7 08 07 00 8F 20 20 20 20 20 4D 4F |371...... MO|
00000090: 4E 54 47 4F 4D 45 52 59 56 49 4C 4C 45 2C 20 50 |NTGOMERYVILLE, P|
000000A0: 41 20 31 38 39 33 36 00 AD 08 08 00 8F 00 BB 08 |A 18936.........|
000000B0: 09 00 97 35 39 34 36 38 2C 31 32 00 DB 08 64 00 |...59468,12...d.|
000000C0: 8D 20 31 34 30 31 3A 8F 3A 49 4E 54 52 4F 44 55 |. 1401:.:INTRODU|
000000D0: 43 54 4F 52 59 20 50 41 47 45 2E 00 00 09 6E 00 |CTORY PAGE....n.|
000000E0: 86 4D 41 28 38 2C 32 29 2C 42 41 28 31 32 2C 31 |.MA(8,2),BA(12,1|
000000F0: 32 29 3A 58 32 B2 31 3A 59 32 B2 31 3A 51 B2 32 |2):X2.1:Y2.1:Q.2|
00000100: 00 3F 09 6F 00 8F 3A 4D 41 3D 4D 4F 56 45 20 41 |.?.o..:MA=MOVE A|
00000110: 52 52 41 59 3B 20 53 54 4F 52 45 53 20 41 4C 4C |RRAY; STORES ALL|
00000120: 20 45 49 47 48 54 20 50 4F 53 53 49 42 4C 45 20 | EIGHT POSSIBLE |
00000130: 52 45 4C 41 54 49 56 45 20 4D 4F 56 45 53 2E 00 |RELATIVE MOVES..|
00000140: 6C 09 70 00 8F 3A 42 41 3D 42 4F 41 52 44 20 41 |l.p..:BA=BOARD A|
00000150: 52 52 41 59 3B 20 53 54 4F 52 45 53 20 41 43 54 |RRAY; STORES ACT|
00000160: 55 41 4C 20 20 20 4D 4F 56 45 53 2E 00 92 09 71 |UAL MOVES....q|
00000170: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000190: 2A 2A 00 DF 09 72 00 8F 3A 50 45 54 20 41 4C 57 |**...r..:PET ALW|
000001A0: 41 59 53 20 53 55 43 43 45 45 44 53 2E 20 48 4F |AYS SUCCEEDS. HO|
000001B0: 57 45 56 45 52 20 49 46 20 59 4F 55 20 57 49 53 |WEVER IF YOU WIS|
000001C0: 48 20 54 4F 20 46 4F 52 43 45 20 41 20 46 41 49 |H TO FORCE A FAI|
000001D0: 4C 55 52 45 20 59 4F 55 20 43 41 4E 20 44 4F 00 |LURE YOU CAN DO.|
000001E0: 2C 0A 73 00 8F 3A 53 4F 20 42 59 20 57 52 49 54 |,.s..:SO BY WRIT|
000001F0: 49 4E 47 20 22 31 33 35 20 42 41 28 31 30 2C 31 |ING "135 BA(10,1|
00000200: 30 29 3D 30 22 20 20 20 4F 52 20 53 49 4D 49 4C |0)=0" OR SIMIL|
00000210: 41 52 20 4C 49 4E 45 53 2E 20 50 45 54 20 57 49 |AR LINES. PET WI|
00000220: 4C 4C 20 54 48 45 4E 20 46 41 49 4C 00 7B 0A 74 |LL THEN FAIL.{.t|
00000230: 00 8F 3A 54 48 45 20 46 49 52 53 54 20 54 49 4D |..:THE FIRST TIM|
00000240: 45 20 42 55 54 20 57 49 4C 4C 20 53 55 43 43 45 |E BUT WILL SUCCE|
00000250: 45 44 20 4F 4E 20 52 45 50 4C 41 59 20 42 45 43 |ED ON REPLAY BEC|
00000260: 41 55 53 45 20 42 41 20 57 49 4C 4C 20 42 45 20 |AUSE BA WILL BE |
00000270: 52 45 2D 5A 45 52 4F 45 44 2E 06 00 A1 0A 75 00 |RE-ZEROED.....u.|
00000280: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002A0: 2A 00 CE 0A 78 00 83 31 2C 2D 32 2C 32 2C 2D 31 |*...x..1,-2,2,-1|
000002B0: 2C 32 2C 31 2C 31 2C 32 2C 2D 31 2C 32 2C 2D 32 |,2,1,1,2,-1,2,-2|
000002C0: 2C 31 2C 2D 32 2C 2D 31 2C 2D 31 2C 2D 32 00 E8 |,1,-2,-1,-1,-2..|
000002D0: 0A 82 00 81 20 49 B2 33 20 A4 20 31 30 3A 81 20 |.... I.3 . 10:. |
000002E0: 4A B2 33 20 A4 20 31 30 00 31 0B 83 00 8F 3A 53 |J.3 . 10.1....:S|
000002F0: 54 4F 52 45 53 20 44 41 54 41 20 49 4E 20 4D 4F |TORES DATA IN MO|
00000300: 56 45 20 41 52 52 41 59 20 41 4E 44 20 49 4E 49 |VE ARRAY AND INI|
00000310: 54 49 41 4C 49 5A 45 53 20 42 4F 41 52 44 20 41 |TIALIZES BOARD A|
00000320: 52 52 41 59 20 49 4E 20 4F 4E 45 20 50 41 53 53 |RRAY IN ONE PASS|
00000330: 2E 00 4D 0B 84 00 8B 20 4A AB 32 B3 33 20 A7 20 |..M.... J.2.3 . |
00000340: 87 20 4D 41 28 49 AB 32 2C 4A AB 32 29 00 5F 0B |. MA(I.2,J.2)._.|
00000350: 85 00 42 41 28 49 2C 4A 29 B2 31 3A 82 3A 82 00 |..BA(I,J).1:.:..|
00000360: 9D 0B 8C 00 4D B2 31 3A 45 B2 30 3A 46 45 B2 38 |....M.1:E.0:FE.8|
00000370: 3A 8D 20 36 30 31 3A 8F 3A 49 4E 49 54 49 41 4C |:. 601:.:INITIAL|
00000380: 49 5A 45 20 41 4E 44 20 50 45 54 20 47 52 41 50 |IZE AND PET GRAP|
00000390: 48 49 43 53 20 44 49 53 50 4C 41 59 2E 00 B2 0B |HICS DISPLAY....|
000003A0: 8D 00 8F 3A 4D 3D 4D 4F 56 45 20 4E 55 4D 42 45 |...:M=MOVE NUMBE|
000003B0: 52 2E 00 DF 0B 8E 00 8F 3A 45 3D 4E 55 4D 42 45 |R.......:E=NUMBE|
000003C0: 52 20 4F 46 20 45 58 49 54 53 20 46 4F 55 4E 44 |R OF EXITS FOUND|
000003D0: 20 4F 4E 20 54 52 49 41 4C 20 4D 4F 56 45 2E 00 | ON TRIAL MOVE..|
000003E0: 0E 0C 8F 00 8F 3A 46 45 3D 46 45 57 45 53 54 20 |.....:FE=FEWEST |
000003F0: 4E 55 4D 42 45 52 20 4F 46 20 45 58 49 54 53 20 |NUMBER OF EXITS |
00000400: 46 4F 55 4E 44 20 54 4F 20 44 41 54 45 2E 00 4A |FOUND TO DATE..J|
00000410: 0C 96 00 85 20 22 11 53 54 41 52 54 49 4E 47 20 |.... ".STARTING |
00000420: 50 4F 53 49 54 49 4F 4E 20 28 58 3D 31 2D 38 2C |POSITION (X=1-8,|
00000430: 20 59 3D 31 2D 38 29 12 22 3B 58 2C 59 3A 54 49 | Y=1-8).";X,Y:TI|
00000440: 24 B2 22 30 30 30 30 30 30 22 00 5C 0C 9B 00 42 |$."000000".\...B|
00000450: 41 28 58 AA 51 2C 59 AA 51 29 B2 30 00 86 0C A0 |A(X.Q,Y.Q).0....|
00000460: 00 8D 20 39 30 31 3A 8F 3A 50 45 54 20 44 49 53 |.. 901:.:PET DIS|
00000470: 50 4C 41 59 20 4F 46 20 4D 4F 56 45 20 20 4E 55 |PLAY OF MOVE NU|
00000480: 4D 42 45 52 53 2E 00 AF 0C AA 00 8B 20 28 46 45 |MBERS....... (FE|
00000490: B2 30 29 AF 28 4D B3 36 34 29 A7 20 35 30 30 3A |.0).(M.64). 500:|
000004A0: 8F 3A 46 41 49 4C 55 52 45 20 53 55 42 52 2E 00 |.:FAILURE SUBR..|
000004B0: E2 0C B4 00 8B 20 4D B2 36 34 20 A7 20 99 22 13 |..... M.64 . .".|
000004C0: 11 11 11 11 1D 4D 3D 45 4E 44 22 3A 89 20 31 30 |.....M=END":. 10|
000004D0: 30 31 3A 8F 3A 53 55 43 43 45 53 53 20 53 55 42 |01:.:SUCCESS SUB|
000004E0: 52 2E 00 05 0D BE 00 46 45 B2 38 3A 99 22 13 11 |R......FE.8:."..|
000004F0: 11 11 46 45 3D 22 46 45 22 13 11 11 11 11 1D 4D |..FE="FE"......M|
00000500: 3D 22 4D AA 31 00 3D 0D C8 00 3A 81 20 49 B2 31 |="M.1.=...:. I.1|
00000510: A4 38 3A 45 B2 30 3A 58 31 B2 58 AA 51 AA 4D 41 |.8:E.0:X1.X.Q.MA|
00000520: 28 49 2C 31 29 3A 59 31 B2 59 AA 51 AA 4D 41 28 |(I,1):Y1.Y.Q.MA(|
00000530: 49 2C 32 29 3A 99 22 13 1D 49 3D 22 49 00 71 0D |I,2):."..I="I.q.|
00000540: C9 00 3A 8F 3A 58 2C 59 20 49 53 20 43 55 52 52 |..:.:X,Y IS CURR|
00000550: 45 4E 54 20 50 4F 53 49 54 49 4F 4E 3B 20 58 31 |ENT POSITION; X1|
00000560: 2C 59 31 49 53 20 54 52 49 41 4C 20 4D 4F 56 45 |,Y1IS TRIAL MOVE|
00000570: 2E 00 8A 0D D2 00 3A 8B 20 42 41 28 58 31 2C 59 |......:. BA(X1,Y|
00000580: 31 29 B2 30 20 A7 20 33 30 30 00 D1 0D D3 00 3A |1).0 . 300.....:|
00000590: 8F 3A 20 49 46 20 54 52 49 41 4C 20 4D 4F 56 45 |.: IF TRIAL MOVE|
000005A0: 20 49 53 20 4E 4F 54 20 57 49 54 48 49 4E 20 20 | IS NOT WITHIN |
000005B0: 42 4F 41 52 44 20 54 48 45 4E 20 47 4F 20 54 4F |BOARD THEN GO TO|
000005C0: 20 4E 45 58 54 20 54 52 49 41 4C 20 4D 4F 56 45 | NEXT TRIAL MOVE|
000005D0: 2E 00 20 0E D4 00 3A 8F 3A 49 46 20 54 52 49 41 |.. ...:.:IF TRIA|
000005E0: 4C 20 4D 4F 56 45 20 50 4F 53 49 54 49 4F 4E 20 |L MOVE POSITION |
000005F0: 49 53 20 41 4C 52 45 41 44 59 20 4F 43 43 55 50 |IS ALREADY OCCUP|
00000600: 49 45 44 20 54 48 45 4E 20 47 4F 20 54 4F 20 4E |IED THEN GO TO N|
00000610: 45 58 54 20 54 52 49 41 4C 20 4D 4F 56 45 2E 02 |EXT TRIAL MOVE..|
00000620: 00 5C 0E E6 00 3A 3A 81 20 4A B2 31 A4 38 3A 99 |.\...::. J.1.8:.|
00000630: 22 13 11 1D 4A 3D 22 4A 3A 8B 20 42 41 28 58 31 |"...J="J:. BA(X1|
00000640: AA 4D 41 28 4A 2C 31 29 2C 59 31 AA 4D 41 28 4A |.MA(J,1),Y1.MA(J|
00000650: 2C 32 29 29 B2 30 20 A7 20 32 37 30 00 88 0E E7 |,2)).0 . 270....|
00000660: 00 3A 3A 8F 3A 45 58 49 54 20 4D 4F 56 45 20 46 |.::.:EXIT MOVE F|
00000670: 52 4F 4D 20 54 52 49 41 4C 20 4D 4F 56 45 20 50 |ROM TRIAL MOVE P|
00000680: 4F 53 49 54 49 4F 4E 2E 00 CC 0E E8 00 3A 3A 8F |OSITION......::.|
00000690: 3A 49 46 20 45 58 49 54 20 4D 4F 56 45 20 49 53 |:IF EXIT MOVE IS|
000006A0: 20 4E 4F 54 20 57 49 54 48 49 4E 20 42 4F 41 52 | NOT WITHIN BOAR|
000006B0: 44 20 54 48 45 4E 20 47 4F 20 54 4F 20 4E 45 58 |D THEN GO TO NEX|
000006C0: 54 20 45 58 49 54 20 4D 4F 56 45 2E 00 19 0F E9 |T EXIT MOVE.....|
000006D0: 00 3A 3A 8F 3A 49 46 20 45 58 49 54 20 4D 4F 56 |.::.:IF EXIT MOV|
000006E0: 45 20 50 4F 53 49 54 49 4F 4E 20 49 53 20 41 4C |E POSITION IS AL|
000006F0: 52 45 41 44 59 20 4F 43 43 55 50 49 45 44 20 54 |READY OCCUPIED T|
00000700: 48 45 4E 20 47 4F 20 54 4F 20 4E 45 58 54 20 45 |HEN GO TO NEXT E|
00000710: 58 49 54 20 4D 4F 56 45 2E 00 60 0F 04 01 3A 3A |XIT MOVE..`...::|
00000720: 45 B2 45 AA 31 3A 99 22 13 11 11 1D 45 3D 22 45 |E.E.1:."....E="E|
00000730: 3A 8F 3A 43 4F 55 4E 54 20 20 20 45 58 49 54 53 |:.:COUNT EXITS|
00000740: 20 41 56 41 49 4C 41 42 4C 45 20 46 52 4F 4D 20 | AVAILABLE FROM |
00000750: 54 48 49 53 20 54 52 49 41 4C 20 4D 4F 56 45 2E |THIS TRIAL MOVE.|
00000760: 00 7A 0F 0E 01 3A 3A 82 3A 8F 3A 4E 45 58 54 20 |.z...::.:.:NEXT |
00000770: 45 58 49 54 20 4D 4F 56 45 2E 00 A3 0F 18 01 3A |EXIT MOVE......:|
00000780: 8B 20 45 B1 B2 46 45 20 A7 33 30 30 3A 8F 3A 4E |. E..FE .300:.:N|
00000790: 45 58 54 20 54 52 49 41 4C 20 50 4F 53 49 54 49 |EXT TRIAL POSITI|
000007A0: 4F 4E 2E 00 C6 0F 22 01 3A 46 45 B2 45 3A 99 22 |ON....".:FE.E:."|
000007B0: 13 11 11 11 46 45 3D 22 46 45 3A 42 58 B2 58 31 |....FE="FE:BX.X1|
000007C0: 3A 42 59 B2 59 31 00 13 10 23 01 3A 8F 3A 42 58 |:BY.Y1...#.:.:BX|
000007D0: 2C 42 59 3D 42 45 53 54 20 4D 4F 56 45 3B 20 54 |,BY=BEST MOVE; T|
000007E0: 48 45 20 46 49 52 53 54 20 54 52 49 41 4C 20 50 |HE FIRST TRIAL P|
000007F0: 4F 53 49 54 49 4F 4E 20 46 4F 55 4E 44 20 57 48 |OSITION FOUND WH|
00000800: 49 43 48 20 48 41 53 20 54 48 45 20 4D 49 4E 49 |ICH HAS THE MINI|
00000810: 4D 55 4D 00 2B 10 24 01 3A 8F 3A 4E 55 4D 42 45 |MUM.+.$.:.:NUMBE|
00000820: 52 20 4F 46 20 45 58 49 54 53 2E 00 45 10 2C 01 |R OF EXITS..E.,.|
00000830: 3A 82 3A 8F 3A 4E 45 58 54 20 54 52 49 41 4C 20 |:.:.:NEXT TRIAL |
00000840: 4D 4F 56 45 2E 00 57 10 36 01 58 B2 42 58 AB 51 |MOVE..W.6.X.BX.Q|
00000850: 3A 59 B2 42 59 AB 51 00 A4 10 37 01 8F 3A 58 2C |:Y.BY.Q...7..:X,|
00000860: 59 3D 43 48 4F 53 45 4E 20 4D 4F 56 45 20 57 49 |Y=CHOSEN MOVE WI|
00000870: 54 48 20 4C 45 41 53 54 20 45 58 49 54 53 2C 20 |TH LEAST EXITS, |
00000880: 41 46 54 45 52 20 41 4C 4C 20 54 52 49 41 4C 20 |AFTER ALL TRIAL |
00000890: 50 4F 53 49 54 49 4F 4E 53 20 45 56 41 4C 55 41 |POSITIONS EVALUA|
000008A0: 54 45 44 2E 00 D9 10 40 01 4D B2 4D AA 31 3A 89 |TED....@.M.M.1:.|
000008B0: 20 31 35 35 3A 8F 3A 52 45 43 4F 52 44 20 54 48 | 155:.:RECORD TH|
000008C0: 45 20 4D 4F 56 45 3A 20 53 54 41 52 54 20 4E 45 |E MOVE: START NE|
000008D0: 58 54 20 43 59 43 4C 45 2E 00 10 11 91 01 8F 3A |XT CYCLE.......:|
000008E0: 54 48 45 20 52 45 4D 41 49 4E 44 45 52 20 4F 46 |THE REMAINDER OF|
000008F0: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 49 53 20 | THE PROGRAM IS |
00000900: 46 4F 52 20 50 45 54 20 44 49 53 50 4C 41 59 2E |FOR PET DISPLAY.|
00000910: 00 58 11 9A 01 99 22 13 11 11 11 11 11 11 11 11 |.X....".........|
00000920: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 |.............. |
00000930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000950: 20 20 20 20 20 20 22 3B 00 8A 11 9B 01 99 22 20 | ";......" |
00000960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000980: 20 20 20 20 20 20 20 91 22 3B 00 B7 11 9C 01 85 | .";......|
00000990: 22 41 4E 4F 54 48 45 52 20 44 45 4D 4F 4E 53 54 |"ANOTHER DEMONST|
000009A0: 52 41 54 49 4F 4E 20 28 27 59 27 20 4F 52 20 27 |RATION ('Y' OR '|
000009B0: 4E 27 29 22 3B 51 24 00 FC 11 A4 01 8B 20 51 24 |N')";Q$...... Q$|
000009C0: B2 22 4E 22 20 A7 20 99 22 93 11 11 11 11 11 11 |."N" . .".......|
000009D0: 11 11 11 11 11 11 11 11 4F 4B 21 20 49 54 20 57 |........OK! IT W|
000009E0: 41 53 20 47 52 45 41 54 20 54 4F 55 52 49 4E 47 |AS GREAT TOURING|
000009F0: 20 46 4F 52 20 59 4F 55 21 22 3A 80 00 35 12 AE | FOR YOU!":..5..|
00000A00: 01 81 20 49 B2 33 A4 31 30 3A 81 4A B2 33 A4 31 |.. I.3.10:.J.3.1|
00000A10: 30 3A 42 41 28 49 2C 4A 29 B2 31 3A 82 3A 82 3A |0:BA(I,J).1:.:.:|
00000A20: 8F 3A 43 4C 45 41 52 53 20 42 4F 41 52 44 20 41 |.:CLEARS BOARD A|
00000A30: 52 52 41 59 2E 00 44 12 B8 01 99 22 93 22 3A 89 |RRAY..D....".":.|
00000A40: 20 31 34 30 00 81 12 F4 01 99 22 13 11 11 11 11 | 140......".....|
00000A50: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000A60: 11 49 20 46 41 49 4C 45 44 20 41 46 54 45 52 20 |.I FAILED AFTER |
00000A70: 4D 4F 56 45 20 4E 4F 2E 22 4D 3A 8D 20 31 32 30 |MOVE NO."M:. 120|
00000A80: 31 00 B4 12 FE 01 99 3A 85 22 11 11 11 11 4D 41 |1......:."....MA|
00000A90: 59 20 49 20 54 52 59 20 41 47 41 49 4E 20 28 27 |Y I TRY AGAIN ('|
00000AA0: 59 27 20 4F 52 20 27 4E 27 29 22 3B 51 24 3A 89 |Y' OR 'N')";Q$:.|
00000AB0: 20 34 32 30 00 D1 12 59 02 8F 3A 4B 4E 49 47 48 | 420...Y..:KNIGH|
00000AC0: 54 20 50 49 45 43 45 20 47 52 41 50 48 49 43 53 |T PIECE GRAPHICS|
00000AD0: 2E 00 E9 12 62 02 99 22 93 11 11 11 11 11 11 20 |....b.."....... |
00000AE0: 20 20 20 12 BE BE 92 A2 22 00 F9 12 6C 02 99 22 | ....."...l.."|
00000AF0: 20 20 20 12 A9 A3 A3 A3 22 00 09 13 76 02 99 22 | ....."...v.."|
00000B00: 20 20 20 12 20 20 20 D1 DF 00 1C 13 80 02 99 22 | . ........"|
00000B10: 20 20 20 12 20 20 20 20 20 92 A1 22 00 2D 13 8A | . ..".-..|
00000B20: 02 99 22 20 20 20 12 20 20 DF 92 DF A9 00 3D 13 |.." . .....=.|
00000B30: 94 02 99 22 20 20 20 12 20 20 20 DF 22 00 4D 13 |..." . .".M.|
00000B40: 9E 02 99 22 20 20 20 12 20 20 20 20 22 00 5E 13 |..." . ".^.|
00000B50: A8 02 99 22 20 20 12 A9 A3 A3 A3 A3 DF 22 00 6F |..." .......".o|
00000B60: 13 B2 02 99 22 20 20 12 A3 A3 A3 A3 A3 A3 22 00 |...." .......".|
00000B70: 7F 13 BC 02 99 22 20 20 20 12 A3 A3 A3 A3 22 00 |....." .....".|
00000B80: 90 13 C6 02 99 22 20 20 12 A3 A3 A3 A3 A3 A3 22 |....." ......."|
00000B90: 00 AE 13 21 03 8F 3A 50 4C 41 59 49 4E 47 20 42 |...!..:PLAYING B|
00000BA0: 4F 41 52 44 20 47 52 41 50 48 49 43 53 2E 00 CB |OARD GRAPHICS...|
00000BB0: 13 2A 03 99 22 13 22 A6 31 38 29 22 11 4B 4E 49 |.*..".".18)".KNI|
00000BC0: 47 48 54 27 53 20 54 4F 55 52 22 00 F6 13 34 03 |GHT'S TOUR"...4.|
00000BD0: 99 22 13 12 22 A6 31 32 29 22 11 11 11 B0 C0 C0 |."..".12)"......|
00000BE0: B2 C0 C0 B2 C0 C0 B2 C0 C0 B2 C0 C0 B2 C0 C0 B2 |................|
00000BF0: C0 C0 B2 C0 C0 AE 00 23 14 3E 03 81 20 4B B2 31 |.......#.>.. K.1|
00000C00: A4 37 3A 99 A6 31 32 29 22 12 DD A0 A0 DD A0 A0 |.7:..12)".......|
00000C10: DD A0 20 DD A0 20 DD A0 A0 DD A0 A0 DD A0 A0 DD |.. .. ..........|
00000C20: A0 A0 DD 00 4B 14 48 03 99 A6 31 32 29 22 12 AB |....K.H...12)"..|
00000C30: C0 C0 DB C0 C0 DB C0 C0 DB C0 C0 DB C0 C0 DB C0 |................|
00000C40: C0 DB C0 C0 DB C0 C0 B3 22 3A 82 00 70 14 52 03 |........":..p.R.|
00000C50: 99 A6 31 32 29 22 12 DD A0 A0 DD A0 A0 DD A0 A0 |..12)"..........|
00000C60: DD A0 A0 DD A0 A0 DD A0 A0 DD A0 A0 DD A0 A0 DD |................|
00000C70: 00 95 14 5C 03 99 A6 31 32 29 22 12 AD C0 C0 B1 |...\...12)".....|
00000C80: C0 C0 B1 C0 C0 B1 C0 C0 B1 C0 C0 B1 C0 C0 B1 C0 |................|
00000C90: C0 B1 C0 C0 BD 00 9B 14 66 03 8E 00 BB 14 85 03 |........f.......|
00000CA0: 8F 3A 57 52 49 54 45 20 4D 4F 56 45 20 4F 4E 20 |.:WRITE MOVE ON |
00000CB0: 42 4F 41 52 44 20 53 55 42 52 2E 00 F0 14 8E 03 |BOARD SUBR......|
00000CC0: 4D 24 B2 C4 28 4D 29 3A 8B 20 C3 28 4D 24 29 B2 |M$..(M):. .(M$).|
00000CD0: 32 20 A7 20 97 20 33 32 38 35 39 AA 38 30 AC 59 |2 . . 32859.80.Y|
00000CE0: AA 33 AC 58 2C 31 37 36 AA 4D 3A 89 20 39 34 30 |.3.X,176.M:. 940|
00000CF0: 00 13 15 98 03 97 33 32 38 35 38 AA 38 30 AC 59 |......32858.80.Y|
00000D00: AA 33 AC 58 2C C5 28 C8 28 4D 24 2C 32 29 29 AA |.3.X,.(.(M$,2)).|
00000D10: 31 37 36 00 37 15 A2 03 97 20 33 32 38 35 39 AA |176.7.... 32859.|
00000D20: 38 30 AC 59 AA 33 AC 58 2C C5 28 C9 28 4D 24 2C |80.Y.3.X,.(.(M$,|
00000D30: 31 29 29 AA 31 37 36 00 58 15 AC 03 53 31 24 B2 |1)).176.X...S1$.|
00000D40: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000D50: 11 11 11 11 11 11 11 22 00 89 15 B6 03 99 53 31 |......."......S1|
00000D60: 24 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |$" |
00000D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D80: 20 20 20 20 20 20 20 20 22 00 8F 15 C0 03 8E 00 | ".......|
00000D90: A3 15 E9 03 8F 3A 53 55 43 43 45 53 53 20 53 55 |.....:SUCCESS SU|
00000DA0: 42 52 2E 00 E6 15 F2 03 99 53 31 24 22 46 49 4E |BR.......S1$"FIN|
00000DB0: 49 53 48 45 44 20 49 4E 20 22 CA 28 54 49 24 2C |ISHED IN ".(TI$,|
00000DC0: 34 2C 31 29 22 20 4D 49 4E 55 54 45 53 20 41 4E |4,1)" MINUTES AN|
00000DD0: 44 20 22 C9 28 54 49 24 2C 32 29 22 20 53 45 43 |D ".(TI$,2)" SEC|
00000DE0: 4F 4E 44 53 21 22 00 11 16 F3 03 99 22 49 20 43 |ONDS!"......"I C|
00000DF0: 41 4E 20 44 4F 20 49 54 20 49 4E 20 55 4E 44 45 |AN DO IT IN UNDE|
00000E00: 52 20 41 20 4D 49 4E 55 54 45 20 57 48 45 4E 20 |R A MINUTE WHEN |
00000E10: 49 00 3E 16 F4 03 99 22 44 4F 4E 27 54 20 48 41 |I.>...."DON'T HA|
00000E20: 56 45 20 54 4F 20 44 52 41 57 20 41 4C 4C 20 54 |VE TO DRAW ALL T|
00000E30: 48 45 53 45 20 50 49 43 54 55 52 45 53 21 00 7C |HESE PICTURES!.||
00000E40: 16 FB 03 8F 3A 31 30 32 30 20 54 4F 20 31 31 32 |....:1020 TO 112|
00000E50: 30 3D 41 4E 49 4D 41 54 45 44 20 47 52 41 50 48 |0=ANIMATED GRAPH|
00000E60: 49 43 53 20 46 4F 52 20 53 55 43 43 45 53 53 20 |ICS FOR SUCCESS |
00000E70: 20 53 55 42 52 4F 55 54 49 4E 45 2E 00 98 16 FC | SUBROUTINE.....|
00000E80: 03 53 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |.S$."...........|
00000E90: 1D 1D 1D 1D 1D 1D 1D 22 00 A6 16 06 04 3A 81 20 |.......".....:. |
00000EA0: 56 B2 31 A4 31 32 00 B3 16 10 04 3A 99 53 24 22 |V.1.12.....:.S$"|
00000EB0: 27 22 3B 00 C1 16 1A 04 3A 3A 81 20 57 B2 31 A4 |'";.....::. W.1.|
00000EC0: 34 00 D5 16 24 04 3A 3A 3A 81 20 4A B2 31 A4 37 |4...$.:::. J.1.7|
00000ED0: 35 3A 82 20 4A 00 E4 16 2E 04 3A 3A 99 22 9D 20 |5:. J.....::.". |
00000EE0: 11 CB 22 3B 00 EE 16 38 04 3A 3A 82 20 57 00 06 |..";...8.::. W..|
00000EF0: 17 42 04 3A 81 20 4A B2 31 A4 37 35 3A 82 20 4A |.B.:. J.1.75:. J|
00000F00: 3A 99 22 9D 20 22 00 0F 17 4C 04 3A 82 20 56 00 |:.". "...L.:. V.|
00000F10: 1C 17 56 04 3A 99 53 24 22 27 22 3B 00 26 17 60 |..V.:.S$"'";.&.`|
00000F20: 04 89 20 34 31 30 00 64 17 B1 04 8F 3A 31 32 31 |.. 410.d....:121|
00000F30: 30 20 54 4F 20 31 33 32 30 3D 41 4E 49 4D 41 54 |0 TO 1320=ANIMAT|
00000F40: 45 44 20 47 52 41 50 48 49 43 53 20 46 4F 52 20 |ED GRAPHICS FOR |
00000F50: 46 41 49 4C 55 52 45 20 20 53 55 42 52 4F 55 54 |FAILURE SUBROUT|
00000F60: 49 4E 45 2E 00 80 17 BA 04 53 24 B2 22 13 11 11 |INE......S$."...|
00000F70: 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 22 |..............."|
00000F80: 00 8E 17 C4 04 3A 81 20 55 B2 31 A4 31 30 00 A3 |.....:. U.1.10..|
00000F90: 17 CE 04 99 53 24 22 91 91 9D 12 2A 11 11 1D 92 |....S$"....*....|
00000FA0: 2E 22 3B 00 B2 17 D8 04 3A 3A 81 20 57 20 B2 31 |.";.....::. W .1|
00000FB0: A4 38 00 C6 17 E2 04 3A 3A 3A 81 20 56 B2 31 A4 |.8.....:::. V.1.|
00000FC0: 35 30 3A 82 20 56 00 D6 17 EC 04 3A 3A 99 22 9D |50:. V.....::.".|
00000FD0: 20 9D 11 2E 22 3B 00 E0 17 F6 04 3A 3A 82 20 57 | ...";.....::. W|
00000FE0: 00 F4 17 00 05 3A 3A 3A 81 20 56 B2 31 A4 35 30 |.....:::. V.1.50|
00000FF0: 3A 82 20 56 00 FE 17 0A 05 99 22 9D 20 22 00 07 |:. V......". "..|
00001000: 18 14 05 3A 82 20 55 00 0D 18 28 05 8E 00 2A 18 |...:. U...(...*.|
00001010: 79 05 8F 3A 49 4E 54 52 4F 44 55 43 54 4F 52 59 |y..:INTRODUCTORY|
00001020: 20 4D 41 54 45 52 49 41 4C 2E 00 45 18 82 05 99 | MATERIAL..E....|
00001030: 22 93 22 A6 31 33 29 22 4B 4E 49 47 48 54 27 53 |".".13)"KNIGHT'S|
00001040: 20 54 4F 55 52 00 5F 18 8C 05 99 20 A6 31 33 29 | TOUR._.... .13)|
00001050: 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 |".............".|
00001060: 9A 18 96 05 99 22 11 54 48 45 20 50 52 4F 42 4C |.....".THE PROBL|
00001070: 45 4D 3A 20 53 54 41 52 54 49 4E 47 20 46 52 4F |EM: STARTING FRO|
00001080: 4D 20 41 4E 59 20 50 4F 49 4E 54 20 4F 46 20 A3 |M ANY POINT OF .|
00001090: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 00 C6 18 A0 05 99 |................|
000010A0: 22 54 48 45 20 43 48 45 53 53 42 4F 41 52 44 2C |"THE CHESSBOARD,|
000010B0: 20 55 53 45 20 54 48 45 20 4B 4E 49 47 48 54 27 | USE THE KNIGHT'|
000010C0: 53 20 4D 4F 56 45 00 E8 18 AA 05 99 22 11 54 4F |S MOVE......".TO|
000010D0: 20 43 4F 56 45 52 20 54 48 45 20 45 4E 54 49 52 | COVER THE ENTIR|
000010E0: 45 20 42 4F 41 52 44 2E 00 24 19 B4 05 99 22 11 |E BOARD..$....".|
000010F0: 11 4F 4E 45 20 53 4F 4C 55 54 49 4F 4E 3A 20 57 |.ONE SOLUTION: W|
00001100: 41 52 4E 53 44 4F 52 46 27 53 20 52 55 4C 45 3A |ARNSDORF'S RULE:|
00001110: 20 41 54 20 45 56 45 52 59 A3 A3 A3 A3 A3 A3 A3 | AT EVERY.......|
00001120: A3 A3 A3 A3 00 52 19 BE 05 99 22 4D 4F 56 45 2C |.....R...."MOVE,|
00001130: 20 50 4C 41 43 45 20 54 48 45 20 4B 4E 49 47 48 | PLACE THE KNIGH|
00001140: 54 20 49 4E 20 54 48 45 20 43 45 4C 4C 20 46 52 |T IN THE CELL FR|
00001150: 4F 4D 00 81 19 C8 05 99 22 11 57 48 49 43 48 20 |OM......".WHICH |
00001160: 54 48 45 52 45 20 41 52 45 20 54 48 45 20 46 45 |THERE ARE THE FE|
00001170: 57 45 53 54 20 45 58 49 54 53 20 54 4F 20 41 4E |WEST EXITS TO AN|
00001180: 59 00 9A 19 D2 05 99 22 11 55 4E 4F 43 43 55 50 |Y......".UNOCCUP|
00001190: 49 45 44 20 43 45 4C 4C 53 2E 00 C0 19 DC 05 99 |IED CELLS.......|
000011A0: A6 37 29 22 11 11 50 52 4F 47 52 41 4D 20 42 59 |.7)"..PROGRAM BY|
000011B0: 20 46 2E 43 48 41 4D 42 45 52 53 20 31 2F 37 39 | F.CHAMBERS 1/79|
000011C0: 00 FB 19 D0 07 85 22 11 20 20 20 50 52 45 53 53 |......". PRESS|
000011D0: 20 27 52 45 54 55 52 4E 27 20 57 48 45 4E 20 52 | 'RETURN' WHEN R|
000011E0: 45 41 44 59 20 54 4F 20 42 45 47 49 4E 2E 20 20 |EADY TO BEGIN. |
000011F0: 59 9D 9D 9D 22 3B 4A 55 24 3A 8E 00 00 00 |Y...";JU$:.... |
....... *** KNIGHT'S TOUR.3.... F CH
AMBERS 1/79.9.....R.... *** PET USER GRO
UP.N.... SOFTWARE EXCHANGE......
PO BOX 371...... MONTGOMERYVILLE, P
A 18936............59468,12...D.. 1401:.
:INTRODUCTORY PAGE....N..MA(8,2),BA(12,1
2):X2.1:Y2.1:Q.2.?.O..:MA=MOVE ARRAY; ST
ORES ALL EIGHT POSSIBLE RELATIVE MOVES..
L.P..:BA=BOARD ARRAY; STORES ACTUAL MO
VES....Q..******************************
**...R..:PET ALWAYS SUCCEEDS. HOWEVER IF
YOU WISH TO FORCE A FAILURE YOU CAN DO.
,.S..:SO BY WRITING "135 BA(10,10)=0"
OR SIMILAR LINES. PET WILL THEN FAIL.{.T
..:THE FIRST TIME BUT WILL SUCCEED ON RE
PLAY BECAUSE BA WILL BE RE-ZEROED.....U.
.********************************.N.X..1
,-2,2,-1,2,1,1,2,-1,2,-2,1,-2,-1,-1,-2..
.... I.3 . 10:. J.3 . 10.1....:STORES DA
TA IN MOVE ARRAY AND INITIALIZES BOARD A
RRAY IN ONE PASS..M.... J.2.3 . . MA(I.2
,J.2)._...BA(I,J).1:.:......M.1:E.0:FE.8
:. 601:.:INITIALIZE AND PET GRAPHICS DIS
PLAY.......:M=MOVE NUMBER.......:E=NUMBE
R OF EXITS FOUND ON TRIAL MOVE.......:FE
=FEWEST NUMBER OF EXITS FOUND TO DATE..J
.... ".STARTING POSITION (X=1-8, Y=1-8).
";X,Y:TI$."000000".\...BA(X.Q,Y.Q).0...
.. 901:.:PET DISPLAY OF MOVE NUMBERS...
.... (FE.0).(M.64). 500:.:FAILURE SUBR..
..... M.64 . ."......M=END":. 1001:.:SUC
CESS SUBR......FE.8:."....FE="FE"......M
="M.1.=.H.:. I.1.8:E.0:X1.X.Q.MA(I,1):Y1
.Y.Q.MA(I,2):."..I="I.Q.I.:.:X,Y IS CURR
ENT POSITION; X1,Y1IS TRIAL MOVE....R.:.
BA(X1,Y1).0 . 300.Q.S.:.: IF TRIAL MOVE
IS NOT WITHIN BOARD THEN GO TO NEXT TR
IAL MOVE.. .T.:.:IF TRIAL MOVE POSITION
IS ALREADY OCCUPIED THEN GO TO NEXT TRIA
L MOVE...\...::. J.1.8:."...J="J:. BA(X1
.MA(J,1),Y1.MA(J,2)).0 . 270.....::.:EXI
T MOVE FROM TRIAL MOVE POSITION..L...::.
:IF EXIT MOVE IS NOT WITHIN BOARD THEN G
O TO NEXT EXIT MOVE......::.:IF EXIT MOV
E POSITION IS ALREADY OCCUPIED THEN GO T
O NEXT EXIT MOVE..`...::E.E.1:."....E="E
:.:COUNT EXITS AVAILABLE FROM THIS TRI
AL MOVE..Z...::.:.:NEXT EXIT MOVE......:
. E..FE .300:.:NEXT TRIAL POSITION..F.".
:FE.E:."....FE="FE:BX.X1:BY.Y1...#.:.:BX
,BY=BEST MOVE; THE FIRST TRIAL POSITION
FOUND WHICH HAS THE MINIMUM.+.$.:.:NUMBE
R OF EXITS..E.,.:.:.:NEXT TRIAL MOVE..W.
6.X.BX.Q:Y.BY.Q...7..:X,Y=CHOSEN MOVE WI
TH LEAST EXITS, AFTER ALL TRIAL POSITION
S EVALUATED..Y.@.M.M.1:. 155:.:RECORD TH
E MOVE: START NEXT CYCLE.......:THE REMA
INDER OF THE PROGRAM IS FOR PET DISPLAY.
.X....".......................
";......"
.
";......"ANOTHER DEMONSTRATION ('Y' OR '
N')";Q$...... Q$."N" . ."...............
OK! IT WAS GREAT TOURING FOR YOU!":..5..
.. I.3.10:.J.3.10:BA(I,J).1:.:.:.:CLEARS
BOARD ARRAY..D....".":. 140......".....
.................I FAILED AFTER MOVE NO.
"M:. 1201......:."....MAY I TRY AGAIN ('
Y' OR 'N')";Q$:. 420.Q.Y..:KNIGHT PIECE
GRAPHICS....B.."....... ....."...L.."
....."...V.." . Q......." .
..".-...." . .....=...." . .".M.
..." . ".^...." .......".O...." .
......"....." ....."...F.." ......."
...!..:PLAYING BOARD GRAPHICS..K.*..".".
18)".KNIGHT'S TOUR"...4.."..".12)"......
.......................#.>.. K.1.7:..12)
".. . . . . . . . ..K.H...12)"..
........................":..P.R...12)"..
. . . . . . . ....\...12)".....
........................F........:WRITE
MOVE ON BOARD SUBR......M$.D(M):. C(M$).
2 . . 32859.80.Y.3.X,176.M:. 940......32
858.80.Y.3.X,E(H(M$,2)).176.7.... 32859.
80.Y.3.X,E(I(M$,1)).176.X...S1$.".......
..............."......S1$"
"............:SU
CCESS SUBR.......S1$"FINISHED IN "J(TI$,
4,1)" MINUTES AND "I(TI$,2)" SECONDS!"..
...."I CAN DO IT IN UNDER A MINUTE WHEN
I.>...."DON'T HAVE TO DRAW ALL THESE PIC
TURES!.|....:1020 TO 1120=ANIMATED GRAPH
ICS FOR SUCCESS SUBROUTINE......S$."...
...............".....:. V.1.12.....:.S$"
'";.A...::. W.1.4.U.$.:::. J.1.75:. J...
..::.". .K";...8.::. W...B.:. J.1.75:. J
:.". "...L.:. V...V.:.S$"'";.&.`.. 410.D
....:1210 TO 1320=ANIMATED GRAPHICS FOR
FAILURE SUBROUTINE......S$."...........
......."...D.:. U.1.10...N..S$"....*....
.";...X.::. W .1.8.F...:::. V.1.50:. V.V
...::.". ...";.....::. W.....:::. V.1.50
:. V......". ".....:. U...(...*.Y..:INTR
ODUCTORY MATERIAL..E....".".13)"KNIGHT'S
TOUR._.... .13)"............."......".T
HE PROBLEM: STARTING FROM ANY POINT OF .
...........F. .."THE CHESSBOARD, USE THE
KNIGHT'S MOVE......".TO COVER THE ENTIR
E BOARD..$...."..ONE SOLUTION: WARNSDORF
'S RULE: AT EVERY............R...."MOVE,
PLACE THE KNIGHT IN THE CELL FROM...H..
".WHICH THERE ARE THE FEWEST EXITS TO AN
Y...R..".UNOCCUPIED CELLS........7)"..PR
OGRAM BY F.CHAMBERS 1/79...P..". PRESS
'RETURN' WHEN READY TO BEGIN. Y...";JU
$:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL