Skip to content

Commit 107c0a2

Browse files
jtcjtc
jtc
authored and
jtc
committed
adventure(6), from 44lite
1 parent 85c70ec commit 107c0a2

File tree

14 files changed

+5127
-0
lines changed

14 files changed

+5127
-0
lines changed

‎games/adventure/Makefile

Lines changed: 16 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,16 @@
1+
# @(#)Makefile 8.1 (Berkeley) 6/12/93
2+
3+
PROG= adventure
4+
SRCS= main.c init.c done.c save.c subr.c vocab.c wizard.c io.c data.c crc.c
5+
MAN6= adventure.0
6+
CFLAGS+=-traditional-cpp
7+
HIDEGAME=hidegame
8+
CLEANFILES+=setup data.c
9+
10+
data.c: glorkz setup
11+
./setup ${.CURDIR}/glorkz > data.c
12+
13+
setup: setup.c hdr.h
14+
${CC} -o setup ${.CURDIR}/setup.c
15+
16+
.include <bsd.prog.mk>

‎games/adventure/adventure.6

Lines changed: 57 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,57 @@
1+
.\" Copyright (c) 1991, 1993
2+
.\" The Regents of the University of California. All rights reserved.
3+
.\"
4+
.\" The game adventure was originally written in Fortran by Will Crowther
5+
.\" and Don Woods. It was later translated to C and enhanced by Jim
6+
.\" Gillogly. This code is derived from software contributed to Berkeley
7+
.\" by Jim Gillogly at The Rand Corporation.
8+
.\"
9+
.\" Redistribution and use in source and binary forms, with or without
10+
.\" modification, are permitted provided that the following conditions
11+
.\" are met:
12+
.\" 1. Redistributions of source code must retain the above copyright
13+
.\" notice, this list of conditions and the following disclaimer.
14+
.\" 2. Redistributions in binary form must reproduce the above copyright
15+
.\" notice, this list of conditions and the following disclaimer in the
16+
.\" documentation and/or other materials provided with the distribution.
17+
.\" 3. All advertising materials mentioning features or use of this software
18+
.\" must display the following acknowledgement:
19+
.\" This product includes software developed by the University of
20+
.\" California, Berkeley and its contributors.
21+
.\" 4. Neither the name of the University nor the names of its contributors
22+
.\" may be used to endorse or promote products derived from this software
23+
.\" without specific prior written permission.
24+
.\"
25+
.\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26+
.\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27+
.\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28+
.\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29+
.\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30+
.\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31+
.\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32+
.\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33+
.\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34+
.\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35+
.\" SUCH DAMAGE.
36+
.\"
37+
.\" @(#)adventure.6 8.1 (Berkeley) 5/31/93
38+
.\"
39+
.Dd May 31, 1993
40+
.Dt ADVENTURE 6
41+
.Os
42+
.Sh NAME
43+
.Nm adventure
44+
.Nd an exploration game
45+
.Sh SYNOPSIS
46+
.Nm adventure
47+
.Op saved-file
48+
.Sh DESCRIPTION
49+
The object of the game is to locate and explore Colossal Cave, find the
50+
treasures hidden there, and bring them back to the building with you.
51+
The program is self-descriptive to a point, but part of the game is to
52+
discover its rules.
53+
.Pp
54+
To terminate a game, enter
55+
.Dq quit ;
56+
to save a game for later resumption, enter
57+
.Dq suspend .

‎games/adventure/crc.c

Lines changed: 134 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,134 @@
1+
/*-
2+
* Copyright (c) 1993
3+
* The Regents of the University of California. All rights reserved.
4+
*
5+
* This code is derived from software contributed to Berkeley by
6+
* James W. Williams of the University of Maryland.
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. All advertising materials mentioning features or use of this software
17+
* must display the following acknowledgement:
18+
* This product includes software developed by the University of
19+
* California, Berkeley and its contributors.
20+
* 4. Neither the name of the University nor the names of its contributors
21+
* may be used to endorse or promote products derived from this software
22+
* without specific prior written permission.
23+
*
24+
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25+
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26+
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27+
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28+
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29+
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30+
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31+
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32+
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33+
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34+
* SUCH DAMAGE.
35+
*/
36+
37+
#ifndef lint
38+
static char sccsid[] = "@(#)crc.c 8.1 (Berkeley) 5/31/93";
39+
static char ORIGINAL_sccsid[] = "@(#)crc.c 5.2 (Berkeley) 4/4/91";
40+
#endif /* not lint */
41+
42+
typedef unsigned long u_long;
43+
44+
u_long crctab[] = {
45+
0x7fffffff,
46+
0x77073096, 0xee0e612c, 0x990951ba, 0x076dc419, 0x706af48f,
47+
0xe963a535, 0x9e6495a3, 0x0edb8832, 0x79dcb8a4, 0xe0d5e91e,
48+
0x97d2d988, 0x09b64c2b, 0x7eb17cbd, 0xe7b82d07, 0x90bf1d91,
49+
0x1db71064, 0x6ab020f2, 0xf3b97148, 0x84be41de, 0x1adad47d,
50+
0x6ddde4eb, 0xf4d4b551, 0x83d385c7, 0x136c9856, 0x646ba8c0,
51+
0xfd62f97a, 0x8a65c9ec, 0x14015c4f, 0x63066cd9, 0xfa0f3d63,
52+
0x8d080df5, 0x3b6e20c8, 0x4c69105e, 0xd56041e4, 0xa2677172,
53+
0x3c03e4d1, 0x4b04d447, 0xd20d85fd, 0xa50ab56b, 0x35b5a8fa,
54+
0x42b2986c, 0xdbbbc9d6, 0xacbcf940, 0x32d86ce3, 0x45df5c75,
55+
0xdcd60dcf, 0xabd13d59, 0x26d930ac, 0x51de003a, 0xc8d75180,
56+
0xbfd06116, 0x21b4f4b5, 0x56b3c423, 0xcfba9599, 0xb8bda50f,
57+
0x2802b89e, 0x5f058808, 0xc60cd9b2, 0xb10be924, 0x2f6f7c87,
58+
0x58684c11, 0xc1611dab, 0xb6662d3d, 0x76dc4190, 0x01db7106,
59+
0x98d220bc, 0xefd5102a, 0x71b18589, 0x06b6b51f, 0x9fbfe4a5,
60+
0xe8b8d433, 0x7807c9a2, 0x0f00f934, 0x9609a88e, 0xe10e9818,
61+
0x7f6a0dbb, 0x086d3d2d, 0x91646c97, 0xe6635c01, 0x6b6b51f4,
62+
0x1c6c6162, 0x856530d8, 0xf262004e, 0x6c0695ed, 0x1b01a57b,
63+
0x8208f4c1, 0xf50fc457, 0x65b0d9c6, 0x12b7e950, 0x8bbeb8ea,
64+
0xfcb9887c, 0x62dd1ddf, 0x15da2d49, 0x8cd37cf3, 0xfbd44c65,
65+
0x4db26158, 0x3ab551ce, 0xa3bc0074, 0xd4bb30e2, 0x4adfa541,
66+
0x3dd895d7, 0xa4d1c46d, 0xd3d6f4fb, 0x4369e96a, 0x346ed9fc,
67+
0xad678846, 0xda60b8d0, 0x44042d73, 0x33031de5, 0xaa0a4c5f,
68+
0xdd0d7cc9, 0x5005713c, 0x270241aa, 0xbe0b1010, 0xc90c2086,
69+
0x5768b525, 0x206f85b3, 0xb966d409, 0xce61e49f, 0x5edef90e,
70+
0x29d9c998, 0xb0d09822, 0xc7d7a8b4, 0x59b33d17, 0x2eb40d81,
71+
0xb7bd5c3b, 0xc0ba6cad, 0xedb88320, 0x9abfb3b6, 0x03b6e20c,
72+
0x74b1d29a, 0xead54739, 0x9dd277af, 0x04db2615, 0x73dc1683,
73+
0xe3630b12, 0x94643b84, 0x0d6d6a3e, 0x7a6a5aa8, 0xe40ecf0b,
74+
0x9309ff9d, 0x0a00ae27, 0x7d079eb1, 0xf00f9344, 0x8708a3d2,
75+
0x1e01f268, 0x6906c2fe, 0xf762575d, 0x806567cb, 0x196c3671,
76+
0x6e6b06e7, 0xfed41b76, 0x89d32be0, 0x10da7a5a, 0x67dd4acc,
77+
0xf9b9df6f, 0x8ebeeff9, 0x17b7be43, 0x60b08ed5, 0xd6d6a3e8,
78+
0xa1d1937e, 0x38d8c2c4, 0x4fdff252, 0xd1bb67f1, 0xa6bc5767,
79+
0x3fb506dd, 0x48b2364b, 0xd80d2bda, 0xaf0a1b4c, 0x36034af6,
80+
0x41047a60, 0xdf60efc3, 0xa867df55, 0x316e8eef, 0x4669be79,
81+
0xcb61b38c, 0xbc66831a, 0x256fd2a0, 0x5268e236, 0xcc0c7795,
82+
0xbb0b4703, 0x220216b9, 0x5505262f, 0xc5ba3bbe, 0xb2bd0b28,
83+
0x2bb45a92, 0x5cb36a04, 0xc2d7ffa7, 0xb5d0cf31, 0x2cd99e8b,
84+
0x5bdeae1d, 0x9b64c2b0, 0xec63f226, 0x756aa39c, 0x026d930a,
85+
0x9c0906a9, 0xeb0e363f, 0x72076785, 0x05005713, 0x95bf4a82,
86+
0xe2b87a14, 0x7bb12bae, 0x0cb61b38, 0x92d28e9b, 0xe5d5be0d,
87+
0x7cdcefb7, 0x0bdbdf21, 0x86d3d2d4, 0xf1d4e242, 0x68ddb3f8,
88+
0x1fda836e, 0x81be16cd, 0xf6b9265b, 0x6fb077e1, 0x18b74777,
89+
0x88085ae6, 0xff0f6a70, 0x66063bca, 0x11010b5c, 0x8f659eff,
90+
0xf862ae69, 0x616bffd3, 0x166ccf45, 0xa00ae278, 0xd70dd2ee,
91+
0x4e048354, 0x3903b3c2, 0xa7672661, 0xd06016f7, 0x4969474d,
92+
0x3e6e77db, 0xaed16a4a, 0xd9d65adc, 0x40df0b66, 0x37d83bf0,
93+
0xa9bcae53, 0xdebb9ec5, 0x47b2cf7f, 0x30b5ffe9, 0xbdbdf21c,
94+
0xcabac28a, 0x53b39330, 0x24b4a3a6, 0xbad03605, 0xcdd70693,
95+
0x54de5729, 0x23d967bf, 0xb3667a2e, 0xc4614ab8, 0x5d681b02,
96+
0x2a6f2b94, 0xb40bbe37, 0xc30c8ea1, 0x5a05df1b, 0x2d02ef8d
97+
};
98+
99+
/*
100+
* crc --
101+
* Compute a POSIX.2 checksum. This routine modified by Jim Gillogly
102+
* to work on sequential data rather than on a file. Initial call to
103+
* crc_start initializes the sum, and subsequent calls to crc update
104+
* it.
105+
*/
106+
107+
u_long crcval;
108+
int step;
109+
110+
crc_start()
111+
{
112+
crcval = step = 0;
113+
}
114+
115+
u_long crc(ptr, nr) /* Process nr bytes at a time; ptr points to them */
116+
char *ptr;
117+
int nr;
118+
{
119+
register int i;
120+
register char *p;
121+
122+
while (nr > 0)
123+
for (p = ptr; nr--; ++p)
124+
{
125+
if (!(i = crcval >> 24 ^ *p))
126+
{
127+
i = step++;
128+
if (step >= sizeof(crctab)/sizeof(crctab[0]))
129+
step = 0;
130+
}
131+
crcval = (crcval << 8) ^ crctab[i];
132+
}
133+
return crcval & 0xffffffff; /* Mask to 32 bits. */
134+
}

‎games/adventure/done.c

Lines changed: 138 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,138 @@
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[] = "@(#)done.c 8.1 (Berkeley) 5/31/93";
41+
#endif /* not lint */
42+
43+
/* Re-coding of advent in C: termination routines */
44+
45+
#include "hdr.h"
46+
47+
score() /* sort of like 20000 */
48+
{ register int scor,i;
49+
mxscor=scor=0;
50+
for (i=50; i<=maxtrs; i++)
51+
{ if (ptext[i].txtlen==0) continue;
52+
k=12;
53+
if (i==chest) k=14;
54+
if (i>chest) k=16;
55+
if (prop[i]>=0) scor += 2;
56+
if (place[i]==3&&prop[i]==0) scor += k-2;
57+
mxscor += k;
58+
}
59+
scor += (maxdie-numdie)*10;
60+
mxscor += maxdie*10;
61+
if (!(scorng||gaveup)) scor += 4;
62+
mxscor += 4;
63+
if (dflag!=0) scor += 25;
64+
mxscor += 25;
65+
if (closng) scor += 25;
66+
mxscor += 25;
67+
if (closed)
68+
{ if (bonus==0) scor += 10;
69+
if (bonus==135) scor += 25;
70+
if (bonus==134) scor += 30;
71+
if (bonus==133) scor += 45;
72+
}
73+
mxscor += 45;
74+
if (place[magzin]==108) scor++;
75+
mxscor++;
76+
scor += 2;
77+
mxscor += 2;
78+
for (i=1; i<=hntmax; i++)
79+
if (hinted[i]) scor -= hints[i][2];
80+
return(scor);
81+
}
82+
83+
done(entry) /* entry=1 means goto 13000 */ /* game is over */
84+
int entry; /* entry=2 means goto 20000 */ /* 3=19000 */
85+
{ register int i,sc;
86+
if (entry==1) mspeak(1);
87+
if (entry==3) rspeak(136);
88+
printf("\n\n\nYou scored %d out of a ",(sc=score()));
89+
printf("possible %d using %d turns.\n",mxscor,turns);
90+
for (i=1; i<=clsses; i++)
91+
if (cval[i]>=sc)
92+
{ speak(&ctext[i]);
93+
if (i==clsses-1)
94+
{ printf("To achieve the next higher rating");
95+
printf(" would be a neat trick!\n\n");
96+
printf("Congratulations!!\n");
97+
exit(0);
98+
}
99+
k=cval[i]+1-sc;
100+
printf("To achieve the next higher rating, you need");
101+
printf(" %d more point",k);
102+
if (k==1) printf(".\n");
103+
else printf("s.\n");
104+
exit(0);
105+
}
106+
printf("You just went off my scale!!!\n");
107+
exit(0);
108+
}
109+
110+
111+
die(entry) /* label 90 */
112+
int entry;
113+
{ register int i;
114+
if (entry != 99)
115+
{ rspeak(23);
116+
oldlc2=loc;
117+
}
118+
if (closng) /* 99 */
119+
{ rspeak(131);
120+
numdie++;
121+
done(2);
122+
}
123+
yea=yes(81+numdie*2,82+numdie*2,54);
124+
numdie++;
125+
if (numdie==maxdie || !yea) done(2);
126+
place[water]=0;
127+
place[oil]=0;
128+
if (toting(lamp)) prop[lamp]=0;
129+
for (i=100; i>=1; i--)
130+
{ if (!toting(i)) continue;
131+
k=oldlc2;
132+
if (i==lamp) k=1;
133+
drop(i,k);
134+
}
135+
loc=3;
136+
oldloc=loc;
137+
return(2000);
138+
}

0 commit comments

Comments
 (0)