/* -*- 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() */