if target of use then checkit;

##checkit:
if $second's material like corpse then doit else end;

##doit:
manipulate $second's pocket set myraiser to "$init_obj";
print "A dark flame snakes from [$actor] towards [$second] engulfing it.";
code $second as 76269;
set $second's health to $second's healthmax;
set $second's material to '_redead_';