¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ©

¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ©´Â ¿Àµð¿À ÀÚµ¿ ¿¬°á :: Ladspa :: * °´Ã¼ÀÇ ¹Ý ÀÚµ¿ ¿¬°áÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ© ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Joost Diepenmaat
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~jdiepen/Text-PSP-1.013/lib/Text/PSP/Syntax.pod

¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ© ű×


¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ© ¼³¸í

¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ©´Â ¿Àµð¿À ÀÚµ¿ ¿¬°á :: Ladspa :: * °´Ã¼ÀÇ ¹Ý ÀÚµ¿ ¿¬°áÀÔ´Ï´Ù. ¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ©´Â Audio :: Ladspa :: * Objects.SynopsisÀÇ ¹Ý ÀÚµ¿ ¿¬°á ¿Àµð¿À :: Ladspa :: Network; ¿Àµð¿À :: Ladspa :: Plugin :: Play; ÇÏÀ§ °¡ÀÔÀÚ {My ($ °´Ã¼, $ À̺¥Æ®) = @_; $ object = ref ($ °´Ã¼); $ objectn¿¡¼­ "Receved Event '$ À̺¥Æ®'Àμâ"; } ¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ© -> add_subscriber ( '*', °¡ÀÔÀÚ); MY $ NET = AUDIO :: LADSPA :: NETWORK-> NEW (); MY $ SINE = $ net-> add_plugin (label => sine_fcac '); ³» $ delay = $ net-> add_plugin (label => 'delay_5s'); MY $ PLAY = $ net-> add_plugin ( 'audio :: ladspa :: plugin :: play'); $ net-> connect ($ sine, 'Ãâ·Â', $ delay, 'ÀÔ·Â'); $ net-> connect ($ delay, 'Ãâ·Â', $ play, 'ÀÔ·Â'); $ sine-> set ( 'ÁÖÆļö (Hz)'=> 440); # Freq $ Sine-> Set (Amplitude => 1) ¼³Á¤; # amp $ delay-> set ( 'Áö¿¬ (ÃÊ)'=> 1) ¼³Á¤; # 1 ÃÊ Áö¿¬ $ DELAY-> ¼¼Æ® ( '°Ç½Ä / ½Àµµ'=> 0.2); # ±ÕÇü - 0.2 (0 .. 100) {$ net-> ½ÇÇà (100); } $ sine-> set (ÁøÆø => 0); #just Áö¿¬ (0 .. 500) {$ net-> ½ÇÇà (100); }ÀÌ ¸ðµâÀ» »ç¿ëÇÏ¸é ¿Àµð¿À :: Ladspa :: Plugin °´Ã¼¸¦ ½±°Ô ¸¸µé ¼ö ÀÖ½À´Ï´Ù. ¸ðµç Ç÷¯±×Àο¡ ´ëÇØ »ùÇøµ ÁÖÆļö°¡ ¿Ã¹Ù¸¥ »ùÇøµ ÁÖÆļö¸¦ ¿Ã¹Ù¸£°Ô À¯ÁöÇÏ°í ¿¬°áµÇÁö ¾ÊÀº Ç÷¯±×Àο¡ Á¦¾î ¹× ¿Àµð¿À ¹öÆÛ¸¦ Ãß°¡ÇÏ°í ºÒ¹ý ¿¬°áÀ» ¹æÁöÇÕ´Ï´Ù. ³×Æ®¿öÅ©ÀÇ À̺¥Æ® ¾Ë¸²À»¹Þ´Â µ¥ »ç¿ëÇÒ ¼öÀִ Ŭ·¡½º :: °Ô½ÃÀÚ¸¦ ÅëÇØ °üÂû °¡´ÉÇÑ À¯Çü API¸¦ ±¸ÇöÇÕ´Ï´Ù. ´Ù¸¥ °Íµé Áß¿¡´Â ÀÌ°ÍÀÌ »ó´çÈ÷ °£´ÜÇÏ°Ô ´À½¼ÇÏ°Ô °áÇÕ µÈ GUI¸¦ ¾²´Â °ÍÀÔ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.


¿Àµð¿À :: Ladspa :: ³×Æ®¿öÅ© °ü·Ã ¼ÒÇÁÆ®¿þ¾î