- 追加された行はこの色です。
- 削除された行はこの色です。
[[2006a/B4]]
*プログラミングとの戦い [#n8873b4c]
**プログラミングと私 [#j01819df]
-HPを作ろうと某会社と契約したものの、HTMLが理解できずにそのまま放置してしまった私。
-一度は挫折したプログラミングでしたが、『せっかく大学に入ったんだから新しい事をしてみよう』と、思い切って受講してみる事に。
**プログラミング [#bd480457]
-[[2006a/B4/多角形]](練習問題)
-[[2006a/B4/『木』]]
-[[2006a/B4/itou/多角形]](練習問題)
-[[2006a/B4/itou/『木』]](課題1)
-[[2006a/B4/itou/センサー]](課題2)
***『木』を書くロボット(ただいま製作中) [#r329cc9b]
-ロボコン試作(途中まで)(缶をとってくるロボット)
#define turn_right OnFwd(OUT_A);OnRev(OUT_C);
#define turn_left OnRev(OUT_A);OnFwd(OUT_C);
#define go OnFwd(OUT_A+OUT_C);
#define back OnRev(OUT_A+OUT_C);
#define stop_turn Off(OUT_A+OUT_C);
task main ()
{
OnFwd (OUT_A+OUT_C);
Wait(250);
Off (OUT_A+OUT_C);
OnRev(OUT_B);
Wait(50);
Off(OUT_B);
SetSensor(SENSOR_1,SENSOR_TOUCH);
OnRev (OUT_A+OUT_C);
Wait (125);
OnFwd (OUT_A);OnRev (OUT_C);
Wait (90);
Off(OUT_A+OUT_C);
ClearTimer(0);
OnRev (OUT_A+OUT_C);
Wait (125);
Off (OUT_A+OUT_C);
go;
until (SENSOR_1=1)
back;
Wait(FastTimer(0)/2);
OnFwd(OUT_B);
Wait(50);
OnFwd (OUT_A+OUT_C);
Wait (300);
Off (OUT_A+OUT_C);
turn_right;
Wait(25);
ClearTimer(0);
go;
until (SENSOR_1=1)
back;
Wait(FastTimer(0)/3);
turn_right;
Wait(25);
go;
until(SENSOR_1=1);
back;
Wait(20);
turn_right;
Wait(25);
stop_turn;
back;
Wait(20);
OnRev(OUT_B);
Wait(50);
Off(OUT_B);
Wait(20);//缶をつかむ
OnRev (OUT_A+OUT_C);
Wait (175);
OnFwd (OUT_A);OnRev (OUT_C);
Wait (45);
Off (OUT_A+OUT_C);
Off(OUT_A;OUT_C);
}
-ロボコン試作(缶を受け取ってゴールするロボット)
#define turn_right OnFwd(OUT_A);OnRev(OUT_C);
#define turn_left OnRev(OUT_A);OnFwd(OUT_C);
#define go OnFwd(OUT_A+OUT_C);
#define back OnRev(OUT_A+OUT_C);
#define stop_turn Off(OUT_A+OUT_C);
task main ()
{
SetSensor(SENSOR_1,SENSOR_TOUCH);
until(SENSOR_1=1);
back;
Wait(20);
turn_right;
Wait(25);
back;
Wait(20);
OnFwd(OUT_B);
Wait(50);
Off(OUT_B);
Wait(17);
repeat(15)
{
OnFwd(OUT_A+OUT_C);
Wait(20);
Off(OUT_C);
Wait(3);
}
ClearTimer(0);
go;
until (SENSOR_1=1)
back;
Wait(FastTimer(0)/2);
turn_left;
Wait(25);
ClearTimer(0);
go;
until (SENSOR_1=1)
back;
Wait(FastTimer(0)/3);
turn_right;
Wait(25);
Off(OUT_A+OUT_C);
Wait(30);
OnRev(OUT_B);
Wait(50);
Off(OUT_B);
Wait(17);
repeat(15)
back;
Wait(40);
Off(OUT_A+OUT_C);
}
#define turn_right OnFwd(OUT_A);OnRev(OUT_C);
#define turn_left OnRev(OUT_A);OnFwd(OUT_C);
#define go OnFwd(OUT_A+OUT_C);
#define back OnRev(OUT_A+OUT_C);
#define stop_turn Off(OUT_A+OUT_C);
task main ()
{
OnRev(OUT_A+OUT_C);
Wait(20);
Off(OUT_A);
Wait(3);
}
OnFwd (OUT_C);OnRev (OUT_A);
Wait (90);
Off (OUT_A+OUT_C);
SetSensor(SENSOR_1,SENSOR_TOUCH);
until(SENSOR_1==1);
back;
Wait(20);
turn_right;
Wait(30);
back;
Wait(20);
OnFwd(OUT_B);
Wait(50);
Off(OUT_B);
Wait(17);
repeat(12)
{
OnRev(OUT_A+OUT_C);
Wait(20);
Off(OUT_A);
Wait(3);
ClearTimer(0);
go;
until (SENSOR_1==1);
back;
Wait(FastTimer(0)/2);
turn_left;
Wait(25);
ClearTimer(0);
go;
until (SENSOR_1==1);
back;
Wait(FastTimer(0)/3);
turn_right;
Wait(25);
Off(OUT_A+OUT_C);
Wait(30);
OnRev(OUT_B);
Wait(17);
back;
Wait(40);
Off(OUT_A+OUT_C);
}
repeat(3)
{
OnRev(OUT_A+OUT_C);
Wait(15);
Off(OUT_C);
Wait(5);
}
}
[[ステップ2]]