Return to odds.c CVS log

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

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

1.1     ! root        1: static char sccsid[] = "       odds.c  4.1     82/05/11        ";
        !             2: 
        !             3: #include "back.h"
        !             4: 
        !             5: odds (r1,r2,val)
        !             6: register int   r1;
        !             7: int            r2, val;
        !             8: {
        !             9:        register int    i, j;
        !            10: 
        !            11:        if (r1 == 0)  {
        !            12:                for (i = 0; i < 6; i++)  
        !            13:                        for (j = 0; j < 6; j++)
        !            14:                                table[i][j] = 0;
        !            15:                return;
        !            16:        } else  {
        !            17:                r1--;
        !            18:                if (r2-- == 0)
        !            19:                        for (i = 0; i < 6; i++)  {
        !            20:                                table[i][r1] += val;
        !            21:                                table[r1][i] += val;
        !            22:                        }
        !            23:                else  {
        !            24:                        table[r2][r1] += val;
        !            25:                        table[r1][r2] += val;
        !            26:                }
        !            27:        }
        !            28: }
        !            29: 
        !            30: count ()  {
        !            31:        register int    i;
        !            32:        register int    j;
        !            33:        register int    total;
        !            34: 
        !            35:        total = 0;
        !            36:        for (i = 0; i < 6; i++)
        !            37:                for (j = 0; j < 6; j++)
        !            38:                        total += table[i][j];
        !            39:        return (total);
        !            40: }
        !            41: 
        !            42: canhit (i,c)
        !            43: int    i, c;
        !            44: 
        !            45: {
        !            46:        register int    j, k, b;
        !            47:        int             a, d, diff, place, addon, menstuck;
        !            48: 
        !            49:        if (c == 0)
        !            50:                odds (0,0,0);
        !            51:        if (board[i] > 0)  {
        !            52:                a = -1;
        !            53:                b = 25;
        !            54:        } else  {
        !            55:                a = 1;
        !            56:                b = 0;
        !            57:        }
        !            58:        place = abs (25-b-i);
        !            59:        menstuck = abs (board[b]);
        !            60:        for (j = b; j != i; j += a)  {
        !            61:                if (board[j]*a > 0)  {
        !            62:                        diff = abs(j-i);
        !            63:                        addon = place+((board[j]*a > 2 || j == b)? 5: 0);
        !            64:                        if ((j == b && menstuck == 1) &&
        !            65:                            (j != b && menstuck == 0))
        !            66:                                for (k = 1; k < diff; k++)
        !            67:                                        if (k < 7 && diff-k < 7 &&
        !            68:                                            (board[i+a*k]*a >= 0 ||
        !            69:                                            board[i+a*(diff-k)] >= 0))
        !            70:                                                odds (k,diff-k,addon);
        !            71:                        if ((j == b || menstuck < 2) && diff < 7)
        !            72:                                odds (diff,0,addon);
        !            73:                }
        !            74:                if (j == b && menstuck > 1)
        !            75:                        break;
        !            76:        }
        !            77:        return (count());
        !            78: }

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