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 $l.
else
	if sex ($i) == 1
		pmote picks some hollies.
	else
		pmote gathers some ivy.
	endif
endif
~
>give_prog 75~
if rand (25)
	mpjunk $o
else
	if objtype($o) == 26
		identify $o
		give $o $n
	endif
endif
~
|