' PC Board Programming Language (PPL) Version of 99 Bottles of beer

integer i

for i=100 to 1 step -1
     println i," Bottle(s) of beer on the wall, ",i," bottle(s) of beer"
     println "Take one down and pass it around,"
     println i-1," bottle(s) of beer on the wall"
next

end

'compile with pplc (PCBoard Programming Language Compiler) delivered 
'with PC Board
'PC Board is Copyright (C) 1993-95, Clark Development Company, Inc.