HSP¥Ý¡¼¥¿¥ë
¥µ¥¤¥È¥Þ¥Ã¥× ¤ªÌ䤤¹ç¤ï¤»


HSPTV!·Ç¼¨ÈÄ


̤²ò·è ²ò·è Ää»ß ºï½üÍ×ÀÁ

2009
0516
¤Ò¤ã¤×¤è¤×¤è¤Î¥¢¥ë¥´¥ê¥º¥à8̤²ò·è


¤Ò¤ã

¥ê¥ó¥¯

2009/5/16(Sat) 17:32:07|NO.25175

¤¤¤Þ¡Ö¤×¤è¤×¤è¤ß¤¿¤¤¤Ê¥²¡¼¥à¡×¤òºî¤Ã¤Æ¤¤¤Þ¤¹

¾Ã¤¨¤ë¾ò·ï¤¬¡ÖƱ¤¸¿§¤¬4¤Ä°Ê¾å¤Ä¤Ê¤¬¤ë¡×¤Ç¤Ï¤Ê¤¯
¡ÖƱ¤¸¿§¤Ç¤ï¤Ã¤«¤¬½ÐÍè¾å¤¬¤ë¡×¤È¤¤¤¦¤³¤È¤¬Í£°ì¤Î°ã¤¤¤Ç¤¹

(Îã1)
¢£¢£¢£¢¤¡¡¢ª¡¡¡¡¡¡¡¡¢¤¡¡¢ª¡¡¡¡
¢£¡û¢£¢£¡¡¢ª¡¡¡¡¡û¡¡¡¡¡¡¢ª¡¡¡¡
¢£¢¤¡û¢£¡¡¢ª¡¡¡¡¢¤¡û¡¡¡¡¢ª¡¡¡¡¡û
¢£¢£¢£¢£¡¡¢ª¡¡¡¡¡¡¡¡¡¡¡¡¢ª¡¡¡¡¢¤¡û¢¤
¤³¤Î¤È¤­¢£¤Ï¤­¤¨¤Þ¤¹

(Îã2 <<½ÅÍ×>> )
¢£¢£¡¡ ¡¡¢ª¡¡¢£¢£¡¡¡¡¡¡¢ª
¢£¡û ¡¡¡¡¢ª¡¡¢£¡û¡¡¡¡¡¡¢ª
¢£¢£¢£¢¤¡¡¢ª¡¡¡¡¡¡¡¡¢¤¡¡¢ª¡¡¡¡¢£
¢£¡û¢£¢£¡¡¢ª¡¡¡¡¡û¡¡¡¡¡¡¢ª¡¡¡¡¡û
¢£¢¤¡û¢£¡¡¢ª¡¡¡¡¢¤¡û¡¡¡¡¢ª¡¡¢£¡û
¢£¢£¢£¢£¡¡¢ª¡¡¡¡¡¡¡¡¡¡¡¡¢ª¡¡¢£¢¤¡û¢¤

¤³¤Î¤È¤­¤Ï¢£¤ÎÆâ¡¢²¼4ÃʤΤߤò¾Ã¤·¤¿¤¤¤È»×¤¤¤Þ¤¹
(¾å2ÃʤϤޤÀÊĤ¸¤Æ¤¤¤Ê¤¤¤Î¤Ç)

¤³¤Î¾ÃµîȽÄê¤ÎÊýË¡¤ÇǺ¤ó¤Ç¼ÁÌ䤷¤Þ¤·¤¿
¥¹¥¯¥ê¥×¥È¤¸¤ã¤Ê¤¯¡¢¥¢¥ë¥´¥ê¥º¥à¤À¤±¤Ç¤¤¤¤¤Î¤Ç¤É¤Ê¤¿¤«²òÀ⤪´ê¤¤¤·¤Þ¤¹



¤³¤Îµ­»ö¤ËÊÖ¿®¤¹¤ë


raisen

¥ê¥ó¥¯

2009/5/16(Sat) 19:06:54|NO.25181

¥¢¥ë¥´¥ê¥º¥à¤ò¹Í¤¨¤ë¤Î¤¬¥×¥í¥°¥é¥ß¥ó¥°¤ÎÂé¸ïÌ£¤À¤È»×¤¦¤Î¤Ç¤¹¤¬¡¢¤Þ¤¡Ìµ»ë¤·¤Æ²òÅú¡£

1 ¢£¤òõ¤¹(¤½¤ÎºÂɸ¤ò´ðÅÀ¤È¤¹¤ë)¡£Ìµ¤±¤ì¤Ð½ª¤ï¤ê¡£
2 ´ðÅÀ¤«¤é¾å²¼º¸±¦¤Ë¤¢¤ë¤«Ãµ¤¹¡£¤¢¤Ã¤¿¤é¤½¤³¤ò´ðÅÀ¤Ë¤¹¤ë¡£Ìµ¤±¤ì¤Ð½ª¤ï¤ê¡£

for i = 0 to 3 ¸«¤Ã¤±¡ª ¼¡¤Î½èÍý¤ØGO¡ª next
¤Ç¤Ï¤À¤á¡£¸«¤Ã¤±¡ª¤Æ¤âi=4¤Þ¤Ç¡£
3 2¤ò·«¤êÊÖ¤¹(¸õÊ䤬ʣ¿ô¤¢¤Ã¤¿¤éÁ´¤Æ¤ËÂФ·2¤ò¹Ô¤¦)
1¤Î´ðÅÀ¤È¸«¤Ã¤±¡ª¤¿´ðÅÀ¤¬°ìÃפ·¤¿¤é°Ï¤Þ¤ì¤¿¡£
4 °ìÈÖº¸¤Î´ðÅÀ¤ÎºÂɸ¤«¤é½ç¤Ë°ìÈÖ±¦¤Þ¤Ç¤Î´ðÅÀ¤ÎºÂɸ¤Þ¤Ç¼¡¤ò¹Ô¤¦
¡¡1 °ìÈÖº¸¤ÎÎó¤Î°ìÈÖ¾å¤Î´ðÅÀ¤«¤é¤½¤ÎÎó¤Î°ìÈÖ²¼¤Î´ðÅÀ¤Þ¤Ç¤ò¾Ãµî(¥ª¥»¥í¤ÈƱ¤¸¡£)
¡¦¡¦¡¦


¤Þ¤Ç½ñ¤¤¤Æ¤ª¤±¤ÐÂç¾æÉפǤ·¤ç¤¦¤«¡©



¥Ò¥«¥ê

¥ê¥ó¥¯

2009/5/16(Sat) 20:50:17|NO.25184

SRPG ¤Î°ÜÆ°ÈϰϤαþÍѤߤ¿¤¤¤Ê´¶¤¸¤Ç¤Ç¤­¤ë¤Î¤Ç¤Ï¤Ê¤¤¤«¤È¡£
¤È¤¤¤¦¤ï¤±¤Ç¡¢¤³¤ó¤Ê¤Î¤ò¹Í¤¨¤Æ¤ß¤Þ¤·¤¿¡£

£±¡¥ÇÛÎóÊÑ¿ô¤ÎŬÅö¤Ê¸Ä½ê¤ò1¤Ä»ØÄê¡£¤³¤³¤òȽÄê¤Î³«»ÏÅÀ¤È¤¹¤ë¡£
¢­¤¿¤È¤¨¤Ð¡¢°ìÈÖº¸¾å¤ò³«»ÏÅÀ¤Ë¡£¤³¤ì¤«¤é¡Ö¢£¡×¤Ç°Ï¤Ã¤Æ¤¤¤ëÉôʬ¤òõ¤¹¡£
¢£¢£¢£¢£
¢£¢¢¢£¢¢
¢£¢£¢£¢¢
ȽÄêÍѤÎÇÛÎóÊÑ¿ô¤ÎÆâÍÆ
¢­°ìÈÖº¸¾å¤ò³«»ÏÅÀ¤Ë¡£
1,0,0,0
0,0,0,0
0,0,0,0

£²¡¥³«»ÏÅÀ¤ËÎÙÀܤ·¤Æ¤¤¤ëÇÛÎó¤Î¤¦¤Á¡¢³«»ÏÅÀ¤ÈƱ¤¸¿Þ·Á¤Î¥â¥Î¤ò¼¡¤ÎȽÄê¤Î°ÌÃ֤Ȥ¹¤ë¡£
1,2,0,0
2,0,0,0
0,0,0,0

£³¡¥£²¤ò·«¤êÊÖ¤·¤Ê¤¬¤é¡¢Ä´¤Ù¤¿²ó¿ô¤òÇÛÎó¤ËÂåÆþ¡£
1,2,3,4
2,0,4,0
3,4,0,0

£´¡¥¤Ö¤Ä¤«¤Ã¤¿¤È¤­¡Ä
1,2,3,4
2,0,4¢«¤³¤Î4¤Î²¼¤Ï¢£¤Ê¤Î¤Ç¡¢¤½¤³¤Ï5¤Ë¡£
3,4,5,0

1,2,3,4
2,0,4,0
3,4,5,0
¡¡¢¬¤Ä¤®¤Ë¡¢¤³¤³¤Î4¤«¤éȽÄꤷ¤è¤¦¤È¤¹¤ë¤È¡¢
¡¡±¦¤Î¢£¤Î°ÌÃ֤ˤϤ¹¤Ç¤Ë5¤¬ÂåÆþ¤µ¤ì¤Æ¤¤¤ë¤Î¤Ç¡¢¤³¤³¤Ç½ªÎ»¡£

£µ¡¥º£ÅÙ¤Ï5¤Î°ÌÃÖ¤ò³«»ÏÅÀ¤Ë¤·¤Æ¡¢
¡¡¡¡£²¤ÎµÕ¤ÎÍ×ÎΤǡ¢ÎÙÀܤ·¤¿-1¤ÇÅù¤·¤¤°ÌÃÖ¤ò½ç¤ËÉé¤ÎÃͤËÊÑ´¹
-1,-2,-3,4
-2, 0,-4,0
-3,-4,-5,0

£¶¡¥Éé¤ÎÃͤΰÌÃÖ¤òÁ´¤Æºï½ü


Íî¤Á¥²¡¼¤È¤«¥Ü¡¼¥É¥²¡¼¥à¤Î¥¢¥ë¥´¥ê¥º¥à¤Ï¹Í¤¨¤¿¤³¤È¤Ê¤¤¤Î¤Ç¡¢
¤â¤Ã¤È¸úΨ¤Î¤¤¤¤ÊýË¡¤¬¤¢¤ë¤«¤âÃΤì¤Þ¤»¤ó¤¬¡Ä¡Ä¡£



Sucret

¥ê¥ó¥¯

2009/5/17(Sun) 02:51:41|NO.25197

>>¥Ò¥«¥ê¤µ¤ó
¤½¤ÎÊýË¡¤À¤È5(ºÇÂçÃÍ)¤ÎÎ٤˰ì¤Ä¢£¤¬¤¢¤Ã¤¿¾ì¹ç
Îã)
¢£¢£¢£¢£
¢£¢¢¢£¢¢
¢£¢£¢£¢£¢«

±¦²¼¤Î¢£¤â¾Ã¤¨¤Æ¤·¤Þ¤¤¤Þ¤»¤ó¤«¡©

-----------------------------

Ʊ¤¸¿§¤¬2¤Ä°Ê¾åÎÙÀܤ·¤Æ¤¤¤ë¾ì¹ç¤ÇȽÄꤹ¤ë¤È
¢¢¢¢¢¢¢¢¢¢
¢¢¢£¢£¢£¢¢
¢¢¢¢¢¢¢¢¢¢
¢¬¤Ç¤â¢£¤¬¤­¤¨¤Æ¤·¤Þ¤¤¤Þ¤¹¤·¡Ä

-----------------------------

¡¡¾å²¼¤Î¤É¤Á¤é¤«¤Èº¸±¦¤Î¤É¤Á¤é¤«¤ËºÇÄã°ì¤Ä¤º¤ÄƱ¤¸¿§¤¬¤¢¤ë¾ì½ê¤òÄ´¤Ù¤Æ
¡Ö³Ñ¡×¤ò¸«¤Ä¤±¤ì¤Ð½ÐÍè¤Ê¤¤¤Ç¤·¤ç¤¦¤«¡©
¡¡¤È¤Ï¤¤¤¨»ä¤â¥Ò¥«¥ê¤µ¤ó¤ÈƱ¤¸¤¯¹Í¤¨¤¿¤³¤È¤Ï̵¤¤¤Î¤Ç¡¢
¸æÎϤˤʤì¤Ê¤¯¤Æ¿½¤·Ìõ¤´¤¶¤¤¤Þ¤»¤ó¡Ä¡£



GENKI

¥ê¥ó¥¯

2009/5/18(Mon) 21:17:39|NO.25233

¤ß¤Ê¤µ¤ó¤³¤¦¤¤¤¦²ÝÂê¹¥¤­¤Ç¤¹¤Í¡£

> ¥¹¥¯¥ê¥×¥È¤¸¤ã¤Ê¤¯¡¢¥¢¥ë¥´¥ê¥º¥à¤À¤±¤Ç¤¤¤¤¤Î¤Ç¤É¤Ê¤¿¤«²òÀ⤪´ê¤¤¤·¤Þ¤¹

¡Ö¤×¤è¤×¤è ¥¢¥ë¥´¥ê¥º¥à¡×¤Ç¥°¥°¤ë¤È¤¹¤°½Ð¤Æ¤­¤Þ¤¹¡£
http://www13.plala.or.jp/kymats/study/game_other/TOKOPUYO/tokopuyo.html

¤¹¤Ç¤Ë¤¢¤ë¤â¤Î¤Ë¼«Ê¬¤Î¥¢¥¤¥Ç¥¢¤ò¥×¥é¥¹¥¢¥ë¥Õ¥¡¤¹¤ë¤Î¤â³Ú¤·¤¤¤â¤Î¤Ç¤¹¡£



abast

¥ê¥ó¥¯

2009/5/18(Mon) 21:18:00|NO.25234

¥Í¥Ã¥È¤Çµ¡¼ï°Í¸ʸ»ú¤ò»È¤¦¤È¤Ï¤Ê¤ó¤È¤¤¤¦¶ò¹Ô



abast

¥ê¥ó¥¯

2009/5/18(Mon) 21:18:50|NO.25235

>GENKI
¤½¤¦¤Ï»×¤¨¤Ê¤¤¤ó¤À¤¬¡£¹¥¤­¤Ê¤ä¤Ä¤Ï¼«Ê¬¤ÇÌۤäƹͤ¨¤ë¤À¤í¡£



Sucret

¥ê¥ó¥¯

2009/5/18(Mon) 23:26:00|NO.25244

ȽÄêÊýË¡¤Ë¤Ä¤¤¤Æ¹Í¤¨¤Æ¤ß¤Þ¤·¤¿¤¬¡¢¤³¤ÎÍͤʤâ¤Î¤Ï¤¤¤«¤¬¤Ç¤·¤ç¤¦¤«¡©

ȽÄêÍѤË2¼¡¸µ¤ÎÇÛÎóÊÑ¿ô¤òÍÑ°Õ¤·¤Þ¤¹¡£

[1]ȽÄꤷ¤¿¤¤¿§¤Î¾å²¼¤É¤Á¤é¤«(ξÊý¤Ç¤â)¤ËƱ¤¸¿§¤¬¤¢¤ê¡¢
¡¡ ¤µ¤é¤Ëº¸±¦¤Î¤É¤Á¤é¤«(Ʊ¤¸¤¯Î¾Êý¤Ç¤â)¤ËƱ¤¸¿§¤¬¤¢¤ëÉôʬ¤ò³Ñ¤È¤·¡¢
¡¡ ȽÄêÍѤÎÇÛÎóÊÑ¿ô¤Ë-1¤òÂåÆþ¤¹¤ë(0°Ê³°¤¬¡Ö³Ñ¡×¤È¤Ê¤ë)¡£
¡¡ ¤³¤ÎÊýË¡¤ÇÁ´¤Æ¤Î¡Ö³Ñ¡×¤òõ¤·½Ð¤¹¡£
[2]°ì¤Ä¤Î³Ñ(ȽÄêÍÑÇÛÎóÊÑ¿ô¤ÎÃͤ¬0°Ê³°)¤ò´ð½à¤È¤·¡¢¤½¤Î³Ñ¤È¼´¤¬Æ±¤¸»ÍÊý¤Î³Ñ¤Î¿ô¤òµá¤á¤ë¡£
¡¡¤¿¤À¤·¡¢³Ñ¤È³Ñ¤Î´Ö¤Ë°Û¤Ê¤ë¿§¤Ï̵¤¤¤³¤È¤ò¾ò·ï¤È¤·¡¢°ìÊý¸þ¤Ç¿ô¤¨¤ë³Ñ¤Î¿ô¤Ï1¤Þ¤Ç¤È¤¹¤ë¡£
¡¡µá¤á¤¿³Ñ¤Î¿ô¤òȽÄêÍѤÎÇÛÎóÊÑ¿ô¤ËÂåÆþ¤¹¤ë¡£
¡¡¤³¤ì¤òÁ´¤Æ¤Î³Ñ¤Ë¹Ô¤¦¡£
[3]ȽÄêÍѤÎÇÛÎóÊÑ¿ô¤òÄ´¤Ù¡¢1¤¬ÂåÆþ¤µ¤ì¤Æ¤¤¤ì¤Ð¤½¤³¤Ë0¤òÂåÆþ¡£
¡¡È½ÄêÍѤÎÇÛÎóÊÑ¿ôÁ´ÂΤòÄ´¤Ù¤¿ºÝ¡¢1¤¬°ì¤Ä¤Ç¤â¤¢¤Ã¤¿¾ì¹ç¤Ï­¢¤ËÌá¤ë¡£
¡¡1¤¬°ì¤Ä¤â̵¤«¤Ã¤¿¾ì¹ç¤Ï¼¡¤Ë¿Ê¤à¡£
¡¡¤³¤ÎºÝ¡¢È½ÄêÍѤÎÇÛÎóÊÑ¿ôÁ´¤Æ¤¬0¤Ë¤Ê¤Ã¤¿¾ì¹ç¤Ï¥Ö¥í¥Ã¥¯(¤×¤è¡©)¤Î¾ÃÌǤϤʤ·¤È¤Ê¤ë¡£
[4]2°Ê¾å¤ÎƱ¼´¾å¤Î³ÑƱ»Î¤È¤½¤Î´Ö¤Ë¤¢¤ëÁ´¤Æ¤Î¥Ö¥í¥Ã¥¯¤ò¾Ã¤¹¡£
¡¡ ¤¿¤À¤·¡¢¼ê½ç¤È¤·¤Æ¤Ï°ì¤Ä¤Î³Ñ¤«¤é¤â¤¦°ì¤Ä¤Î³Ñ¤Ø½çÈÖ¤ÇƱ¤¸¿§¤ò¾Ã¤·¤Æ¤¤¤¯¡£
¡¡ ¤½¤ÎºÝ¡¢ÅÓÃæ¤Ë°Û¤Ê¤ë¿§¤¬¤¢¤ë¾ì¹ç¤â¤¢¤ë¤Î¤Ç¤½¤ÎºÝ¤Ï¡Ö¤½¤Î³Ñ¡×¤Ç¤Î¾ÃÌǤϤ½¤³¤Þ¤Ç¤Ç»ß¤á¤ë¡£

[4]¤ÎÎã
¢¢¢¢¢¢¢¢¢¢¢¢
¢¢¢£¢£¢£¢¢¢¢
¢¢¢£¢¢¢£¢¢¢¢
¢¢¢£¢£¢£¢¢¢¢
¢¢¢¤¢¢¢¢¢¢¢¢
¢¢¢£¢£¢£¢£¢¢
¢¢¢£¢¢¢¢¢£¢¢
¢¢¢£¢£¢£¢£¢¢
¢¢¢¢¢¢¢¢¢¢¢¢
³Ñ¤È³Ñ¤Î´Ö¤ò°ìµ¤¤Ë¾Ã¤·¤¿¾ì¹ç¡¢¾å¤Î¢¤¤â¾Ã¤·¤Æ¤·¤Þ¤¦¤¿¤á¡¢³Îǧ¤ò¼è¤ëɬÍפ¬¤¢¤ë¡£

ÀâÌÀ¤¬²¼¼ê¤Ç¤¹¤¤¤Þ¤»¤ó¡£
²Ã¤¨¡¢½èÍý¤Ë¤«¤«¤ë»þ´Ö¤¬¤ï¤«¤é¤Ê¤¤¤Î¤Ç¼ÂÍÑŪ¤«¤É¤¦¤«¤ÏÊݾ㤷¤«¤Í¤Þ¤¹¡Ä¡£
HSPÎñ(PCÎñ¤â)2ǯȾ¤Î̤½Ï¼Ô¤Ç¤¹¤¬¡¢¾¯¤·¤Ç¤â½õÎϤˤʤì¤ì¤Ð¹¬¤¤¤Ç¤¹¡£

>>abast¤µ¤ó
¤½¤ÎÍͤʤâ¤Î¤¬¤¢¤ë¤È¤ÏÃΤê¤Þ¤»¤ó¤Ç¤·¤¿¡£¸Ê¤Î̵ÃΤµ¤òÃѤ¸¤ë¤Ð¤«¤ê¤Ç¤¹¡£
¤ª¤«¤²¤ÇÄûÀµ¤¹¤ë¤³¤È¤¬½ÐÍè¤Þ¤·¤¿¡£ËÜÅö¤Ë¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£



taddi

¥ê¥ó¥¯

2009/5/19(Tue) 23:02:02|NO.25271

ȽÄêÊýË¡¤Ë¤Ä¤¤¤Æ¡¢µÕ¤ÎȯÁۤǼ¸³¤·¤Æ¤ß¤Þ¤·¤¿¡£
¤Ä¤Þ¤ê¡¢¤Ä¤Ê¤¬¤Ã¤Æ¤¤¤ë¤«¤É¤¦¤«¤Ç¤Ï¤Ê¤¯
¸¡º÷¤¹¤ë¥Ô¡¼¥¹¡Ê¿§¡Ë¤¬³°¤Ë½Ð¤é¤ì¤ë¤«¤É¤¦¤«¤ò
½Ä²£¼Ð¤á¤Î£¸Êý¸þ¤ËÂФ·¤Æ¥Á¥§¥Ã¥¯¤¹¤ë¤È¤¤¤¦¤â¤Î¤Ç¤¹¡£
¤è¤½¤ÎºÂɸ¤Øƨ¤²¤é¤ì¤ë¾ì¹ç¤Ï¡¢¤½¤ÎºÂɸ¤ÇºÆÅÙ³Îǧ¤·¡¢
·ë¶É¤É¤³¤Ë¤âƨ¤²¤é¤ì¤Ê¤¤¾ì¹ç¡¢Àþ¤¬·ë¤Ð¤ì¤Æ¤¤¤ë¤ÈȽÃǤò¤¹¤ë¡£
¤È¤¤¤¦¤Î¤¬³µÎ¬¤Ç¤¹¡£

¤Á¤Ê¤ß¤ËÀþ¤¬·ë¤Ð¤ì¤Æ¤¤¤Ê¤¤¾ì¹ç¤Î½èÍý¤Ï¤·¤Æ¤¢¤ê¤Þ¤»¤ó¡£

¤Þ¤¿¡¢¤³¤ÎȽÄê¤ÎÆÃÀ­¾å¡¢³°¤Ë¤¢¤ë̵Â̤ʥԡ¼¥¹¤ÏȽÄꤷ¤Þ¤»¤ó¤¬
°Ï¤Þ¤ì¤¿Ãæ¤Ë¤¢¤ë¥Ô¡¼¥¹¤ÏȽÄê¤ÎÂоݤȤʤê¤Þ¤¹¡£

ËÜÅö¤Ï¤â¤Ã¤È¸·Ì©¤Ë¤µ¤Þ¤¶¤Þ¤Ê¾ì¹ç¤òÁÛÄꤷ¤Æ¸¡¾Ú¤·¤¿¤¤¤È¤³¤í¤Ç¤¹¤¬¡¢
¤½¤ì¤ò¤·¤Æ¤¤¤¯¤³¤È¤Ï¥¹¥ì¼ç¤ÎÊý¤Ë¤ªÇ¤¤»¤·¤Þ¤¹¡£

¼ç¤Ë¥Ñ¥º¥ë¥²¡¼¥à¤òºî¤Ã¤Æ¤­¤¿¼Ô¤È¤·¤Æ¤Ï¡¢
¤½¤ì¤³¤½Â¾¤ÎÊý¤¬¸À¤ï¤ì¤ëÄ̤êÂé¸ïÌ£¤À¤È»×¤¤¤Þ¤¹¡£
´èÄ¥¤Ã¤Æ¤¯¤À¤µ¤¤¡£

¼Â¸³¥¹¥¯¥ê¥×¥È¤Î°·¤¤Êý
²¿¤«¥­¡¼¤ò²¡¤·¤Æ¤¯¤À¤µ¤¤¡£
ÊÑ¿ôm¤ÎÃæ¤Ç2¡Ê¡û¡Ë¤¬°Ï¤ó¤Ç¤¤¤ë¤â¤Î¤Ë¡Ö¥ì¡×¤¬¤Ä¤­¤Þ¤¹¡£
°Ï¤á¤Æ¤¤¤Ê¤¤¾ì¹ç¤Ï¡¢¥¨¥é¡¼¤¬µ¯¤­¤Þ¤¹¡Ê¼«¸ÊÀÕǤ¤Ç¤ª´ê¤¤¤·¤Þ¤¹¡Ë


screen 0,32*7,32*10 p="¢£","¡¡","¡û","¢¤","¢¢" dim m,7,10 m(0,0)=0,0,0,0,0,0,0 m(0,1)=0,1,1,1,1,1,0 m(0,2)=0,1,1,1,1,1,0 m(0,3)=0,1,1,1,2,1,0 m(0,4)=0,1,1,2,2,1,0 m(0,5)=0,2,2,2,1,1,0 m(0,6)=0,2,4,2,2,1,0 m(0,7)=0,2,4,4,2,1,0 m(0,8)=0,2,2,2,2,1,0 m(0,9)=0,0,0,0,0,0,0 cx=-1,-1,0,1,1,1,0,-1 : cy=0,-1,-1,-1,0,1,1,1 dim c,7,10 font msgothic,32 *main stick key : if key!0{gosub *check} redraw 0 : color : boxf repeat 7 : x=cnt repeat 10 : y=cnt pos x*32,y*32 : color 255,255,255 : mes p(m(x,y)) if c(x,y)=-1{ pos x*32,y*32 : color 0,255,0 : mes "¥ì" } loop loop redraw 1 : await 16 goto *main *check c_col=2 repeat 5,1 : x=cnt repeat 8,1 : y=cnt if m(x,y)!1&m(x,y)!c_col{ px=x : py=y : lc=0 : dim lx,70 : dim ly,70 repeat repeat 8 if m(px+cx(cnt),py+cy(cnt))=c_col{ c(px+cx(cnt),py+cy(cnt))=-1 }else{ if c(px+cx(cnt),py+cy(cnt))=0{ c(px+cx(cnt),py+cy(cnt))=1 lx(lc)=px+cx(cnt) : ly(lc)=py+cy(cnt) : lc+ } } loop if lc!0{ lc- : px=lx(lc) : py=ly(lc) }else{ break } loop } loop loop return



ONION software Copyright 1997-2023(c) All rights reserved.