MIDI :: müzik

Perl arayüzü / dev / müzik
Şimdi İndirin

MIDI :: müzik Sıralama ve Özet

Reklamcılık

  • Rating:
  • Lisans:
  • Perl Artistic License
  • Fiyat:
  • FREE
  • Yayıncı adı:
  • Seth David Johnson
  • yayıncı web sitesi:
  • http://search.cpan.org/~sethj/

MIDI :: müzik Etiketler


MIDI :: müzik Açıklama

Perl arayüzü / dev / müzik MIDI :: Müzik, / dev / müziğin / dev / müzik aracılığına kadar yüksek düzeyde bir perl arayüzüdür ve açık ses sistemi v.3.8 veya daha yüksek olarak desteklenen * Nix sisteminde işlev görecek şekilde tasarlanmıştır. İç ve dış MIDI cihazları ile oynatılır, etkinliklerin harici bir cihazdan "kaydedilmesi". MIDI :: Müzik tasarımında ek hedefler şunlardır: 1. MIDI programcılarının% 99'unu karşılamak için gerekli birkaç yöntemle bir API sağlamak. 2. Sean M. Burke'nin MIDI-Perl Suite ile ortak bir olay şartnamesi ile kolay entegrasyon sağlamak. Şu anda, MIDI :: Müzik ile yapabileceğiniz üç şey var: 1. Bir MIDI dosyası oynatın. 2. MIDI :: Olay Belgesinde açıklandığı gibi bir lol olan bir olay yapısında tanımlanan bir dizi etkinlik oynatın. 3. Harici bir cihazdan bir seri olayları okuyun. Bu olaylar 'de olduğu gibi aynı olay yapısı olarak iade edilmektedir. :) Aksine, bir dizi olay (yine de, yine de oynatma ile ilgili yöntemlerde) periyodik olarak yıkanan bir dizi etkinlik yazılmıştır. "Oynatıcılar" işlevi, örneğin, geri döndüğü zaman, kullanıcının oynatılmasına devam ederken, kullanıcının oynatılmasını gerektirir. Synthesizer dikkate alınmalıdır. Bu süre elbette, herhangi bir okumada kaç mesajın işlendiğine, makinenin işlemi yapılması, vb. Kusurun vb. Buna bağlı olarak bağlıdır. MIDI :: Müzik kullanın; $ mm = yeni midi :: müzik; # # MEVCUT MEVCUT CİHAZI ANACAKLIK İÇİN BİR MIDI dosyası oynatın $ MM-> PlayMidiFile ('foo.mid') || DIS $ MM-> errstr; OR: MIDI :: müzik kullanın; FCNTL kullanın; $ mm = yeni midi :: müzik; # $ Mm-> init ('mod' => o_wronly, 'TimeBase' => 96, 'tempo' => 60, 'Timesig' => ,) || ölmek $ mm-> errstr; # Bir C-major akor $ mm-> oyunevleri (, , , , , , , , ,] || ölmek $ mm-> errstr; $ mm-> dumpbuf; $ mm-> yakın; OR: MIDI :: müzik kullanın; MIDI kullanın; FCNTL kullanın; $ OPUS = MIDI :: OPUS-> YENİ (); $ Track = MIDI :: Track-> Yeni (); $ mm = yeni midi :: müzik ('tempo' => 120, # bu parametreler 'gerçek zamanlı' => 1, # iletilebilir); # Yapıcı # bir harici cihazdan bazı MIDI verilerini kaydedin .. $ mm-> init ('mod' => o_rdonly) || ölmek $ mm-> errstr; (;;) {> $ event_struct = $ mm-> okumalar; push (@ {$ track-> events_r}, @ $ Event_struct) if (tanımlanmış $ Event_struct); } $ mm-> yakın; $ opus-> parça ($ parça); $ opus-> write_to_file ('bar.mid'); Gereksinimler: · Perl


MIDI :: müzik İlgili Yazılım