CLAVIER EXTERNE USB MIDI IN BLITZ3D

Dabord il faut telecharger blitz3D avec la librairie blitz3d+midi
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