IchigoJam STATUS

IchigoJam BASIC もバージョンだけに限らず、

プラットフォーム・キーボード・言語別で

様々な IchigoJam が動作するようになりました。

それにより VER() 以外にも LANG() ができ、

後に VER(値) へ切り替わっています。

IchigoJam STATUS はこれらの値を表示します。

RUN するとバージョンにより
次のいずれかで表示されます。

VER() のみ
IchigoJam ロゴ・VER()
IchigoJam ロゴ・VER()・LANG()
IchigoJam ロゴ・VER()・VER(1)～VER(3)

VER() の値によって IF で細かく分岐させています。

LANG() は VER(3) に変更されていますが、
その行を実行しなければ、エラーになりません。

IchigoJam officially logo - CC BY IchigoJam Licensed by jig.jp

10 'IchigoJam STATUS
20 CLV
30 ?
40 V=VER()
50 IF V<98 GOTO 190
60 LET[0],5,0,0,5,0,1,0,0,0,0
70 LET[10],0,5,0,0,0,0,0
80 LET[20],5,7,1,7,5,5,7,5,7,5
90 LET[30],0,5,7,5,11,11,11
100 LET[40],1,3,1,1,1,1,3,5,3,1
110 LET[50],3,1,3,3,2,2,2
120 LET[60],3,3,3,3,3,1,3,1,3,3
130 LET[70],3,3,3,3,3,3,3
140 FOR I=0 TO 79
150 ? CHR$(128+[I]);
160 IF I%20=19 ?
170 NEXT
180 ?
190 ?"VER()  = ";V
200 IF V>11006 GOTO 230
210 ?
220 END
230 IF V>13207 GOTO 270
240 ?"LANG() = ";LANG()
250 ?
260 END
270 FOR W=1 TO 3
280 ?"VER(";W;") = ";VER(W)
290 NEXT
300 ?
310 END

IchigoJam web でプログラムを実行します。

このQRコードはアクセス解析のためにCookieを使用しています。

アクセス解析は匿名で収集されており、個人を特定するものではありません。

この機能はCookieを無効にすることで収集を拒否することができますので、
お使いのデバイスのブラウザの設定をご確認ください。