if reacting to arrives then checkit;
##checkit:
$desc = $actor's description;
if $init_obj's name = $desc then doit else end;
##doit:
print "[$actor] explodes in a massive fireball!";
foreach in $loc do checkmat;
##checkmat:
if $for_id's material like '_living_' then blowup;
##blowup:
$hlth = $for_id's health;
take 5 from $hlth;
set $for_id's health = $hlth;
set $actor's code to '';
set $actor's info to 'This mine has already been detonated';