![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to util.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / games / pacman|
Return to util.c CVS log | Up to [Research Unix] / researchv10no / games / pacman |
1.1 ! root 1: #include <stdio.h> ! 2: #include <signal.h> ! 3: #ifdef BELL3.0 ! 4: #include <fcntl.h> ! 5: #include <termio.h> ! 6: #else ! 7: #include <sgtty.h> ! 8: #endif ! 9: #include <pwd.h> ! 10: #include "pacdefs.h" ! 11: ! 12: #ifndef BELL3.0 ! 13: #define O_RDWR 2 ! 14: #define O_CREAT 0 ! 15: #define O_RDONLY 0 ! 16: #define O_NDELAY 0 ! 17: #endif ! 18: ! 19: extern char ! 20: *BC, ! 21: *UP; ! 22: ! 23: extern int ! 24: putch(); ! 25: ! 26: extern char ! 27: *tgoto(), ! 28: *mktemp(); ! 29: ! 30: extern int ! 31: delay, ! 32: errno, ! 33: goldcnt; ! 34: ! 35: extern long ! 36: time(); ! 37: ! 38: extern struct pac ! 39: *pacptr; ! 40: ! 41: extern struct pac ! 42: monst[]; ! 43: ! 44: #ifndef MSG ! 45: int comfile; ! 46: #else ! 47: struct mstruct ! 48: { ! 49: int frompid; ! 50: int mtype; ! 51: }; ! 52: ! 53: #endif ! 54: ! 55: #ifndef NODELAY ! 56: ! 57: #ifndef MSG ! 58: char *fnam; ! 59: #endif ! 60: ! 61: #endif ! 62: ! 63: /* ! 64: * initbrd is used to re-initialize the display ! 65: * array once a new game is started. ! 66: */ ! 67: char initbrd[BRDY][BRDX] = ! 68: { ! 69: "OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO", ! 70: "O + + + * + + + + OOO + + + + * + + + O", ! 71: "O X OOO + OOOOO + OOO + OOOOO + OOO X O", ! 72: "O * + + * + * + * + + * + * + * + + * O", ! 73: "O + OOO + O + OOOOOOOOOOO + O + OOO + O", ! 74: "O + + + * O + + + OOO + + + O * + + + O", ! 75: "OOOOOOO + OOOOO + OOO + OOOOO + OOOOOOO", ! 76: " O + O + + * + + * + + O + O ", ! 77: " O + O + OOO - - OOO + O + O ", ! 78: "OOOOOOO + O + O O + O + OOOOOOO", ! 79: " * + * O O * + * ", ! 80: "OOOOOOO + O + O O + O + OOOOOOO", ! 81: " O + O + OOOOOOOOOOO + O + O ", ! 82: " O + O * + + + + + + * O + O ", ! 83: "OOOOOOO + O + OOOOOOOOOOO + O + OOOOOOO", ! 84: "O + + + * + * + + OOO + + * + * + + + O", ! 85: "O X OOO + OOOOO + OOO + OOOOO + OOO X O", ! 86: "O + + O * + * + * + + * + * + * O + + O", ! 87: "OOO + O + O + OOOOOOOOOOO + O + O + OOO", ! 88: "O + * + + O + + + OOO + + + O + + * + O", ! 89: "O + OOOOOOOOOOO + OOO + OOOOOOOOOOO + O", ! 90: "O + + + + + + + * + + * + + + + + + + O", ! 91: "OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO", ! 92: }; ! 93: ! 94: /* ! 95: * brd is kept for historical reasons. ! 96: * It should only be used in the routine "which" ! 97: * to determine the next move for a monster or ! 98: * in the routine "monster" to determine if it ! 99: * was a valid move. Admittedly this is redundant ! 100: * and could be replaced by initbrd, but it is kept ! 101: * so that someday additional intelligence or ! 102: * optimization could be added to the choice of ! 103: * the monster's next move. Hence, note the symbol ! 104: * CHOICE at most points that a move decision ! 105: * logically HAS to be made. ! 106: */ ! 107: char brd[BRDY][BRDX] = ! 108: { ! 109: "OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO", ! 110: "O + + + * + + + + OOO + + + + * + + + O", ! 111: "O X OOO + OOOOO + OOO + OOOOO + OOO X O", ! 112: "O * + + * + * + * + + * + * + * + + * O", ! 113: "O + OOO + O + OOOOOOOOOOO + O + OOO + O", ! 114: "O + + + * O + + + OOO + + + O * + + + O", ! 115: "OOOOOOO + OOOOO + OOO + OOOOO + OOOOOOO", ! 116: " O + O + + * + + * + + O + O ", ! 117: " O + O + OOO - - OOO + O + O ", ! 118: "OOOOOOO + O + O O + O + OOOOOOO", ! 119: " * + * O O * + * ", ! 120: "OOOOOOO + O + O O + O + OOOOOOO", ! 121: " O + O + OOOOOOOOOOO + O + O ", ! 122: " O + O * + + + + + + * O + O ", ! 123: "OOOOOOO + O + OOOOOOOOOOO + O + OOOOOOO", ! 124: "O + + + * + * + + OOO + + * + * + + + O", ! 125: "O X OOO + OOOOO + OOO + OOOOO + OOO X O", ! 126: "O + + O * + * + * + + * + * + * O + + O", ! 127: "OOO + O + O + OOOOOOOOOOO + O + O + OOO", ! 128: "O + * + + O + + + OOO + + + O + + * + O", ! 129: "O + OOOOOOOOOOO + OOO + OOOOOOOOOOO + O", ! 130: "O + + + + + + + * + + * + + + + + + + O", ! 131: "OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO", ! 132: }; ! 133: ! 134: /* ! 135: * display reflects the screen on the player's ! 136: * terminal at any point in time. ! 137: */ ! 138: char display[BRDY][BRDX] = ! 139: { ! 140: "OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO", ! 141: "O + + + + + + + + OOO + + + + + + + + O", ! 142: "O X OOO + OOOOO + OOO + OOOOO + OOO X O", ! 143: "O + + + + + + + + + + + + + + + + + + O", ! 144: "O + OOO + O + OOOOOOOOOOO + O + OOO + O", ! 145: "O + + + + O + + + OOO + + + O + + + + O", ! 146: "OOOOOOO + OOOOO + OOO + OOOOO + OOOOOOO", ! 147: " O + O + + + + + + + + O + O ", ! 148: " O + O + OOO - - OOO + O + O ", ! 149: "OOOOOOO + O + O O + O + OOOOOOO", ! 150: " + + + O O + + + ", ! 151: "OOOOOOO + O + O O + O + OOOOOOO", ! 152: " O + O + OOOOOOOOOOO + O + O ", ! 153: " O + O + + + + + + + + O + O ", ! 154: "OOOOOOO + O + OOOOOOOOOOO + O + OOOOOOO", ! 155: "O + + + + + + + + OOO + + + + + + + + O", ! 156: "O X OOO + OOOOO + OOO + OOOOO + OOO X O", ! 157: "O + + O + + + + + + + + + + + + O + + O", ! 158: "OOO + O + O + OOOOOOOOOOO + O + O + OOO", ! 159: "O + + + + O + + + OOO + + + O + + + + O", ! 160: "O + OOOOOOOOOOO + OOO + OOOOOOOOOOO + O", ! 161: "O + + + + + + + + + + + + + + + + + + O", ! 162: "OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO", ! 163: }; ! 164: ! 165: /* terminal type from environment and /etc/termcap ala ex & vi */ ! 166: char *vs_cl = "", /* clear screen sequence */ ! 167: *vs_cm = "", /* cursor positioning sequence */ ! 168: *vs_vb = ""; ! 169: ! 170: char combuf[BUFSIZ], ! 171: message[81], /* temporary message buffer */ ! 172: inbuf[2]; ! 173: ! 174: int ppid, ! 175: cpid, ! 176: game, ! 177: killcnt = 0, ! 178: vs_rows, ! 179: vs_cols; ! 180: ! 181: unsigned ! 182: pscore; ! 183: ! 184: long timein; ! 185: ! 186: #ifdef BELL3.0 ! 187: struct termio ! 188: savetty, ! 189: newtty; ! 190: #else ! 191: struct sgttyb ! 192: savetty, newtty; ! 193: #endif ! 194: ! 195: struct uscore ! 196: { ! 197: unsigned score; /* same type as pscore */ ! 198: int uid; /* uid of player */ ! 199: }; ! 200: ! 201: struct scorebrd ! 202: { ! 203: struct uscore entry[MSSAVE]; ! 204: } scoresave[MGTYPE] = ! 205: { ! 206: 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, ! 207: 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, ! 208: 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, ! 209: 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 ! 210: }; ! 211: ! 212: update() ! 213: { ! 214: char str[10]; ! 215: ! 216: (void) sprintf(str, "%6d", pscore); ! 217: SPLOT(0, 52, str); ! 218: (void) sprintf(str, "%6d", goldcnt); ! 219: SPLOT(21, 57, str); ! 220: } ! 221: ! 222: reinit() ! 223: { ! 224: register int locx, locy; ! 225: register char tmp; ! 226: ! 227: for (locy = 0; locy < BRDY; locy++) ! 228: { ! 229: for (locx = 0; locx < BRDX; locx++) ! 230: { ! 231: tmp = initbrd[locy][locx]; ! 232: brd[locy][locx] = tmp; ! 233: if ((display[locy][locx] = tmp) == CHOICE) ! 234: { ! 235: display[locy][locx] = GOLD; ! 236: }; ! 237: }; ! 238: }; ! 239: goldcnt = GOLDCNT; ! 240: delay -= (delay / 10); /* hot it up */ ! 241: } ! 242: ! 243: errgen(string) ! 244: char *string; ! 245: { ! 246: SPLOT(23,45,string); ! 247: } ! 248: ! 249: dokill(mnum) ! 250: int mnum; ! 251: { ! 252: register struct pac *mptr; ! 253: ! 254: PLOT(0, 0, BEEP); ! 255: if (pacptr->danger == TRUE) ! 256: { ! 257: if (++killcnt == MAXMONSTER) ! 258: { ! 259: if (display[TRYPOS][TRXPOS] == GOLD) ! 260: { ! 261: goldcnt--; ! 262: }; ! 263: display[TRYPOS][TRXPOS] = TREASURE; ! 264: PLOT(TRYPOS, TRXPOS, TREASURE); ! 265: killcnt = 0; ! 266: }; ! 267: SPLOT(5, 45, "MONSTERS KILLED: "); ! 268: (void) sprintf(message, "%1d", killcnt); ! 269: SPLOT(5, 62, message); ! 270: mptr = (&monst[mnum]); ! 271: mptr->ypos = MSTARTY; ! 272: mptr->xpos = MSTARTX + (2 * mnum); ! 273: mptr->stat = START; ! 274: PLOT(mptr->ypos, mptr->xpos, MONSTER); ! 275: pscore += KILLSCORE; ! 276: return(GOTONE); ! 277: }; ! 278: return(TURKEY); ! 279: } ! 280: ! 281: /* ! 282: /* clr -- issues an escape sequence to clear the display ! 283: */ ! 284: ! 285: clr() ! 286: { ! 287: (void) fprintf(stdout, "%s", vs_cl); ! 288: fflush(stdout); ! 289: nap(2); ! 290: } ! 291: ! 292: /* ! 293: * display initial instructions ! 294: */ ! 295: ! 296: instruct() ! 297: { ! 298: clr(); ! 299: POS(0, 0); ! 300: (void) fprintf(stdout, "Attention: you are in a dungeon, being chased by monsters!\r\n\n"); ! 301: (void) fprintf(stdout, "There are gold coins scattered uniformly in the dungeon, marked by \"+\".\r\n"); ! 302: (void) fprintf(stdout, "One magic potion is available at each spot marked \"X\". Each potion will\r\n"); ! 303: (void) fprintf(stdout, "enable you to kill monsters by touch for a limited duration. It will also\r\n"); ! 304: (void) fprintf(stdout, "scare them away. When you kill a monster it is regenerated, but this takes\r\n"); ! 305: (void) fprintf(stdout, "time. You can also regenerate yourself %d times. Killing all the monsters\r\n", MAXPAC); ! 306: (void) fprintf(stdout, "results in further treasure appearing magically somewhere in the dungeon,\r\n"); ! 307: (void) fprintf(stdout, "marked by \"$\". There is a magic tunnel connecting the center left and\r\n"); ! 308: (void) fprintf(stdout, "center right parts of the dungeon. The monsters know about it!\r\n\n"); ! 309: (void) fprintf(stdout, " Type: h to move left\r\n"); ! 310: (void) fprintf(stdout, " l to move right\r\n"); ! 311: (void) fprintf(stdout, " k or w to move up\r\n"); ! 312: (void) fprintf(stdout, " j or x to move down\r\n"); ! 313: (void) fprintf(stdout, " <space> to halt \r\n"); ! 314: (void) fprintf(stdout, " q to quit\r\n\n"); ! 315: (void) fprintf(stdout, " Type: 1 normal game\r\n"); ! 316: (void) fprintf(stdout, " 2 blinking monsters\r\n"); ! 317: (void) fprintf(stdout, " 3 intelligent monsters\r\n"); ! 318: (void) fprintf(stdout, " 4 blinking intelligent monsters\r\n"); ! 319: } ! 320: ! 321: /* ! 322: * over -- game over processing ! 323: */ ! 324: ! 325: over() ! 326: { ! 327: register int i; ! 328: register int line; ! 329: int scorefile = 0; ! 330: struct passwd *getpwuid(), *p; ! 331: ! 332: fflush(stdout); ! 333: sleep(5); /* for slow readers */ ! 334: poll(0); /* flush and discard input from player */ ! 335: clr(); ! 336: /* high score to date processing */ ! 337: if (game != 0) ! 338: { ! 339: line = 7; ! 340: POS(line++, 20); ! 341: (void) fprintf(stdout, " ___________________________ "); ! 342: POS(line++, 20); ! 343: (void) fprintf(stdout, "| |"); ! 344: POS(line++, 20); ! 345: (void) fprintf(stdout, "| G A M E O V E R |"); ! 346: POS(line++, 20); ! 347: (void) fprintf(stdout, "| |"); ! 348: POS(line++, 20); ! 349: (void) fprintf(stdout, "| Game type: %1d |",game); ! 350: if ((scorefile = open(MAXSCORE, O_RDWR | O_CREAT, 0666)) != -1) ! 351: { ! 352: read(scorefile, (char *)scoresave, sizeof(scoresave)); ! 353: for (i = MSSAVE - 1; i >= 0; i--) { ! 354: if (scoresave[game - 1].entry[i].score < pscore) ! 355: { ! 356: if (i < MSSAVE - 1) ! 357: { ! 358: scoresave[game - 1].entry[i + 1].score = ! 359: scoresave[game - 1].entry[i].score; ! 360: scoresave[game - 1].entry[i + 1].uid = ! 361: scoresave[game - 1].entry[i].uid; ! 362: }; ! 363: scoresave[game - 1].entry[i].score = pscore; ! 364: scoresave[game - 1].entry[i].uid = getuid(); ! 365: }; ! 366: }; ! 367: lseek(scorefile, 0l, 0); ! 368: write(scorefile, (char *)scoresave, sizeof(scoresave)); ! 369: close(scorefile); ! 370: POS(line++, 20); ! 371: (void) fprintf(stdout, "| High Scores to date: |"); ! 372: for (i = 0; i < MSSAVE; i++) ! 373: { ! 374: setpwent(); ! 375: p = getpwuid(scoresave[game - 1].entry[i].uid); ! 376: POS(line++, 20); ! 377: (void) fprintf(stdout, "| Player : %-8s %5u |", p->pw_name, ! 378: scoresave[game - 1].entry[i].score); ! 379: }; ! 380: } ! 381: else ! 382: { ! 383: POS(line++, 20); ! 384: (void) fprintf(stdout, "| |"); ! 385: POS(line++, 20); ! 386: (void) fprintf(stdout, "| Please create a 'paclog' |"); ! 387: POS(line++, 20); ! 388: (void) fprintf(stdout, "| file. See 'MAXSCORE' in |"); ! 389: POS(line++, 20); ! 390: (void) fprintf(stdout, "| 'pacdefs.h'. |"); ! 391: }; ! 392: POS(line++, 20); ! 393: (void) fprintf(stdout, "| |"); ! 394: POS(line++, 20); ! 395: (void) fprintf(stdout, "| Your score: %-5u |", pscore); ! 396: POS(line, 20); ! 397: (void) fprintf(stdout, "|___________________________|"); ! 398: }; ! 399: leave(); ! 400: } ! 401: ! 402: /* ! 403: * leave -- flush buffers,kill the Child, reset tty, and delete tempfile ! 404: */ ! 405: ! 406: leave() ! 407: { ! 408: POS(23, 0); ! 409: (void) fflush(stdout); ! 410: sleep(1); ! 411: ! 412: #ifndef NODELAY ! 413: kill(cpid, SIGKILL); ! 414: #endif ! 415: ! 416: #ifdef BELL3.0 ! 417: ioctl(0, TCSETAW, &savetty); ! 418: #else ! 419: ioctl(0, TIOCSETP, &savetty); ! 420: #endif ! 421: ! 422: #ifndef NODELAY ! 423: ! 424: #ifndef MSG ! 425: close(comfile); ! 426: unlink(fnam); ! 427: #endif ! 428: ! 429: #endif ! 430: exit(0); ! 431: } ! 432: ! 433: /* ! 434: * init -- does global initialization and spawns a child process to read ! 435: * the input terminal. ! 436: */ ! 437: ! 438: init() ! 439: { ! 440: register int tries = 0; ! 441: static int lastchar = DELETE; ! 442: extern short ospeed; /* baud rate for crt (for tputs()) */ ! 443: ! 444: errno = 0; ! 445: (void) time(&timein); /* get start time */ ! 446: srand((unsigned)timein); /* start rand randomly */ ! 447: /* ! 448: * verify CRT and get proper cursor control sequence. ! 449: */ ! 450: ! 451: #ifdef NODELAY ! 452: ! 453: #ifndef BELL3.0 ! 454: close(0); ! 455: if (open("/dev/tty", O_RDONLY | O_NDELAY) != 0) ! 456: { ! 457: perror("Unable to open /dev/tty"); ! 458: exit(1); ! 459: }; ! 460: #endif ! 461: ! 462: #endif ! 463: vsinit(); ! 464: /* ! 465: * setup raw mode, no echo ! 466: */ ! 467: #ifdef BELL3.0 ! 468: ioctl(0, TCGETA, &savetty); ! 469: newtty = savetty; ! 470: if ((savetty.c_cflag & CBAUD) == B9600) ! 471: { ! 472: delay = 1000 * (nrand(10) + 5); ! 473: } ! 474: else ! 475: { ! 476: delay = 1000; ! 477: }; ! 478: ospeed = savetty.c_cflag & CBAUD; /* for tputs() */ ! 479: #ifdef NODELAY ! 480: newtty.c_cc[VTIME] = 7; ! 481: newtty.c_cc[VMIN] = 0; ! 482: #else ! 483: newtty.c_cc[VMIN] = 1; ! 484: #endif ! 485: newtty.c_iflag = 0; ! 486: newtty.c_oflag &= ~OPOST; ! 487: newtty.c_cflag &= ~(PARENB | CSIZE); ! 488: newtty.c_cflag |= CS8; ! 489: newtty.c_lflag &= ~(ECHO | ECHOE | ISIG | ICANON | XCASE); ! 490: ioctl(0, TCSETAW, &newtty); ! 491: #else ! 492: ioctl(0, TIOCGETP, &savetty); ! 493: newtty = savetty; ! 494: if (savetty.sg_ospeed >= B9600) ! 495: delay = 1000 * (nrand(10) + 5); ! 496: else ! 497: delay = 1000; ! 498: ospeed = savetty.sg_ospeed; /* for tputs() */ ! 499: newtty.sg_flags |= CBREAK; ! 500: newtty.sg_flags &= ~ECHO; ! 501: ioctl(0, TIOCSETP, &newtty); ! 502: #endif ! 503: ! 504: /* ! 505: * set up communications ! 506: */ ! 507: ! 508: #ifndef NODELAY ! 509: ! 510: #ifndef MSG ! 511: fnam = mktemp(TMPF); ! 512: if ((comfile = creat(fnam, 0666)) == -1) ! 513: { ! 514: (void) sprintf(message, "Cannot create %s", fnam); ! 515: perror(message); ! 516: leave(); ! 517: }; ! 518: /* ! 519: * initialize semaphore ! 520: */ ! 521: lseek(comfile, 0l, 0); ! 522: combuf[1] = EMPTY; ! 523: write(comfile, combuf, 2); ! 524: close(comfile); ! 525: #endif ! 526: #endif ! 527: ! 528: #ifndef NODELAY ! 529: /* ! 530: * fork off a child to read the input ! 531: */ ! 532: ppid = getpid(); ! 533: if ((cpid = fork()) == 0) ! 534: { ! 535: #ifndef MSG ! 536: comfile = open(fnam, O_RDWR); ! 537: #endif ! 538: for (;;) ! 539: { ! 540: read(0, inbuf, 1); ! 541: if (lastchar != inbuf[0]) ! 542: { ! 543: #ifdef MSG ! 544: if (inbuf[0] == DELETE || inbuf[0] == ABORT) ! 545: leave(); ! 546: send(inbuf, 1, ppid, 64); ! 547: #else ! 548: lseek(comfile, 0l, 0); ! 549: read(comfile, combuf, 2); ! 550: if (combuf[1] == EMPTY) ! 551: { ! 552: lseek(comfile, 0l, 0); ! 553: combuf[0] = inbuf[0]; ! 554: combuf[1] = FULL; ! 555: write(comfile, combuf, 2); ! 556: }; ! 557: #endif ! 558: }; ! 559: lastchar = DELETE; ! 560: }; ! 561: }; ! 562: ! 563: #ifndef MSG ! 564: comfile = open(fnam, O_RDWR); ! 565: #else ! 566: msgenab(); ! 567: #endif ! 568: ! 569: #endif ! 570: /* ! 571: * New game starts here ! 572: */ ! 573: game = 0; ! 574: instruct(); ! 575: while ((game == 0) && (tries++ < 300)) ! 576: { ! 577: poll(1); ! 578: }; ! 579: if (tries >= 300) ! 580: { ! 581: /* I give up. Let's call it quits. */ ! 582: leave(); ! 583: }; ! 584: goldcnt = GOLDCNT; ! 585: pscore = 0; ! 586: clr(); ! 587: } ! 588: ! 589: /* ! 590: * poll -- read characters sent by input subprocess and set global flags ! 591: */ ! 592: ! 593: poll(sltime) ! 594: { ! 595: int stop; ! 596: register int charcnt; ! 597: int junk; ! 598: ! 599: #ifndef NODELAY ! 600: #ifdef MSG ! 601: struct mstruct msghead; ! 602: #endif ! 603: #endif ! 604: ! 605: stop = 0; ! 606: readin: ! 607: ! 608: #ifdef NODELAY ! 609: fflush(stdout); ! 610: charcnt = 0; ! 611: nap(12); ! 612: #ifndef BELL3.0 ! 613: ioctl(0, FIONREAD, &junk); ! 614: if (junk) ! 615: #endif ! 616: charcnt = read(0, combuf, 1); ! 617: switch (charcnt) ! 618: { ! 619: ! 620: case 0: ! 621: combuf[1] = EMPTY; ! 622: break; ! 623: ! 624: case -1: ! 625: errgen("READ ERROR IN POLL"); ! 626: abort(); ! 627: ! 628: default: ! 629: combuf[0] = combuf[charcnt-1]; ! 630: combuf[1] = FULL; ! 631: break; ! 632: }; ! 633: #else ! 634: ! 635: #ifdef MSG ! 636: combuf[1] = (recv(combuf, 1, &msghead, 0) == -1) ? EMPTY : FULL; ! 637: #else ! 638: lseek(comfile, 0l, 0); /* rewind */ ! 639: read(comfile, combuf, 2); /* read 2 chars */ ! 640: #endif ! 641: ! 642: #endif ! 643: if (combuf[1] == EMPTY) ! 644: { ! 645: #ifndef BELL3.0 ! 646: ! 647: #ifndef NODELAY ! 648: if (sltime > 0) ! 649: { ! 650: sleep(sltime); ! 651: }; ! 652: #endif ! 653: ! 654: #endif ! 655: if (stop) ! 656: { ! 657: goto readin; ! 658: }; ! 659: return; ! 660: }; ! 661: combuf[1] = EMPTY; ! 662: ! 663: #ifndef NODELAY ! 664: ! 665: #ifndef MSG ! 666: lseek(comfile, 0l, 0); /* another rewind */ ! 667: write(comfile, combuf, 2); ! 668: #endif ! 669: #endif ! 670: ! 671: switch(combuf[0] & 0177) ! 672: { ! 673: case LEFT: ! 674: pacptr->dirn = DLEFT; ! 675: break; ! 676: ! 677: case RIGHT: ! 678: pacptr->dirn = DRIGHT; ! 679: break; ! 680: ! 681: case NORTH: ! 682: case NNORTH: ! 683: pacptr->dirn = DUP; ! 684: break; ! 685: ! 686: case DOWN: ! 687: case NDOWN: ! 688: pacptr->dirn = DDOWN; ! 689: break; ! 690: ! 691: case HALT: ! 692: pacptr->dirn = DNULL; ! 693: break; ! 694: ! 695: case ABORT: ! 696: case DELETE: ! 697: case QUIT: ! 698: over(); ! 699: break; ! 700: ! 701: case CNTLS: ! 702: stop = 1; ! 703: goto readin; ! 704: ! 705: case GAME1: ! 706: game = 1; ! 707: break; ! 708: ! 709: case GAME2: ! 710: game = 2; ! 711: break; ! 712: ! 713: case GAME3: ! 714: game = 3; ! 715: break; ! 716: ! 717: case GAME4: ! 718: game = 4; ! 719: break; ! 720: ! 721: default: ! 722: goto readin; ! 723: } ! 724: } ! 725: ! 726: vsinit() ! 727: { ! 728: char buf[1024]; ! 729: char tspace[256], *aoftspace; ! 730: char *tgetstr(); ! 731: extern char *UP, *BC; /* defined in tgoto.c (from ex's termlib */ ! 732: extern char PC; /* defined in tputs.c (from termlib) */ ! 733: ! 734: tgetent(buf, getenv("TERM")); ! 735: aoftspace = tspace; ! 736: vs_cl = tgetstr("cl", &aoftspace); ! 737: vs_cm = tgetstr("cm", &aoftspace); ! 738: BC = tgetstr("bc", &aoftspace); ! 739: UP = tgetstr("up", &aoftspace); ! 740: PC = *tgetstr("pc", &aoftspace); ! 741: vs_vb = tgetstr("vb", &aoftspace); ! 742: vs_rows = tgetnum("li"); ! 743: vs_cols = tgetnum("co"); ! 744: if ((vs_vb == 0) || (*vs_vb == '\0')) ! 745: { ! 746: vs_vb = aoftspace; ! 747: *vs_vb++ = ''; ! 748: *vs_vb++ = '\0'; ! 749: aoftspace += 2; ! 750: }; ! 751: if ((vs_cl == 0) || (*vs_cl == '\0') || ! 752: (vs_cm == 0) || (*vs_cm == '\0')) ! 753: { ! 754: (void) fprintf(stderr, "\nPacman is designed for CRT's with addressable cursors.\n"); ! 755: (void) fprintf(stderr, "Verify that the TERM environment variable is a proper\n"); ! 756: (void) fprintf(stderr, "type and is export-ed, and try it again...\n\n"); ! 757: exit(2); ! 758: }; ! 759: } ! 760: ! 761: /* dfp - real function for tputs function to use */ ! 762: putch( ch ) ! 763: register int ch; ! 764: { ! 765: putchar( ch ); ! 766: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.