Unnamed

Repeat
	command$=Input("Enter a command: ")
	Select command$
		Case "hello"
			Print "hi"
		Case "yes"
			Print "no"
		Case "foo"
			Print "bar"
		Case "exit"
			End
		Default
			Print "wtf?"
	End Select
Forever