![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to com2.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / games / battlestar|
Return to com2.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / games / battlestar |
1.1 root 1: /*
2: * Copyright (c) 1983 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted
6: * provided that: (1) source distributions retain this entire copyright
7: * notice and comment, and (2) distributions including binaries display
8: * the following acknowledgement: ``This product includes software
9: * developed by the University of California, Berkeley and its contributors''
10: * in the documentation or other materials provided with the distribution
11: * and in all advertising materials mentioning features or use of this
12: * software. Neither the name of the University nor the names of its
13: * contributors may be used to endorse or promote products derived
14: * from this software without specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
16: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17: * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)com2.c 5.3 (Berkeley) 6/1/90";
22: #endif /* not lint */
23:
24: #include "externs.h"
25:
26: wearit() /* synonyms = {sheathe, sheath} */
27: {
28: register int n;
29: int firstnumber, value;
30:
31: firstnumber = wordnumber;
32: while(wordtype[++wordnumber] == ADJS);
33: while(wordnumber <= wordcount){
34: value = wordvalue[wordnumber];
35: for (n=0; objsht[value][n]; n++);
36: switch(value){
37:
38: case -1:
39: puts("Wear what?");
40: return(firstnumber);
41:
42: default:
43: printf("You can't wear%s%s!\n",(objsht[value][n-1] == 's' ? " " : " a "),objsht[value]);
44: return(firstnumber);
45:
46: case KNIFE:
47: /* case SHIRT: */
48: case ROBE:
49: case LEVIS: /* wearable things */
50: case SWORD:
51: case MAIL:
52: case HELM:
53: case SHOES:
54: case PAJAMAS:
55: case COMPASS:
56: case LASER:
57: case AMULET:
58: case TALISMAN:
59: case MEDALION:
60: case ROPE:
61: case RING:
62: case BRACELET:
63: case GRENADE:
64:
65: if (testbit(inven,value)){
66: clearbit(inven,value);
67: setbit(wear,value);
68: carrying -= objwt[value];
69: encumber -= objcumber[value];
70: time++;
71: printf("You are now wearing %s %s.\n",(objsht[value][n-1] == 's' ? "the" : "a"), objsht[value]);
72: }
73: else if (testbit(wear,value))
74: printf("You are already wearing the %s.\n", objsht[value]);
75: else
76: printf("You aren't holding the %s.\n", objsht[value]);
77: if (wordnumber < wordcount - 1 && wordvalue[++wordnumber] == AND)
78: wordnumber++;
79: else
80: return(firstnumber);
81: } /* end switch */
82: } /* end while */
83: puts("Don't be ridiculous.");
84: return(firstnumber);
85: }
86:
87: put() /* synonyms = {buckle, strap, tie} */
88: {
89: if (wordvalue[wordnumber + 1] == ON){
90: wordvalue[++wordnumber] = PUTON;
91: return(cypher());
92: }
93: if (wordvalue[wordnumber + 1] == DOWN){
94: wordvalue[++wordnumber] = DROP;
95: return(cypher());
96: }
97: puts("I don't understand what you want to put.");
98: return(-1);
99:
100: }
101:
102: draw() /* synonyms = {pull, carry} */
103: {
104: return(take(wear));
105: }
106:
107: use()
108: {
109: while (wordtype[++wordnumber] == ADJS && wordnumber < wordcount);
110: if (wordvalue[wordnumber] == AMULET && testbit(inven,AMULET) && position != FINAL){
111: puts("The amulet begins to glow.");
112: if (testbit(inven,MEDALION)){
113: puts("The medallion comes to life too.");
114: if (position == 114){
115: location[position].down = 160;
116: whichway(location[position]);
117: puts("The waves subside and it is possible to descend to the sea cave now.");
118: time++;
119: return(-1);
120: }
121: }
122: puts("A light mist falls over your eyes and the sound of purling water trickles in");
123: puts("your ears. When the mist lifts you are standing beside a cool stream.");
124: if (position == 229)
125: position = 224;
126: else
127: position = 229;
128: time++;
129: return(0);
130: }
131: else if (position == FINAL)
132: puts("The amulet won't work in here.");
133: else if (wordvalue[wordnumber] == COMPASS && testbit(inven,COMPASS))
134: printf("Your compass points %s.\n",truedirec(NORTH,'-'));
135: else if (wordvalue[wordnumber] == COMPASS)
136: puts("You aren't holding the compass.");
137: else if (wordvalue[wordnumber] == AMULET)
138: puts("You aren't holding the amulet.");
139: else
140: puts("There is no apparent use.");
141: return(-1);
142: }
143:
144: murder()
145: {
146: register int n;
147:
148: for (n=0; !((n == SWORD || n == KNIFE || n == TWO_HANDED || n == MACE || n == CLEAVER || n == BROAD || n == CHAIN || n == SHOVEL || n == HALBERD) && testbit(inven,n)) && n < NUMOFOBJECTS; n++);
149: if (n == NUMOFOBJECTS)
150: puts("You don't have suitable weapons to kill.");
151: else {
152: printf("Your %s should do the trick.\n",objsht[n]);
153: while (wordtype[++wordnumber] == ADJS);
154: switch(wordvalue[wordnumber]){
155:
156: case NORMGOD:
157: if (testbit(location[position].objects,BATHGOD)){
158: puts("The goddess's head slices off. Her corpse floats in the water.");
159: clearbit(location[position].objects,BATHGOD);
160: setbit(location[position].objects,DEADGOD);
161: power += 5;
162: notes[JINXED]++;
163: } else if (testbit(location[position].objects,NORMGOD)){
164: puts("The goddess pleads but you strike her mercilessly. Her broken body lies in a\npool of blood.");
165: clearbit(location[position].objects,NORMGOD);
166: setbit(location[position].objects,DEADGOD);
167: power += 5;
168: notes[JINXED]++;
169: if (wintime)
170: live();
171: } else puts("I dont see her anywhere.");
172: break;
173: case TIMER:
174: if (testbit(location[position].objects,TIMER)){
175: puts("The old man offers no resistance.");
176: clearbit(location[position].objects,TIMER);
177: setbit(location[position].objects,DEADTIME);
178: power++;
179: notes[JINXED]++;
180: } else puts("Who?");
181: break;
182: case NATIVE:
183: if (testbit(location[position].objects,NATIVE)){
184: puts("The girl screams as you cut her body to shreds. She is dead.");
185: clearbit(location[position].objects,NATIVE);
186: setbit(location[position].objects,DEADNATIVE);
187: power += 5;
188: notes[JINXED]++;
189: } else puts("What girl?");
190: break;
191: case MAN:
192: if (testbit(location[position].objects,MAN)){
193: puts("You strike him to the ground, and he coughs up blood.");
194: puts("Your fantasy is over.");
195: die();
196: }
197: case -1:
198: puts("Kill what?");
199: break;
200:
201: default:
202: if (wordtype[wordnumber] != NOUNS)
203: puts("Kill what?");
204: else
205: printf("You can't kill the %s!\n",objsht[wordvalue[wordnumber]]);
206: }
207: }
208: }
209:
210: ravage()
211: {
212: while (wordtype[++wordnumber] != NOUNS && wordnumber <= wordcount);
213: if (wordtype[wordnumber] == NOUNS && testbit(location[position].objects,wordvalue[wordnumber])){
214: time++;
215: switch(wordvalue[wordnumber]){
216: case NORMGOD:
217: puts("You attack the goddess, and she screams as you beat her. She falls down");
218: puts("crying and tries to hold her torn and bloodied dress around her.");
219: power += 5;
220: pleasure += 8;
221: ego -= 10;
222: wordnumber--;
223: godready = -30000;
224: murder();
225: win = -30000;
226: break;
227: case NATIVE:
228: puts("The girl tries to run, but you catch her and throw her down. Her face is");
229: puts("bleeding, and she screams as you tear off her clothes.");
230: power += 3;
231: pleasure += 5;
232: ego -= 10;
233: wordnumber--;
234: murder();
235: if (rnd(100) < 50){
236: puts("Her screams have attracted attention. I think we are surrounded.");
237: setbit(location[ahead].objects,WOODSMAN);
238: setbit(location[ahead].objects,DEADWOOD);
239: setbit(location[ahead].objects,MALLET);
240: setbit(location[back].objects,WOODSMAN);
241: setbit(location[back].objects,DEADWOOD);
242: setbit(location[back].objects,MALLET);
243: setbit(location[left].objects,WOODSMAN);
244: setbit(location[left].objects,DEADWOOD);
245: setbit(location[left].objects,MALLET);
246: setbit(location[right].objects,WOODSMAN);
247: setbit(location[right].objects,DEADWOOD);
248: setbit(location[right].objects,MALLET);
249: }
250: break;
251: default:
252: puts("You are perverted.");
253: }
254: }
255: else
256: puts("Who?");
257: }
258:
259: follow()
260: {
261: if (followfight == time){
262: puts("The Dark Lord leaps away and runs down secret tunnels and corridoors.");
263: puts("You chase him through the darkness and splash in pools of water.");
264: puts("You have cornered him. His laser sword extends as he steps forward.");
265: position = FINAL;
266: fight(DARK,75);
267: setbit(location[position].objects,TALISMAN);
268: setbit(location[position].objects,AMULET);
269: return(0);
270: }
271: else if (followgod == time){
272: puts("The goddess leads you down a steamy tunnel and into a high, wide chamber.");
273: puts("She sits down on a throne.");
274: position = 268;
275: setbit(location[position].objects,NORMGOD);
276: notes[CANTSEE] = 1;
277: return(0);
278: }
279: else
280: puts("There is no one to follow.");
281: return(-1);
282: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.