usr/src/games/battlestar/battlestar.c

/*
 * Copyright (c) 1983 Regents of the University of California,
 * All rights reserved.  Redistribution permitted subject to
 * the terms of the Berkeley Software License Agreement.
 */

#ifndef lint
static char sccsid[] = "@(#)battlestar.c        1.3 %G%";
#endif

/*
 * Battlestar - a stellar-tropical adventure game
 *
 * Originally written by His Lordship, Admiral David W. Horatio Riggle,
 * on the Cory PDP-11/70, University of California, Berkeley.
 */

#include "externs.h"

main(argc,argv)
int  argc;
char **argv;
{
        char mainbuf[LINELENGTH];
        char *next;

        initialize(argc < 2 || strcmp(argv[1], "-r"));
start:
        news();
        beenthere[position]++;
        if (notes[LAUNCHED])
                crash();                /* decrements fuel & crash */
        if (matchlight) {
                puts("Your match splutters out.");
                matchlight = 0;
        }
        if (!notes[CANTSEE] || testbit(inven,LAMPON) ||
            testbit(location[position].objects, LAMPON)) {
                writedes();
                printobjs();
        } else
                puts("It's too dark to see anything in here!");
        whichway(location[position]);
run:
        next = getcom(mainbuf, sizeof mainbuf, ">-: ",
                "Please type in something.");
        for (wordcount = 0; next && wordcount < 20; wordcount++)
                next = getword(next, words[wordcount], -1);
        parse();
        switch (cypher()) {
                case -1:
                        goto run;
                case 0:
                        goto start;
                default:
                        exit();
        }
}