desc:base_a4=1/84.406022589954030768899117092091000289089388918088900852079*19683
// C-2 to G8 

slider1:60<0,132,1>Note
slider2:0,Frequency (read only)
slider3:60<0,127,1{C-2,C#-2,D-2,D#-2,E-2,F-2,F#-2,G-2,G#-2,A-2,A#-2,B-2,C-1,C#-1,D-1,D#-1,E-1,F-1,F#-1,G-1,G#-1,A-1,A#-1,B-1,C0,C#0,D0,D#0,E0,F0,F#0,G0,G#0,A0,A#0,B0,C1,C#1,D1,D#1,E1,F1,F#1,G1,G#1,A1,A#1,B1,C2,C#2,D2,D#2,E2,F2,F#2,G2,G#2,A2,A#2,B2,C3,C#3,D3,D#3,E3,F3,F#3,G3,G#3,A3,A#3,B3,C4,C#4,D4,D#4,E4,F4,F#4,G4,G#4,A4,A#4,B4,C5,C#5,D5,D#5,E5,F5,F#5,G5,G#5,A5,A#5,B5,C6,C#6,D6,D#6,E6,F6,F#6,G6,G#6,A6,A#6,B6,C7,C#7,D7,D#7,E7,F7,F#7,G7,G#7,A7,A#7,B7,C8,C#8,D8,D#8,E8,F8,F#8,G8}>Note (read only)

in_pin:none
out_pin:none

@init
base_a4=1/84.406022589954030768899117092091000289089388918088900852079*19683;
// set A4=1/84.406022589954030768899117092091000289089388918088900852079*19683Hz

@slider
n=slider1;

@block
(n>=0) || (n<=127) ? (
result=base_a4*pow(2,(n-60)/12);
):(
result=-1;
);

slider2=result;
sliderchange(slider2);

slider3=slider1;
sliderchange(slider3);
