X-Git-Url: https://git.cameronkatri.com/bsdgames-darwin.git/blobdiff_plain/462fca95471224f85b85be911e72faee16cd1597..275e28ad8575814dcb1749559423a55a82960cfe:/sail/pl_2.c?ds=sidebyside

diff --git a/sail/pl_2.c b/sail/pl_2.c
index 7f583b3d..57d5756e 100644
--- a/sail/pl_2.c
+++ b/sail/pl_2.c
@@ -1,6 +1,8 @@
+/*	$NetBSD: pl_2.c,v 1.13 2009/03/15 03:33:56 dholland Exp $	*/
+
 /*
- * Copyright (c) 1983 Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1983, 1993
+ *	The Regents of the University of California.  All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
@@ -10,11 +12,7 @@
  * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in the
  *    documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- *    must display the following acknowledgement:
- *	This product includes software developed by the University of
- *	California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
+ * 3. Neither the name of the University nor the names of its contributors
  *    may be used to endorse or promote products derived from this software
  *    without specific prior written permission.
  *
@@ -31,19 +29,89 @@
  * SUCH DAMAGE.
  */
 
+#include <sys/cdefs.h>
 #ifndef lint
-/*static char sccsid[] = "from: @(#)pl_2.c	5.4 (Berkeley) 6/1/90";*/
-static char rcsid[] = "$Id: pl_2.c,v 1.2 1993/08/01 18:51:40 mycroft Exp $";
+#if 0
+static char sccsid[] = "@(#)pl_2.c	8.1 (Berkeley) 5/31/93";
+#else
+__RCSID("$NetBSD: pl_2.c,v 1.13 2009/03/15 03:33:56 dholland Exp $");
+#endif
 #endif /* not lint */
 
+#include <signal.h>
+#include <unistd.h>
+#include "display.h"
+#include "extern.h"
 #include "player.h"
 
-play()
+/*ARGSUSED*/
+void
+newturn(int n __unused)
 {
-	register struct ship *sp;
+	repaired = loaded = fired = changed = 0;
+	movebuf[0] = '\0';
+
+	alarm(0);
+	if (mf->readyL & R_LOADING) {
+		if (mf->readyL & R_DOUBLE)
+			mf->readyL = R_LOADING;
+		else
+			mf->readyL = R_LOADED;
+	}
+	if (mf->readyR & R_LOADING) {
+		if (mf->readyR & R_DOUBLE)
+			mf->readyR = R_LOADING;
+		else
+			mf->readyR = R_LOADED;
+	}
+	if (!hasdriver)
+		send_ddead();
+
+	display_hide_prompt();
+	if (Sync() < 0)
+		leave(LEAVE_SYNC);
+	if (!hasdriver)
+		leave(LEAVE_DRIVER);
+	display_reshow_prompt();
+
+	if (turn % 50 == 0)
+		send_alive();
+	if (mf->FS && (!mc->rig1 || windspeed == 6))
+		send_fs(ms, 0);
+	if (mf->FS == 1)
+		send_fs(ms, 2);
+
+	if (mf->struck)
+		leave(LEAVE_QUIT);
+	if (mf->captured != 0)
+		leave(LEAVE_CAPTURED);
+	if (windspeed == 7)
+		leave(LEAVE_HURRICAN);
+
+	display_adjust_view();
+	display_redraw();
+
+	signal(SIGALRM, newturn);
+	alarm(7);
+}
+
+void
+play(void)
+{
+	struct ship *sp;
 
 	for (;;) {
-		switch (sgetch("~\b", (struct ship *)0, 0)) {
+		blockalarm();
+		display_redraw();
+		unblockalarm();
+
+		switch (sgetch("~ ", (struct ship *)0, 0)) {
+		case 14: /* ^N */
+			display_scroll_pagedown();
+			break;
+		case 16: /* ^P */
+			display_scroll_pageup();
+			break;
 		case 'm':
 			acceptmove();
 			break;
@@ -57,7 +125,7 @@ play()
 			unfoulplayer();
 			break;
 		case 'v':
-			Signal("%s", (struct ship *)0, version);
+			Msg("%s", version);
 			break;
 		case 'b':
 			acceptboard();
@@ -75,26 +143,23 @@ play()
 			repair();
 			break;
 		case 'B':
-			Signal("'Hands to stations!'", (struct ship *)0);
+			Msg("'Hands to stations!'");
 			unboard(ms, ms, 1);	/* cancel DBP's */
 			unboard(ms, ms, 0);	/* cancel offense */
 			break;
 		case '\f':
 			centerview();
-			blockalarm();
-			draw_board();
-			draw_screen();
-			unblockalarm();
+			display_force_full_redraw();
 			break;
 		case 'L':
 			mf->loadL = L_EMPTY;
 			mf->loadR = L_EMPTY;
 			mf->readyL = R_EMPTY;
 			mf->readyR = R_EMPTY;
-			Signal("Broadsides unloaded", (struct ship *)0);
+			Msg("Broadsides unloaded");
 			break;
 		case 'q':
-			Signal("Type 'Q' to quit", (struct ship *)0);
+			Msg("Type 'Q' to quit");
 			break;
 		case 'Q':
 			leave(LEAVE_QUIT);
@@ -106,49 +171,31 @@ play()
 			break;
 		case 'i':
 			if ((sp = closestenemy(ms, 0, 1)) == 0)
-				Signal("No more ships left.");
+				Msg("No more ships left.");
 			else
 				eyeball(sp);
 			break;
 		case 'C':
 			centerview();
-			blockalarm();
-			draw_view();
-			unblockalarm();
 			break;
 		case 'U':
 			upview();
-			blockalarm();
-			draw_view();
-			unblockalarm();
 			break;
 		case 'D':
 		case 'N':
 			downview();
-			blockalarm();
-			draw_view();
-			unblockalarm();
 			break;
 		case 'H':
 			leftview();
-			blockalarm();
-			draw_view();
-			unblockalarm();
 			break;
 		case 'J':
 			rightview();
-			blockalarm();
-			draw_view();
-			unblockalarm();
 			break;
 		case 'F':
 			lookout();
 			break;
 		case 'S':
 			dont_adjust = !dont_adjust;
-			blockalarm();
-			draw_turn();
-			unblockalarm();
 			break;
 		}
 	}