' WHILE.BAS
' This program demonstrates the WHILE loop.

CLS

INPUT "Please enter a number between 1 and 10:  ", userNum%
PRINT

WHILE userNum% <= 12
    COLOR userNum%
    PRINT "The current value of userNum% is"; userNum%
    SOUND ((userNum% * 30) + 300), .5
    userNum% = userNum% + 1
    PRINT
WEND

