2005/B7

☆項目☆

最初に作ったプログラム

10月21日作成
task main()
{
 OnFwd(OUT_A);
 OnFwd(OUT_C);
 Wait(300);          //3秒間前進する
 Off(OUT_A+OUT_C);   //停止
}

三角形に動くプログラム

 10月21日作成

task main()
{
  OnFwd(OUT_A+OUT_C);
  Wait(300);
  OnRev(OUT_C);
  OnFwd(OUT_A);
  Wait(130);
 OnFwd(OUT_A+OUT_C);
  Wait(300);
  OnRev(OUT_C);
  OnFwd(OUT_A);
 Wait(130);
 OnFwd(OUT_A+OUT_C);
 Wait(300);
 Off(OUT_A+OUT_C);
}

span.murasakidaburu{color:#660099;background-color:#CC99FF;}
span.ao{ color: #0066FF;background-color:#FFFF00; }
span.aodaburu{ color: #0033FF; background-color:      #99CCFF; }
<span class="murasakidaburu">色々なプログラム</span>
<span class="ao">工事中</span>
<span class="aodaburu">色々なプログラム</span>
body{color:#FFFF00;background-color:#336666;background-  image: url(mybackground.jpg);}

明るいところ探して止まるロボ

最初に変数hikariを用意し、0を入れておき0より大きい光を
受けたらその光の値を代入し、その後も、hikariに入ってる値
より大きければそれを新たに代入するようにさせ、同時にタイ
マーをリセットさせる、あらかじめロボが1周するのにかかる
時間を覚えさせておき、タイマーがその時間になったら停止さ
せる。
そうするとロボは一番明るいところでとまるはず。
はかってみたところ5秒であったのでタイマーに50を入れた。

コメント

span class="hitokotomidashi">今日のひとこと</span> できるだけ<span class="important">文書の構造とスタイルを分 離</span>しましょう。

  • 色の着け方が分かりませんm(ー-ー)m -- 2005-11-24 (木) 19:33:20
  • pukiwikiではHTMLのタグやCSSは使えません。基本的な文法は『整形ルール』を参考にしてください。 -- 松本(教員) 2005-11-24 (木) 21:51:26

#define si 494

#define Do 554

#define Re 587

#define Mi 659

#define Fa 740

#define So 784

#define Ra 880

#define Si 988

#define DO 1109

#define RE 1175

#define MI 1318

#define 20

#define h j*2

#define hf j*2+j

#define s j*4

#define sf j*4+h

#define S s/3

#define n j*8

#define nf j*8+s

#define z j*16

task play_music() {

  while (true)
  {Wait (s);
   PlayTone (Si, h);Wait (h);
   PlayTone (Ra, hf);Wait (s);
   PlayTone (Ra, h);Wait (h);
   PlayTone (RE, s);Wait (s);
   PlayTone (DO, h);Wait (h);
   PlayTone (Si, h);Wait (h);
   PlayTone (Ra, h);Wait (h);
   PlayTone (Fa, h);Wait (h);
   PlayTone (Ra, s);Wait (sf);
   PlayTone (Ra, j);Wait (j);
   PlayTone (Si, j);Wait (j);
   PlayTone (DO, j);Wait (j);
   PlayTone (RE, h);Wait (h);
   PlayTone (Ra, h);Wait (h);
   PlayTone (Fa, j);Wait (j);
  
   PlayTone (So, h);Wait (h);
   PlayTone (Fa, h);Wait (h);
   PlayTone (So, hf);Wait (hf);
   PlayTone (Fa, j);Wait (j);
   PlayTone (So, j);Wait (j);
   PlayTone (Ra, j);Wait (j);
   PlayTone (Si, hf);Wait (hf);
   PlayTone (Re, j);Wait (j);
   PlayTone (Ra, j);Wait (j);
   PlayTone (So, j);Wait (j);
   
   PlayTone (Fa, hf);Wait (hf);
   PlayTone (So, hf);Wait (hf);
   PlayTone (831, hf);Wait (hf);
   PlayTone (Ra, h);Wait (h);
   PlayTone (Re, j);Wait (h);
   PlayTone (Re, h);Wait (h);
   PlayTone (Si, h);Wait (h);
   
   PlayTone (Ra, hf);Wait (s);
   PlayTone (Ra, h);Wait (h);
   PlayTone (RE, s);Wait (s);
   PlayTone (DO, h);Wait (h);
   PlayTone (Si, h);Wait (h);
   PlayTone (Ra, h);Wait (h);
   
   PlayTone (Fa, h);Wait (h);
   PlayTone (Ra, s);Wait (sf);
   PlayTone (Ra, j);Wait (j);
   PlayTone (Si, j);Wait (j);
   PlayTone (DO, j);Wait (j);
   PlayTone (RE, h);Wait (h);
   PlayTone (Ra, h);Wait (h);
   PlayTone (Fa, j);Wait (j);
   
   PlayTone (Ra, S);Wait (S);
   PlayTone (So, S);Wait (S);
   PlayTone (Fa, S);Wait (S);
   PlayTone (Re, n);Wait (n);
                    Wait (hf);
   PlayTone (si, j);Wait (j);
   PlayTone (Re, j);Wait (j);
   PlayTone (Si, h);Wait (h);
   PlayTone (Ra, h);Wait (h);
   PlayTone (Si, h);Wait (h);
   PlayTone (Re, z+n);Wait (z);
   
   PlayTone (si, j);Wait (j);
   PlayTone (Re, j);Wait (j);
   PlayTone (So, j);Wait (j);
   PlayTone (Fa, h);Wait (h);
   PlayTone (Mi, j);Wait (j);
   PlayTone (Re, h);Wait (h);
   PlayTone (Mi, h);Wait (h);
   
   PlayTone (Re, nf);Wait (nf);
   }
 }

task main () {

    start play_music ;
}

トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-12-16 (金) 17:54:28