2005/A6/課題1/一班/KRRの軌跡

11月10日のKRRの部屋にようこそ

『「左」書く漢字ロボ.3人の中で、一番べタなプログラミング』

 **補助のプログラム

**void turn_left(int x) //左に曲がるプログラム

 {

   OnRev(OUT_A); OnFwd(OUT_C);
   Wait(x);
   Off(OUT_A+OUT_C);

 }

 **void turn_right(int y) //右に曲がるプログラム

 {

   OnFwd(OUT_A); OnRev(OUT_C);
   Wait(y);
   Off(OUT_A+OUT_C);

 }

 **メインコマンド

 task main() //

 {

  OnFwd(OUT_A+OUT_C);  //一画目、右上がり
  Wait(350);
  OnFwd(OUT_B);  //Bの正回転で、筆を上げる
  Wait(20);
  OnRev(OUT_A+OUT_C); //後ろに下がる
  Wait(250);
  turn_right(159);
  OnFwd(OUT_C);
  Wait(150);
  OnRev(OUT_A);
  Wait(150);
  turn_right(428);
  OnRev(OUT_B);  // Bを負回転で、筆を下げる
  Wait(20);
  OnFwd(OUT_A+OUT_C); // 2画目
  Wait(300);
  OnFwd(OUT_A); //Aドライブ直下のタイヤを進める
  Wait(50); 
  OnRev(OUT_C); //Cドライブ直下のタイヤを後退
  Wait(35);
  turn_right(578); //右に曲がる()のなかは角度の調整
  OnRev(OUT_A+OUT_C); //3画目
  Wait(150);
  turn_right(87); //右に曲がる()のなかは角度の調整
  OnFwd(OUT_B);   //Bの正回転で、筆を上げる
  Wait(20);
  OnFwd(OUT_A+OUT_C); //A,Cドライブ直下のタイヤを前進
  Wait(200);
  OnRev(OUT_B);  // Bを負回転で、筆を下げる
  Wait(20);
  OnRev(OUT_A+OUT_C);//A,Cドライブ直下のタイヤを後退
  Wait(100);
  turn_left(139); //左に曲がる()のなかは角度の調整
  OnFwd(OUT_A+OUT_C);  //4画目
  Wait(150);
  OnFwd(OUT_B);   //Bの正回転で、筆を上げる
  Wait(20);
  turn_left(139);  //左に曲がる()のなかは角度の調整
  OnFwd(OUT_A+OUT_C); //A,Cドライブ直下のタイヤを前進
  Wait(150);
  OnRev(OUT_B) ;   // Bを負回転で、筆を下げる
  Wait(20);
  OnRev(OUT_A+OUT_C);  //5画目、A,Cのタイヤ後退
  Wait(300);
  Off(OUT_A+OUT_B+OUT_C);//停止

 }

 **(感想)  「今回は三人の中であまり工夫がみられないプログラミングだった気がします。またもっと滑らかに『ノ』ができたら、良かったと動かせて見て思いました。」


トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-11-11 (金) 00:48:58