:"99 BOTTLES OF BEER 
:"FOR TI-83+/84+(SE)
:For(I,99,2,-1)
:Disp I
:Disp "BOTTLES OF BEER"
:Disp "ON THE WALL"
:Disp I
:Disp "BOTTLES OF BEER"
:Disp "TAKE ONE DOWN"
:Disp "PASS IT AROUND"
:Disp I-1
:Disp "BOTTLES OF BEER"
:Disp "ON THE WALL"
:End
:Disp 0
:Disp "BOTTLES OF BEER"
:Disp "ON THE WALL"
:Disp 0
:Disp "BOTTLES OF BEER"
:Disp "GO TO THE STORE,"
:Disp "BUY SOME MORE"