Return to battlestar.c CVS log

Up to [CSRG BSD Unix] / 43BSD / games / battlestar

Annotation of 43BSD/games/battlestar/battlestar.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1983 Regents of the University of California,
                      3:  * All rights reserved.  Redistribution permitted subject to
                      4:  * the terms of the Berkeley Software License Agreement.
                      5:  */
                      6: 
                      7: #ifndef lint
                      8: static char sccsid[] = "@(#)battlestar.c       1.3 4/24/85";
                      9: #endif
                     10: 
                     11: /*
                     12:  * Battlestar - a stellar-tropical adventure game
                     13:  *
                     14:  * Originally written by His Lordship, Admiral David W. Horatio Riggle,
                     15:  * on the Cory PDP-11/70, University of California, Berkeley.
                     16:  */
                     17: 
                     18: #include "externs.h"
                     19: 
                     20: main(argc,argv)
                     21: int  argc;
                     22: char **argv;
                     23: {
                     24:        char mainbuf[LINELENGTH];
                     25:        char *next;
                     26: 
                     27:        initialize(argc < 2 || strcmp(argv[1], "-r"));
                     28: start:
                     29:        news();
                     30:        beenthere[position]++;
                     31:        if (notes[LAUNCHED])
                     32:                crash();                /* decrements fuel & crash */
                     33:        if (matchlight) {
                     34:                puts("Your match splutters out.");
                     35:                matchlight = 0;
                     36:        }
                     37:        if (!notes[CANTSEE] || testbit(inven,LAMPON) ||
                     38:            testbit(location[position].objects, LAMPON)) {
                     39:                writedes();
                     40:                printobjs();
                     41:        } else
                     42:                puts("It's too dark to see anything in here!");
                     43:        whichway(location[position]);
                     44: run:
                     45:        next = getcom(mainbuf, sizeof mainbuf, ">-: ",
                     46:                "Please type in something.");
                     47:        for (wordcount = 0; next && wordcount < 20; wordcount++)
                     48:                next = getword(next, words[wordcount], -1);
                     49:        parse();
                     50:        switch (cypher()) {
                     51:                case -1:
                     52:                        goto run;
                     53:                case 0:
                     54:                        goto start;
                     55:                default:
                     56:                        exit();
                     57:        }
                     58: }

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