##txickhour2: runsub whattodo;
##whattodo: runsub moveme;
##tixckloc:runsub tooslow;
##tooslow:
find $loc, random player;
say 'msg',"[$actor] turns towards [$found_id] and hisses";
sayto $found_id,"You feel very afraid";
say 'msg',"[$actor] rushes at [$found_id]";
var $prey to $found_id;
runsub dragitback;
##dragitback:
say 'actn',"[$actor] leaps on [$prey]!";
var $how to (dragged, carried, pulled);
var $dest to 2431;
say 'leaves',"[$actor] spears [$prey] through the stomach with it's tail and [$prey] passes out!";
say 'msg',"A C.C. employee appears and yells 'NO!' and shoots [$actor] with some kind of ray";
say 'msg',"[$actor] hisses at the C.C. employee and backs up";
say 'msg',"C.C. employee says 'Off to the hospital with you...'";
clear $prey,all;
set $prey's loc to $dest;
var $loc to $dest;
say 'arrives',"[$prey] wakes up and finds that they have a bandage on their stomach. Upon taking it off there is a scar but nothing else";
say 'msg',"[$prey] faintly remembers something black jumping on them and extreme pain, but that is all";
say 'force',"force:look";
##moveme:
call "roam";