backgammon/teachgammon/data.c

   1 /*
   2  * Copyright (c) 1980 Regents of the University of California.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #ifndef lint
  35 /*static char sccsid[] = "from: @(#)data.c      5.4 (Berkeley) 6/1/90";*/
  36 static char rcsid[] = "$Id: data.c,v 1.2 1993/08/01 18:56:29 mycroft Exp $";
  37 #endif /* not lint */
  38
  39 #include "tutor.h"
  40
  41 int     maxmoves = 23;
  42
  43 char  *text0[] = {
  44         "To start the game, I roll a 3, and you roll a 1.  This means",
  45         "that I get to start first.  I move 8-5,6-5 since this makes a",
  46         "new point and helps to trap your back men on 1.  You should be",
  47         "able to do a similar move with your roll.",
  48         0
  49 };
  50
  51 char  *text1[] = {
  52         "Now you shall see a move using doubles.  I just rolled double",
  53         "5's.  I will move two men from position 13 to position 3.  The",
  54         "notation for this is 13-8,13-8,8-3,8-3.  You will also roll dou-",
  55         "bles, but you will be able to make a much stronger move.",
  56         0
  57 };
  58
  59 char  *text2[] = {
  60         "Excellent!  As you can see, you are beginning to develop a wall",
  61         "which is trapping my men on position 24.  Also, moving your back",
  62         "men forward not only improves your board position safely, but it",
  63         "thwarts my effort to make a wall.",
  64         "",
  65         "My roll now is 5 6.  Normally, I would use that roll to move from",
  66         "position 24 to position 13 (24-18-13), but your new point prevents",
  67         "that.  Instead, I am forced to move from 13 to 2, where my man is",
  68         "open but cannot be hit.",
  69         0
  70 };
  71
  72 char  *text3[] = {
  73         "As you can see, although you left a man open, it is a rela-",
  74         "tively safe move to an advantageous position, which might help",
  75         "you make a point later.  Only two rolls (4 5 or 5 4) will allow",
  76         "me to hit you.  With an unprecedented amount of luck, I happen",
  77         "to roll a 4 5 and hit you as just mentioned.",
  78         0
  79 };
  80
  81 char  *text4[] = {
  82         "You're pretty lucky yourself, you know.  I follow by rolling 2 3",
  83         "and moving 25-22,24-22, forming a new point.",
  84         0
  85 };
  86
  87 char  *text5[] = {
  88         "Not a spectacular move, but a safe one.  I follow by rolling 6 1.",
  89         "I decide to use this roll to move 22-16,16-17.  It leaves me with",
  90         "one man still open, but the blot is farther back on the board, and",
  91         "would suffer less of a loss by being hit.",
  92         0
  93 };
  94
  95 char  *text6[] = {
  96         "By moving your two men from 17 to 20, you lessen my chance of",
  97         "getting my man off the board.  In fact, the odds are 5 to 4",
  98         "against me getting off.  I roll with the odds and helplessly",
  99         "receive a 3 5.",
 100         0
 101 };
 102
 103 char  *text7[] = {
 104         "Note that the blot on 7 cannot be hit unless I get off the bar",
 105         "and have a 1 or a 6 left over, and doing so will leave two of",
 106         "my men open.  Also, the blot on 16 cannot be hit at all!  With",
 107         "a sigh of frustration, I roll double 6's and remain immobile.",
 108         0
 109 };
 110
 111 char  *text8[] = {
 112         "See, you did not get hit and, you got to 'cover up' your open men.",
 113         "Quite an accomplishment.  Finally, I get off the bar by rolling",
 114         "6 2 and moving 25-23,23-17.",
 115         0
 116 };
 117
 118 char  *text9[] = {
 119         "My venture off the bar did not last long.  However, I got lucky",
 120         "and rolled double 1's, allowing me to move 0-1,1-2,15-14,15-14.",
 121         0
 122 };
 123
 124 char  *text10[] = {
 125         "You are improving your position greatly and safely, and are well",
 126         "on the way to winning the game.  I roll a 6 2 and squeak past",
 127         "your back man.  Now the game becomes a race to the finish.",
 128         0
 129 };
 130
 131 char  *text11[] = {
 132         "Now that it is merely a race, you are trying to get as many men",
 133         "as possible into the inner table, so you can start removing them.",
 134         "I roll a 3 4 and move my two men farthest back to position 11",
 135         "(15-11,14-11).",
 136         0
 137 };
 138
 139 char  *text12[] = {
 140         "The race is still on, and you have seem to be doing all right.",
 141         "I roll 6 1 and move 14-8,13-12.",
 142         0
 143 };
 144
 145 char  *text13[] = {
 146         "Notice that you get to remove men the instant you have all of",
 147         "them at your inner table, even if it is the middle of a turn.",
 148         "I roll 1 2 and move 13-11,12-11.",
 149         0
 150 };
 151
 152 char  *text14[] = {
 153         "Although you could have removed a man, this move illustrates two",
 154         "points:  1) You never have to remove men, and 2) You should try",
 155         "to spread out your men on your inner table.  Since you have one",
 156         "man on each position, you should be able to remove at least two",
 157         "men next turn.  I roll 2 5 and move 8-6,11-6.",
 158         0
 159 };
 160
 161 char  *text15[] = {
 162         "This time you were able to remove men.  I roll 3 4 and move",
 163         "11-7,11-8.  The race continues.",
 164         0
 165 };
 166
 167 char  *text16[] = {
 168         "More holes are opening up in your inner table, but you are",
 169         "still very much ahead.  If we were doubling, you would have",
 170         "doubled long ago.  I roll 2 6 and move 8-6,11-5.",
 171         0
 172 };
 173
 174 char  *text17[] = {
 175         "It pays to spread out your men.  I roll 3 5 and move 7-4,8-3.",
 176         0
 177 };
 178
 179 char  *text18[] = {
 180         "You can only remove some men, but you spread out more and",
 181         "more, in order to be able to remove men more efficiently.",
 182         "I roll double 3's, which help, but not that much.  I move",
 183         "8-5,3-0,3-0,3-0.",
 184         0
 185 };
 186
 187 char  *text19[] = {
 188         "I roll 1 4 and move 5-4,4-0.",
 189         0
 190 };
 191
 192 char  *text20[] = {
 193         "You are now nicely spread out to win a game.  I roll 5 6 and",
 194         "move 5-0,6-0.",
 195         0
 196 };
 197
 198 char  *text21[] = {
 199         "Any minute now.  Just a few short steps from victory.  I roll",
 200         "2 4 and move 6-4,4-0.",
 201         0
 202 };
 203
 204 char  *text22[] = {
 205         "It looks pretty hopeless for me, but I play on, rolling 1 3 and",
 206         "moving 4-3,3-0.",
 207         0
 208 };
 209
 210 char  *text23[] = {
 211         "Congratulations!  You just won a game of backgammon against the",
 212         "computer!  You will now be able to play a game, but remember,",
 213         "when you start playing, that doubling will be enabled, which",
 214         "will add another factor to the game...  Good luck!!",
 215         "",
 216         0
 217 };
 218
 219 struct situatn  test[] = {
 220         {
 221                 {0,2,0,0,0,0,-5,0,-3,0,0,0,5,-5,0,0,0,3,0,5,0,0,0,0,-2,0},
 222                 3, 1, {8,6,0,0}, {5,5,0,0}, 4, 2, text0
 223         },
 224         {
 225                 {0,2,0,0,0,-2,-4,0,-2,0,0,0,5,-5,0,0,0,2,0,4,0,2,0,0,-2,0},
 226                 5, 5, {13,13,8,8}, {8,8,3,3}, 6, 6, text1
 227         },
 228         {
 229                 {0,0,0,-2,0,-2,-4,2,-2,0,0,0,3,-3,0,0,0,2,2,4,0,2,0,0,-2,0},
 230                 6, 5, {13,8,0,0}, {8,2,0,0}, 1, 2, text2
 231         },
 232         {
 233                 {0,0,-1,-2,0,-2,-4,2,-2,0,0,0,2,-2,0,1,0,2,2,4,0,2,0,0,-2,0},
 234                 4, 5, {24,20,0,0}, {20,15,0,0}, 2, 5, text3
 235         },
 236         {
 237                 {0,0,0,-2,0,-2,-4,3,-2,0,0,0,2,-2,0,-1,0,2,2,4,0,2,0,0,-1,-1},
 238                 2, 3, {25,24,0,0}, {22,22,0,0}, 4, 1, text4
 239         },
 240         {
 241                 {0,0,0,-2,0,-2,-4,2,-2,0,0,0,3,-2,0,-1,0,2,2,4,0,2,-2,0,0,0},
 242                 6, 1, {22,16,0,0}, {16,15,0,0}, 3, 3, text5
 243         },
 244         {
 245                 {0,0,0,-2,0,-2,-4,2,-2,0,0,0,3,-2,0,-2,0,0,2,2,2,2,2,0,0,-1},
 246                 3, 5, {0,0,0,0}, {0,0,0,0}, 5, 4, text6
 247         },
 248         {
 249                 {0,0,0,-2,0,-2,-4,1,-2,0,0,0,3,-2,0,-2,1,0,2,2,2,2,2,0,0,-1},
 250                 6, 6, {0,0,0,0}, {0,0,0,0}, 3, 6, text7
 251         },
 252         {
 253                 {0,0,0,-2,0,-2,-4,0,-2,0,0,0,3,-2,0,-2,2,0,2,2,2,2,2,0,0,-1},
 254                 2, 6, {25,23,0,0}, {23,17,0,0}, 5, 1, text8
 255         },
 256         {
 257                 {0,0,0,-2,0,-2,-4,0,-2,0,0,0,2,-2,0,-2,2,0,3,2,2,2,2,0,0,-1},
 258                 1, 1, {25,24,15,15}, {24,23,14,14}, 4, 6, text9
 259         },
 260         {
 261                 {0,0,0,-2,0,-2,-4,0,-2,0,0,0,0,-2,-2,0,3,0,4,2,2,2,2,-1,0,0},
 262                 6, 2, {23,17,0,0}, {17,15,0,0}, 1, 3, text10
 263         },
 264         {
 265                 {0,0,0,-2,0,-2,-4,0,-2,0,0,0,0,-2,-2,-1,2,0,3,4,2,2,2,0,0,0},
 266                 4, 3, {15,14,0,0}, {11,11,0,0}, 5, 3, text11
 267         },
 268         {
 269                 {0,0,0,-2,0,-2,-4,0,-2,0,0,-2,0,-2,-1,0,0,0,3,5,2,3,2,0,0,0},
 270                 6, 1, {14,13,0,0}, {8,12,0,0}, 4, 4, text12
 271         },
 272         {
 273                 {0,0,0,-2,0,-2,-4,0,-3,0,0,-2,-1,-1,0,0,0,0,0,5,2,2,5,0,0,0},
 274                 2, 1, {13,12,0,0}, {11,11,0,0}, 2, 1, text13
 275         },
 276         {
 277                 {0,0,0,-2,0,-2,-4,0,-3,0,0,-4,0,0,0,0,0,0,0,5,2,2,3,1,1,0},
 278                 2, 5, {8,11,0,0}, {6,6,0,0}, 6, 3, text14
 279         },
 280         {
 281                 {0,0,0,-2,0,-2,-6,0,-2,0,0,-3,0,0,0,0,0,0,0,4,2,2,2,1,1,0},
 282                 4, 3, {11,11,0,0}, {7,8,0,0}, 2, 5, text15
 283         },
 284         {
 285                 {0,0,0,-2,0,-2,-6,-1,-3,0,0,-1,0,0,0,0,0,0,0,4,1,2,2,0,1,0},
 286                 2, 6, {8,11,0,0}, {6,5,0,0}, 6, 1, text16
 287         },
 288         {
 289                 {0,0,0,-2,0,-3,-7,-1,-2,0,0,0,0,0,0,0,0,0,0,3,1,2,2,0,0,0},
 290                 5, 3, {8,7,0,0}, {3,4,0,0}, 5, 2, text17
 291         },
 292         {
 293                 {0,0,0,-3,-1,-3,-7,0,-1,0,0,0,0,0,0,0,0,0,0,3,0,1,2,1,0,0},
 294                 3, 3, {8,3,3,3}, {5,0,0,0}, 1, 6, text18
 295         },
 296         {
 297                 {0,0,0,0,-1,-4,-7,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,2,1,0,0},
 298                 1, 4, {4,5,0,0}, {0,4,0,0}, 2, 3, text19
 299         },
 300         {
 301                 {0,0,0,0,-1,-3,-7,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,0},
 302                 5, 6, {6,5,0,0}, {0,0,0,0}, 1, 4, text20
 303         },
 304         {
 305                 {0,0,0,0,-1,-2,-6,0,0,0,0,0,0,0,0,0,0,0,0,1,0,1,1,0,0,0},
 306                 2, 4, {4,6,0,0}, {0,4,0,0}, 6, 2, text21
 307         },
 308         {
 309                 {0,0,0,0,-1,-2,-5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0},
 310                 3, 1, {4,3,0,0}, {3,0,0,0}, 4, 3, text22
 311         },
 312         {
 313                 {0,0,0,0,0,-2,-5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
 314                 0, 0, {0,0,0,0}, {0,0,0,0}, 0, 0, text23
 315         }
 316 };