>rand_prog 3~
if rand (50)
	pmote hums happily.
else
	smile $n
endif
~
>greet_prog 5~
if rand (33)
	curtsey $n
else
	if rand (50)
		say How are you doing, $N?
	else
		say Good day to you, $N.
	endif
endif
~
|