| °ÔÀÓ :: Object. °ÔÀÓ :: Object´Â °ÔÀÓ °´Ã¼¿¡ ´ëÇÑ ±âº» Ŭ·¡½º¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
°ÔÀÓ :: Object. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Peter J. Stewart
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~pstewart/Games-Object-0.11/Object.pod
°ÔÀÓ :: Object. ű×
°ÔÀÓ :: Object. ¼³¸í
Games :: Object´Â °ÔÀÓ °´Ã¼¿¡ ´ëÇÑ ±âº» Ŭ·¡½º¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Games :: Object´Â Perl ¸ðµâÀÔ´Ï´Ù. °ÔÀÓ °´Ã¼ ¿ë ±âº» Ŭ·¡½º¸¦ Á¦°øÇÕ´Ï´Ù. Synopsis Package MyGameObject; °ÔÀÓ :: °´Ã¼ »ç¿ë; VARS QW (@ISA)¸¦ »ç¿ëÇϽʽÿÀ. @isa = qw (°ÔÀÓ :: °´Ã¼); Sub New {# ³» $ proto = shift; ³» $ class = ref ($ proto) || $ proto; ³» $ self = $ class-> super :: new (@ _); $ self, $ class¸¦ ÃູÇϽʽÿÀ; # ¼Ó¼º Ãß°¡ $ self-> new_attr (-name => "hot_points", -type => 'int', -value => 20, -tend_to_rate => 1); $ self-> new_attr (-name => "strents", -type => 'int', -value => 12, -minimum => 3, -maximum => 18); ... $ self¸¦ ¹ÝȯÇϽʽÿÀ; } MyObjectManager ÆÐÅ°Áö; °ÔÀÓ :: Object :: Manager; VARS QW (@ISA)¸¦ »ç¿ëÇϽʽÿÀ. @isa = qw (°ÔÀÓ :: °³Ã¼ :: °ü¸®ÀÚ); Sub New {My $ Proto = Shift; ³» $ class = ref ($ proto) || $ proto; ³» $ self = $ class-> super :: new (, @_); $ self, $ class¸¦ ÃູÇϽʽÿÀ; ... $ self¸¦ ¹ÝȯÇϽʽÿÀ; } My $ World = New MyObjectManager; MY $ OBJECT = NEW MyGameObject; $ World-> Add ($ °´Ã¼);ÀÌ ¸ðµâÀÇ Ãß»óÀû ÀÎ ¸ñÀûÀº ÇÁ·Î±×·¡¸Ó°¡ ÀÚ½ÅÀÇ ¸ðµâ¿¡ ¼ºê Ŭ·¡ ½Ì µÈ ¸ðµâ ÇüÅ·Π±âº» ÇÁ·¹ÀÓ ¿öÅ©¸¦ Á¦°øÇÔÀ¸·Î½á ÇÁ·Î±×·¡¸Ó°¡ ½±°Ô PerlÀ» ÀÛ¼ºÇÒ ¼öÀÖ°ÔÇÏ´Â °ÍÀÔ´Ï´Ù. Á÷Á¢ ÀÚü °´Ã¼ Ŭ·¡½º·Î »ç¿ëµË´Ï´Ù. ÀÌ ÇÁ·¹ÀÓ ¿öÅ©ÀÇ °¡Àå Áß¿äÇÑ Ç׸ñÀº ´ÙÀ½°ú °°½À´Ï´Ù. attributesyou´Â objectÀÇ process () ¸Þ¼Òµå°¡ È£Ãâ µÉ ¶§¸¶´Ù Ư¼ºÀÇ ÀÚµ¿ ¾÷µ¥ÀÌÆ®¸¦ ¼³Á¤ÇÒ»Ó¸¸ ¾Æ´Ï¶ó °´Ã¼ÀÇ ÀÓÀÇÀÇ ¼Ó¼ºÀ» °´Ã¼¿¡ Á¤ÀÇ ÇÒ ¼ö ÀÖ½À´Ï´Ù. ¿¹¸¦ µé¾î, ´ÙÀ½°ú °°ÀÌ °´Ã¼ÀÇ ¼Ó¼ºÀ» ¼³Á¤ÇÒ ¼ö ÀÖ½À´Ï´Ù. 0¿¡¼ 100±îÁöÀÇ ¹üÀ§°¡ ÀÖÁö¸¸ °ªÀ» Ç¥½ÃÇÏÁö¸¸ ¼Ó¼º¿¡ ¾×¼¼½ºÇÏ´Â °ÍÀº Ç×»ó integer¿¡ ¾×¼¼½º ÇÒ °ÍÀÔ´Ï´Ù. 1 object¿¡¼ ÇÁ·Î¼¼½º ()°¡ È£ÃâµË´Ï´Ù. ÇÏÀ§ Ŭ·¡½ºÀÇ ¸Þ¼Òµå´Â °ªÀÌ 0À¸·Î ¶³¾îÁö¸é ÀÚµ¿À¸·Î È£ÃâµË´Ï´Ù. Attributes.FlagSyou´Â ÀÓÀÇ·Î ¸í¸í µÈ ¼ö¸¦ Á¤ÀÇ ÇÒ ¼ö ÀÖ½À´Ï´Ù. °³Ã¼¿¡ Ç÷¡±×ÀÔ´Ï´Ù. Ç÷¡±×´Â Boolean ¼Ó¼º°ú °°Áö¸¸ true ¶Ç´Â false °ªÀ» °¡Áú ¼ö ÀÖ½À´Ï´Ù. ¼Ó¼º°ú ¸¶Âù°¡Áö·Î Ç÷¡±×´Â ¼·Î ´Ù¸¥ °´Ã¼¿¡ µ¶¸³ÀûÀ¸·Î »ý¼º µÉ ¼ö ÀÖ½À´Ï´Ù. "±Û·Î¹ú"Ç÷¡±× ¸ñ·ÏÀÌ ºÎ°úµÇÁö ¾Ê½À´Ï´Ù. ¿ÀºêÁ§Æ®¿¡¼ ÆÄÀÏÀ» ÀúÀåÇÏ°í µ¥ÀÌÅ͸¦ °´Ã¼¿¡ ´Ù½Ã·ÎµåÇÏ·Á¸é ±â´ÉÀ» ÀúÀå / ÀúÀå ±â´ÉÀÌ Á¦°øµË´Ï´Ù. ÀÌ°ÍÀº·Îµå °ÔÀÓÀÇ ´ë·®À» ó¸®ÇÏ¸ç °ÔÀÓ Ã³¸®¸¦ ÇØÁ¦ÇÏ¿© °ÔÀÓ ÀÚüÀÇ ¿ªÇп¡ ´ëÇØ °ÆÁ¤ÇÒ ¼ö ÀÖ½À´Ï´Ù.·Îµå ±â´ÉÀ» »ç¿ëÇÏ¿© °´Ã¼ ÅÛÇø´¿¡¼ °´Ã¼¸¦ ¸¸µå´Â µ¥ »ç¿ëÇÒ ¼öµµ ÀÖ½À´Ï´Ù. °´Ã¼ ÅÛÇø´ÀºÀÌ ¸ðµâÀÇ ¹öÀü 0.10¿¡ ´ÜÀÏ Object.Object ManagerNew°¡ Æ÷ÇÔ µÈ ÀúÀå ÆÄÀÏÀÌ¸ç °³Ã¼ °ü¸®ÀÚÀÔ´Ï´Ù. Object Manager´Â °ü·Ã °ÔÀÓ °³Ã¼ ±×·ìÀ» °ü¸® ÇÒ ¼öÀÖ´Â Perl ¿ÀºêÁ§Æ®ÀÔ´Ï´Ù. Object Manager¸¦ »ç¿ëÇÏ¸é ¿ÀºêÁ§Æ®¸¦ ÇÔ²² °´Ã¼¸¦ ¿¬°áÇÒ ¼ö ÀÖ½À´Ï´Ù (¿¹ : ƯÁ¤ °´Ã¼°¡ ´Ù¸¥ °´Ã¼¿¡ ´ëÇÑ ÄÁÅ×ÀÌ³Ê ¿ªÇÒÀ» ÇÒ ¼öÀÖ´Â °ü°è¸¦ Á¤ÀÇ ÇÒ ¼ö ÀÖÀ½). °á°úÀûÀ¸·Î Object Manager´Â ¼¼°è ¶Ç´Â À¯´Ï¹ö½º ¿ªÇÒÀ»ÇÕ´Ï´Ù. Game Object Ŭ·¡½ºÃ³·³ Manager Ŭ·¡½º´Â ¼ºê Ŭ·¡ ½Ì µÉ ¼ö ÀÖÀ¸¹Ç·Î ±â´ÉÀ» °ÈÇÒ ¼ö ÀÖ½À´Ï´Ù. Object Manager¸¦·ÎµåÇÏ°í ÀúÀåÇÒ ¼ö ÀÖÀ¸¸ç, ÀÌ´Â Â÷·Ê·Î °ü¸®µÇ´Â ¿ÀºêÁ§Æ®·Îµå ¶Ç´Â ÀúÀåÀ» ¼öÇàÇÕ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
°ÔÀÓ :: Object. °ü·Ã ¼ÒÇÁÆ®¿þ¾î