1 /*- 2 * Copyright (c) 1980, 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. Neither the name of the University nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 * 29 * @(#)shield.c 8.1 (Berkeley) 5/31/93 30 * $FreeBSD: src/games/trek/shield.c,v 1.5 1999/11/30 03:49:54 billf Exp $ 31 * $DragonFly: src/games/trek/shield.c,v 1.3 2006/09/07 21:19:44 pavalos Exp $ 32 */ 33 34 #include "trek.h" 35 #include "getpar.h" 36 37 /* 38 ** SHIELD AND CLOAKING DEVICE CONTROL 39 ** 40 ** 'f' is one for auto shield up (in case of Condition RED), 41 ** zero for shield control, and negative one for cloaking 42 ** device control. 43 ** 44 ** Called with an 'up' or 'down' on the same line, it puts 45 ** the shields/cloak into the specified mode. Otherwise it 46 ** reports to the user the current mode, and asks if she wishes 47 ** to change. 48 ** 49 ** This is not a free move. Hits that occur as a result of 50 ** this move appear as though the shields are half up/down, 51 ** so you get partial hits. 52 */ 53 54 struct cvntab Udtab[] = { 55 { "u", "p", (cmdfun)1, 0 }, 56 { "d", "own", (cmdfun)0, 0 }, 57 { NULL, NULL, NULL, 0 } 58 }; 59 60 void 61 shield(int f) 62 { 63 int i; 64 struct cvntab *r; 65 char s[100]; 66 const char *device, *dev2, *dev3; 67 int ind; 68 char *stat; 69 70 if (f > 0 && (Ship.shldup || damaged(SRSCAN))) 71 return; 72 if (f < 0) { 73 /* cloaking device */ 74 if (Ship.ship == QUEENE) { 75 printf("Ye Faire Queene does not have the cloaking device.\n"); 76 return; 77 } 78 device = "Cloaking device"; 79 dev2 = "is"; 80 ind = CLOAK; 81 dev3 = "it"; 82 stat = &Ship.cloaked; 83 } else { 84 /* shields */ 85 device = "Shields"; 86 dev2 = "are"; 87 dev3 = "them"; 88 ind = SHIELD; 89 stat = &Ship.shldup; 90 } 91 if (damaged(ind)) { 92 if (f <= 0) 93 out(ind); 94 return; 95 } 96 if (Ship.cond == DOCKED) { 97 printf("%s %s down while docked\n", device, dev2); 98 return; 99 } 100 if (f <= 0 && !testnl()) { 101 r = getcodpar("Up or down", Udtab); 102 i = (long) r->value; 103 } else { 104 if (*stat) 105 sprintf(s, "%s %s up. Do you want %s down", device, dev2, dev3); 106 else 107 sprintf(s, "%s %s down. Do you want %s up", device, dev2, dev3); 108 if (!getynpar(s)) 109 return; 110 i = !*stat; 111 } 112 if (*stat == i) { 113 printf("%s already ", device); 114 if (i) 115 printf("up\n"); 116 else 117 printf("down\n"); 118 return; 119 } 120 if (i) { 121 if (f >= 0) 122 Ship.energy -= Param.shupengy; 123 else 124 Ship.cloakgood = 0; 125 } 126 Move.free = 0; 127 if (f >= 0) 128 Move.shldchg = 1; 129 *stat = i; 130 return; 131 } 132