'** 99 Bottles of Beer in Run BASIC
'** A Web development tool for Windows, Mac OS X, and Linux.
'** This example dynamically generates a Web page of lyrics.

' Define some constants.
q$ = Chr$(34)
BeerOnTheWall$ = " of beer on the wall"
Beer$ = " of beer!"

' Close the "monospaced" div.
Html "</div>";

' Let the lyrics scroll.
Html "<div style=";q$;"border:1px solid; height:25em; padding:.5em; overflow:auto;";q$;">";

' Generate the lyrics...
For bottle = 99 To 1 Step -1

  ' start paragraph
  Html "<p>";

    ' line 1
    Print Bottles$(bottle) ; BeerOnTheWall$ ; ". " ;
    Print Bottles$(bottle) ; Beer