MIDI音乐制作二次开发-采用CAL/SAL语言制作震音

对MIDI音乐制作软件Cakewalk Pro Audio或“世界树”进行二次开发，采用Cakewalk Application Language(CAL)或Sekaiju Application Language(SAL)编写程序代码，制作震音。

以下是在Cakewalk Pro Audio中用CAL实现震音制作的方法。

目的：制作如下震音

在Cakewalk Pro Audio软件界面中输入不带震音记号的音符（软件中不可能输入震音记号，所以才要编写程序制作震音）。

编写CAL代码：

(do
	(dword d)
	(dword t)
	(dword tpdur)
	(getInt d "实际一个音时值：" 1 640)
	(forEachEvent
		(if (== Event.Kind NOTE)
			(do
				(= tpdur (+ Event.Time Note.Dur))
				(= t Event.Time)
				(delete)
				(while (< (+ t d) tpdur)
					(do
						(insert t Event.Chan NOTE Note.Key Note.Vel d)
						(+= t d)
					)
				)
				(insert t Event.Chan NOTE Note.Key Note.Vel (- tpdur t))
			)
		)
	)
)

程序的原理是，接收用户输入的实际一个音的时值。对于选中的事件，如果事件类型为音符，则将其删除后，反复插入时值为用户输入数值的音符，填满原音符的音长。

选中音符，运行以上CAL代码。

效果如下：

由以上结果看出，该程序实现了震音的制作。

“世界树”（https://openmidiproject.opal.ne.jp/Sekaiju_chs.html）是仿照Cakewalk Pro Audio开发的开源软件，用Visual C++，采用MFC框架编写，目前最高版本为2024年1月21日发布的8.0版本。

在“世界树”软件下用SAL制作震音的原理相同。