I’ve been doing a lot of work lately within Native Instruments’ Kontakt sampler which has its own scripting language. It’s quite powerful, works in pro tools and other DAWs and means you don’t have to worry about the pitfalls of dealing with Core audio and all that fun.
I thought I would share a couple of the tools that I find indispensable for working with Kontakt scripting.

Nils Liberg’s KScript Editor is a script editor (you probably guessed that part) with an integrated compiler and is a lot easier to work in that typing your code directly into the Kontakt scripting engine. By pressing F5 you can compile your code which is also copied to the clipboard to be pasted into Knotakt. It makes life so much easier.
You can download it from Nil’s website below
http://nilsliberg.se/ksp/

Ken’s GUIGenerator is a graphic tool to help you to create Kontakt performance views, or user interfaces, without having to code at all. It has a lot of great features and lets you name all your variables so you can easily hook them up to your script.
You can download it from musikbits below
http://www.musikbits.com/

Follow

For a project I am working on at the moment I am using Native Instruments Kontakt’s scripting language (KSP) to trigger random samples from a range within the sampler using the script I posted in a previous post. (Here)
This was all working well but when the sample size was getting to small the script was getting locked in a while loop trying to find notes that it had not used before which was very inefficient.
The solution I came up with was to use an array to store all the notes which gets shuffled randomly whenever it reaches the sample limit.
Below is an example of the script I created.

on init
  
  message("Loaded...")
  
declare $temp := 0
declare $random_temp := 0
declare $counter := 0
declare $lower_limit := 0
declare $upper_limit := 10  
declare $play_head := 0

declare %array_one[10]

  
  
  while($counter < num_elements(%array_one))
      
      %array_one[$counter] := $counter
      
  inc($counter)
      end while
  
  
  {shuffle array 1}
  
  $counter := 0
  
while($counter < num_elements(%array_one))
    
    $random_temp := random(0, num_elements(%array_one) - 1)
    
    $temp := %array_one[$counter]
    %array_one[$counter] := %array_one[$random_temp]
    %array_one[$random_temp] := $temp
    
    
    inc($counter)
    end while
 
       
  
end on

function shuffleArray
   
    $counter := 0
    
  while($counter < num_elements(%array_one))
    
    $random_temp := random(0, num_elements(%array_one) - 1)
    
    $temp := %array_one[$counter]
    %array_one[$counter] := %array_one[$random_temp]
    %array_one[$random_temp] := $temp
    
    
    inc($counter)
    end while  
    
    
    
end function



on note
    
if ($play_head < 10) 
message("Playing....")    
play_note(%array_one[$play_head],100,0,-0)
inc($play_head)

else 
message("Shuffle....") 
call shuffleArray
$play_head := 0
play_note(%array_one[$play_head],100,0,-0)
inc($play_head)

end if    
    
    
end on

Follow