REM BBC BASIC version of 99 Bottles of beer (Bottles.bbc)
REM See: http://www.bbcbasic.com/
REM Philipp Winterberg, http://www.winterbergs.de
      
FOR b=99 TO 1 STEP -1
  PRINT 'b;, " bottle(s) of beer on the wall,"
  PRINT b;,, " bottle(s) of beer."
  PRINT ,,,, "Take one down, pass it around,"
  PRINT b-1; " bottle(s) of beer on the wall."
NEXT b