1*87d1d157Sdholland /* $NetBSD: pl_2.c,v 1.13 2009/03/15 03:33:56 dholland Exp $ */
2982615d7Scgd
361f28255Scgd /*
4982615d7Scgd * Copyright (c) 1983, 1993
5982615d7Scgd * The Regents of the University of California. All rights reserved.
661f28255Scgd *
761f28255Scgd * Redistribution and use in source and binary forms, with or without
861f28255Scgd * modification, are permitted provided that the following conditions
961f28255Scgd * are met:
1061f28255Scgd * 1. Redistributions of source code must retain the above copyright
1161f28255Scgd * notice, this list of conditions and the following disclaimer.
1261f28255Scgd * 2. Redistributions in binary form must reproduce the above copyright
1361f28255Scgd * notice, this list of conditions and the following disclaimer in the
1461f28255Scgd * documentation and/or other materials provided with the distribution.
15e5aeb4eaSagc * 3. Neither the name of the University nor the names of its contributors
1661f28255Scgd * may be used to endorse or promote products derived from this software
1761f28255Scgd * without specific prior written permission.
1861f28255Scgd *
1961f28255Scgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
2061f28255Scgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
2161f28255Scgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
2261f28255Scgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
2361f28255Scgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
2461f28255Scgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
2561f28255Scgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
2661f28255Scgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
2761f28255Scgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
2861f28255Scgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
2961f28255Scgd * SUCH DAMAGE.
3061f28255Scgd */
3161f28255Scgd
32bf72b656Schristos #include <sys/cdefs.h>
3361f28255Scgd #ifndef lint
34982615d7Scgd #if 0
35982615d7Scgd static char sccsid[] = "@(#)pl_2.c 8.1 (Berkeley) 5/31/93";
36982615d7Scgd #else
37*87d1d157Sdholland __RCSID("$NetBSD: pl_2.c,v 1.13 2009/03/15 03:33:56 dholland Exp $");
38982615d7Scgd #endif
3961f28255Scgd #endif /* not lint */
4061f28255Scgd
4161a39e0bSjwise #include <signal.h>
425368eaecSdholland #include <unistd.h>
435368eaecSdholland #include "display.h"
449baf035bSjwise #include "extern.h"
4561f28255Scgd #include "player.h"
4661f28255Scgd
475368eaecSdholland /*ARGSUSED*/
485368eaecSdholland void
newturn(int n __unused)495368eaecSdholland newturn(int n __unused)
505368eaecSdholland {
515368eaecSdholland repaired = loaded = fired = changed = 0;
525368eaecSdholland movebuf[0] = '\0';
535368eaecSdholland
545368eaecSdholland alarm(0);
555368eaecSdholland if (mf->readyL & R_LOADING) {
565368eaecSdholland if (mf->readyL & R_DOUBLE)
575368eaecSdholland mf->readyL = R_LOADING;
585368eaecSdholland else
595368eaecSdholland mf->readyL = R_LOADED;
605368eaecSdholland }
615368eaecSdholland if (mf->readyR & R_LOADING) {
625368eaecSdholland if (mf->readyR & R_DOUBLE)
635368eaecSdholland mf->readyR = R_LOADING;
645368eaecSdholland else
655368eaecSdholland mf->readyR = R_LOADED;
665368eaecSdholland }
675368eaecSdholland if (!hasdriver)
685368eaecSdholland send_ddead();
695368eaecSdholland
705368eaecSdholland display_hide_prompt();
715368eaecSdholland if (Sync() < 0)
725368eaecSdholland leave(LEAVE_SYNC);
735368eaecSdholland if (!hasdriver)
745368eaecSdholland leave(LEAVE_DRIVER);
755368eaecSdholland display_reshow_prompt();
765368eaecSdholland
775368eaecSdholland if (turn % 50 == 0)
785368eaecSdholland send_alive();
795368eaecSdholland if (mf->FS && (!mc->rig1 || windspeed == 6))
805368eaecSdholland send_fs(ms, 0);
815368eaecSdholland if (mf->FS == 1)
825368eaecSdholland send_fs(ms, 2);
835368eaecSdholland
845368eaecSdholland if (mf->struck)
855368eaecSdholland leave(LEAVE_QUIT);
865368eaecSdholland if (mf->captured != 0)
875368eaecSdholland leave(LEAVE_CAPTURED);
885368eaecSdholland if (windspeed == 7)
895368eaecSdholland leave(LEAVE_HURRICAN);
905368eaecSdholland
915368eaecSdholland display_adjust_view();
92*87d1d157Sdholland display_redraw();
935368eaecSdholland
945368eaecSdholland signal(SIGALRM, newturn);
955368eaecSdholland alarm(7);
965368eaecSdholland }
975368eaecSdholland
98bf72b656Schristos void
play(void)99dfea9f08Sjwise play(void)
10061f28255Scgd {
101bf72b656Schristos struct ship *sp;
10261f28255Scgd
10361f28255Scgd for (;;) {
104*87d1d157Sdholland blockalarm();
105*87d1d157Sdholland display_redraw();
106*87d1d157Sdholland unblockalarm();
107*87d1d157Sdholland
108*87d1d157Sdholland switch (sgetch("~ ", (struct ship *)0, 0)) {
109*87d1d157Sdholland case 14: /* ^N */
110*87d1d157Sdholland display_scroll_pagedown();
111*87d1d157Sdholland break;
112*87d1d157Sdholland case 16: /* ^P */
113*87d1d157Sdholland display_scroll_pageup();
114*87d1d157Sdholland break;
11561f28255Scgd case 'm':
11661f28255Scgd acceptmove();
11761f28255Scgd break;
11861f28255Scgd case 's':
11961f28255Scgd acceptsignal();
12061f28255Scgd break;
12161f28255Scgd case 'g':
12261f28255Scgd grapungrap();
12361f28255Scgd break;
12461f28255Scgd case 'u':
12561f28255Scgd unfoulplayer();
12661f28255Scgd break;
12761f28255Scgd case 'v':
128bf72b656Schristos Msg("%s", version);
12961f28255Scgd break;
13061f28255Scgd case 'b':
13161f28255Scgd acceptboard();
13261f28255Scgd break;
13361f28255Scgd case 'f':
13461f28255Scgd acceptcombat();
13561f28255Scgd break;
13661f28255Scgd case 'l':
13761f28255Scgd loadplayer();
13861f28255Scgd break;
13961f28255Scgd case 'c':
14061f28255Scgd changesail();
14161f28255Scgd break;
14261f28255Scgd case 'r':
14361f28255Scgd repair();
14461f28255Scgd break;
14561f28255Scgd case 'B':
146bf72b656Schristos Msg("'Hands to stations!'");
14761f28255Scgd unboard(ms, ms, 1); /* cancel DBP's */
14861f28255Scgd unboard(ms, ms, 0); /* cancel offense */
14961f28255Scgd break;
15061f28255Scgd case '\f':
15161f28255Scgd centerview();
152*87d1d157Sdholland display_force_full_redraw();
15361f28255Scgd break;
15461f28255Scgd case 'L':
15561f28255Scgd mf->loadL = L_EMPTY;
15661f28255Scgd mf->loadR = L_EMPTY;
15761f28255Scgd mf->readyL = R_EMPTY;
15861f28255Scgd mf->readyR = R_EMPTY;
159bf72b656Schristos Msg("Broadsides unloaded");
16061f28255Scgd break;
16161f28255Scgd case 'q':
162bf72b656Schristos Msg("Type 'Q' to quit");
16361f28255Scgd break;
16461f28255Scgd case 'Q':
16561f28255Scgd leave(LEAVE_QUIT);
16661f28255Scgd break;
16761f28255Scgd case 'I':
16861f28255Scgd foreachship(sp)
16961f28255Scgd if (sp != ms)
17061f28255Scgd eyeball(sp);
17161f28255Scgd break;
17261f28255Scgd case 'i':
17361f28255Scgd if ((sp = closestenemy(ms, 0, 1)) == 0)
174bf72b656Schristos Msg("No more ships left.");
17561f28255Scgd else
17661f28255Scgd eyeball(sp);
17761f28255Scgd break;
17861f28255Scgd case 'C':
17961f28255Scgd centerview();
18061f28255Scgd break;
18161f28255Scgd case 'U':
18261f28255Scgd upview();
18361f28255Scgd break;
18461f28255Scgd case 'D':
18561f28255Scgd case 'N':
18661f28255Scgd downview();
18761f28255Scgd break;
18861f28255Scgd case 'H':
18961f28255Scgd leftview();
19061f28255Scgd break;
19161f28255Scgd case 'J':
19261f28255Scgd rightview();
19361f28255Scgd break;
19461f28255Scgd case 'F':
19561f28255Scgd lookout();
19661f28255Scgd break;
19761f28255Scgd case 'S':
19861f28255Scgd dont_adjust = !dont_adjust;
19961f28255Scgd break;
20061f28255Scgd }
20161f28255Scgd }
20261f28255Scgd }
203