forsaken/bounty/
forsaken/challenge/
forsaken/gods/
forsaken/log/
forsaken/mobprogs/
forsaken/player/
forsaken/savemud/
>fight_prog 20~
if rand(25)
	cas 'shatter'
else
	if rand(33)
		cast 'poison'
	else
		if rand(50)
			cast 'acid blast'
		else
			cast 'dispel magic'
		endif
	endif
endif
~
|