Clarify license
[fairymax.git] / fairymax.c
index 418c926..5df22c2 100644 (file)
@@ -1,13 +1,16 @@
 /***************************************************************************/\r
-/*                               fairy-Max,                                */\r
+/*                               Fairy-Max,                                */\r
 /* Version of the sub-2KB (source) micro-Max Chess program, fused to a     */\r
 /* generic WinBoard interface, loading its move-generator tables from file */\r
 /***************************************************************************/\r
 \r
      /*****************************************************************/\r
      /*                      LICENCE NOTIFICATION                     */\r
-     /* Fairy-Max 4.8 is free software, and you have my permission do */\r
-     /* with it whatever you want, whether it is commercial or not.   */\r
+     /* Fairy-Max 4.8 is free software, released in the public domain */\r
+     /* so that you have my permission do with it whatever you want,  */\r
+     /* whether it is commercial or not, at your own risk. Those that */\r
+     /* are not comfortable with this, can also use or redistribute   */\r
+     /* it under the GNU Public License or the MIT License.           */\r
      /* Note, however, that Fairy-Max can easily be configured through*/\r
      /* its fmax.ini file to play Chess variants that are legally pro-*/\r
      /* tected by patents, and that to do so would also require per-  */\r
@@ -18,7 +21,7 @@
      /*****************************************************************/\r
 \r
 #define MULTIPATH\r
-#define VERSION "4.8T"\r
+#define VERSION "4.8V"\r
 \r
 #include <stdio.h>\r
 #include <stdlib.h>\r
@@ -109,6 +112,7 @@ int prom, pm, gating, succession, hill;
 char piecename[32], piecetype[32], blacktype[32];\r
 char selectedFairy[80];\r
 char *inifile = INI_FILE;\r
+char info[999];\r
 \r
 int Ticks, tlim, Setup, SetupQ;\r
 \r
@@ -276,7 +280,7 @@ int k,q,l,e,E,z,n;      /* (q,l)=window, e=current eval. score, E=e.p. sqr.*/
         )t+=flag&4;                            /* fake capt. for nonsliding*/\r
       else if(flag&64)t=flag&128?0:t,flag&=63;else F=y; /* enable e.p.     */\r
       if(s&&flag&8&&!(y=rg&1?y-r:y,t=0)        /* hoppers go to next phase */\r
-         ||!(flag&S)&&--rg<0)                  /* zig-zag piece? (w. delay)*/\r
+         ||!(flag&S)&&!rg--)                   /* zig-zag piece? (w. delay)*/\r
        r=v,flag^=flag>>4&15;                   /* alternate vector & mode  */\r
      }W(!t);                                   /* if not capt. continue ray*/\r
    }}\r
@@ -456,14 +460,15 @@ void PrintOptions()
 {\r
        printf("feature option=\"Resign -check %d\"\n", Resign);\r
        printf("feature option=\"Resign Threshold -spin %d 200 1200\"\n", Threshold);\r
+       printf("feature option=\"Claim draw after -spin %d 0 200\"\n", drawMoves);\r
        printf("feature option=\"Ini File -file %s\"\n", inifile);\r
        printf("feature option=\"Multi-PV Margin -spin %d 0 1000\"\n", margin);\r
        printf("feature option=\"Variant fairy selects -combo "); PrintVariants(1); printf("\"\n");\r
        printf("feature option=\"Makruk rules -combo makruk /// Cambodian /// Ai-wok\"\n");\r
-       printf("feature option=\"Claim draw after -spin %d 0 200\"\n", drawMoves);\r
        printf("feature option=\"Dummy Slider Example -slider 20 0 100\"\n");\r
        printf("feature option=\"Dummy String Example -string happy birthday!\"\n");\r
        printf("feature option=\"Dummy Path Example -path .\"\n");\r
+       printf("feature option=\"Info -button\"\n");\r
        printf("feature option=\"Clear Hash -button\"\n");\r
        printf("feature done=1\n");\r
 }\r
@@ -489,7 +494,9 @@ void LoadGame(char *name)
            if(!strcmp(name, "fairy")) name = selectedFairy;\r
            gating = !strcmp(name, "seirawan");\r
            while((ptc=fscanf(f, "Game: %s # %s # %s", buf, pieceToChar, parent))==0 || strcmp(name, buf) ) {\r
-               while((c = fgetc(f)) != EOF && c != '\n');\r
+               char *p = info;\r
+               while((c = fgetc(f)) != EOF && c != '\n') *p++ = c;\r
+               if(*info == '/') *p = 0; else *info = 0; // remember last line before Game if it was comment\r
                count++;\r
                if(c == EOF) {\r
                    printf("telluser variant %s not supported\n", name);\r
@@ -503,7 +510,7 @@ void LoadGame(char *name)
         /* We have found variant, or if none specified, are at beginning of file */\r
         if(fscanf(f, "%dx%d", &BW, &BH)!=2 || BW>12 || BH!=8)\r
         { printf("telluser unsupported board size %dx%d\n",BW,BH); exit(0); }\r
-        makruk = 0; if(fscanf(f, "=%d", &i)) makruk=64; // new method to indicate deviant zone depth (for now assumes 3)\r
+        makruk = 0; if(fscanf(f, "=%d", &i)) makruk=67-i; // new method to indicate deviant zone depth (for now assumes 3)\r
 \r
         for(i=0; i<BW; i++) fscanf(f, "%d", oo+i);\r
         for(i=0; i<BW; i++) fscanf(f, "%d", oo+i+16);\r
@@ -539,6 +546,7 @@ void LoadGame(char *name)
         }\r
        while(fscanf(f, " # %[^\n]", pieceToChar)) printf("piece %s\n", pieceToChar);\r
         fclose(f);\r
+       if(makruk == 66) makruk = 8; // 66 was kludge to interpret "=1" suffix in asean for setting up 3rd-rank Pawns\r
 }\r
 \r
 int main(int argc, char **argv)\r
@@ -548,6 +556,8 @@ int main(int argc, char **argv)
         int m, nr;\r
         double cpuT;\r
 \r
+        if(argc > 1 && !strcmp(argv[1], "-v")) argc++, argv--, printf("%s\n", VERSION), exit(0);\r
+\r
         if(argc>1 && sscanf(argv[1], "%d", &m)==1)\r
         { U = (1<<m)-1; argc--; argv++; }\r
         A = (struct _ *) calloc(U+1, sizeof(struct _));\r
@@ -556,8 +566,6 @@ int main(int argc, char **argv)
        signal(SIGINT, SIG_IGN);\r
         printf("tellics say     " NAME " " VERSION "\n");\r
         printf("tellics say     by H.G. Muller\n");\r
-        printf("tellics say Gothic Chess is protected by U.S. patent #6,481,716 by Ed Trice.\n");\r
-        printf("tellics say Falcon Chess is protected by U.S. patent #5,690,334 by George W. Duke\n");\r
         InitEngine();\r
         LoadGame(NULL);\r
         InitGame();\r
@@ -584,8 +592,8 @@ int main(int argc, char **argv)
                         if(tlim>TimeLeft/15) tlim = TimeLeft/15;\r
                         PromPiece = 0; /* Always promote to Queen ourselves */\r
                         for(N=K=0;K<S;K++)N+=b[K]?b[K]&16?S:1:0; /* count pieces for detecting bare King */\r
-                        if(w[3]<0&w[4]<0){if(N>>8<2)centr[4]=5;if(!(N&S-2))centr[3]=5;Z+=R>4;R=4;}\r
-printf("# %d+%d pieces, centr = (%d,%d)\n", N&63, N>>7, centr[3], centr[4]);\r
+                        if(w[3]<0&w[4]<0){if(N<2*S)centr[4]=5,Z+=R>4,R=4;if(!(N&S-2))centr[3]=5,Z+=R>4,R=4;}\r
+printf("# %d+%d pieces, centr = (%d,%d) R=%d\n", N&63, N>>7, centr[3], centr[4], R);\r
                         N=0;K=I;\r
                         if(hill) centr[3] = R>20 ? 1 : 22-R;\r
                         if (D(Side,-I,I,Q,O,LL|S,3)==I) {\r
@@ -758,6 +766,7 @@ printf("# promo = %d (%c) GT = %d\n", prom, prom + '`', GT);
                                inifile = filename; continue;\r
                        }\r
                        if(sscanf(line+7, "Clear Hash%c", &c) == 1) for(i=0; i<=U; i++) A->K = 0;\r
+                       if(sscanf(line+7, "Info%c", &c) == 1) printf("telluser %s\n", info+3);\r
                        if(sscanf(line+7, "MultiVariation Margin=%d", &margin) == 1) continue;\r
                        if(sscanf(line+7, "Variant fairy selects=%s", selectedFairy+6) == 1) continue;\r
                        if(sscanf(line+7, "Makruk rules=%s", Cambodian) == 1) continue;\r
@@ -895,7 +904,7 @@ printf("# promo = %d (%c) GT = %d\n", prom, prom + '`', GT);
                 GT = (Side == WHITE ? piecetype : blacktype)[line[4]&31];\r
                 if(GT) PromPiece = (Side == WHITE ? 7 : 7+pm) - GT, GT |= 32 + Side;\r
                 {char *c=line; K=c[0]-16*c[1]+799;L=c[2]-16*c[3]+799; }\r
-                if(w[GT&15] == -1) L = S; // spoil move for promotion to King\r
+                if(w[GT&15] == -1 || w[GT&15]%10 == 3) L = S; // spoil move for promotion to King (or when marked non-promoting)\r
                 if (m & line[1] != '@')\r
                         /* doesn't have move syntax */\r
                        printf("Error (unknown command): %s\n", command);\r