room.c revision 1.14 1 1.14 mrg /* $NetBSD: room.c,v 1.14 2019/10/05 23:34:14 mrg 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.11 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 cgd * may be used to endorse or promote products derived from this software
17 1.1 cgd * without specific prior written permission.
18 1.1 cgd *
19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 cgd * SUCH DAMAGE.
30 1.1 cgd */
31 1.1 cgd
32 1.5 lukem #include <sys/cdefs.h>
33 1.1 cgd #ifndef lint
34 1.3 cgd #if 0
35 1.4 tls static char sccsid[] = "@(#)room.c 8.2 (Berkeley) 4/28/95";
36 1.3 cgd #else
37 1.14 mrg __RCSID("$NetBSD: room.c,v 1.14 2019/10/05 23:34:14 mrg Exp $");
38 1.3 cgd #endif
39 1.6 lukem #endif /* not lint */
40 1.1 cgd
41 1.4 tls #include "extern.h"
42 1.1 cgd
43 1.5 lukem void
44 1.12 jmc writedes(void)
45 1.1 cgd {
46 1.6 lukem int compass;
47 1.7 hubertf const char *p;
48 1.6 lukem int c;
49 1.1 cgd
50 1.1 cgd printf("\n\t%s\n", location[position].name);
51 1.10 jsm if (beenthere[position] < ROOMDESC || verbose) {
52 1.1 cgd compass = NORTH;
53 1.5 lukem for (p = location[position].desc; (c = *p++) != 0;)
54 1.9 jsm if (c != '-' && c != '*' && c != '+') {
55 1.9 jsm if (c == '=')
56 1.9 jsm putchar('-');
57 1.9 jsm else
58 1.9 jsm putchar(c);
59 1.9 jsm } else {
60 1.1 cgd if (c != '*')
61 1.13 joerg printf("%s", truedirec(compass, c));
62 1.1 cgd compass++;
63 1.1 cgd }
64 1.1 cgd }
65 1.1 cgd }
66 1.1 cgd
67 1.5 lukem void
68 1.12 jmc printobjs(void)
69 1.1 cgd {
70 1.5 lukem unsigned int *p = location[position].objects;
71 1.6 lukem int n;
72 1.1 cgd
73 1.1 cgd printf("\n");
74 1.1 cgd for (n = 0; n < NUMOFOBJECTS; n++)
75 1.1 cgd if (testbit(p, n) && objdes[n])
76 1.1 cgd puts(objdes[n]);
77 1.1 cgd }
78 1.1 cgd
79 1.5 lukem void
80 1.12 jmc whichway(struct room here)
81 1.1 cgd {
82 1.6 lukem switch (direction) {
83 1.1 cgd
84 1.6 lukem case NORTH:
85 1.6 lukem left = here.west;
86 1.6 lukem right = here.east;
87 1.6 lukem ahead = here.north;
88 1.6 lukem back = here.south;
89 1.6 lukem break;
90 1.6 lukem
91 1.6 lukem case SOUTH:
92 1.6 lukem left = here.east;
93 1.6 lukem right = here.west;
94 1.6 lukem ahead = here.south;
95 1.6 lukem back = here.north;
96 1.6 lukem break;
97 1.6 lukem
98 1.6 lukem case EAST:
99 1.6 lukem left = here.north;
100 1.6 lukem right = here.south;
101 1.6 lukem ahead = here.east;
102 1.6 lukem back = here.west;
103 1.6 lukem break;
104 1.6 lukem
105 1.6 lukem case WEST:
106 1.6 lukem left = here.south;
107 1.6 lukem right = here.north;
108 1.6 lukem ahead = here.west;
109 1.6 lukem back = here.east;
110 1.6 lukem break;
111 1.1 cgd
112 1.1 cgd }
113 1.1 cgd }
114 1.1 cgd
115 1.12 jmc const char *
116 1.12 jmc truedirec(int way, int option)
117 1.1 cgd {
118 1.6 lukem switch (way) {
119 1.1 cgd
120 1.6 lukem case NORTH:
121 1.6 lukem switch (direction) {
122 1.1 cgd case NORTH:
123 1.6 lukem return ("ahead");
124 1.6 lukem case SOUTH:
125 1.6 lukem return (option == '+' ? "behind you" :
126 1.6 lukem "back");
127 1.6 lukem case EAST:
128 1.6 lukem return ("left");
129 1.6 lukem case WEST:
130 1.6 lukem return ("right");
131 1.6 lukem }
132 1.14 mrg break;
133 1.1 cgd
134 1.6 lukem case SOUTH:
135 1.6 lukem switch (direction) {
136 1.6 lukem case NORTH:
137 1.6 lukem return (option == '+' ? "behind you" :
138 1.6 lukem "back");
139 1.1 cgd case SOUTH:
140 1.6 lukem return ("ahead");
141 1.6 lukem case EAST:
142 1.6 lukem return ("right");
143 1.6 lukem case WEST:
144 1.6 lukem return ("left");
145 1.6 lukem }
146 1.14 mrg break;
147 1.1 cgd
148 1.6 lukem case EAST:
149 1.6 lukem switch (direction) {
150 1.6 lukem case NORTH:
151 1.6 lukem return ("right");
152 1.6 lukem case SOUTH:
153 1.6 lukem return ("left");
154 1.1 cgd case EAST:
155 1.6 lukem return ("ahead");
156 1.6 lukem case WEST:
157 1.6 lukem return (option == '+' ? "behind you" :
158 1.6 lukem "back");
159 1.6 lukem }
160 1.14 mrg break;
161 1.1 cgd
162 1.6 lukem case WEST:
163 1.6 lukem switch (direction) {
164 1.6 lukem case NORTH:
165 1.6 lukem return ("left");
166 1.6 lukem case SOUTH:
167 1.6 lukem return ("right");
168 1.6 lukem case EAST:
169 1.6 lukem return (option == '+' ? "behind you" :
170 1.6 lukem "back");
171 1.1 cgd case WEST:
172 1.6 lukem return ("ahead");
173 1.6 lukem }
174 1.14 mrg break;
175 1.14 mrg }
176 1.1 cgd
177 1.14 mrg printf("Error: room %d. More than four directions wanted.",
178 1.14 mrg position);
179 1.14 mrg return ("!!");
180 1.1 cgd }
181 1.1 cgd
182 1.5 lukem void
183 1.12 jmc newway(int thisway)
184 1.1 cgd {
185 1.6 lukem switch (direction) {
186 1.1 cgd
187 1.6 lukem case NORTH:
188 1.6 lukem switch (thisway) {
189 1.6 lukem case LEFT:
190 1.6 lukem direction = WEST;
191 1.6 lukem break;
192 1.6 lukem case RIGHT:
193 1.6 lukem direction = EAST;
194 1.6 lukem break;
195 1.6 lukem case BACK:
196 1.6 lukem direction = SOUTH;
197 1.6 lukem break;
198 1.6 lukem }
199 1.6 lukem break;
200 1.6 lukem case SOUTH:
201 1.6 lukem switch (thisway) {
202 1.6 lukem case LEFT:
203 1.6 lukem direction = EAST;
204 1.6 lukem break;
205 1.6 lukem case RIGHT:
206 1.6 lukem direction = WEST;
207 1.6 lukem break;
208 1.6 lukem case BACK:
209 1.6 lukem direction = NORTH;
210 1.6 lukem break;
211 1.6 lukem }
212 1.6 lukem break;
213 1.6 lukem case EAST:
214 1.6 lukem switch (thisway) {
215 1.6 lukem case LEFT:
216 1.6 lukem direction = NORTH;
217 1.6 lukem break;
218 1.6 lukem case RIGHT:
219 1.6 lukem direction = SOUTH;
220 1.6 lukem break;
221 1.6 lukem case BACK:
222 1.6 lukem direction = WEST;
223 1.6 lukem break;
224 1.6 lukem }
225 1.6 lukem break;
226 1.6 lukem case WEST:
227 1.6 lukem switch (thisway) {
228 1.6 lukem case LEFT:
229 1.6 lukem direction = SOUTH;
230 1.1 cgd break;
231 1.6 lukem case RIGHT:
232 1.6 lukem direction = NORTH;
233 1.1 cgd break;
234 1.6 lukem case BACK:
235 1.6 lukem direction = EAST;
236 1.1 cgd break;
237 1.6 lukem }
238 1.6 lukem break;
239 1.6 lukem }
240 1.1 cgd }
241