![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to player1.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 player1.c CVS log | Up to [CSRG BSD Unix] / 42BSD / games / sail |
1.1 root 1: #ifndef lint
2: static char *sccsid = "@(#)player1.c 1.10 83/07/03";
3: #endif
4:
5: #include "player.h"
6: #include <sys/types.h>
7:
8: WINDOW *view,*slot;
9: char done_curses = 0;
10:
11: acceptcombat()
12: {
13: int crew[3], men = 0, rangeofshot, target, temp;
14: int n, r, guns[2], load[2], car[2], roll[2];
15: int ready[2], index, rakehim, sternrake;
16: int shootat[2], hit[2], closest[2], ship;
17: int hhits = 0, ghits = 0, rhits = 0, chits = 0;
18: int buf;
19: struct shipspecs *ptr;
20: struct File *ptr1;
21:
22: ptr = &specs[scene[game].ship[player].shipnum];
23: ptr1 = scene[game].ship[player].file;
24: crew[0] = ptr -> crew1;
25: crew[1] = ptr -> crew2;
26: crew[2] = ptr -> crew3;
27: ready[0] = ptr1 -> readyL;
28: ready[1] = ptr1 -> readyR;
29: load[0] = ptr1 -> loadL;
30: load[1] = ptr1 -> loadR;
31: guns[0] = ptr -> gunL;
32: guns[1] = ptr -> gunR;
33: car[0] = ptr -> carL;
34: car[1] = ptr -> carR;
35: for (n = 0; n < 3; n++) {
36: if (ptr1 -> OBP[n].turnsent)
37: men += ptr1 -> OBP[n].mensent;
38: }
39: for (n = 0; n < 3; n++) {
40: if (ptr1 -> DBP[n].turnsent)
41: men += ptr1 -> DBP[n].mensent;
42: }
43: if (men) {
44: crew[0] = men/100 ? 0 : crew[0] != 0;
45: crew[1] = (men%100)/10 ? 0 : crew[1] != 0;
46: crew[2] = men%10 ? 0 : crew[2] != 0;
47: }
48: for (r = 0; r < 2; r++) {
49: if ((guns[r] || car[r]) && crew[2] && load[r] && ready[r] <= 0 && !ptr1 -> struck && ((closest[r] = closestenemy(player, (r ? 'r' : 'l'), 1)) != 30000)) {
50: switch(load[r]) {
51: case GRAPE:
52: rangeofshot = 1;
53: break;
54: case CHAIN:
55: rangeofshot = 3;
56: break;
57: case DOUBLE:
58: rangeofshot = 1;
59: break;
60: case ROUND:
61: rangeofshot = 10;
62: break;
63: }
64: if ((target = range(player, closest[r])) <= rangeofshot && !scene[game].ship[closest[r]].file -> struck && (guns[r] || (car[r] && target < 3))) {
65: Signal("%s (%c%c) within range of %s broadside.", closest[r], (r?"right":"left"));
66: if (load[r] > CHAIN && target < 6) {
67: Signal("Aim for hull or rigging? ", -1, 0);
68: while ((buf = getch()) == EOF);
69: addch(buf);
70: if(buf == 'r')
71: shootat[r] = RIGGING;
72: else if (buf == 'h')
73: shootat[r] = HULL;
74: else {
75: shootat[r] = -1;
76: Signal("'Avast there! Hold your fire.'", -1, 0);
77: }
78: } else {
79: shootat[r] = RIGGING;
80: Signal("Fire? ", -1, 0);
81: while ((buf = getch()) == EOF);
82: addch(buf);
83: if (buf == 'n') {
84: shootat[r] = -1;
85: Signal("Belay that! Hold your fire.", -1, 0);
86: }
87: }
88: if (shootat[r] != -1) {
89: fired = 1;
90: rakehim = gunsbear(player, closest[r]) && !gunsbear(closest[r], player);
91: temp = portside(closest[r], player, 1) - pos[closest[r]].dir + 1;
92: if (temp < 1)
93: temp += 8;
94: if (temp > 8)
95: temp -= 8;
96: sternrake = temp > 4 && temp < 6;
97: if (rakehim && !sternrake)
98: Signal("Raking the %s!", closest[r], 0);
99: else if (rakehim && sternrake)
100: Signal("Stern Rake! %s splintering!", closest[r], 0);
101: index = guns[r];
102: if (target < 3)
103: index += car[r];
104: index = (index - 1)/3;
105: index = index > 8 ? 8 : index;
106: if (!rakehim)
107: hit[r] = HDT[index][target-1];
108: else
109: hit[r] = HDTrake[index][target-1];
110: if (rakehim && sternrake)
111: hit[r]++;
112: hit[r] += QUAL[index][ptr -> qual-1];
113: for (n=0; n < 3 && ptr1 -> captured < 0; n++)
114: if (!crew[n])
115: if (index <= 5)
116: hit[r]--;
117: else
118: hit[r] -= 2;
119: if (ready[r] <= -30000)
120: if (index <= 3)
121: hit[r]++;
122: else
123: hit[r] += 2;
124: if (ptr1 -> captured > -1)
125: if (index <= 1)
126: hit[r]--;
127: else
128: hit[r] -= 2;
129: hit[r] += AMMO[index][load[r] - 1];
130: if (((temp = ptr -> class) >= 5 || temp == 1) && windspeed == 5)
131: hit[r]--;
132: if (windspeed == 6 && temp == 4)
133: hit[r] -= 2;
134: if (windspeed == 6 && temp <= 3)
135: hit[r]--;
136: if (hit[r] >= 0) {
137: roll[r] = die();
138: if (load[r] == GRAPE)
139: chits = hit[r];
140: else {
141: struct Tables *t;
142: hit[r] = hit[r] > 10 ? 10 : hit[r];
143: t = &(shootat[r] ? RigTable : HullTable)[hit[r]][roll[r]-1];
144: chits = t->C;
145: rhits = t->R;
146: hhits = t->H;
147: ghits = t->G;
148: if (scene[game].ship[closest[r]].file -> FS)
149: rhits *= 2;
150: if (load[r] == CHAIN) {
151: ghits = 0;
152: hhits = 0;
153: }
154: }
155: table(shootat[r], load[r], hit[r], closest[r], player, roll[r]);
156: }
157: scroll = 18;
158: move(scroll++, 0);
159: clearline();
160: printw("Damage inflicted on the %s:", scene[game].ship[closest[r]].shipname);
161: move(scroll++, 0);
162: clearline();
163: printw("\t%d HULL, %d GUNS, %d CREW, %d RIGGING", hhits, ghits, chits, rhits);
164: load[r] = 0;
165: if (!r) {
166: ptr1 -> loadL = 0;
167: ptr1 -> readyL = 0;
168: } else {
169: ptr1 -> loadR = 0;
170: ptr1 -> readyR = 0;
171: }
172: }
173: } else {
174: load[r] = 0;
175: Signal("Unable to fire %s broadside", -1, (r?"right":"left"));
176: }
177: } else
178: Signal("Unable to fire %s broadside", -1, (r?"right":"left"));
179: }
180: }
181:
182: leave(conditions)
183: int conditions;
184: {
185: FILE *fp;
186: int people;
187: float net;
188: char * capn;
189: char message[60];
190: register int n;
191: struct logs log[10], temp;
192:
193: signal(SIGHUP, SIG_IGN);
194: signal(SIGINT, SIG_IGN);
195: signal(SIGQUIT, SIG_IGN);
196: signal(SIGALRM, SIG_IGN);
197: signal(SIGCHLD, SIG_IGN);
198:
199: if (conditions != -1) {
200: capn = scene[game].ship[player].file -> captain;
201: sprintf(message,"Captain %s relinquishing.",capn);
202: Write(FILES + player, 1, 164, message);
203:
204: if (fp = fopen(LOGFILE, "r+")) {
205: net = (float) (scene[game].ship[player].file -> points) / specs[scene[game].ship[player].shipnum].pts;
206: people = getw(fp);
207: n = fread(log, sizeof(struct logs), 10, fp);
208: for (; n < 10; n++)
209: log[n].fname[0] = log[n].uid = log[n].fshipnum = log[n].fgamenum = log[n].netpoints = 0;
210: rewind(fp);
211: if(people < 0)
212: putw(1, fp);
213: else
214: putw(people+1, fp);
215: for (n=0; n < 10; n++)
216: if (net > (float) log[n].netpoints / specs[scene[log[n].fgamenum].ship[log[n].fshipnum].shipnum].pts) {
217: fwrite(log, sizeof(struct logs), n, fp);
218: strcpy(temp.fname, capn);
219: temp.uid = getuid();
220: temp.fshipnum = player;
221: temp.fgamenum = game;
222: temp.netpoints = scene[game].ship[player].file -> points;
223: fwrite(&temp, sizeof(struct logs), 1, fp);
224: fwrite(log + n, sizeof(struct logs), 9 - n, fp);
225: break;
226: }
227: fclose(fp);
228: }
229: Write(FILES + player, 1, 0, " ");
230: Write(SCENARIO, 0, 8, scene[game].people - 1);
231: if (done_curses) {
232: screen();
233: Signal("It looks like you've had it!", -1, 0);
234: if (conditions == 1)
235: Signal("Your ship was captured.", -1, 0);
236: else if (conditions == 2)
237: Signal("No more enemies.", -1, 0);
238: else if (conditions == 3)
239: Signal("Hurricane! All ships destroyed.",
240: -1, 0);
241: else if (conditions == 4)
242: Signal("The driver died.", -1, 0);
243: move(0, LINES-1);
244: scroll = LINES;
245: clearline();
246: refresh();
247: } else {
248: if (conditions == 4)
249: printf("The driver died.\n");
250: }
251: fclose(syncfile);
252: }
253: if (done_curses) {
254: nocrmode();
255: echo();
256: endwin();
257: }
258: exit(0);
259: }
260:
261: choke()
262: {
263: leave(0);
264: }
265:
266: #include <sys/wait.h>
267:
268: child()
269: {
270: union wait status;
271: int pid;
272:
273: signal(SIGCHLD, SIG_IGN);
274: do {
275: pid = wait3(&status, WNOHANG|WUNTRACED, 0);
276: if (pid < 0 || pid > 0 && !WIFSTOPPED(status))
277: leave(4);
278: } while (pid != 0);
279: signal(SIGCHLD, child);
280: }
281:
282: grapungrap()
283: {
284: register int n, k, l, number, captured;
285: int buf;
286:
287: for (n=0; n < scene[game].vessels ; n++) {
288: if (n != player && (range(player, n) <= 1 || grapple(player, n))) {
289: if ((captured = scene[game].ship[n].file -> captured) < 0)
290: captured = n;
291: Signal("Attempt to grapple or ungrapple %s (%c%c): ", n, 0);
292: while ((buf = getch()) == EOF);
293: addch(buf);
294: if (buf == 'g') {
295: number = die() < 3;
296: if (!number && scene[game].ship[player].nationality == scene[game].ship[captured].nationality)
297: number = 1;
298: if (number) {
299: for (l=0; l < 10 && scene[game].ship[player].file -> grapples[l].turnfoul; l++);
300: if (!scene[game].ship[player].file -> grapples[l].turnfoul) {
301: Write(FILES + player, 0, 124 + l*4, turn);
302: Write(FILES + player, 0, 124 + l*4 + 2, n);
303: }
304: for (l=0; l < 10 && scene[game].ship[n].file -> grapples[l].turnfoul; l++);
305: if (!scene[game].ship[n].file -> grapples[l].turnfoul) {
306: Write(FILES + n, 0, 124 + l*4, turn);
307: Write(FILES + n, 0, 124 + l*4 + 2, player);
308: }
309: }
310: if (number) {
311: Signal("Attempt succeeds!", 0, 0);
312: makesignal("grappled with %s (%c%c)", n, player);
313: } else
314: Signal("Attempt fails.", 0, 0);
315: }
316: if (buf == 'u') {
317: for (k=0; k < 10; k++) {
318: if (scene[game].ship[player].file -> grapples[k].turnfoul && n == scene[game].ship[player].file -> grapples[k].toship) {
319: if (die() < 3 || scene[game].ship[player].nationality == scene[game].ship[captured].nationality) {
320: cleangrapple(player, n, k);
321: Signal("Attempt succeeds!", 0, 0);
322: makesignal("ungrappling with %s (%c%c)", n, player);
323: } else
324: Signal("Attempt fails.", 0, 0);
325: }
326: }
327: }
328: }
329: }
330: }
331:
332: unfoulplayer()
333: {
334: register int n, toship;
335: int buf;
336:
337: for (n=0; n < 10; n++) {
338: if (scene[game].ship[player].file -> fouls[n].turnfoul) {
339: Signal("Attempt to unfoul with the %s (%c%c)? ", (toship = scene[game].ship[player].file -> fouls[n].toship), 0);
340: while ((buf = getch()) == EOF);
341: addch(buf);
342: if (buf == 'y' && die() < 3) {
343: cleanfoul(player, toship, n);
344: Signal("Attempt succeeds!", 0, 0);
345: makesignal("unfouling %s (%c%c)", toship, player);
346: } else if (buf == 'y')
347: Signal("Attempt fails.", 0, 0);
348: }
349: }
350: }
351:
352: initialize(nodriver, randomize, debug)
353: char randomize, nodriver, debug;
354: {
355: char comm[80], file[25], capn;
356: char message[60];
357: int load = ROUND, ready = -30000;
358: int people = 0;
359: int pid;
360: register int n;
361: register int k;
362: char *nameptr;
363:
364: srand(pid = getpid());
365:
366: if (game < 0) {
367: puts("Choose a scenario:\n");
368: puts("\n\tNUMBER\tSHIPS\tIN PLAY\tTITLE");
369: for (n=0; n < NUMOFSCENES; n++) {
370: sprintf(file, "/tmp/.%d", n);
371: printf("\t%d):\t%d", n, scene[n].vessels);
372: if (access(file, 0) >= 0)
373: printf("\tYES");
374: else
375: printf("\tno");
376: printf("\t%s\n", scene[n].name);
377: }
378: reprint:
379: printf("\nScenario number? ");
380: fflush(stdout);
381: scanf("%d", &game);
382: while (getchar() != '\n');
383: }
384: if (game < 0 || game >= NUMOFSCENES) {
385: puts("Very funny.");
386: exit(1);
387: }
388: sprintf(file, "/tmp/.%d", game);
389: if (access(file, 0) < 0) {
390: int omask;
391: #ifdef SETUID
392: omask = umask(077);
393: #else
394: omask = umask(011);
395: #endif
396: syncfile = fopen(file, "w+");
397: umask(omask);
398: } else {
399: syncfile = fopen(file, "r+");
400: people = 1;
401: }
402: lastsync = 0;
403: for (n=0; n < scene[game].vessels; n++) {
404: nation[scene[game].ship[n].nationality + 1] = n + 1;
405: if ((scene[game].ship[n].file = (struct File *) calloc(1, sizeof(struct File))) == NULL) {
406: puts("OUT OF MEMORY");
407: exit(0);
408: }
409: scene[game].ship[n].file -> captured = -1;
410: }
411: if (!nation[2])
412: nation[2] = nation[1];
413: if (!nation[3])
414: nation[3] = nation[2];
415: if (people > 0) {
416: puts("Synchronizing with the other players...");
417: fflush(stdout);
418: sync();
419: capn = 1;
420: for (n=0; n < scene[game].vessels && capn; n++) {
421: capn = scene[game].ship[n].file -> captain[0];
422: if (scene[game].ship[n].file -> struck || scene[game].ship[n].file -> captured > -1)
423: capn = 1;
424: }
425: if (!capn)
426: player = n-1;
427: else {
428: puts("All ships taken in that scenario.");
429: for (n=0; n < scene[game].vessels; n++)
430: free(scene[game].ship[n].file);
431: people = 0;
432: for (n=0; n < 5; n++)
433: nation[n] = 0;
434: fclose(syncfile);
435: goto reprint;
436: }
437: } else
438: player = 0;
439: while (randomize) {
440: static char *color[] =
441: { "(American)", "(British)", "(Spanish)", "(French)" };
442: puts(scene[game].name);
443: putchar('\n');
444: for (n=0; n < scene[game].vessels; n++) {
445: printf(" %2d: %-10s %-15s (%-2d pts) ",
446: n,
447: color[scene[game].ship[n].nationality],
448: scene[game].ship[n].shipname,
449: specs[scene[game].ship[n].shipnum].pts);
450: if(scene[game].ship[n].file -> captain[0])
451: puts(scene[game].ship[n].file -> captain);
452: else if (scene[game].ship[n].file -> struck)
453: puts("(struck)");
454: else if(scene[game].ship[n].file -> captured > -1)
455: puts("(captured)");
456: else
457: puts("(available)");
458: }
459: putchar('\n');
460: printf("Which ship do you want (0-%d)? ",scene[game].vessels-1);
461: fflush(stdout);
462: if (scanf("%d",&player) != 1 || player < 0 || player >= scene[game].vessels) {
463: while (getchar() != '\n');
464: puts("Say what?");
465: } else {
466: while (getchar() != '\n');
467: sync();
468: if (scene[game].ship[player].file -> captain[0] || scene[game].ship[player].file -> struck || scene[game].ship[player].file -> captured > -1)
469: puts("Sorry, that ship is taken.");
470: else
471: break;
472: }
473: }
474:
475: signal(SIGHUP, choke);
476: signal(SIGINT, choke);
477: signal(SIGQUIT, choke);
478: signal(SIGCHLD, child);
479:
480: Write(FILES + player, 1, 0, "begin"); /* he now exists */
481: if (people)
482: Write(SCENARIO, 0, 8, scene[game].people + 1);
483: sync();
484: printf("Your ship is the %s, a %s (%s crew).\n", scene[game].ship[player].shipname, info(player, message), quality(player));
485: if ((nameptr = (char *) getenv("NAME")) && *nameptr)
486: strcpy(comm,nameptr);
487: else {
488: fputs("Your name, Captain? ", stdout);
489: fflush(stdout);
490: gets(comm);
491: if (!*comm) strcpy(comm, "no name");
492: }
493: comm[19] = '\0';
494: for (k=0; k < 2; k++) {
495: printf("\nInitial broadside %s (grape, chain, round, double): ", (k ? "right" : "left"));
496: fflush(stdout);
497: scanf("%s", file);
498: switch(*file) {
499: case 'g':
500: load = GRAPE;
501: break;
502: case 'c':
503: load = CHAIN;
504: break;
505: case 'r':
506: load = ROUND;
507: break;
508: case 'd':
509: load = DOUBLE;
510: break;
511: }
512: if (k) {
513: scene[game].ship[player].file -> loadR = load;
514: scene[game].ship[player].file -> readyR = ready;
515: } else {
516: scene[game].ship[player].file -> loadL = load;
517: scene[game].ship[player].file -> readyL = ready;
518: }
519: }
520: Write(FILES + player, 1, 0, comm);
521: if (!people && !nodriver) {
522: char num[10];
523: sprintf(num, "%d", game);
524: if (!fork()) {
525: if (debug)
526: execl(DEBUGDRIVER, DRIVERNAME, num, 0);
527: else
528: execl(DRIVER, DRIVERNAME, num, 0);
529: perror(DRIVER);
530: kill(pid, SIGKILL);
531: exit(1);
532: }
533: }
534:
535: initscr();
536: view = newwin(ROWSINVIEW, COLSINVIEW, 2, 1);
537: slot = newwin(ROWSINVIEW, 3, 2, 1+COLSINVIEW);
538: done_curses++;
539: noecho();
540: crmode();
541:
542: board();
543: sprintf(message, "Captain %s assuming command",comm);
544: Write(FILES + player, 1, 164, message);
545: windspeed = scene[game].windspeed;
546: winddir = scene[game].winddir;
547: turn = scene[game].turn;
548:
549: iplotships(); /* new turn */
550: }
551:
552: /*
553: * Returns the NUMBER of the closest ship
554: */
555: closestenemy(fromship, side, anyship)
556: int fromship;
557: char side, anyship;
558: {
559: register int n, olddist = 30000, ident, captured;
560: register int dist, eclosest = 30000;
561:
562: if ((ident = scene[game].ship[fromship].file -> captured) < 0)
563: ident = fromship;
564: for (n=0; n < scene[game].vessels; n++) {
565: if ((captured = scene[game].ship[n].file -> captured) < 0)
566: captured = n;
567: if (n != fromship && pos[n].dir && (scene[game].ship[ident].nationality != scene[game].ship[captured].nationality || anyship)) {
568: if (!side || gunsbear(fromship, n) == side) {
569: dist = range(fromship, n);
570: if (dist < olddist) {
571: eclosest = n;
572: olddist = dist;
573: }
574: }
575: }
576: }
577: if (!side && olddist == 30000)
578: leave(2);
579: return(eclosest);
580: }
581:
582: main(argc, argv)
583: int argc;
584: char ** argv;
585: {
586: register int crew, aheadfirst, ma, n;
587: int ta;
588: char message[60], ch;
589: int uid;
590: char nodrive = 0, randomize = 0, debug = 0;
591: char *badstring();
592: extern char _sobuf[];
593:
594: setbuf(stdout, _sobuf);
595:
596: while (*++argv && **argv == '-')
597: switch (*++*argv) {
598: case 'd':
599: nodrive = 1;
600: break;
601: case 'D':
602: debug++;
603: break;
604: case 'x':
605: randomize = 1;
606: break;
607: default:
608: printf("Unknown flag '%s'\n",*argv);
609: break;
610: }
611: if (*argv)
612: game = atoi(*argv);
613: else
614: game = -1;
615: initialize(nodrive, randomize, debug);
616: Signal("Aye aye, Sir", 0, 0);
617: for(;;) {
618: move(scroll++,0);
619: clearline();
620: addch('~');
621: move(--scroll,0);
622: refresh();
623: ch = getch();
624: switch(ch) {
625: case 'm':
626: crew = specs[scene[game].ship[player].shipnum].crew3;
627: if (crew && !grappled(player) && !fouled(player) && windspeed) {
628: ta = maxturns(player);
629: aheadfirst = ta & 0100000;
630: ma = maxmove(player, pos[player].dir, 0);
631: ta &= 077777;
632: acceptmove(ma, ta, aheadfirst);
633: } else
634: Signal("Unable to move", 0, 0);
635: break;
636: case 's':
637: acceptsignal();
638: break;
639: case 'g':
640: grapungrap();
641: break;
642: case 'u':
643: unfoulplayer();
644: break;
645: case 'v':
646: version();
647: break;
648: case 'b':
649: boarding();
650: break;
651: case 'f':
652: acceptcombat();
653: break;
654: case 'l':
655: loadplayer();
656: break;
657: case 'c':
658: changesail();
659: break;
660: case 'r':
661: repair();
662: break;
663: case 'B':
664: Signal("'Hands to stations!'", 0, 0);
665: unboard(player, player, 1); /* cancel DBP's */
666: unboard(player, player, 0); /* cancel offense */
667: break;
668: case '\f':
669: signal(SIGALRM, SIG_IGN);
670: viewrow = pos[player].row - ROWSINVIEW / 2;
671: viewcol = pos[player].col - COLSINVIEW / 2;
672: board();
673: plotships(); /* don't create new turn */
674: break;
675: case 'L':
676: scene[game].ship[player].file -> loadL = 0;
677: scene[game].ship[player].file -> loadR = 0;
678: scene[game].ship[player].file -> readyL = 0;
679: scene[game].ship[player].file -> readyR = 0;
680: Signal("Broadsides unloaded", 0, 0);
681: break;
682: case 'q':
683: Signal("Type 'Q' to quit", 0, 0);
684: break;
685: case 'Q':
686: leave(0);
687: break;
688: case 'I':
689: for (n = 0; n < scene[game].vessels; n++)
690: eyeball(player, n);
691: break;
692: case 'i':
693: n = closestenemy(player, 0, 1);
694: eyeball(player, n);
695: break;
696: }
697: signalflags();
698: lost();
699: }
700: }
701:
702: char *saywhat(n)
703: int n;
704: {
705: if(scene[game].ship[n].file -> captain[0])
706: return(scene[game].ship[n].file -> captain);
707: else if (scene[game].ship[n].file -> struck)
708: return("(struck)");
709: else if(scene[game].ship[n].file -> captured > -1)
710: return("(captured)");
711: else
712: return("(computer)");
713: }
714:
715: eyeball(player, n)
716: int player, n;
717: {
718: char message[80];
719: register i;
720:
721: if (scene[game].ship[n].shipdir) {
722: sprintf(message, "%d, %s", range(player, n), saywhat(n));
723: Signal("Sail ho! (range %s)", -1, message);
724: switch(scene[game].ship[n].nationality) {
725: case 0:
726: strcpy(message, "American ");
727: break;
728: case 1:
729: strcpy(message, "British ");
730: break;
731: case 2:
732: strcpy(message, "Spanish ");
733: break;
734: case 3:
735: strcpy(message, "French ");
736: break;
737: default:
738: strcpy(message, "Gremlin ");
739: break;
740: }
741: switch(specs[scene[game].ship[n].shipnum].class) {
742: case 1:
743: case 2:
744: strcat(message, "Ship of the Line ");
745: break;
746: case 3:
747: case 4:
748: strcat(message, "Frigate ");
749: break;
750: case 5:
751: case 6:
752: strcat(message, "Sloop ");
753: break;
754: }
755: switch(portside(player, n, 1) - pos[player].dir) {
756: case -7:
757: case 1:
758: strcat(message, "off the starboard bow.");
759: break;
760: case -6:
761: case 2:
762: strcat(message, "off the starboard beam.");
763: break;
764: case -5:
765: case 3:
766: strcat(message, "off the starboard quarter.");
767: break;
768: case -4:
769: case 4:
770: strcat(message, "dead astern.");
771: break;
772: case -3:
773: case 5:
774: strcat(message, "off the port quarter.");
775: break;
776: case -2:
777: case 6:
778: strcat(message, "off the port beam.");
779: break;
780: case -1:
781: case 7:
782: strcat(message, "off the port bow.");
783: break;
784: case 0:
785: strcat(message, "dead ahead.");
786: break;
787: }
788: Signal(message, 0, 0);
789: }
790: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.