![[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 [Research Unix] / researchv10no / games / sail|
Return to player1.c CVS log | Up to [Research Unix] / researchv10no / 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: signal(SIGTSTP, SIG_IGN);
199:
200: if (conditions != -1) {
201: capn = scene[game].ship[player].file->captain;
202: sprintf(message,"Captain %s relinquishing.",capn);
203: Write(FILES + player, 1, 164, message);
204:
205: if (fp = fopen(LOGFILE, "r+")) {
206: net = (float) (scene[game].ship[player].file->points) / specs[scene[game].ship[player].shipnum].pts;
207: (void) fread(&people, sizeof people, 1, fp);
208: n = fread(log, sizeof(struct logs), 10, fp);
209: for (; n < 10; n++) {
210: log[n].fname[0] = 0;
211: log[n].uid = 0;
212: log[n].fshipnum = 0;
213: log[n].fgamenum = 0;
214: log[n].netpoints = -1;
215: }
216: rewind(fp);
217: if(people < 0) {
218: people = 1;
219: (void) fwrite(&people, sizeof people, 1, fp);
220: }
221: else {
222: people++;
223: (void) fwrite(&people, sizeof people, 1, fp);
224: }
225: for (n=0; n < 10; n++)
226: if (net > (float) log[n].netpoints / specs[scene[log[n].fgamenum].ship[log[n].fshipnum].shipnum].pts) {
227: fwrite(log, sizeof(struct logs), n, fp);
228: strcpy(temp.fname, capn);
229: temp.uid = getuid();
230: temp.fshipnum = player;
231: temp.fgamenum = game;
232: temp.netpoints = scene[game].ship[player].file->points;
233: fwrite(&temp, sizeof(struct logs), 1, fp);
234: fwrite(log + n, sizeof(struct logs), 9 - n, fp);
235: break;
236: }
237: fclose(fp);
238: }
239: Write(FILES + player, 1, 0, " ");
240: Write(SCENARIO, 0, 8, scene[game].people - 1);
241: if (done_curses) {
242: screen();
243: Signal("It looks like you've had it!", -1, 0);
244: if (conditions == 1)
245: Signal("Your ship was captured.", -1, 0);
246: else if (conditions == 2)
247: Signal("No more enemies.", -1, 0);
248: else if (conditions == 3)
249: Signal("Hurricane! All ships destroyed.",
250: -1, 0);
251: else if (conditions == 4)
252: Signal("The driver died.", -1, 0);
253: move(0, LINES-1);
254: scroll = LINES;
255: clearline();
256: refresh();
257: } else {
258: if (conditions == 4)
259: printf("The driver died.\n");
260: }
261: fclose(syncfile);
262: }
263: if (done_curses) {
264: nocrmode();
265: echo();
266: endwin();
267: }
268: exit(0);
269: }
270:
271: choke()
272: {
273: leave(0);
274: }
275:
276: #include <wait.h>
277:
278: child()
279: {
280: union wait status;
281: int pid;
282:
283: signal(SIGCHLD, SIG_IGN);
284: do {
285: pid = vwait(&status, WNOHANG|WUNTRACED, 0);
286: if (pid < 0 || pid > 0 && !WIFSTOPPED(status))
287: leave(4);
288: } while (pid != 0);
289: signal(SIGCHLD, child);
290: }
291:
292: grapungrap()
293: {
294: register int n, k, l, number, captured;
295: int buf;
296:
297: for (n=0; n < scene[game].vessels ; n++) {
298: if (n != player && (range(player, n) <= 1 || grapple(player, n))) {
299: if ((captured = scene[game].ship[n].file->captured) < 0)
300: captured = n;
301: Signal("Attempt to grapple or ungrapple %s (%c%c): ", n, 0);
302: while ((buf = getch()) == EOF);
303: addch(buf);
304: if (buf == 'g') {
305: number = die() < 3;
306: if (!number && scene[game].ship[player].nationality == scene[game].ship[captured].nationality)
307: number = 1;
308: if (number) {
309: for (l=0; l < 10 && scene[game].ship[player].file->grapples[l].turnfoul; l++);
310: if (!scene[game].ship[player].file->grapples[l].turnfoul) {
311: Write(FILES + player, 0, 124 + l*4, turn);
312: Write(FILES + player, 0, 124 + l*4 + 2, n);
313: }
314: for (l=0; l < 10 && scene[game].ship[n].file->grapples[l].turnfoul; l++);
315: if (!scene[game].ship[n].file->grapples[l].turnfoul) {
316: Write(FILES + n, 0, 124 + l*4, turn);
317: Write(FILES + n, 0, 124 + l*4 + 2, player);
318: }
319: }
320: if (number) {
321: Signal("Attempt succeeds!", 0, 0);
322: makesignal("grappled with %s (%c%c)", n, player);
323: } else
324: Signal("Attempt fails.", 0, 0);
325: }
326: if (buf == 'u') {
327: for (k=0; k < 10; k++) {
328: if (scene[game].ship[player].file->grapples[k].turnfoul && n == scene[game].ship[player].file->grapples[k].toship) {
329: if (die() < 3 || scene[game].ship[player].nationality == scene[game].ship[captured].nationality) {
330: cleangrapple(player, n, k);
331: Signal("Attempt succeeds!", 0, 0);
332: makesignal("ungrappling with %s (%c%c)", n, player);
333: } else
334: Signal("Attempt fails.", 0, 0);
335: }
336: }
337: }
338: }
339: }
340: }
341:
342: unfoulplayer()
343: {
344: register int n, toship;
345: int buf;
346:
347: for (n=0; n < 10; n++) {
348: if (scene[game].ship[player].file->fouls[n].turnfoul) {
349: Signal("Attempt to unfoul with the %s (%c%c)? ", (toship = scene[game].ship[player].file->fouls[n].toship), 0);
350: while ((buf = getch()) == EOF);
351: addch(buf);
352: if (buf == 'y' && die() < 3) {
353: cleanfoul(player, toship, n);
354: Signal("Attempt succeeds!", 0, 0);
355: makesignal("unfouling %s (%c%c)", toship, player);
356: } else if (buf == 'y')
357: Signal("Attempt fails.", 0, 0);
358: }
359: }
360: }
361:
362: initialize(nodriver, randomize, debug)
363: char randomize, nodriver, debug;
364: {
365: char comm[80], file[25], capn;
366: char message[60];
367: int load = ROUND, ready = -30000;
368: int people = 0;
369: int pid;
370: register int n;
371: register int k;
372: char *nameptr;
373:
374: srand(pid = getpid());
375:
376: if (game < 0) {
377: puts("Choose a scenario:\n");
378: puts("\n\tNUMBER\tSHIPS\tIN PLAY\tTITLE");
379: for (n=0; n < NUMOFSCENES; n++) {
380: sprintf(file, "/tmp/.sail.%d", n);
381: printf("\t%d):\t%d", n, scene[n].vessels);
382: if (access(file, 0) >= 0)
383: printf("\tYES");
384: else
385: printf("\tno");
386: printf("\t%s\n", scene[n].name);
387: }
388: reprint:
389: printf("\nScenario number? ");
390: fflush(stdout);
391: scanf("%d", &game);
392: while (getchar() != '\n');
393: }
394: if (game < 0 || game >= NUMOFSCENES) {
395: puts("Very funny.");
396: exit(1);
397: }
398: sprintf(file, "/tmp/.sail.%d", game);
399: if (access(file, 0) < 0) {
400: int omask;
401: #ifdef SETUID
402: omask = umask(077);
403: #else
404: omask = umask(011);
405: #endif
406: syncfile = fopen(file, "w+");
407: umask(omask);
408: } else {
409: syncfile = fopen(file, "r+");
410: people = 1;
411: }
412: lastsync = 0;
413: for (n=0; n < scene[game].vessels; n++) {
414: nation[scene[game].ship[n].nationality + 1] = n + 1;
415: if ((scene[game].ship[n].file = (struct File *) calloc(1, sizeof(struct File))) == NULL) {
416: puts("OUT OF MEMORY");
417: exit(0);
418: }
419: scene[game].ship[n].file->captured = -1;
420: }
421: if (!nation[2])
422: nation[2] = nation[1];
423: if (!nation[3])
424: nation[3] = nation[2];
425: if (people > 0) {
426: puts("Synchronizing with the other players...");
427: fflush(stdout);
428: sync();
429: capn = 1;
430: for (n=0; n < scene[game].vessels && capn; n++) {
431: capn = scene[game].ship[n].file->captain[0];
432: if (scene[game].ship[n].file->struck || scene[game].ship[n].file->captured > -1)
433: capn = 1;
434: }
435: if (!capn)
436: player = n-1;
437: else {
438: puts("All ships taken in that scenario.");
439: for (n=0; n < scene[game].vessels; n++)
440: free(scene[game].ship[n].file);
441: people = 0;
442: for (n=0; n < 5; n++)
443: nation[n] = 0;
444: fclose(syncfile);
445: goto reprint;
446: }
447: } else
448: player = 0;
449: while (randomize) {
450: static char *color[] =
451: { "(American)", "(British)", "(Spanish)", "(French)" };
452: puts(scene[game].name);
453: putchar('\n');
454: for (n=0; n < scene[game].vessels; n++) {
455: printf(" %2d: %-10s %-15s (%-2d pts) ",
456: n,
457: color[scene[game].ship[n].nationality],
458: scene[game].ship[n].shipname,
459: specs[scene[game].ship[n].shipnum].pts);
460: if(scene[game].ship[n].file->captain[0])
461: puts(scene[game].ship[n].file->captain);
462: else if (scene[game].ship[n].file->struck)
463: puts("(struck)");
464: else if(scene[game].ship[n].file->captured > -1)
465: puts("(captured)");
466: else
467: puts("(available)");
468: }
469: putchar('\n');
470: printf("Which ship do you want (0-%d)? ",scene[game].vessels-1);
471: fflush(stdout);
472: if (scanf("%d",&player) != 1 || player < 0 || player >= scene[game].vessels) {
473: while (getchar() != '\n');
474: puts("Say what?");
475: } else {
476: while (getchar() != '\n');
477: sync();
478: if (scene[game].ship[player].file->captain[0] || scene[game].ship[player].file->struck || scene[game].ship[player].file->captured > -1)
479: puts("Sorry, that ship is taken.");
480: else
481: break;
482: }
483: }
484:
485: signal(SIGHUP, choke);
486: signal(SIGINT, choke);
487: signal(SIGQUIT, choke);
488: signal(SIGCHLD, child);
489: signal(SIGTSTP, SIG_IGN);
490:
491: Write(FILES + player, 1, 0, "begin"); /* he now exists */
492: if (people)
493: Write(SCENARIO, 0, 8, scene[game].people + 1);
494: sync();
495: printf("Your ship is the %s, a %s (%s crew).\n", scene[game].ship[player].shipname, info(player, message), quality(player));
496: if ((nameptr = (char *) getenv("NAME")) && *nameptr)
497: strcpy(comm,nameptr);
498: else {
499: fputs("Your name, Captain? ", stdout);
500: fflush(stdout);
501: gets(comm);
502: if (!*comm) strcpy(comm, "no name");
503: }
504: comm[19] = '\0';
505: for (k=0; k < 2; k++) {
506: printf("\nInitial broadside %s (grape, chain, round, double): ", (k ? "right" : "left"));
507: fflush(stdout);
508: scanf("%s", file);
509: switch(*file) {
510: case 'g':
511: load = GRAPE;
512: break;
513: case 'c':
514: load = CHAIN;
515: break;
516: case 'r':
517: load = ROUND;
518: break;
519: case 'd':
520: load = DOUBLE;
521: break;
522: }
523: if (k) {
524: scene[game].ship[player].file->loadR = load;
525: scene[game].ship[player].file->readyR = ready;
526: } else {
527: scene[game].ship[player].file->loadL = load;
528: scene[game].ship[player].file->readyL = ready;
529: }
530: }
531: Write(FILES + player, 1, 0, comm);
532: if (!people && !nodriver) {
533: char num[10];
534: sprintf(num, "%d", game);
535: if (!fork()) {
536: if (debug)
537: execl(DEBUGDRIVER, DRIVERNAME, num, 0);
538: else
539: execl(DRIVER, DRIVERNAME, num, 0);
540: perror(DRIVER);
541: kill(pid, SIGKILL);
542: exit(1);
543: }
544: }
545:
546: initscr();
547: view = newwin(ROWSINVIEW, COLSINVIEW, 2, 1);
548: slot = newwin(ROWSINVIEW, 3, 2, 1+COLSINVIEW);
549: done_curses++;
550: noecho();
551: crmode();
552:
553: board();
554: sprintf(message, "Captain %s assuming command",comm);
555: Write(FILES + player, 1, 164, message);
556: windspeed = scene[game].windspeed;
557: winddir = scene[game].winddir;
558: turn = scene[game].turn;
559:
560: iplotships(); /* new turn */
561: }
562:
563: /*
564: * Returns the NUMBER of the closest ship
565: */
566: closestenemy(fromship, side, anyship)
567: int fromship;
568: char side, anyship;
569: {
570: register int n, olddist = 30000, ident, captured;
571: register int dist, eclosest = 30000;
572:
573: if ((ident = scene[game].ship[fromship].file->captured) < 0)
574: ident = fromship;
575: for (n=0; n < scene[game].vessels; n++) {
576: if ((captured = scene[game].ship[n].file->captured) < 0)
577: captured = n;
578: if (n != fromship && pos[n].dir && (scene[game].ship[ident].nationality != scene[game].ship[captured].nationality || anyship)) {
579: if (!side || gunsbear(fromship, n) == side) {
580: dist = range(fromship, n);
581: if (dist < olddist) {
582: eclosest = n;
583: olddist = dist;
584: }
585: }
586: }
587: }
588: if (!side && olddist == 30000)
589: leave(2);
590: return(eclosest);
591: }
592:
593: main(argc, argv)
594: int argc;
595: char ** argv;
596: {
597: register int crew, aheadfirst, ma, n;
598: int ta;
599: char message[60], ch;
600: int uid;
601: char nodrive = 0, randomize = 0, debug = 0;
602: char *badstring();
603: extern char _sobuf[];
604:
605: setbuf(stdout, _sobuf);
606:
607: while (*++argv && **argv == '-')
608: switch (*++*argv) {
609: case 'd':
610: nodrive = 1;
611: break;
612: case 'D':
613: debug++;
614: break;
615: case 'x':
616: randomize = 1;
617: break;
618: default:
619: printf("Unknown flag '%s'\n",*argv);
620: break;
621: }
622: if (*argv)
623: game = atoi(*argv);
624: else
625: game = -1;
626: initialize(nodrive, randomize, debug);
627: Signal("Aye aye, Sir", 0, 0);
628: for(;;) {
629: move(scroll++,0);
630: clearline();
631: addch('~');
632: move(--scroll,0);
633: refresh();
634: ch = getch();
635: switch(ch) {
636: case 'm':
637: crew = specs[scene[game].ship[player].shipnum].crew3;
638: if (crew && !grappled(player) && !fouled(player) && windspeed) {
639: ta = maxturns(player);
640: aheadfirst = ta & 0100000;
641: ma = maxmove(player, pos[player].dir, 0);
642: ta &= 077777;
643: acceptmove(ma, ta, aheadfirst);
644: } else
645: Signal("Unable to move", 0, 0);
646: break;
647: case 's':
648: acceptsignal();
649: break;
650: case 'g':
651: grapungrap();
652: break;
653: case 'u':
654: unfoulplayer();
655: break;
656: case 'v':
657: version();
658: break;
659: case 'b':
660: boarding();
661: break;
662: case 'f':
663: acceptcombat();
664: break;
665: case 'l':
666: loadplayer();
667: break;
668: case 'c':
669: changesail();
670: break;
671: case 'r':
672: repair();
673: break;
674: case 'B':
675: Signal("'Hands to stations!'", 0, 0);
676: unboard(player, player, 1); /* cancel DBP's */
677: unboard(player, player, 0); /* cancel offense */
678: break;
679: case '\f':
680: signal(SIGALRM, SIG_IGN);
681: viewrow = pos[player].row - ROWSINVIEW / 2;
682: viewcol = pos[player].col - COLSINVIEW / 2;
683: board();
684: plotships(); /* don't create new turn */
685: break;
686: case 'L':
687: scene[game].ship[player].file->loadL = 0;
688: scene[game].ship[player].file->loadR = 0;
689: scene[game].ship[player].file->readyL = 0;
690: scene[game].ship[player].file->readyR = 0;
691: Signal("Broadsides unloaded", 0, 0);
692: break;
693: case 'q':
694: Signal("Type 'Q' to quit", 0, 0);
695: break;
696: case 'Q':
697: leave(0);
698: break;
699: case 'I':
700: for (n = 0; n < scene[game].vessels; n++)
701: eyeball(player, n);
702: break;
703: case 'i':
704: n = closestenemy(player, 0, 1);
705: eyeball(player, n);
706: break;
707: }
708: signalflags();
709: lost();
710: }
711: }
712:
713: char *saywhat(n)
714: int n;
715: {
716: if(scene[game].ship[n].file->captain[0])
717: return(scene[game].ship[n].file->captain);
718: else if (scene[game].ship[n].file->struck)
719: return("(struck)");
720: else if(scene[game].ship[n].file->captured > -1)
721: return("(captured)");
722: else
723: return("(computer)");
724: }
725:
726: eyeball(player, n)
727: int player, n;
728: {
729: char message[80];
730: register i;
731:
732: if (scene[game].ship[n].shipdir) {
733: sprintf(message, "%d, %s", range(player, n), saywhat(n));
734: Signal("Sail ho! (range %s)", -1, message);
735: switch(scene[game].ship[n].nationality) {
736: case 0:
737: strcpy(message, "American ");
738: break;
739: case 1:
740: strcpy(message, "British ");
741: break;
742: case 2:
743: strcpy(message, "Spanish ");
744: break;
745: case 3:
746: strcpy(message, "French ");
747: break;
748: default:
749: strcpy(message, "Gremlin ");
750: break;
751: }
752: switch(specs[scene[game].ship[n].shipnum].class) {
753: case 1:
754: case 2:
755: strcat(message, "Ship of the Line ");
756: break;
757: case 3:
758: case 4:
759: strcat(message, "Frigate ");
760: break;
761: case 5:
762: case 6:
763: strcat(message, "Sloop ");
764: break;
765: }
766: switch(portside(player, n, 1) - pos[player].dir) {
767: case -7:
768: case 1:
769: strcat(message, "off the starboard bow.");
770: break;
771: case -6:
772: case 2:
773: strcat(message, "off the starboard beam.");
774: break;
775: case -5:
776: case 3:
777: strcat(message, "off the starboard quarter.");
778: break;
779: case -4:
780: case 4:
781: strcat(message, "dead astern.");
782: break;
783: case -3:
784: case 5:
785: strcat(message, "off the port quarter.");
786: break;
787: case -2:
788: case 6:
789: strcat(message, "off the port beam.");
790: break;
791: case -1:
792: case 7:
793: strcat(message, "off the port bow.");
794: break;
795: case 0:
796: strcat(message, "dead ahead.");
797: break;
798: }
799: Signal(message, 0, 0);
800: }
801: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.