…7) - y(2)) <= 1 THEN 3
IF ABS(x(7) - x(1)) <= 1 AND ABS(y(7) - y(1)) <= 1 THEN 3
FOR n8% = n7% + 1 TO 63
y(8) = n8% MOD 8
IF y(8) = 0 THEN y(8) = 8
x(8) = (n8% - y(8)) / 8 + 1
IF ABS(x(8) - x(7)) <= 1 AND ABS(y(8) - y(7)) <= 1 THEN 2
IF ABS(x(8) - x(6)) <= 1 AND ABS(y(8) - y(6)) <= 1 THEN 2
IF ABS(x(8) - x(5)) <= 1 AND ABS(y(8) - y(5)) <= 1 THEN 2
IF ABS(x(8) - x(4)) <= 1 AND ABS(y(8) - y(4)) <= 1 THEN 2
IF ABS(x(8) - x(3)) <= 1 AND ABS(y(8) - y(3)) <= 1 THEN 2
IF ABS(x(8) - x(2)) <= 1 AND ABS(y(8) - y(2)) <= 1 THEN 2
IF ABS(x(8) - x(1)) <= 1 AND ABS(y(8) - y(1)) <= 1 THEN 2
FOR n9% = n8% + 1 TO 64
y(9) = n9% MOD 8
IF y(9) = 0 THEN y(9) = 8
x(9) = (n9% - y(9)) / 8 + 1
IF ABS(x(9) - x(8)) <= 1 AND ABS(y(9) - y(8)) <= 1 THEN 1
IF ABS(x(9) - x(7)) <= 1 AND ABS(y(9) - y(7)) <= 1 THEN 1
IF ABS(x(9) - x(6)) <= 1 AND ABS(y(9) - y(6)) <= 1 THEN 1
IF ABS(x(9) - x(5)) <= 1 AND ABS(y(9) - y(5)) <= 1 THEN 1
IF ABS(x(9) - x(4)) <= 1 AND ABS(y(9) - y(4)) <= 1 THEN 1
IF ABS(x(9) - x(3)) <= 1 AND ABS(y(9) - y(3)) <= 1 THEN 1
IF ABS(x(9) - x(2)) <= 1 AND ABS(y(9) - y(2)) <= 1 THEN 1
IF ABS(x(9) - x(1)) <= 1 AND ABS(y(9) - y(1)) <= 1 THEN 1
j# = j# + 1
IF INT(j# / 1000000) = j# / 1000000 THEN PRINT j#
GOTO 10
1 NEXT n9%
2 NEXT n8%
3 NEXT n7%
4 NEXT n6%
5 NEXT n5%
6 NEXT n4%
7 NEXT n3%
8 NEXT n2%
END
10 n% = 0
40 n% = n% + 1
IF n% = 65 THEN 50
r% = n%
WHILE r% > 0
r% = r% - 8
WEND
y% = r% + 8
x% = (n% - y%) / 8 + 1
IF ABS(x% - x(1)) <= 1 AND ABS(y% - y(1)) <= 1 THEN 40
IF ABS(x% - x(2)) <= 1 AND ABS(y% - y(2)) <= 1 THEN 40
IF ABS(x% - x(3)) <= 1 AND ABS(y% - y(3)) <= 1 THEN 40
IF ABS(x% - x(4)) <= 1 AND ABS(y% - y(4)) <= 1 THEN 40
IF ABS(x% - x(5)) <= 1 AND ABS(y% - y(5)) <= 1 THEN 40
IF ABS(x% - x(6)) <= 1 AND ABS(y% - y(6)) <= 1 THEN 40
IF ABS(x% - x(7)) <= 1 AND ABS(y% - y(7)) <= 1 THEN 40
IF ABS(x% - x(8)) <= 1 AND ABS(y% - y(8)) <= 1 THEN 40
IF ABS(x% - x(9)) <= 1 AND ABS(y% - y(9)) <= 1 THEN 40
GOTO 1
50 n% = 0
i% = i% + 1
FOR k = 1 TO 9
IF x(k) = 1 THEN x$(k) = "a"
IF x(k) = 2 THEN x$(k) = "b"
IF x(k) = 3 THEN x$(k) = "c"
IF x(k) = 4 THEN x$(k) = "d"
IF x(k) = 5 THEN x$(k) = "e"
IF x(k) = 6 THEN x$(k) = "f"
IF x(k) = 7 THEN x$(k) = "g"
IF x(k) = 8 THEN x$(k) = "h"
NEXT
PRINT i%; ": "; x$(1); y(1); " "; x$(2); y(2); " "; x$(3); y(3); " "; x$(4); y(4); " "; x$(5); y(5); " "; x$(6); y(6); " "; x$(7); y(7); " "; x$(8); y(8); " "; x$(9); y(9)
PRINT #1, i%; ": "; x$(1); y(1); " "; x$(2); y(2); " "; x$(3); y(3); " "; x$(4); y(4); " "; x$(5); y(5); " "; x$(6); y(6); " "; x$(7); y(7); " "; x$(8); y(8); " "; x$(9); y(9)
GOTO 1
Вот первые 62 позиции.
1 : a 1 a 4 a 7 d 1 d 4 d 7 g 1 g 4 g 7
2 : a 1 a 4 a 7 d 1 d 4 d 7 g 2 g 4 g 7
3 : a 1 a 4 a 7 d 1 d 4 d 7 g 2 g 5 g 7
4 : a 1 a 4 a 7 d 1 d 4 d 7 g 2 g 5 g 8
5 : a 1 a 4 a 7 d 2 d 4 d 7 g 1 g 4 g 7
6 : a 1 a 4 a 7 d 2 d 4 d 7 g 2 g 4 g 7
7 : a 1 a 4 a 7 d 2 d 4 d 7 g 2 g 5 g 7
8 : a 1 a 4 a 7 d 2 d 4 d 7 g 2 g 5 g 8
9 : a 1 a 4 a 7 d 2 d 5 d 7 g 1 g 4 g 7
10 : a 1 a 4 a 7 d 2 d 5 d 7 g 2 g 4 g 7
11 : a 1 a 4 a 7 d 2 d 5 d 7 g 2 g 5 g 7
12 : a 1 a 4 a 7 d 2 d 5 d 7 g 2 g 5 g 8
13 : a 1 a 4 a 7 d 2 d 5 d 8 g 1 g 4 g 7
14 : a 1 a 4 a 7 d 2 d 5 d 8 g 2 g 4 g 7
15 : a 1 a 4 a 7 d 2 d 5 d 8 g 2 g 5 g 7
16 : a 1 a 4 a 7 d 2 d 5 d 8 g 2 g 5 g 8
17 : a 1 a 4 b 7 d 1 d 4 d 7 g 1 g 4 g 7
18 : a 1 a 4 b 7 d 1 d 4 d 7 g 2 g 4 g 7
19 : a 1 a 4 b 7 d 1 d 4 d 7 g 2 g 5 g 7
20 : a 1 a 4 b 7 d 1 d 4 d 7 g 2 g 5 g 8
21 : a 1 a 4 b 7 d 1 d 4 e 7 g 1 g 4 g 7
22 : a 1 a 4 b 7 d 1 d 4 e 7 g 1 g 4 h 7
23 : a 1 a 4 b 7 d 1 d 4 e 7 g 2 g 4 g 7
24 : a 1 a 4 b 7 d 1 d 4 e 7 g 2 g 4 h 7
25 : a 1 a 4 b 7 d 1 d 4 e 7 g 2 g 5 g 7
26 : a 1 a 4 b 7 d 1 d 4 e 7 g 2 g 5 g 8
27 : a 1 a 4 b 7 d 1 d 4 e 7 g 2 g 5 h 7
28 : a 1 a 4 b 7 d 1 d 4 e 7 g 2 g 5 h 8
29 : a 1 a 4 b 7 d 2 d 4 d 7 g 1 g 4 g 7
30 : a 1 a 4 b 7 d 2 d 4 d 7 g 2 g 4 g 7
31 : a 1 a 4 b 7 d 2 d 4 d 7 g 2 g 5 g 7
32 : a 1 a 4 b 7 d 2 d 4 d 7 g 2 g 5 g 8
33 : a 1 a 4 b 7 d 2 d 4 e 7 g 1 g 4 g 7
34 : a 1 a 4 b 7 d 2 d 4 e 7 g 1 g 4 h 7
35 : a 1 a 4 b 7 d 2 d 4 e 7 g 2 g 4 g 7
36 : a 1 a 4 b 7 d 2 d 4 e 7 g 2 g 4 h 7
37 : a 1 a 4 b 7 d 2 d 4 e 7 g 2 g 5 g 7
38 : a 1 a 4 b 7 d 2 d 4 e 7 g 2 g 5 g 8
39 : a 1 a 4 b 7 d 2 d 4 e 7 g 2 g 5 h 7
40 : a 1 a 4 b 7 d 2 d 4 e 7 g 2 g 5 h 8
41 : a 1 a 4 b 7 d 2 d 5 d 7 g 1 g 4 g 7
42 : a 1 a 4 b 7 d 2 d 5 d 7 g 2 g 4 g 7
43 : a 1 a 4 b 7 d 2 d 5 d 7 g 2 g 5 g 7
44 : a 1 a 4 b 7 d 2 d 5 d 7 g 2 g 5 g 8
45 : a 1 a 4 b 7 d 2 d 5 d 8 g 1 g 4 g 7
46 : a 1 a 4 b 7 d 2 d 5 d 8 g 2 g 4 g 7
47 : a 1 a 4 b 7 d 2 d 5 d 8 g 2 g 5 g 7
48 : a 1 a 4 b 7 d 2 d 5 d 8 g 2 g 5 g 8
49 : a 1 a 4 b 7 d 2 d 5 e 7 g 1 g 4 g 7
50 : a 1 a 4 b 7 d 2 d 5 e 7 g 1 g 4 h 7
51 : a 1 a 4 b 7 d 2 d 5 e 7 g 2 g 4 g 7
52 : a 1 a 4 b 7 d 2 d 5 e 7 g 2 g 4 h 7
53 : a 1 a 4 b 7 d 2 d 5 e 7 g 2 g 5 g 7
54 : a 1 a 4 b 7 d 2 d 5 e 7 g 2 g 5 g 8
55 : a 1 a 4 b 7 d 2 d 5 e 7 g 2 g 5 h 7
56 : a 1 a 4 b 7 d 2 d 5 e 7 g 2 g 5 h 8
57 : a 1 a 4 b 7 d 2 d 5 e 8 g 1 g 4 g 7
58 : a 1 a 4 b 7 d 2 d 5 e 8 g 2 g 4 g 7
59 : a 1 a 4 b 7 d 2 d 5 e 8 g 2 g 5 g 7
60 : a 1 a 4 b 7 d 2 d 5 e 8 g 2 g 5 g 8
61 : a 1 a 4 b 7 d 2 d 5 e 8 g 2 g 5 h 7
62 : a 1 a 4 b 7 d 2 d 5 e 8 g 2 g 5 h 8