LEDでナナイロづくり 2

投稿日: 投稿者:

９…ナイト

青い光が、軌跡を残しながらサークルを回転します。
このプログラムは、JAMCARに載せた8連LEDバーを改良したものですが、サークルLEDで実行すると、また違った感じになります。

10 @ARUN KNIGHT
20 CLV:Q=-1
30 FOR M=0 TO 35:[M]=[M]/3:NEXT
40 Q=Q+1:IF Q>11 Q=-10
50 I=ABS(Q):C=4:L=99
60 GSB @SET_WS.LED(I,C,L)
70 WS.LED 12
80 WAIT 1
90 GOTO 30

※以下のサブルーチンも入力します。
@SET_WS.LED(I,C,L)サブルーチンを1000行目から

目次に戻る
ページ: 1 2 3 4 5 6 7 8 9 10