¹Ìµð

MIDI´Â MIDI ÆÄÀÏÀ» Àаí ÀÛ¼º, ±¸¼º, ¼öÁ¤ ¹× ¾²±â ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

¹Ìµð ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Sean M. Burke
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~sburke/

¹Ìµð ű×


¹Ìµð ¼³¸í

MIDI´Â MIDI ÆÄÀÏÀ» Àаí ÀÛ¼º, ±¸¼º, ¼öÁ¤ ¹× ¾²±â ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. MIDI´Â MIDI ÆÄÀÏÀ» Àаí ÀÛ¼º, ±¸¼º, ¼öÁ¤ ¹× ¾²±â ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù .Snopsis MIDI¸¦ »ç¿ëÇϽʽÿÀ. ¾ö°ÝÇÑ »ç¿ë; °æ°í¸¦ »ç¿ëÇϽʽÿÀ. @events = (, , # 1qn = .45 ÃÊ); (1 .. 20) {Ǫ½Ã @Events, , ,; } ³» $ DELAY (Reverse (1..96)) {Ǫ½Ã @Events, , ,; } MY $ COWBELL_TRACK = MIDI :: TRACK -> NEW ({ 'À̺¥Æ®'=> @Events}); $ opus = midi :: opus-> new ({ 'Çü½Ä'=> 0, 'ƽ'=> 96, 'Æ®·¢'=> }); $ opus-> write_to_file ( 'cowbell.mid'); ¿ä±¸ »çÇ× : ¡¤ Perl.


¹Ìµð °ü·Ã ¼ÒÇÁÆ®¿þ¾î