Time-stretching & pitch-shifting

Citation : on init
declare ui_knob $RealBPM (0,200,1)
declare ui_label $HostBPM (1,1)
declare ui_label $Ratio (1,1)
declare $first_variable
declare $second_variable
declare $third_variable
$RealBPM := 148
end on
on note
$first_variable := $RealBPM
$second_variable := 60000000/$DURATION_QUARTER
$second_variable := $second_variable*100
set_text ($HostBPM,$second_variable)
$third_variable := $second_variable/$first_variable
set_text ($Ratio,$third_variable)
$third_variable := $third_variable (fonction de mapping/range pour le bouton time restant à être définie...)
_set_engine_par($ENGINE_PAR_SPEED,$third_variable,0,0,-1)
end on