Nesting _IFF

[Kernelpanic]

Something's still missing! 

Code: (Select All)

Dim As Integer age



Print

Input "Alter: ", age



Print

Select Case age

  Case Is = 0: Print "Coming soon! Keep cool!"

  Case Is < 13: Print "child"

  Case Is < 20: Print "teenager"

  Case Is < 65: Print "adult"

  Case Else: Print "senior"

End Select



End