Anonymous user
99 Bottles of Beer/Basic: Difference between revisions
→{{header|Microsoft Small Basic}}: Little refactoring.
m (→{{header|Microsoft Small Basic}}: Code formatting) |
(→{{header|Microsoft Small Basic}}: Little refactoring.) |
||
Line 558:
For n = 99 To 1 Step -1
If n = 1 Then
bottleText1 = "1 bottle"
bottleText2 = "No more bottles"
ElseIf n = 2 then
bottleText1 = "2 bottles"
bottleText2 = "1 bottle"
Else
bottleText1 = n + " bottles"
bottleText2 = n - 1 + " bottles"
EndIf
TextWindow.WriteLine(
TextWindow.WriteLine(
TextWindow.WriteLine("Take one down, pass it around")
TextWindow.WriteLine(bottleText2 + " of beer on the wall")
| |||