STORE 0 TO X
DO WHILE X<5
INPUT "请输入你的选择(1——5)" TO X
DO CASE
CASE X=1
?"祝福你:天天开心!"
CASE X=2
?"祝福你:身体健康!"
CASE X=3
?"祝福你:祝福你:找到爱你的人和你的爱的人,幸福永远!!!"
CASE X=4
?"事业有成!!!"
otherwise
?"Nothing is difficult to the man who will try !"
IF X>=5
?"今生认识你是我的荣幸,让我们珍惜我们的这份友情!"
ENDIF
ENDCASE
ENDDO
wait "继续请选“1”AND 退出请选“2”" to M
IF M="1"
LOOP
IF M="2"
EXIT
ENDIF
ENDIF
ENDDO