°ÔÀÓ :: Go :: Simpleboard.°£´ÜÇÑ GO º¸µå¸¦ ³ªÅ¸³À´Ï´Ù. | |
Áö±Ý ´Ù¿î·Îµå |
°ÔÀÓ :: Go :: Simpleboard. ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- Marc Lehmann
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://www.goof.com/pcg/marc/
°ÔÀÓ :: Go :: Simpleboard. ű×
°ÔÀÓ :: Go :: Simpleboard. ¼³¸í
°£´ÜÇÑ À̵¿ º¸µå¸¦ ´ëÇ¥ÇÕ´Ï´Ù Game :: Go :: SimpleBoard´Â °£´ÜÇÑ Go º¸µå¸¦ ³ªÅ¸³»´Â Perl ¸ðµâÀÔ´Ï´Ù. »ç¿ë½Ã °ÔÀÓ :: Go :: Simpleboard; °¢ º¸µå À§Ä¡ (±¸¸Å½Ã)¿¡ ´ëÇÑ »óȲ ¸¶Å· À¯Çü : MARK_B # ÀÏ¹Ý °ËÀº »ö µ¹ MARK_W # Á¤»óÀûÀÎ ¿À¼øÀý µ¹ mark_grayed # mark_ ¿Í ÇÔ²² mark_small_ ¿Í ÇÔ²² mark_small_gray # ÀÛÀº µ¹À» µæÁ¡ ¶Ç´Â ¸¶Å·¿¡ »ç¿ëÇÏ´Â ÀÛÀº µ¹, mark_small_ ¿Í ÇÔ²² mark_small_gray # triangle mark_triangle # »ï°¢Çü Ç¥½Ã mark_square # square mark mark_circle # clot mark mark_cross # cross mark mark_label # ÅؽºÆ® ·¹À̺í mark_label # ÀÌ°ÍÀº Hoshi Æ÷ÀÎÆ® (¸¹Àº °ÍÀ» »ç¿ëÇÏÁö ¾ÊÀ½) mark_move # ÀÌ°ÍÀº Á¤±Ô À̵¿ mark_ko # ÀÌ°ÍÀº ko À§Ä¡ mark_redraw # ¹«½ÃÇÒ ¼ö ÀÖ½À´Ï´Ù. ´ç½ÅÀÇ ¸ñÀûÀ» À§ÇØ colour_white # 0 colour_black # colour_black # ÇÚµðĸ À̵¿À»À§ÇÑ "x coordinate"·Î »ç¿ëµÇ´Â colour_black # move_pass # Æнº¿¡ ´ëÇÑ "x-coordinate"·Î »ç¿ëµÉ ¼ö ÀÖ½À´Ï´Ù. ÁÖ¾îÁø Å©±âÀÇ »õ·Î¿î ºó º¸µå¸¦ ¸¸µì´Ï´Ù. $ Board -> {size} º¸µå Å©±â¸¦ ÀúÀåÇÕ´Ï´Ù. $ Board -> {MAX} ÃÖ´ë º¸µå ÁÂÇ¥ (Å©±â -1)¸¦ ÀúÀåÇÕ´Ï´Ù. $ Board -> {Captures} ÁÖ¾îÁø »ö»ó¿¡ ´ëÇØ Ä¸Ã³ µÈ µ¹ÀÇ ¼ö¸¦ ÀúÀåÇÕ´Ï´Ù. $ Board -> {Board} º¸µå ³»¿ëÀÌÀÖ´Â 2 Â÷¿ø ¹è¿À» ÀúÀåÇÕ´Ï´Ù. $ hint = $ board-> update () °¢ ¾÷µ¥ÀÌÆ® ±¸Á¶Ã¼ ÀÚü´Â ¶ÇÇÑ Array-Ref : # ¾÷µ¥ÀÌÆ® ¶Ç´Â À̵¿ # °ËÁ¤»ö À̵¿, ¼³Á¤ ÇÚµðĸ # Pass [] # ¶ÇÇÑ (´õ ÀÌ»ó »ç¿ëµÇÁö ¾ÊÀ½) º¸µå¸¦ º¯°æÇÕ´Ï´Ù. ¸ÕÀú $ CLR¿¡ ÁöÁ¤µÈ ºñÆ®¸¦ ¸ÕÀú Áö¿ì°í $ SET¿¡ ÁöÁ¤µÈ ºñÆ®¸¦ ¼³Á¤ÇÔÀ¸·Î½á À̵¿À» ½ÇÇàÇÕ´Ï´Ù. $ SET¿¡ MARK_LABELÀÌ Æ÷ÇԵǾî ÀÖÀ¸¸é ·¹À̺í ÅؽºÆ®¸¦ $ ·¹ÀÌºí¿¡ Á¦°øÇؾßÇÕ´Ï´Ù. $ SET¿¡ MARK_MOVE°¡ Æ÷ÇÔ µÈ °æ¿ì µÑ·¯½Î´Â µ¹Àº º¸µå¿¡¼ Á¦°ÅµÇ°í (°£´ÜÇÑ) KOS´Â ´Ù¸¥ Ç¥½Ã ±âÈ£¸¦ Á¦°ÅÇÑ ÈÄ »ç°¢Çü ±âÈ£¿Í MARK_KO·Î Ç¥½ÃµË´Ï´Ù. ¸¶Å·Àº mark_move¸¦ »ç¿ëÇÏ´Â ´ÙÀ½ ´ÙÀ½ ´ÙÀ½ ¾÷µ¥ÀÌÆ® ±¸Á¶·Î Á¦°Å µÇ¹Ç·ÎÀÌ Ç÷¡±×´Â ¸¶Å·, À½, À̵¿¿¡ ÀûÇÕÇÕ´Ï´Ù. "Move Suices"(¿¹ : ÀÚ»ì)¸¦ ¹«È¿È ÇÒ ¼ö ÀÖÀ¸¸ç ¾÷µ¥ÀÌÆ®°¡ ÇØ´çµÇ¾î ÀÖ½À´Ï´Ù. ºÒ¹ýÀû ÀÎ ¿òÁ÷ÀÓÀ» ÇÇÇϱâ À§ÇØ is_valid_move¸¦ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ÇÚµðĸ "À̵¿", ÇöÀç º¸µå Å©±â 9, 13 ¹× 19´Â Áö¿øµË´Ï´Ù. 2¿¡¼ 9±îÁöÀÇ ÇÚµðĸ °ª¸¸ ¹èÄ¡´Â IGS ±ÔÄ¢À» µû¸£°í ´Ù¸¥ °ÔÀç À§Ä¡¸¦ ¿øÇϸé ÀÚ½ÅÀ» ¼³Á¤ÇؾßÇÕ´Ï´Ù. ÀÌ ÇÔ¼ö´Â ÁöÁ¤µÈ ±¸Á¶ÀÇ $ ÈùÆ® ¸â¹ö¸¦ ¼öÁ¤ÇÏ¿© ¹Ýº¹ µÈ º¸µå »ý¼º ¼Óµµ¸¦ ³ôÀÌ°í µ¿ÀÏÇÑ ¾÷µ¥ÀÌÆ® ±¸Á¶·Î ¾÷µ¥ÀÌÆ®µË´Ï´Ù. ÈùÆ® ¸â¹ö°¡ ÂüÁ¶ ÀÎ °æ¿ì ÂüÁ¶°¡ °¡¸®Å°´Â ½ºÄ®¶ó°¡ ´ë½Å ¾÷µ¥ÀÌÆ®µË´Ï´Ù. ÀÌ ¸ðµç ÈùÆ® ȸ¿øÀÌ È¥¶õ ½º·¯¿ï °æ¿ì ¹«½ÃÇÏ°í ÇØ»ó ÇØÁ¦·Î ÁöÁ¤Çϰųª ÀüÀûÀ¸·Î ¹è¿¿¡¼ ¹þ¾î³ª½Ê½Ã¿À. ±×·¯³ª ÀÌÀüÀÇ ¾÷µ¥ÀÌÆ® ±¸Á¶¿¡¼ Àüü º¸µå À§Ä¡¸¦ Àç»ý¼ºÇÏ´Â °Íó·³ ÀÌÀü ¾÷µ¥ÀÌÆ® ±¸Á¶¿¡¼ Àüü º¸µå À§Ä¡¸¦ Àç»ý¼ºÇÏ´Â °ÍÀÌ ÈξÀ ´õ ºü¸£°Ô Àç»ý¼ºµÇ´Â °Íó·³ ¾÷µ¥ÀÌÆ® ±¸Á¶¸¦ À¯ÁöÇÏ´ÂÁö È®ÀÎÇϽʽÿÀ. ¿¹Á¦ : $ board-> update (, ]); $ board-> is_valid_move ($ »ö»ó , $ x, $ y ) ÁÖ¾îÁø ÁÂÇ¥ÀÇ ÁöÁ¤µÈ »ö»óÀÇ À̵¿ÀÌ À¯È¿ÇÏÁö ¾Ê°Å³ª ¾Æ´Ñ °æ¿ì true¸¦ ¹ÝȯÇÕ´Ï´Ù. KOS´Â MARK_KO·Î Ç¥½ÃµÈ ÇÑ °í·ÁµË´Ï´Ù. $ may_suicide°¡ true (¿¹ : ´ºÁú·£µå ±ÔÄ¢) ¿ä±¸ »çÇ×ÀÌ ¾Æ´Ï¶ó¸é ÀÚ»ìÀÌ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù. ¡¤ Perl.
°ÔÀÓ :: Go :: Simpleboard. °ü·Ã ¼ÒÇÁÆ®¿þ¾î