| °ÔÀÓ :: »î °ÔÀÓ :: Life - ConwayÀÇ »îÀÇ °ÔÀÓÀ»ÇÕ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
°ÔÀÓ :: »î ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Michael K. Neylon
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~dmuey/Hash-Merge-0.10/Merge.pm
°ÔÀÓ :: »î ű×
°ÔÀÓ :: »î ¼³¸í
°ÔÀÓ :: Life - ConwayÀÇ »îÀÇ °ÔÀÓÀ»ÇÕ´Ï´Ù. Game :: Life - ConwayÀÇ Life °ÔÀÓÀ»ÇÏ´Â °ÔÀÓÀ»ÇÕ´Ï´Ù .Synopsis »ç¿ë °ÔÀÓ :: Life; My $ Game = »õ·Î¿î °ÔÀÓ :: Life (20); MY $ ½ÃÀÛ = , , ]; $ game-> place_points (10, 10, $ ½ÃÀÛ); (1..20) {My $ Grid = $ game-> get_grid (); foreach (@ $ grid) {print map {$ _? 'x': '.' } @ $ _; "n"À» ÀμâÇϽʽÿÀ; } "nn"À» ÀμâÇϽʽÿÀ; $ °ÔÀÓ -> ÇÁ·Î¼¼½º (); } ConwayÀÇ »îÀÇ °ÔÀÓÀº ´Ù¼Ò ±âº» ±ÔÄ¢ ÁýÇÕ¿¡¼ '»ì¾ÆÀÖ´Â'ÆÐÅÏÀ» ã´Â ±âº»ÀûÀÎ ¿¹ÀÔ´Ï´Ù (Âü°í »çÇ× ÂüÁ¶). »ý¸íÀÇ °ÔÀÓÀº 2 Â÷¿ø »ç°¢Çü ±×¸®µå¿¡¼ ÀϾ´Ï´Ù. °¢ °ÝÀÚ°¡ »ì¾Æ Àְųª Á×Àº ÁöÁ¡ÀÌ ÀÖ½À´Ï´Ù. »ì¾ÆÀÖ´Â ±×¸®µå Æ÷ÀÎÆ®°¡ ÁÖº¯ 8 Á¡ ³»¿¡ 2 ~ 3 °³ÀÇ ÀÌ¿ôÀÌÀÖ´Â °æ¿ì, ´ÙÀ½ ¼¼´ë¿¡¼ ÁöÁ¡Àº »ì¾ÆÀÖÀ» °ÍÀÔ´Ï´Ù. ´õ ÀûÀº ¶Ç´Â ±× ÀÌ»óÀÇ °ÍÀÌ ±×°ÍÀ» Á×ÀÏ °ÍÀÔ´Ï´Ù. Á¤È®È÷ 3 °³ÀÇ »ì¾ÆÀÖ´Â ÀÌ¿ôÀÌÀÖ´Â °æ¿ì Á×Àº °ÝÀÚ ÁöÁ¡ÀÌ »ì¾ÆÀÖÀ» °ÍÀÔ´Ï´Ù. ÀÌ·¯ÇÑ °£´ÜÇÑ ±ÔÄ¢À» ÅëÇØ ±×¸®µå¸¦ °¡·Î Áú·¯ ¿òÁ÷ÀÌ´Â ±Û¶óÀÌ´õ, Xor °ÔÀÌÆ® µîÀ» »ý¼ºÇÏ´Â ±Û¶óÀÌ´õ ÃÑ°ú °°Àº ¸ÅȤÀûÀÎ ±¸Á¶°¡ ¹ß°ßµÇ¾ú½À´Ï´Ù.ÀÌ ¸ðµâÀº ´Ü¼øÈ÷ Perl.inÀÇ »îÀÇ °ÔÀÓÀ» ½Ã¹Ä·¹À̼ÇÇÏ´Â ¹æ¹ýÀ» Á¦°øÇÕ´Ï´Ù. ÁÂÇ¥°è Place_Points, Toggle_Point ¹× ±âŸ ±â´É¿¡¼ »ç¿ëµÇ´Â ù ¹ø° coodinate´Â ¼¼·Î ¹æÇâ, º¸µåÀÇ »ó´ÜÀ¸·Î 0ÀÌ°í, µÎ ¹ø°´Â °¡·Î ¹æÇâ, 0Àº º¸µåÀÇ ¿ÞÂÊÀÔ´Ï´Ù. µû¶ó¼ (3,2)ÀÇ Æ÷ÀÎÆ®¸¦ Åä±ÛÇÏ´Â °ÍÀº 4 Çà°ú 3 Ä÷³ÀÇ ÁöÁ¡ÀÇ »óŸ¦ ÀüȯÇÕ´Ï´Ù. º¸µåÀÇ °¡ÀåÀÚ¸®°¡ ÇöÀç "Ç÷§"À¸·Î ¼³Á¤µË´Ï´Ù. °¡ÀåÀÚ¸®¿¡ÀÖ´Â ¼¼Æ÷¿¡´Â ÀÌ¿ôÀÌ ¾øÀ¸¹Ç·Î ÀÌ»çȸ¿¡¼ '°¡À»'µË´Ï´Ù. ¹Ì·¡ÀÇ ¹öÀüÀº '¿öÇÁ'°¡ÀåÀÚ¸®¸¦ Çã¿ë ÇÒ ¼ö ÀÖ½À´Ï´Ù (¼¿ÀÌ ¿ÞÂÊ¿¡¼ ¿À¸¥ÂÊ¿¡ ´Ù½Ã ³ªÅ¸³ª¸é). ¿ä±¸ »çÇ× : ¡¤ Perl.
°ÔÀÓ :: »î °ü·Ã ¼ÒÇÁÆ®¿þ¾î