![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to driver1.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 42BSD / games / sail|
Return to driver1.c CVS log | Up to [CSRG BSD Unix] / 42BSD / games / sail |
1.1 ! root 1: #ifndef lint ! 2: static char *sccsid = "@(#)driver1.c 1.3 83/05/20"; ! 3: #endif ! 4: ! 5: #include "externs.h" ! 6: #include <sys/types.h> ! 7: ! 8: #define couldwin(from, to) (specs[scene[game].ship[from].shipnum].crew2 > specs[scene[game].ship[to].shipnum].crew2 * 1.5) ! 9: ! 10: unfoul() ! 11: { ! 12: char name; ! 13: register int n, k, ship; ! 14: int ident, captured; ! 15: struct File *ptr; ! 16: ! 17: for (n=0; n < scene[game].vessels; n++){ ! 18: ptr = scene[game].ship[n].file; ! 19: if (!ptr -> captain[0]){ ! 20: for(k=0; k < 10; k++){ ! 21: if (ptr -> fouls[k].turnfoul){ ! 22: if ((ident = ptr -> captured) < 0) ! 23: ident = n; ! 24: ship = ptr -> fouls[k].toship; ! 25: if ((captured = scene[game].ship[ship].file -> captured) < 0) ! 26: captured = ship; ! 27: if (scene[game].ship[ident].nationality == scene[game].ship[ship].nationality || toughmelee(n, ship, 0, 0)) ! 28: if (die() <= 2){ ! 29: cleanfoul(n, ship, k); ! 30: } ! 31: } ! 32: } ! 33: } ! 34: } ! 35: } ! 36: ! 37: ! 38: ! 39: boardcomp() ! 40: { ! 41: register int n, k, l, men = 0, captured; ! 42: int crew[3]; ! 43: struct shipspecs *ptr; ! 44: struct File *ptr1; ! 45: ! 46: for (n = 0; n < scene[game].vessels; n++){ ! 47: ptr = &specs[scene[game].ship[n].shipnum]; ! 48: ptr1 = scene[game].ship[n].file; ! 49: if (!ptr1 -> captain[0] && (fouled(n) || grappled(n)) && pos[n].dir && !ptr1 -> struck && ptr1 -> captured < 0){ ! 50: crew[0] = ptr -> crew1 != 0; ! 51: crew[1] = ptr -> crew2 != 0; ! 52: crew[2] = ptr -> crew3 != 0; ! 53: for (l=0; l < scene[game].vessels; l++) ! 54: if (foul(n+100,l) || grapple(n+100,l)){ ! 55: if (!meleeing(n,l)){ ! 56: if ((captured = scene[game].ship[l].file -> captured) < 0) ! 57: captured = l; ! 58: if (pos[l].dir && scene[game].ship[n].nationality != scene[game].ship[captured].nationality){ ! 59: switch(specs[scene[game].ship[n].shipnum].class - specs[scene[game].ship[l].shipnum].class){ ! 60: case -3: ! 61: case -4: ! 62: case -5: ! 63: if (crew[0]){ ! 64: send(n, l, crew[0]*100, 200); /* OBP */ ! 65: crew[0] = 0; ! 66: } ! 67: else if (crew[1]){ ! 68: send(n, l, crew[1]*10, 200); /* OBP */ ! 69: crew[1] = 0; ! 70: } ! 71: break; ! 72: case -2: ! 73: if (crew[0] || crew[1]){ ! 74: send(n, l, crew[0]*100+crew[1]*10, 200); /* OBP */ ! 75: crew[0] = crew[1] = 0; ! 76: } ! 77: break; ! 78: case -1: ! 79: case 0: ! 80: case 1: ! 81: if (crew[0]){ ! 82: send(n, l, crew[0]*100+crew[1]*10, 200); /* OBP */ ! 83: crew[0] = crew[1] = 0; ! 84: } ! 85: break; ! 86: case 2: ! 87: case 3: ! 88: case 4: ! 89: case 5: ! 90: send(n, l, crew[0]*100+crew[1]*10+crew[2], 200); /* OBP */ ! 91: crew[0] = crew[1] = crew[2] = 0; ! 92: break; ! 93: } ! 94: } ! 95: } ! 96: } ! 97: } ! 98: } ! 99: } ! 100: ! 101: ! 102: fightitout(from, to, key) ! 103: int from, to, key; ! 104: { ! 105: int crewfrom[3], crewto[3], menfrom, mento, fromcap, tocap; ! 106: int pcto, pcfrom, fromstrength, strengthto, frominjured, toinjured; ! 107: int index, totalfrom = 0, totalto = 0, topoints, frompoints, struck; ! 108: int junk, count; ! 109: struct File *ptr; ! 110: struct shipspecs *ptr1; ! 111: char message[60]; ! 112: ! 113: ptr = scene[game].ship[from].file; ! 114: ptr1 = &specs[scene[game].ship[from].shipnum]; ! 115: menfrom = mensent(from, to, crewfrom, &fromcap, &pcfrom, &frompoints, key); ! 116: mento = mensent(to, from, crewto, &tocap, &pcto, &topoints, 0); ! 117: if (fromcap < 0) ! 118: fromcap = from; ! 119: if (tocap < 0) ! 120: tocap = to; ! 121: fromstrength = menfrom * specs[scene[game].ship[fromcap].shipnum].qual; ! 122: strengthto = mento * specs[scene[game].ship[tocap].shipnum].qual; ! 123: if (key && !menfrom){ ! 124: if (fromcap == from) ! 125: menfrom = ptr1 -> crew1 + ptr1 -> crew2 + ptr1 -> crew3; ! 126: else ! 127: menfrom = ptr -> pcrew; ! 128: fromstrength = -1; ! 129: strengthto *= 2; ! 130: } ! 131: for (count = 0; (!(fromstrength >= strengthto * 3 || strengthto >= fromstrength * 3) || fromstrength == -1) && count < 4;count++){ ! 132: index = fromstrength/10; ! 133: if (index > 8) ! 134: index = 8; ! 135: toinjured = MT[index][2 - die() / 3]; ! 136: totalto += toinjured; ! 137: index = strengthto/10; ! 138: if (index > 8) ! 139: index = 8; ! 140: frominjured = MT[index][2 - die() / 3]; ! 141: totalfrom += frominjured; ! 142: menfrom -= frominjured; ! 143: mento -= toinjured; ! 144: fromstrength = menfrom * specs[scene[game].ship[fromcap].shipnum].qual; ! 145: strengthto = mento * specs[scene[game].ship[tocap].shipnum].qual; ! 146: } ! 147: if (fromstrength >= strengthto * 3 || count == 4){ ! 148: unboard(to, from, 0); ! 149: subtract(from, totalfrom, crewfrom, fromcap, pcfrom); ! 150: subtract(to, totalto, crewto, tocap, pcto); ! 151: makesignal("boarders from %s repelled", to, from); ! 152: sprintf(message, "killed in melee: %d. %s: %d", totalto, scene[game].ship[from].shipname, totalfrom); ! 153: Write(FILES + to, 1, 164, message); ! 154: if (key) ! 155: return(1); ! 156: } ! 157: else if (strengthto >= fromstrength * 3){ ! 158: unboard(from, to, 0); ! 159: subtract(from, totalfrom, crewfrom, fromcap, pcfrom); ! 160: subtract(to, totalto, crewto, tocap, pcto); ! 161: if (key){ ! 162: if (fromcap != from) ! 163: /* Write(FILES + fromcap, 0, 20, scene[game].ship[fromcap].file -> points - (2 - ptr -> struck)*ptr1 -> points); */ /* original line... */ ! 164: ! 165: Write(FILES + fromcap, 0, 20, ! 166: (scene[game].ship[fromcap].file -> points) - ! 167: (2 - (ptr -> struck))*(ptr1 -> pts) ! 168: /* (2 - (ptr -> struck))*(ptr1 -> points) */ ! 169: ); ! 170: ! 171: /* ptr1 points to the shipspec for the ship that was just unboarded. ! 172: I guess that what is going on here is that the pointer is multiplied ! 173: or something. */ ! 174: ! 175: Write(FILES + from, 0, 68, to); ! 176: topoints = 2*ptr1 -> pts + scene[game].ship[to].file -> points; ! 177: if (ptr -> struck) ! 178: topoints -= ptr1 -> pts; ! 179: Write(FILES + to, 0, 20, topoints); ! 180: mento = crewto[0] ? crewto[0] : crewto[1]; ! 181: if (mento){ ! 182: subtract(to, mento, crewto, tocap, pcto); ! 183: subtract(from, -mento, crewfrom, to, 0); ! 184: } ! 185: sprintf(message, "captured by the %s!",scene[game].ship[to].shipname); ! 186: Write(FILES + from, 1, 164, message); ! 187: sprintf(message, "killed in melee: %d. %s: %d", totalto, scene[game].ship[from].shipname, totalfrom); ! 188: Write(FILES + to, 1, 164, message); ! 189: mento = 0; ! 190: return(0); ! 191: } ! 192: } ! 193: return(0); ! 194: } /* end of fightitout */ ! 195: ! 196: ! 197: resolve() ! 198: { ! 199: register int n, l, k, thwart; ! 200: ! 201: for (n=0; n < scene[game].vessels; n++){ ! 202: thwart = 2; ! 203: if (pos[n].dir){ ! 204: for (l=n+1; l < scene[game].vessels; l++){ ! 205: if (pos[l].dir && meleeing(n,l) && meleeing(l,n)){ /* offense */ ! 206: fightitout(n,l,0); ! 207: } ! 208: } ! 209: for (l=0; l < scene[game].vessels; l++){ /* defense */ ! 210: if (pos[l].dir && meleeing(l,n)){ ! 211: thwart = fightitout(n,l,1); ! 212: } ! 213: if (!thwart) ! 214: break; ! 215: } ! 216: if (!thwart){ ! 217: for (k=0; k < scene[game].vessels; k++){ ! 218: if (pos[k].dir && meleeing(k,n)){ ! 219: unboard(k,n,0); ! 220: } ! 221: unboard(n,k,0); ! 222: } ! 223: unboard(n,n,1); ! 224: } ! 225: if (thwart == 2) ! 226: unboard(n,n,1); ! 227: } ! 228: } ! 229: } ! 230: ! 231: ! 232: compcombat() ! 233: { ! 234: int crew[3], men = 0, target, temp; ! 235: int n, r, guns[2], load[2], car[2], roll[2]; ! 236: int ready[2], index, rakehim, sternrake; ! 237: int shootat[2], hit[2], closest[2], ship; ! 238: struct shipspecs *ptr; ! 239: struct File *ptr1; ! 240: ! 241: for (ship = 0; ship < scene[game].vessels; ship++){ ! 242: ptr = &specs[scene[game].ship[ship].shipnum]; ! 243: ptr1 = scene[game].ship[ship].file; ! 244: if (!ptr1 -> captain[0] && pos[ship].dir){ ! 245: crew[0] = ptr -> crew1; ! 246: crew[1] = ptr -> crew2; ! 247: crew[2] = ptr -> crew3; ! 248: ready[0] = ptr1 -> readyL; ! 249: ready[1] = ptr1 -> readyR; ! 250: guns[0] = ptr -> gunL; ! 251: guns[1] = ptr -> gunR; ! 252: car[0] = ptr -> carL; ! 253: car[1] = ptr -> carR; ! 254: for (n = 0; n < 3; n++){ ! 255: if (ptr1 -> OBP[n].turnsent) ! 256: men += ptr1 -> OBP[n].mensent; ! 257: } ! 258: for (n = 0; n < 3; n++){ ! 259: if (ptr1 -> DBP[n].turnsent) ! 260: men += ptr1 -> DBP[n].mensent; ! 261: } ! 262: if (men){ ! 263: crew[0] = men/100 ? 0 : crew[0] != 0; ! 264: crew[1] = (men%100)/10 ? 0 : crew[1] != 0; ! 265: crew[2] = men%10 ? 0 : crew[2] != 0; ! 266: } ! 267: for (r = 0; r < 2; r++){ ! 268: if ((guns[r] || car[r]) && crew[2] && ready[r] <= 0 && !ptr1 -> struck && ((closest[r] = closestenemy(ship, (r ? 'r' : 'l'), 0)) != 30000) && range(closest[r], ship) <= range(ship, closestenemy(ship, (r ? 'r' : 'l'), 1))){ ! 269: if ((target = range(ship, closest[r])) <= 10 && !scene[game].ship[closest[r]].file -> struck && (guns[r] || (car[r] && target < 3))){ ! 270: load[r] = ROUND; ! 271: if (target == 1 && loadwith[ship] == GRAPE) ! 272: load[r] = GRAPE; ! 273: if (target <= 3 && scene[game].ship[closest[r]].file -> FS) ! 274: load[r] = CHAIN; ! 275: if (target == 1 && load[r] != GRAPE) ! 276: load[r] = DOUBLE; ! 277: if (load[r] > CHAIN && target < 6){ ! 278: shootat[r] = HULL; ! 279: } ! 280: else { ! 281: shootat[r] = RIGGING; ! 282: } ! 283: rakehim = gunsbear(ship, closest[r]) && !gunsbear(closest[r], ship); ! 284: temp = portside(closest[r], ship, 1) - pos[closest[r]].dir + 1; ! 285: if (temp < 1) ! 286: temp += 8; ! 287: if (temp > 8) ! 288: temp -= 8; ! 289: sternrake = temp > 4 && temp < 6; ! 290: index = guns[r]; ! 291: if (target < 3){ ! 292: index += car[r]; ! 293: } ! 294: index = (index - 1)/3; ! 295: index = index > 8 ? 8 : index; ! 296: if (!rakehim){ ! 297: hit[r] = HDT[index][target-1]; ! 298: } ! 299: else { ! 300: hit[r] = HDTrake[index][target-1]; ! 301: } ! 302: if (rakehim && sternrake){ ! 303: hit[r]++; ! 304: } ! 305: hit[r] += QUAL[index][ptr1 -> captured < 0 ? ptr -> qual-1 : specs[scene[game].ship[ptr1 -> captured].shipnum].qual -1]; ! 306: for (n=0; n < 3 && ptr1 -> captured < 0; n++) ! 307: if (!crew[n]){ ! 308: if (index <= 5) ! 309: hit[r]--; ! 310: else ! 311: hit[r] -= 2; ! 312: } ! 313: if (ready[r] <= -30000){ ! 314: if (index <= 3) ! 315: hit[r]++; ! 316: else ! 317: hit[r] += 2; ! 318: } ! 319: if (ptr1 -> captured > -1){ ! 320: if (index <= 1) ! 321: hit[r]--; ! 322: else ! 323: hit[r] -= 2; ! 324: } ! 325: hit[r] += AMMO[index][load[r] - 1]; ! 326: if (((temp = ptr -> class) >= 5 || temp == 1) && windspeed == 5) ! 327: hit[r]--; ! 328: if (windspeed == 6 && temp == 4) ! 329: hit[r] -= 2; ! 330: if (windspeed == 6 && temp <= 3) ! 331: hit[r]--; ! 332: if (hit[r] >= 0){ ! 333: if (load[r] != GRAPE) ! 334: hit[r] = hit[r] > 10 ? 10 : hit[r]; ! 335: roll[r] = die(); ! 336: table(shootat[r], load[r], hit[r], closest[r], ship, roll[r]); ! 337: } ! 338: load[r] = 0; ! 339: if (!r) ! 340: ptr1 -> readyL = 0; ! 341: else ! 342: ptr1 -> readyR = 0; ! 343: } ! 344: } ! 345: else ! 346: load[r] = 0; ! 347: } ! 348: } ! 349: } ! 350: } ! 351: ! 352: next() ! 353: { ! 354: char string[25]; ! 355: int vec[3]; ! 356: ! 357: turn++; ! 358: if (turn % 55 == 0) ! 359: if (scene[game].time) ! 360: scene[game].time = 0; ! 361: else ! 362: scene[game].people = 0; /* die if no one */ ! 363: if (scene[game].people <= 0 || windspeed == 7){ ! 364: fclose(syncfile); ! 365: sprintf(string, "/tmp/.%d", game); ! 366: if (unlink(string) == -1) ! 367: perror(string); ! 368: exit(0); ! 369: } ! 370: Write(SCENARIO, 0, 6, turn); ! 371: if (turn % 7 == 0){ ! 372: if (die() >= scene[game].windchange || !windspeed){ ! 373: switch(die()){ ! 374: case 1: ! 375: winddir = 1; ! 376: break; ! 377: case 2: ! 378: break; ! 379: case 3: ! 380: winddir++; ! 381: break; ! 382: case 4: ! 383: winddir--; ! 384: break; ! 385: case 5: ! 386: winddir += 2; ! 387: break; ! 388: case 6: ! 389: winddir -= 2; ! 390: break; ! 391: } ! 392: if (winddir > 8) ! 393: winddir -= 8; ! 394: if (winddir < 1) ! 395: winddir += 8; ! 396: Write(SCENARIO, 0, 0, winddir); ! 397: if (windspeed) ! 398: switch(die()){ ! 399: case 1: ! 400: case 2: ! 401: windspeed--; ! 402: break; ! 403: case 5: ! 404: case 6: ! 405: windspeed++; ! 406: break; ! 407: } ! 408: else ! 409: windspeed++; ! 410: Write(SCENARIO, 0, 2, windspeed); ! 411: } ! 412: /* if (!MIGHTYCAPTAIN){ ! 413: gldav(vec); ! 414: if ((vec[2] >> 8) > 9) ! 415: { ! 416: makesignal("*Load getting high, brace yourselves.", 0, 0); ! 417: } ! 418: if ((vec[2] >> 8) > 12) ! 419: { ! 420: makesignal("*Load average is blowing a gale!", 0, 0); ! 421: Write(SCENARIO, 0, 2, 7); ! 422: } ! 423: } */ ! 424: } ! 425: } ! 426: ! 427: main(argc, argv) ! 428: int argc; ! 429: char **argv; ! 430: { ! 431: register int n, k; ! 432: char file[25]; ! 433: int uid; ! 434: ! 435: signal(SIGHUP, SIG_IGN); ! 436: signal(SIGINT, SIG_IGN); ! 437: srand(getpid()); ! 438: /* ;;; add code here to check the game number. */ ! 439: sprintf(file, "/tmp/.%s",argv[1]); ! 440: for (n = 0; access(file, 0) < 0 && n < 20; n++) ! 441: sleep(5); ! 442: syncfile = fopen(file, "r+"); ! 443: if (syncfile == NULL) { ! 444: perror(file); ! 445: exit(1); ! 446: } ! 447: sscanf(argv[1], "%d", &game); ! 448: for (n=0; n < scene[game].vessels; n++){ ! 449: nation[scene[game].ship[n].nationality + 1] = n + 1; ! 450: if ((scene[game].ship[n].file = (struct File *) calloc(1, sizeof(struct File))) == NULL){ ! 451: printf("OUT OF MEMORY\n"); ! 452: exit(0); ! 453: } ! 454: scene[game].ship[n].file -> captured = -1; ! 455: } ! 456: for (n = 0; n < scene[game].vessels; n++){ /* initial loads */ ! 457: scene[game].ship[n].file -> loadL = ROUND; ! 458: scene[game].ship[n].file -> loadR = ROUND; ! 459: scene[game].ship[n].file -> readyR = -30000; ! 460: scene[game].ship[n].file -> readyL = -30000; ! 461: } ! 462: if (!nation[2]) ! 463: nation[2] = nation[1]; ! 464: if (!nation[3]) ! 465: nation[3] = nation[2]; ! 466: sync(); ! 467: for(;;) { ! 468: windspeed = scene[game].windspeed; ! 469: winddir = scene[game].winddir; ! 470: turn = scene[game].turn; ! 471: next(); ! 472: unfoul(); ! 473: checkup(); ! 474: prizecheck(); ! 475: moveall(); ! 476: readpos(); ! 477: thinkofgrapples(); ! 478: boardcomp(); ! 479: compcombat(); ! 480: readpos(); ! 481: resolve(); ! 482: reload(); ! 483: checksails(); ! 484: sync(); ! 485: sleep(7); ! 486: sync(); ! 487: } ! 488: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.