Home | History | Annotate | Line # | Download | only in teachgammon
teach.c revision 1.4 
      1 /*	$NetBSD: teach.c,v 1.4 1995/04/29 00:44:18 mycroft Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1980, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *	This product includes software developed by the University of
     18  *	California, Berkeley and its contributors.
     19  * 4. Neither the name of the University nor the names of its contributors
     20  *    may be used to endorse or promote products derived from this software
     21  *    without specific prior written permission.
     22  *
     23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33  * SUCH DAMAGE.
     34  */
     35 
     36 #ifndef lint
     37 static char copyright[] =
     38 "@(#) Copyright (c) 1980, 1993\n\
     39 	The Regents of the University of California.  All rights reserved.\n";
     40 #endif /* not lint */
     41 
     42 #ifndef lint
     43 #if 0
     44 static char sccsid[] = "@(#)teach.c	8.1 (Berkeley) 5/31/93";
     45 #else
     46 static char rcsid[] = "$NetBSD: teach.c,v 1.4 1995/04/29 00:44:18 mycroft Exp $";
     47 #endif
     48 #endif /* not lint */
     49 
     50 #include "back.h"
     51 
     52 char	*hello[];
     53 char	*list[];
     54 char	*intro1[];
     55 char	*intro2[];
     56 char	*moves[];
     57 char	*remove[];
     58 char	*hits[];
     59 char	*endgame[];
     60 char	*doubl[];
     61 char	*stragy[];
     62 char	*prog[];
     63 char	*lastch[];
     64 
     65 extern speed_t	ospeed;			/* tty output speed for termlib */
     66 
     67 char *helpm[] = {
     68 	"\nEnter a space or newline to roll, or",
     69 	"     b   to display the board",
     70 	"     d   to double",
     71 	"     q   to quit\n",
     72 	0
     73 };
     74 
     75 char *contin[] = {
     76 	"",
     77 	0
     78 };
     79 
     80 main (argc,argv)
     81 int	argc;
     82 char	**argv;
     83 
     84 {
     85 	register int	i;
     86 
     87 	signal (2,getout);
     88 	if (tcgetattr (0, &old) == -1)			/* get old tty mode */
     89 		errexit ("teachgammon(gtty)");
     90 	noech = old;
     91 	noech.c_lflag &= ~ECHO;
     92 	raw = noech;
     93 	raw.c_lflag &= ~ICANON;				/* set up modes */
     94 	ospeed = cfgetospeed (&old);			/* for termlib */
     95 	tflag = getcaps (getenv ("TERM"));
     96 #ifdef V7
     97 	while (*++argv != 0)
     98 #else
     99 	while (*++argv != -1)
    100 #endif
    101 		getarg (&argv);
    102 	if (tflag)  {
    103 		noech.c_oflag &= ~(ONLCR|OXTABS);
    104 		raw.c_oflag &= ~(ONLCR|OXTABS);
    105 		clear();
    106 	}
    107 	text (hello);
    108 	text (list);
    109 	i = text (contin);
    110 	if (i == 0)
    111 		i = 2;
    112 	init();
    113 	while (i)
    114 		switch (i)  {
    115 
    116 		case 1:
    117 			leave();
    118 
    119 		case 2:
    120 			if (i = text(intro1))
    121 				break;
    122 			wrboard();
    123 			if (i = text(intro2))
    124 				break;
    125 
    126 		case 3:
    127 			if (i = text(moves))
    128 				break;
    129 
    130 		case 4:
    131 			if (i = text(remove))
    132 				break;
    133 
    134 		case 5:
    135 			if (i = text(hits))
    136 				break;
    137 
    138 		case 6:
    139 			if (i = text(endgame))
    140 				break;
    141 
    142 		case 7:
    143 			if (i = text(doubl))
    144 				break;
    145 
    146 		case 8:
    147 			if (i = text(stragy))
    148 				break;
    149 
    150 		case 9:
    151 			if (i = text(prog))
    152 				break;
    153 
    154 		case 10:
    155 			if (i = text(lastch))
    156 				break;
    157 		}
    158 	tutor();
    159 }
    160 
    161 leave()  {
    162 	if (tflag)
    163 		clear();
    164 	else
    165 		writec ('\n');
    166 	fixtty(&old);
    167 	execl (EXEC,"backgammon",args,"n",0);
    168 	writel ("Help! Backgammon program is missing\007!!\n");
    169 	exit (-1);
    170 }
    171