COWbrowse

You are looking at an orange tree

Created by Josh, last updated 24 Dec 2006

Code

##use:runsub whattodo;

##whattodo:
new orange;
set $new_id's worth to 5;
say 'drop',"[$actor] drops [$new_id] onto the floor";