Return to teach.c CVS log

Up to [CSRG BSD Unix] / 43BSD / games / backgammon

Annotation of 43BSD/games/backgammon/teach.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1980 Regents of the University of California.
                      3:  * All rights reserved.  The Berkeley software License Agreement
                      4:  * specifies the terms and conditions for redistribution.
                      5:  */
                      6: 
                      7: #ifndef lint
                      8: static char sccsid[] = "@(#)teach.c    5.1 (Berkeley) 5/29/85";
                      9: #endif not lint
                     10: 
                     11: #include "back.h"
                     12: 
                     13: char   *hello[];
                     14: char   *list[];
                     15: char   *intro1[];
                     16: char   *intro2[];
                     17: char   *moves[];
                     18: char   *remove[];
                     19: char   *hits[];
                     20: char   *endgame[];
                     21: char   *doubl[];
                     22: char   *stragy[];
                     23: char   *prog[];
                     24: char   *lastch[];
                     25: 
                     26: extern char    ospeed;                 /* tty output speed for termlib */
                     27: 
                     28: char *helpm[] = {
                     29:        "\nEnter a space or newline to roll, or",
                     30:        "     b   to display the board",
                     31:        "     d   to double",
                     32:        "     q   to quit\n",
                     33:        0
                     34: };
                     35: 
                     36: char *contin[] = {
                     37:        "",
                     38:        0
                     39: };
                     40: 
                     41: main (argc,argv)
                     42: int    argc;
                     43: char   **argv;
                     44: 
                     45: {
                     46:        register char   *s, *ts[];
                     47:        register int    i;
                     48: 
                     49:        signal (2,getout);
                     50:        if (gtty (0,&tty) == -1)                        /* get old tty mode */
                     51:                errexit ("teachgammon(gtty)");
                     52:        old = tty.sg_flags;
                     53: #ifdef V7
                     54:        raw = ((noech = old & ~ECHO) | CBREAK);         /* set up modes */
                     55: #else
                     56:        raw = ((noech = old & ~ECHO) | RAW);            /* set up modes */
                     57: #endif
                     58:        ospeed = old.sg_ospeed;                         /* for termlib */
                     59:        tflag = getcaps (getenv ("TERM"));
                     60: #ifdef V7
                     61:        while (*++argv != 0)
                     62: #else
                     63:        while (*++argv != -1)
                     64: #endif
                     65:                getarg (&argv);
                     66:        if (tflag)  {
                     67:                noech &= ~(CRMOD|XTABS);
                     68:                raw &= ~(CRMOD|XTABS);
                     69:                clear();
                     70:        }
                     71:        text (hello);
                     72:        text (list);
                     73:        i = text (contin);
                     74:        if (i == 0)
                     75:                i = 2;
                     76:        init();
                     77:        while (i)
                     78:                switch (i)  {
                     79:                
                     80:                case 1:
                     81:                        leave();
                     82:                
                     83:                case 2:
                     84:                        if (i = text(intro1))
                     85:                                break;
                     86:                        wrboard();
                     87:                        if (i = text(intro2))
                     88:                                break;
                     89:                
                     90:                case 3:
                     91:                        if (i = text(moves))
                     92:                                break;
                     93:                
                     94:                case 4:
                     95:                        if (i = text(remove))
                     96:                                break;
                     97:                
                     98:                case 5:
                     99:                        if (i = text(hits))
                    100:                                break;
                    101:                
                    102:                case 6:
                    103:                        if (i = text(endgame))
                    104:                                break;
                    105:                
                    106:                case 7:
                    107:                        if (i = text(doubl))
                    108:                                break;
                    109:                
                    110:                case 8:
                    111:                        if (i = text(stragy))
                    112:                                break;
                    113:                
                    114:                case 9:
                    115:                        if (i = text(prog))
                    116:                                break;
                    117:                
                    118:                case 10:
                    119:                        if (i = text(lastch))
                    120:                                break;
                    121:                }
                    122:        tutor();
                    123: }
                    124: 
                    125: leave()  {
                    126:        if (tflag)
                    127:                clear();
                    128:        else
                    129:                writec ('\n');
                    130:        fixtty(old);
                    131:        execl (EXEC,"backgammon",args,"n",0);
                    132:        writel ("Help! Backgammon program is missing\007!!\n");
                    133:        exit (-1);
                    134: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.