2006a/B1/課題１左 の履歴差分(No.4)

• 履歴一覧
• 現在との差分 を表示
• ソース を表示
• 2006a/B1/課題１左 へ行く。
  • 1 (2006-05-19 (金) 06:32:55)
  • 2 (2006-05-19 (金) 07:17:53)
  • 3 (2006-05-26 (金) 07:23:28)
  • 4 (2006-05-26 (金) 18:34:41)
  • 5 (2006-05-29 (月) 11:01:43)
  • 6 (2006-06-02 (金) 06:48:10)
  • 7 (2006-06-15 (木) 15:16:06)
  • 8 (2006-06-16 (金) 07:19:44)

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

[[2006a/B1]]
*練習課題 [#j87ddbd4]
**書道ロボット［水」を書く　 [#qcbb5c4c]
　&ref(2006a/B1/課題１左/060526_1509~01.jpg,100%);
 //制作者：高木侑弥
 //製作日：５月２６日

 　#define PEN_DOWN 15　//ペンを下げる時間です。
 
   　#define PEN_UP 20　//ペンをあげる時間です。
　　　　　　　 
  　 sub PEN_D()　//ペンの動作のためのサブルーチンです。
   
   {
 
      OnRev (OUT_B);Wait (PEN_DOWN);Off (OUT_B);
 
   }
 
   sub PEN_U()
  
   {
 
       OnFwd (OUT_B);Wait (PEN_UP);Off (OUT_B);
 
    }

    task main()
 
 {
 
        Wait (500);
 
        PEN_D();Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (100);Off (OUT_A+ OUT_C);Wait (100);
 
        PEN_U();Wait (100);
 
        OnRev (OUT_A+OUT_C);Wait (100);Off (OUT_A+ OUT_C);Wait (100);
 
 
 
        OnFwd (OUT_A);OnRev (OUT_C);Wait (14);Off (OUT_A+OUT_C);
 
        Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (49);Off (OUT_A+OUT_C);
 
        OnFwd (OUT_A);OnRev (OUT_C);Wait (40);Off (OUT_A+OUT_C);
 
        Wait (100);
 
        
 
        PEN_D();Wait (100);
 
        OnRev (OUT_A+OUT_C);Wait (42);Off (OUT_A+OUT_C);Wait (100);
 
        PEN_U();Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (39);Off (OUT_A+OUT_C);Wait (100);
 
        OnFwd (OUT_C);OnRev (OUT_A);Wait (30);Off (OUT_A+OUT_C);
 
        OnRev (OUT_A+OUT_C);Wait (37);Off (OUT_A+OUT_C);Wait (100);
 
        PEN_D();Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (55);Off (OUT_A+OUT_C);Wait (100);
 
        PEN_U();Wait (100);
 
        OnFwd (OUT_A);OnRev (OUT_C);Wait (26);Off (OUT_A+OUT_C);
 
        Wait (100);
 
 
 
        OnRev (OUT_A+OUT_C);Wait (127);Off (OUT_A+OUT_C);Wait (100);
 
        PEN_D();Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (45);Off (OUT_A+OUT_C);Wait (100);
 
        PEN_U();Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (42);Off (OUT_A+OUT_C);Wait (100);
 
        Wait (100);
 
        
 
        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);Wait (100);
 
        PEN_D();Wait (100);
 
        OnFwd (OUT_A+OUT_C);Wait (85);Off (OUT_A+OUT_C);
 //この作品で工夫した点は、まずスタイルです。
 //ほかのグループはおそらく4輪でくると思い、3輪人型にしまし
 //た。また、モータ速度を落とすため、ギアを複数かませまた。
 た。また、モータ速度を落とすため、ギアを複数かませました。
  [#nbebc8d6]
-車体の移動もマクロを使うと良いですね。 -- [[ゆき(TA)]] &new{2006-05-26 (金) 16:16:24};
-工夫した点なども、ぜひ書いてください。 -- [[ゆき(TA)]] &new{2006-05-26 (金) 16:17:36};

#comment