Function BeerFunction()

	Integer i
	String s = "s"

	for i = 99 downto 1
		echo( Str.String( i ) + " bottle" + s + " of beer on the wall. " )
		echo( "   " + Str.String( i ) + " bottle" + s + " of beer. " )
		echo( "Take one down and pass it around," )
	    if (i < 3)
	       s = ( ( ( i - 1 ) == 1 ) ? "" : "s" )
	    end
		echo( "   " + Str.String( i - 1 ) + " bottle" + s + " of beer on the wall." )
	end
end