>greet_prog 1~
if ispc($n)
	wink $r
endif
~
>rand_prog 1~
if rand(33)
	smile $r
else
	if rand(50)
	        kiss teenage boy hobbit
	else
		tongue teenage boy hobbit
	endif
endif
~
|