Conversione del Tempo Delta fra due eventi Midi dai secondi nel valore esadecimale in formato "a lunghezza variabile"

Da Gambas-it.org - Wikipedia.

Il Tempo Delta, che divide un evento Midi dall'evento immediatamente precedente, viene espresso nel file Midi standard in formato a lunghezza variabile. Più specificatamente il Tempo Delta, così come contenuto nel file Midi standard, assume la rappresentazione esadecimale del valore espresso in tick preliminarmente convertito in formato a lunghezza variabile. [Nota 1]

Il formato "a lunghezza variabile" rappresenta i numeri usando solo sette bit per byte, mentre il bit più significativo è impostato ad un valore tale da poterlo riconoscere. Se la rappresentazione contiene più byte per esprimere un numero, il bit più significativo dei primi byte sarà posto sempre ad 1, mentre quello dell'ultimo byte sarà sempre posto a 0. Tale impostazione sta ad indicare che, quando il bit più significativo è posto ad 1, tale byte non è l'ultimo della rappresentazione esadecimale, ma che dopo di esso v'è un altro byte. Se il bit più significativo è invece posto a 0, allora vuol dire che il byte, al quale quel bit appartiene, è l'ultimo della rappresentazione. [Nota 2]


Di seguito verrà mostrato un algoritmo per ottenere di un Tempo Delta, espresso in secondi, la conversione da tale unità di misura in tick reali fra due eventi Midi e successivamente in tick in formato "a lunghezza variabile", in rappresentazione esadecimale e in ordine Big-Endian

Innanzitutto va detto che per passare dal valore temporale espresso in secondi al valore espresso in tick reali, bisognerà adottare questa formula:

(secondi * 1000000) / ((60000000 / bpm) / td) = tick_reali

Laddove:

  • secondi: è il valore temporale espresso in secondi che intercorre fra un Evento-Midi e quello immediatamente successivo;
  • bmp: è il tempo metronomico (battute per minuto);
  • td: è la risoluzione di clock per nota da 1/4 (PPQN), che nel file Midi è espressa in Big-Endian dal 13° e il 14* byte (gli ultimi due byte della traccia MThd.


Fatto ciò, si potrà passare all'ultima fase, ossia convertire il valore dei tick reali nel corrispondente valore in formato "a lunghezza variabile", in rappresentazione esadecimale e in ordine Big-Endian.

Public Sub Main()
 
 Dim tick_reali, intero As Integer
 Dim b, c As Byte
 Dim lv As New Byte[]
  
  tick_reali = 151808    ' Poniamo questo valore dei "tick reali" a mero scopo esemplificativo:
  
  lv.Push(tick_reali Mod 128)
  intero = Fix(tick_reali / 128)
  
  While intero > 0
    b = CByte(intero Mod 128)
    lv.Push(b Or 128)
    intero = Fix(intero / 128)
  Wend
  
  lv.Reverse()
  
' Mostra il valore dei tick in formato "a lunghezza variabile" e in rappresentazione esadecomale:
  For Each c In lv
    Print Hex(c, 2);
  Next
  
End



Note

[1] Vedere anche la pagina: Conoscere la durata in secondi del Tempo Delta fra due Eventi Midi

[2] Il Tempo Delta (TΔ), che intercorre fra un Evento-Midi e quello immediatamente successivo, può essere espresso nel file Midi da uno a quattro byte, a seconda ovviamente della lunghezza della durata. Se sono utilizzato du o più byte, l'ordine adottato nella memorizzazione del valore del Tempo Delta è sempre in Big-Endian.
Il valore del Tempo Delta memorizzato nel file non è espressamente proprio quello corrispondente alla quantità di secondi. Infatti non è adoperata direttamente l'unità di misura temporale dei secondi, bensì questa viene prima convertita in tick reali, ossia in impulsi per nota da 1/4 (PPQN). Successivamente si procede alla conversione del valore da tick reali in un valore in rappresentazione a lunghezza variabile.
La rappresentazione a lunghezza variabile nel Midi prevede che in ogni byte, facente parte nel file Midi del valore del Tempo Delta, sono utili a fini della definizione di tale valore soltanto sette bit, e segnatamente quelli meno significativi (dunque dal 1° bit a destra, che esprime per convenzione il valore 1, fino al penultimo bit a sinistra, che esprime a sua volta il valore 64). Il bit più significativo del Byte nel Midi non assume il valore 128, bensì sta lì potendo significare due realtà:
1) se il byte, al quale appartiene, è l'unico o l'ultimo byte del gruppo che rapresentano il valore del Tempo Delta: in tal caso quel bit assume il valore 0 (zero);
2) se il byte, al quale appartiene, non è l'ultimo byte del gruppo che rapresentano il valore del Tempo Delta: in tal caso quel bit assume il valore 1 (uno).