Return to play.c CVS log

Up to [Research Unix] / researchv10no / games / trek

Annotation of researchv10no/games/trek/play.c, revision 1.1.1.1

1.1       root        1: # include      "trek.h"
                      2: 
                      3: /**
                      4:  **    instruction read and main play loop
                      5:  **/
                      6: 
                      7: CVNTAB Comtab[]
                      8: {
                      9:        "!",                    "shell",
                     10:        "m",                    "ove",
                     11:        "ram",                  "",
                     12:        "q",                    "uery",
                     13:        "st",                   "atus",
                     14:        "sh",                   "ield",
                     15:        "s",                    "rscan",
                     16:        "l",                    "rscan",
                     17:        "da",                   "mages",
                     18:        "p",                    "hasers",
                     19:        "quit",                 "",
                     20:        "t",                    "orpedo",
                     21:        "cl",                   "oak",
                     22:        "c",                    "omputer",
                     23:        "w",                    "arp",
                     24:        "r",                    "est",
                     25:        "do",                   "ck",
                     26:        "i",                    "mpulse",
                     27:        "u",                    "ndock",
                     28:        "help",                 "",
                     29:        "v",                    "isual",
                     30:        "destruct",             "",
                     31:        "abandon",              "",
                     32:        "dump",                 "",
                     33:        "events",               "",
                     34:        0
                     35: };
                     36: 
                     37: extern int shell();
                     38: extern int move();
                     39: extern int ram();
                     40: extern int info();
                     41: extern int status();
                     42: extern int shield();
                     43: extern int srscan();
                     44: extern int lrscan();
                     45: extern int dcrept();
                     46: extern int phaser();
                     47: extern int reset();
                     48: extern int torped();
                     49: extern int cloak();
                     50: extern int computer();
                     51: extern int setwarp();
                     52: extern int rest();
                     53: extern int dock();
                     54: extern int impulse();
                     55: extern int undock();
                     56: extern int help();
                     57: extern int visual();
                     58: extern int destruct();
                     59: extern int abandon();
                     60: extern int dumpgame();
                     61: extern int eventpr();
                     62: 
                     63: int (*comfn[])()
                     64: {
                     65:        &shell,
                     66:        &move,
                     67:        &ram,
                     68:        &info,
                     69:        &status,
                     70:        &shield,
                     71:        &srscan,
                     72:        &lrscan,
                     73:        &dcrept,
                     74:        &phaser,
                     75:        &reset,
                     76:        &torped,
                     77:        &cloak,
                     78:        &computer,
                     79:        &setwarp,
                     80:        &rest,
                     81:        &dock,
                     82:        &impulse,
                     83:        &undock,
                     84:        &help,
                     85:        &visual,
                     86:        &destruct,
                     87:        &abandon,
                     88:        &dumpgame,
                     89:        &eventpr
                     90: };
                     91: 
                     92: reset()
                     93: {
                     94:        longjmp(errjmp);
                     95: }
                     96: 
                     97: play()
                     98: {
                     99:        register int    r;
                    100: 
                    101:        while (1)
                    102:        {
                    103:                Move.free = 1;
                    104:                Move.delta = 0.0;
                    105:                Move.shldchg = 0;
                    106:                Move.newquad = 0;
                    107:                Move.resting = 0;
                    108:                if(chkbad() < 0)
                    109:                        return(0);
                    110:                if((r=getcodpar("Command", Comtab))<0)
                    111:                        continue;
                    112:                (*comfn[r])();
                    113:                if(chkbad())
                    114:                        continue;
                    115:                events();
                    116:                attack(0);
                    117:                checkcond();
                    118:        }
                    119: }
                    120: 
                    121: char   eof;
                    122: chkbad()
                    123: {
                    124:        if(eof)
                    125:                return(-1);
                    126:        if(mkfault) {
                    127:                flushin();
                    128:                mkfault=0;
                    129:                printf("@\n");
                    130:                return(1);
                    131:        }
                    132:        return(0);
                    133: }

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