• No registered tag exist.

10 led 0
20 ?"MJ GETS europa.kanazawa-it.ac.jp/ichigojam/kamellia.html"
30 input a
40 if a=0 goto 110
50 if a=1 then pwm 5,90:wait 300:pwm 5,60:led 1:wait 300
60 if a=2 then pwm 5,120:wait 300:pwm 5,60:led1:wait 300
70 if a=3 then pwm 5,150:wait 300:pwm 5,60:led1:wait 300 
80 if a=4 then pwm 5,180:wait 300:pwm 5,60:led1:wait 300
90 if a=5 then pwm 5,210:wait 300:pwm 5,60:led1:wait 300
100 if a=6 then pwm 5,240:wait 300:pwm 5,60:led1:wait 300
110 goto 10

Pagetop