<~null~ Tilton version of 99 bottles of beer, ~ Laurent Vogel, http://lvogel.free.fr ~ (Tilton info at http://www.crockford.com/index.html) ~><~set~b~ bottle~><~set~t~Take one down, pass it around, ~><~set~o~ of beer~><~set~w~ on the wall~>99<~b~>s<~o~><~w~>, 99<~b~>s<~o~>.<~set~i~98~><~define~s~<~gt?~<~i~>~1~s~>~><~set~n~ ~><~n~><~t~><~define~p~<~i~><~b~><~s~><~o~><~w~>.<~n~> <~i~><~b~><~s~><~o~><~w~>,<~n~><~i~><~b~><~s~><~o~>. <~t~>~><~loop~<~s~>~<~p~><~set~i~<~sub~<~i~>~1~>~>~><~p~>No<~b~><~o~><~w~>.