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