¤Þ¤¿¡¢Á°¿Ê¡¢¸åÂà¤Èº¸±¦¤ÎÆ°¤¤òÁȤ߹ç¤ï¤»¤ÆÆ°¤«¤¹¤³¤È¤Ç¼Ð¤á¤Ø¤Î°ÜÆ°¤¬²Äǽ¤È¤Ê¤Ã¤Æ¤¤¤ë¡£
(¤¿¤À¤·¡¢¥×¥í¥°¥é¥ß¥ó¥°¤Ë¤Ï¥Ú¥ó¤Î¾å¤²²¼¤²¤¬´Þ¤Þ¤ì¤Æ¤¤¤ë)
¼Ì¿¿£±¥â¡¼¥¿¡¼A¡§A¤Î¥â¡¼¥¿¡¼¤ÏÁ°¸å¤ÎÆ°¤¤òôÅö¡£
¡¦ÀâÌÀ¡§OnFwd(OUT_A)¤ÇÁ°¿Ê¡¢OnRev(OUT_A)¤Ç¸åÂà¡£
¼Ì¿¿£²¥â¡¼¥¿¡¼B¡Ê£²¤Ä¤Î»õ¼Ö¤Ç¶´¤ó¤Ç¤¤¤ëÉôʬ¡Ë¡§B¤Î¥â¡¼¥¿¡¼¤Ïº¸±¦¤Ø¤ÎÆ°¤¤òôÅö¡£
¡¦ÀâÌÀ¡§OnFwd(OUT_)¤ÇÀµÌ̤«¤é¸«¤Æ±¦¤Ø¡¢OnRev(OUT_B)¤Ç´¬¤Ì᤹¡£
¼Ì¿¿£³¥â¡¼¥¿¡¼C¡§C¤Î¥â¡¼¥¿¡¼¤Ï¥Ú¥ó¤Î¾å¤²²¼¤²¤òôÅö¡£
¡¦ÀâÌÀ¡§OnFwd(OUT_C)¤Ç¥Ú¥ó¤ò¾å¤²¡¢OnRev(OUT_C)¤Ç¥Ú¥ó¤ò²¼¤²¤ë¡£
¡ùÁ´ÂΤÎÆ°¤¤Ë´Ø¤¹¤ëÀâÌÀ
¥â¡¼¥¿¡¼C(ÊӤξ夲²¼¤²¤òôÅö)¤Ï¥·¡¼¥½¡¼¤ËÎ㤨¤ë¤È¿¿¤óÃæ¤ÎºîÍÑÅÀ¤Î¤è¤¦¤ÊÌò³ä¤ò²Ì¤¿¤·¤Æ¤¤¤ë¡£¤¿¤À¡¢¼ÂºÝ¤Î¥·¡¼¥½¡¼¤È°Û¤Ê¤ë¤Î¤Ï¡¢¿Í¤¬ºÂ¤ëÎÏÅÀÉôʬ¤òÁàºî¤¹¤ë¤³¤È¤Ç¥Ú¥ó¤òÆ°¤«¤¹¤Î¤Ç¤Ï¤Ê¤¯¡¢¥â¡¼¥¿¡¼C¤òÆ°¤«¤¹¤³¤È¤Ç¶¯À©Åª¤Ë¥·¡¼¥½¡¼¤òÆ°¤«¤·¤Æ¤¤¤ë¤È¸À¤¦ÅÀ¤À¡£¥·¡¼¥½¡¼¤ÎÊÒ¦¤Ë¥Ú¥ó¤ò¡¢¤â¤¦°ìÊý¤Ë¥Ð¥é¥ó¥¹¤ò¤È¤ë¤¿¤á¤Î¥Ú¥ó¤è¤ê¾¯¤··Ú¤á¤Î½Å¤ê¤ò¤Ä¤±¤¿¡£¤è¤Ã¤Æ¡¢¥â¡¼¥¿¡¼C¤òÆ°¤«¤¹¤³¤È¤Ç¥Ð¥é¥ó¥¹¤òÊݤäƤ¤¤¿¥·¡¼¥½¡¼¤¬·¹¤¥Ú¥ó¤ò¾å¤²¤¿¤ê²¼¤²¤¿¤ê½ÐÍè¤ë¤è¤¦¤Ë¤Ê¤Ã¤Æ¤¤¤¿¡£¤·¤«¤·¡¢¼ÂºÝ¤Ë½ñ¤¯»þ¤Ë¤Ê¤ë¤È¥â¡¼¥¿¡¼A¤Ë¤è¤ëÁ°¸å¤ÎÆ°¤¤¬µ¡ÂΤòÍɤ餷¤Æ¤·¤Þ¤¤¡¢¥·¡¼¥½¡¼¤Î¥Ð¥é¥ó¥¹¤¬Êø¤ì¤¿¤ê¡¢¥â¡¼¥¿¡¼B¤òÆ°¤«¤¹¤³¤È¤Ç¥Ú¥ó¤Î¤Ä¤¤¤¿Êý¤ÎŤµ¤¬ÊѤï¤Ã¤Æ¤·¤Þ¤¤¥â¡¼¥¿¡¼C¤ÎÆ°¤¤Î¤ß¤Ç¤Ï¥Ú¥ó¤ò»ý¤Á¾å¤²¤ë¤³¤È¤¬½ÐÍè¤Ê¤¯¤Ê¤Ã¤Æ¤¤¤¿¡£
#define PEN_TIME (4) //¥Ú¥ó¤òÆ°¤«¤¹»þ´Ö #define PEN_UP OnFwd(OUT_C);Wait(PEN_TIME);Off(OUT_C) ; //¥Ú¥ó¤ò¾å¤²¤ëÆ°ºî #define PEN_DOWN OnRev(OUT_C);Wait(PEN_TIME);Off(OUT_C); //¥Ú¥ó¤ò²¼¤²¤ëÆ°ºî #define FOWRD(FWD_TIME) OnFwd(OUT_A);Wait(FWD_TIME);Off(OUT_A); //Á°¿Ê¤¹¤ë #define BACK(BACK_TIME) OnRev(OUT_A);Wait(BACK_TIME);Off(OUT_A); //¸åÂह¤ë #define MIGIUE(migiue_time) OnRev(OUT_B);OnFwd(OUT_A);Wait(migiue_time);Off(OUT_AB); //±¦¾å¤Ë°ÜÆ°¤¹¤ë #define MIGISITA(migisita_time) OnRev(OUT_B);OnRev(OUT_A);Wait(migisita_time);Off(OUT_AB);//±¦²¼¤Ë°ÜÆ°¤¹¤ë #define HIDARISITA(hidarisita_time) OnFwd(OUT_B);OnRev(OUT_A);Wait(hidarisita_time);Off(OUT_AB);//º¸²¼¤Ë°ÜÆ°¤¹¤ë
task main { PEN_DOWN(PEN_TIME); Wait(100); MIGIUE(30); PEN_UP(PEN_TIME); //1²èÌÜ Wait(100); HIDARISITA(15); PEN_DOWN(PEN_TIME); Wait(100); OnRev(OUT_B); Wait(40); Off(OUT_B); PEN_UP(PEN_TIME); //£²²èÌÜ Wait(100); OnFwd(OUT_B); Wait(25); Off(OUT_B); Wait(100); PEN_DOWN(PEN_TIME); Wait(100); BACK(23); PEN_UP(PEN_TIME); //£´²èÌÜÅÓÃæ Wait(100); OnFwd(OUT_B); Wait(38); Off(OUT_B); PEN_DOWN(PEN_TIME); Wait(100); OnRev(OUT_B); Wait(80); Off(OUT_B); PEN_UP(PEN_TIME); //£³²èÌÜ Wait(100); OnFwd(OUT_B); Wait(35); Off(OUT_B); PEN_DOWN(PEN_TIME); Wait(100); HIDARISITA(30); PEN_UP(PEN_TIME); //£´²èÌܤÎʧ¤¤ Wait(100); MIGIUE(30); PEN_DOWN(PEN_TIME); Wait(100); MIGISITA(30); PEN_UP(5); //£µ²èÌÜ Wait(150); OnFwd(OUT_B); Wait(38); Off(OUT_B); BACK(10); //¼¡¤Î»ú¤Ø¤Î°ÜÆ°
PEN_DOWN(PEN_TIME); Wait(150); HIDARISITA(30); //1²èÌÜ Wait(100); MIGIUE(15); Wait(100); BACK(35); PEN_UP(5); //2²èÌܺ¸Â¦½ª¤¨¤ë Wait(100); FOWRD(35); OnRev(OUT_B); Wait(10); Off(OUT_B); PEN_DOWN(PEN_TIME); Wait(100); MIGIUE(30); //3²èÌÜ Wait(100); HIDARISITA(15); OnRev(OUT_B); Wait(60); Off(OUT_B); PEN_UP(PEN_TIME); //4²èÌÜ Wait(150); OnFwd(OUT_B); Wait(30); Off(OUT_B); PEN_DOWN(PEN_TIME); Wait(100); BACK(40); PEN_UP(PEN_TIME); //5²èÌÜ Wait(100); FOWRD(30); PEN_DOWN(PEN_TIME); Wait(100); OnRev(OUT_B); Wait(10); Off(OUT_B); PEN_UP(PEN_TIME); //6²èÌÜ Wait(100); HIDARISITA(10); PEN_DOWN(PEN_TIME); Wait(100); OnRev(OUT_B); Wait(10); Off(OUT_B); //7²èÌÜ }
¡¡¾å¤Î²èÁü¤ò¸«¤ë¤È¡¢¥Ú¥ó¤ÎÉÕ¤¤¤¿¥Ñ¡¼¥Ä¤òº¸±¦¤ËÆ°¤«¤¹¤¿¤á¤ÎÂ礤ʣ²¤Ä¤Î»õ¼Ö¤¬¤¢¤ë¡£¤³¤ì¤Ï¡¢»ä¤¿¤Á¤ÎÈɤ¬¥í¥Ü¥Ã¥È¤ËÁ°¸å¤À¤±¤Ç¤Ê¤¯º¸±¦¤ÎÆ°¤¤ò²Ã¤¨¤¿¤«¤Ã¤¿¤¿¤á¼è¤êÉÕ¤±¤¿Éôʬ¤À¤Ã¤¿¡£Í½Äê¤Ç¤Ï¥×¥í¥°¥é¥ß¥ó¥°¤ÎÃæ¤Ç¡¢¥Ú¥ó*1¤ÎÉÕ¤¤¤Æ¤¤¤ë¥Ñ¡¼¥Ä*2¤¬Æ°¤¯µ÷Î¥¤òÄ´À᤹¤ë¤³¤È¤Ç¡¢¤½¤Î¥Ñ¡¼¥Ä¤¬»õ¼Ö¤Ë¤«¤«¤é¤Ê¤¤°Ì±ó¤¤µ÷Î¥¤Þ¤Ç¤¤¤«¤Ê¤¤¤è¤¦¤Ë¤·¤¿¤ê¡¢µÕ¤Ë¡¢´¬¤¼è¤ê¤¹¤®¤ÆB¤Î¥â¡¼¥¿¡¼¤ËÉé²Ù¤¬¤«¤«¤é¤Ê¤¤¤è¤¦¤Ë¤·¤¿¤«¤Ã¤¿¡£¤Þ¤¿¡¢¤½¤¦¤Ê¤é¤Ê¤¤¤è¤¦¤Ë»öÁ°¤Î½àÈ÷¤Ç¤Ï²¿ÅÙ¤â¥×¥í¥°¥é¥ß¥ó¥°¤òÄ´Àᤷ¤¿¡£¤·¤«¤·¡¢ËÜÈ֤ΤªÈäϪÌܲñ¤Ç¤Ï¡Öºî¡×¤Î£´²èÌܤÎOnRev¡ÊOUT_B¡Ë¤ÎÉôʬ¤Ç¡¢¤½¤Î¥Ñ¡¼¥Ä*3¤ò´¬¤¼è¤ê¤¹¤®¤¿¤¿¤á¤ËB¤Î¥â¡¼¥¿¡¼¤ËÉé²Ù¤¬¤«¤«¤Ã¤¿¤¿¤á¡¢B¼þ¤ê¤Î¥Ñ¡¼¥Ä¤¬ËÜÂΤ«¤é³°¤ì¤Æ¤·¤Þ¤Ã¤¿¡£
¡¡¼¡¤Ë¡¢¾å¤Î¼Ì¿¿¤Ç¤Ï¥Ú¥ó¤ÎÉôʬ¤Ï¾å¤¬¤Ã¤Æ¤¤¤ë¤¬¡¢¼ÂºÝ¤Ë¥Ú¥ó¤òÉÕ¤±¤Æ¤ß¤ë¤È¤Þ¤È¤â¤Ë¾å¤¬¤é¤Ê¤«¤Ã¤¿¡£Åö½é¤ÎÁÛÄê¤Ç¤Ï¡¢C¤Î¥â¡¼¥¿¡¼¡Ê¼Ì¿¿£³¡Ë¤òÆ°¤«¤¹¤³¤È¤Ç¥Ú¥ó¤Î¾å¤²²¼¤²¤ò¹Ô¤ª¤¦¤È¤·¤Æ¤¤¤¿¡£¤·¤«¤·¡¢C¤Î¥â¡¼¥¿¡¼¤À¤±¤Ç¹Ô¤¨¤ë¤Û¤É³ÆÉôÉʤϷڤ¯¤Ê¤¯¡¢¥Ñ¥ï¡¼¤â¤ê¤Ê¤«¤Ã¤¿¤¿¤á»ý¤Á¾å¤¬¤é¤Ê¤«¤Ã¤¿¤È»×¤ï¤ì¤ë¡£ËÜÍè¤Ç¤¢¤ì¤ÐC¤Î¥â¡¼¥¿¡¼¤Ë»õ¼Ö¤ò¤«¤Þ¤»¤ë¤³¤È¤Ç¥Ñ¥ï¡¼¤òÁý¤ä¤·¡¢C¤Î¥â¡¼¥¿¡¼¤Ë¤«¤«¤ëÉéô¤ò¸º¤é¤¹¤Ù¤¤À¤Ã¤¿¡£¤Þ¤¿¤Ï¡¢¥í¥Ü¥Ã¥È¼«ÂΤηÚÎ̲½¤ò¹Ô¤¦¤Ù¤¤À¤Ã¤¿¡£¤½¤ì¤Ëµ¤¤Å¤¤¤¿¤Î¤ÏËÜÈÖľÁ°¤ËÀèÀ¸¤Ë»ØŦ¤µ¤ì¤Æ¤«¤é¤À¤Ã¤¿¤Î¤À¤¬¡Ä¡£
¡¡¤½¤·¤Æ¡¢´°À®¤·¤¿¤Î¤¬¾å¤Î¡ÖÌðºî¡×¤À¡£¡Êʸ»ú¤È¤¤¤¨¤Ð¤â¤¸¤À¤¬¡£¼ººî¤Ë¤Ê¤é¤Ê¤«¤Ã¤¿¤À¤±¤Þ¤·¤«¡£¡Ë
²þÁ±ÅÀ¤È¤·¤Æ¤Ï¡¢¡»õ¼ÖÉôʬ¤Î¾åÉô¤ò¾å¤«¤éÊ̤Υѡ¼¥Ä¤ÇÍÞ¤¨¤ë¤³¤È¤Ç¡¢B¥Ñ¡¼¥Ä¼þÊÕ¤¬´Êñ¤Ë³°¤ì¤Ê¤¤¤è¤¦¤Ë¤¹¤ë¤³¤È¡£¾°³î¤Ä¡¢´¬¤¼è¤ê²á¤®¤Ê¤¤¤è¤¦¤Ë¥×¥í¥°¥é¥ß¥ó¥°¤òÄ´À᤹¤ë¤³¤È¡£¢C¤Î¥â¡¼¥¿¡¼¤Ë»õ¼Ö¤ò¤«¤Þ¤»¤ë¤³¤È¤Ç¥Ñ¥ï¡¼¤ò¾å¤²¤Æ¡¢¥Ú¥ó¤¬ÉÕ¤¤¤¿¾õÂ֤Ǥâ»ý¤Á¾å¤²¤é¤ì¤ë¤è¤¦¤Ë¤¹¤ë¤³¤È¡£¤â¤·¤¯¤Ï¡¢¥Ú¥óÉôʬ¤ËľÀܥ⡼¥¿¡¼¤ò¤Ä¤±¤ë¤³¤È¤Ç¥Ú¥ó¤Î¾å¤²²¼¤²¤ò²Äǽ¤Ë¤¹¤ë¤³¤È¡£
¡¡ºÇ¸å¤Ë¡¢ÈÉ°÷¤È½¸¤Ã¤Æ»î¹Ôºø¸í¤ò·«¤êÊÖ¤·¤¿¤³¤È¤Ï¿É¤«¤Ã¤¿¤¬¤È¤Æ¤â³Ú¤·¤«¤Ã¤¿¡£¤À¤¬¡¢¤½¤¦¤Ç¤¢¤ë¤¬¸Î¤ËËÜÈ֤Ǿå¼ê¤¯½ñ¤±¤Ê¤«¤Ã¤¿¤Î¤¬¤È¤Æ¤â²ù¤·¤«¤Ã¤¿¡£EV£³¤Î¥×¥ê¥ó¥¿¡¼¤ä¡¢Æ±¤¸RIS¤Ç¤â¡Ö´ôÉì¡×¤ä¡Ö¾¾Ëܡפʤɤò½ñ¤¤¤¿¥í¥Ü¥Ã¥Èã¤Ï¤È¤Æ¤âÀº¹ª¤Ëºî¤é¤ì¤Æ¤¤¤¿¡£»ä¤¿¤Á¤Î°ìÈÖ¤ÎÈ¿¾Ê¤Ï¥í¥Ü¥Ã¥ÈÀ½ºî¤Ë¤ª¤¤¤Æ¥¢¥¤¥Ç¥¢¤¬Â¤ê¤Ê¤«¤Ã¤¿¤³¤È¤À¡£¼¡¤Î²ÝÂê¤Ç¤Ï¡¢¤³¤ÎÈ¿¾Ê¤ò³è¤«¤·¤Æ¹ÖµÁ¤Ë¼è¤êÁȤߤ¿¤¤¡£
¡¡