[[2009b]]
#contents
*初めてのレポート [#w68917d8]
*プログラム [#b117226a]
 #define MOVE_TIMEAX 10 
 #define MOVE_TIMECY 5 
 #define MOVE_TIMEBZ 30 
 #define PAUSE 100
 #define Z_UP  OnFwd(OUT_B); Wait(MOVE_TIMEBZ); Off(OUT_B); Wait(PAUSE);
 #define Z_DOWN OnRev(OUT_B); Wait(MOVE_TIMEBZ); Off(OUT_B); Wait(PAUSE);
 #define X_RIGHT OnRev(OUT_A); Wait(MOVE_TIMEAX); Off(OUT_A); Wait(PAUSE);
 #define X_LEFT OnFwd(OUT_A); Wait(MOVE_TIMEAX); Off(OUT_A); Wait(PAUSE);
 #define Y_FRONT OnRev(OUT_C); Wait(MOVE_TIMECY); Float(OUT_C); Wait(PAUSE);
 #define Y_BACK OnFwd(OUT_C); Wait(MOVE_TIMECY); Float(OUT_C); Wait(PAUSE);
 task main()
 {
 Wait(100);
 Z_DOWN;
 Y_FRONT;
 X_RIGHT;
 Y_BACK;
 X_LEFT;
 OnRev(OUT_A); Wait(40); Off(OUT_A);
 Wait(PAUSE);
 X_RIGHT;
 Y_BACK;
 X_LEFT;
 Z_UP; //grass
 OnFwd(OUT_A); Wait(20); Off(OUT_A);
 Wait(PAUSE);
 OnRev(OUT_C); Wait(10); Off(OUT_C);
 Wait(PAUSE);
 Z_DOWN;
 OnRev(OUT_C); Wait(10); Off(OUT_C);
 Wait(PAUSE);
 Z_UP; //nose
 OnRev(OUT_C); Wait(10); Off(OUT_C);
 Wait(PAUSE);
 OnRev(OUT_A); Wait(20); Off(OUT_A);
 Wait(PAUSE);
 Z_DOWN;
 OnFwd(OUT_A); Wait(MOVE_TIMEAX); Float(OUT_A);
 Wait(PAUSE);
 Z_UP; //mouth
 OnFwd(OUT_A); Wait(5); Float(OUT_A);
 Wait(PAUSE);
 OnRev(OUT_C); Wait(MOVE_TIMECY); Float(OUT_C);
 Wait(PAUSE);
 Z_DOWN;
 OnRev(OUT_A); Wait(50); Float(OUT_A);
 Wait(PAUSE);
 OnFwd(OUT_C); Wait(50); Float(OUT_C);
 Wait(PAUSE);
 OnFwd(OUT_A); Wait(50); Float(OUT_A);
 Wait(PAUSE);
 OnRev(OUT_C); Wait(50); Float(OUT_C);
 Wait(PAUSE);
 Z_UP;
 }

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