[[2005/C1]] * 掲示板 [#x7560111] **無題 [#t0bf4e3d] > (2006-02-08 (水) 14:57:23)~ ~ ~ ~ #define Do 523~ ~ #define Re 587~ ~ #define Mi 659~ ~ #define Fa 698~ ~ #define So 784~ ~ #define La 881~ ~ ~ ~ void head_turn_right(int t) {OnFwd(OUT_C); Wait(t);}~ ~ void head_turn_left (int t){OnRev(OUT_C); Wait(t);}~ task play_music() ~ ~ { PlayTone(Do,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); ~ PlayTone(Mi,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(So,50); Wait(55); PlayTone(La,50); Wait(55); PlayTone(So,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(Mi,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); } ~ ~ task message_send()~ {~ Wait(425); SendMessage(1); Wait(500); ~ }~ task shippo()~ { ~ ~ repeat(29){ OnFwd(OUT_A); Wait(15); Off(OUT_A); OnRev(OUT_A); Wait(15); Off(OUT_A); OnRev(OUT_A); Wait(15); Off(OUT_A); OnFwd(OUT_A); Wait(15); Off(OUT_A); } ~ }~ task head()~ { ~ ~ head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(425); Off(OUT_C); head_turn_right(425); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); ~ } ~ ~ ~ task main()~ {~ start play_music; start message_send; start shippo; start head; ~ }~ // #comment **無題 [#n0a40d30] > (2006-02-08 (水) 12:43:39)~ ~ int t~ #define Do 523~ #define Re 587~ #define Mi 659~ #define Fa 698~ #define So 784~ #define La 881~ #define shippo_turn_right OnFwd(OUT_A); Wait(15);~ #define shippo_turn_left OnRev(OUT_A); Wait(15);~ #define head_turn_right OnFwd(OUT_C); Wait(t);~ #define head_turn_left OnRev(OUT_C); Wait(t);~ task play_music() ~ { PlayTone(Do,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(So,50); Wait(55); PlayTone(La,50); Wait(55); PlayTone(So,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(Mi,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); PlayTone(Do,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Fa,50); Wait(55); PlayTone(Mi,50); Wait(55); PlayTone(Re,50); Wait(55); PlayTone(Do,50); Wait(55); Wait(55); } }~ task message_send()~ {Å@~ ClearTimer(0); while( Timer(0) =>425 ) { SendMessage(1); } }~ task shippo()~ { ~ repeat(88){ shippo_turn_right OnFwd(OUT_A); Wait(15); Off(OUT_A); shippo_turn_left OnRev(OUT_A); Wait(15); Off(OUT_A); shippo_turn_left OnRev(OUT_A); Wait(15); Off(OUT_A); shippo_turn_right OnFwd(OUT_A); Wait(15); Off(OUT_A); } }~ task head()~ { ~ head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(425); Off(OUT_C); head_turn_right(425); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_right(55); Off(OUT_C); head_turn_left(55); Off(OUT_C); } ~ task main()~ {~ start play_music; start message_send; start shippo; start head; }~ // #comment **無題 [#j2e0dddd] > (2006-02-08 (水) 11:53:36)~ ~ task main()~ {~ SetSensor(SENSOR_2,SENSOR_TOUCH); SetSensor(SENSOR_3, SENSOR_LIGHT); OnRev(OUT_C);Wait(300);Off(OUT_C); ClearMessage(); until (Message() != 0); ~ if ( Message() == 4 ) {PlaySound(SOUND_UP) ; OnFwd(OUT_C); } if(Message() == 5){ if(SENSOR_3< 40){ ClearTimer(0); while ( Timer(0) <= 50 ) { SendMessage(1); } } if(45>SENSOR_3> 40){ ClearTimer(0); while ( Timer(0) <= 50 ) {SendMessage(3); } } if(45<= SENSOR_3){ ClearTimer(0); while ( Timer(0) <= 50 ) {SendMessage(2); PlaySound(SOUND_UP) ;} } }}~ // #comment **無題 [#d54b8208] > (2006-02-08 (水) 11:53:06)~ ~ task main()~ {~ SetSensor(SENSOR_2,SENSOR_TOUCH); SetSensor(SENSOR_3, SENSOR_LIGHT); ClearMessage(); while(SENSOR_2 == 1){ OnRev(OUT_C);Wait(300); ClearMessage(); until (Message() != 0); if(SENSOR_3< 40){ ClearTimer(0); while ( Timer(0) <= 50 ) { SendMessage(1); } } if(45>SENSOR_3> 40){ ClearTimer(0); while ( Timer(0) <= 50 ) {SendMessage(3); } } if(45<= SENSOR_3){ ClearTimer(0); while ( Timer(0) <= 50 ) {SendMessage(2); }} if( Message() == 4) { OnFwd(OUT_C); Wait(300);Off(OUT_C); } if( Message() == 7) { OnFwd(OUT_A); Wait(300);Off(OUT_A); } repeat(3){ OnRev(OUT_C); Wait(200);Off(OUT_C);Wait(200); } } }~ // #comment **無題 [#ye3e57e0] > (2006-02-08 (水) 11:51:59)~ ~ task main()~ {~ SetSensor(SENSOR_2,SENSOR_TOUCH); while(true){ if(SENSOR_2 == 1){ OnRev(OUT_C); } ClearMessage(); // Message() Ç 0 Ç…ê›íË until (Message() != 0); // Message() Ç… 0 à»äOÇÃílÇ™ì¸ÇÈÇ‹Ç≈ë“Ǭ ~ if ( Message() == 2 ) {PlaySound(SOUND_UP) ; OnFwd(OUT_C); } } }~ // #comment **uhyo [#rf1aeab3] >[[ebichiri]] (2006-02-07 (火) 12:50:39)~ ~ ~ ClearMessage(); if(Message==5) { OnRev(OUT_A+OUT_C); Wait(100) OnFwd(OUT_A); OnRev(OUT_C); Wait(148) // -箱をとった後の後退、四分の一左回転のプログラムです -- &new{2006-02-07 (火) 12:51:30}; #comment **a [#xbf09908] >[[example program ]] (2006-02-06 (月) 22:50:10)~ ~ #define threshold 40~ #define turn_left OnRev(OUT_A);OnFwd(OUT_C);~ #define turn_right OnFwd(OUT_A);OnRev(OUT_C);~ #define stop_turning Off(OUT_A+OUT_C);~ #define akarui 40 ~ int cross ; ~ int cro ; ~ ~ void go_a(int cro)~ {~ ~ cross = 0 ; ~ while(true){ if (SENSOR_1+ SENSOR_2+ SENSOR_3 > akarui) { cross = cross + 1 ; } ~ if (cross == cro) { Off(OUT_A+OUT_C) ; } cross = 0 ; } } sub li_a()~ { if ((SENSOR_1 > akarui) && (SENSOR_3 > akarui) && (SENSOR_2 < akarui)) { OnFwd(OUT_A+OUT_C); } if ((SENSOR_1 < akarui ) && (SENSOR_3 < akarui ) && (SENSOR_2 < akarui)) { OnFwd(OUT_A+OUT_C); } if((SENSOR_1 < akarui ) && (SENSOR_3 > akarui )) { OnRev(OUT_A); OnFwd(OUT_C); } if((SENSOR_1 > akarui ) && (SENSOR_3 < akarui )){ OnRev(OUT_C); OnFwd(OUT_A); } if ((SENSOR_1 > akarui ) && (SENSOR_3 > akarui ) && (SENSOR_2 > akarui )){ OnRev(OUT_C); OnFwd(OUT_A); } if ((SENSOR_1 > akarui ) && (SENSOR_3 > akarui ) && (SENSOR_2 > akarui )){ OnRev(OUT_A); OnFwd(OUT_C); } OnFwd(OUT_A+OUT_C);Wait(400); } task main()~ { SetSensor(SENSOR_1+ SENSOR_2 + ~ SENSOR_3, SENSOR_LIGHT); ClearMessage(); until (Message() != 0); ~ if ( Message() == 1 ){ li_a; go_a(6); OnFwd(OUT_A);OnRev(OUT_C);Wait(300); li_a; go_a(5);} if ( Message() == 2 ) { li_a; go_a(5); OnFwd(OUT_A);OnRev(OUT_C);Wait(300); li_a; go_a(4);} if ( Message() == 3 ) li_a; go_a(4); OnFwd(OUT_A);OnRev(OUT_C);Wait(300); li_a; go_a(3);} ClearMessage(); until (Message() != 0); ~ if ( Message() == 1 ) li_a; go_a(5) OnFwd(OUT_A);OnRev(OUT_C);Wait(300); li_a; go_a(4);} if ( Message() == 2 ) li_a; go_a(4) OnFwd(OUT_A);OnRev(OUT_C);Wait(300); li_a; go_a(3);} if ( Message() == 3 ) li_a; go_a(3) OnFwd(OUT_A);OnRev(OUT_C);Wait(300); li_a; go_a(2);} ClearMessage(); until (Message() != 0); ~ if ( Message() == 1 ) turn_left; li_a; go_a(5) if ( Message() == 2 ) turn_right; li_a; go_a(4) if ( Message() == 3 ) stop_turning; li_a; go_a(3) }~ // -現在作成中のプログラム案です -- &new{2006-02-06 (月) 22:53:14}; #comment **無題 [#zf4d4cc4] >[[rainntorase ]] (2006-02-06 (月) 22:48:09)~ ~ #define akarui 40 task main()~ {~ SetSensor(SENSOR_1, SENSOR_LIGHT); SetSensor(SENSOR_2, SENSOR_LIGHT); SetSensor(SENSOR_3, SENSOR_LIGHT); while (true) { if ((SENSOR_1 > akarui) && (SENSOR_3 > akarui) && (SENSOR_2 < akarui)) { OnFwd(OUT_A+OUT_C); } if ((SENSOR_1 < akarui ) && (SENSOR_3 < akarui ) && (SENSOR_2 < akarui)) { OnFwd(OUT_A+OUT_C); } if((SENSOR_1 < akarui ) && (SENSOR_3 > akarui ) && (SENSOR_2 > akarui )){ OnFwd(OUT_A); OnRev(OUT_C);} if((SENSOR_1 > akarui ) && (SENSOR_3 < akarui ) && (SENSOR_2 > akarui )){ OnFwd(OUT_C); OnRev(OUT_A);} if ((SENSOR_1 > akarui ) && (SENSOR_3 > akarui ) && (SENSOR_2 > akarui )){ OnFwd(OUT_C); OnRev(OUT_A); } } }~ // -ライントレースの雛形です。センサの間は下の黒いラインヨリも細くしてください -- &new{2006-02-06 (月) 22:52:46}; #comment **無題 [#a4b5847c] >[[中川]] (2006-02-06 (月) 17:25:52)~ ~ #define THRESHOLD 40 ~ task main() { SetSensor(SENSOR_1, SENSOR_LIGHT); SetSensor(SENSOR_2, SENSOR_LIGHT); while (true) { if ((SENSOR_1 >THRESHOLD) && (SENSOR_2> THRESHOLD)){ OnFwd(OUT_A+OUT_C); } if(SENSOR_1 <THRESHOLD) { OnRev(OUT_A); OnFwd(OUT_C); } if (SENSOR_2 < THRESHOLD) { OnRev(OUT_C); OnFwd(OUT_A); }if ((SENSOR_1 <THRESHOLD) && (SENSOR_2 < THRESHOLD)){ OnFwd(OUT_A+OUT_C); } } } // #comment **無題 [#u477a60d] >[[池尻]] (2005-12-19 (月) 18:11:11)~ ~ 眠い(-_-)zz~ // #comment **無題 [#y0398b20] >[[宇佐美]] (2005-12-07 (水) 19:25:44)~ ~ 自己紹介文を書きましょう。~ // #comment