Midi, содержимое файла
От: 0x45455844  
Дата: 09.02.06 19:22
Оценка:
Привет! Для простоты примера я хочу сгенерировать миди файл с одной нотой,
делаю это на перле.
все данные я выдрал из миди файла созданного в редакторе, и не могу понять
что делает последняя последовательность байт, обьясните плиз... она как-то отвечает
за длительность, но логику я не могу понять.

#! perl -w

my @d = (
# MIDI header
0x4D, 0x54, 0x68, 0x64, # MThd
0x00, 0x00, 0x00, 0x06, # length
0x00, 0x00, # Format 0
0x00, 0x01, # the number of track chunks in the file
0x00, 0x60, # time Division

# MIDI track data
0x4D, 0x54, 0x72, 0x6B, # MTrk
0x00, 0x00, 0x00, 0x17, # length
0x00, 0xFF, 0x58, 0x04, 0x04, 0x02, 0x18, 0x08, # Time Signature
0x00, 0xFF, 0x59, 0x02, 0x00, 0x00, # Key Signature
0x00, 0xFF, 0x51, 0x03, 0x09 ,0x27, 0xC0, # Set tempo

0x00, 0xC0, 0x00, # set Piano, instr no.0

0x00, 0x90, 0x3C, 0x7F, # play C5 note

# а вот за что отвечает эта строка байт?
0x78, 0x3C, 0x00, 0x00, 0xFF, 0x2F, 0x00

);

open(FL, "> x.mid");
binmode FL;
for(@d){
printf FL "%c",$_;
}
close FL;
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.