[[2005/A1]]
漢字で左を書く
11月7日 by コンパス 今井 高尾
*プログラム [#acb728ce]

 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(180);
 Off(OUT_A+OUT_C);
 
 OnFwd(OUT_A+OUT_C);
 Wait(65);
 Off(OUT_A+OUT_C);
 
 OnRev(OUT_A);
 OnFwd(OUT_C);
 Wait(100);
 Off(OUT_A+OUT_C);

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

 repeat(100){
 OnFwd(OUT_A);
 Wait(2);
 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(85);
 Off(OUT_A+OUT_C);
 
 OnFwd(OUT_A+OUT_C);
 Wait(54);
 Off(OUT_A+OUT_C);

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

 OnFwd(OUT_A+OUT_C);
 Wait(59);
 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);
 
 OnRev(OUT_A+OUT_C);
 Wait(25);
 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(38);
 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);
 }
*感想 [#de292f9d]
走らせる場所により摩擦が違ったり、紙に引っかかってしまい苦労しました
-一つの動作に説明(ペンを置く、一画目、ペンを上げる、等)説明をつけて下さると見やすくなると思います。他の班のプログラムをみるといいかも... -- [[ゆん(TA)]] &new{2005-11-11 (金) 15:58:02};

#comment



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