##tickloc: runsub mood/4;

##mood:
var $mood to (You can hear the seawaves crashing on the cliffs,Some seagulls are flying around here,Everything is so quiet...,The sky is totally cloudless,You can feel the sun shining on you);

say 'mood',"$mood";