°ÔÀÓ :: Wumpus.

Ç÷¹ÀÌ´Â WUMPUS¸¦ »ç³ÉÇÕ´Ï´Ù
Áö±Ý ´Ù¿î·Îµå

°ÔÀÓ :: Wumpus. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • MIT/X Consortium Lic...
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Abigail
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~abigail/

°ÔÀÓ :: Wumpus. ű×


°ÔÀÓ :: Wumpus. ¼³¸í

Wumpus »ç³ÉÀ»ÇϽʽÿÀ °ÔÀÓ :: Wumpus´Â Wumpus »ç³É °ÔÀÓÀ»ÇÏ´Â µ¥ »ç¿ëÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. »óŸ¦ À¯ÁöÇÏ°í Á¶Ä¡¸¦ ÃëÇÏ°í °ÔÀÓÀÌ À̱æ Áö ¿©ºÎ¸¦ Ãß·ÐÇÕ´Ï´Ù. ´ÙÀ½ ¹æ¹ýÀ» »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ÃʱâÈ­µÇÁö ¾ÊÀº object.initÀ» ¹ÝȯÇÏ´Â »õ Ŭ·¡½º ¸Þ¼Òµå´Â °´Ã¼¸¦ ÃʱâÈ­ÇÕ´Ï´Ù. °ÔÀÓÀ» ¸¸µì´Ï´Ù .: Wumpus :: Cave °´Ã¼´Â Ç÷¹ÀÌ¾î ¶³¸²À» È­»ìÇ¥·Î ä¿ì°í Ç÷¹À̾ ½ÃÀÛ À§Ä¡¿¡ ³õ½À´Ï´Ù. ÃʱâÈ­ µÈ Object.Cave Accesor´Â ÇöÀç Game.Item Á¢±Ù ÀÚ¿¡¼­ »ç¿ë µÈ µ¿±¼À» ¹ÝȯÇÕ´Ï´Ù. arrows.lose_arrow accessorÀÇ ¼ö¸¦ ¹ÝȯÇÏ¿© One.lose_loneÀÇ opote / ÀÒ¾î¹ö¸° »óŸ¦ ¹ÝȯÇÏ´Â È­»ìÇ¥ ¼ö¸¦ ÁÙÀ̱â À§ÇØ È­»ìÇ¥ ¼ö¸¦ ÁÙÀÔ´Ï´Ù. Á¤ÀǵÇÁö ¾ÊÀº °ªÀÌ ¹ÝȯµÇ¸é °ÔÀÓÀÌ ¾ÆÁ÷ ¿Ï·áµÇÁö ¾Ê¾Ò½À´Ï´Ù. °ÅÁþÀÌÁö¸¸ Á¤ÀÇ µÈ °ªÀº Ç÷¹À̾ °ÔÀÓÀ» ÀÒ¾î ¹ö·È½À´Ï´Ù (wumpus¿¡ ÀÇÇØ ¸ÔÀº ±¸µ¢ÀÌ¿¡¼­ ¶³¾îÁø, È­»ìÇ¥·Î ÃÔ¿µ, È­»ì¿¡¼­ ÃÔ¿µ, È­»ìÀÌ ¶³¾îÁ³½À´Ï´Ù). ÁøÁ¤ÇÑ °¡Ä¡´Â °ÔÀÓÀÌÀ̱⠿üÀ½À» ÀǹÌÇÕ´Ï´Ù (wumpus ½´ÆÃÀ̳µ½À´Ï´Ù) .win Á¢±Ù ÀÚ Player.lose Á¢±Ù ÀÚ ¼³Á¤ Player.Describe°¡ ¼Õ½Ç µÈ °ÔÀÓÀ» ¼³Á¤ÇÏ´Â °ÔÀÓÀº Ç÷¹À̾ µ¿±¼¿¡ÀÖ´Â À§Ä¡¸¦ ¼³¸íÇÏ´Â ¹®ÀÚ¿­À» ¹ÝȯÇÕ´Ï´Ù. ÇöÀç À§Ä¡¿¡¼­ ±ÙóÀÇ À§Çè¿¡ °üÇÑ ¸ðµç ÈùÆ®¿Í ¿ÞÂÊÀÇ È­»ìÇ¥ ¼ö´Â »õ·Î¿î À§Ä¡¸¦ Àμö·Î ÃëÇÕ´Ï´Ù. Àμö°¡ Àß Çü½ÄÈ­µÇ¾îÀÖ´Â °ÍÀ¸·Î °¡Á¤ÇÕ´Ï´Ù. Áï, Á¤È®È÷ Çϳª, Á¤ÀÇ µÈ Àμö°¡ ÆĽ̵˴ϴÙ. »óÅÂ¿Í ¹®ÀÚ¿­ ¸ñ·ÏÀ» ¹ÝȯÇÕ´Ï´Ù. Ç÷¹À̾ ÁöÁ¤µÈ À§Ä¡ 0À¸·Î À̵¿ÇÒ ¼ö¾ø´Â °æ¿ì »óÅ·Π¸®ÅÏµÇ°í ¹®ÀÚ¿­·Î ¹ÝȯµË´Ï´Ù. ±×·¸Áö ¾ÊÀ¸¸é 1ÀÌ ¹ÝȯµÇ°í, À§ÇèÀÌÀÖ´Â ¸¸³²À» ¼³¸íÇÏ´Â ¹®ÀÚ¿­ ¸ñ·ÏÀÌ ¹ÝȯµË´Ï´Ù. wumpus ¶Ç´Â ±¸µ¢ÀÌ°¡ ¹ß»ýÇÏ¸é °ÔÀÓÀº ¼Õ½Ç·Î ¼±¾ðµË´Ï´Ù. ¼îÆ®´Â ¼¦ È­»ìÇ¥°¡ µû¶ó¾ßÇÏ´Â °æ·Î ÀÎ list (1 ~ 5)¸¦ Àμö·Î °¡Á®¿É´Ï´Ù. Àμö°¡ Àß Çü½ÄÈ­ µÈ 1 ~ 5 °³ÀÇ °ªÀ» Á¤ÀÇÇÕ´Ï´Ù. »óÅÂ¿Í ¹®ÀÚ¿­ ¸ñ·ÏÀ» ¹ÝȯÇÕ´Ï´Ù. ÃÔ¿µÀ» ¼öÇà ÇÒ ¼ö¾ø´Â °æ¿ì (È­»ìÇ¥°¡ ¾øÀ½, °æ·Î°¡ µ¿ÀÏÇÑ ÅͳÎÀ» ¿¬¼ÓÀûÀ¸·Î µÎ ¹ø, ù ¹ø° À§Ä¡°¡ ÇöÀç À§Ä¡¿¡ ¿¬°áµÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù), 0 ¹× ¼¦À» ¼öÇà ÇÒ ¼ö¾ø´Â ÀÌÀ¯´Â »óÅ ¹× ¹®ÀÚ¿­ ¸ñ·ÏÀ¸·Î ¹ÝȯµË´Ï´Ù. ±×·¸Áö ¾ÊÀ¸¸é 1ÀÌ ¹ÝȯµÇ°í Èï¹Ì·Î¿î À̺¥Æ®¸¦ ¼³¸íÇÏ´Â ¹®ÀÚ¿­ ¸ñ·ÏÀÌ ¹ÝȯµË´Ï´Ù. wumpus°¡ ÃÔ¿µµÇ¸é °ÔÀÓÀÌ ÀÌ°å½À´Ï´Ù. Ç÷¹À̾ ÃÔ¿µÇÏ¸é °ÔÀÓÀÌ ¼Õ½ÇµË´Ï´Ù. È­»ìÇ¥¸¦ ÃÔ¿µÇϸé wumpus°¡ ¿òÁ÷À̰ųª ´ç½ÅÀ» ¸Ô°í ¸Ô´Â´Ù) .synopsis my $ game = games :: wumpus -> new -> init; while (! "$ °ÔÀÓ -> ¿Ï·á) {($ status, @Messages) = $ game -> move ($ solarplace); @Messages¿¡ ´ëÇØ ¸»ÇϽʽÿÀ. ($ status, @Messages) = $ game -> shoot (@somewhere); @Messages¿¡ ´ëÇØ ¸»ÇϽʽÿÀ. } if ($ °ÔÀÓ -> ¿Ï¼º) { "won!"} else {say lost!} ¿ä±¸ »çÇ× : ¡¤ Perl.


°ÔÀÓ :: Wumpus. °ü·Ã ¼ÒÇÁÆ®¿þ¾î