cpsmid

Converts MIDI Note Number to Cycles per second (Hz)

Description

Takes a MIDI note number input and converts to Cycles per second (Hz).

Syntax

kcps cpsmid knum

Performance

knum -- Expects MIDI Note # In

kcps -- Returns equivelent of MIDI Note # in Cycles per second (Hz).

Code

opcode	cpsmid, k, k

kmid	xin

#define MIDI2CPS(xmidi) # (440.0*exp(log(2.0)*(($xmidi)-69.0)/12.0)) #
kcps	=	$MIDI2CPS(kmid)

	xout	kcps

		endop

Examples

instr	1

inum	notnum

kout	cpsmid	inum

	printk2	inum
	printk2	kout

		endin

Credits

David Akbari - 2005