1 /* 2 * Copyright (c) 1983, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 #if 0 36 static char sccsid[] = "@(#)pl_6.c 8.1 (Berkeley) 5/31/93"; 37 #endif 38 static const char rcsid[] = 39 "$FreeBSD: src/games/sail/pl_6.c,v 1.5 1999/11/30 03:49:37 billf Exp $"; 40 #endif /* not lint */ 41 42 #include "player.h" 43 44 repair() 45 { 46 char c; 47 char *repairs; 48 struct shipspecs *ptr = mc; 49 int count; 50 51 #define FIX(x, m) (m - ptr->x > count \ 52 ? (ptr->x += count, count = 0) : (count -= m - ptr->x, ptr->x = m)) 53 54 if (repaired || loaded || fired || changed || turned()) { 55 Signal("No hands free to repair", (struct ship *)0); 56 return; 57 } 58 c = sgetch("Repair (hull, guns, rigging)? ", (struct ship *)0, 1); 59 switch (c) { 60 case 'h': 61 repairs = &mf->RH; 62 break; 63 case 'g': 64 repairs = &mf->RG; 65 break; 66 case 'r': 67 repairs = &mf->RR; 68 break; 69 default: 70 Signal("Avast heaving!", (struct ship *)0); 71 return; 72 } 73 if (++*repairs >= 3) { 74 count = 2; 75 switch (c) { 76 case 'h': { 77 int max = ptr->guns/4; 78 if (ptr->hull < max) { 79 FIX(hull, max); 80 Write(W_HULL, ms, 0, ptr->hull, 0, 0, 0); 81 } 82 break; 83 } 84 case 'g': 85 if (ptr->gunL < ptr->gunR) { 86 int max = ptr->guns/5 - ptr->carL; 87 if (ptr->gunL < max) { 88 FIX(gunL, max); 89 Write(W_GUNL, ms, 0, ptr->gunL, 90 ptr->carL, 0, 0); 91 } 92 } else { 93 int max = ptr->guns/5 - ptr->carR; 94 if (ptr->gunR < max) { 95 FIX(gunR, max); 96 Write(W_GUNR, ms, 0, ptr->gunR, 97 ptr->carR, 0, 0); 98 } 99 } 100 break; 101 case 'r': 102 #define X 2 103 if (ptr->rig4 >= 0 && ptr->rig4 < X) { 104 FIX(rig4, X); 105 Write(W_RIG4, ms, 0, ptr->rig4, 0, 0, 0); 106 } 107 if (count && ptr->rig3 < X) { 108 FIX(rig3, X); 109 Write(W_RIG3, ms, 0, ptr->rig3, 0, 0, 0); 110 } 111 if (count && ptr->rig2 < X) { 112 FIX(rig2, X); 113 Write(W_RIG2, ms, 0, ptr->rig2, 0, 0, 0); 114 } 115 if (count && ptr->rig1 < X) { 116 FIX(rig1, X); 117 Write(W_RIG1, ms, 0, ptr->rig1, 0, 0, 0); 118 } 119 break; 120 } 121 if (count == 2) { 122 Signal("Repairs completed.", (struct ship *)0); 123 *repairs = 2; 124 } else { 125 *repairs = 0; 126 blockalarm(); 127 draw_stat(); 128 unblockalarm(); 129 } 130 } 131 blockalarm(); 132 draw_slot(); 133 unblockalarm(); 134 repaired = 1; 135 } 136 137 turned() 138 { 139 char *p; 140 141 for (p = movebuf; *p; p++) 142 if (*p == 'r' || *p == 'l') 143 return 1; 144 return 0; 145 } 146 147 loadplayer() 148 { 149 char c; 150 int loadL, loadR, ready, load; 151 152 if (!mc->crew3) { 153 Signal("Out of crew", (struct ship *)0); 154 return; 155 } 156 loadL = mf->loadL; 157 loadR = mf->loadR; 158 if (!loadL && !loadR) { 159 c = sgetch("Load which broadside (left or right)? ", 160 (struct ship *)0, 1); 161 if (c == 'r') 162 loadL = 1; 163 else 164 loadR = 1; 165 } 166 if (!loadL && loadR || loadL && !loadR) { 167 c = sgetch("Reload with (round, double, chain, grape)? ", 168 (struct ship *)0, 1); 169 switch (c) { 170 case 'r': 171 load = L_ROUND; 172 ready = 0; 173 break; 174 case 'd': 175 load = L_DOUBLE; 176 ready = R_DOUBLE; 177 break; 178 case 'c': 179 load = L_CHAIN; 180 ready = 0; 181 break; 182 case 'g': 183 load = L_GRAPE; 184 ready = 0; 185 break; 186 default: 187 Signal("Broadside not loaded.", 188 (struct ship *)0); 189 return; 190 } 191 if (!loadR) { 192 mf->loadR = load; 193 mf->readyR = ready|R_LOADING; 194 } else { 195 mf->loadL = load; 196 mf->readyL = ready|R_LOADING; 197 } 198 loaded = 1; 199 } 200 } 201