Written by Ken Arnold; add Berkeley specific copyright

[unix-history] / usr / src / games / robots / init_field.c

/*
* Copyright (c) 1980 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that this notice is preserved and that due credit is given
* to the University of California at Berkeley. The name of the University
* may not be used to endorse or promote products derived from this
* software without specific prior written permission. This software
* is provided ``as is'' without express or implied warranty.
*/

#ifndef lint
static char sccsid[] = "@(#)init_field.c        5.2 (Berkeley) %G%";
#endif /* not lint */

# include       "robots.h"

/*
* init_field:
*      Lay down the initial pattern whih is constant across all levels,
*      and initialize all the global variables.
*/
init_field()
{
       register int    i;
       register WINDOW *wp;
       register int    j;
       static bool     first = TRUE;
       static char     *desc[] = {
                               "Directions:",
                               "",
                               "y k u",
                               " \\|/",
                               "h- -l",
                               " /|\\",
                               "b j n",
                               "",
                               "Commands:",
                               "",
                               "w:  wait for end",
                               "t:  teleport",
                               "q:  quit",
                               "^L: redraw screen",
                               "",
                               "Legend:",
                               "",
                               "+:  robot",
                               "*:  junk heap",
                               "@:  you",
                               "",
                               "Score: 0",
                               NULL
       };

       Dead = FALSE;
       Waiting = FALSE;
       flushok(stdscr, TRUE);
       Score = 0;

       erase();
       move(0, 0);
       addch('+');
       for (i = 1; i < Y_FIELDSIZE; i++) {
               move(i, 0);
               addch('|');
       }
       move(Y_FIELDSIZE, 0);
       addch('+');
       for (i = 1; i < X_FIELDSIZE; i++)
               addch('-');
       addch('+');
       if (first)
               refresh();
       move(0, 1);
       for (i = 1; i < X_FIELDSIZE; i++)
               addch('-');
       addch('+');
       for (i = 1; i < Y_FIELDSIZE; i++) {
               move(i, X_FIELDSIZE);
               addch('|');
       }
       if (first)
               refresh();
       for (i = 0; desc[i] != NULL; i++) {
               move(i, X_FIELDSIZE + 2);
               addstr(desc[i]);
       }
       if (first)
               refresh();
       first = FALSE;
#ifdef  FANCY
       if (Pattern_roll)
               Next_move = &Move_list[-1];
#endif
}