/* convtomix */
/* converts old OctaMED/tracker modules to play right under */
/* the new mixing routine (transposes samples two octaves up */
address 'OCTAMED_REXX'
options results
do cnt = 1 to 63
	in_select ins cnt
	in_gettype
	instype = result
	if (instype = "SAMPLE" | instype = "HYBRID") then do
		in_gettranspose
		transp = result
		in_settranspose transp+24
	end
end
in_select ins 1