test.bas

来自「smallbasic for linux」· BAS 代码 · 共 19 行

#!/usr/local/bin/sbrun -g
const c = 300
? c
gosub sub1
gosub sub2
gosub sub1
end

label sub1
? "Sub #1"
return

label sub2
? "Sub #2"
return