SMILE BASIC 小技(1)
覚え書きの文字列編でも書いた、文字変数に[]でアクセスすると任意の一文字を取り出せる技は、"でくくった文字列でも使える。
"文字列"[数字]
みたいに。
これを応用して、
"AB"[論理式]
のように書くと、
論理式が成立する時はBが、成立しない時はA
を取り出せる。
これを使ったカーソルの点滅の例:
VAR BLINK=0 WHILE 1 LOCATE 0,CSRY PRINT "■_"[BLINK<30] 'BLINKが30未満の時は_を、30以上の時は■を表示 BLINK=(BLINK+1) MOD 60 VSYNC 1 WEND