if target of touch then doit;
##doit:
$hitthing = 44151;
print "[$init_obj] tosses [$actor] into the air";
print "[$actor] lies suspended in mid-air for a moment, then darts out of sight";
set $actor's loc to $hitthing's loc;
$sound = (buzzing, whistling, screeching, warbling);
$thing = (stumbles, trips, falls);
print "You hear a strange $sound rapidly approaching. A split second later [$hitthing] $thing in pain!";
$hlthm = $hitthing's healthmax;
$hlth = $hitthing's health;
take 3 from $hlth;
set $hitthing's health to $hlth;
print "[$actor] quickly fades to a dark grey, it's magic depleted.";
set $actor's code = '';
set $actor's colour to 'darkgrey';