desc: all notes to one note slider1:69<0,127,1>select note @slider slider1 &= $x7F; @block while ( midirecv(msgpos,msg1,msg23) ? ( msg = msg1 & $x00F0; (msg == $x80) || (msg == $x90) ? msg23 = (msg23 & $xFF00) + slider1; midisend(msgpos,msg1,msg23); ); );