2015-06-07 14:10:49 +09:00
|
|
|
# otyaSMILEBASIC
|
|
|
|
|
SMILEBASIC 3.x互換BASIC
|
2015-08-19 00:15:22 +09:00
|
|
|
## コンパイルするのに必要なもの
|
|
|
|
|
+ DerelictSDL2
|
|
|
|
|
+ DerelictGL3
|
|
|
|
|
+ curl
|
|
|
|
|
## 実行時に必要なもの
|
|
|
|
|
+ SDL2
|
2015-06-14 11:18:43 +09:00
|
|
|
## 実装機能
|
|
|
|
|
動くコード例
|
|
|
|
|
```
|
|
|
|
|
FOR I=0 TO 100
|
|
|
|
|
IF I MOD 3==0 AND I MOD 5==0 THEN
|
|
|
|
|
?"FIZZBUZZ"
|
|
|
|
|
ELSE
|
|
|
|
|
IF I MOD 3==0 THEN
|
|
|
|
|
?"FIZZ"
|
|
|
|
|
ELSE
|
|
|
|
|
IF I MOD 5==0 THEN
|
|
|
|
|
?"BUZZ"
|
|
|
|
|
ELSE
|
|
|
|
|
?I
|
|
|
|
|
ENDIF
|
|
|
|
|
ENDIF
|
|
|
|
|
ENDIF
|
|
|
|
|
NEXT
|
|
|
|
|
DEF FACT(N)
|
|
|
|
|
IF N<=1 THEN RETURN 1
|
|
|
|
|
RETURN N*FACT(N-1)
|
|
|
|
|
END
|
|
|
|
|
DEF TEST2 A,B,C OUT D,E,F
|
|
|
|
|
D=A
|
|
|
|
|
E=B
|
|
|
|
|
F=C
|
|
|
|
|
END
|
|
|
|
|
```
|
