2006a/A4/課題１の試作プログラム の履歴ソース(No.3)

• 履歴一覧
• 差分 を表示
• 現在との差分 を表示
• 2006a/A4/課題１の試作プログラム へ行く。
  • 1 (2006-05-24 (水) 10:25:28)
  • 2 (2006-05-24 (水) 11:13:30)
  • 3 (2006-05-26 (金) 05:15:32)
  • 4 (2006-06-02 (金) 04:51:39)

[[2006a/A4/NRLPの研究室]]
*課題１の試作プログラム [#oa07e14c]
 作成者：NRLP＠右班
 掲載日時：５月２４日

完成品のロボット本体を見ていないので、調整すべき数値はすべて未記入です。

 #define zen(t) OnFwd(OUT_A+OUT_C);Wait(t);Off(OUT_A+OUT_C);　　　　　　／／前進する
 #define kou(t) OnRev(OUT_A+OUT_C);Wait(t);Off(OUT_A+OUT_C);　　　　　　／／後進する
 #define migi(t) OnFwd(OUT_C);OnRev(OUT_A);Wait(t);Off(OUT_A+OUT_C);　 ／／右へ回る
 #define hidari(t) OnRev(OUT_C);OnFwd(OUT_A);Wait(t);Off(OUT_A+OUT_C); ／／左へ回る
 #define 45d ?byou　　 　　　　　　　　　　　　　　　　　　　　　　　　　　／／４５度回転するときの秒数
 #define 90d ??byou　　　　　　　　　　　　　　　　　　　　　　　　　　　　／／９０度回転するときの秒数
 #define 180d ???byou　　　　　　　　　　　　　　　　　　　　　　　　　　　／／１８０度回転するときの秒数
 #define age OnFwd?(OUT_?);Wait(?+);Off(OUT_?);　　　　　　　　　　　　　／／ペンを上げる
 #define sage OnRev?(OUT_?);Wait(?-);Off(OUT_?);　　　　　　　　　　　　 ／／ペンを下げる
 
 task main()
 {
  sage;　　　　　　　　　／／１画目を描く
   kou(1kakume);
    age;
  zen(hanbun modoru); 　／／２画目へ移動
   migi(90d?);
    zen(tyotto);
  sage;　　　　　　　　　／／２画目を描く
   kou(2kakume);
    age;
  zen(aruteido);　　　　 ／／３画目へ移動
   migi(45dkurai?);
    kou(bimyou);
  sage;　　　　　　　　　／／３画目を描く
   kou(3kakume);
    age;
  zen(aruteido-);　　　　／／４画目へ移動
   hidari(180d?);
    kou(bimyou-);
  sage;　　　　　　　　　／／４画目を描く
   kou(4kakume);
    migi(harai);　　　　 ／／微妙にはらい
     age;
 }
**反省 [#we99b405]
 この時点でロボットの本体の完成品を
 お目にかかっていません。ですので、
 本体とプログラムとの調整を急ぎ足で行わなければならなくなりました。
 このプログラムでは直線しか
 描けません。なので、カーブのプログラムを
 取り入れてみたいと思いました。
 作成開始が遅く、時間が
 残りわずかになってしまいました。これからは
 早めに集合して作り始めるべきでしょう。
**感想 [#i458c7b3]
いいから
&size(30){全員集合っ！！};
**鋭い突っ込みをお願いします。 [#y5a4b7da]
#comment