そろそろ進み具合も遅くなってきたかな。
DELAY コマンドを使うと、LED チカチカはもっと簡単になった。
(代入関係も多少改善。)
LED: GPIOC PIN6 OUT MAIN: LOOP LED = 1 - LED DELAY 100 ENDLOOP
これで 100ms 置きに LED を反転させるプログラムの出来上がり。
ふたつの LED を交互に光らせたい場合はこんな感じに。
LEDRED: GPIOC PIN7 OUT LEDGRN: GPIOC PIN8 OUT MAIN: LOOP LEDRED = 1 - LEDRED LEDGRN = 1 - LEDGRN DELAY 100 ENDLOOP
連続した代入も扱えるようにして、7セグのような配列の扱いも楽に。
SEG7ARY: ARRAY 129 237 67 73 45 25 17 141 1 9 SEG7: DATA GPIOD 0 1 2 3 4 5 6 7 OUT COUNTER: VAL 0 MAIN: LOOP SEG7 = SEG7ARY = COUNTER DELAY 100 COUNTER = COUNTER + 1 IF COUNTER >= 10 COUNTER = 0 ENDIF ENDLOOP