２．LED色の取得
@GET_WS.LED(I,C,L)

2000 @GET_WS.LED(I,C,L)
2010 IF I>33 THEN I=33
2020 C=([I*3]&&1)+([I*3+1]&&1)*2+([I*3+2]&&1)*4
2030 L=[I*3]|[I*3+1]|[I*3+2]
2040 RETURN

・LED位置I番の、色と明るさを、変数Cと変数Lに取得します。
現在WS.LED命令で光っているLEDの値を知ることができます。
・ただし、＠SET_WS.LEDサブルーチンで設定したRGB値でないと正しい値を取得できません。
———————————————————————
変数　I
LED位置を指定する
０～３３
———————————————————————
変数　C
変数Iで指定したLED位置の色が返る。
０■無（光らない）、１■緑、２■赤、３■黄、４■青、
５■シアン（青緑）、６■マゼンタ（紅紫）、７■白

変数　L　
変数Iで指定したLED位置の輝度が返る。
０～２５５

サンプルプログラム2

10 FOR I=0 TO 11
20 C=RND(8)
30 L=RND(256)
40 GSB @SET_WS.LED(I,C,L)
50 NEXT
60 WS.LED 12
70 WAIT 120
80 ? “I C L”
90 FOR I=0 TO 11
100 GSB @GET_WS.LED(I,C,L)
110 ? I,C,L
120 BEEP
130 WAIT 60
140 NEXT
150 END

---