COWbrowse

You are looking at a strange glowing substance leaking out from the broken container

This looks kinda dangerous, I wouldn`t get too close if I were you.

Created by omenofdoom, last updated 01 Jul 2009

Code

##tickloc:runsub checkit;

##checkit:
runsub doit/3;

##doit:
foreach in $loc do hurtit player;

##hurtit:
print "[$for_id] is hurt from the radiation emanating from [$actor]!";
$fhlth = $for_id's health;
take 1 from $fhlth;
set $for_id's health to $fhlth;