I just submitted the following code to 99 Bottles of Beer which collects examples of diferent languages.  It may take a few days for them to review it before it is actually posted.  This will be the 847th language submitted.

var n as Int
var t as Int		//Time delay between line prints (1000 = 1 second)
var vBottle as String

t=20

For n = 99 downto 1
    If n=1 Then vBottle = " bottle" else vBottle = " bottles"
    WriteLn(n + vBottle  + " of beer on the wall,")
    Loiter(t)
    WriteLn(n + vBottle  + " of beer,")
    Loiter(t)
    WriteLn("Take one down and pass it around,")
    Loiter(t)
    WriteLn(n + vBottle  + " of beer on the wall." + @NewLine() )
    Loiter(t)
Next

WriteLn("......hic.........hic, hic..........hic")
WriteLn("Set 'em up again, Sam")   

Just trying to help spread the word about Sbasic and Sesame.

Yes, it was accepted.  It also has a link to Sesame to generate some sales leads!

Mark, I think that they are looking for ways to show off the capability of the language.  I think that you could submit a much better version than I did showing off many more functions, maybe parsing a stringarray of 99;98;97, etc.  I just did a quick and dirty example.

Or maybe someone could show using PrintString with fonts, colors, etc.  We could all submit a version of 99 Bottles, showing off more features with each example. 

Another version might be to use File i/o and write to an HTML document vs. WriteLn.

Go for it!  Show it here after you post it to  99 Bottles of Beer