2009a/A4/課題２右

ロボット作成　課題２

設計†

センサー†

☆光センサー
光センサーは２つつけました。最初は1つの予定でしたが、２つのほうがちゃんと黒い線の上をトレースするので変更しました。

☆タッチセンサー
タッチセンサーは１つです。

赤い部分を支点にして、テコの原理を利用してタッチします。↓↓

車体†

赤い部分がタッチセンサーで
黄色い部分が光センサーです。
できるだけ大きめの車輪を使うことで、光センサーがしっかり感知するようになったし、テコの原理も作りやすくなりました！

走るライン†

とにかくシンプルなものにしました。
カーブの時にうまく光センサーが感知するかどうかが問題でした。

問題点†

センサー†

☆光センサー
車体がどんどんズレていって黒い線の上を走らなくなってしまいました。 ２つの光センサーの感覚を狭めることで、カーブ後もちゃんとトレースするようになりました。
☆タッチセンサー
最初は牛乳パックに反応しなかったので、センサーを高くしてテコの原理を利用したら反応するようになりました。

車体†

改良に改良を重ねました（泣）
最初の車体のときはタッチセンサーが反応しなかったり、光センサーの感覚が広くなってしまったりと問題点が多かったですが、車体の高さを高くしたことにより、それらの問題は解決しましたー！！

プログラム†

パック回避 Ver.†

#define  THRESHOLD 39                                                    //閾値を定義
#define  go_straight(t)  {OnFwd(OUT_A+OUT_C);Wait(t);Off(OUT_A+OUT_C);}　//以下回避時の定義
#define  GO_S            {OnFwd(OUT_A+OUT_C); Wait(20);}
#define  go_back         {OnRev(OUT_A+OUT_C);Wait(80);Off(OUT_A+OUT_C);}
#define  turn_left　   　{OnFwd(OUT_C);OnRev(OUT_A);Wait(70);Off(OUT_A+OUT_C);}    
#define  turn_right      {OnFwd(OUT_A);OnRev(OUT_C);Wait(55);Off(OUT_A+OUT_C);} 

task main()
{
SetSensor(SENSOR_2,SENSOR_TOUCH);   //センサー２をタッチセンサーとする
SetSensor(SENSOR_1,SENSOR_LIGHT);   //センサ−１を光センサーとする
SetSensor(SENSOR_3,SENSOR_LIGHT);   //センサ−３を光センサーとする
SetPower(OUT_A,1)                   //A出力を制限
SetPower(OUT_C,1)                   //C出力を制限
int n;                              //交差点を定義        
n=0;                                //まだ交差点は通ってないことを定義
while(n<2){ //交差点を4回通る
if((SENSOR_1>THRESHOLD)&&( SENSOR_3>THRESHOLD)){　//センサ−１と３が黒線上にないとき
OnFwd(OUT_A+OUT_C);                               //まっすぐ進む
}
if(SENSOR_1<THRESHOLD)       //センサー１が黒線上にきてしまったら
OnRev(OUT_A);                //左へ行くよう調節
OnFwd(OUT_C);   
}
if(SENSOR_3<THRESHOLD){     //センサー３が黒線上にきてしまったら
OnFwd(OUT_A);               //右へ行くよう調節
OnRev(OUT_C);
}
if((SENSOR_1<THRESHOLD)&&(SENSOR_3<THRESHOLD)){ //センサー１と３が黒線上→交差点にきたら
Off(OUT_A+OUT_C);                               //１回止まって待ってから再び進む
Wait(150);　
GO_S
n=n+1;                                          //通った交差点の数を足していく
}
if(SENSOR_2==1){　　　　　　　　　　 　　　　　　　//タッチセンサーが反応したら
go_back 　　　　　　　　　　　　　　　　　　　　　　//下がって
turn_left 　　　　　　　　　　　　　　　　　　　　　//左へよけて
go_straight(90)　　　　　　　　　　　　　　　　　　// 
turn_right　　　　　　　　　　　　　　　　　　　　 //右に曲がって
go_straight(150) 　　　　　　　　　　　　　　　　　//
turn_right 　　　　　　　　　　　　　　　　　　　　//黒線上に復帰
n=n+1;
if(n==2)                        //2回目の交差点にきたら
{
OnFwd(OUT_A+OUT_C);            //少し進んで止まる
Wait(50);
Off(OUT_A+OUT_C);
}
}
}

作成者：k山

パック運搬 Ver.†

#define  THRESHOLD 39   　　　　　　　   　　　　　　　　　　　　　　　　//閾値を定義
#define  go_straight(t)  {OnFwd(OUT_A+OUT_C);Wait(t);Off(OUT_A+OUT_C);}　//以下回避時の定義
#define  GO_S(t)     {OnFwd(OUT_A+OUT_C); Wait(t);}
#define  GO_b(t)     {OnRev(OUT_A+OUT_C); Wait(t);}
#define  go_back(t)     {OnRev(OUT_A+OUT_C);Wait(t);Off(OUT_A+OUT_C);}
#define  turn_left(t){OnFwd(OUT_C);OnRev(OUT_A);Wait(t);Off(OUT_A+OUT_C);}    
#define  TL          {OnFwd(OUT_C); OnRev(OUT_A); Wait(15);}
#define  turn_right(t) {OnFwd(OUT_A);OnRev(OUT_C);Wait(100);Off(OUT_A+OUT_C);} 
#define  TR          {OnFwd(OUT_A); OnRev(OUT_C); Wait(30);}

task main()
{
SetSensor(SENSOR_2,SENSOR_TOUCH);   //センサー２をタッチセンサーとする
SetSensor(SENSOR_1,SENSOR_LIGHT);   //センサ−１を光センサーとする
SetSensor(SENSOR_3,SENSOR_LIGHT);   //センサ−３を光センサーとする
SetPower(OUT_A,1)                   //A出力を制限
SetPower(OUT_C,1)                   //C出力を制限
int n;                              //交差点を定義        
n=0;                                //まだ交差点は通ってないことを定義
             
while(n<4){ //交差点を4回通る
if((SENSOR_1>THRESHOLD)&&( SENSOR_3>THRESHOLD)){　//センサ−１と３が黒線上にないとき
OnFwd(OUT_A+OUT_C);   　　　　　　　　　　   　　 //まっすぐ進む
}
if(SENSOR_1<THRESHOLD)    　　　　　　　　　　  　//センサー１が黒線上にきてしまったら
OnRev(OUT_A); 　　　　　　　　　  　　　　　　　　//左へ行くよう調節
OnFwd(OUT_C);
}
if(SENSOR_3<THRESHOLD){ 　　　　　　//センサー３が黒線上にきてしまったら
OnFwd(OUT_A); 　　　　　　　　　  　//右へ行くよう調節
OnRev(OUT_C);
}
if((SENSOR_1<THRESHOLD)&&(SENSOR_3<THRESHOLD)){ //センサー１と３が黒線上→交差点にきたら
Off(OUT_A+OUT_C); 　　　　　　　　　　　　　　　//１回止まって待ってから再び進む
Wait(150);　
GO_S(20) 
n=n+1; 　　　　　　　　　  　　　　　　　　　　 //通った交差点の数を足していく
}
if(n==4){　　　　　　　　　　  　　　　　//4回目の交差点の時
go_back(80)　　　　　　　　　  　 　　　//下がって
turn_left(70)　　　　　　　　　  　　　 //左へよけて
go_straight(100) 　　　　　　　　　  
turn_right(80) 　　　　　　　　　  　　　//右に曲がって進み
go_straight(250) 
turn_right(100)　　　　　　　　　  　　 //ライン上に復帰して
go_straight(120)
turn_left(90)
go_back(140)　　　　　　　　　　　　　　//牛乳パックを元の位置に戻す
n=n+1;　　　　　　　　　　　　　　　　　//通った交差点の数を足していく
}
}

作成者：竹

感想†

K山の感想†

ロボットもプログラムもかなり難しくて大変だった。 今回の課題はだいぶ疲れました。

竹の感想†

前回の何百倍も難しくなってヒイヒイしてます。
光センサーとタッチセンサーをうまく使っていかないと、
課題がこなせないので本当に大変だと思いました。

コメント†

コメントお願いします

• プログラムにインデント（ifなどの階層ごとに行う字下げ）を入れると見やすくなると思います。また、ifでセンサーの反応を判別しているところを、センサーが白か黒か（もしくは触っていないか触っているか）について、「無反応なら0を、反応なら1を返す関数」にしてみると、もっとスリム化できるかもしれません。 -- こさか 2009-07-02 (木) 22:13:26
• ロボットのほうは問題点などをきちんと書いていて良かったです。一人目のプログラムに関しては、最後の2つ目の交差点のときの行動の意味と3周するための方法をもう一度考えてみてください。(今のままでは、3周目に入った時に止まりますし、始める場所によって距離が変わってきます。)２人目のプログラムに関しては、3周するための方法とタッチセンサが生かされていないことを改善しましょう(４個目の交差点に紙パックが必ず置いてあるのでしょうか？) -- FI 2009-07-03 (金) 02:44:18

目次

全般

• お知らせ
• はじめに
• 授業の概要
• レポート作成
• パーツの収納方法
• 関連リンク (古い)

教材・資料

• Pybricks
  • Move Hub
  • Spike関連メモ
• EV3用 (第3世代)
  • EV3関連メモ
  • EV3用入門的ガイド (シェル,python)
• NXT用 (第2世代)
  • NXT関連メモ
  • NXC入門的ガイド
  • BricxCCのインストール
• RIS用 (第1世代)
  • NQC入門(旧)
  • NQC入門的ガイド
  • RISの修理
• Spybotics
  • Spyboticsについて

Debian関連

• Debian Live

過去の授業

• 2019年度後期
• 2019年度前期
• 2018年度後期
• 2018年度前期
• 2017年度後期
• 2017年度前期
• 2016年度後期
• 2016年度前期
• 2015年度後期
• 2015年度前期
• 2014年度後期
• 2014年度前期
• 2013年度後期
• 2013年度前期
• 2012年度後期
• 2012年度前期
• 2011年度後期
• 2011年度前期
• 2010年度後期
• 2010年度前期
• 2009年度後期
• 2009年度前期
• 2008年度後期
• 2008年度前期
• 2007年度後期
• 2007年度前期
• 2006年度後期
• 2006年度前期
• 2005年度
• 2004年度

2003年度以前

• 旧ホームページ

最新の20件

メニュー編集

お知らせの追加