Home | History | Annotate | Line # | Download | only in mille
extern.c revision 1.1
      1  1.1  cgd /*
      2  1.1  cgd  * Copyright (c) 1982 Regents of the University of California.
      3  1.1  cgd  * All rights reserved.
      4  1.1  cgd  *
      5  1.1  cgd  * Redistribution and use in source and binary forms, with or without
      6  1.1  cgd  * modification, are permitted provided that the following conditions
      7  1.1  cgd  * are met:
      8  1.1  cgd  * 1. Redistributions of source code must retain the above copyright
      9  1.1  cgd  *    notice, this list of conditions and the following disclaimer.
     10  1.1  cgd  * 2. Redistributions in binary form must reproduce the above copyright
     11  1.1  cgd  *    notice, this list of conditions and the following disclaimer in the
     12  1.1  cgd  *    documentation and/or other materials provided with the distribution.
     13  1.1  cgd  * 3. All advertising materials mentioning features or use of this software
     14  1.1  cgd  *    must display the following acknowledgement:
     15  1.1  cgd  *	This product includes software developed by the University of
     16  1.1  cgd  *	California, Berkeley and its contributors.
     17  1.1  cgd  * 4. Neither the name of the University nor the names of its contributors
     18  1.1  cgd  *    may be used to endorse or promote products derived from this software
     19  1.1  cgd  *    without specific prior written permission.
     20  1.1  cgd  *
     21  1.1  cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     22  1.1  cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  1.1  cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  1.1  cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     25  1.1  cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     26  1.1  cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     27  1.1  cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     28  1.1  cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     29  1.1  cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  1.1  cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  1.1  cgd  * SUCH DAMAGE.
     32  1.1  cgd  */
     33  1.1  cgd 
     34  1.1  cgd #ifndef lint
     35  1.1  cgd static char sccsid[] = "@(#)extern.c	5.5 (Berkeley) 6/1/90";
     36  1.1  cgd #endif /* not lint */
     37  1.1  cgd 
     38  1.1  cgd # include	"mille.h"
     39  1.1  cgd 
     40  1.1  cgd /*
     41  1.1  cgd  * @(#)extern.c	1.1 (Berkeley) 4/1/82
     42  1.1  cgd  */
     43  1.1  cgd 
     44  1.1  cgd bool	Debug,			/* set if debugging code on		*/
     45  1.1  cgd 	Finished,		/* set if current hand is finished	*/
     46  1.1  cgd 	Next,			/* set if changing players		*/
     47  1.1  cgd 	On_exit,		/* set if game saved on exiting		*/
     48  1.1  cgd 	Order,			/* set if hand should be sorted		*/
     49  1.1  cgd 	Saved;			/* set if game just saved		*/
     50  1.1  cgd 
     51  1.1  cgd char	*C_fmt = "%-18.18s",	/* format for printing cards		*/
     52  1.1  cgd 	*Fromfile = NULL,	/* startup file for game		*/
     53  1.1  cgd 	Initstr[100],		/* initial string for error field	*/
     54  1.1  cgd 	*_cn[NUM_CARDS] = {	/* Card name buffer			*/
     55  1.1  cgd 		"",
     56  1.1  cgd 		"25",
     57  1.1  cgd 		"50",
     58  1.1  cgd 		"75",
     59  1.1  cgd 		"100",
     60  1.1  cgd 		"200",
     61  1.1  cgd 		"Out of Gas",
     62  1.1  cgd 		"Flat Tire",
     63  1.1  cgd 		"Accident",
     64  1.1  cgd 		"Stop",
     65  1.1  cgd 		"Speed Limit",
     66  1.1  cgd 		"Gasoline",
     67  1.1  cgd 		"Spare Tire",
     68  1.1  cgd 		"Repairs",
     69  1.1  cgd 		"Go",
     70  1.1  cgd 		"End of Limit",
     71  1.1  cgd 		"Extra Tank",
     72  1.1  cgd 		"Puncture Proof",
     73  1.1  cgd 		"Driving Ace",
     74  1.1  cgd 		"Right of Way"
     75  1.1  cgd 	},
     76  1.1  cgd 	**C_name = &_cn[1];	/* Card names				*/
     77  1.1  cgd 
     78  1.1  cgd int	Card_no,		/* Card number for current move		*/
     79  1.1  cgd 	End,			/* End value for current hand		*/
     80  1.1  cgd 	Handstart = COMP,	/* Player who starts hand		*/
     81  1.1  cgd 	Movetype,		/* Current move type			*/
     82  1.1  cgd 	Play,			/* Current player			*/
     83  1.1  cgd 	Numgos,			/* Number of Go cards used by computer	*/
     84  1.1  cgd 	Window = W_SMALL,	/* Current window wanted		*/
     85  1.1  cgd 	Numseen[NUM_CARDS],	/* Number of cards seen in current hand	*/
     86  1.1  cgd 	Value[NUM_MILES] = {	/* Value of mileage cards		*/
     87  1.1  cgd 		25, 50, 75, 100, 200
     88  1.1  cgd 	},
     89  1.1  cgd 	Numcards[NUM_CARDS] = {	/* Number of cards in deck		*/
     90  1.1  cgd 		10,	/* C_25 */
     91  1.1  cgd 		10,	/* C_50 */
     92  1.1  cgd 		10,	/* C_75 */
     93  1.1  cgd 		12,	/* C_100 */
     94  1.1  cgd 		4,	/* C_200 */
     95  1.1  cgd 		2,	/* C_EMPTY */
     96  1.1  cgd 		2,	/* C_FLAT */
     97  1.1  cgd 		2,	/* C_CRASH */
     98  1.1  cgd 		4,	/* C_STOP */
     99  1.1  cgd 		3,	/* C_LIMIT */
    100  1.1  cgd 		6,	/* C_GAS */
    101  1.1  cgd 		6,	/* C_SPARE */
    102  1.1  cgd 		6,	/* C_REPAIRS */
    103  1.1  cgd 		14,	/* C_GO */
    104  1.1  cgd 		6,	/* C_END_LIMIT */
    105  1.1  cgd 		1,	/* C_GAS_SAFE */
    106  1.1  cgd 		1,	/* C_SPARE_SAFE */
    107  1.1  cgd 		1,	/* C_DRIVE_SAFE */
    108  1.1  cgd 		1,	/* C_RIGHT_WAY */
    109  1.1  cgd 		0	/* C_INIT */
    110  1.1  cgd 	},
    111  1.1  cgd 	Numneed[NUM_CARDS] = {	/* number of cards needed per hand	*/
    112  1.1  cgd 		0,	/* C_25 */
    113  1.1  cgd 		0,	/* C_50 */
    114  1.1  cgd 		0,	/* C_75 */
    115  1.1  cgd 		0,	/* C_100 */
    116  1.1  cgd 		0,	/* C_200 */
    117  1.1  cgd 		2,	/* C_EMPTY */
    118  1.1  cgd 		2,	/* C_FLAT */
    119  1.1  cgd 		2,	/* C_CRASH */
    120  1.1  cgd 		4,	/* C_STOP */
    121  1.1  cgd 		3,	/* C_LIMIT */
    122  1.1  cgd 		2,	/* C_GAS */
    123  1.1  cgd 		2,	/* C_SPARE */
    124  1.1  cgd 		2,	/* C_REPAIRS */
    125  1.1  cgd 		10,	/* C_GO */
    126  1.1  cgd 		3,	/* C_END_LIMIT */
    127  1.1  cgd 		1,	/* C_GAS_SAFE */
    128  1.1  cgd 		1,	/* C_SPARE_SAFE */
    129  1.1  cgd 		1,	/* C_DRIVE_SAFE */
    130  1.1  cgd 		1,	/* C_RIGHT_WAY */
    131  1.1  cgd 		0	/* C_INIT */
    132  1.1  cgd 	};
    133  1.1  cgd 
    134  1.1  cgd CARD	Discard,		/* Top of discard pile			*/
    135  1.1  cgd 	Sh_discard,		/* Last discard card shown		*/
    136  1.1  cgd 	*Topcard,		/* Pointer to next card to be picked	*/
    137  1.1  cgd 	Opposite[NUM_CARDS] = {	/* Opposites of each card		*/
    138  1.1  cgd 		C_25, C_50, C_75, C_100, C_200, C_GAS, C_SPARE,
    139  1.1  cgd 		C_REPAIRS, C_GO, C_END_LIMIT, C_EMPTY, C_FLAT, C_CRASH,
    140  1.1  cgd 		C_STOP, C_LIMIT, C_EMPTY, C_FLAT, C_CRASH, C_STOP, C_INIT
    141  1.1  cgd 	},
    142  1.1  cgd 	Deck[DECK_SZ] = {	/* Current deck				*/
    143  1.1  cgd 		C_25, C_25, C_25, C_25, C_25, C_25, C_25, C_25, C_25, C_25,
    144  1.1  cgd 		C_50, C_50, C_50, C_50, C_50, C_50, C_50, C_50, C_50, C_50,
    145  1.1  cgd 		C_75, C_75, C_75, C_75, C_75, C_75, C_75, C_75, C_75, C_75,
    146  1.1  cgd 		C_100, C_100, C_100, C_100, C_100, C_100, C_100, C_100, C_100,
    147  1.1  cgd 		C_100, C_100, C_100,
    148  1.1  cgd 		C_200, C_200, C_200, C_200,
    149  1.1  cgd 		C_EMPTY, C_EMPTY,
    150  1.1  cgd 		C_FLAT, C_FLAT,
    151  1.1  cgd 		C_CRASH, C_CRASH,
    152  1.1  cgd 		C_STOP, C_STOP, C_STOP, C_STOP,
    153  1.1  cgd 		C_LIMIT, C_LIMIT, C_LIMIT,
    154  1.1  cgd 		C_GAS, C_GAS, C_GAS, C_GAS, C_GAS, C_GAS,
    155  1.1  cgd 		C_SPARE, C_SPARE, C_SPARE, C_SPARE, C_SPARE, C_SPARE,
    156  1.1  cgd 		C_REPAIRS, C_REPAIRS, C_REPAIRS, C_REPAIRS, C_REPAIRS,
    157  1.1  cgd 			C_REPAIRS,
    158  1.1  cgd 		C_END_LIMIT, C_END_LIMIT, C_END_LIMIT, C_END_LIMIT, C_END_LIMIT,
    159  1.1  cgd 			C_END_LIMIT,
    160  1.1  cgd 		C_GO, C_GO, C_GO, C_GO, C_GO, C_GO, C_GO, C_GO, C_GO, C_GO,
    161  1.1  cgd 			C_GO, C_GO, C_GO, C_GO,
    162  1.1  cgd 		C_GAS_SAFE, C_SPARE_SAFE, C_DRIVE_SAFE, C_RIGHT_WAY
    163  1.1  cgd 	};
    164  1.1  cgd 
    165  1.1  cgd FILE	*outf;
    166  1.1  cgd 
    167  1.1  cgd PLAY	Player[2];		/* Player descriptions			*/
    168  1.1  cgd 
    169  1.1  cgd WINDOW	*Board,			/* Playing field screen			*/
    170  1.1  cgd 	*Miles,			/* Mileage screen			*/
    171  1.1  cgd 	*Score;			/* Score screen				*/
    172  1.1  cgd 
    173