summaryrefslogtreecommitdiff
path: root/games/battlestar/cypher.c
diff options
context:
space:
mode:
Diffstat (limited to 'games/battlestar/cypher.c')
-rw-r--r--games/battlestar/cypher.c729
1 files changed, 364 insertions, 365 deletions
diff --git a/games/battlestar/cypher.c b/games/battlestar/cypher.c
index a01b94b3fa3..1de4e44fbe0 100644
--- a/games/battlestar/cypher.c
+++ b/games/battlestar/cypher.c
@@ -1,4 +1,4 @@
-/* $OpenBSD: cypher.c,v 1.5 1997/12/16 07:54:24 angelos Exp $ */
+/* $OpenBSD: cypher.c,v 1.6 1998/09/13 01:30:31 pjanzen Exp $ */
/* $NetBSD: cypher.c,v 1.3 1995/03/21 15:07:15 cgd Exp $ */
/*
@@ -38,7 +38,7 @@
#if 0
static char sccsid[] = "@(#)cypher.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: cypher.c,v 1.3 1995/03/21 15:07:15 cgd Exp $";
+static char rcsid[] = "$OpenBSD: cypher.c,v 1.6 1998/09/13 01:30:31 pjanzen Exp $";
#endif
#endif /* not lint */
@@ -47,395 +47,394 @@ static char rcsid[] = "$NetBSD: cypher.c,v 1.3 1995/03/21 15:07:15 cgd Exp $";
int
cypher()
{
- register int n;
- int junk;
- int lflag = -1;
- char buffer[10];
+ int n;
+ int junk;
+ int lflag = -1;
+ char buffer[10];
while (wordtype[wordnumber] == ADJS)
wordnumber++;
while (wordnumber <= wordcount) {
- switch(wordvalue[wordnumber]) {
-
- case UP:
- if (location[position].access || wiz || tempwiz) {
- if (!location[position].access)
- puts("Zap! A gust of wind lifts you up.");
- if (!move(location[position].up, AHEAD))
- return(-1);
- } else {
- puts("There is no way up");
- return(-1);
- }
- lflag = 0;
- break;
-
- case DOWN:
- if (!move(location[position].down, AHEAD))
- return(-1);
- lflag = 0;
- break;
-
- case LEFT:
- if (!move(left, LEFT))
- return(-1);
- lflag = 0;
- break;
-
- case RIGHT:
- if (!move(right, RIGHT))
- return(-1);
- lflag = 0;
- break;
-
- case AHEAD:
- if (!move(ahead, AHEAD))
- return(-1);
- lflag = 0;
- break;
-
- case BACK:
- if (!move(back, BACK))
- return(-1);
- lflag = 0;
- break;
-
- case SHOOT:
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(location[position].objects,n) && objsht[n]){
- wordvalue[wordnumber+1] = n;
- wordnumber = shoot();
- }
+ switch (wordvalue[wordnumber]) {
+
+ case UP:
+ if (location[position].access || wiz || tempwiz) {
+ if (!location[position].access)
+ puts("Zap! A gust of wind lifts you up.");
+ if (!move(location[position].up, AHEAD))
+ return (-1);
+ } else {
+ puts("There is no way up");
+ return (-1);
+ }
+ lflag = 0;
+ break;
+
+ case DOWN:
+ if (!move(location[position].down, AHEAD))
+ return (-1);
+ lflag = 0;
+ break;
+
+ case LEFT:
+ if (!move(left, LEFT))
+ return (-1);
+ lflag = 0;
+ break;
+
+ case RIGHT:
+ if (!move(right, RIGHT))
+ return (-1);
+ lflag = 0;
+ break;
+
+ case AHEAD:
+ if (!move(ahead, AHEAD))
+ return (-1);
+ lflag = 0;
+ break;
+
+ case BACK:
+ if (!move(back, BACK))
+ return (-1);
+ lflag = 0;
+ break;
+
+ case SHOOT:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(location[position].objects, n) && objsht[n]) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = shoot();
+ }
wordnumber++;
wordnumber++;
- }
- else
- shoot();
- break;
-
- case TAKE:
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(location[position].objects,n) && objsht[n]){
- wordvalue[wordnumber+1] = n;
- wordtype[wordnumber+1] = OBJECT;
- if ((n == AMULET) || (n == MEDALION) || (n == TALISMAN) || (n == MAN) || (n == TIMER) || (n == NATIVE))
- wordtype[wordnumber+1] = NOUNS;
- wordnumber = take(location[position].objects);
+ } else
+ shoot();
+ break;
+
+ case TAKE:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(location[position].objects, n) && objsht[n]) {
+ wordvalue[wordnumber + 1] = n;
+/* Some objects (type NOUNS) have special treatment in take(). For these
+ * we must set the type to NOUNS. However for SWORD and BODY all it does
+ * is find which of many objects is meant, so we need do nothing here.
+ * BATHGOD must become NORMGOD as well. NOUNS with no special case must be
+ * included here to get the right error. DOOR cannot occur as an object so
+ * need not be included.
+ */
+ switch (n) {
+ case BATHGOD:
+ wordvalue[wordnumber + 1] = NORMGOD;
+ case NORMGOD:
+ case AMULET:
+ case MEDALION:
+ case TALISMAN:
+ case MAN:
+ case TIMER:
+ case NATIVE:
+ wordtype[wordnumber + 1] = NOUNS;
+ break;
+ default:
+ wordtype[wordnumber + 1] = OBJECT;
}
+ wordnumber = take(location[position].objects);
+ }
wordnumber++;
wordnumber++;
- }
- else
- take(location[position].objects);
- break;
-
- case DROP:
-
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(inven,n)){
- wordvalue[wordnumber+1] = n;
- wordnumber = drop("Dropped");
- }
+ } else
+ take(location[position].objects);
+ break;
+
+ case DROP:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(inven, n)) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = drop("Dropped");
+ }
wordnumber++;
wordnumber++;
- }
- else
- drop("Dropped");
- break;
-
-
- case KICK:
- case THROW:
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(inven,n) ||
- testbit(location[position].objects, n) && objsht[n]){
- wordvalue[wordnumber+1] = n;
- wordnumber = throw(wordvalue[wordnumber] == KICK ? "Kicked" : "Thrown");
- }
- wordnumber += 2;
- } else
- throw(wordvalue[wordnumber] == KICK ? "Kicked" : "Thrown");
- break;
-
- case TAKEOFF:
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(wear,n)){
- wordvalue[wordnumber+1] = n;
- wordnumber = takeoff();
- }
- wordnumber += 2;
- }
- else
- takeoff();
- break;
-
-
- case DRAW:
-
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(wear,n)){
- wordvalue[wordnumber+1] = n;
- wordnumber = draw();
- }
- wordnumber += 2;
- }
- else
- draw();
- break;
-
-
- case PUTON:
-
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(location[position].objects,n) && objsht[n]){
- wordvalue[wordnumber+1] = n;
- wordnumber = puton();
- }
- wordnumber += 2;
- }
- else
- puton();
- break;
-
- case WEARIT:
-
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(inven,n)){
- wordvalue[wordnumber+1] = n;
- wordnumber = wearit();
- }
- wordnumber += 2;
- }
- else
- wearit();
- break;
-
-
- case EAT:
-
- if (wordnumber < wordcount && wordvalue[wordnumber+1] == EVERYTHING){
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(inven,n)){
- wordvalue[wordnumber+1] = n;
- wordnumber = eat();
- }
- wordnumber += 2;
- }
- else
- eat();
- break;
-
-
- case PUT:
- put();
- break;
-
-
- case INVEN:
- if (ucard(inven)){
- puts("You are holding:\n");
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(inven,n))
- printf("\t%s\n", objsht[n]);
- printf("\n= %d kilogram%s (%d%%)\n", carrying, (carrying == 1 ? "." : "s."),(WEIGHT ? carrying*100/WEIGHT : -1));
- printf("Your arms are %d%% full.\n",encumber*100/CUMBER);
- }
- else
- puts("You aren't carrying anything.");
-
- if (ucard(wear)){
- puts("\nYou are wearing:\n");
- for (n=0; n < NUMOFOBJECTS; n++)
- if (testbit(wear,n))
- printf("\t%s\n", objsht[n]);
- }
- else
- puts("\nYou are stark naked.");
- if (card(injuries,NUMOFINJURIES)){
- puts("\nYou have suffered:\n");
- for (n=0; n < NUMOFINJURIES; n++)
- if (injuries[n])
- printf("\t%s\n",ouch[n]);
- printf("\nYou can still carry up to %d kilogram%s\n",WEIGHT,(WEIGHT == 1 ? "." : "s."));
- }
- else
- puts("\nYou are in perfect health.");
- break;
-
- case USE:
- lflag = use();
- break;
-
- case LOOK:
- if (!notes[CANTSEE] || testbit(inven,LAMPON) || testbit(location[position].objects,LAMPON) || matchlight){
- beenthere[position] = 2;
- writedes();
- printobjs();
- if (matchlight){
- puts("\nYour match splutters out.");
- matchlight = 0;
+ } else
+ drop("Dropped");
+ break;
+
+
+ case KICK:
+ case THROW:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(inven, n) ||
+ (testbit(location[position].objects, n) && objsht[n])) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = throw(wordvalue[wordnumber] == KICK ? "Kicked" : "Thrown");
+ }
+ wordnumber += 2;
+ } else
+ throw(wordvalue[wordnumber] == KICK ? "Kicked" : "Thrown");
+ break;
+
+ case TAKEOFF:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(wear, n)) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = takeoff();
+ }
+ wordnumber += 2;
+ } else
+ takeoff();
+ break;
+
+ case DRAW:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(wear, n)) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = draw();
}
- } else
- puts("I can't see anything.");
- return(-1);
- break;
+ wordnumber += 2;
+ } else
+ draw();
+ break;
+
+ case PUTON:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(location[position].objects, n) && objsht[n]) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = puton();
+ }
+ wordnumber += 2;
+ } else
+ puton();
+ break;
+
+ case WEARIT:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(inven, n)) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = wearit();
+ }
+ wordnumber += 2;
+ } else
+ wearit();
+ break;
+
+ case EAT:
+ if (wordnumber < wordcount && wordvalue[wordnumber + 1] == EVERYTHING) {
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(inven, n)) {
+ wordvalue[wordnumber + 1] = n;
+ wordnumber = eat();
+ }
+ wordnumber += 2;
+ } else
+ eat();
+ break;
+
+ case PUT:
+ put();
+ break;
+
+ case INVEN:
+ if (ucard(inven)) {
+ puts("You are holding:\n");
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(inven, n))
+ printf("\t%s\n", objsht[n]);
+ printf("\n= %d kilogram%s (%d%%)\n", carrying, (carrying == 1 ? "." : "s."), (WEIGHT ? carrying * 100 / WEIGHT : -1));
+ printf("Your arms are %d%% full.\n", encumber * 100 / CUMBER);
+ } else
+ puts("You aren't carrying anything.");
+
+ if (ucard(wear)) {
+ puts("\nYou are wearing:\n");
+ for (n = 0; n < NUMOFOBJECTS; n++)
+ if (testbit(wear, n))
+ printf("\t%s\n", objsht[n]);
+ } else
+ puts("\nYou are stark naked.");
+ if (card(injuries, NUMOFINJURIES)) {
+ puts("\nYou have suffered:\n");
+ for (n = 0; n < NUMOFINJURIES; n++)
+ if (injuries[n])
+ printf("\t%s\n", ouch[n]);
+ printf("\nYou can still carry up to %d kilogram%s\n", WEIGHT, (WEIGHT == 1 ? "." : "s."));
+ } else
+ puts("\nYou are in perfect health.");
+ break;
+
+ case USE:
+ lflag = use();
+ break;
+
+ case LOOK:
+ if (!notes[CANTSEE] || testbit(inven, LAMPON) ||
+ testbit(location[position].objects, LAMPON)
+ || matchlight) {
+ beenthere[position] = 2;
+ writedes();
+ printobjs();
+ if (matchlight) {
+ puts("\nYour match splutters out.");
+ matchlight = 0;
+ }
+ } else
+ puts("I can't see anything.");
+ return (-1);
+ break;
- case SU:
- if (wiz || tempwiz){
+ case SU:
+ if (wiz || tempwiz) {
printf("\nRoom (was %d) = ", position);
- fgets(buffer,10,stdin);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d", &position);
- printf("Time (was %d) = ",btime);
- fgets(buffer,10,stdin);
+ sscanf(buffer, "%d", &position);
+ printf("Time (was %d) = ", ourtime);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d", &btime);
- printf("Fuel (was %d) = ",fuel);
- fgets(buffer,10,stdin);
+ sscanf(buffer, "%d", &ourtime);
+ printf("Fuel (was %d) = ", fuel);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d", &fuel);
- printf("Torps (was %d) = ",torps);
- fgets(buffer,10,stdin);
+ sscanf(buffer, "%d", &fuel);
+ printf("Torps (was %d) = ", torps);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d", &torps);
- printf("CUMBER (was %d) = ",CUMBER);
- fgets(buffer,10,stdin);
+ sscanf(buffer, "%d", &torps);
+ printf("CUMBER (was %d) = ", CUMBER);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d", &CUMBER);
- printf("WEIGHT (was %d) = ",WEIGHT);
- fgets(buffer,10,stdin);
+ sscanf(buffer, "%d", &CUMBER);
+ printf("WEIGHT (was %d) = ", WEIGHT);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d",&WEIGHT);
- printf("Clock (was %d) = ",bclock);
- fgets(buffer,10,stdin);
+ sscanf(buffer, "%d", &WEIGHT);
+ printf("Clock (was %d) = ", ourclock);
+ fgets(buffer, 10, stdin);
if (*buffer != '\n')
- sscanf(buffer,"%d",&bclock);
- printf("Wizard (was %d, %d) = ",wiz, tempwiz);
- fgets(buffer,10,stdin);
- if (*buffer != '\n'){
- sscanf(buffer,"%d",&junk);
+ sscanf(buffer, "%d", &ourclock);
+ printf("Wizard (was %d, %d) = ", wiz, tempwiz);
+ fgets(buffer, 10, stdin);
+ if (*buffer != '\n') {
+ sscanf(buffer, "%d", &junk);
if (!junk)
tempwiz = wiz = 0;
}
printf("\nDONE.\n");
- return(0);
- }
- else
- puts("You aren't a wizard.");
- break;
-
- case SCORE:
- printf("\tPLEASURE\tPOWER\t\tEGO\n");
- printf("\t%3d\t\t%3d\t\t%3d\n\n",pleasure,power,ego);
- printf("This gives you the rating of %s in %d turns.\n",rate(),btime);
- printf("You have visited %d out of %d rooms this run (%d%%).\n",card(beenthere,NUMOFROOMS),NUMOFROOMS,card(beenthere,NUMOFROOMS)*100/NUMOFROOMS);
- break;
-
- case KNIFE:
- case KILL:
- murder();
- break;
-
- case UNDRESS:
- case RAVAGE:
- ravage();
- break;
-
- case SAVE:
- save();
- break;
-
- case FOLLOW:
- lflag = follow();
- break;
-
- case GIVE:
- give();
- break;
-
- case KISS:
- kiss();
- break;
-
- case LOVE:
- love();
- break;
-
- case RIDE:
- lflag = ride();
- break;
-
- case DRIVE:
- lflag = drive();
- break;
-
- case LIGHT:
- light();
- break;
-
- case LAUNCH:
- if (!launch())
- return(-1);
- else
- lflag = 0;
- break;
-
- case LANDIT:
- if (!land())
- return(-1);
- else
- lflag = 0;
- break;
-
- case TIME:
- chime();
- break;
-
- case SLEEP:
- zzz();
- break;
-
- case DIG:
- dig();
- break;
-
- case JUMP:
- lflag = jump();
- break;
-
- case BURY:
- bury();
- break;
-
- case SWIM:
- puts("Surf's up!");
- break;
-
- case DRINK:
- drink();
- break;
-
- case QUIT:
- die(0);
-
- default:
- puts("How's that?");
- return(-1);
- break;
-
-
+ return (0);
+ } else
+ puts("You aren't a wizard.");
+ break;
+
+ case SCORE:
+ printf("\tPLEASURE\tPOWER\t\tEGO\n");
+ printf("\t%3d\t\t%3d\t\t%3d\n\n", pleasure, power, ego);
+ printf("This gives you the rating of %s in %d turns.\n", rate(), ourtime);
+ printf("You have visited %d out of %d rooms this run (%d%%).\n", card(beenthere, NUMOFROOMS), NUMOFROOMS, card(beenthere, NUMOFROOMS) * 100 / NUMOFROOMS);
+ break;
+
+ case KNIFE:
+ case KILL:
+ murder();
+ break;
+
+ case UNDRESS:
+ case RAVAGE:
+ ravage();
+ break;
+
+ case SAVE:
+ save();
+ break;
+
+ case FOLLOW:
+ lflag = follow();
+ break;
+
+ case GIVE:
+ give();
+ break;
+
+ case KISS:
+ kiss();
+ break;
+
+ case LOVE:
+ love();
+ break;
+
+ case RIDE:
+ lflag = ride();
+ break;
+
+ case DRIVE:
+ lflag = drive();
+ break;
+
+ case LIGHT:
+ light();
+ break;
+
+ case LAUNCH:
+ if (!launch())
+ return (-1);
+ else
+ lflag = 0;
+ break;
+
+ case LANDIT:
+ if (!land())
+ return (-1);
+ else
+ lflag = 0;
+ break;
+
+ case TIME:
+ chime();
+ break;
+
+ case SLEEP:
+ zzz();
+ break;
+
+ case DIG:
+ dig();
+ break;
+
+ case JUMP:
+ lflag = jump();
+ break;
+
+ case BURY:
+ bury();
+ break;
+
+ case SWIM:
+ puts("Surf's up!");
+ break;
+
+ case DRINK:
+ drink();
+ break;
+
+ case QUIT:
+ die(0);
+
+ default:
+ puts("How's that?");
+ return (-1);
+ break;
+
}
if (wordnumber < wordcount && *words[wordnumber++] == ',')
continue;
- else return(lflag);
- }
- return(lflag);
+ else
+ return (lflag);
+ }
+ return (lflag);
}