if target of throw then doit;

##doit:
$hlth = $second's health;
$hlthm = $second's healthmax;
if $hlth > 1 then hurtit else killit;

##hurtit:
take 4 from $hlth;
print "[$actor] shatters at [$second]'s feet, releasing a deadly cloud!";
$whatto = (coughs, chokes, gasps);
$howto = (violently, loudly, rattlingly);
print "[$second] $whatto $howto as the fumes clear!";
set $second's health to $hlth;
clear $actor,all;
set $actor's loc = 0;

##killit:
set $second's health to 0;
print "[$second] gasps for breath, then falls to the ground, dead.";
set $actor's loc = 0;
clear $actor,all;