FlCodebase3.1/
FlCodebase3.1/bounty/
FlCodebase3.1/challenge/
FlCodebase3.1/clans/
FlCodebase3.1/gods/
FlCodebase3.1/mobprogs/
FlCodebase3.1/player/
FlCodebase3.1/savemud/
>rand_prog 3~
if rand(50)
	say Obey or die, $R.
else
	say You will be mine, $R.
endif
setquest $r arachnos2 1
c charm $r
~
>greet_prog 5~
if ispc($n)
	say You will obey me, $N.
	setquest $n arachnos2 1
	c charm $n
endif
~
|