Find
You are looking at a puce cat
Created by
ged424
, last updated 01 Jul 2009
Code
if reacting to enter then hissycat;
if target of push then hissycat;
if target of bounce then iwaskicked;
if target of pets then purrycat;
##iwaskicked:
getgender $init_obj;
print "[$actor] growls ferociously at [$init_obj] then jumps on $himher";
##hissycat:
$speed = (slowly,quickly);
$act = "(hisses,growls,blinks,purrs)";
print "[$actor] $speed turns to [$init_obj] and $act";
##purrycat:
print "[$actor] purrs contentedly at [$init_obj] ";