desc:midi noteon delayer

slider1:0<0,4096>max delay samples (limited to blocksize)
slider2:0,poo

@init 
slider2=1;

@block

while(
  midirecv(msgt,msg1,msg23)?
  (
    ((msg1&240)==144)?(
      msgt+=rand(slider1);
      slider2+=1;
      sliderchange(slider2);      
    );
    midisend(msgt,msg1,msg23);
    1;
  ):0;
);
