Ìܼ¡
²ÝÂê¡¡¡¡ÁêÊý¤Î»÷´é³¨¤òÉÁ¤¯¥í¥Ü¥Ã¥È
¤³¤ì¤¬¼«Ê¬¤¿¤Á¤Î¥°¥ë¡¼¥×¤¬ºî¤Ã¤¿¥í¥Ü¥Ã¥È¤Ç¤¹¡£
¸«¤¿Ìܤϰ¤¤¤Ç¤¹¤¬¥í¥Ü¥Ã¥È¤Î¥Ð¥é¥ó¥¹¤ò¤È¤ë¤³¤È¤òÍ¥À褷¤Þ¤·¤¿¡££Î£Ø£ÔËÜÂΤϡ¢¾å¤È²¼¤Ç¤·¤Ã¤«¤ê¤È¸ÇÄꤷ¤Æ¤¢¤ê¤Þ¤¹¡£
¥Ú¥ó¤Î¾å¤²²¼¤²¤Ï¡¢¾å¤Î¼Ì¿¿¤Î¤è¤¦¤Ë¥¿¥¤¥ä¤Ç¥Ú¥ó¤ò¶´¤ß¹þ¤ß¡¢¾å²¼¤ËÆ°¤«¤»¤ë¤è¤¦¤Ë¤·¤Þ¤·¤¿¡£¥¿¥¤¥ä¤Î¥´¥àÉôʬ¤Ç¡¢¥Ú¥ó¤ò¤·¤Ã¤«¤ê¤È¸ÇÄê¤Ç¤¤ë¤è¤¦¤Ë¤Ê¤Ã¤Æ¤Þ¤¹¡£¤½¤³¤ÇÌäÂê¤È¤Ê¤Ã¤¿¤Î¤ÏÆóÅÀ¡£¤É¤¦¤ä¤Ã¤Æ¥â¡¼¥¿¡¼¤ò¤È¤ê¤Ä¤±¤ë¤«¡¢¤È¤É¤¦¤ä¤Ã¤Æ¥Ú¥ó¤ò¿âľ¤Ë¸ÇÄꤹ¤ë¤«¤Ç¤·¤¿¡£¤¤¤í¤¤¤í¤È»î¤·¤¿¤¢¤²¤¯¡¢¥â¡¼¥¿¡¼¤òµÕ¤µ¤Ë¼è¤êÉÕ¤±¤ë¤³¤È¤Ç¡¢Æ±»þ¤Ë¥Ú¥ó¤ò¿âľ¤Ë¼è¤êÉÕ¤±¤ë¤³¤È¤¬¤Ç¤¤Þ¤·¤¿¡£
¤³¤Î¤è¤¦¤Ë¤·¤Æ¥Ú¥ó¤ò¥í¥Ü¥Ã¥È¤Î½Å¿´¤ËÃÖ¤±¤ë¤è¤¦¤Ë¤·¤Þ¤·¤¿¡£¡£¤½¤Î¤¿¤á¡¢¤Õ¤é¤Ä¤¤ò·Ú¸º¤Ç¤¤Þ¤·¤¿¡£
ͽÄê¤È¤·¤Æ¤Ï¡¢¤³¤Î¤è¤¦¤ËÉÁ¤±¤ë¥×¥í¥°¥é¥à¤ò½ñ¤¤Þ¤·¤¿¡£¤·¤«¤·¡¢ËÜÈ֤ǤÏ
¤³¤Î¤è¤¦¤ËÎسԤÀ¤±¤Ë¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£¸¶°ø¤ÏÅÓÃæ¤Ç¥Ú¥ó¤¬¤¢¤¬¤Ã¤Æ¤·¤Þ¤Ã¤¿¤³¤È¤Ç¤¹¡£
sub spin_ahead(int z)¡¡¡¡¡¡¡¡¡¡ ¡¡//±¦¤Ø²ó¤ë { OnFwd(OUT_A,40); Wait(z); }
sub back(int y)¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡//¸å¤í¤Ë²¼¤¬¤ë { OnRev(OUT_AC,35); Wait(y); Off(OUT_AC); }
sub pen_down()¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡//¥Ú¥ó¤ò²¼¤²¤ë { OnFwd(OUT_B,30); Wait(510); Off(OUT_B); }
sub pen_up() //¥Ú¥ó¤ò¾å¤²¤ë { OnRev(OUT_B,30); Wait(500); Off(OUT_B); }
void go_straight(int x)¡¡¡¡¡¡¡¡¡¡¡¡//Á°¤Ë¿Ê¤à { OnFwd(OUT_AC,20); Wait(x); Off(OUT_AC); }
task main() { go_straight(600); //¡¡¡´é¤ÎÎسԤòÉÁ¤¯ spin_ahead(4200); go_straight(600); pen_up(); //¥Ú¥ó¤ò¾å¤²¤ë back(600); //¢¡¡ÌܤòÉÁ¤¯°ÌÃ֤ذÜÆ°¤¹¤ë¤¿¤á¤Ë°ìÅÙ¸åÂष¤Æľ¿Ê¸å¡¢¤â¤¦°ìÅÙ¸åÂष¤Þ¤¹¡£ spin_ahead(1400); Off(OUT_AC); back(300); pen_down(); //¥Ú¥ó¤ò²¼¤²¤ë go_straight(600); ¡¡¡¡¡¡¡¡//º¸ÌܤòÉÁ¤¯ pen_up();¡¡¡¡¡¡¡¡ //¥Ú¥ó¤ò¾å¤²¤ë go_straight(700); //ÌܤÈÌܤδֳ֤ò¤È¤ë pen_down(); //¥Ú¥ó¤ò²¼¤²¤ë go_straight(400);¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡//±¦ÌܤòÉÁ¤¯ pen_up(); //¥Ú¥ó¤ò¾å¤²¤ë back(1000);¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ ¡¡¡¡ //É¡¤òÉÁ¤¯¤¿¤á¤Ë°ìÅÙ¸åÂष¤Æ¶Ê¤¬¤ê¡¢¤â¤¦°ìÅÙ¸åÂष¤Þ¤¹¡£ OnFwd(OUT_A,35);¡¡ Wait(2000); Off(OUT_A); back(400); pen_down(); //¥Ú¥ó¤ò²¼¤²¤ë go_straight(500); //£¡¡É¡¤òÉÁ¤¯ Off(OUT_AC);¡¡¡¡¡¡ OnFwd(OUT_C,35);¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ ¡¡¡¡ ¡¡ //¤³¤Î»þľÀþ¤À¤±¤Ç¤Ï¤Ê¤¯¡¢ºÇ¸å¾¯¤·¤À¤±¶Ê¤²¤ë¤è¤¦¤Ë¤·¤Þ¤·¤¿¡£ Wait(250); Off(OUT_A); pen_up(); //¥Ú¥ó¤ò¾å¤²¤ë back(400);¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ ¡¡¡¡¡¡¡¡¡¡ //¸ý¤òÉÁ¤¯¤¿¤á¤Ë°ìÅÙ¸åÂष¤Æ¶Ê¤¬¤ê¡¢¤â¤¦°ìÅÙ¸åÂष¤Þ¤¹¡£ OnFwd(OUT_C,35); Wait(1500); Off(OUT_C); back(300); pen_down(); //¥Ú¥ó¤ò²¼¤²¤ë OnRev(OUT_C,35); //¤¡¡¸ý¤òÉÁ¤¯ Wait(1200); Off(OUT_AC);¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ ¡¡//½ªÎ» }
¤«¤Ê¤êñĴ¤Ê¥×¥í¥°¥é¥à¤Ç¤¹¤¬¡¢Â¿¤¯¤Î»þ´Ö¤òÈñ¤ä¤·¤Þ¤·¤¿¡£´é¤ÎÎسԤϡ¢ºÇ½é¤Ï±ß¤ò¥Ù¡¼¥¹¤Ë¤¹¤ëͽÄê¤Ç¤·¤¿¤¬¡¢»æ¤«¤é¥í¥Ü¥Ã¥È¤¬¤Ï¤ß½Ð¤Æ¤·¤Þ¤¦ÅÀ¤«¤é¡¢Ä¹¤¤ÂʱߤòÍѤ¤¤ÆÉÁ¤¤Þ¤·¤¿¡£ÌܤòÉÁ¤¯¥×¥í¥°¥é¥à¤Çº¸±¦¤ÎÁö¹Ô»þ´Ö¤¬°ã¤¦¤Î¤Ï¡¢²¿ÅÙÁö¤é¤»¤Æ¤âº¸ÌܤÀ¤±¤¬Ã»¤¯¤Ê¤Ã¤Æ¤·¤Þ¤Ã¤¿¤Î¤Ç¡¢º¸±¦¤Î¥Ð¥é¥ó¥¹¤ò¹Í¤¨¤¿¤¦¤¨¤Ç¤³¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤·¤¿¡£
»æ¤òÆ°¤«¤µ¤º¤ËÉÁ¤¯¡¢¤³¤ì¤¬ºÇÂç¤ÎÆñ´Ø¤Ç¤·¤¿¡£ ºÇ½é¤ËÉÁ¤³¤¦¤È¤·¤Æ¤¤¤¿³¨¤Ç¤Ï¡¢»æ¤¬Æ°¤¤¤Æ¤·¤Þ¤¤¡¢ÅÓÃ椫¤éÉÁ¤±¤Ê¤¯¤Ê¤Ã¤Æ¤·¤Þ¤¤¤Þ¤·¤¿¡£¤½¤³¤Ç¡¢³¨¤Î¥¯¥©¥ê¥Æ¥£¡¼¤ò²¼¤²¤Æ»æ¤Î¾å¤«¤é¥í¥Ü¥Ã¥È¤¬½Ð¤Ê¤¤¤è¤¦¤Ê¥×¥í¥°¥é¥à¤Ë¤·¤Þ¤·¤¿¡£ÅÅÃÓ»ÄÎ̤ˤè¤Ã¤Æ¤â¡¢¥â¡¼¥¿¡¼¤Î®ÅÙ¤¬ÊѤï¤êÈùÄ´À°¤Ë¶ìÏ«¤·¤Þ¤·¤¿¡£¤Þ¤¿¡¢¥í¥Ü¥Ã¥È¤¬³¨¤òÉÁ¤¤¤Æ¤¤¤ë¤¦¤Á¤Ë¥Ú¥ó¤¬»æ¤«¤éÎ¥¤ì¤Æ¤·¤Þ¤¤¥Ú¥ó¤ò¾å¤²²¼¤²¤¹¤ë¥×¥í¥°¥é¥à¤ò²¿ÅÙ¤âÊѹ¹¤·¤Æ¤ß¤Þ¤·¤¿¤¬¡¢·ë¶É²þÁ±¤Ç¤¤º¡¢ËÜÈ֤ǤâÅÓÃæ¤Ç¥Ú¥ó¤¬É⤤¤Æ¤·¤Þ¤Ã¤¿¤³¤È¤¬¤¯¤ä¤·¤¤¤Ç¤¹¡£