;@ map d FLTfrq
;@ map d CLA000
;@ map d MID000
;@ map d MID000

;@ args kkkk,ak,a
opcode FltLP, 0, kkkkkkk
; KBT !!!!!
	kFreq, kFreqMod, kKBT, kOn, kin,kmod,kout xin
	ain zar kin  
	kMod zkr kmod  
	aout tonex ain, kFreq+kFreqMod*kMod, 4 ; ORDER IN MODES!
	zaw aout, kout 
endop


;@ args kkkk,aa,a
opcode FltLP, 0, kkkkkkk
; KBT !!!!!
	kFreq, kFreqMod, kKBT, kOn, kin,kmod,kout xin
	ain zar kin  
	aMod zar kmod  
	aout tonex ain, kFreq+kFreqMod*aMod, 4 ; ORDER IN MODES!
	zaw aout, kout 
endop
