X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=actions1.c;h=2c7d3365d2b42bf7a75198f07a1705d24df4e77f;hb=809f53d099f51558e69f0be8038844f445ddbb60;hp=464faffb03168701bdd16fa2ff66f2791d672463;hpb=50ab7b9d47ffefaf3d526c50b34fda9280823937;p=open-adventure.git diff --git a/actions1.c b/actions1.c index 464faff..2c7d336 100644 --- a/actions1.c +++ b/actions1.c @@ -1,13 +1,10 @@ +#include +#include #include "misc.h" #include "main.h" #include "share.h" #include "funcs.h" -#define TRUE (0==0) -#define FALSE (0!=0) - -extern carry(), discard(long), attack(), throw(), feed(), fill(); - /* This stuff was broken off as part of an effort to get the main program * to compile without running out of memory. We're called with a number * that says what label the caller wanted to "goto", and we return a @@ -17,7 +14,7 @@ extern carry(), discard(long), attack(), throw(), feed(), fill(); /* ANALYSE A VERB. REMEMBER WHAT IT WAS, GO BACK FOR OBJECT IF SECOND WORD * UNLESS VERB IS "SAY", WHICH SNARFS ARBITRARY SECOND WORD. */ -int action(STARTAT)long STARTAT; { +int action(long STARTAT) { switch(STARTAT) { case 4000: goto L4000; case 4090: goto L4090; @@ -126,7 +123,7 @@ L8010: if(ATLOC[LOC] == 0 || LINK[ATLOC[LOC]] != 0 || ATDWRF(LOC) > 0) return(80 /* TRANSITIVE CARRY/DROP ARE IN SEPARATE FILE. */ L9010: return(carry()); -L9020: return(discard(FALSE)); +L9020: return(discard(false)); /* SAY. ECHO WD2 (OR WD1 IF NO WD2 (SAY WHAT?, ETC.).) MAGIC WORDS OVERRIDE. */ @@ -166,7 +163,7 @@ L9040: if(OBJ == CLAM || OBJ == OYSTER) goto L9046; if(!CLOSNG) goto L9043; K=130; if(!PANIC)CLOCK2=15; - PANIC=TRUE; + PANIC=true; return(2010); L9043: K=34+PROP[GRATE]; @@ -373,9 +370,9 @@ L8200: SPK=98; /* 8201 */ for (I=1; I<=100; I++) { if(I == BEAR || !TOTING(I)) goto L8201; if(SPK == 98)RSPEAK(99); - BLKLIN=FALSE; + BLKLIN=false; PSPEAK(I,-1); - BLKLIN=TRUE; + BLKLIN=true; SPK=0; L8201: /*etc*/ ; } /* end loop */ @@ -521,7 +518,7 @@ L8305: DATIME(I,K); ZZWORD=RNDVOC(3,ZZWORD-MESH*2)+MESH*2; if(KK > 0) return(8); RSPEAK(266); - exit(FALSE); + exit(0); /* RESUME. READ A SUSPENDED GAME BACK FROM A FILE. */ @@ -537,7 +534,7 @@ L8312: SETPRM(1,K/10,MOD(K,10)); return(2000); L8318: RSPEAK(270); - exit(FALSE); + exit(0); /* FLY. SNIDE REMARKS UNLESS HOVERING RUG IS HERE. */