Find
You are in a 'tiny tree'
An experimental growing thing.
push it
to reset it back to the start.
wish
to cause it to grow some more.
Created by
wolis
, last updated 09 Mar 2008
Code
if reacting to wish then growme;
if target of push then resetcounter;
##growme:
$counter = $actor's weight; # an unused number field;
if $counter < 10 then growmore else resetcounter;
##resetcounter:
$counter = 0;
set $actor's weight to $counter;
print "[$actor] regresses back to childhood";
##growmore:
$tmp = ('tiny shoot','small sapling',sapling,'tiny tree','small tree',tree,'large tree','huge tree','massive tree','gigantic tree');
$myclass = $varlist[$counter];
set $actor's class = "$myclass";
add 1 to $counter;
set $actor's weight to $counter;
print "[$actor] grows a bit";
relook $loc;
a pocket