PC World 2007 January/PCWorld_2007-01_cd.bin/temacd/reaper/reaper147-install.exe/Effects/MIDI/midinoteondelay

Text File | 2006-09-22 | 347b | 23 lines

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;
);