0 REM PAYTON BYRD - 2002 1 ?CHR$(147): FOR I=99 TO 0 STEP -1 2 ?I;" BOTTLES OF BEER ON THE WALL," 3 ?I;" BOTTLES OF BEER!" 4 ?I;" TAKE ONE DOWN, PASS IT AROUND," 5 ?I-1;" BOTTLES OF BEER ON THE WALL!":?"" 6 NEXT I 7 REM THIS SAMPLE WILL WORK ON VIC-20, 8 REM C=16/PLUS 4, C=64, AND C=128