Add move type jump + step
[hachu.git] / hachu.c
diff --git a/hachu.c b/hachu.c
index a0c878b..e3ba644 100644 (file)
--- a/hachu.c
+++ b/hachu.c
@@ -10,7 +10,7 @@
 // promotions by pieces with Lion power stepping in & out the zone in same turn\r
 // promotion on capture\r
 \r
-#define VERSION "0.20"\r
+#define VERSION "0.21"\r
 \r
 //define PATH level==0 || path[0] == 0x590cb &&  (level==1 || path[1] == 0x4c0c9 && (level == 2 || path[2] == 0x8598ca && (level == 3 /*|| path[3] == 0x3e865 && (level == 4 || path[4] == 0x4b865 && (level == 5))*/)))\r
 #define PATH 0\r
@@ -128,6 +128,7 @@ char *MoveToText(Move move, int m);     // from WB driver
 void pmap(int *m, int col);\r
 void pboard(int *b);\r
 void pbytes(unsigned char *b);\r
+int myRandom();\r
 \r
 typedef struct {\r
   int lock[5];\r
@@ -175,11 +176,12 @@ Move retMove, moveStack[20000], path[100], repStack[300], pv[1000], repeatMove[3
 #define R 37 /* jump capture        */\r
 #define N -1 /* Knight              */\r
 #define J -2 /* jump                */\r
-#define D -3 /* linear double move  */\r
-#define T -4 /* linear triple move  */\r
-#define L -5 /* true Lion move      */\r
-#define F -6 /* Lion + 3-step       */\r
-#define S -7 /* Lion + range        */\r
+#define I -3 /* jump + step         */\r
+#define D -4 /* linear double move  */\r
+#define T -5 /* linear triple move  */\r
+#define L -6 /* true Lion move      */\r
+#define F -7 /* Lion + 3-step       */\r
+#define S -8 /* Lion + range        */\r
 #define H -9 /* hook move           */\r
 #define C -10 /* capture only       */\r
 #define M -11 /* non-capture only   */\r
@@ -621,7 +623,7 @@ int rawBoard[BSIZE + 11*BHMAX + 6];
 int attackMaps[200*BSIZE], *attacks = attackMaps;\r
 char distance[2*BSIZE]; // distance table\r
 char promoBoard[BSIZE]; // flags to indicate promotion zones\r
-char rawFire[BSIZE+2*BWMAX]; // flags to indicate squares controlled by Fire Demons\r
+unsigned char rawFire[BSIZE+2*BWMAX]; // flags to indicate squares controlled by Fire Demons\r
 signed char PST[7*BSIZE];\r
 \r
 #define board     (rawBoard + 6*BHMAX + 3)\r
@@ -708,7 +710,6 @@ Lance (signed char *r)
 int\r
 EasyProm (signed char *r)\r
 {\r
-  int i;\r
   if(r[0] == X) return 30 + PROMO*((unsigned int)(r[1] | r[2] | r[3] | r[5] | r[6] | r[7]) <= 1);\r
   if(r[1] == X || r[7] == X) return 30 + PROMO/2;\r
   return 0;\r
@@ -763,7 +764,7 @@ StackMultis (int col)
 void\r
 Compactify (int stm)\r
 { // remove pieces that are permanently gone (captured or promoted) from one side's piece list\r
-  int i, j, k;\r
+  int i, k;\r
   for(i=stm+2; i<=last[stm]; i+=2) { // first pass: unpromoted pieces\r
     if((k = p[i].promo) >= 0 && p[i].pos == ABSENT) { // unpromoted piece no longer there\r
       p[k].promo = -2; // orphan promoted version\r
@@ -815,10 +816,10 @@ AddPiece (int stm, PieceDesc *list)
 }\r
 \r
 void\r
-SetUp(char *array, int var)\r
+SetUp (char *array, int var)\r
 {\r
-  int i, j, n, m, nr, color;\r
-  char c, *q, name[3], prince = 0;\r
+  int i, j, n, m, color;\r
+  char c, name[3], prince = 0;\r
   PieceDesc *p1, *p2;\r
   last[WHITE] = 1; last[BLACK] = 0;\r
   royal[WHITE] = royal[BLACK] = 0;\r
@@ -1100,7 +1101,7 @@ char mapStep[] = { 7, 8, 1, -6, -7, -8, -1, 6 };
 char rowMask[] = { 0100, 0140, 0160, 070, 034, 016, 07, 03, 01 };\r
 char rows[9];\r
 \r
-int\r
+void\r
 AreaStep (int from, int x, int flags, int n, int d)\r
 {\r
   int i;\r
@@ -1114,7 +1115,7 @@ AreaStep (int from, int x, int flags, int n, int d)
   }\r
 }\r
 \r
-int\r
+void\r
 AreaMoves (int from, int piece, int range)\r
 {\r
   int i;\r
@@ -1168,14 +1169,14 @@ GenNonCapts (int promoSuppress)
        } else\r
        if(r >= S) { // in any case, do a jump of 2\r
          int occup = NewNonCapture(x, x + 2*v, pFlag);\r
-         if(r < J) { // Lion power, also single step\r
+         if(r < I) { // Lion power, also single step\r
            if(!NewNonCapture(x, x + v, pFlag)) nullMove = x; else occup = 1;\r
            if(r <= L) { // true Lion, also Knight jump\r
              if(!occup & r < L) for(y=x+2*v; !NewNonCapture(x, y+=v, pFlag) && r == S; ); // BS and FF moves\r
              v = nStep[j];\r
              NewNonCapture(x, x + v, pFlag);\r
            }\r
-         }\r
+         } else if(r == I) NewNonCapture(x, x + v, pFlag); // also do step\r
        } else\r
        if(r == M) { // FIDE Pawn; check double-move\r
          if(!NewNonCapture(x, x+v, pFlag) && chessFlag && promoBoard[x-v] & LAST_RANK)\r
@@ -1199,7 +1200,7 @@ report (int x, int y, int i)
 int\r
 MapOneColor (int start, int last, int *map)\r
 {\r
-  int i, j, k, totMob = 0;\r
+  int i, j, totMob = 0;\r
   for(i=start+2; i<=last; i+=2) {\r
     int mob = 0;\r
     if(p[i].pos == ABSENT) continue;\r
@@ -1217,6 +1218,7 @@ MapOneColor (int start, int last, int *map)
          if(r < J) { // Lion power, also single step\r
            if(board[x + v] != EMPTY && board[x + v] != EDGE)\r
              map[2*(x + v) + start] += one[j];\r
+           if(r < I) {\r
            if(r == T) { // Lion Dog, also jump of 3\r
              if(board[x + 3*v] != EMPTY && board[x + 3*v] != EDGE)\r
                map[2*(x + 3*v) + start] += one[j];\r
@@ -1237,6 +1239,7 @@ MapOneColor (int start, int last, int *map)
              if(board[x + v] != EMPTY && board[x + v] != EDGE)\r
                map[2*(x + v) + start] += one[8];\r
            }\r
+           }\r
          }\r
        } else\r
        if(r == C) { // FIDE Pawn diagonal\r
@@ -1281,6 +1284,7 @@ MapFromScratch (int *map)
   int i;\r
   for(i=0; i<2*bsize; i++) map[i] = 0;\r
   mobilityScore  = MapOneColor(1, last[WHITE], map);\r
+\r
   mobilityScore -= MapOneColor(0, last[BLACK], map);\r
 }\r
 \r
@@ -1464,13 +1468,13 @@ UnMake(UndoInfo *u)
 }\r
        \r
 void\r
-GenCapts(int sqr, int victimValue)\r
+GenCapts (int sqr, int victimValue)\r
 { // generate all moves that capture the piece on the given square\r
-  int i, range, att = attacks[2*sqr + stm];\r
+  int i, att = attacks[2*sqr + stm];\r
 //printf("GenCapts(%c%d,%d) %08x\n",sqr%BW+'a',sqr/BW,victimValue,att);\r
   if(!att) return; // no attackers at all!\r
   for(i=0; i<8; i++) {               // try all rays\r
-    int x, v, jumper, jcapt=0;\r
+    int x, v, jcapt=0;\r
     if(att & attackMask[i]) {        // attacked by move in this direction\r
       v = -kStep[i]; x = sqr;\r
       while( board[x+=v] == EMPTY ); // scan towards source until we encounter a 'stop'\r
@@ -1548,6 +1552,8 @@ GenCapts(int sqr, int victimValue)
              break;\r
            case J: // plain jump (as in KY, PH)\r
              if(d != 2) break;\r
+           case I: // jump + step (as in Wa TF)\r
+             if(d > 2) break;\r
              NewCapture(x, sqr + victimValue - SORTKEY(attacker), p[attacker].promoFlag);\r
              att -= one[i];\r
              break;\r
@@ -2230,6 +2236,7 @@ pbytes (unsigned char *b)
   for(i=BH-1; i>=0; i--) {\r
     for(j=0; j<BH; j++) printf("%3x", b[BW*i+j]);\r
     printf("\n");\r
+\r
   }\r
 }\r
 \r
@@ -2440,7 +2447,7 @@ MoveToText (MOVE move, int multiLine)
 int\r
 ReadSquare (char *p, int *sqr)\r
 {\r
-  int i=0, f, r;\r
+  int f, r;\r
   f = p[0] - 'a';\r
   r = atoi(p + 1) - ONE;\r
   *sqr = r*BW + f;\r
@@ -2607,7 +2614,7 @@ printf("# limits %d, %d, %d mode = %d\n", tlim1, tlim2, tlim3, abortFlag);
 int\r
 SearchBestMove (MOVE *move, MOVE *ponderMove)\r
 {\r
-  int score, i;\r
+  int score;\r
 printf("# SearchBestMove\n");\r
   startTime = GetTickCount();\r
   nodes = 0;\r
@@ -2686,6 +2693,7 @@ printf("# ponder hit\n");
       }\r
     }\r
 \r
+    int\r
     main()\r
     {\r
       int engineSide=NONE;                // side played by engine\r
@@ -2871,5 +2879,6 @@ pboard(board);
         if(!strcmp(command, "remove"))  { stm = TakeBack(2); continue; }\r
         printf("Error: unknown command\n");\r
       }\r
+      return 0;\r
     }\r
 \r