You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

39 lines
729 B

11 years ago
  1. ; New microcode
  2. name "K-CvShift";
  3. copyright "Copyright (c) 2004.";
  4. created "05/04/2009";
  5. engine "kX";
  6. ; comment "";
  7. guid "abf6f6f9-37d3-4d70-908b-c1c45f8045fe";
  8. ; -- generated GUID
  9. ; itramsize 0
  10. ; xtramsize 0
  11. ; code
  12. control Octave=0.0
  13. control Transpose=0.0
  14. control Tune=0.0
  15. input InCV
  16. output OutCV
  17. static TempCV
  18. temp ScaledOctave
  19. temp ScaledTranspose
  20. temp ScaledTune
  21. interp ScaledOctave,-2,Octave,3
  22. macints ScaledOctave,0x0,0.125,ScaledOctave
  23. interp ScaledTranspose,-12,Transpose,13
  24. macints ScaledTranspose,0x0,0.010416667,ScaledTranspose
  25. interp ScaledTune,-0.0052083335,Tune,0.0052083335
  26. acc3 TempCV,ScaledOctave,ScaledTranspose,ScaledTune
  27. macs OutCV,InCV,TempCV,1.0
  28. end