UNIX 7th Ed. - /usr/src/games/chess/book.c

   1: #include "old.h"
   2: 
   3: bookm()
   4: {
   5:     int i, buf[2];
   6: 
   7:     if(!bookp) return(0);
   8:     lseek(bookf, (long)(unsigned)bookp, 0);
   9: 
  10:     i = 0;
  11: loop:
  12:     read(bookf, buf, 4);
  13:     *buf = booki(*buf);
  14:     if(*buf >= 0) {
  15:         if(!i)
  16:             i = *buf;
  17:         goto loop;
  18:     }
  19:     if(abmove = i)
  20:         return(1);
  21:     return(0);
  22: }
  23: 
  24: makmov(m)
  25: {
  26:     int buf[2];
  27: 
  28:     out1(m);
  29:     mantom? bmove(m): wmove(m);
  30:     increm();
  31:     if(!bookp) return;
  32:     lseek(bookf, (long)(unsigned)bookp, 0);
  33: 
  34: loop:
  35:     read(bookf, buf, 4);
  36:     *buf = booki(*buf);
  37:     if(m == *buf || *buf == 0) {
  38:         bookp = buf[1] & ~1;
  39:         goto l1;
  40:     }
  41:     if(*buf < 0) {
  42:         bookp = 0;
  43:         goto l1;
  44:     }
  45:     goto loop;
  46: 
  47: l1:
  48:     if(!bookp) {
  49:         putchar('\n');
  50:         return;
  51:     }
  52: }
  53: 
  54: booki(m)
  55: {
  56:     int i;
  57:     struct {
  58:         char low;
  59:         char high;
  60:     };
  61:     i.high = m.low;
  62:     i.low = m.high;
  63:     return(i);
  64: }

Defined functions