- 追加された行はこの色です。
- 削除された行はこの色です。
[[2005/C4]]
**[[左を書く>2005/C4/左を書く]] [#gbd06e16]
**[[机の周りを移動する>2005/C4/机の周りを移動する]] [#v12b9f15]
[#gbd06e16]
int penstat=0;
task main()
{
penon();
OnRev(OUT_A+OUT_B);
Wait(300);
penoff();
Off(OUT_A);
Wait(10);
OnFwd(OUT_A+OUT_B);
Wait(10);
Off(OUT_A);
Wait(10);
penon();
OnFwd(OUT_A);
Wait(300);
penoff();
OnRev(OUT_A+OUT_B);
Wait(100);
Off(OUT_A+OUT_B);
OnFwd(OUT_A);
penon();
OnFwd(OUT_B);
Wait(100);
penoff();
OnRev(OUT_A+OUT_B);
Wait(50);
Off(OUT_A);
Wait(80);
penon();
OnFwd(OUT_B);
Wait(50);
penoff();
OnRev(OUT_B);
Wait(80);
OnRev(OUT_A);
Wait(80);
penon();
OnFwd(OUT_A);
Wait(100);
penoff();
Off(OUT_A+OUT_B);
}
sub penon(){
if(penstat!=1){
//Write
SetPower(OUT_C,3);
OnFwd(OUT_C);
Wait(20);
Float(OUT_C);
penstat=1;
Wait(50);
}
}
sub penoff(){
if(penstat!=0){
//Dont Write
SetPower(OUT_C,4);
OnRev(OUT_C);
Wait(10);
Float(OUT_C);
penstat=0;
Wait(50);
}
}
コメントをどうぞ
#comment
[#v12b9f15]
task main()
{
SetSensor(SENSOR_1, SENSOR_TOUCH);
SetSensor(SENSOR_3, SENSOR_TOUCH);
OnFwd(OUT_A+OUT_C);
while(true)
{
if((SENSOR_1 == 1) && (SENSOR_3 == 1))
{
OnRev(OUT_A+OUT_C); Wait(20);
OnFwd(OUT_A); Wait(110);
OnFwd(OUT_C);
}
if(SENSOR_1 == 0)
{
Off(OUT_A); Wait(4);
OnFwd(OUT_A);
}
if(SENSOR_1 == 1)
{
Off(OUT_C); Wait(4);
OnFwd(OUT_C);
}
}
}
コメントをどうぞ
#comment