| ControlX10 :: CM17. ControlX10 :: CM17Àº 'ÆøÁ×'RF ¼Û½Å±âÀÇ Perl È®ÀåÀÚÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
ControlX10 :: CM17. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Bruce Winter
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~bbirth/ControlX10-CM11-2.09/CM11.pm
ControlX10 :: CM17. ű×
ControlX10 :: CM17. ¼³¸í
ControlX10 :: CM17Àº 'Firecracker'RF ¼Û½Å±âÀÇ Perl È®ÀåÀÚÀÔ´Ï´Ù. ControlX10 :: CM17Àº 'Firecracker'RF Transmitter.Synopsis ¿ë Perl È®ÀåÀÚ°¡ ControlLX10 :: CM17À» »ç¿ëÇÕ´Ï´Ù. # $ serial_port´Â Win32 :: SerialPort # ¶Ç´Â Device :: SerialPort¿¡ µû¶ó OS # My $ Serial_Port = setup_serial_port ( 'COM10', 4800); ControlX10 :: CM17 :: send ($ serial_port, 'a1j'); # ControlLX10 :: CM17 :: Send ($ serial_port, 'a1k')¿¡¼ ÀåÄ¡ a1À» µ¹¸³´Ï´Ù. # ÀåÄ¡ A1 OFF ControlX10 :: CM17 :: Send ($ serial_port, 'bo'); # ¸ðµç Á¶¸íÀÌ Áý¾È ÄÚµå BÀÇ ¸ðµç Á¶¸íÀ» ÀüȯÇÕ´Ï´Ù. FIRECRACKER (CM17A)´Â Á÷·Ä Æ÷Æ®¿¡ ¿¬°áÇÏ°í RF¸¦ ÅëÇØ ¸í·ÉÀ» Àü¼ÛÇÏ´Â ¼Û½Å Àü¿ë x10 ÄÁÆ®·Ñ·¯ÀÔ´Ï´Ù. ÆøÁ×Àº RTS ¶Ç´Â DTR ½ÅÈ£¿¡¼ Àü¿ø °ø±Þ ÀåÄ¡¸¦ ÆÄ»ý½Ãŵ´Ï´Ù. Á÷·Ä Æ÷Æ®. ÀÌ·¯ÇÑ ½ÅÈ£ Áß Àû¾îµµ Çϳª´Â Àü¿øÀÌ ÆøÁ׿¡¼ ¼Õ½ÇµÇÁö ¾Êµµ·Ï Ç×»ó ³ô¾Æ¾ßÇÕ´Ï´Ù. ½ÅÈ£´Â ºñÆ® (DTR ¿ë '1'¹× RTS ¿ë '0')À» Àü¼ÛÇϵµ·Ï ÆÞ½ºµË´Ï´Ù. ÀÏ¹Ý RX / TX Àбâ / ¾²±â ¶óÀÎÀº ÀåÄ¡¿¡¼ »ç¿ëµÇÁö ¾Ê°í ´Ù¸¥ Á÷·Ä ÀåÄ¡¸¦ ¿¬°áÇÒ ¼ö ÀÖµµ·Ï Àü´ÞµË´Ï´Ù (Çϵå¿þ¾î ÇÚµå ½¦ÀÌÅ·ÀÌ ÇÊ¿ä¾ø´Â °æ¿ì) .A 40 ºñÆ® ¸í·É ÆÐŶÀº »ó¼ö·Î ±¸¼ºµË´Ï´Ù. 16 ºñÆ® Çì´õ, »ó¼ö 8 ºñÆ® ¹Ù´Ú ±Û ¹× 16 °³ÀÇ µ¥ÀÌÅÍ ºñÆ®. µ¥ÀÌÅÍ´Â 5 ºñÆ® ÁÖ¼Ò $ ÇϿ콺 ÄÚµå (A-P) ¹× 11 ºñÆ® $ ÀÛµ¿À¸·Î ¼¼ºÐȵ˴ϴÙ. $ ÇϿ콺 ÄÚµå (1J, 2J ... FJ, GJ) ¶Ç´Â À¯»çÇÑ "OFF"¸í·É (1K, 2K ... FK, GK)¿¡ ´ëÇÑ "ON"¸í·ÉÀÌ ÀÖ½À´Ï´Ù. Send´Â $ House $ operationÀ» ´ÜÀÏ ¸í·É¾î·Î °áÇÕÇÑ ¸Å°³ º¯¼ö ¹®ÀÚ¿À» µðÄÚµùÇÕ´Ï´Ù. °³º° ´ÜÀ§·Î ÀÛ¿ëÇÏ´Â $ Á¶ÀÛ ¸í·É ¿Ü¿¡µµ Àüü $ ÇϿ콺 ÄÚµå ¶Ç´Â ÀÌÀü ¸í·É¿¡ Àû¿ëµÇ´Â ÀϺΰ¡ ÀÖ½À´Ï´Ù. $ Á¶ÀÛ ±â´É L LARGEN LATH LIGHT ÇÁ·Î±×·¡¹Ö 14 % M DIM LAND LIGHT ÇÁ·Î±×·¡¹Ö 14 % n ¸ðµç Á¶¸í ²¨Áü ²¨Áü ²¨Áü ¸ðµç À¯´Ö ¹öÀü 0.6ÀÇ ²¨Áü ²¨Áü, ÀÏ·ÃÀÇ ¹à°Ô ¶Ç´Â Èñ¹ÌÇÑ ¸í·ÉÀ» Çϳª¾¿ °áÇÕÇÏ¿© ´ÜÀÏ $ ÀÛ¾÷À¸·Î °áÇÕ µÉ ¼ö ÀÖ½À´Ï´Ù. ´ÜÀ§ ÄÚµå ´ÙÀ½¿¡ ¿øÇÏ´Â ¼¸í µÈ º¯È·®. "On"¸í·ÉÀº Çϳª ÀÌ»óÀÇ Brighten / DIMÀ» ¼±ÅÃÇÏ¿© ÀåÄ¡¸¦ ¼±ÅÃÇϵµ·Ï Àü¼ÛµË´Ï´Ù. 14 %ÀÇ ¹è¼ö°¡ ¾Æ´Ï¶ó¸é °ªÀº ´ÙÀ½º¸´Ù Å« Å©±â·Î µÕ±Û°ÔµË´Ï´Ù. ControlX10 :: cm17 :: send ($ serial_port, 'a3-10'); # Ãâ·Â 'a3j', 'am'- Àû¾îµµ ÇϳªÀÇ Dim ControlX10 :: cm17 :: send ($ serial_port, 'a3-42'); # Ãâ·Â 'a3j', 'am', 'am', 'am'- 14 ControlX10 :: cm17 :: send ($ serial_port, af-45 '); # Ãâ·Â 'afj', 'al', 'al', 'al', 'al'- ³ª¸ÓÁö ¿ä±¸ »çÇ×ÀÌÀÖ´Â °æ¿ì : ¡¤ Perl.
ControlX10 :: CM17. °ü·Ã ¼ÒÇÁÆ®¿þ¾î