صدا/میدی audio/midi

واردسازی صدا.میدی
واردسازی فشرده سازی

تابع ریشه:
    ناپایا آهنگم := میدی.آهنگ جدید(480)
    سرچاپ آهنگم.تقسیم، آهنگم.قالب، آهنگم.ضرباهنگ برگردان صحیح
    سرچاپ میدی.تقسیم پیش‌فرض

    ناپایا ترکم := میدی.ترک جدید()
    میدی.افزودن ضرباهنگ(ترکم، 0، 120.0)
    میدی.افزودن برنامه(ترکم، 0، 0، 0)
    میدی.افزودن واپایش(ترکم، 0، 7، 100، 0)
    ناپایا شماره := 0
    تا شماره کوچکتر 4:
        میدی.افزودن نت(ترکم، شماره * 480، 240، 60 + شماره * 2، 100، 0)
        شماره += 1
    پایان
    سرچاپ ترکم.رویدادها.طول()
    میدی.افزودن ترک(آهنگم، ترکم)
    سرچاپ آهنگم.ترک‌ها.طول()، میدی.تیک کل(آهنگم)

    یکی := ترکم.رویدادها.بگیر(1)
    سرچاپ یکی.تیک، یکی.وضعیت برابر میدی.نت روشن، یکی.داده۱، یکی.داده۲، یکی.کانال

    سرچاپ میدی.نت روشن، میدی.نت خاموش، میدی.تغییر واپایش، میدی.تغییر برنامه، میدی.رویداد فرا

    رمزی := میدی.کدگذاری میدی(آهنگم)
    سرچاپ فشرده سازی.طول بافر(رمزی) بزرگتر 22، میدی.میدی است(رمزی.data، رمزی.len)
    ناپایا خالی := میدی.آهنگ جدید(480)
    سرچاپ فشرده سازی.طول بافر(میدی.کدگذاری میدی(خالی))
    میدی.آزادسازی آهنگ(خالی)

    فشرده سازی.آزادسازی بافر(رمزی)
    میدی.آزادسازی آهنگ(آهنگم)
پایان

واردسازی صدا
واردسازی صدا.میدی
واردسازی فشرده سازی
واردسازی مسیر پرونده
واردسازی ریاضی
واردسازی حافظه
واردسازی سیستم عامل

تابع ریشه:
    ناپایا آهنگم := میدی.آهنگ جدید(480)
    ناپایا ترکم := میدی.ترک جدید()
    میدی.افزودن ضرباهنگ(ترکم، 0، 120.0)
    ناپایا شماره := 0
    تا شماره کوچکتر 4:
        میدی.افزودن نت(ترکم، شماره * 480، 240، 60 + شماره * 2، 100، 0)
        شماره += 1
    پایان
    میدی.افزودن ترک(آهنگم، ترکم)
    رمزی := میدی.کدگذاری میدی(آهنگم)

    سرچاپ میدی.میدی است(رمزی.data، رمزی.len)، میدی.میدی است(رمزی.data، 8)
    سرچاپ صدا.نام قالب(صدا.شناسایی قالب(رمزی.data، رمزی.len))
    ناپایا درستی := نادرست
    ناپایا برگشته := میدی.کدگشایی میدی(رمزی.data، رمزی.len، درستی)
    سرچاپ درستی، برگشته.تقسیم، برگشته.ترک‌ها.طول()
    سرچاپ ریاضی.قدرمطلق(میدی.ضربان(برگشته) - 120.0) کوچکتر 0.01
    سرچاپ میدی.تیک کل(برگشته)
    سرچاپ میدی.تیک به ثانیه(برگشته، 480)، میدی.ثانیه به تیک(برگشته، 0.5)

    ناپایا نت‌هایم := میدی.نت‌ها(برگشته)
    سرچاپ نت‌هایم.طول()، نت‌هایم.بگیر(0).شماره نت، نت‌هایم.بگیر(3).شماره نت
    سرچاپ نت‌هایم.بگیر(1).آغاز، نت‌هایم.بگیر(0).درازی
    نت‌هایم.آزادکن()

    ساخته := میدی.ساختن(برگشته، 22050، 1)
    سرچاپ ساخته.فریم ها بزرگتر 0، صدا.اوج(ساخته) بزرگتر 0.05
    سرچاپ میدی.نام برنامه(0)، میدی.نام برنامه(200) برابر ""

    نشانی := مسیر پرونده.پیوند(سیستم عامل.پوشه موقت()، "salam_midi_example.mid")
    دیرکن حافظه.آزادسازی(نشانی برگردان تهی*)
    سرچاپ میدی.ذخیره میدی(آهنگم، نشانی)
    ناپایا درستی۲ := نادرست
    ناپایا دیسکی := میدی.بازکردن میدی(نشانی، درستی۲)
    سرچاپ درستی۲، دیسکی.ترک‌ها.طول()
    ناپایا رفته := نادرست
    نبود := مسیر پرونده.پیوند(سیستم عامل.پوشه موقت()، "salam_midi_none.mid")
    دیرکن حافظه.آزادسازی(نبود برگردان تهی*)
    میدی.بازکردن میدی(نبود، رفته)
    سرچاپ رفته

    ناپایا خراب := نادرست
    میدی.کدگشایی میدی(رمزی.data، 8، خراب)
    سرچاپ خراب

    فشرده سازی.آزادسازی بافر(رمزی)
    ناپایا آر := ساخته
    صدا.آزادسازی(آر)
    میدی.آزادسازی آهنگ(آهنگم)
    میدی.آزادسازی آهنگ(برگشته)
    میدی.آزادسازی آهنگ(دیسکی)
پایان