/* -*- LPC -*- */
/*
* $Locker: $
* $Id: hallucination.c,v 1.1 1998/01/06 04:36:51 ceres Exp $
* $Log: hallucination.c,v $
* Revision 1.1 1998/01/06 04:36:51 ceres
* Initial revision
*
*/
#include "path.h"
#define THINGS (string)( EFFECTS +"hallucination" )->strange_things()
inherit "/std/effect_shadow";
int query_hallucinating() { return 1; }
int look_me( string words ) {
if ( !words ) {
if ( random( 10 ) > 3 )
tell_object( player, "Your vision is obscurred by the "+
THINGS +".\n");
else {
tell_object( player, "You can just see through the cloud of "+
THINGS +".\n" );
player->look_me();
}
return 1;
}
tell_object( player, "You can't get a clear view at "+ words +
" while the "+ THINGS +" are in the way.\n" );
return 1;
} /* look_me() */
int glance( string words ) {
tell_object( player, "Your vision is obscurred by the "+
THINGS +".\n");
return 1;
} /* glance() */
void attack() {
if ( random( 2 ) ) {
tell_object( player, "You can't move your arms and legs while "+
"all the "+ THINGS +" are sitting on them.\n" );
return;
}
player->attack();
} /* attack() */
int cast( string words ) {
if ( random( 2 ) ) {
tell_object( player, "A horde of "+ THINGS +" goes marching "+
"past which you find much more interesting.\n" );
return 1;
}
return (int)player->cast( words );
} /* cast() */