ºñÆ® :: Shiftreg.ȸÀü / ½ÃÇÁÆ® ÀÛ¾÷ÀÌÀÖ´Â ºñÆ® ½ÃÇÁÆ® ·¹Áö½ºÅÍ | |
Áö±Ý ´Ù¿î·Îµå |
ºñÆ® :: Shiftreg. ¼øÀ§ ¹× ¿ä¾à
±¤°í
- ƯÇã:
- Perl Artistic License
- °¡°Ý:
- FREE
- °Ô½ÃÀÚ À̸§:
- Steffen Beyer
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~stbey/
ºñÆ® :: Shiftreg. ű×
ºñÆ® :: Shiftreg. ¼³¸í
ȸÀü / ½ÃÇÁÆ® Á¶ÀÛÀÌÀÖ´Â ºñÆ® ½ÃÇÁÆ® ·¹Áö½ºÅÍ ºñÆ® :: Shiftreg´Â ¸ðµç C Á¤¼ö À¯Çü¿¡ ´ëÇÑ Ä³¸® Ç÷¡±×·Î ¿ÞÂÊ È¸Àü, ÁÂȸÀü, ÁÂȸÀü, ½ÃÇÁÆ® ¿À¸¥ÂÊ µ¿ÀÛÀ» ±¸ÇöÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Synopsis * ºñÆ® :: Shiftreg QW (bits_of_byte bits_of_long lsb_byte msb_byte lsb_short msb_int msb_int lsb_short msb_int) lsb_long msb_long rol_byte ror_byte shl_byte shr_byte rol_short ror_short shl_short shr_short rol_int ror_int shl_int shr_int rol_long ror_long shl_long shr_long); »ç¿ë °¡´ÉÇÑ ÀÛ¾÷ ¹× ÇÔ¼öÀÇ ¸ðµç (¶Ç´Â ÀϺθ¦ ³ª°¡´Â °Í¸¸ »©°í) °¡Á® ¿À±â * ºñÆ® :: shiftreg qw (¸ðµÎ)¸¦ »ç¿ëÇϽʽÿÀ. »ç¿ë °¡´ÉÇÑ ¸ðµç ÀÛ¾÷ ¹× ÇÔ¼ö¸¦ °¡Á®¿É´Ï´Ù * $ version = bit :: shiftreg :: Version (); ¸ðµâÀÇ ¹öÀü ¹øÈ£ * $ bits = bits_of_byte ()¸¦ ¹ÝȯÇÕ´Ï´Ù. ±â±âÀÇ ¹ÙÀÌÆ® (¼¸íµÇÁö ¾ÊÀº char)ÀÇ ºñÆ® ¼ö¸¦ ¹ÝȯÇÕ´Ï´Ù. * $ bits = bits_of_short (); ÄÄÇ»ÅÍ¿¡¼ ¼¸íµÇÁö ¾ÊÀº ªÀº ªÀº ºÎºÐ¿¡ÀÖ´Â ºñÆ® ¼ö¸¦ ¹ÝȯÇÕ´Ï´Ù * $ bits = bits_of_int (); ÄÄÇ»ÅÍ¿¡¼ ºÎÈ£¾ø´Â intÀÇ ºñÆ® ¼ö¸¦ ¹ÝȯÇÕ´Ï´Ù * $ bits = bits_of_long (); * $ lsb = lsb_byte ($ value)¸¦ »ç¿ëÇÏ¿© ¼¸íµÇÁö ¾ÊÀº ¿À·¡ µ¿¾È ºñÆ® ¼ö¸¦ ¹ÝȯÇÕ´Ï´Ù. ¹ÙÀÌÆ® (ºÎÈ£¾ø´Â char) * $ msb = msb_byte ($ value)ÀÇ ÃÖÇÏÀ§ ºñÆ® (LSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. °¡Àå Áß¿äÇÑ ºñÆ® (MSB)ÀÇ ¹ÙÀÌÆ® (ºÎÈ£¾ø´Â char) * $ lsb = lsb_short ($ value)¸¦ ¹ÝȯÇÕ´Ï´Ù. ¼¸íµÇÁö ¾ÊÀº ªÀº * $ MSB = MSB_SHORT ($ °ª)ÀÇ ÃÖÇÏÀ§ ºñÆ® (LSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. ¼¸íµÇÁö ¾ÊÀº ªÀº * $ lsb = lsb_int ($ value)ÀÇ °¡Àå Áß¿äÇÑ ºñÆ® (MSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. ºÎÈ£¾ø´Â int * $ msb = msb_int ($ °ª)ÀÇ ÃÖÇÏÀ§ ºñÆ® (LSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. ºÎÈ£¾ø´Â int * $ lsb = lsb_long ($ °ª)ÀÇ °¡Àå Áß¿äÇÑ ºñÆ® (MSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. ºÎÈ£¾ø´Â ±ä * $ MSB = MSB_LONG ($ value)ÀÇ ÃÖÇÏÀ§ ºñÆ® (LSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. ºÎÈ£¾ø´Â ±ä * $ carry = rol_byte ($ value)ÀÇ °¡Àå Áß¿äÇÑ ºñÆ® (MSB)¸¦ ¹ÝȯÇÕ´Ï´Ù. * $ carry = ror_byte ($ value); * $ carry_out = shl_byte ($ °ª, $ carry_in); * $ carry_out = shr_byte ($ °ª, $ carry_in); * $ carry = rol_short ($ value); * $ carry = ror_short ($ value); * $ carry_out = shl_short ($ °ª, $ carry_in); * $ carry_out = shr_short ($ °ª, $ carry_in); * $ carry = rol_int ($ °ª); * $ carry = ror_int ($ value); * $ carry_out = shl_int ($ °ª, $ carry_in); * $ carry_out = shr_int ($ °ª, $ carry_in); * $ carry = rol_long ($ value); * $ carry = ROR_LONG ($ °¡Ä¡); * $ carry_out = shl_long ($ °¡Ä¡, $ carry_in); * $ carry_out = shr_long ($ °¡Ä¡, $ carry_in); ¿ä±¸ »çÇ× : ¡¤ Perl.
ºñÆ® :: Shiftreg. °ü·Ã ¼ÒÇÁÆ®¿þ¾î