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