if target of throw then doit;
##doit:
$hlth = $target's health;
$hlthm = $target's healthmax;
if $hlth > 1 then hurtit else killit;
##hurtit:
take 4 from $hlth;
print "[$actor] shatters at [$target]'s feet, releasing a deadly cloud!";
$whatto = (coughs, chokes, gasps);
$howto = (violently, loudly, rattlingly);
print "[$target] $whatto $howto as the fumes clear!";
set $target's health to $hlth;
set $actor's loc = 0;
##killit:
set $target's health to 0;
print "[$actor] gasps for breath, then falls to the ground, dead.";
set $actor's loc = 0;