[[2005/A1]]

 task main()
 { 
  OnFwd(OUT_A+OUT_C);
  Wait(100);
  Off(OUT_A+OUT_C);
  
  OnFwd(OUT_B);
 Wait(20);
 Off(OUT_B);
 
  OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(190);
 Off(OUT_A+OUT_C);
 
 OnFwd(OUT_A+OUT_C);
 Wait(70);
 Off(OUT_A+OUT_C);
 
 OnRev(OUT_A);
 OnFwd(OUT_C);
 Wait(130);
 Off(OUT_A+OUT_C);

 OnRev(OUT_B);
 Wait(20);
 Off(OUT_B);

repeat(100){
 OnFwd(OUT_A);
 Wait(3);
 Off(OUT_A);
 OnFwd(OUT_C);
 Wait(1);
 Off(OUT_C);
 }
 
 OnFwd(OUT_B);
 Wait(20);
 Off(OUT_B);

 OnRev(OUT_C);
 OnFwd(OUT_A);
 Wait(95);
 Off(OUT_A+OUT_C);
 
 OnFwd(OUT_A+OUT_C);
 Wait(50);
 Off(OUT_A+OUT_C);

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

 OnFwd(OUT_A+OUT_C);
 Wait(70);
 Off(OUT_A+OUT_C);

 OnRev(OUT_B);
 Wait(20);
 Off(OUT_B);

 OnFwd(OUT_A+OUT_C);
 Wait(66);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_B);
 Wait(20);
 Off(OUT_B);
 
 OnRev(OUT_A+OUT_C);
 Wait(33);
 Off(OUT_A+OUT_C);
 
 OnRev(OUT_C);
 OnFwd(OUT_A);
 Wait(72);
 Off(OUT_A+OUT_C);
 
 OnRev(OUT_B);
 Wait(20);
 Off(OUT_B);

 OnFwd(OUT_A+OUT_C);
 Wait(50);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_B);
 Wait(20);
 Off(OUT_B);

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

 OnRev(OUT_A+OUT_C);
 Wait(40);
 Off(OUT_A+OUT_C);
 
 OnRev(OUT_B);
 Wait(20);
 Off(OUT_B);

 OnFwd(OUT_A+OUT_C);
 Wait(80);
 Off(OUT_A+OUT_C);
}



トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS