DataMuseum.dk

top - metrics - download

    Length: 857 (0x359)
    Types: TextFile
    Names: »cvand.c«

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Crystal/cvand.c« 

TextFile

/* cvand.c
 *	perform acts of vandalism in the "outer" game
 *************************************************************************/

#include	<stdio.h>
#include	"cvobj.h"
#include	"cvlocs.h"
#include	"cvocab.h"
#include	"cvmisc.h"
#include	"cvorcs.h"
#include	"cvcode.h"

int
mutilate(object) register struct cvobj *object;
{	if (object->prop) {rspeak(25); return 0;} /*already broken*/
	object->prop = 1;
	if (DAM->prop) {rspeak(197); return 0;} /* bust it, but that's all */
	return getrick();
}


int
getrick()
{	register struct cvloc *dest;
	register int p;

	dest = loc;
	rspeak(18); /* He says: */
	pspeak(RICK, p = (RICK->prop++)); /* depends on how annoyed he is */
	DOOR->prop = 1;
	if (p > 1) dest = O_GATE->conn1.where;
	if (p > 2) dest = DOOR->conn1.where;
	if (p > 3) DOOR->prop = 0;
	if (p > 4) destry(KEY);
	return (int)(dest - cvloc);
}