BSD 4_3_Reno release

[unix-history] / usr / src / games / cribbage / support.c

diff --git a/usr/src/games/cribbage/support.c b/usr/src/games/cribbage/support.c
index 3369626..32ea5a1 100644 (file)
--- a/usr/src/games/cribbage/support.c
+++ b/usr/src/games/cribbage/support.c
@@ -1,7 +1,30 @@
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that: (1) source distributions retain this entire copyright
+ * notice and comment, and (2) distributions including binaries display
+ * the following acknowledgement:  ``This product includes software
+ * developed by the University of California, Berkeley and its contributors''
+ * in the documentation or other materials provided with the distribution
+ * and in all advertising materials mentioning features or use of this
+ * software. Neither the name of the University nor the names of its
+ * contributors may be used to endorse or promote products derived
+ * from this software without specific prior written permission.
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ */

 
 

-#include       <stdio.h>
+#ifndef lint
+static char sccsid[] = "@(#)support.c  5.5 (Berkeley) 6/1/90";
+#endif /* not lint */
+
+#include       <curses.h>

 #include       "deck.h"
 #include       "cribbage.h"
 #include       "deck.h"
 #include       "cribbage.h"

+#include       "cribcur.h"

 
 
 #define                NTV             10              /* number scores to test */
 
 
 #define                NTV             10              /* number scores to test */


@@ -72,81 +95,122 @@ cchose( h, n, s )
 
 
 /*
 
 
 /*

- * evaluate and score a player hand or crib
+ * plyrhand:
+ *     Evaluate and score a player hand or crib

  */
  */

-
-plyrhand( hand, s )
-
-    CARD               hand[];
-    char               *s;
+plyrhand(hand, s)
+CARD           hand[];
+char           *s;

 {
 {

-       register  int           i, j;
-       BOOLEAN                 win;
-
-       printf( "Your %s is: ", s );
-       prhand( hand, CINHAND, TRUE );
-       printf( "  [" );
-       printcard( turnover, TRUE );
-       printf( "].   How many points? " );
-       i = scorehand( hand, turnover, CINHAND, FALSE );        /* count */
-       if(  ( j = number(0, 29) )  ==  19  )  j = 0;
-       if(  i != j  )  {
-           if( i < j )  {
-               win = chkscr( &pscore, i );
-               printf( "It's really only %d points, I get %d.\n", i, 2 );
-               if( !win )  win = chkscr( &cscore, 2 );
-           }
-           else  {
-               win = chkscr( &pscore, j );
-               printf( "You should have taken %d, not %d!\n", i, j );
-           }
-           if( explain )  {
-               printf( "Explanation: %s\n", expl );
-           }
+    register int       i, j;
+    register BOOLEAN   win;
+    static char                prompt[BUFSIZ];
+
+    prhand(hand, CINHAND, Playwin, FALSE);
+    (void)sprintf(prompt, "Your %s scores ", s);
+    i = scorehand(hand, turnover, CINHAND, strcmp(s, "crib") == 0, explain);
+    if ((j = number(0, 29, prompt)) == 19)
+       j = 0;
+    if (i != j) {
+       if (i < j) {
+           win = chkscr(&pscore, i);
+           msg("It's really only %d points; I get %d", i, 2);
+           if (!win)
+               win = chkscr(&cscore, 2);

        }
        }

-       else  {
-           win = chkscr( &pscore, i );
+       else {
+           win = chkscr(&pscore, j);
+           msg("You should have taken %d, not %d!", i, j);

        }
        }

-       return(  win  );
+       if (explain)
+           msg("Explanation: %s", expl);
+       do_wait();
+    }
+    else
+       win = chkscr(&pscore, i);
+    return win;

 }
 
 }
 

+/*
+ * comphand:
+ *     Handle scoring and displaying the computers hand
+ */
+comphand(h, s)
+CARD           h[];
+char           *s;
+{
+       register int            j;

 
 

+       j = scorehand(h, turnover, CINHAND, strcmp(s, "crib") == 0, FALSE);
+       prhand(h, CINHAND, Compwin, FALSE);
+       msg("My %s scores %d", s, (j == 0 ? 19 : j));
+       return chkscr(&cscore, j);
+}

 
 /*
 
 /*

- * handle scoring and displaying the computers hand
+ * chkscr:
+ *     Add inc to scr and test for > glimit, printing on the scoring
+ *     board while we're at it.

  */
 
  */
 

-comphand( h, s )
+int    Lastscore[2] = {-1, -1};

 
 

-    CARD               h[];
-    char               *s;
+chkscr(scr, inc)
+int            *scr, inc;

 {
 {

-       register  int           j;
-
-       j = scorehand( h, turnover, CINHAND, FALSE );
-       printf( "My %s ( ", s );
-       prhand( h, CINHAND, TRUE );
-       printf( "  [" );
-       printcard( turnover, TRUE );
-       printf( "] ) scores %d.\n", (j == 0 ? 19 : j) );
-       return(  chkscr( &cscore, j )  );
+       BOOLEAN         myturn;
+
+       myturn = (scr == &cscore);
+       if (inc != 0) {
+               prpeg(Lastscore[myturn], '.', myturn);
+               Lastscore[myturn] = *scr;
+               *scr += inc;
+               prpeg(*scr, PEG, myturn);
+               refresh();
+       }
+       return (*scr >= glimit);

 }
 
 }
 

-
-

 /*
 /*

- * add inc to scr and test for > glimit
+ * prpeg:
+ *     Put out the peg character on the score board and put the
+ *     score up on the board.

  */
  */

-
-chkscr( scr, inc )
-
-    int                        *scr, inc;
+prpeg(score, peg, myturn)
+register int   score;
+char           peg;
+BOOLEAN                myturn;

 {
 {

-       return(  ( (*scr += inc) >= glimit ? TRUE : FALSE )  );
+       register int    y, x;
+
+       if (!myturn)
+               y = SCORE_Y + 2;
+       else
+               y = SCORE_Y + 5;
+
+       if (score <= 0 || score >= glimit) {
+               if (peg == '.')
+                       peg = ' ';
+               if (score == 0)
+                       x = SCORE_X + 2;
+               else {
+                       x = SCORE_X + 2;
+                       y++;
+               }
+       }
+       else {
+               x = (score - 1) % 30;
+               if (score > 90 || (score > 30 && score <= 60)) {
+                       y++;
+                       x = 29 - x;
+               }
+               x += x / 5;
+               x += SCORE_X + 3;
+       }
+       mvaddch(y, x, peg);
+       mvprintw(SCORE_Y + (myturn ? 7 : 1), SCORE_X + 10, "%3d", score);

 }
 
 }
 

-
-

 /*
  * cdiscard -- the computer figures out what is the best discard for
  * the crib and puts the best two cards at the end
 /*
  * cdiscard -- the computer figures out what is the best discard for
  * the crib and puts the best two cards at the end


@@ -178,7 +242,7 @@ cdiscard( mycrib )
                remove( chand[i], h, FULLHAND );
                remove( chand[j], h, FULLHAND - 1 );
                for( k = 0; k < nc; k++ )  {
                remove( chand[i], h, FULLHAND );
                remove( chand[j], h, FULLHAND - 1 );
                for( k = 0; k < nc; k++ )  {

-                   sums[ns] += scorehand( h, d[k], CINHAND, TRUE );
+                   sums[ns] += scorehand( h, d[k], CINHAND, TRUE, FALSE );

                    if( mycrib )  sums[ns] += adjust( cb, d[k] );
                    else          sums[ns] -= adjust( cb, d[k] );
                }
                    if( mycrib )  sums[ns] += adjust( cb, d[k] );
                    else          sums[ns] -= adjust( cb, d[k] );
                }