xbasic64 1.0.0

A BASIC-to-x86_64 native code compiler targeting 1980s-era BASIC dialects
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

' SELECT CASE branching example

FOR DayNum = 1 TO 7
    SELECT CASE DayNum
        CASE 1
            PRINT "Monday"
        CASE 2
            PRINT "Tuesday"
        CASE 3
            PRINT "Wednesday"
        CASE 4
            PRINT "Thursday"
        CASE 5
            PRINT "Friday"
        CASE ELSE
            PRINT "Weekend!"
    END SELECT
NEXT DayNum