Here is something I made up. Don't know if it's usefull to anyone, but here it is anyway...
<CsoundSynthesizer>
<CsOptions>
</CsOptions>
<CsInstruments>
opcode cps2midi, k, k
kcps xin
xout logbtwo(kcps / 440) * 12 + 69
endop
opcode keytrack, k,kki
kcps, kcutoff, ikeytrack xin
kmidi cps2midi kcps
kmidi = kmidi-64
kkey = 2^(kmidi/12)*kcutoff
kscaled = (kkey-kcutoff)*ikeytrack+kcutoff
xout kscaled
endop
instr 1
kcps = cpspch(p4)
kcutoff = 440
ikeytrack = 0.5
kcutoff keytrack kcps, kcutoff, ikeytrack
printks "%f", 1, kcutoff
endin
</CsInstruments>
<CsScore>
i1 0 1 7.09
</CsScore>
</CsoundSynthesizer>