L'idée de ce p'tit programme est de pouvoir tester les Instruments et les notes MIDI disponibles. Choisissez un instrument a gauche et jouer les notes sur le pad de droite. Un click sur le singe permet de quitter...
Quatre lignes de code suffisent pour ajouter ces sons dans votre code:
.DATA?
hMidiOut DD ?
.CODE
Invoke midiOutOpen,ADDR hMidiOut,0,0,0,CALLBACK_NULL ;Ouvrir MIDI
...
Invoke midiOutShortMsg ,hMidiOut,Instrum ;Sel Instrum
Invoke midiOutShortMsg ,hMidiOut,Note ;Joue Note.
...
Invoke midiOutClose, hMidiOut ;Fermer MIDI
Instrum est un DWORD composé comme suit: 0000iiC0h,
ii Le code Instrument.
Note est un DWORD composé comme suit; 00vvnn9xh,
nn Le code Note.
vv Le volume.
x Le port MIDI. (0-F)
Note: pour stopper une note appeler midiOutShortMsg avec le volume a zero.
Have fun... Bluebibubble