'99 Bottles of Beer in D++
'App by Null1024
'Get D++ at www.pagemac.com

newvar beer;

function main()
{
for beer = 99 to 1 step -1;

  if beer > 1 then
    screenout beer & " bottles of beer on the wall,"; screen;
    screenout beer & " bottles of beer,"; screen;
    screenout "Take one down, pass it around,"; screen;
    screenput beer & " bottles of beer on the wall,"; screen; screen;
  endif

  if beer = 1 then
    screenout "1 bottle of beer on the wall,"; screen;
    screenout "1 bottle of beer,"; screen;
    screenout "Take one down, pass it around,"; screen;
    screenput "1 bottle of beer on the wall,"; screen; screen;
  endif;

next beer;
screenput "We need more beer."; screen;
pak;
end;
}