programma script .vbs midi-ox

[luigi67]

ciao
sto scrivendo uno script in .vbs per interfacciarmi con midiox e recuperare i dati in input da un file midi.
Ottengo i seguenti risultati

esempio:

429,0,136,61,0
429,0,135,64,0
429,0,135,57,0
434,0,151,57,90
434,0,151,64,90
434,0,152,61,90
616,0,136,61,0
616,0,135,57,0
616,0,136,52,0
616,0,135,45,0
616,0,133,57,0

la funzione che uso per recuperare i dati è msgStr = mox.GetMidiInput()

codice di esempio da documentazione midiox
Example:

msgStr = mox.GetMidiInput()
If msgStr <> "" Then
A = Split( msgStr, ",", -1, vbTextCompare )
Tstamp = Int(A(0))
port = Int(A(1))
stat = Int(A(2))
data1 = Int(A(3))
data2 = Int(A(4))
If stat = &hF0 Then
strSysEx = mox.GetSysExInput()
mox.SendSysExString strSysEx
End If
End If

Io non li separo. Ma mi interessa capire a quali messaggi si riferiscono questi numeri. (Mi interessa capire principalmente se sono control change o program change, ma se possibile anche distinguere tutti gli altri eventi note off pich bend ecc)
Grazie!

[luigi67]

scusate una cosa che mi son dimenticato io eseguo solo
msgStr = mox.GetMidiInput()
non tutta la trafila poi scritta sotto nell'esempio
quindi non faccio conversioni. Vi ho postato l'esempio di messaggio originale da capire ouput solo di quella funzione. grazie

[luigi67]

help please