blitz3d read MIDI IN USB EXTERNAL KEYBOARD programming

Dabord il faut telecharger blitz3D avec la librairie blitz3d+midi 
Surtout mettre le programme si dessous dans le fichie userlib pour que ça fonctionne !!!!
essayez toutes vos prises usb pour le test en changent midiopen(1),midiopen(2)...(3) 
Global hIn = MidiInOpen(0)

.debut
    If MidiEvent(hIn) Then
MidiInStart(hIn)

    msg$= MidiGetParam1()
    Print Hex(msg$)
;affiche les données du clavier externe    
    EndIf
   
Goto debut