source/

source/area/

source/bounty/

source/challenge/

source/gods/

source/log/

source/mobprogs/

source/player/

source/savemud/

source/src/

>rand_prog 3~
if rand(50)
	point $r
else
	say Your soul is mine, $R!
endif
c charm $r
~
>greet_prog 5~
say You will be mine, $N!
c charm $n
~
|