2005/A6/課題１左/その１/その2/ＫＲＲの部屋 の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• 2005/A6/課題１左/その１/その2/ＫＲＲの部屋 へ行く。
• 2005/A6/課題１左/その１/その2/ＫＲＲの部屋 の差分を削除

[[2005/A6/KRRの部屋]]
  
 *11月4日の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()         // betana sadou  komanndo
{
   OnFwd(OUT_A+OUT_C);  //1kakume
   Wait(350);
   OnFwd(OUT_B);  //B up
   Wait(20);
   OnRev(OUT_A+OUT_C); //modoru
   OnFwd(OUT_B);       //B up
   Wait(150);
   turn_right(45);
   turn_right(70);
   OnFwd(OUT_C);
   Wait(150);
   Wait(15);
   OnRev(OUT_A);
   Wait(145);
   Wait(14);
   OnFwd(OUT_C);
   Wait(35);
   OnRev(OUT_A);
   Wait(30);
   OnFwd(OUT_C);
   Wait(35);
   OnRev(OUT_A);
   Wait(30);
   OnFwd(OUT_C);
   Wait(35);
   OnRev(OUT_A);
   Wait(30);
   OnFwd(OUT_C);
   Wait(35);
   OnRev(OUT_A);
   Wait(30);
   OnRev(OUT_B);  // B down
   Wait(20);
   OnFwd(OUT_A); // 2kaku
   Wait(500);
   OnRev(OUT_C);
   Wait(450);
   OnFwd(OUT_B);  //B up
   Wait(20);
   OnFwd(OUT_C);
   Wait(250);
   Wait(25);
   OnRev(OUT_A);
   Wait(225);
   Wait(15);
   OnFwd(OUT_C);
   Wait(25);
   OnRev(OUT_A);
   Wait(15);
   OnFwd(OUT_C);
   Wait(25);
   OnRev(OUT_A);
   Wait(15);
   OnRev(OUT_B);  // B down
   Wait(20);
   turn_right(45);
   turn_right(25);
   OnFwd(OUT_A+OUT_C); //3kaku
   Wait(150);
   OnFwd(OUT_B);   //B up
   Wait(20);
   OnRev(OUT_A+OUT_C);
   Wait(100);
   OnRev(OUT_B);  //B down
   Wait(20);
   turn_left(70);
   OnFwd(OUT_A+OUT_C);  //4kaku
   Wait(100);
   OnFwd(OUT_B);   //B up
   Wait(20);
   turn_right(70);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnRev(OUT_B) ;   //B down 
   Wait(20);
   OnRev(OUT_A+OUT_C);  //5kaku
   Wait(300);
   Off(OUT_A+OUT_B+OUT_C);
}
}