New COWScript statement store
This allows scriptors of objects to store information in an object.
The places you can store information are:
pose - the pose of an object like 'sleeping', 'dancing'...
colour - the colour of the object like 'orange', or 'tomato'...
extra - the extra text that follows an object like 'which is happy'...
slot1,2 and 3 - not displayed and can store anything.
And finally you can make up your own storage space. We call these 'pocket variables' as they are new objects, created wthin your object.
Here are a few examples:
if target of push then changecolour;
##changecolour:
$clr = $actor's colour;
cycle $clr through (red,blue,green,yellow,gold);
store $actor's colour = "$clr";
relook $loc;
In this example our object reacts to a push by first:
reading the current colour from the $actor object
then changing it to the next in the cycle list
storing it back into the actor's colour
then finally getting everyone in the room to see the change.
if reacting to think then changepose;
##changepose:
$newpose = (dancing,laughing,playing,watching,sleeping);
store $actor's pose = "$newpose";
relook $oc;
This example changes the pose of your object to a random pose from the list, each time someone thinks in the same location as it. The 'relook $loc' makes sure everyone sees the change.