wizard.c revision 1.1 1 /*-
2 * Copyright (c) 1991, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * The game adventure was originally written in Fortran by Will Crowther
6 * and Don Woods. It was later translated to C and enhanced by Jim
7 * Gillogly. This code is derived from software contributed to Berkeley
8 * by Jim Gillogly at The Rand Corporation.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 */
38
39 #ifndef lint
40 static char sccsid[] = "@(#)wizard.c 8.1 (Berkeley) 6/2/93";
41 #endif /* not lint */
42
43 /* Re-coding of advent in C: privileged operations */
44
45 # include "hdr.h"
46
47 datime(d,t)
48 int *d,*t;
49 { int tvec[2],*tptr;
50 int *localtime();
51
52 time(tvec);
53 tptr=localtime(tvec);
54 *d=tptr[7]+365*(tptr[5]-77); /* day since 1977 (mod leap) */
55 /* bug: this will overflow in the year 2066 AD */
56 /* it will be attributed to Wm the C's millenial celebration */
57 *t=tptr[2]*60+tptr[1]; /* and minutes since midnite */
58 } /* pretty painless */
59
60
61 char magic[6];
62
63 poof()
64 {
65 strcpy(magic, DECR(d,w,a,r,f));
66 latncy = 45;
67 }
68
69 Start(n)
70 { int d,t,delay;
71
72 datime(&d,&t);
73 delay=(d-saved)*1440+(t-savet); /* good for about a month */
74
75 if (delay >= latncy)
76 { saved = -1;
77 return(FALSE);
78 }
79 printf("This adventure was suspended a mere %d minute%s ago.",
80 delay, delay == 1? "" : "s");
81 if (delay <= latncy/3)
82 { mspeak(2);
83 exit(0);
84 }
85 mspeak(8);
86 if (!wizard())
87 { mspeak(9);
88 exit(0);
89 }
90 saved = -1;
91 return(FALSE);
92 }
93
94 wizard() /* not as complex as advent/10 (for now) */
95 { register int wiz;
96 char *word,*x;
97 if (!yesm(16,0,7)) return(FALSE);
98 mspeak(17);
99 getin(&word,&x);
100 if (!weq(word,magic))
101 { mspeak(20);
102 return(FALSE);
103 }
104 mspeak(19);
105 return(TRUE);
106 }
107
108 ciao(cmdfile)
109 char *cmdfile;
110 { register char *c;
111 register int outfd, size;
112 char fname[80], buf[512];
113 extern unsigned filesize;
114
115 printf("What would you like to call the saved version?\n");
116 for (c=fname;; c++)
117 if ((*c=getchar())=='\n') break;
118 *c=0;
119 if (save(fname) != 0) return; /* Save failed */
120 printf("To resume, say \"adventure %s\".\n", fname);
121 printf("\"With these rooms I might now have been familiarly acquainted.\"\n");
122 exit(0);
123 }
124
125
126 ran(range)
127 int range;
128 {
129 long rand(), i;
130
131 i = rand() % range;
132 return(i);
133 }
134