>fight_prog 6~ if rand(50) pmote seems to absorb the shock of $n's attack! else pmote opens its gaping jaws and strikes! cas poison endif ~ >act_prog p pops into existence.~ if isnghost ($n) yell $n, I don't want you here! murder $n c 'dispel magic' endif ~ >all_greet_prog 100~ if isnghost ($n) if ispc($n) murder $n endif endif ~ >entry_prog 100~ if isnghost ($n) if ispc($n) murder $n endif endif ~ >rand_prog 4~ if rand(50) mpasound A strange crackling fills the air. else mpasound You can hear something squirming nearby. endif ~ |