COWbrowse

You are looking at an eskimo who seems to be a bit lost

your eskimo was working.. trouble was it didnt have anything inside it to fish out.

The way the fishrman works is that it finds a random object from inside itself and duplicates it, dropping it on the floor.

I have made some things inside your eslimo but you might want to change them

Created by Josh, last updated 31 Mar 2008

Code

##tickloc:runsub whattodo;
##wxish:runsub makefish;
##whattodo:runsub makefish/10 or nofish/1;
##makefish:
find $actor,random; rem find an object in the actor;
copy $found_id; rem make a copy of the chosen object;
set $new_id's loc to $loc;
say 'create',"[$actor] pulls his hands out of the water with a [$new_id] in his hands and drops it on the floor";
dedupe $new_id;
say 'force',"force:look";
##nofish:
say 'actn',"[$actor] reels in his rod .. but there is nothing on the end";
say 'actn',"[$actor] casts his rod out again .. and waits....";

##talk:runsub starttalking;
##starttalking:
msg $loc,$actor,0,0,'say',"[$actor] says 'I have been here for a long time.. Im going to catch something soon'";