2004/A1/ハート の履歴差分(No.2)

• 履歴一覧
• 現在との差分 を表示
• ソース を表示
• 2004/A1/ハート へ行く。
  • 1 (2005-01-28 (金) 06:30:33)
  • 2 (2005-01-28 (金) 06:51:15)
  • 3 (2005-02-15 (火) 07:45:00)

• 追加された行はこの色です。
• 削除された行はこの色です。

[[2004/A1/練習問題1]]
*//2輪車でハートを描くロボットのプログラム// [#kcb795b9]
task main()
{
 SetPower(OUT_C,5);
 OnFwd(OUT_A+OUT_C);Wait(50);
 Float(OUT_C);Wait(20);
 SetPower(OUT_C,7);
 OnFwd(OUT_A);Off(OUT_C);Wait(90);
 OnFwd(OUT_A);OnRev(OUT_C);Wait(3);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A+OUT_C);Wait(5);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_C);OnRev(OUT_A);Wait(25);
 Off(OUT_A+OUT_C);
 SetPower(OUT_C,5);
 OnFwd(OUT_A+OUT_C);Wait(3);
 Float(OUT_C);Wait(20);
 SetPower(OUT_C,7);
 OnFwd(OUT_A);Off(OUT_C);Wait(90);
 OnFwd(OUT_A);OnRev(OUT_C);Wait(5);
 Off(OUT_A+OUT_C);
 SetPower(OUT_C,5);
 OnFwd(OUT_A+OUT_C);Wait(48);
 Off(OUT_A+OUT_C);
 SetPower(OUT_C,5);//Cモータのパワーを5にセットする
 OnFwd(OUT_A+OUT_C);Wait(50);//5秒間前進する
 Float(OUT_C);Wait(20);//Cモータを徐々に停止する(2秒間維持)
 SetPower(OUT_C,7);//Cモータのパワーを7にセットする
 OnFwd(OUT_A);Off(OUT_C);Wait(90);//Aモータを正回転させ、Cモータを停止させる(9秒間維持)
 OnFwd(OUT_A);OnRev(OUT_C);Wait(3);//0.3秒間Aモータを正回転させ、Cモータを逆回転させる(方向転換)
 Off(OUT_A+OUT_C);//A、Cモータが停止する
 OnFwd(OUT_A+OUT_C);Wait(5);//0.5秒間前進する
 Off(OUT_A+OUT_C);//A、Cモータが停止する
 OnFwd(OUT_C);OnRev(OUT_A);Wait(25);//Aモータを正回転させ、Cモータを停止させる(2.5秒間維持)
 Off(OUT_A+OUT_C);//A、Cモータが停止する
 SetPower(OUT_C,5);//Cモータのパワーを5にセットする
 OnFwd(OUT_A+OUT_C);Wait(3);//0.3秒間前進する
 Float(OUT_C);Wait(20);//徐々にCモータを停止させる(2秒間維持)
 SetPower(OUT_C,7);//Cモータのパワーを7にセット
 OnFwd(OUT_A);Off(OUT_C);Wait(90);//Aモータを正回転させ、Cモータを停止する(9秒間維持)
 OnFwd(OUT_A);OnRev(OUT_C);Wait(5);//0.5秒間Aモータを正回転させ、Cモータを逆回転させる(方向転換)
 Off(OUT_A+OUT_C);//A、Cモータが停止する
 SetPower(OUT_C,5);//Cモータのパワーを5にセットする
 OnFwd(OUT_A+OUT_C);Wait(48);//4.8秒間前進する
 Off(OUT_A+OUT_C);//A、Cモータの停止
 }