; Select Example
; --------------

; Inspect each weapon slot and see which branch Select picks
For slot=1 To 4

    Print "Weapon slot "+slot+":"

    ; Select compares its value against each Case in turn
    Select slot
        Case 1
            Print "    Laser - rapid fire, low damage"
        Case 2
            Print "    Missile - slow but devastating"
        Case 3
            Print "    Flamethrower - short range, big burn"
        Default
            Print "    Empty - nothing equipped"
    End Select

Next

Print ""
Print "Press any key to close the example"
WaitKey

End