source/
source/bounty/
source/challenge/
source/gods/
source/log/
source/mobprogs/
source/player/
source/savemud/
>rand_prog 3~
if rand(50)
	pmote studies the plants and animals around $k.
else
	if sex ($i) == 1
		pmote pulls on his beard.
	else
		smile $r.
	endif
endif
~
>time_prog 25~
herb $r
~
|