CAL Script to remove Aftertouch events

So I bought a new keyboard, a Behringer Motor 61, and it supports channel aftertouch.  There isn't any easy way to toggle it on and off on the keyboard (it's not part of its preset system) and toggling it on and off inside SONAR is difficult as well.  So I'm now ending up with lots of recorded aftertouch, which usually I don't want.  After finding nothing with Google and deciding that using SONAR's find/replace was just too painful, I wrote a tiny CAL script that would strip out all channel and key aftertouch events from selected MIDI.  I thought someone else might want this.  To use it save this to a .cal file, select some MIDI with aftertouch and use Process->Run CAL
 

; RemoveAftertouch
; Matt Sorrels Sept 2017
;
; Remove all key and channel aftertouch events in selected MIDI clips

(do
 (int nDeleted 0)
 (forEachEvent
  (do
   (if (|| (== Event.Kind CHANAFT) (== Event.Kind KEYAFT) )
    (do
   (delete)
   (++ nDeleted)
  )
 )
  )
 )
 (pause "Deleted " nDeleted " aftertouch events.")
)

 
You can also just download the file from here:
http://www.pontari.com/sonar/RemoveAftertouch.cal
 

Thanks Matthew! This will come in very handy. 

There's a squillion CAL scripts for download over in the Software forms utility thread. There's a link from the Contents to the specific post with the CaL info.

http://forum.cakewalk.com...tilities-m3392713.aspx

See Miscellaneous. The Cal is a giant archive. There's just too many to list individually.

Great addition to the CAL canon, Matt. Thanks for sharing.
 
Maybe it's time to revive the CAL conversation. It's been awhile since it was a frequent topic of conversation, and I'm sure many new users aren't even aware this powerful feature exists.

tenfoot

Anderton
You can just disable recording aftertouch in preferences - solves the problem at the source.😀

Not if you want to use a Faderport.

True that. The Microsoft Dial looks very promising as a more general-purpose controller, I'm going to get one and dive in.

Thank Matt added if I ever get that controller with after-touch I now have the means to remove it.