pl_2.c revision 1.3
1 1.3 cgd /* $NetBSD: pl_2.c,v 1.3 1995/04/22 10:37:08 cgd Exp $ */ 2 1.3 cgd 3 1.1 cgd /* 4 1.3 cgd * Copyright (c) 1983, 1993 5 1.3 cgd * The Regents of the University of California. All rights reserved. 6 1.1 cgd * 7 1.1 cgd * Redistribution and use in source and binary forms, with or without 8 1.1 cgd * modification, are permitted provided that the following conditions 9 1.1 cgd * are met: 10 1.1 cgd * 1. Redistributions of source code must retain the above copyright 11 1.1 cgd * notice, this list of conditions and the following disclaimer. 12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright 13 1.1 cgd * notice, this list of conditions and the following disclaimer in the 14 1.1 cgd * documentation and/or other materials provided with the distribution. 15 1.1 cgd * 3. All advertising materials mentioning features or use of this software 16 1.1 cgd * must display the following acknowledgement: 17 1.1 cgd * This product includes software developed by the University of 18 1.1 cgd * California, Berkeley and its contributors. 19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors 20 1.1 cgd * may be used to endorse or promote products derived from this software 21 1.1 cgd * without specific prior written permission. 22 1.1 cgd * 23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 1.1 cgd * SUCH DAMAGE. 34 1.1 cgd */ 35 1.1 cgd 36 1.1 cgd #ifndef lint 37 1.3 cgd #if 0 38 1.3 cgd static char sccsid[] = "@(#)pl_2.c 8.1 (Berkeley) 5/31/93"; 39 1.3 cgd #else 40 1.3 cgd static char rcsid[] = "$NetBSD: pl_2.c,v 1.3 1995/04/22 10:37:08 cgd Exp $"; 41 1.3 cgd #endif 42 1.1 cgd #endif /* not lint */ 43 1.1 cgd 44 1.1 cgd #include "player.h" 45 1.1 cgd 46 1.1 cgd play() 47 1.1 cgd { 48 1.1 cgd register struct ship *sp; 49 1.1 cgd 50 1.1 cgd for (;;) { 51 1.1 cgd switch (sgetch("~\b", (struct ship *)0, 0)) { 52 1.1 cgd case 'm': 53 1.1 cgd acceptmove(); 54 1.1 cgd break; 55 1.1 cgd case 's': 56 1.1 cgd acceptsignal(); 57 1.1 cgd break; 58 1.1 cgd case 'g': 59 1.1 cgd grapungrap(); 60 1.1 cgd break; 61 1.1 cgd case 'u': 62 1.1 cgd unfoulplayer(); 63 1.1 cgd break; 64 1.1 cgd case 'v': 65 1.1 cgd Signal("%s", (struct ship *)0, version); 66 1.1 cgd break; 67 1.1 cgd case 'b': 68 1.1 cgd acceptboard(); 69 1.1 cgd break; 70 1.1 cgd case 'f': 71 1.1 cgd acceptcombat(); 72 1.1 cgd break; 73 1.1 cgd case 'l': 74 1.1 cgd loadplayer(); 75 1.1 cgd break; 76 1.1 cgd case 'c': 77 1.1 cgd changesail(); 78 1.1 cgd break; 79 1.1 cgd case 'r': 80 1.1 cgd repair(); 81 1.1 cgd break; 82 1.1 cgd case 'B': 83 1.1 cgd Signal("'Hands to stations!'", (struct ship *)0); 84 1.1 cgd unboard(ms, ms, 1); /* cancel DBP's */ 85 1.1 cgd unboard(ms, ms, 0); /* cancel offense */ 86 1.1 cgd break; 87 1.1 cgd case '\f': 88 1.1 cgd centerview(); 89 1.1 cgd blockalarm(); 90 1.1 cgd draw_board(); 91 1.1 cgd draw_screen(); 92 1.1 cgd unblockalarm(); 93 1.1 cgd break; 94 1.1 cgd case 'L': 95 1.1 cgd mf->loadL = L_EMPTY; 96 1.1 cgd mf->loadR = L_EMPTY; 97 1.1 cgd mf->readyL = R_EMPTY; 98 1.1 cgd mf->readyR = R_EMPTY; 99 1.1 cgd Signal("Broadsides unloaded", (struct ship *)0); 100 1.1 cgd break; 101 1.1 cgd case 'q': 102 1.1 cgd Signal("Type 'Q' to quit", (struct ship *)0); 103 1.1 cgd break; 104 1.1 cgd case 'Q': 105 1.1 cgd leave(LEAVE_QUIT); 106 1.1 cgd break; 107 1.1 cgd case 'I': 108 1.1 cgd foreachship(sp) 109 1.1 cgd if (sp != ms) 110 1.1 cgd eyeball(sp); 111 1.1 cgd break; 112 1.1 cgd case 'i': 113 1.1 cgd if ((sp = closestenemy(ms, 0, 1)) == 0) 114 1.1 cgd Signal("No more ships left."); 115 1.1 cgd else 116 1.1 cgd eyeball(sp); 117 1.1 cgd break; 118 1.1 cgd case 'C': 119 1.1 cgd centerview(); 120 1.1 cgd blockalarm(); 121 1.1 cgd draw_view(); 122 1.1 cgd unblockalarm(); 123 1.1 cgd break; 124 1.1 cgd case 'U': 125 1.1 cgd upview(); 126 1.1 cgd blockalarm(); 127 1.1 cgd draw_view(); 128 1.1 cgd unblockalarm(); 129 1.1 cgd break; 130 1.1 cgd case 'D': 131 1.1 cgd case 'N': 132 1.1 cgd downview(); 133 1.1 cgd blockalarm(); 134 1.1 cgd draw_view(); 135 1.1 cgd unblockalarm(); 136 1.1 cgd break; 137 1.1 cgd case 'H': 138 1.1 cgd leftview(); 139 1.1 cgd blockalarm(); 140 1.1 cgd draw_view(); 141 1.1 cgd unblockalarm(); 142 1.1 cgd break; 143 1.1 cgd case 'J': 144 1.1 cgd rightview(); 145 1.1 cgd blockalarm(); 146 1.1 cgd draw_view(); 147 1.1 cgd unblockalarm(); 148 1.1 cgd break; 149 1.1 cgd case 'F': 150 1.1 cgd lookout(); 151 1.1 cgd break; 152 1.1 cgd case 'S': 153 1.1 cgd dont_adjust = !dont_adjust; 154 1.1 cgd blockalarm(); 155 1.1 cgd draw_turn(); 156 1.1 cgd unblockalarm(); 157 1.1 cgd break; 158 1.1 cgd } 159 1.1 cgd } 160 1.1 cgd } 161
Indexes created Wed Oct 01 15:09:59 GMT 2025