Return to init.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / games / mille

Annotation of 43BSDTahoe/games/mille/init.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1982 Regents of the University of California.
        !             3:  * All rights reserved.
        !             4:  *
        !             5:  * Redistribution and use in source and binary forms are permitted
        !             6:  * provided that the above copyright notice and this paragraph are
        !             7:  * duplicated in all such forms and that any documentation,
        !             8:  * advertising materials, and other materials related to such
        !             9:  * distribution and use acknowledge that the software was developed
        !            10:  * by the University of California, Berkeley.  The name of the
        !            11:  * University may not be used to endorse or promote products derived
        !            12:  * from this software without specific prior written permission.
        !            13:  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
        !            14:  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
        !            15:  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
        !            16:  */
        !            17: 
        !            18: #ifndef lint
        !            19: static char sccsid[] = "@(#)init.c     5.3 (Berkeley) 6/18/88";
        !            20: #endif /* not lint */
        !            21: 
        !            22: # include      "mille.h"
        !            23: 
        !            24: /*
        !            25:  * @(#)init.c  1.1 (Berkeley) 4/1/82
        !            26:  */
        !            27: 
        !            28: init() {
        !            29: 
        !            30:        reg PLAY        *pp;
        !            31:        reg int         i, j;
        !            32:        reg CARD        card;
        !            33: 
        !            34:        bzero(Numseen, sizeof Numseen);
        !            35:        Numgos = 0;
        !            36: 
        !            37:        for (i = 0; i < 2; i++) {
        !            38:                pp = &Player[i];
        !            39:                pp->hand[0] = C_INIT;
        !            40:                for (j = 0; j < NUM_SAFE; j++) {
        !            41:                        pp->safety[j] = S_UNKNOWN;
        !            42:                        pp->coups[j] = FALSE;
        !            43:                }
        !            44:                for (j = 1; j < HAND_SZ; j++) {
        !            45:                        pp->hand[j] = *--Topcard;
        !            46:                        if (i == COMP) {
        !            47:                                account(card = *Topcard);
        !            48:                                if (issafety(card))
        !            49:                                        pp->safety[card - S_CONV] = S_IN_HAND;
        !            50:                        }
        !            51:                }
        !            52:                pp->mileage = 0;
        !            53:                pp->hand_tot = 0;
        !            54:                pp->safescore = 0;
        !            55:                pp->coupscore = 0;
        !            56:                pp->can_go = FALSE;
        !            57:                pp->speed = C_INIT;
        !            58:                pp->battle = C_INIT;
        !            59:                pp->new_speed = FALSE;
        !            60:                pp->new_battle = FALSE;
        !            61:                for (j = 0; j < NUM_MILES; j++)
        !            62:                        pp->nummiles[j] = 0;
        !            63:        }
        !            64:        if (Order)
        !            65:                sort(Player[PLAYER].hand);
        !            66:        Discard = C_INIT;
        !            67:        Finished = FALSE;
        !            68:        End = 700;
        !            69: }
        !            70: 
        !            71: shuffle() {
        !            72: 
        !            73:        reg int         i, r;
        !            74:        reg CARD        temp;
        !            75: 
        !            76:        for (i = 0; i < DECK_SZ; i++) {
        !            77:                r = roll(1, DECK_SZ) - 1;
        !            78:                if (r < 0 || r > DECK_SZ - 1) {
        !            79:                        fprintf(stderr, "shuffle: card no. error: %d\n", r);
        !            80:                        die();
        !            81:                }
        !            82:                temp = Deck[r];
        !            83:                Deck[r] = Deck[i];
        !            84:                Deck[i] = temp;
        !            85:        }
        !            86:        Topcard = &Deck[DECK_SZ];
        !            87: }
        !            88: 
        !            89: newboard() {
        !            90: 
        !            91:        register int    i;
        !            92:        register PLAY   *pp;
        !            93:        static int      first = TRUE;
        !            94: 
        !            95:        if (first) {
        !            96:                werase(Board);
        !            97:                werase(Score);
        !            98:                mvaddstr(5, 0, "--HAND--");
        !            99:                mvaddch(6, 0, 'P');
        !           100:                mvaddch(7, 0, '1');
        !           101:                mvaddch(8, 0, '2');
        !           102:                mvaddch(9, 0, '3');
        !           103:                mvaddch(10, 0, '4');
        !           104:                mvaddch(11, 0, '5');
        !           105:                mvaddch(12, 0, '6');
        !           106:                mvaddstr(13, 0, "--BATTLE--");
        !           107:                mvaddstr(15, 0, "--SPEED--");
        !           108:                mvaddstr(5, 20, "--DECK--");
        !           109:                mvaddstr(7, 20, "--DISCARD--");
        !           110:                mvaddstr(13, 20, "--BATTLE--");
        !           111:                mvaddstr(15, 20, "--SPEED--");
        !           112:                mvwaddstr(Miles, 0, 0, "--MILEAGE--");
        !           113:                mvwaddstr(Miles, 0, 41, "--MILEAGE--");
        !           114:                Sh_discard = -1;
        !           115:                for (pp = Player; pp <= &Player[COMP]; pp++) {
        !           116:                        for (i = 0; i < HAND_SZ; i++)
        !           117:                                pp->sh_hand[i] = -1;
        !           118:                        pp->sh_battle = -1;
        !           119:                        pp->sh_speed = -1;
        !           120:                        pp->sh_mileage = -1;
        !           121:                }
        !           122:                first = FALSE;
        !           123:        }
        !           124:        else {
        !           125:                for (i = 0; i < 5; i++) {
        !           126:                        move(i, 0);
        !           127:                        clrtoeol();
        !           128:                }
        !           129:                wmove(Miles, 1, 0);
        !           130:                wclrtobot(Miles);
        !           131:                wmove(Board, MOVE_Y + 1, MOVE_X);
        !           132:                wclrtoeol(Board);
        !           133:                wmove(Board, MOVE_Y + 2, MOVE_X);
        !           134:                wclrtoeol(Board);
        !           135:        }
        !           136:        Sh_discard = -1;
        !           137:        for (pp = Player; pp <= &Player[COMP]; pp++) {
        !           138:                for (i = 0; i < NUM_SAFE; i++)
        !           139:                        pp->sh_safety[i] = FALSE;
        !           140:                for (i = 0; i < NUM_MILES; i++)
        !           141:                        pp->sh_nummiles[i] = 0;
        !           142:                pp->sh_safescore = -1;
        !           143:        }
        !           144:        newscore();
        !           145: }
        !           146: 
        !           147: newscore() {
        !           148: 
        !           149:        reg int         i, new;
        !           150:        register PLAY   *pp;
        !           151:        static int      was_full = -1;
        !           152:        static int      last_win = -1;
        !           153: 
        !           154:        if (was_full < 0)
        !           155:                was_full = (Window != W_FULL);
        !           156:        stdscr = Score;
        !           157:        move(0, 22);
        !           158:        new = FALSE;
        !           159:        if (inch() != 'Y') {
        !           160:                erase();
        !           161:                mvaddstr(0, 22,  "You   Comp   Value");
        !           162:                mvaddstr(1, 2, "Milestones Played");
        !           163:                mvaddstr(2, 8, "Each Safety");
        !           164:                mvaddstr(3, 5, "All 4 Safeties");
        !           165:                mvaddstr(4, 3, "Each Coup Fourre");
        !           166:                mvaddstr(2, 37, "100");
        !           167:                mvaddstr(3, 37, "300");
        !           168:                mvaddstr(4, 37, "300");
        !           169:                new = TRUE;
        !           170:        }
        !           171:        else if (((Window == W_FULL || Finished) ^ was_full) ||
        !           172:                 pp->was_finished != Finished) {
        !           173:                move(5, 1);
        !           174:                clrtobot();
        !           175:                new = TRUE;
        !           176:        }
        !           177:        else if (Window != last_win)
        !           178:                new = TRUE;
        !           179:        if (new) {
        !           180:                for (i = 0; i < SCORE_Y; i++)
        !           181:                        mvaddch(i, 0, '|');
        !           182:                move(SCORE_Y - 1, 1);
        !           183:                while (addch('_') != ERR)
        !           184:                        continue;
        !           185:                for (pp = Player; pp <= &Player[COMP]; pp++) {
        !           186:                        pp->sh_hand_tot = -1;
        !           187:                        pp->sh_total = -1;
        !           188:                        pp->sh_games = -1;
        !           189:                        pp->sh_safescore = -1;
        !           190:                }
        !           191:        }
        !           192:        Player[PLAYER].was_finished = !Finished;
        !           193:        Player[COMP].was_finished = !Finished;
        !           194:        if (Window == W_FULL || Finished) {
        !           195:                if (!was_full || new) {
        !           196:                        mvaddstr(5, 5, "Trip Completed");
        !           197:                        mvaddstr(6, 10, "Safe Trip");
        !           198:                        mvaddstr(7, 5, "Delayed Action");
        !           199:                        mvaddstr(8, 10, "Extension");
        !           200:                        mvaddstr(9, 11, "Shut-Out");
        !           201:                        mvaddstr(10, 21, "----   ----   -----");
        !           202:                        mvaddstr(11, 9, "Hand Total");
        !           203:                        mvaddstr(12, 20, "-----  -----");
        !           204:                        mvaddstr(13, 6, "Overall Total");
        !           205:                        mvaddstr(14, 15, "Games");
        !           206:                        mvaddstr(5, 37, "400");
        !           207:                        mvaddstr(6, 37, "300");
        !           208:                        mvaddstr(7, 37, "300");
        !           209:                        mvaddstr(8, 37, "200");
        !           210:                        mvaddstr(9, 37, "500");
        !           211:                }
        !           212:        }
        !           213:        else
        !           214:                if (was_full || new) {
        !           215:                        mvaddstr(5, 21, "----   ----   -----");
        !           216:                        mvaddstr(6, 9, "Hand Total");
        !           217:                        mvaddstr(7, 20, "-----  -----");
        !           218:                        mvaddstr(8, 6, "Overall Total");
        !           219:                        mvaddstr(9, 15, "Games");
        !           220:                        mvaddstr(11, 2, "p: pick");
        !           221:                        mvaddstr(12, 2, "u: use #");
        !           222:                        mvaddstr(13, 2, "d: discard #");
        !           223:                        mvaddstr(14, 2, "w: toggle window");
        !           224:                        mvaddstr(11, 21, "q: quit");
        !           225:                        if (!Order)
        !           226:                                mvaddstr(12, 21, "o: order hand");
        !           227:                        else
        !           228:                                mvaddstr(12, 21, "o: stop ordering");
        !           229:                        mvaddstr(13, 21, "s: save");
        !           230:                        mvaddstr(14, 21, "r: reprint");
        !           231:                }
        !           232:        stdscr = Board;
        !           233:        was_full = (Window == W_FULL || Finished);
        !           234:        last_win = Window;
        !           235: }

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