Return to tutor.c CVS log

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

Annotation of 42BSD/games/backgammon/tutor.c, revision 1.1

1.1     ! root        1: static char sccsid[] = "       tutor.c 4.1     82/05/11        ";
        !             2: 
        !             3: #include "back.h"
        !             4: #include "tutor.h"
        !             5: 
        !             6: extern int     maxmoves;
        !             7: extern char    *finis[];
        !             8: 
        !             9: extern struct situatn  test[];
        !            10: 
        !            11: static char    better[] = "That is a legal move, but there is a better one.\n";
        !            12: 
        !            13: tutor ()  {
        !            14:        register int    i, j;
        !            15: 
        !            16:        i = 0;
        !            17:        begscr = 18;
        !            18:        cturn = -1;
        !            19:        home = 0;
        !            20:        bar = 25;
        !            21:        inptr = &in[0];
        !            22:        inopp = &in[1];
        !            23:        offptr = &off[0];
        !            24:        offopp = &off[1];
        !            25:        Colorptr = &color[0];
        !            26:        colorptr = &color[2];
        !            27:        colen = 5;
        !            28:        wrboard();
        !            29: 
        !            30:        while (1)  {
        !            31:                if (! brdeq(test[i].brd,board))  {
        !            32:                        if (tflag && curr == 23)
        !            33:                                curmove (18,0);
        !            34:                        writel (better);
        !            35:                        nexturn();
        !            36:                        movback (mvlim);
        !            37:                        if (tflag)  {
        !            38:                                refresh();
        !            39:                                clrest ();
        !            40:                        }
        !            41:                        if ((! tflag) || curr == 19)  {
        !            42:                                proll();
        !            43:                                writec ('\t');
        !            44:                        }
        !            45:                        else
        !            46:                                curmove (curr > 19? curr-2: curr+4,25);
        !            47:                        getmove();
        !            48:                        if (cturn == 0)
        !            49:                                leave();
        !            50:                        continue;
        !            51:                }
        !            52:                if (tflag)
        !            53:                        curmove (18,0);
        !            54:                text (*test[i].com);
        !            55:                if (! tflag)
        !            56:                        writec ('\n');
        !            57:                if (i == maxmoves)
        !            58:                        break;
        !            59:                D0 = test[i].roll1;
        !            60:                D1 = test[i].roll2;
        !            61:                d0 = 0;
        !            62:                mvlim = 0;
        !            63:                for (j = 0; j < 4; j++)  {
        !            64:                        if (test[i].mp[j] == test[i].mg[j])
        !            65:                                break;
        !            66:                        p[j] = test[i].mp[j];
        !            67:                        g[j] = test[i].mg[j];
        !            68:                        mvlim++;
        !            69:                }
        !            70:                if (mvlim)
        !            71:                        for (j = 0; j < mvlim; j++)
        !            72:                                if (makmove(j))
        !            73:                                        writel ("AARGH!!!\n");
        !            74:                if (tflag)
        !            75:                        refresh();
        !            76:                nexturn();
        !            77:                D0 = test[i].new1;
        !            78:                D1 = test[i].new2;
        !            79:                d0 = 0;
        !            80:                i++;
        !            81:                mvlim = movallow();
        !            82:                if (mvlim)  {
        !            83:                        if (tflag)
        !            84:                                clrest();
        !            85:                        proll();
        !            86:                        writec('\t');
        !            87:                        getmove();
        !            88:                        if (tflag)
        !            89:                                refresh();
        !            90:                        if (cturn == 0)
        !            91:                                leave();
        !            92:                }
        !            93:        }
        !            94:        leave();
        !            95: }
        !            96: 
        !            97: clrest ()  {
        !            98:        register int    r, c, j;
        !            99: 
        !           100:        r = curr;
        !           101:        c = curc;
        !           102:        for (j = r+1; j < 24; j++)  {
        !           103:                curmove (j,0);
        !           104:                cline();
        !           105:        }
        !           106:        curmove (r,c);
        !           107: }
        !           108: 
        !           109: brdeq (b1,b2)
        !           110: register int  *b1, *b2;
        !           111: 
        !           112: {
        !           113:        register int  *e;
        !           114: 
        !           115:        e = b1+26;
        !           116:        while (b1 < e)
        !           117:                if (*b1++ != *b2++)
        !           118:                        return(0);
        !           119:        return(1);
        !           120: }

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