[[NQC入門]]

*課題1 似顔絵を描くロボット [#n5b071c7]

*ロボット本体 [#b237cd36]

*プログラム [#ce9acaa5]
  task main()
  {
  OnFwd(OUT_A,35);
  OnRev(OUT_B,50);
  Wait(1800);
  Off(OUT_AB);   //右顔輪郭
  Wait(500);
  
  OnFwd(OUT_B,25);
  Wait(800);
  Off(OUT_B);
  Wait(500);     //リーゼント
 
  OnRev(OUT_A,30);
  Wait(900);
  Off(OUT_A);
  Wait(500);     //頭輪郭
  
  OnFwd(OUT_A,45);
  OnRev(OUT_B,25);
  Wait(650);
  Off(OUT_AB);
  Wait(500);     //前髪
 
  OnRev(OUT_C,40);
  Wait(500);
  Off(OUT_C);
  Wait(500);     //ペン上げ
 
  OnFwd(OUT_B,20);
  OnRev(OUT_A,45);
  Wait(300);
  Off(OUT_AB);
  Wait(500);     //ペン調整
 
  OnFwd(OUT_C,20);
  Wait(500);
  Off(OUT_C);
  Wait(500);     //ペン下げ
 
  OnFwd(OUT_A,20);
  OnRev(OUT_B,30);
  Wait(300);
  Off(OUT_AB);
  Wait(700);     //左眉
 
  OnRev(OUT_C,40);
  Wait(500);
  Off(OUT_C);
  Wait(500);     //ペン上げ
  
  OnFwd(OUT_A,20);
  OnRev(OUT_B,15);
  Wait(400);
  Off(OUT_AB);
  Wait(700);     //ペン調整
  
  OnFwd(OUT_C,30);
  Wait(700);
  Off(OUT_C);
  Wait(500);     //ペン下げ
 
  OnRev(OUT_A,30);
  OnFwd(OUT_B,10);
  Wait(300);
  Off(OUT_AB);
  Wait(500);     //右眉
 
  OnRev(OUT_C,40);
  Wait(500);
  Off(OUT_C);
  Wait(500);     //ペン上げ
 
  OnRev(OUT_A,35);
  OnFwd(OUT_B,27);
  Wait(650);
  Off(OUT_AB);
  Wait(500);    //調整
 
  OnFwd(OUT_C,30);
  Wait(400);
  Off(OUT_C);
  Wait(500);     //ペン下げ
 
  OnRev(OUT_A,30);
  Wait(400);
  Off(OUT_A);   //口
  Wait(500);
  
  OnRev(OUT_C,50);
  Wait(500);
  Off(OUT_C);
  Wait(500);     //ペン上げ
 
  OnFwd(OUT_A,55);
  OnRev(OUT_B,20);
  Wait(700);
  Off(OUT_AB);
  Wait(500);     //調整
  
  OnFwd(OUT_C,30);
  Wait(800);
  Off(OUT_C);
  Wait(500);     //ペン下げ(右目)
 
  OnRev(OUT_C,50);
  Wait(510);
  Off(OUT_C);
  Wait(500);     //ペン上げ
   
  OnFwd(OUT_B,40);
  OnRev(OUT_A,40);
  Wait(200);
  Off(OUT_AB);
  Wait(500);    //調整
  
  OnFwd(OUT_C,30);
  Wait(1000);
  Off(OUT_C);
  Wait(500);     //ペン下げ(左目)
  
  }


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