From: H.G.Muller <hgm@hgm-xboard.(none)>
Date: Thu, 10 Apr 2014 14:09:36 +0000 (+0200)
Subject: Increase center-rank penalty for sliders
X-Git-Tag: 0.19~7
X-Git-Url: http://winboard.nl/cgi-bin?p=hachu.git;a=commitdiff_plain;h=a6e527af5886ee2be168cf87cccc2ade770a5247

Increase center-rank penalty for sliders
---

diff --git a/hachu.c b/hachu.c
index 5900935..ec89af4 100644
--- a/hachu.c
+++ b/hachu.c
@@ -989,14 +989,14 @@ Init (int var)
     PST[PST_STEPPER+s] = d/4 - (i < 2 || i > BH-3 ? 3 : 0) - (j == 0 || j == BH-1 ? 5 : 0)
                     + 3*(i==zone || i==BH-zone-1);          // stepper centralization
     PST[PST_WJUMPER+s] = d/6;                               // double-stepper centralization
-    PST[PST_SLIDER +s] = d/12 - 5*(i==BH/2 || i==(BH-1)/2); // slider centralization
+    PST[PST_SLIDER +s] = d/12 - 7*(i==BH/2 || i==(BH-1)/2); // slider centralization
     PST[PST_TRAP  +s] = j < 3 || j > BH-4 ? (i < 3 ? 7 : i == 3 ? 4 : i == 4 ? 2 : 0) : 0;
     PST[PST_CENTER+s] = ((BH-1)*(BH-1) - (2*i - BH + 1)*(2*i - BH + 1) - (2*j - BH + 1)*(2*j - BH + 1))/6;
     PST[PST_WPPROM+s] = PST[PST_BPPROM+s] = PST[PST_STEPPER+s]; // as stepper, but with pre-promotion bonus W/B
     PST[PST_BJUMPER+s] = PST[PST_WJUMPER+s];                // as jumper, but with pre-promotion bonus B
     PST[PST_ZONDIST+s] = BW*(zone - 1 - i);                 // board step to enter promo zone black
-    PST[PST_ADVANCE+s] = PST[PST_WFLYER-s-1] = 2*(5*i+i*i) - (i >= zone)*8*(i-zone+1)*(i-zone+1)
-			 - 50 - 10*(j==0 || j == BH-1);     // advance-encouraging table
+    PST[PST_ADVANCE+s] = PST[PST_WFLYER-s-1] = 2*(5*i+i*i) - (i >= zone)*6*(i-zone+1)*(i-zone+1)
+	- 50 - 20*(j==0 || j == BH-1) - 10*(j == 1 || BH-2); // advance-encouraging table
     PST[PST_WFLYER +s] = PST[PST_END-s-1] = (i == zone-1)*40 + (i == zone-2)*20 - 20;
    }
    if(zone > 0) PST[PST_WPPROM+BW*(BH-1-zone) + j] += 10, PST[PST_BPPROM + BW*zone + j] += 10;