mirror of http://CODE.RHODECODE.COM/u/O/O/O
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
23318 lines
1.1 MiB
23318 lines
1.1 MiB
{ Compiled on Fri Jul 30 09:16:42 2021 }
|
|
on init
|
|
declare $jldiw
|
|
declare $qlteh
|
|
declare $gmcfe
|
|
declare %zeecp[20]
|
|
declare %dpoyh[20]
|
|
declare %tyrok[20]
|
|
declare $v54fu
|
|
declare %latnx[2]
|
|
declare $hokt3
|
|
declare $w0x5j
|
|
declare $otddp
|
|
declare $wg0d2
|
|
declare $gpzoi
|
|
declare $yjjle
|
|
declare $q3qgi
|
|
declare $vlhs0
|
|
declare $pvuhq
|
|
declare !g0j20[12]
|
|
!g0j20[0] := ""
|
|
!g0j20[1] := "_1"
|
|
!g0j20[2] := "_2"
|
|
!g0j20[3] := "_3"
|
|
!g0j20[4] := "_4"
|
|
!g0j20[5] := "_5"
|
|
!g0j20[6] := "_6"
|
|
!g0j20[7] := "_7"
|
|
!g0j20[8] := "_8"
|
|
!g0j20[9] := "_9"
|
|
!g0j20[10] := "_10"
|
|
!g0j20[11] := "_11"
|
|
declare $fg4rw
|
|
declare $y3mgr
|
|
declare $iz4ec
|
|
declare $dyt1q
|
|
declare $r0pwv
|
|
declare $t1jz4
|
|
declare ~u0ht0
|
|
declare $jdgl1
|
|
declare @uamno
|
|
declare $tuwra
|
|
declare $uummz
|
|
declare $e1wl4
|
|
declare %ihqwp[48]
|
|
SET_CONDITION(NO_SYS_SCRIPT_PEDAL)
|
|
set_snapshot_type(1)
|
|
set_script_title("Ashlight")
|
|
declare $kyxij
|
|
declare !dwujg[12]
|
|
!dwujg[0] := "C"
|
|
!dwujg[1] := "C#"
|
|
!dwujg[2] := "D"
|
|
!dwujg[3] := "D#"
|
|
!dwujg[4] := "E"
|
|
!dwujg[5] := "F"
|
|
!dwujg[6] := "F#"
|
|
!dwujg[7] := "G"
|
|
!dwujg[8] := "G#"
|
|
!dwujg[9] := "A"
|
|
!dwujg[10] := "Bb"
|
|
!dwujg[11] := "B"
|
|
declare @cdyen
|
|
@cdyen := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/PREF/"
|
|
declare @ugwfc
|
|
@ugwfc := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Resources/Data/"
|
|
declare %nki_prefs[30]
|
|
load_array(%nki_prefs,2)
|
|
declare !help_strings[285]
|
|
declare !automation_strings[206]
|
|
if (1=1)
|
|
declare !font_names[17]
|
|
!font_names[0] := "Font_Roboto_Regular_11pt_white_40_Edit"
|
|
!font_names[1] := "Font_Roboto_Regular_11pt_black_70_Edit"
|
|
!font_names[2] := "Font_Roboto_Regular_11pt_black_90_Edit"
|
|
!font_names[3] := "Font_Roboto_Regular_13pt_FFFFFF_Edit"
|
|
!font_names[4] := "Font_Roboto_Regular_13pt_white_Edit"
|
|
!font_names[5] := "Font_Roboto_Regular_13pt_FFFFFF_disabled_Edit"
|
|
!font_names[6] := "Font_Roboto_Regular_13pt_yellow_Edit"
|
|
!font_names[7] := "Font_Roboto_Medium_14pt_FFFFFFA70"
|
|
!font_names[8] := "Font_Roboto_Medium_14pt_FFFFFFA90"
|
|
!font_names[9] := "Font_Roboto_Medium_14pt_blackA70"
|
|
!font_names[10] := "Font_Roboto_Medium_14pt_blackA90"
|
|
!font_names[11] := "Font_Roboto_Regular_11pt_white_70_Edit"
|
|
!font_names[12] := "Font_Roboto_Regular_13pt_FFFFFF_Hover_Edit.png"
|
|
!font_names[13] := "Font_Roboto_Regular_13pt_yellow_Strike.png"
|
|
!font_names[14] := "Font_Roboto_Regular_13pt_white_Strike.png"
|
|
!font_names[15] := "Font_Roboto_Regular_11pt_white_90"
|
|
!font_names[16] := "Font_Roboto_Medium_14pt_FFFFFFA80"
|
|
declare %aydym[17]
|
|
$fg4rw := 0
|
|
while ($fg4rw<17)
|
|
%aydym[$fg4rw] := get_font_id(!font_names[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare $g5k3r
|
|
declare $25gvz
|
|
declare %x4loa[19] := ($CONTROL_PAR_POS_X, $CONTROL_PAR_POS_Y, $CONTROL_PAR_WIDTH, $CONTROL_PAR_HEIGHT, $CONTROL_PAR_Z_LAYER, $CONTROL_PAR_HIDE, $CONTROL_PAR_AUTOMATION_ID, $CONTROL_PAR_DEFAULT_VALUE, $CONTROL_PAR_MOUSE_BEHAVIOUR, $CONTROL_PAR_PICTURE_STATE, $CONTROL_PAR_FONT_TYPE, $CONTROL_PAR_FONT_TYPE_OFF_PRESSED, $CONTROL_PAR_FONT_TYPE_OFF_HOVER, $CONTROL_PAR_FONT_TYPE_ON, $CONTROL_PAR_FONT_TYPE_ON_PRESSED, $CONTROL_PAR_FONT_TYPE_ON_HOVER, $CONTROL_PAR_TEXTPOS_Y, $CONTROL_PAR_TEXT_ALIGNMENT, $CONTROL_PAR_ALLOW_AUTOMATION)
|
|
declare %xwg5s[2000] := (-1)
|
|
declare %cqg2m[200] := (-1)
|
|
declare %_GUI_state[38000] := (-1)
|
|
declare $0ib2k
|
|
make_instr_persistent($0ib2k)
|
|
declare $yhwrb
|
|
declare $4hpei
|
|
read_persistent_var($0ib2k)
|
|
declare %0eutz[5]
|
|
declare ui_button $bjll0
|
|
make_instr_persistent($bjll0)
|
|
declare ui_button $myubi
|
|
make_instr_persistent($myubi)
|
|
declare ui_button $xgbml
|
|
make_instr_persistent($xgbml)
|
|
declare ui_button $b3dyn
|
|
make_instr_persistent($b3dyn)
|
|
declare ui_button $akgz1
|
|
make_instr_persistent($akgz1)
|
|
$pvuhq := 0
|
|
while ($pvuhq<=4)
|
|
%0eutz[$pvuhq] := get_ui_id($bjll0)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%0eutz))
|
|
%xwg5s[660+$g5k3r] := %0eutz[$g5k3r]
|
|
%cqg2m[66] := 527
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<5)
|
|
set_control_par_str(%0eutz[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%0eutz[$fg4rw],$CONTROL_PAR_PICTURE,"GE_MAIN_NAV_" & $fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare $mdykc
|
|
make_instr_persistent($mdykc)
|
|
declare %konvz[3] := (64, 1024, 16)
|
|
declare %23vl1[3]
|
|
declare ui_button $v2hxc
|
|
make_instr_persistent($v2hxc)
|
|
declare ui_button $raqd0
|
|
make_instr_persistent($raqd0)
|
|
declare ui_button $txw2h
|
|
make_instr_persistent($txw2h)
|
|
$pvuhq := 0
|
|
while ($pvuhq<=2)
|
|
%23vl1[$pvuhq] := get_ui_id($v2hxc)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%23vl1))
|
|
%xwg5s[670+$g5k3r] := %23vl1[$g5k3r]
|
|
%cqg2m[67] := 15
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<3)
|
|
set_control_par_str(%23vl1[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%23vl1[$fg4rw],$CONTROL_PAR_PICTURE,"GE_BOT_NAV_" & $fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_label $fgho2(1, 1)
|
|
set_control_par_str(get_ui_id($fgho2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fgho2),$CONTROL_PAR_PICTURE,"GE_BTM_NAV_BG")
|
|
$g5k3r := 0
|
|
while (%xwg5s[670+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[670+$g5k3r] := get_ui_id($fgho2)
|
|
declare ui_label $fpo2t(1, 1)
|
|
set_control_par_str(get_ui_id($fpo2t),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fpo2t),$CONTROL_PAR_PICTURE,"GE_MOD_TYPE_LABEL")
|
|
$g5k3r := 0
|
|
while (%xwg5s[670+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[670+$g5k3r] := get_ui_id($fpo2t)
|
|
declare %mjtqu[16] := (10529713, 14870248, 10529713, 14870248, 8559272, 2044730, 4013373, 7763575, 4013373, 7763575, 8559272, 2044730, 8559272, 2044730, 8559272, 2044730)
|
|
declare %e4ffk[8] := (10, 11, 2, 4, 4, 2, 2, 2)
|
|
end if
|
|
declare $4djds
|
|
declare %aazjf[26]
|
|
declare %5comw[26]
|
|
declare %ha0dc[26]
|
|
declare %aebtw[26]
|
|
declare %hgu5c[26]
|
|
declare %i5z0e[26]
|
|
declare %c40o1[26]
|
|
declare %bjbtn[26]
|
|
declare %qpgwq[26]
|
|
declare %gndxq[26]
|
|
declare %cy2pa[26]
|
|
declare !5hawr[26]
|
|
declare !znpd1[26]
|
|
declare %ipim0[26]
|
|
declare %qdiwi[26]
|
|
declare $b4lv0 := 45
|
|
make_persistent($b4lv0)
|
|
declare $cm312
|
|
make_persistent($cm312)
|
|
set_control_par_str($INST_WALLPAPER_ID,$CONTROL_PAR_PICTURE,"GE_wallpaper")
|
|
set_control_par_str($INST_ICON_ID,$CONTROL_PAR_PICTURE,"NID_instrument_icon_w")
|
|
set_control_par_str($INST_LIB_PIC_ONE_ID,$CONTROL_PAR_PICTURE,"AboutIconLibrary")
|
|
set_control_par_str($INST_LIB_PIC_TWO_ID,$CONTROL_PAR_PICTURE,"AboutIconLibAuthor")
|
|
set_control_par_str($INST_LIB_COPYRIGHT_ID,$CONTROL_PAR_TEXT,"Copyright 2021 by the most human colors")
|
|
set_control_par_str($INST_LIB_DESCRIPTION_ID,$CONTROL_PAR_TEXT,"was developed by the most human color in collaboration with The SOLOS and Native Instruments.")
|
|
set_ui_height_px(600)
|
|
set_ui_width_px(970)
|
|
make_perfview
|
|
message("")
|
|
declare @ichwi
|
|
@ichwi := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/FX_PRESETS/"
|
|
set_listener($NI_SIGNAL_TIMER_MS,6666)
|
|
declare $dc3zm
|
|
declare $frfox
|
|
declare %n34di[82] := (-1)
|
|
declare %41o3s[82] := (-1)
|
|
declare %c1qym[82] := (-1)
|
|
declare %z15qu[82] := (-1)
|
|
declare %2hswt[82] := (-1)
|
|
declare %qxmpr[82] := (-1)
|
|
declare %dwdw3[82] := (-1)
|
|
declare %sbnwu[82] := (-1)
|
|
declare %nwlgb[82]
|
|
declare %lm23w[82] := (-1)
|
|
declare !4gjzd[82]
|
|
declare %q4mzh[82] := (-1)
|
|
declare %fogcg[82] := (0)
|
|
declare %eujmz[82] := (0)
|
|
declare %hpc0e[82] := (0)
|
|
declare %vc4gu[82] := (0)
|
|
declare %5zak5[82] := (0)
|
|
declare %jeswc[82] := (0)
|
|
declare %vvlef[82] := (-1)
|
|
declare ?rylw5[82]
|
|
declare %oazdd[82]
|
|
declare !gh3f0[82]
|
|
declare !isqic[82]
|
|
declare %mnk53[82] := (0)
|
|
declare %gmios[82] := (0)
|
|
declare %hivzv[82] := (-1)
|
|
declare %hxpuh[82] := (-1)
|
|
declare $upapg
|
|
declare %q4rwz[1640] := (-1)
|
|
declare %3hbq2[82] := (-1)
|
|
declare %qnt5w[24] := (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23)
|
|
declare %plcoy[24] := (-11, -11, -14, -14, -13, -13, -14, -14, -19, -14, -18, -21, -15, -14, -11, -11, -11, -11, -21, -14, -19, -18, -18, -18)
|
|
declare %bnygy[24] := (0, 1, 14, 15, 16, 17, 2, 3, 4, 5, 6, 7, 8, 10, 11, 13, 22, 9, 21, 12, 19, 20, 18, 23)
|
|
declare $1bi4b
|
|
declare $3yie0
|
|
declare %laljf[8192]
|
|
declare %5ggz3[256]
|
|
declare %asdef[256]
|
|
declare %w1vde[256]
|
|
declare %ilm5d[256]
|
|
declare %c1kc4[256]
|
|
declare %jnhix[256]
|
|
declare %gvnxp[256]
|
|
declare %oy5fa[256]
|
|
declare %45gob[256]
|
|
declare %eehid[16]
|
|
declare %a31v5[16]
|
|
declare %2zfuu[16]
|
|
declare %vftan[128]
|
|
declare $yrh4w
|
|
declare %z3n3e[16]
|
|
declare $ga54u
|
|
declare %ppvim[24]
|
|
make_persistent(%ppvim)
|
|
declare %qum0u[24]
|
|
declare %h1b0t[24]
|
|
declare $y3puj := 1
|
|
declare $meuyq := 0
|
|
declare $4ggtc := 1
|
|
declare $bh4s5 := 0
|
|
declare $wkxzh
|
|
declare $bctbb := -1
|
|
declare %nwcvz[4] := (0, 1, 2, 3)
|
|
declare !b5nul[4]
|
|
!b5nul[0] := "First"
|
|
!b5nul[1] := "Every"
|
|
!b5nul[2] := "Highest"
|
|
!b5nul[3] := "Lowest"
|
|
declare $qbqpm
|
|
declare ui_menu $zdrta
|
|
make_persistent($zdrta)
|
|
set_control_par_str(get_ui_id($zdrta),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
add_menu_item($zdrta,!b5nul[$fg4rw] & " Note",%nwcvz[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
%xwg5s[600] := get_ui_id($zdrta)
|
|
%cqg2m[60] := 16
|
|
declare %oktyv[6] := (4, 5, 12, 19, 20, 23)
|
|
declare %s0rie[10] := (12, 10, 4, 5, 13, 19, 9, 21, 22, 23)
|
|
declare %45suw[7] := (6, 7, 2, 3, 8, 4, 5)
|
|
declare %tjjl2[7] := (0, 1, 11, 14, 15, 16, 17)
|
|
declare %vzkyc[24]
|
|
declare %o4h4i[24]
|
|
declare !flm4j[24]
|
|
!flm4j[0] := "X"
|
|
!flm4j[1] := "Y"
|
|
!flm4j[2] := "S1"
|
|
!flm4j[3] := "S2"
|
|
!flm4j[4] := "L1"
|
|
!flm4j[5] := "L2"
|
|
!flm4j[6] := "B1"
|
|
!flm4j[7] := "B2"
|
|
!flm4j[8] := "SUM"
|
|
!flm4j[9] := "AT"
|
|
!flm4j[10] := "Vel"
|
|
!flm4j[11] := "LVel"
|
|
!flm4j[12] := "Dur"
|
|
!flm4j[13] := "KT"
|
|
!flm4j[14] := "A"
|
|
!flm4j[15] := "B"
|
|
!flm4j[16] := "C"
|
|
!flm4j[17] := "D"
|
|
!flm4j[18] := "Max"
|
|
!flm4j[19] := "RL"
|
|
!flm4j[20] := "Arp"
|
|
!flm4j[21] := "SLD"
|
|
!flm4j[22] := "RND"
|
|
!flm4j[23] := "POS"
|
|
declare !bw1t3[24]
|
|
!bw1t3[0] := "X XY Pad"
|
|
!bw1t3[1] := "Y XY Pad"
|
|
!bw1t3[2] := "S1 Shaper"
|
|
!bw1t3[3] := "S2 Shaper"
|
|
!bw1t3[4] := "L1 LFO"
|
|
!bw1t3[5] := "L2 LFO"
|
|
!bw1t3[6] := "B1 Matrix Bus"
|
|
!bw1t3[7] := "B2 Matrix Bus"
|
|
!bw1t3[8] := "SUM Matrix Sum"
|
|
!bw1t3[9] := "AT Aftertouch"
|
|
!bw1t3[10] := "VEL Velocity"
|
|
!bw1t3[11] := "LVEL Last Velocity"
|
|
!bw1t3[12] := "DU Duration"
|
|
!bw1t3[13] := "KT Key Tracking"
|
|
!bw1t3[14] := "A Macro"
|
|
!bw1t3[15] := "B Macro"
|
|
!bw1t3[16] := "C Macro"
|
|
!bw1t3[17] := "D Macro"
|
|
!bw1t3[18] := "MAX Constant"
|
|
!bw1t3[19] := "RL Release"
|
|
!bw1t3[20] := "ARP Modulator"
|
|
!bw1t3[21] := "SLD MPE Slide"
|
|
!bw1t3[22] := "RND Key Random"
|
|
!bw1t3[23] := "POS Cursor Position"
|
|
declare %prryo[24] := (200, 200, 20, 20, 50, 50, 10, 10, 15, 40, 40, 10, 15, 10, 0, 0, 0, 0, 0, 0, 20, 0, 20, 0)
|
|
declare %ludky[690]
|
|
declare %zpgb5[720]
|
|
$y3mgr := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<24)
|
|
if ($fg4rw # 10)
|
|
$g5k3r := 0
|
|
while ($g5k3r<%prryo[$fg4rw])
|
|
%ludky[$y3mgr] := $fg4rw
|
|
inc($y3mgr)
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
$y3mgr := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<24)
|
|
if ($fg4rw # 11)
|
|
$g5k3r := 0
|
|
while ($g5k3r<%prryo[$fg4rw])
|
|
%zpgb5[$y3mgr] := $fg4rw
|
|
inc($y3mgr)
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<24)
|
|
if (search(%s0rie,%qnt5w[$fg4rw])=-1)
|
|
%vzkyc[$fg4rw] := 0
|
|
else
|
|
%vzkyc[$fg4rw] := 1
|
|
end if
|
|
if (search(%oktyv,%qnt5w[$fg4rw])=-1)
|
|
%o4h4i[$fg4rw] := 0
|
|
else
|
|
%o4h4i[$fg4rw] := 1
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_slider $3tqoo(-1000, 1000)
|
|
make_persistent($3tqoo)
|
|
declare ui_slider $yexen(-2001, 2001)
|
|
make_persistent($yexen)
|
|
set_control_par_str(get_ui_id($yexen),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $zi2jx
|
|
make_persistent($zi2jx)
|
|
set_control_par_str(get_ui_id($zi2jx),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($zi2jx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($zi2jx),search(%bnygy,11),0)
|
|
$upapg := 0
|
|
%n34di[$upapg] := get_ui_id($zi2jx)
|
|
%nwlgb[$upapg] := get_ui_id($yexen)
|
|
!4gjzd[0] := "_5"
|
|
%c1qym[0] := get_ui_id($yexen)
|
|
%41o3s[0] := get_ui_id($3tqoo)
|
|
declare ui_label $him5m(1, 1)
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[0] := get_ui_id($him5m)
|
|
declare ui_label $zhici(1, 1)
|
|
set_control_par_str(get_ui_id($zhici),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zhici),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[0] := get_ui_id($zhici)
|
|
declare ui_label $q0mzv(1, 1)
|
|
set_control_par_str(get_ui_id($q0mzv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($q0mzv),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($q0mzv),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[0] := get_ui_id($q0mzv)
|
|
%qxmpr[0] := 2001
|
|
%oazdd[0] := 10
|
|
!gh3f0[0] := "%"
|
|
?rylw5[0] := 1.0
|
|
%q4mzh[0] := -1
|
|
%vc4gu[0] := 100000
|
|
%hpc0e[0] := -1
|
|
%eujmz[0] := -1
|
|
%fogcg[0] := 0
|
|
%5zak5[0] := 0
|
|
%dwdw3[0] := -1000
|
|
%sbnwu[0] := 1000
|
|
%jeswc[0] := 330
|
|
%mnk53[0] := 40
|
|
declare %mwgv5[10] := (get_ui_id($3tqoo), get_ui_id($yexen), get_ui_id($him5m), get_ui_id($zhici), get_ui_id($q0mzv), get_ui_id($zi2jx), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%mwgv5))
|
|
%xwg5s[400+$g5k3r] := %mwgv5[$g5k3r]
|
|
%cqg2m[40] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_switch $3k3u2
|
|
make_persistent($3k3u2)
|
|
read_persistent_var($3k3u2)
|
|
set_control_par_str(get_ui_id($3k3u2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3k3u2),$CONTROL_PAR_PICTURE,"MTX_ant_mode_sw")
|
|
declare ui_switch $ttvix
|
|
make_persistent($ttvix)
|
|
read_persistent_var($ttvix)
|
|
set_control_par_str(get_ui_id($ttvix),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ttvix),$CONTROL_PAR_PICTURE,"GE_MTX_BI_POL_BTN")
|
|
declare ui_switch $hj1x4
|
|
make_persistent($hj1x4)
|
|
read_persistent_var($hj1x4)
|
|
set_control_par_str(get_ui_id($hj1x4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hj1x4),$CONTROL_PAR_PICTURE,"GE_MTX_BI_POL_BTN")
|
|
declare ui_slider $gehcz(-1000, 1000)
|
|
make_persistent($gehcz)
|
|
set_control_par_str(get_ui_id($gehcz),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
|
|
declare ui_slider $0qzrr(-1000, 1000)
|
|
make_persistent($0qzrr)
|
|
set_control_par_str(get_ui_id($0qzrr),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
|
|
declare ui_menu $1fo5x
|
|
make_persistent($1fo5x)
|
|
set_control_par_str(get_ui_id($1fo5x),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($1fo5x,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($1fo5x),search(%bnygy,11),0)
|
|
$upapg := 1
|
|
%n34di[$upapg] := get_ui_id($1fo5x)
|
|
%nwlgb[$upapg] := $3k3u2*get_ui_id($gehcz)+((.not. $3k3u2 .and. 1)*get_ui_id($3tqoo))
|
|
declare ui_slider $1tszb(-1000, 1000)
|
|
make_persistent($1tszb)
|
|
declare ui_slider $v1jgb(-2001, 2001)
|
|
make_persistent($v1jgb)
|
|
set_control_par_str(get_ui_id($v1jgb),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $gxopj
|
|
make_persistent($gxopj)
|
|
set_control_par_str(get_ui_id($gxopj),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($gxopj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($gxopj),search(%bnygy,11),0)
|
|
$upapg := 2
|
|
%n34di[$upapg] := get_ui_id($gxopj)
|
|
%nwlgb[$upapg] := get_ui_id($v1jgb)
|
|
!4gjzd[2] := "_5"
|
|
%c1qym[2] := get_ui_id($v1jgb)
|
|
%41o3s[2] := get_ui_id($1tszb)
|
|
declare ui_label $twgeq(1, 1)
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[2] := get_ui_id($twgeq)
|
|
declare ui_label $gnppc(1, 1)
|
|
set_control_par_str(get_ui_id($gnppc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($gnppc),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[2] := get_ui_id($gnppc)
|
|
declare ui_label $ddcxd(1, 1)
|
|
set_control_par_str(get_ui_id($ddcxd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ddcxd),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($ddcxd),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[2] := get_ui_id($ddcxd)
|
|
%qxmpr[2] := 2001
|
|
%oazdd[2] := 10
|
|
!gh3f0[2] := "%"
|
|
?rylw5[2] := 1.0
|
|
%q4mzh[2] := -1
|
|
%vc4gu[2] := 100000
|
|
%hpc0e[2] := -1
|
|
%eujmz[2] := -1
|
|
%fogcg[2] := 0
|
|
%5zak5[2] := 0
|
|
%dwdw3[2] := -1000
|
|
%sbnwu[2] := 1000
|
|
%jeswc[2] := 335
|
|
%mnk53[2] := 41
|
|
declare %ettog[10] := (get_ui_id($1tszb), get_ui_id($v1jgb), get_ui_id($twgeq), get_ui_id($gnppc), get_ui_id($ddcxd), get_ui_id($gxopj), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ettog))
|
|
%xwg5s[410+$g5k3r] := %ettog[$g5k3r]
|
|
%cqg2m[41] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_switch $13ap0
|
|
make_persistent($13ap0)
|
|
read_persistent_var($13ap0)
|
|
set_control_par_str(get_ui_id($13ap0),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($13ap0),$CONTROL_PAR_PICTURE,"MTX_ant_mode_sw")
|
|
declare ui_slider $ihtwl(-1000, 1000)
|
|
make_persistent($ihtwl)
|
|
set_control_par_str(get_ui_id($ihtwl),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
|
|
declare ui_slider $pzeed(-1000, 1000)
|
|
make_persistent($pzeed)
|
|
set_control_par_str(get_ui_id($pzeed),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
|
|
declare ui_menu $z1x5e
|
|
make_persistent($z1x5e)
|
|
set_control_par_str(get_ui_id($z1x5e),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($z1x5e,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($z1x5e),search(%bnygy,11),0)
|
|
$upapg := 3
|
|
%n34di[$upapg] := get_ui_id($z1x5e)
|
|
%nwlgb[$upapg] := $13ap0*get_ui_id($ihtwl)+((.not. $13ap0 .and. 1)*get_ui_id($1tszb))
|
|
declare ui_label $dfysh(1, 1)
|
|
set_control_par_str(get_ui_id($dfysh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dfysh),$CONTROL_PAR_PICTURE,"GE_mod_bus_level_meter")
|
|
declare ui_label $p0xv1(1, 1)
|
|
set_control_par_str(get_ui_id($p0xv1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE,"GE_mod_bus_level_meter")
|
|
declare ui_label $ako01(1, 1)
|
|
set_control_par_str(get_ui_id($ako01),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ako01),$CONTROL_PAR_PICTURE,"GE_mod_bus_level_meter")
|
|
$g5k3r := 0
|
|
while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[400+$g5k3r] := get_ui_id($gehcz)
|
|
$g5k3r := 0
|
|
while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[400+$g5k3r] := get_ui_id($0qzrr)
|
|
$g5k3r := 0
|
|
while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[400+$g5k3r] := get_ui_id($ttvix)
|
|
$g5k3r := 0
|
|
while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[410+$g5k3r] := get_ui_id($ihtwl)
|
|
$g5k3r := 0
|
|
while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[410+$g5k3r] := get_ui_id($pzeed)
|
|
$g5k3r := 0
|
|
while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[410+$g5k3r] := get_ui_id($hj1x4)
|
|
declare %wqpwq[7] := (get_ui_id($1fo5x), get_ui_id($z1x5e), get_ui_id($dfysh), get_ui_id($p0xv1), get_ui_id($3k3u2), get_ui_id($13ap0), get_ui_id($ako01))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%wqpwq))
|
|
%xwg5s[680+$g5k3r] := %wqpwq[$g5k3r]
|
|
%cqg2m[68] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_table %w0xec[128](3, 3, 1000)
|
|
make_persistent(%w0xec)
|
|
set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_BAR_COLOR,7960953)
|
|
set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_ZERO_LINE_COLOR,7960953)
|
|
set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
declare ui_menu $ytzwi
|
|
make_persistent($ytzwi)
|
|
read_persistent_var($ytzwi)
|
|
set_control_par_str(get_ui_id($ytzwi),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
|
|
add_menu_item($ytzwi,"Interpolation",-1)
|
|
add_menu_item($ytzwi," Quant ",0)
|
|
add_menu_item($ytzwi," Linear ",1)
|
|
add_menu_item($ytzwi," Ease In Out ",2)
|
|
add_menu_item($ytzwi,"Functions",3)
|
|
add_menu_item($ytzwi," Fill Expo 1.5",4)
|
|
add_menu_item($ytzwi," Fill Expo 3",5)
|
|
add_menu_item($ytzwi," Fill Expo 4.5",6)
|
|
add_menu_item($ytzwi," Fill Expo 6",7)
|
|
add_menu_item($ytzwi," Reverse",8)
|
|
add_menu_item($ytzwi," +10%",12)
|
|
add_menu_item($ytzwi," -10%",13)
|
|
add_menu_item($ytzwi," Invert",14)
|
|
add_menu_item($ytzwi," Quantize 12",9)
|
|
add_menu_item($ytzwi," Shift 1/4",10)
|
|
add_menu_item($ytzwi," Shift 1/2",11)
|
|
add_menu_item($ytzwi," Random",15)
|
|
add_menu_item($ytzwi," Smooth",16)
|
|
add_menu_item($ytzwi," Smooth Wrap",17)
|
|
declare $uh2d4
|
|
$uh2d4 := $ytzwi
|
|
declare ui_value_edit $gllpo(2, 128, 1)
|
|
make_persistent($gllpo)
|
|
read_persistent_var($gllpo)
|
|
set_table_steps_shown(%w0xec,$gllpo)
|
|
set_control_par_str(get_ui_id($gllpo),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($gllpo),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_label $paonj(1, 1)
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
declare ~zxkmy
|
|
~zxkmy := 256.0/int_to_real($gllpo)
|
|
set_control_par_str(get_ui_id($paonj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($paonj),$CONTROL_PAR_PICTURE,"GE_Seq_Cursor")
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_Z_LAYER,1)
|
|
declare ui_menu $cvjhr
|
|
make_persistent($cvjhr)
|
|
set_control_par_str(get_ui_id($cvjhr),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($cvjhr,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($cvjhr),search(%bnygy,11),0)
|
|
$upapg := 4
|
|
%n34di[$upapg] := get_ui_id($cvjhr)
|
|
%nwlgb[$upapg] := -1
|
|
set_menu_item_visibility(get_ui_id($cvjhr),search(%bnygy,2),0)
|
|
declare %tw2nn[5] := (get_ui_id(%w0xec), get_ui_id($ytzwi), get_ui_id($gllpo), get_ui_id($paonj), get_ui_id($cvjhr))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%tw2nn))
|
|
%xwg5s[420+$g5k3r] := %tw2nn[$g5k3r]
|
|
%cqg2m[42] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_table %rzzs4[128](3, 3, 1000)
|
|
make_persistent(%rzzs4)
|
|
set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_BAR_COLOR,7960953)
|
|
set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_ZERO_LINE_COLOR,7960953)
|
|
set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
declare ui_menu $f3u5d
|
|
make_persistent($f3u5d)
|
|
read_persistent_var($f3u5d)
|
|
set_control_par_str(get_ui_id($f3u5d),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
|
|
add_menu_item($f3u5d,"Interpolation",-1)
|
|
add_menu_item($f3u5d," Quant ",0)
|
|
add_menu_item($f3u5d," Linear ",1)
|
|
add_menu_item($f3u5d," Ease In Out ",2)
|
|
add_menu_item($f3u5d,"Functions",3)
|
|
add_menu_item($f3u5d," Fill Expo 1.5",4)
|
|
add_menu_item($f3u5d," Fill Expo 3",5)
|
|
add_menu_item($f3u5d," Fill Expo 4.5",6)
|
|
add_menu_item($f3u5d," Fill Expo 6",7)
|
|
add_menu_item($f3u5d," Reverse",8)
|
|
add_menu_item($f3u5d," +10%",12)
|
|
add_menu_item($f3u5d," -10%",13)
|
|
add_menu_item($f3u5d," Invert",14)
|
|
add_menu_item($f3u5d," Quantize 12",9)
|
|
add_menu_item($f3u5d," Shift 1/4",10)
|
|
add_menu_item($f3u5d," Shift 1/2",11)
|
|
add_menu_item($f3u5d," Random",15)
|
|
add_menu_item($f3u5d," Smooth",16)
|
|
add_menu_item($f3u5d," Smooth Wrap",17)
|
|
declare $0zmjz
|
|
$0zmjz := $f3u5d
|
|
declare ui_value_edit $hn35i(2, 128, 1)
|
|
make_persistent($hn35i)
|
|
read_persistent_var($hn35i)
|
|
set_table_steps_shown(%rzzs4,$hn35i)
|
|
set_control_par_str(get_ui_id($hn35i),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hn35i),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_label $qnejb(1, 1)
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
declare ~c2vo0
|
|
~c2vo0 := 256.0/int_to_real($hn35i)
|
|
set_control_par_str(get_ui_id($qnejb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qnejb),$CONTROL_PAR_PICTURE,"GE_Seq_Cursor")
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_Z_LAYER,1)
|
|
declare ui_menu $fpvgj
|
|
make_persistent($fpvgj)
|
|
set_control_par_str(get_ui_id($fpvgj),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($fpvgj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($fpvgj),search(%bnygy,11),0)
|
|
$upapg := 5
|
|
%n34di[$upapg] := get_ui_id($fpvgj)
|
|
%nwlgb[$upapg] := -1
|
|
set_menu_item_visibility(get_ui_id($fpvgj),search(%bnygy,3),0)
|
|
declare %4osbd[5] := (get_ui_id(%rzzs4), get_ui_id($f3u5d), get_ui_id($hn35i), get_ui_id($qnejb), get_ui_id($fpvgj))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4osbd))
|
|
%xwg5s[430+$g5k3r] := %4osbd[$g5k3r]
|
|
%cqg2m[43] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare %2piom[128]
|
|
declare $m12vk
|
|
declare $5vbbt
|
|
declare ui_button $oov5z
|
|
make_instr_persistent($oov5z)
|
|
set_control_par_str(get_ui_id($oov5z),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($oov5z),$CONTROL_PAR_PICTURE,"GE_SHP_select_btn")
|
|
$g5k3r := 0
|
|
while (%xwg5s[420+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[420+$g5k3r] := get_ui_id($oov5z)
|
|
declare ui_button $xaqda
|
|
set_control_par_str(get_ui_id($xaqda),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($xaqda),$CONTROL_PAR_PICTURE,"GE_SHP_smooth_btn")
|
|
$g5k3r := 0
|
|
while (%xwg5s[420+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[420+$g5k3r] := get_ui_id($xaqda)
|
|
declare $oj0wr
|
|
set_listener($NI_SIGNAL_TIMER_BEAT,16)
|
|
declare %krazg[32]
|
|
declare ui_label $z254v(1, 1)
|
|
declare ui_label $ckwyw(1, 1)
|
|
declare ui_label $i5ovs(1, 1)
|
|
declare ui_label $1efoq(1, 1)
|
|
declare ui_label $xpm1z(1, 1)
|
|
declare ui_label $epx5p(1, 1)
|
|
declare ui_label $dcxek(1, 1)
|
|
declare ui_label $odl43(1, 1)
|
|
declare ui_label $i1jy5(1, 1)
|
|
declare ui_label $msnpv(1, 1)
|
|
declare ui_label $kfbps(1, 1)
|
|
declare ui_label $v1gmo(1, 1)
|
|
declare ui_label $0xi4w(1, 1)
|
|
declare ui_label $gymbq(1, 1)
|
|
declare ui_label $htfgx(1, 1)
|
|
declare ui_label $2sbod(1, 1)
|
|
declare ui_label $ef5b2(1, 1)
|
|
declare ui_label $un24p(1, 1)
|
|
declare ui_label $hjefy(1, 1)
|
|
declare ui_label $pq24s(1, 1)
|
|
declare ui_label $qyonu(1, 1)
|
|
declare ui_label $laxmc(1, 1)
|
|
declare ui_label $2ic4d(1, 1)
|
|
declare ui_label $deaut(1, 1)
|
|
declare ui_label $cqfrg(1, 1)
|
|
declare ui_label $2updq(1, 1)
|
|
declare ui_label $hrsac(1, 1)
|
|
declare ui_label $zplrx(1, 1)
|
|
declare ui_label $5wg3g(1, 1)
|
|
declare ui_label $trdik(1, 1)
|
|
declare ui_label $mand4(1, 1)
|
|
declare ui_label $ccc2y(1, 1)
|
|
$pvuhq := 0
|
|
while ($pvuhq<=31)
|
|
%krazg[$pvuhq] := get_ui_id($z254v)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<32)
|
|
set_control_par_str(%krazg[$fg4rw],$CONTROL_PAR_PICTURE,"GE_GATER_INIDICATOR_LBL")
|
|
set_control_par_str(%krazg[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par(%krazg[$fg4rw],$CONTROL_PAR_Z_LAYER,1)
|
|
set_control_par(%krazg[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($fg4rw)
|
|
end while
|
|
declare @df1fd
|
|
@df1fd := "/GATER/"
|
|
declare $v2ky0
|
|
declare $qscu5
|
|
declare $3qz3a
|
|
declare $ejy35
|
|
declare %fxqnu[5] := (36, 676, 676, 36, 36)
|
|
declare %lfbyb[32]
|
|
make_persistent(%lfbyb)
|
|
declare %bswku[32]
|
|
make_persistent(%bswku)
|
|
declare %t40az[32]
|
|
make_persistent(%t40az)
|
|
declare ui_table %qysah[32](3, 3, 1000)
|
|
make_persistent(%qysah)
|
|
set_control_par(get_ui_id(%qysah),$CONTROL_PAR_BAR_COLOR,2044730)
|
|
set_control_par(get_ui_id(%qysah),$CONTROL_PAR_ZERO_LINE_COLOR,2044730)
|
|
declare ui_button $i3fbq
|
|
make_instr_persistent($i3fbq)
|
|
set_control_par_str(get_ui_id($i3fbq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($i3fbq),$CONTROL_PAR_PICTURE,"GE_A_B_btn")
|
|
declare ui_menu $c1dov
|
|
set_control_par_str(get_ui_id($c1dov),$CONTROL_PAR_PICTURE,"GE_MENU_DOTS")
|
|
set_control_par(get_ui_id($c1dov),$CONTROL_PAR_TEXTPOS_Y,20)
|
|
add_menu_item($c1dov,"Copy A > B",0)
|
|
add_menu_item($c1dov,"Copy B > A",1)
|
|
add_menu_item($c1dov,"Copy Morph > A",2)
|
|
add_menu_item($c1dov,"Copy Morph > B",3)
|
|
add_menu_item($c1dov,"Swap A <> B",4)
|
|
add_menu_item($c1dov,"Double Resolution",5)
|
|
add_menu_item($c1dov,"Halven Resolution",6)
|
|
add_menu_item($c1dov,"Randomize",7)
|
|
declare $zgcke
|
|
declare $fojqp
|
|
declare $5jkam
|
|
declare ui_menu $qxgdn
|
|
make_persistent($qxgdn)
|
|
set_control_par_str(get_ui_id($qxgdn),$CONTROL_PAR_PICTURE,"blank")
|
|
add_menu_item($qxgdn,"1/4",16)
|
|
add_menu_item($qxgdn,"1/8",8)
|
|
add_menu_item($qxgdn,"1/16",4)
|
|
add_menu_item($qxgdn,"1/32",2)
|
|
add_menu_item($qxgdn,"1/64",1)
|
|
declare ui_value_edit $ilpk2(2, 32, 1)
|
|
make_persistent($ilpk2)
|
|
set_control_par_str(get_ui_id($ilpk2),$CONTROL_PAR_TEXT,"Size")
|
|
set_control_par_str(get_ui_id($ilpk2),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($ilpk2),$CONTROL_PAR_SHOW_ARROWS,0)
|
|
declare ui_label $t4lmn(1, 1)
|
|
set_control_par_str(get_ui_id($t4lmn),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($t4lmn),$CONTROL_PAR_PICTURE,"GE_GATER_POS")
|
|
set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_Z_LAYER,1)
|
|
declare %stepper__preset_vals[66]
|
|
declare ui_button $3f4bh
|
|
set_control_par_str(get_ui_id($3f4bh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3f4bh),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
|
|
declare ui_button $bryp1
|
|
set_control_par_str(get_ui_id($bryp1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($bryp1),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
|
|
declare ~z3izd
|
|
declare ui_menu $jiutx
|
|
make_persistent($jiutx)
|
|
set_control_par_str(get_ui_id($jiutx),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($jiutx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($jiutx),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 6
|
|
%n34di[$upapg] := get_ui_id($jiutx)
|
|
%nwlgb[$upapg] := -1
|
|
declare %v5b5r[9] := (get_ui_id(%qysah), get_ui_id($qxgdn), get_ui_id($ilpk2), get_ui_id($t4lmn), get_ui_id($jiutx), get_ui_id($i3fbq), get_ui_id($c1dov), get_ui_id($bryp1), get_ui_id($3f4bh))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%v5b5r))
|
|
%xwg5s[270+$g5k3r] := %v5b5r[$g5k3r]
|
|
%cqg2m[27] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare %iv2n3[5] := (0, 1, 0, 0, 1)
|
|
declare ui_slider $zktrd(1, 1500)
|
|
make_persistent($zktrd)
|
|
declare ui_slider $2zugt(-1500, 1500)
|
|
make_persistent($2zugt)
|
|
set_control_par_str(get_ui_id($2zugt),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $vas4o
|
|
make_persistent($vas4o)
|
|
set_control_par_str(get_ui_id($vas4o),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($vas4o,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($vas4o),search(%bnygy,11),0)
|
|
$upapg := 7
|
|
%n34di[$upapg] := get_ui_id($vas4o)
|
|
%nwlgb[$upapg] := get_ui_id($2zugt)
|
|
!4gjzd[7] := "_5"
|
|
%c1qym[7] := get_ui_id($2zugt)
|
|
%41o3s[7] := get_ui_id($zktrd)
|
|
declare ui_label $hfyob(1, 1)
|
|
set_control_par_str(get_ui_id($hfyob),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hfyob),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[7] := get_ui_id($hfyob)
|
|
declare ui_label $lr2pv(1, 1)
|
|
set_control_par_str(get_ui_id($lr2pv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($lr2pv),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[7] := get_ui_id($lr2pv)
|
|
declare ui_label $bgobj(1, 1)
|
|
set_control_par_str(get_ui_id($bgobj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($bgobj),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($bgobj),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[7] := get_ui_id($bgobj)
|
|
%qxmpr[7] := 1499
|
|
%oazdd[7] := 100
|
|
!gh3f0[7] := "Hz"
|
|
?rylw5[7] := 3.0
|
|
%q4mzh[7] := -1
|
|
%vc4gu[7] := 100000
|
|
%hpc0e[7] := -1
|
|
%eujmz[7] := -1
|
|
%fogcg[7] := 0
|
|
%5zak5[7] := 0
|
|
%dwdw3[7] := 1
|
|
%sbnwu[7] := 1500
|
|
%jeswc[7] := 310
|
|
%mnk53[7] := 38
|
|
declare %lywxl[10] := (get_ui_id($zktrd), get_ui_id($2zugt), get_ui_id($hfyob), get_ui_id($lr2pv), get_ui_id($bgobj), get_ui_id($vas4o), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%lywxl))
|
|
%xwg5s[380+$g5k3r] := %lywxl[$g5k3r]
|
|
%cqg2m[38] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_menu $doz2m
|
|
make_persistent($doz2m)
|
|
add_menu_item($doz2m,"Sine",0)
|
|
add_menu_item($doz2m,"Triangle",1)
|
|
add_menu_item($doz2m,"Square",7)
|
|
add_menu_item($doz2m,"Ramp up",2)
|
|
add_menu_item($doz2m,"Ramp dn",3)
|
|
add_menu_item($doz2m,"Random",4)
|
|
add_menu_item($doz2m,"Seek 1",5)
|
|
add_menu_item($doz2m,"Seek 2",6)
|
|
set_control_par_str(get_ui_id($doz2m),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
|
|
declare ui_menu $e2mne
|
|
make_persistent($e2mne)
|
|
add_menu_item($e2mne,"Free ",0)
|
|
add_menu_item($e2mne,"First ",1)
|
|
add_menu_item($e2mne,"Retr ",2)
|
|
add_menu_item($e2mne,"Once ",3)
|
|
add_menu_item($e2mne,"1st 1x ",4)
|
|
set_control_par_str(get_ui_id($e2mne),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
|
|
set_control_par(get_ui_id($e2mne),$CONTROL_PAR_FONT_TYPE,2)
|
|
set_control_par(get_ui_id($e2mne),$CONTROL_PAR_TEXT_ALIGNMENT,0)
|
|
declare ui_switch $l4ujc
|
|
make_persistent($l4ujc)
|
|
set_control_par_str(get_ui_id($l4ujc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($l4ujc),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_1")
|
|
declare ui_label $zcuf4(1, 1)
|
|
set_control_par_str(get_ui_id($zcuf4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE,"GE_LFO_WAVES")
|
|
declare ui_slider $rj2yq(0, 360)
|
|
make_persistent($rj2yq)
|
|
set_control_par_str(get_ui_id($rj2yq),$CONTROL_PAR_PICTURE,"GE_LFO_Phase_Offset_slider")
|
|
%xwg5s[1480] := get_ui_id($rj2yq)
|
|
%cqg2m[148] := 16
|
|
declare $a2nqk
|
|
declare ?lrdg1[256]
|
|
declare ?2bxj3[256]
|
|
declare %hqihq[256]
|
|
declare %icfc1[256]
|
|
declare %105bp[256]
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%105bp))
|
|
%105bp[$kyxij] := random(0,1000)
|
|
inc($kyxij)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[380+$g5k3r] := get_ui_id($doz2m)
|
|
$g5k3r := 0
|
|
while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[380+$g5k3r] := get_ui_id($e2mne)
|
|
$g5k3r := 0
|
|
while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[380+$g5k3r] := get_ui_id($l4ujc)
|
|
$g5k3r := 0
|
|
while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[380+$g5k3r] := get_ui_id($zcuf4)
|
|
declare ui_slider $sseum(1, 1500)
|
|
make_persistent($sseum)
|
|
declare ui_slider $bi544(-1500, 1500)
|
|
make_persistent($bi544)
|
|
set_control_par_str(get_ui_id($bi544),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $y3s33
|
|
make_persistent($y3s33)
|
|
set_control_par_str(get_ui_id($y3s33),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($y3s33,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($y3s33),search(%bnygy,11),0)
|
|
$upapg := 8
|
|
%n34di[$upapg] := get_ui_id($y3s33)
|
|
%nwlgb[$upapg] := get_ui_id($bi544)
|
|
!4gjzd[8] := "_5"
|
|
%c1qym[8] := get_ui_id($bi544)
|
|
%41o3s[8] := get_ui_id($sseum)
|
|
declare ui_label $kjihf(1, 1)
|
|
set_control_par_str(get_ui_id($kjihf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($kjihf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[8] := get_ui_id($kjihf)
|
|
declare ui_label $d40fx(1, 1)
|
|
set_control_par_str(get_ui_id($d40fx),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($d40fx),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[8] := get_ui_id($d40fx)
|
|
declare ui_label $cr2dl(1, 1)
|
|
set_control_par_str(get_ui_id($cr2dl),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cr2dl),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($cr2dl),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[8] := get_ui_id($cr2dl)
|
|
%qxmpr[8] := 1499
|
|
%oazdd[8] := 100
|
|
!gh3f0[8] := "Hz"
|
|
?rylw5[8] := 3.0
|
|
%q4mzh[8] := -1
|
|
%vc4gu[8] := 100000
|
|
%hpc0e[8] := -1
|
|
%eujmz[8] := -1
|
|
%fogcg[8] := 0
|
|
%5zak5[8] := 0
|
|
%dwdw3[8] := 1
|
|
%sbnwu[8] := 1500
|
|
%jeswc[8] := 320
|
|
%mnk53[8] := 39
|
|
declare %bivvl[10] := (get_ui_id($sseum), get_ui_id($bi544), get_ui_id($kjihf), get_ui_id($d40fx), get_ui_id($cr2dl), get_ui_id($y3s33), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%bivvl))
|
|
%xwg5s[390+$g5k3r] := %bivvl[$g5k3r]
|
|
%cqg2m[39] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_menu $1wrdd
|
|
make_persistent($1wrdd)
|
|
add_menu_item($1wrdd,"Sine",0)
|
|
add_menu_item($1wrdd,"Triangle",1)
|
|
add_menu_item($1wrdd,"Square",7)
|
|
add_menu_item($1wrdd,"Ramp up",2)
|
|
add_menu_item($1wrdd,"Ramp dn",3)
|
|
add_menu_item($1wrdd,"Random",4)
|
|
add_menu_item($1wrdd,"Seek 1",5)
|
|
add_menu_item($1wrdd,"Seek 2",6)
|
|
set_control_par_str(get_ui_id($1wrdd),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
|
|
declare ui_menu $eu0kx
|
|
make_persistent($eu0kx)
|
|
add_menu_item($eu0kx,"Free ",0)
|
|
add_menu_item($eu0kx,"First ",1)
|
|
add_menu_item($eu0kx,"Retr ",2)
|
|
add_menu_item($eu0kx,"Once ",3)
|
|
add_menu_item($eu0kx,"1st 1x ",4)
|
|
set_control_par_str(get_ui_id($eu0kx),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
|
|
set_control_par(get_ui_id($eu0kx),$CONTROL_PAR_FONT_TYPE,2)
|
|
set_control_par(get_ui_id($eu0kx),$CONTROL_PAR_TEXT_ALIGNMENT,0)
|
|
declare ui_switch $x02cl
|
|
make_persistent($x02cl)
|
|
set_control_par_str(get_ui_id($x02cl),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($x02cl),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_1")
|
|
declare ui_label $i5fky(1, 1)
|
|
set_control_par_str(get_ui_id($i5fky),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($i5fky),$CONTROL_PAR_PICTURE,"GE_LFO_WAVES")
|
|
declare ui_slider $s2bg4(0, 360)
|
|
make_persistent($s2bg4)
|
|
set_control_par_str(get_ui_id($s2bg4),$CONTROL_PAR_PICTURE,"GE_LFO_Phase_Offset_slider")
|
|
%xwg5s[1490] := get_ui_id($s2bg4)
|
|
%cqg2m[149] := 16
|
|
declare $xpr4r
|
|
declare ?pu5ib[256]
|
|
declare ?p2rij[256]
|
|
declare %qvhhl[256]
|
|
declare %1cwa0[256]
|
|
declare %igs1h[256]
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%igs1h))
|
|
%igs1h[$kyxij] := random(0,1000)
|
|
inc($kyxij)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[390+$g5k3r] := get_ui_id($1wrdd)
|
|
$g5k3r := 0
|
|
while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[390+$g5k3r] := get_ui_id($eu0kx)
|
|
$g5k3r := 0
|
|
while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[390+$g5k3r] := get_ui_id($x02cl)
|
|
$g5k3r := 0
|
|
while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[390+$g5k3r] := get_ui_id($i5fky)
|
|
declare $jqz2q
|
|
declare ?3nlwo[17] := (-4.0, -2.0, 1.5, -1.0, 0.75, 0.5, 0.375, 0.25, 0.1875, 0.16666666666666666, 0.125, 0.09375, 0.08333333333333333, 0.0625, 0.046875, 0.041666666666666664, 0.03125)
|
|
declare !je2na[17]
|
|
!je2na[0] := "4 Bars"
|
|
!je2na[1] := "2 Bars"
|
|
!je2na[2] := "3/2"
|
|
!je2na[3] := "1 Bar"
|
|
!je2na[4] := "1/2 dot"
|
|
!je2na[5] := "1/2"
|
|
!je2na[6] := "1/4 dot"
|
|
!je2na[7] := "1/4"
|
|
!je2na[8] := "1/8 dot"
|
|
!je2na[9] := "1/4 trip"
|
|
!je2na[10] := "1/8"
|
|
!je2na[11] := "1/16 dot"
|
|
!je2na[12] := "1/8 trip"
|
|
!je2na[13] := "1/16"
|
|
!je2na[14] := "1/32 dot"
|
|
!je2na[15] := "1/16 trip"
|
|
!je2na[16] := "1/32"
|
|
declare ui_xy ?xy[2]
|
|
make_persistent(?xy)
|
|
set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_ID,0,0)
|
|
set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_ID,1,1)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_HELP,"XY Pad: Allows to control the sound of the snapshot in realtime according to modulation assignment for the X and Y paramters. The axis labels give a hint what to expect when moving the cursor. Midi controllers for the XY pad can be assigned on the Master Page.")
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_MOUSE_MODE,2)
|
|
declare $2thol
|
|
make_persistent($2thol)
|
|
declare $jy3sd
|
|
make_persistent($jy3sd)
|
|
declare ui_menu $4ainj
|
|
make_instr_persistent($4ainj)
|
|
declare ui_menu $gcjlt
|
|
make_instr_persistent($gcjlt)
|
|
set_control_par_str(get_ui_id($4ainj),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par_str(get_ui_id($gcjlt),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<=127)
|
|
add_menu_item($4ainj,$fg4rw,$fg4rw)
|
|
add_menu_item($gcjlt,$fg4rw,$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_switch $iyqua
|
|
set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
|
|
declare $qrpdp
|
|
declare ui_switch $otffr
|
|
set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
|
|
declare $euiqi
|
|
declare !xy__axis_lbls[28]
|
|
load_array(!xy__axis_lbls,2)
|
|
declare !xy__axis_lbls_long[28]
|
|
load_array(!xy__axis_lbls_long,2)
|
|
declare ui_menu $siaxq
|
|
make_persistent($siaxq)
|
|
declare ui_menu $yazuk
|
|
make_persistent($yazuk)
|
|
set_control_par_str(get_ui_id($siaxq),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par_str(get_ui_id($yazuk),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_label $ajvki(1, 1)
|
|
set_control_par_str(get_ui_id($ajvki),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ajvki),$CONTROL_PAR_PICTURE,"GE_MACRO_LABELS_1")
|
|
declare ui_label $a4om3(1, 1)
|
|
set_control_par_str(get_ui_id($a4om3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($a4om3),$CONTROL_PAR_PICTURE,"GE_MACRO_LABELS_1")
|
|
declare %ndk2i[1] := (get_ui_id(?xy))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ndk2i))
|
|
%xwg5s[540+$g5k3r] := %ndk2i[$g5k3r]
|
|
%cqg2m[54] := 559
|
|
inc($g5k3r)
|
|
end while
|
|
declare %iqp44[2] := (get_ui_id($siaxq), get_ui_id($yazuk))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%iqp44))
|
|
%xwg5s[550+$g5k3r] := %iqp44[$g5k3r]
|
|
%cqg2m[55] := 521
|
|
inc($g5k3r)
|
|
end while
|
|
declare %egbnj[4] := (get_ui_id($4ainj), get_ui_id($gcjlt), get_ui_id($iyqua), get_ui_id($otffr))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%egbnj))
|
|
%xwg5s[210+$g5k3r] := %egbnj[$g5k3r]
|
|
%cqg2m[21] := 8
|
|
inc($g5k3r)
|
|
end while
|
|
declare %upzwe[2] := (get_ui_id($ajvki), get_ui_id($a4om3))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%upzwe))
|
|
%xwg5s[1400+$g5k3r] := %upzwe[$g5k3r]
|
|
%cqg2m[140] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
add_menu_item($siaxq,"X Axis Label",0)
|
|
add_menu_item($siaxq,"----------------",0)
|
|
add_menu_item($yazuk,"Y Axis Label",0)
|
|
add_menu_item($yazuk,"----------------",0)
|
|
$fg4rw := 0
|
|
while ($fg4rw<%nki_prefs[0])
|
|
add_menu_item($siaxq,!xy__axis_lbls[$fg4rw] & " " & !xy__axis_lbls_long[$fg4rw],$fg4rw)
|
|
add_menu_item($yazuk,!xy__axis_lbls[$fg4rw] & " " & !xy__axis_lbls_long[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_slider $543zt(0, 1000)
|
|
make_persistent($543zt)
|
|
set_control_par(get_ui_id($543zt),$CONTROL_PAR_DEFAULT_VALUE,0)
|
|
set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_PICTURE,"MacroKnob_1")
|
|
set_control_par(get_ui_id($543zt),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
|
|
set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_AUTOMATION_NAME,"A")
|
|
declare ui_menu $uyjwl
|
|
make_persistent($uyjwl)
|
|
set_control_par_str(get_ui_id($uyjwl),$CONTROL_PAR_PICTURE,"blank")
|
|
add_menu_item($uyjwl,"Select Macro Label",-1)
|
|
add_menu_item($uyjwl,"-------------------------",-1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<%nki_prefs[0])
|
|
add_menu_item($uyjwl,!xy__axis_lbls_long[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare $b2o1i := 10
|
|
declare @edixu
|
|
@edixu := "%"
|
|
declare %lhzn1[2] := (get_ui_id($543zt), get_ui_id($uyjwl))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%lhzn1))
|
|
%xwg5s[460+$g5k3r] := %lhzn1[$g5k3r]
|
|
%cqg2m[46] := 1024
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $lynqa(0, 1000)
|
|
make_persistent($lynqa)
|
|
set_control_par(get_ui_id($lynqa),$CONTROL_PAR_DEFAULT_VALUE,0)
|
|
set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_PICTURE,"MacroKnob_1")
|
|
set_control_par(get_ui_id($lynqa),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
|
|
set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_AUTOMATION_NAME,"B")
|
|
declare ui_menu $4so5t
|
|
make_persistent($4so5t)
|
|
set_control_par_str(get_ui_id($4so5t),$CONTROL_PAR_PICTURE,"blank")
|
|
add_menu_item($4so5t,"Select Macro Label",-1)
|
|
add_menu_item($4so5t,"-------------------------",-1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<%nki_prefs[0])
|
|
add_menu_item($4so5t,!xy__axis_lbls_long[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare $pfnw5 := 10
|
|
declare @cxern
|
|
@cxern := "%"
|
|
declare %24ra2[2] := (get_ui_id($lynqa), get_ui_id($4so5t))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%24ra2))
|
|
%xwg5s[470+$g5k3r] := %24ra2[$g5k3r]
|
|
%cqg2m[47] := 1024
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $cbkgv(0, 1000)
|
|
make_persistent($cbkgv)
|
|
set_control_par(get_ui_id($cbkgv),$CONTROL_PAR_DEFAULT_VALUE,0)
|
|
set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_PICTURE,"MacroKnob_1")
|
|
set_control_par(get_ui_id($cbkgv),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
|
|
set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_AUTOMATION_NAME,"C")
|
|
declare ui_menu $q1nql
|
|
make_persistent($q1nql)
|
|
set_control_par_str(get_ui_id($q1nql),$CONTROL_PAR_PICTURE,"blank")
|
|
add_menu_item($q1nql,"Select Macro Label",-1)
|
|
add_menu_item($q1nql,"-------------------------",-1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<%nki_prefs[0])
|
|
add_menu_item($q1nql,!xy__axis_lbls_long[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare $yg3sr := 10
|
|
declare @aqf3u
|
|
@aqf3u := "%"
|
|
declare %zkcx5[2] := (get_ui_id($cbkgv), get_ui_id($q1nql))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zkcx5))
|
|
%xwg5s[480+$g5k3r] := %zkcx5[$g5k3r]
|
|
%cqg2m[48] := 1024
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $cxfv2(0, 1000)
|
|
make_persistent($cxfv2)
|
|
set_control_par(get_ui_id($cxfv2),$CONTROL_PAR_DEFAULT_VALUE,0)
|
|
set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_PICTURE,"MacroKnob_1")
|
|
set_control_par(get_ui_id($cxfv2),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
|
|
set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_AUTOMATION_NAME,"D")
|
|
declare ui_menu $5q4fp
|
|
make_persistent($5q4fp)
|
|
set_control_par_str(get_ui_id($5q4fp),$CONTROL_PAR_PICTURE,"blank")
|
|
add_menu_item($5q4fp,"Select Macro Label",-1)
|
|
add_menu_item($5q4fp,"-------------------------",-1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<%nki_prefs[0])
|
|
add_menu_item($5q4fp,!xy__axis_lbls_long[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare $t3gfg := 10
|
|
declare @3frwb
|
|
@3frwb := "%"
|
|
declare %zsogq[2] := (get_ui_id($cxfv2), get_ui_id($5q4fp))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zsogq))
|
|
%xwg5s[490+$g5k3r] := %zsogq[$g5k3r]
|
|
%cqg2m[49] := 1024
|
|
inc($g5k3r)
|
|
end while
|
|
declare $0tbzw
|
|
declare $5pffj
|
|
declare $mluem
|
|
declare $gcbnc
|
|
declare ~qa2mp
|
|
~qa2mp := int_to_real($DURATION_SIXTEENTH)
|
|
declare ~oukv1
|
|
declare $wgaas
|
|
declare $4vgzm
|
|
declare $upvcm
|
|
declare %2rhz1[128]
|
|
declare $5sroo
|
|
declare $ethxj
|
|
declare $ut1tc
|
|
declare $cej2p
|
|
declare %wwz2v[10] := (128, -1, 128, -1, -1, 128, 128, -1, -1, 1)
|
|
declare $0c1m3
|
|
declare %br0tn[25]
|
|
declare $gbgom
|
|
declare %arp__preset_vals[200]
|
|
declare !arp__preset_names[15]
|
|
load_array_str(!arp__preset_names,@ichwi & "CONFIG/ARP_preset_names.nka")
|
|
declare ui_switch $ruhe4
|
|
make_persistent($ruhe4)
|
|
set_control_par_str(get_ui_id($ruhe4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ruhe4),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_0")
|
|
declare ui_button $hvmxr
|
|
set_control_par_str(get_ui_id($hvmxr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hvmxr),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
|
|
declare ui_button $kbuvs
|
|
set_control_par_str(get_ui_id($kbuvs),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($kbuvs),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
|
|
declare ui_menu $ojboo
|
|
make_persistent($ojboo)
|
|
set_control_par_str(get_ui_id($ojboo),$CONTROL_PAR_PICTURE,"blank")
|
|
$5sroo := 0
|
|
while ($5sroo<15)
|
|
add_menu_item($ojboo,!arp__preset_names[$5sroo],$5sroo)
|
|
inc($5sroo)
|
|
end while
|
|
declare ui_slider $q0o5r(1, 4)
|
|
make_persistent($q0o5r)
|
|
set_control_par(get_ui_id($q0o5r),$CONTROL_PAR_DEFAULT_VALUE,1)
|
|
set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_PICTURE,"GE_ARP_OCT_slider")
|
|
declare ui_button $1p3ww
|
|
set_control_par_str(get_ui_id($1p3ww),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1p3ww),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
|
|
declare ui_button $5dkam
|
|
set_control_par_str(get_ui_id($5dkam),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5dkam),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
|
|
declare ui_menu $0erls
|
|
make_persistent($0erls)
|
|
read_persistent_var($0erls)
|
|
set_control_par_str(get_ui_id($0erls),$CONTROL_PAR_PICTURE,"blank")
|
|
add_menu_item($0erls,"Up",0)
|
|
add_menu_item($0erls,"Down",1)
|
|
add_menu_item($0erls,"Up Down",2)
|
|
add_menu_item($0erls,"As played",3)
|
|
add_menu_item($0erls,"Chord",4)
|
|
add_menu_item($0erls,"Lowest",5)
|
|
add_menu_item($0erls,"Lowest 2",6)
|
|
add_menu_item($0erls,"Highest",7)
|
|
add_menu_item($0erls,"Highest 2",8)
|
|
add_menu_item($0erls,"Highest 3",9)
|
|
declare ui_slider $h2jke(0, 9)
|
|
declare ui_switch $2v40q
|
|
make_persistent($2v40q)
|
|
set_control_par_str(get_ui_id($2v40q),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($2v40q),$CONTROL_PAR_PICTURE,"GE_SKIP_MUTES_btn")
|
|
declare ui_label $z3out(1, 1)
|
|
set_control_par_str(get_ui_id($z3out),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($z3out),$CONTROL_PAR_PICTURE,"GE_ARP_BACKING")
|
|
declare %a5clx[9] := (get_ui_id($ruhe4), get_ui_id($hvmxr), get_ui_id($kbuvs), get_ui_id($ojboo), get_ui_id($0erls), get_ui_id($2v40q), get_ui_id($q0o5r), get_ui_id($h2jke), get_ui_id($z3out))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%a5clx))
|
|
%xwg5s[1430+$g5k3r] := %a5clx[$g5k3r]
|
|
%cqg2m[143] := 2048
|
|
inc($g5k3r)
|
|
end while
|
|
declare %nr1qo[32]
|
|
declare $tp4oa
|
|
declare ui_slider $k5z4u(1, 32)
|
|
make_persistent($k5z4u)
|
|
read_persistent_var($k5z4u)
|
|
set_control_par_str(get_ui_id($k5z4u),$CONTROL_PAR_PICTURE,"GE_ARP_SIZE_slider")
|
|
declare ui_button $ivqya
|
|
make_instr_persistent($ivqya)
|
|
set_control_par_str(get_ui_id($ivqya),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ivqya),$CONTROL_PAR_PICTURE,"GE_SEQ_MOD_btn")
|
|
declare ui_table %0lu1d[32](4, 4, 2400)
|
|
make_persistent(%0lu1d)
|
|
set_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_BAR_COLOR,2044730)
|
|
set_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_ZERO_LINE_COLOR,2044730)
|
|
declare ui_table %pyeoz[32](4, 4, 127)
|
|
make_persistent(%pyeoz)
|
|
set_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_BAR_COLOR,2044730)
|
|
set_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_ZERO_LINE_COLOR,2044730)
|
|
declare ui_label $vjofa(1, 1)
|
|
set_control_par_str(get_ui_id($vjofa),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vjofa),$CONTROL_PAR_PICTURE,"GE_GATER_POS")
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_Z_LAYER,1)
|
|
declare ui_menu $lh5xo
|
|
set_control_par_str(get_ui_id($lh5xo),$CONTROL_PAR_PICTURE,"GE_MENU_DOTS")
|
|
add_menu_item($lh5xo,"Randomize",4)
|
|
add_menu_item($lh5xo,"Humanize",6)
|
|
add_menu_item($lh5xo,"Copy Seq > Mod",0)
|
|
add_menu_item($lh5xo,"Copy Mod > Seq",1)
|
|
add_menu_item($lh5xo,"Double Resolution",2)
|
|
add_menu_item($lh5xo,"Halven Resolution",3)
|
|
add_menu_item($lh5xo,"Duplicate Length",5)
|
|
declare ui_button $zkud4
|
|
set_control_par_str(get_ui_id($zkud4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zkud4),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
|
|
declare ui_button $t2fpk
|
|
set_control_par_str(get_ui_id($t2fpk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($t2fpk),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
|
|
declare %o54el[8] := (get_ui_id($vjofa), get_ui_id($k5z4u), get_ui_id($ivqya), get_ui_id(%0lu1d), get_ui_id(%pyeoz), get_ui_id($lh5xo), get_ui_id($t2fpk), get_ui_id($zkud4))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%o54el))
|
|
%xwg5s[1440+$g5k3r] := %o54el[$g5k3r]
|
|
%cqg2m[144] := 2048
|
|
inc($g5k3r)
|
|
end while
|
|
declare ?2wk03[13] := (0.03125, 0.0625, 0.125, 0.16666666666666666, 0.25, 0.3333333333333333, 0.5, 0.6666666666666666, 1.0, 1.5, 2.0, 3.0, -1.0)
|
|
declare !qniir[13]
|
|
!qniir[0] := "1/128"
|
|
!qniir[1] := "1/64"
|
|
!qniir[2] := "1/32"
|
|
!qniir[3] := "1/16t"
|
|
!qniir[4] := "1/16"
|
|
!qniir[5] := "1/8t"
|
|
!qniir[6] := "1/8"
|
|
!qniir[7] := "1/4t"
|
|
!qniir[8] := "1/4"
|
|
!qniir[9] := "1/4."
|
|
!qniir[10] := "1/2"
|
|
!qniir[11] := "3/4"
|
|
!qniir[12] := "1 Bar"
|
|
declare ui_slider $ius2b(0, 1000000)
|
|
make_persistent($ius2b)
|
|
declare ui_slider $1ybzi(-1000000, 1000000)
|
|
make_persistent($1ybzi)
|
|
set_control_par_str(get_ui_id($1ybzi),$CONTROL_PAR_PICTURE,"MK_Slider" & "_13")
|
|
declare ui_menu $rpaco
|
|
make_persistent($rpaco)
|
|
set_control_par_str(get_ui_id($rpaco),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($rpaco,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($rpaco),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 9
|
|
%n34di[$upapg] := get_ui_id($rpaco)
|
|
%nwlgb[$upapg] := get_ui_id($1ybzi)
|
|
!4gjzd[9] := "_13"
|
|
%c1qym[9] := get_ui_id($1ybzi)
|
|
%41o3s[9] := get_ui_id($ius2b)
|
|
declare ui_label $drwof(1, 1)
|
|
set_control_par_str(get_ui_id($drwof),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($drwof),$CONTROL_PAR_PICTURE,"MK_Mask" & "_13")
|
|
%vvlef[9] := get_ui_id($drwof)
|
|
declare ui_label $nodwh(1, 1)
|
|
set_control_par_str(get_ui_id($nodwh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nodwh),$CONTROL_PAR_PICTURE,"MK_RngP" & "_13")
|
|
%2hswt[9] := get_ui_id($nodwh)
|
|
declare ui_label $we4iu(1, 1)
|
|
set_control_par_str(get_ui_id($we4iu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($we4iu),$CONTROL_PAR_PICTURE,"MK_ind" & "_13")
|
|
set_control_par(get_ui_id($we4iu),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[9] := get_ui_id($we4iu)
|
|
%qxmpr[9] := 1000000
|
|
%oazdd[9] := 1
|
|
!gh3f0[9] := "ms"
|
|
?rylw5[9] := 1.0
|
|
%q4mzh[9] := -1
|
|
%vc4gu[9] := 100000
|
|
%hpc0e[9] := -1
|
|
%eujmz[9] := -1
|
|
%fogcg[9] := 0
|
|
%5zak5[9] := 0
|
|
%dwdw3[9] := 0
|
|
%sbnwu[9] := 1000000
|
|
%jeswc[9] := 4010
|
|
%mnk53[9] := 145
|
|
declare %0tgkt[10] := (get_ui_id($ius2b), get_ui_id($1ybzi), get_ui_id($drwof), get_ui_id($nodwh), get_ui_id($we4iu), get_ui_id($rpaco), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%0tgkt))
|
|
%xwg5s[1450+$g5k3r] := %0tgkt[$g5k3r]
|
|
%cqg2m[145] := 2048
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_label $gpcbc(1, 1)
|
|
set_control_par_str(get_ui_id($gpcbc),$CONTROL_PAR_PICTURE,"blank")
|
|
$g5k3r := 0
|
|
while (%xwg5s[1450+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[1450+$g5k3r] := get_ui_id($gpcbc)
|
|
declare ui_button $en0xw
|
|
set_control_par_str(get_ui_id($en0xw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($en0xw),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
|
|
declare ui_button $4tx2f
|
|
set_control_par_str(get_ui_id($4tx2f),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4tx2f),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
|
|
declare ui_slider $3rksw(50, 950)
|
|
make_persistent($3rksw)
|
|
declare ui_slider $qbhb5(-901, 901)
|
|
make_persistent($qbhb5)
|
|
set_control_par_str(get_ui_id($qbhb5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_12")
|
|
declare ui_menu $m5sxk
|
|
make_persistent($m5sxk)
|
|
set_control_par_str(get_ui_id($m5sxk),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($m5sxk,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($m5sxk),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 10
|
|
%n34di[$upapg] := get_ui_id($m5sxk)
|
|
%nwlgb[$upapg] := get_ui_id($qbhb5)
|
|
!4gjzd[10] := "_12"
|
|
%c1qym[10] := get_ui_id($qbhb5)
|
|
%41o3s[10] := get_ui_id($3rksw)
|
|
declare ui_label $m1j44(1, 1)
|
|
set_control_par_str(get_ui_id($m1j44),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($m1j44),$CONTROL_PAR_PICTURE,"MK_Mask" & "_12")
|
|
%vvlef[10] := get_ui_id($m1j44)
|
|
declare ui_label $pnkze(1, 1)
|
|
set_control_par_str(get_ui_id($pnkze),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pnkze),$CONTROL_PAR_PICTURE,"MK_RngP" & "_12")
|
|
%2hswt[10] := get_ui_id($pnkze)
|
|
declare ui_label $qncqi(1, 1)
|
|
set_control_par_str(get_ui_id($qncqi),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qncqi),$CONTROL_PAR_PICTURE,"MK_ind" & "_12")
|
|
set_control_par(get_ui_id($qncqi),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[10] := get_ui_id($qncqi)
|
|
%qxmpr[10] := 901
|
|
%oazdd[10] := 10
|
|
!gh3f0[10] := "%"
|
|
?rylw5[10] := 1.0
|
|
%q4mzh[10] := -1
|
|
%vc4gu[10] := 100000
|
|
%hpc0e[10] := -1
|
|
%eujmz[10] := -1
|
|
%fogcg[10] := 0
|
|
%5zak5[10] := 0
|
|
%dwdw3[10] := 50
|
|
%sbnwu[10] := 950
|
|
%jeswc[10] := 4013
|
|
%mnk53[10] := 146
|
|
declare %p5zpo[10] := (get_ui_id($3rksw), get_ui_id($qbhb5), get_ui_id($m1j44), get_ui_id($pnkze), get_ui_id($qncqi), get_ui_id($m5sxk), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%p5zpo))
|
|
%xwg5s[1460+$g5k3r] := %p5zpo[$g5k3r]
|
|
%cqg2m[146] := 2048
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $q0rb2(1, 1500)
|
|
make_persistent($q0rb2)
|
|
declare ui_slider $qb5xv(-1500, 1500)
|
|
make_persistent($qb5xv)
|
|
set_control_par_str(get_ui_id($qb5xv),$CONTROL_PAR_PICTURE,"MK_Slider" & "_12")
|
|
declare ui_menu $0vs3i
|
|
make_persistent($0vs3i)
|
|
set_control_par_str(get_ui_id($0vs3i),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($0vs3i,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($0vs3i),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 11
|
|
%n34di[$upapg] := get_ui_id($0vs3i)
|
|
%nwlgb[$upapg] := get_ui_id($qb5xv)
|
|
!4gjzd[11] := "_12"
|
|
%c1qym[11] := get_ui_id($qb5xv)
|
|
%41o3s[11] := get_ui_id($q0rb2)
|
|
declare ui_label $tsl5c(1, 1)
|
|
set_control_par_str(get_ui_id($tsl5c),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($tsl5c),$CONTROL_PAR_PICTURE,"MK_Mask" & "_12")
|
|
%vvlef[11] := get_ui_id($tsl5c)
|
|
declare ui_label $qgyyk(1, 1)
|
|
set_control_par_str(get_ui_id($qgyyk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qgyyk),$CONTROL_PAR_PICTURE,"MK_RngP" & "_12")
|
|
%2hswt[11] := get_ui_id($qgyyk)
|
|
declare ui_label $b3xhc(1, 1)
|
|
set_control_par_str(get_ui_id($b3xhc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($b3xhc),$CONTROL_PAR_PICTURE,"MK_ind" & "_12")
|
|
set_control_par(get_ui_id($b3xhc),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[11] := get_ui_id($b3xhc)
|
|
%qxmpr[11] := 1500
|
|
%oazdd[11] := 10
|
|
!gh3f0[11] := "%"
|
|
?rylw5[11] := 1.0
|
|
%q4mzh[11] := -1
|
|
%vc4gu[11] := 100000
|
|
%hpc0e[11] := -1
|
|
%eujmz[11] := -1
|
|
%fogcg[11] := 0
|
|
%5zak5[11] := 0
|
|
%dwdw3[11] := 1
|
|
%sbnwu[11] := 1500
|
|
%jeswc[11] := 4016
|
|
%mnk53[11] := 147
|
|
declare %1qb4n[10] := (get_ui_id($q0rb2), get_ui_id($qb5xv), get_ui_id($tsl5c), get_ui_id($qgyyk), get_ui_id($b3xhc), get_ui_id($0vs3i), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%1qb4n))
|
|
%xwg5s[1470+$g5k3r] := %1qb4n[$g5k3r]
|
|
%cqg2m[147] := 2048
|
|
inc($g5k3r)
|
|
end while
|
|
declare %lec2j[4] := (get_ui_id($1p3ww), get_ui_id($5dkam), get_ui_id($en0xw), get_ui_id($4tx2f))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%lec2j))
|
|
%xwg5s[1530+$g5k3r] := %lec2j[$g5k3r]
|
|
%cqg2m[153] := 2048
|
|
inc($g5k3r)
|
|
end while
|
|
$5sroo := 0
|
|
while ($5sroo<num_elements(%br0tn))
|
|
%br0tn[$5sroo] := %wwz2v[$0erls]
|
|
inc($5sroo)
|
|
end while
|
|
set_table_steps_shown(%pyeoz,$k5z4u)
|
|
set_table_steps_shown(%0lu1d,$k5z4u)
|
|
$dyt1q := (get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_WIDTH)-6)/$k5z4u
|
|
$tp4oa := $tp4oa-(-sh_right($k5z4u-1-$tp4oa,31)*($tp4oa-($k5z4u-1)))
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_POS_X)+3+($tp4oa*$dyt1q))
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_POS_Y)+3)
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_WIDTH,$dyt1q-1)
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_HEIGHT)-6)
|
|
declare $y1xwz
|
|
declare ui_slider $bpkqt(0, 3473)
|
|
make_persistent($bpkqt)
|
|
declare ui_slider $g345d(-3000, 3000)
|
|
make_persistent($g345d)
|
|
set_control_par_str(get_ui_id($g345d),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $3pyb3
|
|
make_persistent($3pyb3)
|
|
set_control_par_str(get_ui_id($3pyb3),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($3pyb3,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($3pyb3),search(%bnygy,11),0)
|
|
$upapg := 12
|
|
%n34di[$upapg] := get_ui_id($3pyb3)
|
|
%nwlgb[$upapg] := get_ui_id($g345d)
|
|
!4gjzd[12] := "_8"
|
|
%c1qym[12] := get_ui_id($g345d)
|
|
%41o3s[12] := get_ui_id($bpkqt)
|
|
declare ui_label $wuxr3(1, 1)
|
|
set_control_par_str(get_ui_id($wuxr3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wuxr3),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[12] := get_ui_id($wuxr3)
|
|
declare ui_label $wkt5g(1, 1)
|
|
set_control_par_str(get_ui_id($wkt5g),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wkt5g),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[12] := get_ui_id($wkt5g)
|
|
declare ui_label $qjkh4(1, 1)
|
|
set_control_par_str(get_ui_id($qjkh4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qjkh4),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($qjkh4),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[12] := get_ui_id($qjkh4)
|
|
%qxmpr[12] := 2951
|
|
%oazdd[12] := 10
|
|
!gh3f0[12] := "ms"
|
|
?rylw5[12] := 1.0
|
|
%q4mzh[12] := -1
|
|
%vc4gu[12] := 100000
|
|
%hpc0e[12] := -1
|
|
%eujmz[12] := -1
|
|
%fogcg[12] := 0
|
|
%5zak5[12] := 0
|
|
%dwdw3[12] := 0
|
|
%sbnwu[12] := 3473
|
|
%jeswc[12] := 19
|
|
%mnk53[12] := 0
|
|
declare %ammgx[10] := (get_ui_id($bpkqt), get_ui_id($g345d), get_ui_id($wuxr3), get_ui_id($wkt5g), get_ui_id($qjkh4), get_ui_id($3pyb3), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ammgx))
|
|
%xwg5s[$g5k3r] := %ammgx[$g5k3r]
|
|
%cqg2m[0] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $m2mpa(0, 3126)
|
|
make_persistent($m2mpa)
|
|
declare ui_slider $n0kha(-999, 999)
|
|
make_persistent($n0kha)
|
|
set_control_par_str(get_ui_id($n0kha),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $u2pwx
|
|
make_persistent($u2pwx)
|
|
set_control_par_str(get_ui_id($u2pwx),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($u2pwx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($u2pwx),search(%bnygy,11),0)
|
|
$upapg := 13
|
|
%n34di[$upapg] := get_ui_id($u2pwx)
|
|
%nwlgb[$upapg] := get_ui_id($n0kha)
|
|
!4gjzd[13] := "_8"
|
|
%c1qym[13] := get_ui_id($n0kha)
|
|
%41o3s[13] := get_ui_id($m2mpa)
|
|
declare ui_label $pwrfd(1, 1)
|
|
set_control_par_str(get_ui_id($pwrfd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pwrfd),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[13] := get_ui_id($pwrfd)
|
|
declare ui_label $kzwh4(1, 1)
|
|
set_control_par_str(get_ui_id($kzwh4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($kzwh4),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[13] := get_ui_id($kzwh4)
|
|
declare ui_label $quyti(1, 1)
|
|
set_control_par_str(get_ui_id($quyti),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($quyti),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($quyti),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[13] := get_ui_id($quyti)
|
|
%qxmpr[13] := 991
|
|
%oazdd[13] := 1
|
|
!gh3f0[13] := "ms"
|
|
?rylw5[13] := 1.0
|
|
%q4mzh[13] := -1
|
|
%vc4gu[13] := 100000
|
|
%hpc0e[13] := -1
|
|
%eujmz[13] := -1
|
|
%fogcg[13] := 0
|
|
%5zak5[13] := 0
|
|
%dwdw3[13] := 0
|
|
%sbnwu[13] := 3126
|
|
%jeswc[13] := 22
|
|
%mnk53[13] := 1
|
|
declare %iuemu[10] := (get_ui_id($m2mpa), get_ui_id($n0kha), get_ui_id($pwrfd), get_ui_id($kzwh4), get_ui_id($quyti), get_ui_id($u2pwx), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%iuemu))
|
|
%xwg5s[10+$g5k3r] := %iuemu[$g5k3r]
|
|
%cqg2m[1] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $1g0ky(0, 500000)
|
|
make_persistent($1g0ky)
|
|
declare ui_slider $2xzsd(-500001, 500001)
|
|
make_persistent($2xzsd)
|
|
set_control_par_str(get_ui_id($2xzsd),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
|
|
declare ui_menu $ldi1z
|
|
make_persistent($ldi1z)
|
|
set_control_par_str(get_ui_id($ldi1z),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($ldi1z,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($ldi1z),search(%bnygy,11),0)
|
|
$upapg := 14
|
|
%n34di[$upapg] := get_ui_id($ldi1z)
|
|
%nwlgb[$upapg] := get_ui_id($2xzsd)
|
|
!4gjzd[14] := ""
|
|
%c1qym[14] := get_ui_id($2xzsd)
|
|
%41o3s[14] := get_ui_id($1g0ky)
|
|
declare ui_label $5n4sk(1, 1)
|
|
set_control_par_str(get_ui_id($5n4sk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5n4sk),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%vvlef[14] := get_ui_id($5n4sk)
|
|
declare ui_label $v3e3o(1, 1)
|
|
set_control_par_str(get_ui_id($v3e3o),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($v3e3o),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
|
|
%2hswt[14] := get_ui_id($v3e3o)
|
|
declare ui_label $hkwgh(1, 1)
|
|
set_control_par_str(get_ui_id($hkwgh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hkwgh),$CONTROL_PAR_PICTURE,"MK_ind" & "")
|
|
set_control_par(get_ui_id($hkwgh),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[14] := get_ui_id($hkwgh)
|
|
%qxmpr[14] := 500001
|
|
%oazdd[14] := 10000
|
|
!gh3f0[14] := "cnt"
|
|
?rylw5[14] := 3.0
|
|
%q4mzh[14] := -1
|
|
%vc4gu[14] := 100000
|
|
%hpc0e[14] := -1
|
|
%eujmz[14] := -1
|
|
%fogcg[14] := 0
|
|
%5zak5[14] := 0
|
|
%dwdw3[14] := 0
|
|
%sbnwu[14] := 500000
|
|
%jeswc[14] := 25
|
|
%mnk53[14] := 2
|
|
declare %tmahl[10] := (get_ui_id($1g0ky), get_ui_id($2xzsd), get_ui_id($5n4sk), get_ui_id($v3e3o), get_ui_id($hkwgh), get_ui_id($ldi1z), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%tmahl))
|
|
%xwg5s[20+$g5k3r] := %tmahl[$g5k3r]
|
|
%cqg2m[2] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $liaof(0, 1000)
|
|
make_persistent($liaof)
|
|
declare ui_slider $5wlib(-1000, 1000)
|
|
make_persistent($5wlib)
|
|
set_control_par_str(get_ui_id($5wlib),$CONTROL_PAR_PICTURE,"MK_Slider" & "_6")
|
|
declare ui_menu $eu2xe
|
|
make_persistent($eu2xe)
|
|
set_control_par_str(get_ui_id($eu2xe),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($eu2xe,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($eu2xe),search(%bnygy,11),0)
|
|
$upapg := 15
|
|
%n34di[$upapg] := get_ui_id($eu2xe)
|
|
%nwlgb[$upapg] := get_ui_id($5wlib)
|
|
!4gjzd[15] := "_6"
|
|
%c1qym[15] := get_ui_id($5wlib)
|
|
%41o3s[15] := get_ui_id($liaof)
|
|
declare ui_label $dxpqd(1, 1)
|
|
set_control_par_str(get_ui_id($dxpqd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dxpqd),$CONTROL_PAR_PICTURE,"MK_Mask" & "_6")
|
|
%vvlef[15] := get_ui_id($dxpqd)
|
|
declare ui_label $t04sw(1, 1)
|
|
set_control_par_str(get_ui_id($t04sw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($t04sw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_6")
|
|
%2hswt[15] := get_ui_id($t04sw)
|
|
declare ui_label $no2tr(1, 1)
|
|
set_control_par_str(get_ui_id($no2tr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($no2tr),$CONTROL_PAR_PICTURE,"MK_ind" & "_6")
|
|
set_control_par(get_ui_id($no2tr),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[15] := get_ui_id($no2tr)
|
|
%qxmpr[15] := 1000
|
|
%oazdd[15] := 10
|
|
!gh3f0[15] := "%"
|
|
?rylw5[15] := 1.0
|
|
%q4mzh[15] := -1
|
|
%vc4gu[15] := 100000
|
|
%hpc0e[15] := -1
|
|
%eujmz[15] := -1
|
|
%fogcg[15] := 0
|
|
%5zak5[15] := 0
|
|
%dwdw3[15] := 0
|
|
%sbnwu[15] := 1000
|
|
%jeswc[15] := 28
|
|
%mnk53[15] := 3
|
|
declare %ow3a1[10] := (get_ui_id($liaof), get_ui_id($5wlib), get_ui_id($dxpqd), get_ui_id($t04sw), get_ui_id($no2tr), get_ui_id($eu2xe), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ow3a1))
|
|
%xwg5s[30+$g5k3r] := %ow3a1[$g5k3r]
|
|
%cqg2m[3] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $sgbvz(-8000, 8000)
|
|
make_persistent($sgbvz)
|
|
declare ui_slider $cx1ja(-16000, 16000)
|
|
make_persistent($cx1ja)
|
|
set_control_par_str(get_ui_id($cx1ja),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $qxhis
|
|
make_persistent($qxhis)
|
|
set_control_par_str(get_ui_id($qxhis),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($qxhis,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($qxhis),search(%bnygy,11),0)
|
|
$upapg := 16
|
|
%n34di[$upapg] := get_ui_id($qxhis)
|
|
%nwlgb[$upapg] := get_ui_id($cx1ja)
|
|
!4gjzd[16] := "_8"
|
|
%c1qym[16] := get_ui_id($cx1ja)
|
|
%41o3s[16] := get_ui_id($sgbvz)
|
|
declare ui_label $md35u(1, 1)
|
|
set_control_par_str(get_ui_id($md35u),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($md35u),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[16] := get_ui_id($md35u)
|
|
declare ui_label $lkio1(1, 1)
|
|
set_control_par_str(get_ui_id($lkio1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($lkio1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[16] := get_ui_id($lkio1)
|
|
declare ui_label $b3krc(1, 1)
|
|
set_control_par_str(get_ui_id($b3krc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($b3krc),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($b3krc),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[16] := get_ui_id($b3krc)
|
|
%qxmpr[16] := 16001
|
|
%oazdd[16] := 10
|
|
!gh3f0[16] := "%"
|
|
?rylw5[16] := 1.0
|
|
%q4mzh[16] := -1
|
|
%vc4gu[16] := 100000
|
|
%hpc0e[16] := -1
|
|
%eujmz[16] := -1
|
|
%fogcg[16] := 0
|
|
%5zak5[16] := 0
|
|
%dwdw3[16] := -8000
|
|
%sbnwu[16] := 8000
|
|
%jeswc[16] := 31
|
|
%mnk53[16] := 4
|
|
declare %qa1qn[10] := (get_ui_id($sgbvz), get_ui_id($cx1ja), get_ui_id($md35u), get_ui_id($lkio1), get_ui_id($b3krc), get_ui_id($qxhis), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%qa1qn))
|
|
%xwg5s[40+$g5k3r] := %qa1qn[$g5k3r]
|
|
%cqg2m[4] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $4zkqn(0, 200)
|
|
make_persistent($4zkqn)
|
|
declare ui_slider $boshu(-1001, 1001)
|
|
make_persistent($boshu)
|
|
set_control_par_str(get_ui_id($boshu),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
|
|
declare ui_menu $oicux
|
|
make_persistent($oicux)
|
|
set_control_par_str(get_ui_id($oicux),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($oicux,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($oicux),search(%bnygy,11),0)
|
|
$upapg := 17
|
|
%n34di[$upapg] := get_ui_id($oicux)
|
|
%nwlgb[$upapg] := get_ui_id($boshu)
|
|
!4gjzd[17] := ""
|
|
%c1qym[17] := get_ui_id($boshu)
|
|
%41o3s[17] := get_ui_id($4zkqn)
|
|
declare ui_label $3y4q4(1, 1)
|
|
set_control_par_str(get_ui_id($3y4q4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3y4q4),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%vvlef[17] := get_ui_id($3y4q4)
|
|
declare ui_label $mdetq(1, 1)
|
|
set_control_par_str(get_ui_id($mdetq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mdetq),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
|
|
%2hswt[17] := get_ui_id($mdetq)
|
|
declare ui_label $yakx1(1, 1)
|
|
set_control_par_str(get_ui_id($yakx1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($yakx1),$CONTROL_PAR_PICTURE,"MK_ind" & "")
|
|
set_control_par(get_ui_id($yakx1),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[17] := get_ui_id($yakx1)
|
|
%qxmpr[17] := 200
|
|
%oazdd[17] := 1
|
|
!gh3f0[17] := "%"
|
|
?rylw5[17] := 10.0
|
|
%q4mzh[17] := -1
|
|
%vc4gu[17] := 100000
|
|
%hpc0e[17] := -1
|
|
%eujmz[17] := -1
|
|
%fogcg[17] := 0
|
|
%5zak5[17] := 0
|
|
%dwdw3[17] := 0
|
|
%sbnwu[17] := 200
|
|
%jeswc[17] := 34
|
|
%mnk53[17] := 5
|
|
declare %w2wpy[10] := (get_ui_id($4zkqn), get_ui_id($boshu), get_ui_id($3y4q4), get_ui_id($mdetq), get_ui_id($yakx1), get_ui_id($oicux), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%w2wpy))
|
|
%xwg5s[50+$g5k3r] := %w2wpy[$g5k3r]
|
|
%cqg2m[5] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $kuk42(1, 100)
|
|
make_persistent($kuk42)
|
|
declare ui_slider $o5n5m(-100, 100)
|
|
make_persistent($o5n5m)
|
|
set_control_par_str(get_ui_id($o5n5m),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
|
|
declare ui_menu $fzwxf
|
|
make_persistent($fzwxf)
|
|
set_control_par_str(get_ui_id($fzwxf),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($fzwxf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($fzwxf),search(%bnygy,11),0)
|
|
$upapg := 18
|
|
%n34di[$upapg] := get_ui_id($fzwxf)
|
|
%nwlgb[$upapg] := get_ui_id($o5n5m)
|
|
!4gjzd[18] := ""
|
|
%c1qym[18] := get_ui_id($o5n5m)
|
|
%41o3s[18] := get_ui_id($kuk42)
|
|
declare ui_label $pfqyz(1, 1)
|
|
set_control_par_str(get_ui_id($pfqyz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pfqyz),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%vvlef[18] := get_ui_id($pfqyz)
|
|
declare ui_label $5d25c(1, 1)
|
|
set_control_par_str(get_ui_id($5d25c),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5d25c),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
|
|
%2hswt[18] := get_ui_id($5d25c)
|
|
declare ui_label $o5omm(1, 1)
|
|
set_control_par_str(get_ui_id($o5omm),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($o5omm),$CONTROL_PAR_PICTURE,"MK_ind" & "")
|
|
set_control_par(get_ui_id($o5omm),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[18] := get_ui_id($o5omm)
|
|
%qxmpr[18] := 100
|
|
%oazdd[18] := 1
|
|
!gh3f0[18] := "%"
|
|
?rylw5[18] := 1.0
|
|
%q4mzh[18] := -1
|
|
%vc4gu[18] := 100000
|
|
%hpc0e[18] := -1
|
|
%eujmz[18] := -1
|
|
%fogcg[18] := 0
|
|
%5zak5[18] := 0
|
|
%dwdw3[18] := 1
|
|
%sbnwu[18] := 100
|
|
%jeswc[18] := 37
|
|
%mnk53[18] := 6
|
|
declare %2f4uk[10] := (get_ui_id($kuk42), get_ui_id($o5n5m), get_ui_id($pfqyz), get_ui_id($5d25c), get_ui_id($o5omm), get_ui_id($fzwxf), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%2f4uk))
|
|
%xwg5s[60+$g5k3r] := %2f4uk[$g5k3r]
|
|
%cqg2m[6] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $qsfxg(-2400, 2400)
|
|
make_persistent($qsfxg)
|
|
declare ui_slider $xeafk(-2400, 2400)
|
|
make_persistent($xeafk)
|
|
set_control_par_str(get_ui_id($xeafk),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $52sa5
|
|
make_persistent($52sa5)
|
|
set_control_par_str(get_ui_id($52sa5),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($52sa5,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($52sa5),search(%bnygy,11),0)
|
|
$upapg := 19
|
|
%n34di[$upapg] := get_ui_id($52sa5)
|
|
%nwlgb[$upapg] := get_ui_id($xeafk)
|
|
!4gjzd[19] := "_8"
|
|
%c1qym[19] := get_ui_id($xeafk)
|
|
%41o3s[19] := get_ui_id($qsfxg)
|
|
declare ui_label $wi2xc(1, 1)
|
|
set_control_par_str(get_ui_id($wi2xc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wi2xc),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[19] := get_ui_id($wi2xc)
|
|
declare ui_label $lzojj(1, 1)
|
|
set_control_par_str(get_ui_id($lzojj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($lzojj),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[19] := get_ui_id($lzojj)
|
|
declare ui_label $n2zja(1, 1)
|
|
set_control_par_str(get_ui_id($n2zja),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($n2zja),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($n2zja),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[19] := get_ui_id($n2zja)
|
|
%qxmpr[19] := 4801
|
|
%oazdd[19] := 100
|
|
!gh3f0[19] := "st"
|
|
?rylw5[19] := 1.0
|
|
%q4mzh[19] := -1
|
|
%vc4gu[19] := 100000
|
|
%hpc0e[19] := -1
|
|
%eujmz[19] := -1
|
|
%fogcg[19] := 0
|
|
%5zak5[19] := 0
|
|
%dwdw3[19] := -2400
|
|
%sbnwu[19] := 2400
|
|
%jeswc[19] := 40
|
|
%mnk53[19] := 7
|
|
declare %insua[10] := (get_ui_id($qsfxg), get_ui_id($xeafk), get_ui_id($wi2xc), get_ui_id($lzojj), get_ui_id($n2zja), get_ui_id($52sa5), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%insua))
|
|
%xwg5s[70+$g5k3r] := %insua[$g5k3r]
|
|
%cqg2m[7] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $aaf4s(0, 1000)
|
|
make_persistent($aaf4s)
|
|
declare ui_slider $sddk3(-1001, 1001)
|
|
make_persistent($sddk3)
|
|
set_control_par_str(get_ui_id($sddk3),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $nplew
|
|
make_persistent($nplew)
|
|
set_control_par_str(get_ui_id($nplew),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($nplew,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($nplew),search(%bnygy,11),0)
|
|
$upapg := 20
|
|
%n34di[$upapg] := get_ui_id($nplew)
|
|
%nwlgb[$upapg] := get_ui_id($sddk3)
|
|
!4gjzd[20] := "_8"
|
|
%c1qym[20] := get_ui_id($sddk3)
|
|
%41o3s[20] := get_ui_id($aaf4s)
|
|
declare ui_label $mwnlo(1, 1)
|
|
set_control_par_str(get_ui_id($mwnlo),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mwnlo),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[20] := get_ui_id($mwnlo)
|
|
declare ui_label $av2jw(1, 1)
|
|
set_control_par_str(get_ui_id($av2jw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($av2jw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[20] := get_ui_id($av2jw)
|
|
declare ui_label $mddxh(1, 1)
|
|
set_control_par_str(get_ui_id($mddxh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mddxh),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($mddxh),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[20] := get_ui_id($mddxh)
|
|
%qxmpr[20] := 1001
|
|
%oazdd[20] := 10
|
|
!gh3f0[20] := "%"
|
|
?rylw5[20] := 1.0
|
|
%q4mzh[20] := -1
|
|
%vc4gu[20] := 100000
|
|
%hpc0e[20] := -1
|
|
%eujmz[20] := -1
|
|
%fogcg[20] := 0
|
|
%5zak5[20] := 0
|
|
%dwdw3[20] := 0
|
|
%sbnwu[20] := 1000
|
|
%jeswc[20] := 43
|
|
%mnk53[20] := 8
|
|
declare %z2ovs[10] := (get_ui_id($aaf4s), get_ui_id($sddk3), get_ui_id($mwnlo), get_ui_id($av2jw), get_ui_id($mddxh), get_ui_id($nplew), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%z2ovs))
|
|
%xwg5s[80+$g5k3r] := %z2ovs[$g5k3r]
|
|
%cqg2m[8] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $nwl2v(1, 750000)
|
|
make_persistent($nwl2v)
|
|
declare ui_slider $pk0h4(-750000, 750000)
|
|
make_persistent($pk0h4)
|
|
set_control_par_str(get_ui_id($pk0h4),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
|
|
declare ui_menu $u2ki4
|
|
make_persistent($u2ki4)
|
|
set_control_par_str(get_ui_id($u2ki4),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($u2ki4,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($u2ki4),search(%bnygy,11),0)
|
|
$upapg := 21
|
|
%n34di[$upapg] := get_ui_id($u2ki4)
|
|
%nwlgb[$upapg] := get_ui_id($pk0h4)
|
|
!4gjzd[21] := ""
|
|
%c1qym[21] := get_ui_id($pk0h4)
|
|
%41o3s[21] := get_ui_id($nwl2v)
|
|
declare ui_label $20as3(1, 1)
|
|
set_control_par_str(get_ui_id($20as3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($20as3),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%vvlef[21] := get_ui_id($20as3)
|
|
declare ui_label $ihvaa(1, 1)
|
|
set_control_par_str(get_ui_id($ihvaa),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ihvaa),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
|
|
%2hswt[21] := get_ui_id($ihvaa)
|
|
declare ui_label $1hkyz(1, 1)
|
|
set_control_par_str(get_ui_id($1hkyz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1hkyz),$CONTROL_PAR_PICTURE,"MK_ind" & "")
|
|
set_control_par(get_ui_id($1hkyz),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[21] := get_ui_id($1hkyz)
|
|
%qxmpr[21] := 750000
|
|
%oazdd[21] := 1
|
|
!gh3f0[21] := "ms"
|
|
?rylw5[21] := 1.0
|
|
%q4mzh[21] := $ENGINE_PAR_ATTACK
|
|
%vc4gu[21] := 100000
|
|
%hpc0e[21] := 0
|
|
%eujmz[21] := -1
|
|
%fogcg[21] := 0
|
|
%5zak5[21] := 0
|
|
%dwdw3[21] := 1
|
|
%sbnwu[21] := 750000
|
|
%jeswc[21] := 46
|
|
%mnk53[21] := 9
|
|
declare %fvmpz[10] := (get_ui_id($nwl2v), get_ui_id($pk0h4), get_ui_id($20as3), get_ui_id($ihvaa), get_ui_id($1hkyz), get_ui_id($u2ki4), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%fvmpz))
|
|
%xwg5s[90+$g5k3r] := %fvmpz[$g5k3r]
|
|
%cqg2m[9] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $wfiom(1, 750000)
|
|
make_persistent($wfiom)
|
|
declare ui_slider $0hnr5(-750000, 750000)
|
|
make_persistent($0hnr5)
|
|
set_control_par_str(get_ui_id($0hnr5),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
|
|
declare ui_menu $tmtfv
|
|
make_persistent($tmtfv)
|
|
set_control_par_str(get_ui_id($tmtfv),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($tmtfv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($tmtfv),search(%bnygy,11),0)
|
|
$upapg := 22
|
|
%n34di[$upapg] := get_ui_id($tmtfv)
|
|
%nwlgb[$upapg] := get_ui_id($0hnr5)
|
|
!4gjzd[22] := ""
|
|
%c1qym[22] := get_ui_id($0hnr5)
|
|
%41o3s[22] := get_ui_id($wfiom)
|
|
declare ui_label $4adkw(1, 1)
|
|
set_control_par_str(get_ui_id($4adkw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4adkw),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%vvlef[22] := get_ui_id($4adkw)
|
|
declare ui_label $33a34(1, 1)
|
|
set_control_par_str(get_ui_id($33a34),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($33a34),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
|
|
%2hswt[22] := get_ui_id($33a34)
|
|
declare ui_label $gg3zg(1, 1)
|
|
set_control_par_str(get_ui_id($gg3zg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($gg3zg),$CONTROL_PAR_PICTURE,"MK_ind" & "")
|
|
set_control_par(get_ui_id($gg3zg),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[22] := get_ui_id($gg3zg)
|
|
%qxmpr[22] := 750000
|
|
%oazdd[22] := 1
|
|
!gh3f0[22] := "ms"
|
|
?rylw5[22] := 1.0
|
|
%q4mzh[22] := $ENGINE_PAR_RELEASE
|
|
%vc4gu[22] := 100000
|
|
%hpc0e[22] := 0
|
|
%eujmz[22] := -1
|
|
%fogcg[22] := 0
|
|
%5zak5[22] := 0
|
|
%dwdw3[22] := 1
|
|
%sbnwu[22] := 750000
|
|
%jeswc[22] := 49
|
|
%mnk53[22] := 10
|
|
declare %hdrpg[10] := (get_ui_id($wfiom), get_ui_id($0hnr5), get_ui_id($4adkw), get_ui_id($33a34), get_ui_id($gg3zg), get_ui_id($tmtfv), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%hdrpg))
|
|
%xwg5s[100+$g5k3r] := %hdrpg[$g5k3r]
|
|
%cqg2m[10] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $qwf1w(-100, 100)
|
|
make_persistent($qwf1w)
|
|
set_control_par(get_ui_id($qwf1w),$CONTROL_PAR_DEFAULT_VALUE,0)
|
|
set_control_par_str(get_ui_id($qwf1w),$CONTROL_PAR_PICTURE,"GE_ATT_CURV")
|
|
%aazjf[0] := get_ui_id($qwf1w)
|
|
declare ui_label $tqxjo(1, 1)
|
|
%5comw[0] := get_ui_id($tqxjo)
|
|
set_control_par_str(get_ui_id($tqxjo),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($tqxjo),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%qdiwi[0] := 0
|
|
%ha0dc[0] := 101
|
|
%cy2pa[0] := 1
|
|
!5hawr[0] := "%"
|
|
!znpd1[0] := ""
|
|
%i5z0e[0] := -1
|
|
%qpgwq[0] := 100000
|
|
%bjbtn[0] := -1
|
|
%c40o1[0] := -1
|
|
%aebtw[0] := -100
|
|
%hgu5c[0] := 100
|
|
%gndxq[0] := 63
|
|
%ipim0[0] := 137
|
|
declare %44o4l[2] := (get_ui_id($qwf1w), get_ui_id($tqxjo))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%44o4l))
|
|
%xwg5s[1370+$g5k3r] := %44o4l[$g5k3r]
|
|
%cqg2m[137] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ppaoe(0, 84406)
|
|
make_persistent($ppaoe)
|
|
set_control_par(get_ui_id($ppaoe),$CONTROL_PAR_DEFAULT_VALUE,1)
|
|
set_control_par_str(get_ui_id($ppaoe),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[1] := get_ui_id($ppaoe)
|
|
declare ui_label $g2ztw(1, 1)
|
|
%5comw[1] := get_ui_id($g2ztw)
|
|
set_control_par_str(get_ui_id($g2ztw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($g2ztw),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[1] := 0
|
|
%ha0dc[1] := 84406
|
|
%cy2pa[1] := 1
|
|
!5hawr[1] := "ms"
|
|
!znpd1[1] := ""
|
|
%i5z0e[1] := -1
|
|
%qpgwq[1] := 100000
|
|
%bjbtn[1] := -1
|
|
%c40o1[1] := -1
|
|
%aebtw[1] := 1
|
|
%hgu5c[1] := 84406
|
|
%gndxq[1] := 58
|
|
%ipim0[1] := 11
|
|
declare %jshdi[2] := (get_ui_id($ppaoe), get_ui_id($g2ztw))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jshdi))
|
|
%xwg5s[110+$g5k3r] := %jshdi[$g5k3r]
|
|
%cqg2m[11] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ork5f(0, 84406)
|
|
make_persistent($ork5f)
|
|
set_control_par(get_ui_id($ork5f),$CONTROL_PAR_DEFAULT_VALUE,2000)
|
|
set_control_par_str(get_ui_id($ork5f),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[2] := get_ui_id($ork5f)
|
|
declare ui_label $uzij3(1, 1)
|
|
%5comw[2] := get_ui_id($uzij3)
|
|
set_control_par_str(get_ui_id($uzij3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uzij3),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[2] := 0
|
|
%ha0dc[2] := 84406
|
|
%cy2pa[2] := 1
|
|
!5hawr[2] := "ms"
|
|
!znpd1[2] := ""
|
|
%i5z0e[2] := -1
|
|
%qpgwq[2] := 100000
|
|
%bjbtn[2] := -1
|
|
%c40o1[2] := -1
|
|
%aebtw[2] := 0
|
|
%hgu5c[2] := 84406
|
|
%gndxq[2] := 59
|
|
%ipim0[2] := 12
|
|
declare %oqg14[2] := (get_ui_id($ork5f), get_ui_id($uzij3))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%oqg14))
|
|
%xwg5s[120+$g5k3r] := %oqg14[$g5k3r]
|
|
%cqg2m[12] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $dg3qf(0, 127)
|
|
make_persistent($dg3qf)
|
|
set_control_par(get_ui_id($dg3qf),$CONTROL_PAR_DEFAULT_VALUE,127)
|
|
set_control_par_str(get_ui_id($dg3qf),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[3] := get_ui_id($dg3qf)
|
|
declare ui_label $dx2uv(1, 1)
|
|
%5comw[3] := get_ui_id($dx2uv)
|
|
set_control_par_str(get_ui_id($dx2uv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dx2uv),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[3] := 0
|
|
%ha0dc[3] := 128
|
|
%cy2pa[3] := 1
|
|
!5hawr[3] := "Lev"
|
|
!znpd1[3] := ""
|
|
%i5z0e[3] := -1
|
|
%qpgwq[3] := 100000
|
|
%bjbtn[3] := -1
|
|
%c40o1[3] := -1
|
|
%aebtw[3] := 0
|
|
%hgu5c[3] := 127
|
|
%gndxq[3] := 60
|
|
%ipim0[3] := 13
|
|
declare %gyo2o[2] := (get_ui_id($dg3qf), get_ui_id($dx2uv))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%gyo2o))
|
|
%xwg5s[130+$g5k3r] := %gyo2o[$g5k3r]
|
|
%cqg2m[13] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $p3vhn(0, 84406)
|
|
make_persistent($p3vhn)
|
|
set_control_par(get_ui_id($p3vhn),$CONTROL_PAR_DEFAULT_VALUE,3000)
|
|
set_control_par_str(get_ui_id($p3vhn),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[4] := get_ui_id($p3vhn)
|
|
declare ui_label $l2rkq(1, 1)
|
|
%5comw[4] := get_ui_id($l2rkq)
|
|
set_control_par_str(get_ui_id($l2rkq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($l2rkq),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[4] := 0
|
|
%ha0dc[4] := 28135
|
|
%cy2pa[4] := 1
|
|
!5hawr[4] := "ms"
|
|
!znpd1[4] := ""
|
|
%i5z0e[4] := -1
|
|
%qpgwq[4] := 100000
|
|
%bjbtn[4] := -1
|
|
%c40o1[4] := -1
|
|
%aebtw[4] := 0
|
|
%hgu5c[4] := 84406
|
|
%gndxq[4] := 61
|
|
%ipim0[4] := 14
|
|
declare %jxdrd[2] := (get_ui_id($p3vhn), get_ui_id($l2rkq))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jxdrd))
|
|
%xwg5s[140+$g5k3r] := %jxdrd[$g5k3r]
|
|
%cqg2m[14] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $l2tv1(0, 1000)
|
|
make_persistent($l2tv1)
|
|
declare ui_slider $zv33b(-1000, 1000)
|
|
make_persistent($zv33b)
|
|
set_control_par_str(get_ui_id($zv33b),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
|
|
declare ui_menu $dbgkf
|
|
make_persistent($dbgkf)
|
|
set_control_par_str(get_ui_id($dbgkf),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($dbgkf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($dbgkf),search(%bnygy,11),0)
|
|
$upapg := 23
|
|
%n34di[$upapg] := get_ui_id($dbgkf)
|
|
%nwlgb[$upapg] := get_ui_id($zv33b)
|
|
!4gjzd[23] := "_9"
|
|
%c1qym[23] := get_ui_id($zv33b)
|
|
%41o3s[23] := get_ui_id($l2tv1)
|
|
declare ui_label $4tzoa(1, 1)
|
|
set_control_par_str(get_ui_id($4tzoa),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4tzoa),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
|
|
%vvlef[23] := get_ui_id($4tzoa)
|
|
declare ui_label $ehlhr(1, 1)
|
|
set_control_par_str(get_ui_id($ehlhr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ehlhr),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
|
|
%2hswt[23] := get_ui_id($ehlhr)
|
|
declare ui_label $s5fbq(1, 1)
|
|
set_control_par_str(get_ui_id($s5fbq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($s5fbq),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
|
|
set_control_par(get_ui_id($s5fbq),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[23] := get_ui_id($s5fbq)
|
|
%qxmpr[23] := 1001
|
|
%oazdd[23] := 10
|
|
!gh3f0[23] := "%"
|
|
?rylw5[23] := 1.0
|
|
%q4mzh[23] := -1
|
|
%vc4gu[23] := 100000
|
|
%hpc0e[23] := -1
|
|
%eujmz[23] := -1
|
|
%fogcg[23] := 0
|
|
%5zak5[23] := 0
|
|
%dwdw3[23] := 0
|
|
%sbnwu[23] := 1000
|
|
%jeswc[23] := 202
|
|
%mnk53[23] := 15
|
|
declare %40hjc[10] := (get_ui_id($l2tv1), get_ui_id($zv33b), get_ui_id($4tzoa), get_ui_id($ehlhr), get_ui_id($s5fbq), get_ui_id($dbgkf), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%40hjc))
|
|
%xwg5s[150+$g5k3r] := %40hjc[$g5k3r]
|
|
%cqg2m[15] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $eai4d(0, 1000)
|
|
make_persistent($eai4d)
|
|
declare ui_slider $3zolj(-1001, 1001)
|
|
make_persistent($3zolj)
|
|
set_control_par_str(get_ui_id($3zolj),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $r3d0o
|
|
make_persistent($r3d0o)
|
|
set_control_par_str(get_ui_id($r3d0o),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($r3d0o,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($r3d0o),search(%bnygy,11),0)
|
|
$upapg := 24
|
|
%n34di[$upapg] := get_ui_id($r3d0o)
|
|
%nwlgb[$upapg] := get_ui_id($3zolj)
|
|
!4gjzd[24] := "_8"
|
|
%c1qym[24] := get_ui_id($3zolj)
|
|
%41o3s[24] := get_ui_id($eai4d)
|
|
declare ui_label $b2eko(1, 1)
|
|
set_control_par_str(get_ui_id($b2eko),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($b2eko),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[24] := get_ui_id($b2eko)
|
|
declare ui_label $qfgko(1, 1)
|
|
set_control_par_str(get_ui_id($qfgko),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qfgko),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[24] := get_ui_id($qfgko)
|
|
declare ui_label $wcrox(1, 1)
|
|
set_control_par_str(get_ui_id($wcrox),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wcrox),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($wcrox),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[24] := get_ui_id($wcrox)
|
|
%qxmpr[24] := 1001
|
|
%oazdd[24] := 10
|
|
!gh3f0[24] := "%"
|
|
?rylw5[24] := 1.0
|
|
%q4mzh[24] := -1
|
|
%vc4gu[24] := 100000
|
|
%hpc0e[24] := -1
|
|
%eujmz[24] := -1
|
|
%fogcg[24] := 0
|
|
%5zak5[24] := 0
|
|
%dwdw3[24] := 0
|
|
%sbnwu[24] := 1000
|
|
%jeswc[24] := 52
|
|
%mnk53[24] := 16
|
|
declare %45u3e[10] := (get_ui_id($eai4d), get_ui_id($3zolj), get_ui_id($b2eko), get_ui_id($qfgko), get_ui_id($wcrox), get_ui_id($r3d0o), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%45u3e))
|
|
%xwg5s[160+$g5k3r] := %45u3e[$g5k3r]
|
|
%cqg2m[16] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $r0khx(0, 1000)
|
|
make_persistent($r0khx)
|
|
declare ui_slider $yl1h5(-1001, 1001)
|
|
make_persistent($yl1h5)
|
|
set_control_par_str(get_ui_id($yl1h5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $yqtdo
|
|
make_persistent($yqtdo)
|
|
set_control_par_str(get_ui_id($yqtdo),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($yqtdo,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($yqtdo),search(%bnygy,11),0)
|
|
$upapg := 25
|
|
%n34di[$upapg] := get_ui_id($yqtdo)
|
|
%nwlgb[$upapg] := get_ui_id($yl1h5)
|
|
!4gjzd[25] := "_8"
|
|
%c1qym[25] := get_ui_id($yl1h5)
|
|
%41o3s[25] := get_ui_id($r0khx)
|
|
declare ui_label $jmb0x(1, 1)
|
|
set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[25] := get_ui_id($jmb0x)
|
|
declare ui_label $zhhlu(1, 1)
|
|
set_control_par_str(get_ui_id($zhhlu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zhhlu),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[25] := get_ui_id($zhhlu)
|
|
declare ui_label $yryo2(1, 1)
|
|
set_control_par_str(get_ui_id($yryo2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($yryo2),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($yryo2),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[25] := get_ui_id($yryo2)
|
|
%qxmpr[25] := 1001
|
|
%oazdd[25] := 10
|
|
!gh3f0[25] := "%"
|
|
?rylw5[25] := 1.0
|
|
%q4mzh[25] := -1
|
|
%vc4gu[25] := 100000
|
|
%hpc0e[25] := -1
|
|
%eujmz[25] := -1
|
|
%fogcg[25] := 0
|
|
%5zak5[25] := 0
|
|
%dwdw3[25] := 0
|
|
%sbnwu[25] := 1000
|
|
%jeswc[25] := 55
|
|
%mnk53[25] := 17
|
|
declare %2lcxo[10] := (get_ui_id($r0khx), get_ui_id($yl1h5), get_ui_id($jmb0x), get_ui_id($zhhlu), get_ui_id($yryo2), get_ui_id($yqtdo), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%2lcxo))
|
|
%xwg5s[170+$g5k3r] := %2lcxo[$g5k3r]
|
|
%cqg2m[17] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $3fqin(0, 500000)
|
|
make_persistent($3fqin)
|
|
declare ui_slider $q5pfd(-500001, 500001)
|
|
make_persistent($q5pfd)
|
|
set_control_par_str(get_ui_id($q5pfd),$CONTROL_PAR_PICTURE,"MK_Slider" & "_10")
|
|
declare ui_menu $m0zqt
|
|
make_persistent($m0zqt)
|
|
set_control_par_str(get_ui_id($m0zqt),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($m0zqt,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($m0zqt),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 26
|
|
%n34di[$upapg] := get_ui_id($m0zqt)
|
|
%nwlgb[$upapg] := get_ui_id($q5pfd)
|
|
!4gjzd[26] := "_10"
|
|
%c1qym[26] := get_ui_id($q5pfd)
|
|
%41o3s[26] := get_ui_id($3fqin)
|
|
declare ui_label $sclhm(1, 1)
|
|
set_control_par_str(get_ui_id($sclhm),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($sclhm),$CONTROL_PAR_PICTURE,"MK_Mask" & "_10")
|
|
%vvlef[26] := get_ui_id($sclhm)
|
|
declare ui_label $s2qwm(1, 1)
|
|
set_control_par_str(get_ui_id($s2qwm),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($s2qwm),$CONTROL_PAR_PICTURE,"MK_RngP" & "_10")
|
|
%2hswt[26] := get_ui_id($s2qwm)
|
|
declare ui_label $rnwew(1, 1)
|
|
set_control_par_str(get_ui_id($rnwew),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rnwew),$CONTROL_PAR_PICTURE,"MK_ind" & "_10")
|
|
set_control_par(get_ui_id($rnwew),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[26] := get_ui_id($rnwew)
|
|
%qxmpr[26] := 500001
|
|
%oazdd[26] := 1
|
|
!gh3f0[26] := "dB"
|
|
?rylw5[26] := 1.0
|
|
%q4mzh[26] := $ENGINE_PAR_GN_GAIN
|
|
%vc4gu[26] := -1
|
|
%hpc0e[26] := 6
|
|
%eujmz[26] := 1024
|
|
%fogcg[26] := 0
|
|
%5zak5[26] := 0
|
|
%dwdw3[26] := 0
|
|
%sbnwu[26] := 500000
|
|
%jeswc[26] := 13
|
|
%mnk53[26] := 18
|
|
declare %4tzkz[10] := (get_ui_id($3fqin), get_ui_id($q5pfd), get_ui_id($sclhm), get_ui_id($s2qwm), get_ui_id($rnwew), get_ui_id($m0zqt), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4tzkz))
|
|
%xwg5s[180+$g5k3r] := %4tzkz[$g5k3r]
|
|
%cqg2m[18] := 519
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $h11uu(0, 500000)
|
|
make_persistent($h11uu)
|
|
declare ui_slider $rgoik(-500001, 500001)
|
|
make_persistent($rgoik)
|
|
set_control_par_str(get_ui_id($rgoik),$CONTROL_PAR_PICTURE,"MK_Slider" & "_11")
|
|
declare ui_menu $1xnyu
|
|
make_persistent($1xnyu)
|
|
set_control_par_str(get_ui_id($1xnyu),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($1xnyu,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($1xnyu),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 27
|
|
%n34di[$upapg] := get_ui_id($1xnyu)
|
|
%nwlgb[$upapg] := get_ui_id($rgoik)
|
|
!4gjzd[27] := "_11"
|
|
%c1qym[27] := get_ui_id($rgoik)
|
|
%41o3s[27] := get_ui_id($h11uu)
|
|
declare ui_label $rzycf(1, 1)
|
|
set_control_par_str(get_ui_id($rzycf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rzycf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_11")
|
|
%vvlef[27] := get_ui_id($rzycf)
|
|
declare ui_label $3n4e3(1, 1)
|
|
set_control_par_str(get_ui_id($3n4e3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3n4e3),$CONTROL_PAR_PICTURE,"MK_RngP" & "_11")
|
|
%2hswt[27] := get_ui_id($3n4e3)
|
|
declare ui_label $grjvf(1, 1)
|
|
set_control_par_str(get_ui_id($grjvf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($grjvf),$CONTROL_PAR_PICTURE,"MK_ind" & "_11")
|
|
set_control_par(get_ui_id($grjvf),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[27] := get_ui_id($grjvf)
|
|
%qxmpr[27] := 500001
|
|
%oazdd[27] := 1
|
|
!gh3f0[27] := "dB"
|
|
?rylw5[27] := 1.0
|
|
%q4mzh[27] := $ENGINE_PAR_GN_GAIN
|
|
%vc4gu[27] := -1
|
|
%hpc0e[27] := 6
|
|
%eujmz[27] := 1025
|
|
%fogcg[27] := 0
|
|
%5zak5[27] := 0
|
|
%dwdw3[27] := 0
|
|
%sbnwu[27] := 500000
|
|
%jeswc[27] := 208
|
|
%mnk53[27] := 19
|
|
declare %l5gaf[10] := (get_ui_id($h11uu), get_ui_id($rgoik), get_ui_id($rzycf), get_ui_id($3n4e3), get_ui_id($grjvf), get_ui_id($1xnyu), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%l5gaf))
|
|
%xwg5s[190+$g5k3r] := %l5gaf[$g5k3r]
|
|
%cqg2m[19] := 519
|
|
inc($g5k3r)
|
|
end while
|
|
%nwlgb[27] := -1
|
|
declare ui_slider $c21kk(-2400, 2400)
|
|
make_persistent($c21kk)
|
|
declare ui_slider $eg3kt(-2400, 2400)
|
|
make_persistent($eg3kt)
|
|
set_control_par_str(get_ui_id($eg3kt),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
|
|
declare ui_menu $2vyff
|
|
make_persistent($2vyff)
|
|
set_control_par_str(get_ui_id($2vyff),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($2vyff,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($2vyff),search(%bnygy,11),0)
|
|
$upapg := 28
|
|
%n34di[$upapg] := get_ui_id($2vyff)
|
|
%nwlgb[$upapg] := get_ui_id($eg3kt)
|
|
!4gjzd[28] := ""
|
|
%c1qym[28] := get_ui_id($eg3kt)
|
|
%41o3s[28] := get_ui_id($c21kk)
|
|
declare ui_label $3kanf(1, 1)
|
|
set_control_par_str(get_ui_id($3kanf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3kanf),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%vvlef[28] := get_ui_id($3kanf)
|
|
declare ui_label $o452l(1, 1)
|
|
set_control_par_str(get_ui_id($o452l),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($o452l),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
|
|
%2hswt[28] := get_ui_id($o452l)
|
|
declare ui_label $gjshz(1, 1)
|
|
set_control_par_str(get_ui_id($gjshz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($gjshz),$CONTROL_PAR_PICTURE,"MK_ind" & "")
|
|
set_control_par(get_ui_id($gjshz),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[28] := get_ui_id($gjshz)
|
|
%qxmpr[28] := 4801
|
|
%oazdd[28] := 100
|
|
!gh3f0[28] := "st"
|
|
?rylw5[28] := 1.0
|
|
%q4mzh[28] := -1
|
|
%vc4gu[28] := 100000
|
|
%hpc0e[28] := -1
|
|
%eujmz[28] := -1
|
|
%fogcg[28] := 0
|
|
%5zak5[28] := 0
|
|
%dwdw3[28] := -2400
|
|
%sbnwu[28] := 2400
|
|
%jeswc[28] := 205
|
|
%mnk53[28] := 58
|
|
declare %4dvqi[10] := (get_ui_id($c21kk), get_ui_id($eg3kt), get_ui_id($3kanf), get_ui_id($o452l), get_ui_id($gjshz), get_ui_id($2vyff), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4dvqi))
|
|
%xwg5s[580+$g5k3r] := %4dvqi[$g5k3r]
|
|
%cqg2m[58] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $uvcxk(-24, 24)
|
|
make_persistent($uvcxk)
|
|
declare ui_slider $ia54c(-24, 24)
|
|
make_persistent($ia54c)
|
|
set_control_par_str(get_ui_id($ia54c),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
|
|
declare ui_menu $wh1ke
|
|
make_persistent($wh1ke)
|
|
set_control_par_str(get_ui_id($wh1ke),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($wh1ke,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($wh1ke),search(%bnygy,11),0)
|
|
$upapg := 29
|
|
%n34di[$upapg] := get_ui_id($wh1ke)
|
|
%nwlgb[$upapg] := get_ui_id($ia54c)
|
|
!4gjzd[29] := "_8"
|
|
%c1qym[29] := get_ui_id($ia54c)
|
|
%41o3s[29] := get_ui_id($uvcxk)
|
|
declare ui_label $jf3np(1, 1)
|
|
set_control_par_str(get_ui_id($jf3np),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jf3np),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%vvlef[29] := get_ui_id($jf3np)
|
|
declare ui_label $nqle0(1, 1)
|
|
set_control_par_str(get_ui_id($nqle0),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nqle0),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
|
|
%2hswt[29] := get_ui_id($nqle0)
|
|
declare ui_label $5cguo(1, 1)
|
|
set_control_par_str(get_ui_id($5cguo),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5cguo),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
|
|
set_control_par(get_ui_id($5cguo),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[29] := get_ui_id($5cguo)
|
|
%qxmpr[29] := 49
|
|
%oazdd[29] := 1
|
|
!gh3f0[29] := "st"
|
|
?rylw5[29] := 1.0
|
|
%q4mzh[29] := -1
|
|
%vc4gu[29] := 100000
|
|
%hpc0e[29] := -1
|
|
%eujmz[29] := -1
|
|
%fogcg[29] := 0
|
|
%5zak5[29] := 0
|
|
%dwdw3[29] := -24
|
|
%sbnwu[29] := 24
|
|
%jeswc[29] := 215
|
|
%mnk53[29] := 25
|
|
declare %eibhx[10] := (get_ui_id($uvcxk), get_ui_id($ia54c), get_ui_id($jf3np), get_ui_id($nqle0), get_ui_id($5cguo), get_ui_id($wh1ke), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%eibhx))
|
|
%xwg5s[250+$g5k3r] := %eibhx[$g5k3r]
|
|
%cqg2m[25] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $dgu14(0, 10000)
|
|
make_persistent($dgu14)
|
|
declare ui_slider $5l3um(-10000, 10000)
|
|
make_persistent($5l3um)
|
|
set_control_par_str(get_ui_id($5l3um),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
|
|
declare ui_menu $f4o1c
|
|
make_persistent($f4o1c)
|
|
set_control_par_str(get_ui_id($f4o1c),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($f4o1c,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_visibility(get_ui_id($f4o1c),search(%bnygy,11),0)
|
|
$upapg := 30
|
|
%n34di[$upapg] := get_ui_id($f4o1c)
|
|
%nwlgb[$upapg] := get_ui_id($5l3um)
|
|
!4gjzd[30] := "_9"
|
|
%c1qym[30] := get_ui_id($5l3um)
|
|
%41o3s[30] := get_ui_id($dgu14)
|
|
declare ui_label $pxdpf(1, 1)
|
|
set_control_par_str(get_ui_id($pxdpf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pxdpf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
|
|
%vvlef[30] := get_ui_id($pxdpf)
|
|
declare ui_label $tiqgq(1, 1)
|
|
set_control_par_str(get_ui_id($tiqgq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($tiqgq),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
|
|
%2hswt[30] := get_ui_id($tiqgq)
|
|
declare ui_label $ra3pk(1, 1)
|
|
set_control_par_str(get_ui_id($ra3pk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ra3pk),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
|
|
set_control_par(get_ui_id($ra3pk),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[30] := get_ui_id($ra3pk)
|
|
%qxmpr[30] := 10001
|
|
%oazdd[30] := 100
|
|
!gh3f0[30] := "%"
|
|
?rylw5[30] := 1.0
|
|
%q4mzh[30] := -1
|
|
%vc4gu[30] := 100000
|
|
%hpc0e[30] := -1
|
|
%eujmz[30] := -1
|
|
%fogcg[30] := 0
|
|
%5zak5[30] := 0
|
|
%dwdw3[30] := 0
|
|
%sbnwu[30] := 10000
|
|
%jeswc[30] := 234
|
|
%mnk53[30] := 135
|
|
declare %rkg4w[10] := (get_ui_id($dgu14), get_ui_id($5l3um), get_ui_id($pxdpf), get_ui_id($tiqgq), get_ui_id($ra3pk), get_ui_id($f4o1c), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%rkg4w))
|
|
%xwg5s[1350+$g5k3r] := %rkg4w[$g5k3r]
|
|
%cqg2m[135] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $u51dh(0, 1000000)
|
|
make_persistent($u51dh)
|
|
set_control_par(get_ui_id($u51dh),$CONTROL_PAR_DEFAULT_VALUE,10)
|
|
set_control_par_str(get_ui_id($u51dh),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[5] := get_ui_id($u51dh)
|
|
declare ui_label $zmfxo(1, 1)
|
|
%5comw[5] := get_ui_id($zmfxo)
|
|
set_control_par_str(get_ui_id($zmfxo),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zmfxo),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[5] := 0
|
|
%ha0dc[5] := 1000001
|
|
%cy2pa[5] := 1
|
|
!5hawr[5] := "ms"
|
|
!znpd1[5] := ""
|
|
%i5z0e[5] := $ENGINE_PAR_ATTACK
|
|
%qpgwq[5] := 100001
|
|
%bjbtn[5] := 0
|
|
%c40o1[5] := -1
|
|
%aebtw[5] := 0
|
|
%hgu5c[5] := 1000000
|
|
%gndxq[5] := 211
|
|
%ipim0[5] := 34
|
|
declare %0twpb[2] := (get_ui_id($u51dh), get_ui_id($zmfxo))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%0twpb))
|
|
%xwg5s[340+$g5k3r] := %0twpb[$g5k3r]
|
|
%cqg2m[34] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $2qveo(0, 1000000)
|
|
make_persistent($2qveo)
|
|
set_control_par(get_ui_id($2qveo),$CONTROL_PAR_DEFAULT_VALUE,10)
|
|
set_control_par_str(get_ui_id($2qveo),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[6] := get_ui_id($2qveo)
|
|
declare ui_label $aofrc(1, 1)
|
|
%5comw[6] := get_ui_id($aofrc)
|
|
set_control_par_str(get_ui_id($aofrc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($aofrc),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[6] := 0
|
|
%ha0dc[6] := 1000001
|
|
%cy2pa[6] := 1
|
|
!5hawr[6] := "ms"
|
|
!znpd1[6] := ""
|
|
%i5z0e[6] := $ENGINE_PAR_DECAY
|
|
%qpgwq[6] := 100001
|
|
%bjbtn[6] := 0
|
|
%c40o1[6] := -1
|
|
%aebtw[6] := 0
|
|
%hgu5c[6] := 1000000
|
|
%gndxq[6] := 212
|
|
%ipim0[6] := 35
|
|
declare %zruwj[2] := (get_ui_id($2qveo), get_ui_id($aofrc))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zruwj))
|
|
%xwg5s[350+$g5k3r] := %zruwj[$g5k3r]
|
|
%cqg2m[35] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $fjnu3(0, 1000000)
|
|
make_persistent($fjnu3)
|
|
set_control_par(get_ui_id($fjnu3),$CONTROL_PAR_DEFAULT_VALUE,1000000)
|
|
set_control_par_str(get_ui_id($fjnu3),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[7] := get_ui_id($fjnu3)
|
|
declare ui_label $mlzzs(1, 1)
|
|
%5comw[7] := get_ui_id($mlzzs)
|
|
set_control_par_str(get_ui_id($mlzzs),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mlzzs),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[7] := 0
|
|
%ha0dc[7] := 1000001
|
|
%cy2pa[7] := 1
|
|
!5hawr[7] := "dB"
|
|
!znpd1[7] := ""
|
|
%i5z0e[7] := $ENGINE_PAR_SUSTAIN
|
|
%qpgwq[7] := 100001
|
|
%bjbtn[7] := 0
|
|
%c40o1[7] := -1
|
|
%aebtw[7] := 0
|
|
%hgu5c[7] := 1000000
|
|
%gndxq[7] := 213
|
|
%ipim0[7] := 36
|
|
declare %vhz1n[2] := (get_ui_id($fjnu3), get_ui_id($mlzzs))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%vhz1n))
|
|
%xwg5s[360+$g5k3r] := %vhz1n[$g5k3r]
|
|
%cqg2m[36] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $tz115(0, 1000000)
|
|
make_persistent($tz115)
|
|
set_control_par(get_ui_id($tz115),$CONTROL_PAR_DEFAULT_VALUE,750000)
|
|
set_control_par_str(get_ui_id($tz115),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[8] := get_ui_id($tz115)
|
|
declare ui_label $4xd05(1, 1)
|
|
%5comw[8] := get_ui_id($4xd05)
|
|
set_control_par_str(get_ui_id($4xd05),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4xd05),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[8] := 0
|
|
%ha0dc[8] := 1000001
|
|
%cy2pa[8] := 1
|
|
!5hawr[8] := "ms"
|
|
!znpd1[8] := ""
|
|
%i5z0e[8] := $ENGINE_PAR_RELEASE
|
|
%qpgwq[8] := 100001
|
|
%bjbtn[8] := 0
|
|
%c40o1[8] := -1
|
|
%aebtw[8] := 0
|
|
%hgu5c[8] := 1000000
|
|
%gndxq[8] := 214
|
|
%ipim0[8] := 37
|
|
declare %zfpd4[2] := (get_ui_id($tz115), get_ui_id($4xd05))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zfpd4))
|
|
%xwg5s[370+$g5k3r] := %zfpd4[$g5k3r]
|
|
%cqg2m[37] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $2d1qh(0, 1000000)
|
|
make_persistent($2d1qh)
|
|
set_control_par(get_ui_id($2d1qh),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($2d1qh),$CONTROL_PAR_PICTURE,"GE_ATT_CURV")
|
|
%aazjf[9] := get_ui_id($2d1qh)
|
|
declare ui_label $5lpyg(1, 1)
|
|
%5comw[9] := get_ui_id($5lpyg)
|
|
set_control_par_str(get_ui_id($5lpyg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5lpyg),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%qdiwi[9] := 0
|
|
%ha0dc[9] := 1000001
|
|
%cy2pa[9] := 1
|
|
!5hawr[9] := "%"
|
|
!znpd1[9] := ""
|
|
%i5z0e[9] := $ENGINE_PAR_ATK_CURVE
|
|
%qpgwq[9] := 100001
|
|
%bjbtn[9] := 0
|
|
%c40o1[9] := -1
|
|
%aebtw[9] := 0
|
|
%hgu5c[9] := 1000000
|
|
%gndxq[9] := 218
|
|
%ipim0[9] := 136
|
|
declare %ly0h1[2] := (get_ui_id($2d1qh), get_ui_id($5lpyg))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ly0h1))
|
|
%xwg5s[1360+$g5k3r] := %ly0h1[$g5k3r]
|
|
%cqg2m[136] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare %p41k2[29] := ($FILTER_TYPE_LP1POLE, $FILTER_TYPE_LP2POLE, $FILTER_TYPE_LP4POLE, $FILTER_TYPE_HP2POLE, $FILTER_TYPE_HP4POLE, $FILTER_TYPE_BP2POLE, $FILTER_TYPE_BP4POLE, $FILTER_TYPE_BR4POLE, $FILTER_TYPE_LP6POLE, $FILTER_TYPE_PHASER, $FILTER_TYPE_VOWELA, $FILTER_TYPE_VOWELB, $FILTER_TYPE_DAFT_LP, $FILTER_TYPE_SV_LP2, $FILTER_TYPE_SV_LP4, $FILTER_TYPE_LDR_LP2, $FILTER_TYPE_LDR_LP3, $FILTER_TYPE_LDR_LP4, $FILTER_TYPE_SV_HP2, $FILTER_TYPE_SV_HP4, $FILTER_TYPE_LDR_HP2, $FILTER_TYPE_LDR_HP3, $FILTER_TYPE_LDR_HP4, $FILTER_TYPE_DAFT_HP, $FILTER_TYPE_SV_BP2, $FILTER_TYPE_SV_BP4, $FILTER_TYPE_LDR_BP2, $FILTER_TYPE_LDR_BP4, $FILTER_TYPE_SV_NOTCH4)
|
|
declare ui_slider $ufbsw(0, 1000000)
|
|
make_persistent($ufbsw)
|
|
declare ui_slider $3s02f(-1000001, 1000001)
|
|
make_persistent($3s02f)
|
|
set_control_par_str(get_ui_id($3s02f),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
|
|
declare ui_menu $3rcax
|
|
make_persistent($3rcax)
|
|
set_control_par_str(get_ui_id($3rcax),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($3rcax,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($3rcax),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 31
|
|
%n34di[$upapg] := get_ui_id($3rcax)
|
|
%nwlgb[$upapg] := get_ui_id($3s02f)
|
|
!4gjzd[31] := "_9"
|
|
%c1qym[31] := get_ui_id($3s02f)
|
|
%41o3s[31] := get_ui_id($ufbsw)
|
|
declare ui_label $spuzv(1, 1)
|
|
set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
|
|
%vvlef[31] := get_ui_id($spuzv)
|
|
declare ui_label $l4c5p(1, 1)
|
|
set_control_par_str(get_ui_id($l4c5p),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($l4c5p),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
|
|
%2hswt[31] := get_ui_id($l4c5p)
|
|
declare ui_label $fatqb(1, 1)
|
|
set_control_par_str(get_ui_id($fatqb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fatqb),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
|
|
set_control_par(get_ui_id($fatqb),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[31] := get_ui_id($fatqb)
|
|
%qxmpr[31] := 1000001
|
|
%oazdd[31] := 1
|
|
!gh3f0[31] := "Hz"
|
|
?rylw5[31] := 1.0
|
|
%q4mzh[31] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[31] := 100001
|
|
%hpc0e[31] := 0
|
|
%eujmz[31] := -1
|
|
%fogcg[31] := 0
|
|
%5zak5[31] := 0
|
|
%dwdw3[31] := 0
|
|
%sbnwu[31] := 1000000
|
|
%jeswc[31] := 222
|
|
%mnk53[31] := 31
|
|
declare %r4x1y[10] := (get_ui_id($ufbsw), get_ui_id($3s02f), get_ui_id($spuzv), get_ui_id($l4c5p), get_ui_id($fatqb), get_ui_id($3rcax), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%r4x1y))
|
|
%xwg5s[310+$g5k3r] := %r4x1y[$g5k3r]
|
|
%cqg2m[31] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $maq5o(0, 1000000)
|
|
make_persistent($maq5o)
|
|
declare ui_slider $410y5(-1000001, 1000001)
|
|
make_persistent($410y5)
|
|
set_control_par_str(get_ui_id($410y5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
|
|
declare ui_menu $5qrmj
|
|
make_persistent($5qrmj)
|
|
set_control_par_str(get_ui_id($5qrmj),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($5qrmj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($5qrmj),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 32
|
|
%n34di[$upapg] := get_ui_id($5qrmj)
|
|
%nwlgb[$upapg] := get_ui_id($410y5)
|
|
!4gjzd[32] := "_9"
|
|
%c1qym[32] := get_ui_id($410y5)
|
|
%41o3s[32] := get_ui_id($maq5o)
|
|
declare ui_label $g5hlh(1, 1)
|
|
set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
|
|
%vvlef[32] := get_ui_id($g5hlh)
|
|
declare ui_label $vyk31(1, 1)
|
|
set_control_par_str(get_ui_id($vyk31),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vyk31),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
|
|
%2hswt[32] := get_ui_id($vyk31)
|
|
declare ui_label $1gwq3(1, 1)
|
|
set_control_par_str(get_ui_id($1gwq3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1gwq3),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
|
|
set_control_par(get_ui_id($1gwq3),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[32] := get_ui_id($1gwq3)
|
|
%qxmpr[32] := 1000001
|
|
%oazdd[32] := 1
|
|
!gh3f0[32] := "%"
|
|
?rylw5[32] := 1.0
|
|
%q4mzh[32] := $ENGINE_PAR_RESONANCE
|
|
%vc4gu[32] := 100001
|
|
%hpc0e[32] := 0
|
|
%eujmz[32] := -1
|
|
%fogcg[32] := 0
|
|
%5zak5[32] := 0
|
|
%dwdw3[32] := 0
|
|
%sbnwu[32] := 1000000
|
|
%jeswc[32] := 225
|
|
%mnk53[32] := 32
|
|
declare %p40ng[10] := (get_ui_id($maq5o), get_ui_id($410y5), get_ui_id($g5hlh), get_ui_id($vyk31), get_ui_id($1gwq3), get_ui_id($5qrmj), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%p40ng))
|
|
%xwg5s[320+$g5k3r] := %p40ng[$g5k3r]
|
|
%cqg2m[32] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $lqoqt(0, 1000000)
|
|
make_persistent($lqoqt)
|
|
declare ui_slider $begpw(-1000001, 1000001)
|
|
make_persistent($begpw)
|
|
set_control_par_str(get_ui_id($begpw),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
|
|
declare ui_menu $f0ljx
|
|
make_persistent($f0ljx)
|
|
set_control_par_str(get_ui_id($f0ljx),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($f0ljx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($f0ljx),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 33
|
|
%n34di[$upapg] := get_ui_id($f0ljx)
|
|
%nwlgb[$upapg] := get_ui_id($begpw)
|
|
!4gjzd[33] := "_9"
|
|
%c1qym[33] := get_ui_id($begpw)
|
|
%41o3s[33] := get_ui_id($lqoqt)
|
|
declare ui_label $w0i5l(1, 1)
|
|
set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
|
|
%vvlef[33] := get_ui_id($w0i5l)
|
|
declare ui_label $v353e(1, 1)
|
|
set_control_par_str(get_ui_id($v353e),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($v353e),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
|
|
%2hswt[33] := get_ui_id($v353e)
|
|
declare ui_label $z11n5(1, 1)
|
|
set_control_par_str(get_ui_id($z11n5),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($z11n5),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
|
|
set_control_par(get_ui_id($z11n5),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[33] := get_ui_id($z11n5)
|
|
%qxmpr[33] := 1000001
|
|
%oazdd[33] := 1
|
|
!gh3f0[33] := "db"
|
|
?rylw5[33] := 1.0
|
|
%q4mzh[33] := $ENGINE_PAR_GAIN
|
|
%vc4gu[33] := 100001
|
|
%hpc0e[33] := 0
|
|
%eujmz[33] := -1
|
|
%fogcg[33] := 0
|
|
%5zak5[33] := 0
|
|
%dwdw3[33] := 0
|
|
%sbnwu[33] := 1000000
|
|
%jeswc[33] := 228
|
|
%mnk53[33] := 33
|
|
declare %nkdoq[10] := (get_ui_id($lqoqt), get_ui_id($begpw), get_ui_id($w0i5l), get_ui_id($v353e), get_ui_id($z11n5), get_ui_id($f0ljx), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%nkdoq))
|
|
%xwg5s[330+$g5k3r] := %nkdoq[$g5k3r]
|
|
%cqg2m[33] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $zqnbc(-1000000, 1000000)
|
|
make_persistent($zqnbc)
|
|
declare ui_slider $llm0i(-2000001, 2000001)
|
|
make_persistent($llm0i)
|
|
set_control_par_str(get_ui_id($llm0i),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
|
|
declare ui_menu $5m5qp
|
|
make_persistent($5m5qp)
|
|
set_control_par_str(get_ui_id($5m5qp),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($5m5qp,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($5m5qp),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 34
|
|
%n34di[$upapg] := get_ui_id($5m5qp)
|
|
%nwlgb[$upapg] := get_ui_id($llm0i)
|
|
!4gjzd[34] := "_9"
|
|
%c1qym[34] := get_ui_id($llm0i)
|
|
%41o3s[34] := get_ui_id($zqnbc)
|
|
declare ui_label $a45pv(1, 1)
|
|
set_control_par_str(get_ui_id($a45pv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($a45pv),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
|
|
%vvlef[34] := get_ui_id($a45pv)
|
|
declare ui_label $axt0a(1, 1)
|
|
set_control_par_str(get_ui_id($axt0a),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($axt0a),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
|
|
%2hswt[34] := get_ui_id($axt0a)
|
|
declare ui_label $vgnmk(1, 1)
|
|
set_control_par_str(get_ui_id($vgnmk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vgnmk),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
|
|
set_control_par(get_ui_id($vgnmk),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[34] := get_ui_id($vgnmk)
|
|
%qxmpr[34] := 2000001
|
|
%oazdd[34] := 1
|
|
!gh3f0[34] := "%"
|
|
?rylw5[34] := 1.0
|
|
%q4mzh[34] := $ENGINE_PAR_MOD_TARGET_INTENSITY
|
|
%vc4gu[34] := 100001
|
|
%hpc0e[34] := 1
|
|
%eujmz[34] := 0
|
|
%fogcg[34] := 0
|
|
%5zak5[34] := 0
|
|
%dwdw3[34] := -1000000
|
|
%sbnwu[34] := 1000000
|
|
%jeswc[34] := 231
|
|
%mnk53[34] := 61
|
|
declare %sf5kb[10] := (get_ui_id($zqnbc), get_ui_id($llm0i), get_ui_id($a45pv), get_ui_id($axt0a), get_ui_id($vgnmk), get_ui_id($5m5qp), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%sf5kb))
|
|
%xwg5s[610+$g5k3r] := %sf5kb[$g5k3r]
|
|
%cqg2m[61] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $az3wx(0, 1000000)
|
|
make_persistent($az3wx)
|
|
set_control_par(get_ui_id($az3wx),$CONTROL_PAR_DEFAULT_VALUE,10)
|
|
set_control_par_str(get_ui_id($az3wx),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[10] := get_ui_id($az3wx)
|
|
declare ui_label $4y32f(1, 1)
|
|
%5comw[10] := get_ui_id($4y32f)
|
|
set_control_par_str(get_ui_id($4y32f),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4y32f),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[10] := 0
|
|
%ha0dc[10] := 1000001
|
|
%cy2pa[10] := 1
|
|
!5hawr[10] := "ms"
|
|
!znpd1[10] := ""
|
|
%i5z0e[10] := $ENGINE_PAR_ATTACK
|
|
%qpgwq[10] := 100001
|
|
%bjbtn[10] := 1
|
|
%c40o1[10] := -1
|
|
%aebtw[10] := 0
|
|
%hgu5c[10] := 1000000
|
|
%gndxq[10] := 250
|
|
%ipim0[10] := 50
|
|
declare %xhb1b[2] := (get_ui_id($az3wx), get_ui_id($4y32f))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%xhb1b))
|
|
%xwg5s[500+$g5k3r] := %xhb1b[$g5k3r]
|
|
%cqg2m[50] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ki4hc(0, 1000000)
|
|
make_persistent($ki4hc)
|
|
set_control_par(get_ui_id($ki4hc),$CONTROL_PAR_DEFAULT_VALUE,10)
|
|
set_control_par_str(get_ui_id($ki4hc),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[11] := get_ui_id($ki4hc)
|
|
declare ui_label $h4yqj(1, 1)
|
|
%5comw[11] := get_ui_id($h4yqj)
|
|
set_control_par_str(get_ui_id($h4yqj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($h4yqj),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[11] := 0
|
|
%ha0dc[11] := 1000001
|
|
%cy2pa[11] := 1
|
|
!5hawr[11] := "ms"
|
|
!znpd1[11] := ""
|
|
%i5z0e[11] := $ENGINE_PAR_DECAY
|
|
%qpgwq[11] := 100001
|
|
%bjbtn[11] := 1
|
|
%c40o1[11] := -1
|
|
%aebtw[11] := 0
|
|
%hgu5c[11] := 1000000
|
|
%gndxq[11] := 251
|
|
%ipim0[11] := 51
|
|
declare %sstxg[2] := (get_ui_id($ki4hc), get_ui_id($h4yqj))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%sstxg))
|
|
%xwg5s[510+$g5k3r] := %sstxg[$g5k3r]
|
|
%cqg2m[51] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $y4fhf(0, 1000000)
|
|
make_persistent($y4fhf)
|
|
set_control_par(get_ui_id($y4fhf),$CONTROL_PAR_DEFAULT_VALUE,1000000)
|
|
set_control_par_str(get_ui_id($y4fhf),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[12] := get_ui_id($y4fhf)
|
|
declare ui_label $ywygd(1, 1)
|
|
%5comw[12] := get_ui_id($ywygd)
|
|
set_control_par_str(get_ui_id($ywygd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ywygd),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[12] := 0
|
|
%ha0dc[12] := 1000001
|
|
%cy2pa[12] := 1
|
|
!5hawr[12] := "dB"
|
|
!znpd1[12] := ""
|
|
%i5z0e[12] := $ENGINE_PAR_SUSTAIN
|
|
%qpgwq[12] := 100001
|
|
%bjbtn[12] := 1
|
|
%c40o1[12] := -1
|
|
%aebtw[12] := 0
|
|
%hgu5c[12] := 1000000
|
|
%gndxq[12] := 252
|
|
%ipim0[12] := 52
|
|
declare %talpk[2] := (get_ui_id($y4fhf), get_ui_id($ywygd))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%talpk))
|
|
%xwg5s[520+$g5k3r] := %talpk[$g5k3r]
|
|
%cqg2m[52] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $cfneg(0, 1000000)
|
|
make_persistent($cfneg)
|
|
set_control_par(get_ui_id($cfneg),$CONTROL_PAR_DEFAULT_VALUE,750000)
|
|
set_control_par_str(get_ui_id($cfneg),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
|
|
%aazjf[13] := get_ui_id($cfneg)
|
|
declare ui_label $rorqz(1, 1)
|
|
%5comw[13] := get_ui_id($rorqz)
|
|
set_control_par_str(get_ui_id($rorqz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rorqz),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
|
|
%qdiwi[13] := 0
|
|
%ha0dc[13] := 1000001
|
|
%cy2pa[13] := 1
|
|
!5hawr[13] := "ms"
|
|
!znpd1[13] := ""
|
|
%i5z0e[13] := $ENGINE_PAR_RELEASE
|
|
%qpgwq[13] := 100001
|
|
%bjbtn[13] := 1
|
|
%c40o1[13] := -1
|
|
%aebtw[13] := 0
|
|
%hgu5c[13] := 1000000
|
|
%gndxq[13] := 253
|
|
%ipim0[13] := 53
|
|
declare %mmgl1[2] := (get_ui_id($cfneg), get_ui_id($rorqz))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%mmgl1))
|
|
%xwg5s[530+$g5k3r] := %mmgl1[$g5k3r]
|
|
%cqg2m[53] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_switch $dyo2q
|
|
make_persistent($dyo2q)
|
|
set_control_par_str(get_ui_id($dyo2q),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dyo2q),$CONTROL_PAR_PICTURE,"GE_SMPL_KT_BTN")
|
|
$g5k3r := 0
|
|
while (%xwg5s[250+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[250+$g5k3r] := get_ui_id($dyo2q)
|
|
declare %1iv2s[2]
|
|
make_instr_persistent(%1iv2s)
|
|
declare ui_switch $linka
|
|
make_persistent($linka)
|
|
set_control_par_str(get_ui_id($linka),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($linka),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_0")
|
|
$g5k3r := 0
|
|
while (%xwg5s[40+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[40+$g5k3r] := get_ui_id($linka)
|
|
declare ui_switch $lk05f
|
|
make_persistent($lk05f)
|
|
set_control_par_str(get_ui_id($lk05f),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($lk05f),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_0")
|
|
declare ui_menu $2qtv2
|
|
make_persistent($2qtv2)
|
|
set_control_par_str(get_ui_id($2qtv2),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_button $hmrz5
|
|
set_control_par_str(get_ui_id($hmrz5),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hmrz5),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
|
|
declare ui_button $4cstx
|
|
set_control_par_str(get_ui_id($4cstx),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4cstx),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
|
|
declare %kxrj2[4] := (get_ui_id($lk05f), get_ui_id($2qtv2), get_ui_id($hmrz5), get_ui_id($4cstx))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kxrj2))
|
|
%xwg5s[260+$g5k3r] := %kxrj2[$g5k3r]
|
|
%cqg2m[26] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_level_meter $wawce
|
|
set_control_par(get_ui_id($wawce),$CONTROL_PAR_VERTICAL,1)
|
|
attach_level_meter(get_ui_id($wawce),-1,-1,0,0)
|
|
declare ui_level_meter $a0f5t
|
|
set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_VERTICAL,1)
|
|
attach_level_meter(get_ui_id($a0f5t),-1,-1,1,0)
|
|
declare ui_level_meter $l45sn
|
|
set_control_par(get_ui_id($l45sn),$CONTROL_PAR_VERTICAL,1)
|
|
attach_level_meter(get_ui_id($l45sn),-1,-1,0,1)
|
|
declare ui_level_meter $ewm0k
|
|
set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_VERTICAL,1)
|
|
attach_level_meter(get_ui_id($ewm0k),-1,-1,1,1)
|
|
$g5k3r := 0
|
|
while (%xwg5s[180+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[180+$g5k3r] := get_ui_id($wawce)
|
|
$g5k3r := 0
|
|
while (%xwg5s[180+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[180+$g5k3r] := get_ui_id($a0f5t)
|
|
$g5k3r := 0
|
|
while (%xwg5s[190+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[190+$g5k3r] := get_ui_id($l45sn)
|
|
$g5k3r := 0
|
|
while (%xwg5s[190+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[190+$g5k3r] := get_ui_id($ewm0k)
|
|
declare $tmkul := 0
|
|
declare $tpui1 := 1
|
|
declare $iva44
|
|
declare $tsm3s
|
|
declare %sef3k[128] := (-1)
|
|
declare %medyt[128] := (-1)
|
|
declare %lx5kr[128] := (-1)
|
|
declare $h3axx
|
|
declare %srzwv[128] := (-1)
|
|
declare $rf3ya
|
|
declare $sgrou
|
|
declare ui_switch $2zs5k
|
|
make_persistent($2zs5k)
|
|
$g5k3r := 0
|
|
while (%xwg5s[10+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[10+$g5k3r] := get_ui_id($2zs5k)
|
|
set_control_par_str(get_ui_id($2zs5k),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($2zs5k),$CONTROL_PAR_PICTURE,"GE_KT_BTN")
|
|
declare ui_menu $swg5e
|
|
make_persistent($swg5e)
|
|
$g5k3r := 0
|
|
while (%xwg5s[70+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[70+$g5k3r] := get_ui_id($swg5e)
|
|
$fg4rw := -4
|
|
while ($fg4rw<=4)
|
|
add_menu_item($swg5e,"Form. " & (-$fg4rw*3),-$fg4rw*3)
|
|
inc($fg4rw)
|
|
end while
|
|
set_control_par_str(get_ui_id($swg5e),$CONTROL_PAR_PICTURE,"blank")
|
|
declare %g_frm_shft[264]
|
|
load_array(%g_frm_shft,2)
|
|
declare $oxfyj
|
|
declare $qfspw
|
|
declare $ygbzd
|
|
declare $pfgf4
|
|
declare %mc3xd[16]
|
|
declare $pdzso
|
|
declare $hqjjl
|
|
declare $gcqjr
|
|
declare %hrm2k[96]
|
|
declare %k0ra5[96]
|
|
declare $fijbx
|
|
declare $auli3
|
|
declare %std_smp_l_grp[365] := (-1)
|
|
load_array_str(%std_smp_l_grp,@ugwfc & "std_smp_l_grp.nka")
|
|
%std_smp_l_grp[1] := 1500
|
|
%std_smp_l_grp[5] := 4000
|
|
%std_smp_l_grp[12] := 7000
|
|
%std_smp_l_grp[17] := 7000
|
|
%std_smp_l_grp[18] := 7000
|
|
%std_smp_l_grp[19] := 3500
|
|
%std_smp_l_grp[21] := 7000
|
|
%std_smp_l_grp[24] := 4100
|
|
%std_smp_l_grp[26] := 4000
|
|
%std_smp_l_grp[29] := 6000
|
|
%std_smp_l_grp[31] := 10000
|
|
%std_smp_l_grp[32] := 3000
|
|
%std_smp_l_grp[36] := 7000
|
|
%std_smp_l_grp[40] := 25000
|
|
%std_smp_l_grp[49] := 800
|
|
%std_smp_l_grp[53] := 10000
|
|
%std_smp_l_grp[56] := 1000
|
|
%std_smp_l_grp[58] := 1000
|
|
declare %0wsff[128]
|
|
declare polyphonic $gj552
|
|
declare polyphonic $q2v0i
|
|
declare polyphonic $lgveb
|
|
declare polyphonic $cgeby
|
|
declare $tjpb1
|
|
declare $kexsv
|
|
declare $wfzez
|
|
declare $i11wt
|
|
declare $wo1eq
|
|
declare $uiy0n
|
|
declare $whs1s
|
|
declare $y4ap3
|
|
declare polyphonic $mkoi4
|
|
declare polyphonic $jwx5k
|
|
declare $wmznm
|
|
declare $ma1nd
|
|
declare ~tptmd
|
|
declare $gnlj2
|
|
make_persistent($gnlj2)
|
|
declare $pqpgc
|
|
declare $y1zim
|
|
declare polyphonic $t4gop
|
|
declare polyphonic $h4bci
|
|
declare polyphonic $1wd3b
|
|
declare polyphonic $f2ujt
|
|
declare $ottdr
|
|
declare $hqznn
|
|
declare polyphonic $gm014
|
|
declare $0e0hy
|
|
declare ui_switch $ord01
|
|
make_persistent($ord01)
|
|
set_control_par_str(get_ui_id($ord01),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ord01),$CONTROL_PAR_PICTURE,"MonoPolyBtn")
|
|
declare $n0uzs := -1
|
|
declare ui_switch $xc3po
|
|
make_persistent($xc3po)
|
|
set_control_par_str(get_ui_id($xc3po),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($xc3po),$CONTROL_PAR_PICTURE,"GE_FREE_btn")
|
|
declare ui_menu $va2lk
|
|
make_persistent($va2lk)
|
|
add_menu_item($va2lk,"Continue",0)
|
|
add_menu_item($va2lk,"Force Cursor Left",-1)
|
|
add_menu_item($va2lk,"Force Cursor Right",1)
|
|
set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"blank")
|
|
$g5k3r := 0
|
|
while (%xwg5s[140+$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[140+$g5k3r] := get_ui_id($va2lk)
|
|
declare ui_switch $k21jk
|
|
make_persistent($k21jk)
|
|
set_control_par_str(get_ui_id($k21jk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($k21jk),$CONTROL_PAR_PICTURE,"GE_Link_btn")
|
|
declare $wuu5g
|
|
declare %smp_l_grp[601]
|
|
load_array(%smp_l_grp,2)
|
|
declare %is_mono_src[601] := (1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 1, 1, ...
|
|
1, 1, 1, 1, 1, 0, 1, 1, 0, 0)
|
|
load_array(%is_mono_src,2)
|
|
if (pgs_key_exists(PGS_FUNC))
|
|
pgs_create_key(PGS_FUNC,3)
|
|
end if
|
|
set_num_user_zones(2)
|
|
set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_GROUP,363)
|
|
set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_LOW_KEY,0)
|
|
set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_HIGH_KEY,127)
|
|
set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_HIGH_VELO,127)
|
|
set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_LOW_KEY,0)
|
|
set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_GROUP,364)
|
|
set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_LOW_KEY,0)
|
|
set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_HIGH_KEY,127)
|
|
set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_HIGH_VELO,127)
|
|
set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_LOW_KEY,0)
|
|
declare %tuuuf[365]
|
|
declare %zone_id_C3[365]
|
|
load_array(%zone_id_C3,2)
|
|
%zone_id_C3[363] := %NI_USER_ZONE_IDS[0]
|
|
%zone_id_C3[364] := %NI_USER_ZONE_IDS[1]
|
|
declare $51oxm
|
|
make_persistent($51oxm)
|
|
declare ui_button $1c3gj
|
|
set_control_par_str(get_ui_id($1c3gj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1c3gj),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_label $uekic(1, 1)
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_button $udker
|
|
set_control_par_str(get_ui_id($udker),$CONTROL_PAR_TEXT,"")
|
|
declare ui_button $2ch0u
|
|
set_control_par_str(get_ui_id($2ch0u),$CONTROL_PAR_TEXT,"")
|
|
declare ui_switch $spdyk
|
|
make_persistent($spdyk)
|
|
set_control_par_str(get_ui_id($spdyk),$CONTROL_PAR_HELP,"ALT CLick to toogle between previously selected grain source")
|
|
set_control_par_str(get_ui_id($spdyk),$CONTROL_PAR_TEXT,"")
|
|
declare %jjhsv[5] := (get_ui_id($spdyk), get_ui_id($1c3gj), get_ui_id($udker), get_ui_id($2ch0u), get_ui_id($uekic))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jjhsv))
|
|
%xwg5s[440+$g5k3r] := %jjhsv[$g5k3r]
|
|
%cqg2m[44] := 519
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_button $a2kga
|
|
set_control_par_str(get_ui_id($a2kga),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($a2kga),$CONTROL_PAR_PICTURE,"blank")
|
|
%xwg5s[1410] := get_ui_id($a2kga)
|
|
%cqg2m[141] := 4
|
|
declare ui_button $rppxv
|
|
set_control_par_str(get_ui_id($rppxv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rppxv),$CONTROL_PAR_PICTURE,"blank")
|
|
%xwg5s[1420] := get_ui_id($rppxv)
|
|
%cqg2m[142] := 2
|
|
declare $hdmk1
|
|
make_persistent($hdmk1)
|
|
declare ui_button $mm1ti
|
|
set_control_par_str(get_ui_id($mm1ti),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mm1ti),$CONTROL_PAR_PICTURE,"GE_BLANK_HOVER_BTN_S_0")
|
|
declare ui_label $anchr(1, 1)
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_PICTURE,"GE_SMPL_SRC_NAMES_0")
|
|
declare ui_switch $t4vew
|
|
make_persistent($t4vew)
|
|
set_control_par_str(get_ui_id($t4vew),$CONTROL_PAR_TEXT,"")
|
|
declare ui_button $3r1av
|
|
set_control_par_str(get_ui_id($3r1av),$CONTROL_PAR_TEXT,"")
|
|
declare ui_button $0l4xe
|
|
set_control_par_str(get_ui_id($0l4xe),$CONTROL_PAR_TEXT,"")
|
|
declare %fbbyi[5] := (get_ui_id($t4vew), get_ui_id($mm1ti), get_ui_id($3r1av), get_ui_id($0l4xe), get_ui_id($anchr))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%fbbyi))
|
|
%xwg5s[450+$g5k3r] := %fbbyi[$g5k3r]
|
|
%cqg2m[45] := 519
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_switch $mcp2m
|
|
make_persistent($mcp2m)
|
|
set_control_par_str(get_ui_id($mcp2m),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mcp2m),$CONTROL_PAR_PICTURE,"GE_SMPLE_PB_MODE")
|
|
%xwg5s[1500] := get_ui_id($mcp2m)
|
|
%cqg2m[150] := 4
|
|
declare ?xpxzm[256]
|
|
declare %preset[10000]
|
|
make_persistent(%preset)
|
|
declare $d1d43 := -1
|
|
declare $oppog := 0
|
|
declare $cz3ou := 0
|
|
declare $verq0 := 0
|
|
declare ~bsfi3
|
|
declare ui_waveform $4lo3h(6, 6)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_BG_ALPHA,0)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_BG_COLOR,16777215)
|
|
declare %kte0r[10]
|
|
declare ui_label $lo5d2(1, 1)
|
|
declare ui_label $sc1px(1, 1)
|
|
declare ui_label $hdd2j(1, 1)
|
|
declare ui_label $eqzdl(1, 1)
|
|
declare ui_label $mzaik(1, 1)
|
|
declare ui_label $dbwu0(1, 1)
|
|
declare ui_label $lhztu(1, 1)
|
|
declare ui_label $b54hw(1, 1)
|
|
declare ui_label $hgla5(1, 1)
|
|
declare ui_label $nmdly(1, 1)
|
|
$pvuhq := 0
|
|
while ($pvuhq<=9)
|
|
%kte0r[$pvuhq] := get_ui_id($lo5d2)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_POS_X,20)
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_POS_Y,57)
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_WIDTH,1)
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HEIGHT,107)
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_Z_LAYER,0)
|
|
set_control_par_str(%kte0r[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%kte0r[$fg4rw],$CONTROL_PAR_PICTURE,"GE_GRAIN_CURSOR")
|
|
inc($fg4rw)
|
|
end while
|
|
declare $er442
|
|
declare %dz3eb[10]
|
|
declare ui_xy ?51qxr[2]
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_MOUSE_MODE,2)
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_MOUSE_BEHAVIOUR_X,1000)
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_MOUSE_BEHAVIOUR_Y,1000)
|
|
set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_CURSOR_PICTURE,"GE_g_wf_xy_blank")
|
|
set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_ALLOW_AUTOMATION,0,0)
|
|
set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_ALLOW_AUTOMATION,1,0)
|
|
declare ~chanf
|
|
declare $xpd30
|
|
declare $eyamh
|
|
declare $bygzx
|
|
declare $v5b0i
|
|
declare $r5war
|
|
declare $3rm1t := -2
|
|
declare $ukkxs
|
|
declare $pilpf
|
|
declare ui_button $hnp3t
|
|
set_control_par_str(get_ui_id($hnp3t),$CONTROL_PAR_TEXT,"")
|
|
declare ui_button $q3vtp
|
|
set_control_par_str(get_ui_id($q3vtp),$CONTROL_PAR_TEXT,"")
|
|
declare ui_label $q5i1b(1, 1)
|
|
set_control_par_str(get_ui_id($q5i1b),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($q5i1b),$CONTROL_PAR_PICTURE,"GE_POS_SYNC_ANKER")
|
|
declare ui_label $rbfcs(1, 1)
|
|
set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_PICTURE,"GE_SYNC_RANGE")
|
|
declare ui_mouse_area $v3pyu
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_DND_ACCEPT_AUDIO,$NI_DND_ACCEPT_ONE)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_RECEIVE_DRAG_EVENTS,1)
|
|
declare $zylsx
|
|
declare @4xudw
|
|
make_persistent(@4xudw)
|
|
declare @vzouq
|
|
make_persistent(@vzouq)
|
|
declare ~spjzv := 0.0
|
|
make_persistent(~spjzv)
|
|
declare ~fbacu := 0.0
|
|
make_persistent(~fbacu)
|
|
declare $lxku3
|
|
declare $4l4u3
|
|
declare ui_slider $aewcf(0, 127)
|
|
make_persistent($aewcf)
|
|
set_control_par(get_ui_id($aewcf),$CONTROL_PAR_DEFAULT_VALUE,60)
|
|
set_control_par_str(get_ui_id($aewcf),$CONTROL_PAR_PICTURE,"GE_Note_Names")
|
|
declare ui_button $wzxlg
|
|
set_control_par_str(get_ui_id($wzxlg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wzxlg),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
|
|
declare ui_button $r5bjx
|
|
set_control_par_str(get_ui_id($r5bjx),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($r5bjx),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
|
|
declare %uvj1f[10] := (get_ui_id($4lo3h), get_ui_id($hnp3t), get_ui_id($q3vtp), get_ui_id(?51qxr), get_ui_id($q5i1b), get_ui_id($rbfcs), get_ui_id($aewcf), get_ui_id($wzxlg), get_ui_id($r5bjx), get_ui_id($v3pyu))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%uvj1f))
|
|
%xwg5s[570+$g5k3r] := %uvj1f[$g5k3r]
|
|
%cqg2m[57] := 514
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_value_edit $y1mc2(1, 16, 1)
|
|
make_persistent($y1mc2)
|
|
set_control_par_str(get_ui_id($y1mc2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($y1mc2),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($y1mc2),$CONTROL_PAR_SHOW_ARROWS,0)
|
|
declare ui_button $fdz1c
|
|
set_control_par_str(get_ui_id($fdz1c),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fdz1c),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
|
|
declare ui_button $b2d3h
|
|
set_control_par_str(get_ui_id($b2d3h),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($b2d3h),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
|
|
declare ?qedta[29] := (0.005208333333333333, 0.005859375, 0.0078125, 0.010416666666666666, 0.01171875, 0.015625, 0.020833333333333332, 0.0234375, 0.03125, 0.041666666666666664, 0.046875, 0.0625, 0.08333333333333333, 0.09375, 0.125, 0.16666666666666666, 0.1875, 0.2, 0.25, 0.3333333333333333, 0.375, 0.5, 0.6666666666666666, 0.75, 1.0, 1.5, 2.0, 3.0, -1.0)
|
|
declare !qeoj3[29]
|
|
!qeoj3[0] := "1/512 trip"
|
|
!qeoj3[1] := "1/1024 dot"
|
|
!qeoj3[2] := "1/512"
|
|
!qeoj3[3] := "1/256 trip"
|
|
!qeoj3[4] := "1/512 dot"
|
|
!qeoj3[5] := "1/256"
|
|
!qeoj3[6] := "1/128 trip"
|
|
!qeoj3[7] := "1/256 dot"
|
|
!qeoj3[8] := "1/128"
|
|
!qeoj3[9] := "1/64 trip"
|
|
!qeoj3[10] := "1/128 dot"
|
|
!qeoj3[11] := "1/64"
|
|
!qeoj3[12] := "1/32 trip"
|
|
!qeoj3[13] := "1/64 dot"
|
|
!qeoj3[14] := "1/32"
|
|
!qeoj3[15] := "1/16 trip"
|
|
!qeoj3[16] := "1/32 dot"
|
|
!qeoj3[17] := "4/5"
|
|
!qeoj3[18] := "1/16"
|
|
!qeoj3[19] := "1/8 trip"
|
|
!qeoj3[20] := "1/16 dot"
|
|
!qeoj3[21] := "1/8"
|
|
!qeoj3[22] := "1/4 trip"
|
|
!qeoj3[23] := "1/8 dot"
|
|
!qeoj3[24] := "1/4"
|
|
!qeoj3[25] := "1/4 dot"
|
|
!qeoj3[26] := "1/2"
|
|
!qeoj3[27] := "3/4"
|
|
!qeoj3[28] := "1 Bar"
|
|
declare $gv5ha
|
|
declare %pzp2y[2]
|
|
make_instr_persistent(%pzp2y)
|
|
declare ui_switch $p5wl1
|
|
make_persistent($p5wl1)
|
|
set_control_par_str(get_ui_id($p5wl1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($p5wl1),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_0")
|
|
$g5k3r := 0
|
|
while (%xwg5s[$g5k3r]>0 and ($g5k3r<10))
|
|
inc($g5k3r)
|
|
end while
|
|
%xwg5s[$g5k3r] := get_ui_id($p5wl1)
|
|
declare $b1esx
|
|
declare $xrt5z
|
|
make_persistent($xrt5z)
|
|
declare ui_switch $neagb
|
|
make_persistent($neagb)
|
|
set_control_par_str(get_ui_id($neagb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($neagb),$CONTROL_PAR_PICTURE,"GE_bounce_btn")
|
|
declare %zwhw5[7] := (get_ui_id($k21jk), get_ui_id($neagb), get_ui_id($ord01), get_ui_id($xc3po), get_ui_id($y1mc2), get_ui_id($fdz1c), get_ui_id($b2d3h))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zwhw5))
|
|
%xwg5s[560+$g5k3r] := %zwhw5[$g5k3r]
|
|
%cqg2m[56] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_waveform $tmcuy(6, 6)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_BG_ALPHA,0)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_BG_COLOR,16777215)
|
|
declare ui_xy ?3lzme[2]
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_MOUSE_MODE,2)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_MOUSE_BEHAVIOUR_X,1000)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_MOUSE_BEHAVIOUR_Y,1000)
|
|
set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_CURSOR_PICTURE,"GE_g_wf_xy_blank")
|
|
declare $rlhoi
|
|
declare ui_label $brjbw(1, 1)
|
|
set_control_par_str(get_ui_id($brjbw),$CONTROL_PAR_TEXT,"Mono")
|
|
set_control_par_str(get_ui_id($brjbw),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_label $rgqvn(1, 1)
|
|
set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_PICTURE,"GE_START_POINT_IND_SMPL_0")
|
|
declare ui_label $k5o2p(1, 1)
|
|
set_control_par_str(get_ui_id($k5o2p),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($k5o2p),$CONTROL_PAR_PICTURE,"GE_START_RANGE_IND_SMPL")
|
|
declare ui_mouse_area $fi22y
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_DND_ACCEPT_AUDIO,$NI_DND_ACCEPT_ONE)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_RECEIVE_DRAG_EVENTS,1)
|
|
declare $nfr15
|
|
declare @g233i
|
|
make_persistent(@g233i)
|
|
declare @bnt5b
|
|
make_persistent(@bnt5b)
|
|
declare ~qzdh0 := 0.0
|
|
make_persistent(~qzdh0)
|
|
declare ~rhrbs := 0.0
|
|
make_persistent(~rhrbs)
|
|
declare $x1spm
|
|
declare ui_slider $v3y5j(0, 127)
|
|
make_persistent($v3y5j)
|
|
set_control_par(get_ui_id($v3y5j),$CONTROL_PAR_DEFAULT_VALUE,60)
|
|
set_control_par_str(get_ui_id($v3y5j),$CONTROL_PAR_PICTURE,"GE_Note_Names")
|
|
declare ui_button $ozbon
|
|
set_control_par_str(get_ui_id($ozbon),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ozbon),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
|
|
declare ui_button $uceyz
|
|
set_control_par_str(get_ui_id($uceyz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uceyz),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
|
|
declare $a5fyp
|
|
declare $kzyw4 := -2
|
|
declare $lrye0
|
|
declare %oe0tb[9] := (get_ui_id($tmcuy), get_ui_id($brjbw), get_ui_id($rgqvn), get_ui_id($k5o2p), get_ui_id($fi22y), get_ui_id($v3y5j), get_ui_id($ozbon), get_ui_id($uceyz), get_ui_id(?3lzme))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%oe0tb))
|
|
%xwg5s[240+$g5k3r] := %oe0tb[$g5k3r]
|
|
%cqg2m[24] := 516
|
|
inc($g5k3r)
|
|
end while
|
|
declare $tkfsc
|
|
declare $xoacb
|
|
declare ?uya1g[128] := (32.0, 30.203978005814196, 28.50875898049085, 26.908685288118868, 25.398416831491197, 23.9729132300269, 22.62741699796952, 21.357437666720553, 20.158736798317967, 19.027313840043536, 17.959392772949972, 16.95140950974872, 16.0, 15.101989002907095, 14.254379490245432, 13.454342644059434, 12.699208415745595, 11.986456615013454, 11.31370849898476, 10.678718833360273, 10.079368399158986, 9.513656920021768, 8.979696386474982, 8.475704754874362, 8.0, 7.550994501453547, 7.127189745122716, 6.727171322029717, 6.3496042078727974, 5.993228307506727, 5.65685424949238, 5.339359416680137, 5.039684199579493, 4.756828460010884, 4.489848193237491, 4.237852377437181, 4.0, 3.7754972507267737, 3.563594872561357, 3.3635856610148585, 3.1748021039363987, ...
|
|
2.996614153753363, 2.82842712474619, 2.6696797083400687, 2.519842099789746, 2.378414230005442, 2.244924096618746, 2.1189261887185906, 2.0, 1.8877486253633868, 1.7817974362806785, 1.6817928305074292, 1.5874010519681994, 1.4983070768766815, 1.414213562373095, 1.3348398541700344, 1.259921049894873, 1.189207115002721, 1.122462048309373, 1.0594630943592953, 1.0, 0.9438743126816934, 0.8908987181403393, 0.8408964152537146, 0.7937005259840997, 0.7491535384383408, 0.7071067811865475, 0.6674199270850172, 0.6299605249474366, 0.5946035575013605, 0.5612310241546865, 0.5297315471796477, 0.5, 0.4719371563408467, 0.44544935907016964, 0.4204482076268573, 0.39685026299204984, 0.3745767692191704, 0.35355339059327373, 0.3337099635425086, 0.31498026247371824, ...
|
|
0.29730177875068026, 0.28061551207734325, 0.2648657735898238, 0.25, 0.23596857817042335, 0.22272467953508487, 0.21022410381342865, 0.19842513149602492, 0.18728838460958522, 0.17677669529663687, 0.16685498177125427, 0.15749013123685915, 0.14865088937534013, 0.1403077560386716, 0.1324328867949119, 0.125, 0.11798428908521168, 0.11136233976754244, 0.10511205190671433, 0.09921256574801246, 0.09364419230479261, 0.08838834764831843, 0.08342749088562713, 0.07874506561842957, 0.07432544468767006, 0.0701538780193358, 0.06621644339745596, 0.0625, 0.05899214454260585, 0.05568116988377119, 0.05255602595335716, 0.049606282874006244, 0.04682209615239629, 0.044194173824159216, 0.04171374544281358, 0.03937253280921478, 0.03716272234383503, 0.035076939009667914, 0.03310822169872797, 0.03125, ...
|
|
0.029496072271302926, 0.027840584941885595, 0.02627801297667858, 0.024803141437003122, 0.023411048076198145, 0.022097086912079608, 0.02085687272140679)
|
|
declare %_rootkey_offset_for_note[33792]
|
|
load_array(%_rootkey_offset_for_note,2)
|
|
declare $afnek := 0
|
|
declare $1sqif := -8000
|
|
declare %dhweu[2000]
|
|
if (1=1)
|
|
declare @pua5f
|
|
@pua5f := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/SNAPSHOTS/"
|
|
declare $421rl
|
|
make_persistent($421rl)
|
|
declare @3cyqr
|
|
make_persistent(@3cyqr)
|
|
read_persistent_var(@3cyqr)
|
|
declare @cs0dz
|
|
make_persistent(@cs0dz)
|
|
read_persistent_var(@cs0dz)
|
|
declare $luyp1
|
|
declare ui_button $ojlo0
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,@cs0dz)
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_PICTURE,"blank")
|
|
declare ui_switch $0efsn
|
|
set_control_par_str(get_ui_id($0efsn),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0efsn),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
|
|
declare ui_switch $mb40x
|
|
set_control_par_str(get_ui_id($mb40x),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mb40x),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
|
|
declare %wo0a3[3] := (get_ui_id($ojlo0), get_ui_id($0efsn), get_ui_id($mb40x))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%wo0a3))
|
|
%xwg5s[1380+$g5k3r] := %wo0a3[$g5k3r]
|
|
%cqg2m[138] := 527
|
|
inc($g5k3r)
|
|
end while
|
|
declare @4ll3e
|
|
@4ll3e := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/"
|
|
declare %blrx5[6] := (6, 6, 4, 13, 13, 14)
|
|
declare %pjbav[3] := (6, 6, 4)
|
|
declare $lz0yu
|
|
declare $rc1ud
|
|
declare $lpg20
|
|
declare $zor2m
|
|
declare $4ut4g
|
|
declare $5nvbg
|
|
declare $ax53k
|
|
declare $hb51u
|
|
declare $uciwo := 1
|
|
declare $ygbjm
|
|
declare %djxm0[72]
|
|
declare ui_button $4yej1
|
|
declare ui_button $rdzvq
|
|
declare ui_button $ecjm3
|
|
declare ui_button $032h0
|
|
declare ui_button $djvko
|
|
declare ui_button $bmyvz
|
|
declare ui_button $3hydy
|
|
declare ui_button $bcw1j
|
|
declare ui_button $y4p3i
|
|
declare ui_button $f1hl5
|
|
declare ui_button $h23p3
|
|
declare ui_button $0blpx
|
|
declare ui_button $24ihv
|
|
declare ui_button $wzy03
|
|
declare ui_button $hz0mw
|
|
declare ui_button $4tphh
|
|
declare ui_button $0dern
|
|
declare ui_button $v0bpc
|
|
declare ui_button $rtumo
|
|
declare ui_button $4yeq1
|
|
declare ui_button $32nru
|
|
declare ui_button $mzanj
|
|
declare ui_button $oevzy
|
|
declare ui_button $gk2v5
|
|
declare ui_button $ojx3k
|
|
declare ui_button $dyw32
|
|
declare ui_button $brxm1
|
|
declare ui_button $al5ta
|
|
declare ui_button $xsyba
|
|
declare ui_button $5cb23
|
|
declare ui_button $khuwm
|
|
declare ui_button $gucms
|
|
declare ui_button $ivqsn
|
|
declare ui_button $gcccz
|
|
declare ui_button $cs03b
|
|
declare ui_button $5imez
|
|
declare ui_button $gnnlh
|
|
declare ui_button $ttgfi
|
|
declare ui_button $0r5xb
|
|
declare ui_button $f5qo5
|
|
declare ui_button $t1rbt
|
|
declare ui_button $pxzz3
|
|
declare ui_button $eezgv
|
|
declare ui_button $xfckc
|
|
declare ui_button $xbrfy
|
|
declare ui_button $ucgwt
|
|
declare ui_button $y1sxa
|
|
declare ui_button $wuqce
|
|
declare ui_button $nb0wk
|
|
declare ui_button $dwlt2
|
|
declare ui_button $rkmzj
|
|
declare ui_button $4kviy
|
|
declare ui_button $0sgpg
|
|
declare ui_button $u2hf0
|
|
declare ui_button $pvrz1
|
|
declare ui_button $na0ji
|
|
declare ui_button $qysdx
|
|
declare ui_button $etjre
|
|
declare ui_button $wovls
|
|
declare ui_button $baopj
|
|
declare ui_button $ncdss
|
|
declare ui_button $jde44
|
|
declare ui_button $ypsjd
|
|
declare ui_button $uz02i
|
|
declare ui_button $3kkcw
|
|
declare ui_button $n01mf
|
|
declare ui_button $2lp4m
|
|
declare ui_button $nohrb
|
|
declare ui_button $3mr2k
|
|
declare ui_button $1c3mu
|
|
declare ui_button $rmz1j
|
|
declare ui_button $tipqk
|
|
$pvuhq := 0
|
|
while ($pvuhq<=71)
|
|
%djxm0[$pvuhq] := get_ui_id($4yej1)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
declare %wqnrl[19]
|
|
declare ui_button $0ux1w
|
|
declare ui_button $nlbcz
|
|
declare ui_button $md33w
|
|
declare ui_button $pzuhn
|
|
declare ui_button $ec44j
|
|
declare ui_button $g5ega
|
|
declare ui_button $ospiy
|
|
declare ui_button $cryss
|
|
declare ui_button $odkxk
|
|
declare ui_button $1d1qv
|
|
declare ui_button $j41z3
|
|
declare ui_button $0hw3x
|
|
declare ui_button $rttry
|
|
declare ui_button $ume1e
|
|
declare ui_button $acigq
|
|
declare ui_button $fal5w
|
|
declare ui_button $u4kkx
|
|
declare ui_button $fw5ha
|
|
declare ui_button $zosaw
|
|
$pvuhq := 0
|
|
while ($pvuhq<=18)
|
|
%wqnrl[$pvuhq] := get_ui_id($0ux1w)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
declare %4gyqw[19]
|
|
declare ui_button $0rdar
|
|
declare ui_button $mzhrk
|
|
declare ui_button $y1ktm
|
|
declare ui_button $h41x5
|
|
declare ui_button $ogc4a
|
|
declare ui_button $5x50g
|
|
declare ui_button $i1chm
|
|
declare ui_button $gxhbs
|
|
declare ui_button $rm010
|
|
declare ui_button $iafgo
|
|
declare ui_button $obm4g
|
|
declare ui_button $appd1
|
|
declare ui_button $adbg5
|
|
declare ui_button $r5rmc
|
|
declare ui_button $4rran
|
|
declare ui_button $g5s50
|
|
declare ui_button $i02c4
|
|
declare ui_button $0cjtm
|
|
declare ui_button $xaewn
|
|
$pvuhq := 0
|
|
while ($pvuhq<=18)
|
|
%4gyqw[$pvuhq] := get_ui_id($0rdar)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
declare ui_button $d5tn2
|
|
set_control_par_str(get_ui_id($d5tn2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($d5tn2),$CONTROL_PAR_PICTURE,"GE_BRW_STAR")
|
|
set_control_par_str(get_ui_id($d5tn2),$CONTROL_PAR_HELP,"User Favourites Active: Click to only show the presets marked by you as favourites in the search result list. ALT+SHIFT click to reset the favourites for the current preset type.")
|
|
declare ui_button $bbjq4
|
|
set_control_par_str(get_ui_id($bbjq4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($bbjq4),$CONTROL_PAR_PICTURE,"GE_BRW_RESET_BTN")
|
|
declare ui_slider $z2tnd(0, 1000)
|
|
set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_DEFAULT_VALUE,0)
|
|
set_control_par_str(get_ui_id($z2tnd),$CONTROL_PAR_PICTURE,"GE_BRW_ScrollbarSlider")
|
|
set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_MOUSE_BEHAVIOUR,-2350)
|
|
declare ui_label $y0dw3(1, 1)
|
|
set_control_par_str(get_ui_id($y0dw3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($y0dw3),$CONTROL_PAR_PICTURE,"GE_BRW_ScrollbarHandle")
|
|
declare $fykja := 0
|
|
declare ui_label $z3l5q(1, 1)
|
|
declare ui_button $les2u
|
|
set_control_par_str(get_ui_id($les2u),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($les2u),$CONTROL_PAR_PICTURE,"GE_Next_btn_10")
|
|
declare ui_button $wwkuw
|
|
set_control_par_str(get_ui_id($wwkuw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wwkuw),$CONTROL_PAR_PICTURE,"GE_Prev_btn_10")
|
|
declare ui_button $w5s50
|
|
set_control_par_str(get_ui_id($w5s50),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($w5s50),$CONTROL_PAR_PICTURE,"GE_BRW_CLOSE")
|
|
declare %qciup[8] := (get_ui_id($z3l5q), get_ui_id($les2u), get_ui_id($wwkuw), get_ui_id($w5s50), get_ui_id($z2tnd), get_ui_id($y0dw3), get_ui_id($d5tn2), get_ui_id($bbjq4))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%qciup))
|
|
%xwg5s[1390+$g5k3r] := %qciup[$g5k3r]
|
|
%cqg2m[139] := 32
|
|
inc($g5k3r)
|
|
end while
|
|
declare !udzrt[125]
|
|
declare %fgbiy[12] := (10, 5, 8, 18, 10, 5, 8, 15, 13, 5, 14, 14)
|
|
declare %0sc2s[12] := (0, 10, 15, 23, 41, 51, 56, 64, 79, 92, 97, 111)
|
|
declare !pv3hd[10]
|
|
!pv3hd[0] := "Metal"
|
|
!pv3hd[1] := "Wood"
|
|
!pv3hd[2] := "Glass"
|
|
!pv3hd[3] := "Stone"
|
|
!pv3hd[4] := "Carbon"
|
|
!pv3hd[5] := "Vocal"
|
|
!pv3hd[6] := "String"
|
|
!pv3hd[7] := "Electronic"
|
|
!pv3hd[8] := "Noise"
|
|
!pv3hd[9] := "Multiple"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
!udzrt[$vlhs0] := !pv3hd[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !hwst0[5]
|
|
!hwst0[0] := "Steady"
|
|
!hwst0[1] := "Drifting"
|
|
!hwst0[2] := "Bend"
|
|
!hwst0[3] := "Multi Note"
|
|
!hwst0[4] := "Chaotic"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
!udzrt[$vlhs0+10] := !hwst0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !uxxba[8]
|
|
!uxxba[0] := "Bowed"
|
|
!uxxba[1] := "Plucked"
|
|
!uxxba[2] := "Rubbed"
|
|
!uxxba[3] := "Swell"
|
|
!uxxba[4] := "Decaying"
|
|
!uxxba[5] := "Layer"
|
|
!uxxba[6] := "Crossfade"
|
|
!uxxba[7] := "Braam"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
!udzrt[$vlhs0+15] := !uxxba[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !prqnw[18]
|
|
!prqnw[0] := "Transition"
|
|
!prqnw[1] := "Expression"
|
|
!prqnw[2] := "Impact"
|
|
!prqnw[3] := "Energetic"
|
|
!prqnw[4] := "Noisy"
|
|
!prqnw[5] := "Clean"
|
|
!prqnw[6] := "Sub"
|
|
!prqnw[7] := "Suspenseful"
|
|
!prqnw[8] := "Distorted"
|
|
!prqnw[9] := "Airy"
|
|
!prqnw[10] := "Soft"
|
|
!prqnw[11] := "Hard"
|
|
!prqnw[12] := "Natural"
|
|
!prqnw[13] := "Processed"
|
|
!prqnw[14] := "Bright"
|
|
!prqnw[15] := "Dark"
|
|
!prqnw[16] := "Ethereal"
|
|
!prqnw[17] := "Jittery"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<18)
|
|
!udzrt[$vlhs0+23] := !prqnw[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !a2bhu[10]
|
|
!a2bhu[0] := "Instruments"
|
|
!a2bhu[1] := "Percussive"
|
|
!a2bhu[2] := "Hits"
|
|
!a2bhu[3] := "Plucked"
|
|
!a2bhu[4] := "Synth"
|
|
!a2bhu[5] := "Reversed"
|
|
!a2bhu[6] := "Noise"
|
|
!a2bhu[7] := "Cinematic"
|
|
!a2bhu[8] := "Sub"
|
|
!a2bhu[9] := "Arpeggiator"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
!udzrt[$vlhs0+41] := !a2bhu[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !xbcb1[5]
|
|
!xbcb1[0] := "Steady"
|
|
!xbcb1[1] := "Drifting"
|
|
!xbcb1[2] := "Chord"
|
|
!xbcb1[3] := "Keytracking"
|
|
!xbcb1[4] := "Chaotic"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
!udzrt[$vlhs0+51] := !xbcb1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !xpiir[8]
|
|
!xpiir[0] := "Metal"
|
|
!xpiir[1] := "String"
|
|
!xpiir[2] := "Wood"
|
|
!xpiir[3] := "Hybrid"
|
|
!xpiir[4] := "Plastic"
|
|
!xpiir[5] := "Membran"
|
|
!xpiir[6] := "Synthesis"
|
|
!xpiir[7] := "Other"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
!udzrt[$vlhs0+56] := !xpiir[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !kidlm[15]
|
|
!kidlm[0] := "Simple"
|
|
!kidlm[1] := "Complex"
|
|
!kidlm[2] := "Modulating"
|
|
!kidlm[3] := "Impact"
|
|
!kidlm[4] := "Sustained"
|
|
!kidlm[5] := "Noisy"
|
|
!kidlm[6] := "Wide"
|
|
!kidlm[7] := "Airy"
|
|
!kidlm[8] := "Subsonic"
|
|
!kidlm[9] := "Soft"
|
|
!kidlm[10] := "Hard"
|
|
!kidlm[11] := "Natural"
|
|
!kidlm[12] := "Processed"
|
|
!kidlm[13] := "Bright"
|
|
!kidlm[14] := "Dark"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<15)
|
|
!udzrt[$vlhs0+64] := !kidlm[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !pbenq[13]
|
|
!pbenq[0] := "Atmosphere"
|
|
!pbenq[1] := "Pad"
|
|
!pbenq[2] := "Sequence"
|
|
!pbenq[3] := "Pulses"
|
|
!pbenq[4] := "Swell"
|
|
!pbenq[5] := "Bass"
|
|
!pbenq[6] := "Transition"
|
|
!pbenq[7] := "Keys"
|
|
!pbenq[8] := "Decaying"
|
|
!pbenq[9] := "Effect"
|
|
!pbenq[10] := "Sub"
|
|
!pbenq[11] := "Showcase"
|
|
!pbenq[12] := "MPE"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<13)
|
|
!udzrt[$vlhs0+79] := !pbenq[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !dxjxd[5]
|
|
!dxjxd[0] := "Steady"
|
|
!dxjxd[1] := "Varying"
|
|
!dxjxd[2] := "Multiple"
|
|
!dxjxd[3] := "Chord"
|
|
!dxjxd[4] := "Chaotic"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
!udzrt[$vlhs0+92] := !dxjxd[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !q5hdb[14]
|
|
!q5hdb[0] := "Intensity control"
|
|
!q5hdb[1] := "Complex"
|
|
!q5hdb[2] := "Simple"
|
|
!q5hdb[3] := "Keyboard Voicing"
|
|
!q5hdb[4] := "Wide"
|
|
!q5hdb[5] := "Noisy"
|
|
!q5hdb[6] := "Impact"
|
|
!q5hdb[7] := "Soft"
|
|
!q5hdb[8] := "Hard"
|
|
!q5hdb[9] := "Distant"
|
|
!q5hdb[10] := "Distorted"
|
|
!q5hdb[11] := "Bold"
|
|
!q5hdb[12] := "Rhythmic"
|
|
!q5hdb[13] := "Tempo Sync"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<14)
|
|
!udzrt[$vlhs0+97] := !q5hdb[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !rigim[14]
|
|
!rigim[0] := "Dark"
|
|
!rigim[1] := "Delicate"
|
|
!rigim[2] := "Dreamlike"
|
|
!rigim[3] := "Thrilling"
|
|
!rigim[4] := "Suspenseful"
|
|
!rigim[5] := "Eerie"
|
|
!rigim[6] := "Disturbing"
|
|
!rigim[7] := "Dramatic"
|
|
!rigim[8] := "Meditativ"
|
|
!rigim[9] := "Positive"
|
|
!rigim[10] := "Energetic"
|
|
!rigim[11] := "Peaceful"
|
|
!rigim[12] := "Ethereal"
|
|
!rigim[13] := "Ambivalent"
|
|
$vlhs0 := 0
|
|
while ($vlhs0<14)
|
|
!udzrt[$vlhs0+111] := !rigim[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %0mw41[125]
|
|
declare %ey2zb[12] := (10, 5, 8, 18, 10, 5, 8, 15, 13, 5, 14, 14)
|
|
declare %t1pnk[12] := (0, 10, 15, 23, 41, 51, 56, 64, 79, 92, 97, 111)
|
|
declare %vgdie[10] := (0, 1, 2, 3, 4, 5, 6, 8, 9, 7)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
%0mw41[$vlhs0] := %vgdie[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %zdz0v[5] := (10, 11, 12, 13, 14)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
%0mw41[$vlhs0+10] := %zdz0v[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %lw3xc[8] := (15, 16, 17, 18, 19, 20, 21, 22)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
%0mw41[$vlhs0+15] := %lw3xc[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %uflgx[18] := (23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<18)
|
|
%0mw41[$vlhs0+23] := %uflgx[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %nm0as[10] := (1, 2, 3, 4, 5, 6, 7, 8, 11, 13)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
%0mw41[$vlhs0+41] := %nm0as[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %a3sdg[5] := (14, 15, 16, 17, 18)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
%0mw41[$vlhs0+51] := %a3sdg[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %men4u[8] := (19, 20, 21, 22, 23, 24, 25, 26)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
%0mw41[$vlhs0+56] := %men4u[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %imn2j[15] := (27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<15)
|
|
%0mw41[$vlhs0+64] := %imn2j[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ecepz[13] := (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<13)
|
|
%0mw41[$vlhs0+79] := %ecepz[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %wumub[5] := (13, 14, 15, 16, 17)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
%0mw41[$vlhs0+92] := %wumub[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %23wee[14] := (18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<14)
|
|
%0mw41[$vlhs0+97] := %23wee[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %5symj[14] := (32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<14)
|
|
%0mw41[$vlhs0+111] := %5symj[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %iz114[12]
|
|
make_instr_persistent(%iz114)
|
|
declare %e0xxd[216]
|
|
make_instr_persistent(%e0xxd)
|
|
declare %jj5qi[3] := (-1)
|
|
make_persistent(%jj5qi)
|
|
declare %kt24s[3]
|
|
declare %k4yha[3]
|
|
declare %31af0[3]
|
|
make_instr_persistent(%31af0)
|
|
declare %xeyhi[3]
|
|
declare %_BRW__search_pool_array[3000]
|
|
declare %_BRW__user_fav_array[1500] := (0)
|
|
declare %BRW__num_preset_in_search_pool_array[3]
|
|
declare %3owef[1500] := (-1)
|
|
declare %BRW__grp_remap[450]
|
|
declare %BRW__snapshot_remap_v43[500]
|
|
declare %BRW__snapshot_remap_v44[500]
|
|
declare !_BRW__preset_names[1500]
|
|
declare $y1xhf
|
|
declare $bgdzw
|
|
load_array(!_BRW__preset_names,2)
|
|
load_array(%BRW__num_preset_in_search_pool_array,2)
|
|
load_array(%BRW__grp_remap,2)
|
|
load_array(%_BRW__search_pool_array,2)
|
|
load_array(%BRW__snapshot_remap_v43,2)
|
|
load_array(%BRW__snapshot_remap_v44,2)
|
|
load_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
$lz0yu := 0
|
|
while ($lz0yu<4)
|
|
$rc1ud := 0
|
|
while ($rc1ud<18)
|
|
set_control_par_str(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_PICTURE,"GE_BRW_BTN")
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_POS_X,32+(156*$lz0yu))
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_POS_Y,113+(23*$rc1ud))
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_WIDTH,143)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HEIGHT,20)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_DISABLE_TEXT_SHIFTING,1)
|
|
set_control_par_str(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HELP,"Browser tag: Click to filter the search result list for items featuring this tag. Hold down CMD/CTRL to exclude a tag from the search result. Tags which do not provide matches are shown in a disabled style.")
|
|
inc($rc1ud)
|
|
end while
|
|
inc($lz0yu)
|
|
end while
|
|
$lz0yu := 0
|
|
while ($lz0yu<19)
|
|
set_control_par_str(%wqnrl[$lz0yu],$CONTROL_PAR_PICTURE,"GE_BRW_BTN")
|
|
set_control_par_str(%4gyqw[$lz0yu],$CONTROL_PAR_PICTURE,"GE_BRW_STAR")
|
|
set_control_par_str(%4gyqw[$lz0yu],$CONTROL_PAR_HELP,"User Favourite: Click to mark the corresponding preset as favourite.")
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_DISABLE_TEXT_SHIFTING,1)
|
|
set_control_par_str(%wqnrl[$lz0yu],$CONTROL_PAR_HELP,"Search Result list: Click the button to load the corresponding preset.")
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_POS_X,694)
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_POS_Y,113+(23*$lz0yu))
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_WIDTH,220)
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_HEIGHT,20)
|
|
set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_POS_X,662)
|
|
set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_POS_Y,113+(23*$lz0yu))
|
|
set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_WIDTH,16)
|
|
set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_HEIGHT,20)
|
|
inc($lz0yu)
|
|
end while
|
|
declare !5sry1[36]
|
|
!5sry1[0] := "GE Cinematic huge"
|
|
!5sry1[1] := "Concert Hall A"
|
|
!5sry1[2] := "L224 Orchestral 5.7s"
|
|
!5sry1[3] := "13.1s Koelner Dom - Synthetic"
|
|
!5sry1[4] := "4.5s Distant Hall - Synthetic"
|
|
!5sry1[5] := "5.5s Crystal Caves Orven"
|
|
!5sry1[6] := "FF Pro R Chapel 1"
|
|
!5sry1[7] := "FF Pro R Choir Hall"
|
|
!5sry1[8] := "FF Pro R Big Blue Hall"
|
|
!5sry1[9] := "Quadstick Big - Spagetti Western"
|
|
!5sry1[10] := "3.3s Far Away Orven"
|
|
!5sry1[11] := "FF Pro R Comb Filtered Space 3"
|
|
!5sry1[12] := "2.9s Distant Concert Hall - Synthetic"
|
|
!5sry1[13] := "BRT 7 Location Vehicle Park"
|
|
!5sry1[14] := "8.9s Tunnel - Synthetic"
|
|
!5sry1[15] := "2.9s Reeeflections Orven"
|
|
!5sry1[16] := "E245 2.8s B"
|
|
!5sry1[17] := "E245 3.8s B"
|
|
!5sry1[18] := "Gold Plate long"
|
|
!5sry1[19] := "Studio Spring"
|
|
!5sry1[20] := "Dub Spring"
|
|
!5sry1[21] := "Dual Spring"
|
|
!5sry1[22] := "1.1s Ring Room Orven"
|
|
!5sry1[23] := "GE_synAV_sine_IR_long_1"
|
|
!5sry1[24] := "1.5s Crystal Gyroscope Orven"
|
|
!5sry1[25] := "1.5s rvsd Chamber EQ"
|
|
!5sry1[26] := "5.58s rvsd Concert Hall A"
|
|
!5sry1[27] := "5.5s rvsd Cathedral DeCLick"
|
|
!5sry1[28] := "3.3s rvsd Staircase"
|
|
!5sry1[29] := "5.34s rvsd BRT 7 Location Vehicle Park"
|
|
!5sry1[30] := "GE IR REV Metal Resonator Narrow"
|
|
!5sry1[31] := "GE IR Bow Noise"
|
|
!5sry1[32] := "GE IR Bow Noise Long"
|
|
!5sry1[33] := "GE3 IR Wood Scrape"
|
|
!5sry1[34] := "GE IR Metal Resonator Full"
|
|
!5sry1[35] := "GE3 IR Breath"
|
|
declare !p4zwk[36]
|
|
!p4zwk[0] := "Cine Huge"
|
|
!p4zwk[1] := "Concert Hall"
|
|
!p4zwk[2] := "Orch Hall"
|
|
!p4zwk[3] := "Dome"
|
|
!p4zwk[4] := "Distant Hall"
|
|
!p4zwk[5] := "Crystal Caves"
|
|
!p4zwk[6] := "Chapel"
|
|
!p4zwk[7] := "Choir Hall"
|
|
!p4zwk[8] := "Blue Hall"
|
|
!p4zwk[9] := "Dusty Hall"
|
|
!p4zwk[10] := "Far Away"
|
|
!p4zwk[11] := "Comb Space"
|
|
!p4zwk[12] := "Damped Hall"
|
|
!p4zwk[13] := "Vehicle Park"
|
|
!p4zwk[14] := "Tunnel"
|
|
!p4zwk[15] := "Reeeflections"
|
|
!p4zwk[16] := "Plate Mid"
|
|
!p4zwk[17] := "Plate Long"
|
|
!p4zwk[18] := "Gold Plate long"
|
|
!p4zwk[19] := "Studio Spring"
|
|
!p4zwk[20] := "Dub Spring"
|
|
!p4zwk[21] := "Dual Spring"
|
|
!p4zwk[22] := "Ring Room"
|
|
!p4zwk[23] := "Additive"
|
|
!p4zwk[24] := "Gyroscope"
|
|
!p4zwk[25] := "REV Chamber"
|
|
!p4zwk[26] := "REV Hall"
|
|
!p4zwk[27] := "REV Cathedral"
|
|
!p4zwk[28] := "REV Staircase"
|
|
!p4zwk[29] := "REV Vehicle Park"
|
|
!p4zwk[30] := "REV Resonator"
|
|
!p4zwk[31] := "Bow Shimmer"
|
|
!p4zwk[32] := "Bow Noise"
|
|
!p4zwk[33] := "Scraping"
|
|
!p4zwk[34] := "Metal Resonator"
|
|
!p4zwk[35] := "Prana"
|
|
if (1=1)
|
|
declare %glqqy[25] := (10, 11, 12, 13, 14, 15, 16, 17, 18, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24)
|
|
declare %z5iau[25] := (0, 1, 2, 3, 4, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24)
|
|
declare %2q55x[32] := (1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0)
|
|
declare !um04d[16]
|
|
!um04d[0] := "8/4"
|
|
!um04d[1] := "3/2"
|
|
!um04d[2] := "4/4"
|
|
!um04d[3] := "1/2 dot"
|
|
!um04d[4] := "1/2"
|
|
!um04d[5] := "1/4 dot"
|
|
!um04d[6] := "1/4"
|
|
!um04d[7] := "1/8 dot"
|
|
!um04d[8] := "1/4 trip"
|
|
!um04d[9] := "1/8"
|
|
!um04d[10] := "1/16 dot"
|
|
!um04d[11] := "1/8 trip"
|
|
!um04d[12] := "1/16"
|
|
!um04d[13] := "1/32 dot"
|
|
!um04d[14] := "1/16 trip"
|
|
!um04d[15] := "1/32"
|
|
declare %ry4pp[16] := ($NI_SYNC_UNIT_WHOLE, $NI_SYNC_UNIT_HALF, $NI_SYNC_UNIT_WHOLE, $NI_SYNC_UNIT_QUARTER, $NI_SYNC_UNIT_HALF, $NI_SYNC_UNIT_8TH, $NI_SYNC_UNIT_QUARTER, $NI_SYNC_UNIT_16TH, $NI_SYNC_UNIT_QUARTER_TRIPLET, $NI_SYNC_UNIT_8TH, $NI_SYNC_UNIT_32ND, $NI_SYNC_UNIT_8TH_TRIPLET, $NI_SYNC_UNIT_16TH, $NI_SYNC_UNIT_64TH, $NI_SYNC_UNIT_16TH_TRIPLET, $NI_SYNC_UNIT_32ND)
|
|
declare %tkyhf[16] := (2, 3, 1, 3, 1, 3, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1)
|
|
declare %3n0yu[340]
|
|
declare %2nyh4[38] := (1, 7, 12, 7, 10, 8, 8, 6, 5, 10, 7, 7, 5, 6, 4, 6, 15, 10, 10, 9, 12, 8, 7, 8, 6, 4, 7, 22, 9, 3, 4, 21, 14, 12, 17, 15, 13, 5)
|
|
declare %w5uro[38] := (0, 1, 8, 20, 27, 37, 45, 53, 59, 64, 74, 81, 88, 93, 99, 103, 109, 124, 134, 144, 153, 165, 173, 180, 188, 194, 198, 205, 227, 236, 239, 243, 264, 278, 290, 307, 322, 335)
|
|
%3n0yu[0] := $ENGINE_PAR_EFFECT_TYPE
|
|
declare %nhqrl[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RV_PREDELAY, $ENGINE_PAR_RV_SIZE, $ENGINE_PAR_RV_COLOUR, $ENGINE_PAR_RV_STEREO, $ENGINE_PAR_RV_DAMPING)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%3n0yu[$vlhs0+1] := %nhqrl[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %l3z1g[12] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RV2_TIME, $ENGINE_PAR_RV2_SIZE, $ENGINE_PAR_RV2_DAMPING, $ENGINE_PAR_RV2_MOD, $ENGINE_PAR_RV2_DIFF, $ENGINE_PAR_RV2_PREDELAY, $ENGINE_PAR_RV2_HIGHCUT, $ENGINE_PAR_RV2_LOWSHELF, $ENGINE_PAR_RV2_STEREO, $ENGINE_PAR_RV2_TYPE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<12)
|
|
%3n0yu[$vlhs0+8] := %l3z1g[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %pca54[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_PR_PREDELAY, $ENGINE_PAR_PR_DECAY, $ENGINE_PAR_PR_LOWSHELF, $ENGINE_PAR_PR_HIDAMP, $ENGINE_PAR_PR_STEREO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%3n0yu[$vlhs0+20] := %pca54[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %mvg2b[10] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_IRC_PREDELAY, $ENGINE_PAR_IRC_LENGTH_RATIO_ER, $ENGINE_PAR_IRC_FREQ_LOWPASS_ER, $ENGINE_PAR_IRC_FREQ_HIGHPASS_ER, $ENGINE_PAR_IRC_LENGTH_RATIO_LR, $ENGINE_PAR_IRC_FREQ_LOWPASS_LR, $ENGINE_PAR_IRC_FREQ_HIGHPASS_LR, 080000000h)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
%3n0yu[$vlhs0+27] := %mvg2b[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %wy0qt[8] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SCOMP_THRESHOLD, $ENGINE_PAR_SCOMP_RATIO, $ENGINE_PAR_SCOMP_ATTACK, $ENGINE_PAR_SCOMP_RELEASE, $ENGINE_PAR_SCOMP_MAKEUP, $ENGINE_PAR_SCOMP_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
%3n0yu[$vlhs0+37] := %wy0qt[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %3sj3d[8] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_FCOMP_INPUT, $ENGINE_PAR_FCOMP_RATIO, $ENGINE_PAR_FCOMP_ATTACK, $ENGINE_PAR_FCOMP_RELEASE, $ENGINE_PAR_FCOMP_MAKEUP, $ENGINE_PAR_FCOMP_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
%3n0yu[$vlhs0+45] := %3sj3d[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ygzg0[6] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TR_INPUT, $ENGINE_PAR_TR_ATTACK, $ENGINE_PAR_TR_SUSTAIN, $ENGINE_PAR_TR_SMOOTH)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<6)
|
|
%3n0yu[$vlhs0+53] := %ygzg0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %jpopa[5] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TP_GAIN, $ENGINE_PAR_TP_WARMTH, $ENGINE_PAR_TP_HF_ROLLOFF)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
%3n0yu[$vlhs0+59] := %jpopa[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %4yqct[10] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_JMP_PREAMP, $ENGINE_PAR_JMP_BASS, $ENGINE_PAR_JMP_MID, $ENGINE_PAR_JMP_TREBLE, $ENGINE_PAR_JMP_MASTER, $ENGINE_PAR_JMP_PRESENCE, $ENGINE_PAR_JMP_HIGAIN, $ENGINE_PAR_JMP_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
%3n0yu[$vlhs0+64] := %4yqct[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %cyyk5[7] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TW_VOLUME, $ENGINE_PAR_TW_TREBLE, $ENGINE_PAR_TW_MID, $ENGINE_PAR_TW_BASS, $ENGINE_PAR_TW_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%3n0yu[$vlhs0+74] := %cyyk5[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %u0wy4[7] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SK_TONE, $ENGINE_PAR_SK_DRIVE, $ENGINE_PAR_SK_BASS, $ENGINE_PAR_SK_BRIGHT, $ENGINE_PAR_SK_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%3n0yu[$vlhs0+81] := %u0wy4[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %clqr1[5] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_DRIVE, $ENGINE_PAR_DAMPING, $ENGINE_PAR_DISTORTION_TYPE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
%3n0yu[$vlhs0+88] := %clqr1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %2lijw[6] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_BITS, $ENGINE_PAR_FREQUENCY, $ENGINE_PAR_NOISELEVEL, $ENGINE_PAR_NOISECOLOR)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<6)
|
|
%3n0yu[$vlhs0+93] := %2lijw[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ttsxx[4] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SHAPE, $ENGINE_PAR_SHAPE_TYPE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<4)
|
|
%3n0yu[$vlhs0+99] := %ttsxx[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %chynj[6] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CB_AIR, $ENGINE_PAR_CB_TREBLE, $ENGINE_PAR_CB_BASS, $ENGINE_PAR_CABINET_TYPE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<6)
|
|
%3n0yu[$vlhs0+103] := %chynj[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %urk25[15] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_V5_PREGAINRHYTHM, $ENGINE_PAR_V5_PREGAINLEAD, $ENGINE_PAR_V5_BASS, $ENGINE_PAR_V5_MID, $ENGINE_PAR_V5_TREBLE, $ENGINE_PAR_V5_POSTGAIN, $ENGINE_PAR_V5_RESONANCE, $ENGINE_PAR_V5_PRESENCE, $ENGINE_PAR_V5_LEADCHANNEL, $ENGINE_PAR_V5_HIGAIN, $ENGINE_PAR_V5_BRIGHT, $ENGINE_PAR_V5_CRUNCH, $ENGINE_PAR_V5_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<15)
|
|
%3n0yu[$vlhs0+109] := %urk25[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %hvb1h[10] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_AC_NORMALVOLUME, $ENGINE_PAR_AC_BRILLIANTVOLUME, $ENGINE_PAR_AC_BASS, $ENGINE_PAR_AC_TREBLE, $ENGINE_PAR_AC_TONECUT, $ENGINE_PAR_AC_TREMOLOSPEED, $ENGINE_PAR_AC_TREMOLODEPTH, $ENGINE_PAR_AC_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
%3n0yu[$vlhs0+124] := %hvb1h[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %oxcto[10] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CT_VOLUME, $ENGINE_PAR_CT_DISTORTION, $ENGINE_PAR_CT_FILTER, $ENGINE_PAR_CT_BASS, $ENGINE_PAR_CT_BALLS, $ENGINE_PAR_CT_TREBLE, $ENGINE_PAR_CT_TONE, $ENGINE_PAR_CT_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<10)
|
|
%3n0yu[$vlhs0+134] := %oxcto[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %riofq[9] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_DS_VOLUME, $ENGINE_PAR_DS_TONE, $ENGINE_PAR_DS_DRIVE, $ENGINE_PAR_DS_BASS, $ENGINE_PAR_DS_MID, $ENGINE_PAR_DS_TREBLE, $ENGINE_PAR_DS_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<9)
|
|
%3n0yu[$vlhs0+144] := %riofq[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ofcob[12] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_HS_PRENORMAL, $ENGINE_PAR_HS_PREOVERDRIVE, $ENGINE_PAR_HS_BASS, $ENGINE_PAR_HS_MID, $ENGINE_PAR_HS_TREBLE, $ENGINE_PAR_HS_MASTER, $ENGINE_PAR_HS_PRESENCE, $ENGINE_PAR_HS_DEPTH, $ENGINE_PAR_HS_OVERDRIVE, $ENGINE_PAR_HS_MONO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<12)
|
|
%3n0yu[$vlhs0+153] := %ofcob[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %zddea[8] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RT_SPEED, $ENGINE_PAR_RT_BALANCE, $ENGINE_PAR_RT_ACCEL_HI, $ENGINE_PAR_RT_ACCEL_LO, $ENGINE_PAR_RT_DISTANCE, $ENGINE_PAR_RT_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
%3n0yu[$vlhs0+165] := %zddea[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %t4efk[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_PH_DEPTH, $ENGINE_PAR_PH_SPEED, $ENGINE_PAR_PH_SPEED_UNIT, $ENGINE_PAR_PH_PHASE, $ENGINE_PAR_PH_FEEDBACK)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%3n0yu[$vlhs0+173] := %t4efk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %0rfne[8] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_FL_DEPTH, $ENGINE_PAR_FL_SPEED, $ENGINE_PAR_FL_SPEED_UNIT, $ENGINE_PAR_FL_PHASE, $ENGINE_PAR_FL_FEEDBACK, $ENGINE_PAR_FL_COLOR)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<8)
|
|
%3n0yu[$vlhs0+180] := %0rfne[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %f3tmo[6] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CH_DEPTH, $ENGINE_PAR_CH_SPEED, $ENGINE_PAR_CH_SPEED_UNIT, $ENGINE_PAR_CH_PHASE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<6)
|
|
%3n0yu[$vlhs0+188] := %f3tmo[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %r0fyl[4] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_LIM_IN_GAIN, $ENGINE_PAR_LIM_RELEASE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<4)
|
|
%3n0yu[$vlhs0+194] := %r0fyl[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ceuzi[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_DL_TIME, $ENGINE_PAR_DL_TIME_UNIT, $ENGINE_PAR_DL_DAMPING, $ENGINE_PAR_DL_PAN, $ENGINE_PAR_DL_FEEDBACK)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%3n0yu[$vlhs0+198] := %ceuzi[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %t2lpf[22] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RDL_TIME, $ENGINE_PAR_RDL_FEEDBACK, $ENGINE_PAR_RDL_LOWCUT, $ENGINE_PAR_RDL_HIGHCUT, $ENGINE_PAR_RDL_SATURATION, $ENGINE_PAR_RDL_TAPEAGE, $ENGINE_PAR_RDL_FLUTTER, $ENGINE_PAR_RDL_QUALITY, $ENGINE_PAR_RDL_DEPTH, $ENGINE_PAR_RDL_RATE, $ENGINE_PAR_RDL_TYPE, $ENGINE_PAR_RDL_STEREO, $ENGINE_PAR_RDL_NOISE, $ENGINE_PAR_RDL_PINGPONG, $ENGINE_PAR_RDL_AMOUNT, $ENGINE_PAR_RDL_SIZE, $ENGINE_PAR_RDL_DENSE, $ENGINE_PAR_RDL_MODULATION, $ENGINE_PAR_RDL_BBDTYPE, $ENGINE_PAR_RDL_TIME_UNIT)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<22)
|
|
%3n0yu[$vlhs0+205] := %t2lpf[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %rtexk[9] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_SENDLEVEL_0, $ENGINE_PAR_SENDLEVEL_1, $ENGINE_PAR_SENDLEVEL_2, $ENGINE_PAR_SENDLEVEL_3, $ENGINE_PAR_SENDLEVEL_4, $ENGINE_PAR_SENDLEVEL_5, $ENGINE_PAR_SENDLEVEL_6, $ENGINE_PAR_SENDLEVEL_7)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<9)
|
|
%3n0yu[$vlhs0+227] := %rtexk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %leotb[3] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_GN_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%3n0yu[$vlhs0+236] := %leotb[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %s1inm[4] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_STEREO, $ENGINE_PAR_STEREO_PAN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<4)
|
|
%3n0yu[$vlhs0+239] := %s1inm[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %1ojgd[21] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_EFFECT_SUBTYPE, $ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN, $ENGINE_PAR_GAIN1, $ENGINE_PAR_GAIN2, $ENGINE_PAR_GAIN3, $ENGINE_PAR_FREQ1, $ENGINE_PAR_FREQ2, $ENGINE_PAR_FREQ3, $ENGINE_PAR_BW1, $ENGINE_PAR_BW2, $ENGINE_PAR_BW3, $ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE, $ENGINE_PAR_BANDWIDTH, $ENGINE_PAR_FILTER_LADDER_HQ, $ENGINE_PAR_LP_CUTOFF, $ENGINE_PAR_HP_CUTOFF)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<21)
|
|
%3n0yu[$vlhs0+243] := %1ojgd[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %fuqb1[14] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SEQ_LF_GAIN, $ENGINE_PAR_SEQ_LF_FREQ, $ENGINE_PAR_SEQ_LF_BELL, $ENGINE_PAR_SEQ_LMF_GAIN, $ENGINE_PAR_SEQ_LMF_FREQ, $ENGINE_PAR_SEQ_LMF_Q, $ENGINE_PAR_SEQ_HMF_GAIN, $ENGINE_PAR_SEQ_HMF_FREQ, $ENGINE_PAR_SEQ_HMF_Q, $ENGINE_PAR_SEQ_HF_GAIN, $ENGINE_PAR_SEQ_HF_FREQ, $ENGINE_PAR_SEQ_HF_BELL)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<14)
|
|
%3n0yu[$vlhs0+264] := %fuqb1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %m2exc[12] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CHORAL_RATE, $ENGINE_PAR_CHORAL_AMOUNT, $ENGINE_PAR_CHORAL_FEEDBACK, $ENGINE_PAR_CHORAL_DELAY, $ENGINE_PAR_CHORAL_VOICES, $ENGINE_PAR_CHORAL_WIDTH, $ENGINE_PAR_CHORAL_MIX, $ENGINE_PAR_CHORAL_INVERT_PHASE, $ENGINE_PAR_CHORAL_SCATTER, $ENGINE_PAR_CHORAL_MODE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<12)
|
|
%3n0yu[$vlhs0+278] := %m2exc[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %1dv0q[17] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_FLAIR_RATE, $ENGINE_PAR_FLAIR_AMOUNT, $ENGINE_PAR_FLAIR_PITCH, $ENGINE_PAR_FLAIR_WIDTH, $ENGINE_PAR_FLAIR_MIX, $ENGINE_PAR_FLAIR_VOICES, $ENGINE_PAR_FLAIR_FEEDBACK, $ENGINE_PAR_FLAIR_DAMPING, $ENGINE_PAR_FLAIR_DETUNE, $ENGINE_PAR_FLAIR_OFFSET, $ENGINE_PAR_FLAIR_INVERT_PHASE, $ENGINE_PAR_FLAIR_MODE, $ENGINE_PAR_FLAIR_SCANMODE, $ENGINE_PAR_FLAIR_CHORD, $ENGINE_PAR_FLAIR_RATE_UNIT)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<17)
|
|
%3n0yu[$vlhs0+290] := %1dv0q[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %nnpwn[15] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_PHASIS_RATE, $ENGINE_PAR_PHASIS_AMOUNT, $ENGINE_PAR_PHASIS_CENTER, $ENGINE_PAR_PHASIS_SPREAD, $ENGINE_PAR_PHASIS_FEEDBACK, $ENGINE_PAR_PHASIS_MIX, $ENGINE_PAR_PHASIS_NOTCHES, $ENGINE_PAR_PHASIS_STEREO, $ENGINE_PAR_PHASIS_MOD_MIX, $ENGINE_PAR_PHASIS_ULTRA, $ENGINE_PAR_PHASIS_INVERT_PHASE, $ENGINE_PAR_PHASIS_INVERT_MOD_MIX, $ENGINE_PAR_PHASIS_RATE_UNIT)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<15)
|
|
%3n0yu[$vlhs0+307] := %nnpwn[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %texzx[13] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SUPERGT_TRIM, $ENGINE_PAR_SUPERGT_HPF_MODE, $ENGINE_PAR_SUPERGT_SATURATION, $ENGINE_PAR_SUPERGT_SAT_MODE, $ENGINE_PAR_SUPERGT_COMPRESS, $ENGINE_PAR_SUPERGT_ATTACK, $ENGINE_PAR_SUPERGT_RELEASE, $ENGINE_PAR_SUPERGT_CHARACTER, $ENGINE_PAR_SUPERGT_CHAR_MODE, $ENGINE_PAR_SUPERGT_MIX, $ENGINE_PAR_SUPERGT_CHANNEL_LINK_MODE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<13)
|
|
%3n0yu[$vlhs0+322] := %texzx[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %hdf5n[5] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TRANSLIM_THRESHOLD, $ENGINE_PAR_TRANSLIM_RELEASE, $ENGINE_PAR_TRANSLIM_CEILING)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<5)
|
|
%3n0yu[$vlhs0+335] := %hdf5n[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %augte[10] := ($EFFECT_TYPE_NONE, $EFFECT_TYPE_DELAY, $EFFECT_TYPE_CHORUS, $EFFECT_TYPE_FLANGER, $EFFECT_TYPE_PHASER, $EFFECT_TYPE_REVERB, $EFFECT_TYPE_REVERB2, $EFFECT_TYPE_IRC, $EFFECT_TYPE_PLATEREVERB, $EFFECT_TYPE_GAINER)
|
|
declare %edmyi[131]
|
|
declare %oie55[57] := (1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 1, 2, 2, 3, 3, 3, 3, 2, 2, 2, 1, 2, 2, 3, 3, 3, 3, 2, 2, 2, 3, ...
|
|
2, 2, 3, 3, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 2)
|
|
declare %wl2qc[57] := (0, 1, 2, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 32, 35, 38, 41, 42, 44, 46, 49, 52, 55, 58, 60, 62, 64, 65, 67, 69, 72, 75, 78, 81, 83, 85, 87, ...
|
|
90, 92, 94, 97, 100, 102, 104, 106, 108, 111, 114, 117, 120, 123, 126, 129)
|
|
%edmyi[0] := $ENGINE_PAR_CUTOFF
|
|
%edmyi[1] := $ENGINE_PAR_CUTOFF
|
|
%edmyi[2] := $ENGINE_PAR_CUTOFF
|
|
declare %kcknp[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+3] := %kcknp[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %1b3at[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+5] := %1b3at[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %tutcy[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+7] := %tutcy[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %vcyyq[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+9] := %vcyyq[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %klatu[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+11] := %klatu[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %eg2vl[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+13] := %eg2vl[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %qracz[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+15] := %qracz[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %zh1cv[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+17] := %zh1cv[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %jlqd0[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+19] := %jlqd0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ew00i[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+21] := %ew00i[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %hjbsz[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+23] := %hjbsz[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %nhvld[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+25] := %nhvld[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %cc3td[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+27] := %cc3td[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %3ic20[3] := ($ENGINE_PAR_FREQ1, $ENGINE_PAR_BW1, $ENGINE_PAR_GAIN1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+29] := %3ic20[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %dpmhm[3] := ($ENGINE_PAR_GAIN1, $ENGINE_PAR_FREQ1, $ENGINE_PAR_BW1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+32] := %dpmhm[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %illyv[3] := ($ENGINE_PAR_GAIN1, $ENGINE_PAR_GAIN2, $ENGINE_PAR_GAIN3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+35] := %illyv[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %mas5a[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+38] := %mas5a[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%edmyi[41] := $ENGINE_PAR_CUTOFF
|
|
declare %pbshp[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+42] := %pbshp[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %xqovk[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+44] := %xqovk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ai5i1[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+46] := %ai5i1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %on4bq[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+49] := %on4bq[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %sa3st[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+52] := %sa3st[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %2cich[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+55] := %2cich[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %rd5pj[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+58] := %rd5pj[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %zexmu[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+60] := %zexmu[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %phywd[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+62] := %phywd[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%edmyi[64] := $ENGINE_PAR_CUTOFF
|
|
declare %awih0[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+65] := %awih0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %gmgrm[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+67] := %gmgrm[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %y1o3v[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+69] := %y1o3v[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %q4uub[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+72] := %q4uub[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %myhwk[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+75] := %myhwk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %1brdt[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+78] := %1brdt[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %wn2uu[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+81] := %wn2uu[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %mj20c[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+83] := %mj20c[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %tlwaw[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+85] := %tlwaw[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %2eyy0[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+87] := %2eyy0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %n1kea[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+90] := %n1kea[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %xagdn[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+92] := %xagdn[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %jwpjy[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+94] := %jwpjy[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %nsmio[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+97] := %nsmio[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ykdle[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+100] := %ykdle[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %n0fmk[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+102] := %n0fmk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %vb5ih[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+104] := %vb5ih[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ilpba[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+106] := %ilpba[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %gdxz4[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+108] := %gdxz4[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %lglcl[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+111] := %lglcl[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %qeod1[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_BANDWIDTH)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+114] := %qeod1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %v3oap[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_BANDWIDTH)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+117] := %v3oap[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %c1fte[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_BANDWIDTH)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+120] := %c1fte[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %naaji[3] := ($ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+123] := %naaji[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %k2elx[3] := ($ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%edmyi[$vlhs0+126] := %k2elx[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %e2mqa[2] := ($ENGINE_PAR_HP_CUTOFF, $ENGINE_PAR_LP_CUTOFF)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%edmyi[$vlhs0+129] := %e2mqa[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %mdgl1[57] := ($FILTER_TYPE_LP1POLE, $FILTER_TYPE_HP1POLE, $FILTER_TYPE_BP2POLE, $FILTER_TYPE_LP2POLE, $FILTER_TYPE_HP2POLE, $FILTER_TYPE_LP4POLE, $FILTER_TYPE_HP4POLE, $FILTER_TYPE_BP4POLE, $FILTER_TYPE_BR4POLE, $FILTER_TYPE_LP6POLE, $FILTER_TYPE_PHASER, $FILTER_TYPE_VOWELA, $FILTER_TYPE_VOWELB, $FILTER_TYPE_PRO52, $FILTER_TYPE_LADDER, $FILTER_TYPE_VERSATILE, $FILTER_TYPE_EQ1BAND, $FILTER_TYPE_EQ2BAND, $FILTER_TYPE_EQ3BAND, $FILTER_TYPE_DAFT_LP, $FILTER_TYPE_SV_LP1, $FILTER_TYPE_SV_LP2, $FILTER_TYPE_SV_LP4, $FILTER_TYPE_LDR_LP1, $FILTER_TYPE_LDR_LP2, $FILTER_TYPE_LDR_LP3, $FILTER_TYPE_LDR_LP4, $FILTER_TYPE_AR_LP2, $FILTER_TYPE_AR_LP4, $FILTER_TYPE_AR_LP24, $FILTER_TYPE_SV_HP1, $FILTER_TYPE_SV_HP2, $FILTER_TYPE_SV_HP4, $FILTER_TYPE_LDR_HP1, $FILTER_TYPE_LDR_HP2, $FILTER_TYPE_LDR_HP3, $FILTER_TYPE_LDR_HP4, $FILTER_TYPE_AR_HP2, $FILTER_TYPE_AR_HP4, $FILTER_TYPE_AR_HP24, $FILTER_TYPE_DAFT_HP, ...
|
|
$FILTER_TYPE_SV_BP2, $FILTER_TYPE_SV_BP4, $FILTER_TYPE_LDR_BP2, $FILTER_TYPE_LDR_BP4, $FILTER_TYPE_AR_BP2, $FILTER_TYPE_AR_BP4, $FILTER_TYPE_AR_BP24, $FILTER_TYPE_SV_NOTCH4, $FILTER_TYPE_LDR_PEAK, $FILTER_TYPE_LDR_NOTCH, $FILTER_TYPE_SV_PAR_LPHP, $FILTER_TYPE_SV_PAR_BPBP, $FILTER_TYPE_SV_SER_LPHP, $FILTER_TYPE_FORMANT_1, $FILTER_TYPE_FORMANT_2, $FILTER_TYPE_SIMPLE_LPHP)
|
|
declare !gdlxl[57]
|
|
!gdlxl[0] := "LP 1 pole"
|
|
!gdlxl[1] := "HP 1 pole"
|
|
!gdlxl[2] := "BP 2 pole"
|
|
!gdlxl[3] := "LP 2 pole"
|
|
!gdlxl[4] := "HP 2 pole"
|
|
!gdlxl[5] := "LP 4 pole"
|
|
!gdlxl[6] := "HP 4 pole"
|
|
!gdlxl[7] := "BP 4 pole"
|
|
!gdlxl[8] := "BR 4 pole"
|
|
!gdlxl[9] := "LP 6 pole"
|
|
!gdlxl[10] := "Phaser"
|
|
!gdlxl[11] := "Vowel A"
|
|
!gdlxl[12] := "Vowel B"
|
|
!gdlxl[13] := "Pro 52"
|
|
!gdlxl[14] := "Ladder"
|
|
!gdlxl[15] := "Versatile"
|
|
!gdlxl[16] := "EQ 1 Band"
|
|
!gdlxl[17] := "EQ 2 Band"
|
|
!gdlxl[18] := "EQ 3 Band"
|
|
!gdlxl[19] := "LP Daft"
|
|
!gdlxl[20] := "LP 1 pole SV"
|
|
!gdlxl[21] := "LP 2 pole SV"
|
|
!gdlxl[22] := "LP 4 pole SV"
|
|
!gdlxl[23] := "LP 1 pole LDR"
|
|
!gdlxl[24] := "LP 2 pole LDR"
|
|
!gdlxl[25] := "LP 3 pole LDR"
|
|
!gdlxl[26] := "LP 4 pole LDR"
|
|
!gdlxl[27] := "LP 2 pole AR"
|
|
!gdlxl[28] := "LP 4 pole AR"
|
|
!gdlxl[29] := "LP 2/4 pole AR"
|
|
!gdlxl[30] := "HP 1 pole SV"
|
|
!gdlxl[31] := "HP 2 pole SV"
|
|
!gdlxl[32] := "HP 4 pole SV"
|
|
!gdlxl[33] := "HP 1 pole LDR"
|
|
!gdlxl[34] := "HP 2 pole LDR"
|
|
!gdlxl[35] := "HP 3 pole LDR"
|
|
!gdlxl[36] := "HP 4 pole LDR"
|
|
!gdlxl[37] := "HP 2 pole AR"
|
|
!gdlxl[38] := "HP 4 pole AR"
|
|
!gdlxl[39] := "HP 2 pole AR"
|
|
!gdlxl[40] := "HP Daft"
|
|
!gdlxl[41] := "BP 2 pole SV"
|
|
!gdlxl[42] := "BP 4 pole SV"
|
|
!gdlxl[43] := "BP 2 pole LDR"
|
|
!gdlxl[44] := "BP 4 pole LDR"
|
|
!gdlxl[45] := "BP 2 pole AR"
|
|
!gdlxl[46] := "BP 4 pole AR"
|
|
!gdlxl[47] := "BP 2/4 pole AR"
|
|
!gdlxl[48] := "Notch 4 pole SV"
|
|
!gdlxl[49] := "Peak LDR"
|
|
!gdlxl[50] := "Notch LDR"
|
|
!gdlxl[51] := "Parallel LPHP SV"
|
|
!gdlxl[52] := "Parallel BPBP SV"
|
|
!gdlxl[53] := "Serial LPHP SV"
|
|
!gdlxl[54] := "Formant 1"
|
|
!gdlxl[55] := "Formant 2"
|
|
!gdlxl[56] := "LP & HP"
|
|
declare !rnens[17]
|
|
!rnens[0] := ""
|
|
!rnens[1] := "Cutoff"
|
|
!rnens[2] := "Reso"
|
|
!rnens[3] := "Drive"
|
|
!rnens[4] := "Gain"
|
|
!rnens[5] := "Gain"
|
|
!rnens[6] := "Gain"
|
|
!rnens[7] := "Talk"
|
|
!rnens[8] := "Sharp"
|
|
!rnens[9] := "Size"
|
|
!rnens[10] := "Width"
|
|
!rnens[11] := "Freq"
|
|
!rnens[12] := "Width"
|
|
!rnens[13] := "LP Cutoff"
|
|
!rnens[14] := "HP Cutoff"
|
|
!rnens[15] := "Freq"
|
|
!rnens[16] := "Freq"
|
|
declare !njfof[15]
|
|
!njfof[0] := ""
|
|
!njfof[1] := "Hz"
|
|
!njfof[2] := "%"
|
|
!njfof[3] := "dB"
|
|
!njfof[4] := "dB"
|
|
!njfof[5] := "dB"
|
|
!njfof[6] := "dB"
|
|
!njfof[7] := "%"
|
|
!njfof[8] := "%"
|
|
!njfof[9] := "%"
|
|
!njfof[10] := "Oct"
|
|
!njfof[11] := "Hz"
|
|
!njfof[12] := "Oct"
|
|
!njfof[13] := "Hz"
|
|
!njfof[14] := "Hz"
|
|
declare %cz2mn[17] := (0, $ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN, $ENGINE_PAR_GAIN1, $ENGINE_PAR_GAIN2, $ENGINE_PAR_GAIN3, $ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE, $ENGINE_PAR_BANDWIDTH, $ENGINE_PAR_FREQ1, $ENGINE_PAR_BW1, $ENGINE_PAR_LP_CUTOFF, $ENGINE_PAR_HP_CUTOFF, $ENGINE_PAR_FREQ2, $ENGINE_PAR_FREQ3)
|
|
declare %5gftk[171]
|
|
$fg4rw := 0
|
|
while ($fg4rw<57)
|
|
$g5k3r := 0
|
|
while ($g5k3r<%oie55[$fg4rw])
|
|
%5gftk[3*$fg4rw+$g5k3r] := search(%cz2mn,%edmyi[%wl2qc[$fg4rw]+$g5k3r])
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
if (1=1)
|
|
declare %uxwoh[106]
|
|
declare %xdshj[38] := (1, 3, 3, 3, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3)
|
|
declare %osxle[38] := (0, 1, 4, 7, 10, 11, 14, 17, 20, 23, 26, 29, 32, 35, 38, 40, 43, 46, 49, 52, 55, 58, 61, 64, 67, 70, 73, 76, 79, 81, 82, 85, 88, 91, 94, 97, 100, 103)
|
|
%uxwoh[0] := -1
|
|
declare %lbsxs[3] := ($ENGINE_PAR_RV_SIZE, $ENGINE_PAR_RV_STEREO, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+1] := %lbsxs[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %1rif3[3] := ($ENGINE_PAR_RV2_TIME, $ENGINE_PAR_RV2_SIZE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+4] := %1rif3[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %l2um1[3] := ($ENGINE_PAR_PR_DECAY, $ENGINE_PAR_PR_LOWSHELF, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+7] := %l2um1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%uxwoh[10] := $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN
|
|
declare %zfsml[3] := ($ENGINE_PAR_SCOMP_THRESHOLD, $ENGINE_PAR_SCOMP_RATIO, $ENGINE_PAR_SCOMP_MAKEUP)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+11] := %zfsml[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %jov11[3] := ($ENGINE_PAR_FCOMP_INPUT, $ENGINE_PAR_FCOMP_RATIO, $ENGINE_PAR_FCOMP_MAKEUP)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+14] := %jov11[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %wh5i0[3] := ($ENGINE_PAR_TR_INPUT, $ENGINE_PAR_TR_ATTACK, $ENGINE_PAR_TR_SUSTAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+17] := %wh5i0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %cqdeq[3] := ($ENGINE_PAR_TP_GAIN, $ENGINE_PAR_TP_WARMTH, $ENGINE_PAR_TP_HF_ROLLOFF)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+20] := %cqdeq[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %t3u5z[3] := ($ENGINE_PAR_JMP_PREAMP, $ENGINE_PAR_JMP_TREBLE, $ENGINE_PAR_JMP_MASTER)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+23] := %t3u5z[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %fzdla[3] := ($ENGINE_PAR_TW_VOLUME, $ENGINE_PAR_TW_BASS, $ENGINE_PAR_TW_TREBLE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+26] := %fzdla[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %wiihf[3] := ($ENGINE_PAR_SK_DRIVE, $ENGINE_PAR_SK_TONE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+29] := %wiihf[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %x21im[3] := ($ENGINE_PAR_DRIVE, $ENGINE_PAR_DAMPING, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+32] := %x21im[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %vjf05[3] := ($ENGINE_PAR_BITS, $ENGINE_PAR_FREQUENCY, $ENGINE_PAR_NOISELEVEL)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+35] := %vjf05[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ru3th[2] := ($ENGINE_PAR_SHAPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%uxwoh[$vlhs0+38] := %ru3th[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %bkbgp[3] := ($ENGINE_PAR_CB_TREBLE, $ENGINE_PAR_CB_BASS, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+40] := %bkbgp[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %q2h35[3] := ($ENGINE_PAR_V5_PREGAINRHYTHM, $ENGINE_PAR_V5_PRESENCE, $ENGINE_PAR_V5_POSTGAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+43] := %q2h35[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %alwfk[3] := ($ENGINE_PAR_AC_BRILLIANTVOLUME, $ENGINE_PAR_AC_TONECUT, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+46] := %alwfk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %peqqs[3] := ($ENGINE_PAR_CT_DISTORTION, $ENGINE_PAR_CT_FILTER, $ENGINE_PAR_CT_TONE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+49] := %peqqs[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %dw0i3[3] := ($ENGINE_PAR_DS_DRIVE, $ENGINE_PAR_DS_TONE, $ENGINE_PAR_DS_TREBLE)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+52] := %dw0i3[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %cr3an[3] := ($ENGINE_PAR_HS_PRENORMAL, $ENGINE_PAR_HS_TREBLE, $ENGINE_PAR_HS_MASTER)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+55] := %cr3an[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %l1ipf[3] := ($ENGINE_PAR_RT_SPEED, $ENGINE_PAR_RT_BALANCE, $ENGINE_PAR_RT_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+58] := %l1ipf[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %tlsfi[3] := ($ENGINE_PAR_PH_SPEED, $ENGINE_PAR_PH_DEPTH, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+61] := %tlsfi[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %fc4tz[3] := ($ENGINE_PAR_FL_SPEED, $ENGINE_PAR_FL_DEPTH, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+64] := %fc4tz[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %yljpj[3] := ($ENGINE_PAR_CH_SPEED, $ENGINE_PAR_CH_DEPTH, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+67] := %yljpj[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %0hmse[3] := ($ENGINE_PAR_LIM_IN_GAIN, $ENGINE_PAR_LIM_RELEASE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+70] := %0hmse[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %esfpr[3] := ($ENGINE_PAR_DL_TIME, $ENGINE_PAR_DL_FEEDBACK, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+73] := %esfpr[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %uup2u[3] := ($ENGINE_PAR_RDL_TIME, $ENGINE_PAR_RDL_FEEDBACK, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+76] := %uup2u[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %e2zel[2] := ($ENGINE_PAR_SENDLEVEL_0, $ENGINE_PAR_SENDLEVEL_1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%uxwoh[$vlhs0+79] := %e2zel[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%uxwoh[81] := -1
|
|
declare %iiapa[3] := ($ENGINE_PAR_STEREO, $ENGINE_PAR_STEREO_PAN, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+82] := %iiapa[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %dcs5v[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+85] := %dcs5v[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %lhiuq[3] := ($ENGINE_PAR_SEQ_LF_GAIN, $ENGINE_PAR_SEQ_LMF_GAIN, $ENGINE_PAR_SEQ_HMF_GAIN)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+88] := %lhiuq[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %0bonf[3] := ($ENGINE_PAR_CHORAL_RATE, $ENGINE_PAR_CHORAL_AMOUNT, $ENGINE_PAR_CHORAL_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+91] := %0bonf[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %51xl0[3] := ($ENGINE_PAR_FLAIR_RATE, $ENGINE_PAR_FLAIR_AMOUNT, $ENGINE_PAR_FLAIR_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+94] := %51xl0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %uidjt[3] := ($ENGINE_PAR_PHASIS_RATE, $ENGINE_PAR_PHASIS_AMOUNT, $ENGINE_PAR_PHASIS_MIX)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+97] := %uidjt[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %nsddt[3] := ($ENGINE_PAR_SUPERGT_TRIM, $ENGINE_PAR_SUPERGT_SATURATION, $ENGINE_PAR_SUPERGT_COMPRESS)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+100] := %nsddt[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %xathy[3] := ($ENGINE_PAR_TRANSLIM_THRESHOLD, $ENGINE_PAR_TRANSLIM_RELEASE, $ENGINE_PAR_TRANSLIM_CEILING)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%uxwoh[$vlhs0+103] := %xathy[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !yyfkk[106]
|
|
!yyfkk[0] := ""
|
|
!yyfkk[1] := "Size"
|
|
!yyfkk[2] := "Stereo"
|
|
!yyfkk[3] := "Level"
|
|
!yyfkk[4] := "Time"
|
|
!yyfkk[5] := "Size"
|
|
!yyfkk[6] := "Level"
|
|
!yyfkk[7] := "Decay"
|
|
!yyfkk[8] := "Low Shelf"
|
|
!yyfkk[9] := "Level"
|
|
!yyfkk[10] := "Level"
|
|
!yyfkk[11] := "Threshold"
|
|
!yyfkk[12] := "Ratio"
|
|
!yyfkk[13] := "Makeup"
|
|
!yyfkk[14] := "Input"
|
|
!yyfkk[15] := "Ratio"
|
|
!yyfkk[16] := "Makeup"
|
|
!yyfkk[17] := "Input"
|
|
!yyfkk[18] := "Attack"
|
|
!yyfkk[19] := "Sustain"
|
|
!yyfkk[20] := "Gain"
|
|
!yyfkk[21] := "Warmth"
|
|
!yyfkk[22] := "Damp"
|
|
!yyfkk[23] := "Preamp"
|
|
!yyfkk[24] := "Treble"
|
|
!yyfkk[25] := "Master"
|
|
!yyfkk[26] := "Gain"
|
|
!yyfkk[27] := "Bass"
|
|
!yyfkk[28] := "Treble"
|
|
!yyfkk[29] := "Drive"
|
|
!yyfkk[30] := "Tone"
|
|
!yyfkk[31] := "Output"
|
|
!yyfkk[32] := "Drive"
|
|
!yyfkk[33] := "Damp"
|
|
!yyfkk[34] := "Output"
|
|
!yyfkk[35] := "Bits"
|
|
!yyfkk[36] := "Frequency"
|
|
!yyfkk[37] := "Noiselevel"
|
|
!yyfkk[38] := "Drive"
|
|
!yyfkk[39] := "Output"
|
|
!yyfkk[40] := "Treble"
|
|
!yyfkk[41] := "Bass"
|
|
!yyfkk[42] := "Output"
|
|
!yyfkk[43] := "Gain"
|
|
!yyfkk[44] := "Presence"
|
|
!yyfkk[45] := "Post Gain"
|
|
!yyfkk[46] := "Gain"
|
|
!yyfkk[47] := "Hi Cut"
|
|
!yyfkk[48] := "Output"
|
|
!yyfkk[49] := "Dist"
|
|
!yyfkk[50] := "Filter"
|
|
!yyfkk[51] := "Tone"
|
|
!yyfkk[52] := "Drive"
|
|
!yyfkk[53] := "Tone"
|
|
!yyfkk[54] := "Treble"
|
|
!yyfkk[55] := "Drive"
|
|
!yyfkk[56] := "Treble"
|
|
!yyfkk[57] := "Master"
|
|
!yyfkk[58] := "Speed"
|
|
!yyfkk[59] := "Balance"
|
|
!yyfkk[60] := "Wet"
|
|
!yyfkk[61] := "Speed"
|
|
!yyfkk[62] := "Depth"
|
|
!yyfkk[63] := "Mix"
|
|
!yyfkk[64] := "Speed"
|
|
!yyfkk[65] := "Depth"
|
|
!yyfkk[66] := "Mix"
|
|
!yyfkk[67] := "Speed"
|
|
!yyfkk[68] := "Depth"
|
|
!yyfkk[69] := "Mix"
|
|
!yyfkk[70] := "Input"
|
|
!yyfkk[71] := "Release"
|
|
!yyfkk[72] := "Output"
|
|
!yyfkk[73] := "Time"
|
|
!yyfkk[74] := "Feedback"
|
|
!yyfkk[75] := "Amt"
|
|
!yyfkk[76] := "Time"
|
|
!yyfkk[77] := "Feedback"
|
|
!yyfkk[78] := "Level"
|
|
!yyfkk[79] := "Send 1"
|
|
!yyfkk[80] := "Send 2"
|
|
!yyfkk[81] := " "
|
|
!yyfkk[82] := "Width"
|
|
!yyfkk[83] := "Pan"
|
|
!yyfkk[84] := "Level"
|
|
!yyfkk[85] := "Cutoff"
|
|
!yyfkk[86] := "Resonance"
|
|
!yyfkk[87] := "Drive"
|
|
!yyfkk[88] := "LF Gain"
|
|
!yyfkk[89] := "LMF Gain"
|
|
!yyfkk[90] := "HMF Gain"
|
|
!yyfkk[91] := "Speed"
|
|
!yyfkk[92] := "Depth"
|
|
!yyfkk[93] := "Mix"
|
|
!yyfkk[94] := "Speed"
|
|
!yyfkk[95] := "Depth"
|
|
!yyfkk[96] := "Mix"
|
|
!yyfkk[97] := "Speed"
|
|
!yyfkk[98] := "Depth"
|
|
!yyfkk[99] := "Mix"
|
|
!yyfkk[100] := "Input"
|
|
!yyfkk[101] := "Saturate"
|
|
!yyfkk[102] := "Compress"
|
|
!yyfkk[103] := "Threshold"
|
|
!yyfkk[104] := "Release"
|
|
!yyfkk[105] := "Ceiling"
|
|
declare !1s04y[8]
|
|
!1s04y[0] := ""
|
|
!1s04y[1] := "dB"
|
|
!1s04y[2] := "Hz"
|
|
!1s04y[3] := "%"
|
|
!1s04y[4] := "ms"
|
|
!1s04y[5] := "Oct"
|
|
!1s04y[6] := "st"
|
|
!1s04y[7] := ": 1"
|
|
declare %wmjdo[107]
|
|
declare %0hhbc[38] := (0, 1, 4, 7, 10, 11, 14, 17, 20, 23, 26, 29, 32, 35, 38, 40, 43, 46, 49, 52, 55, 58, 61, 64, 67, 70, 73, 76, 79, 81, 82, 85, 88, 92, 95, 98, 101, 104)
|
|
%wmjdo[0] := 0
|
|
declare %ig2z0[3] := (4, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+1] := %ig2z0[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %2fzxs[3] := (4, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+4] := %2fzxs[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %5eqgb[3] := (4, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+7] := %5eqgb[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%wmjdo[10] := 1
|
|
declare %b0g2c[3] := (1, 7, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+11] := %b0g2c[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %rreiy[3] := (1, 7, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+14] := %rreiy[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %5khr1[3] := (1, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+17] := %5khr1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %uqmv5[3] := (1, 1, 2)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+20] := %uqmv5[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %eqkt5[3] := (3, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+23] := %eqkt5[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %rtjig[3] := (3, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+26] := %rtjig[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %h0vt3[3] := (3, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+29] := %h0vt3[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %b22vs[3] := (3, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+32] := %b22vs[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %alfvl[3] := (0, 2, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+35] := %alfvl[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ubexa[2] := (3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%wmjdo[$vlhs0+38] := %ubexa[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %gshce[3] := (1, 4, 2)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+40] := %gshce[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %zb1r4[3] := (3, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+43] := %zb1r4[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %y0wgg[3] := (3, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+46] := %y0wgg[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %5vo15[3] := (3, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+49] := %5vo15[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %avegx[3] := (1, 4, 2)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+52] := %avegx[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %xjpg1[3] := (3, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+55] := %xjpg1[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %zm3qk[3] := (0, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+58] := %zm3qk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %c5hju[3] := (2, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+61] := %c5hju[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %qgaba[3] := (2, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+64] := %qgaba[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ysb1u[3] := (2, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+67] := %ysb1u[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %0wtuw[3] := (1, 4, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+70] := %0wtuw[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %htymw[3] := (4, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+73] := %htymw[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %cwqza[3] := (4, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+76] := %cwqza[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %iymdy[2] := (1, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%wmjdo[$vlhs0+79] := %iymdy[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%wmjdo[81] := 0
|
|
declare %htpxk[3] := (0, 0, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+82] := %htpxk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %wo0sk[3] := (2, 3, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+85] := %wo0sk[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %cahyd[4] := (1, 1, 1, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<4)
|
|
%wmjdo[$vlhs0+88] := %cahyd[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %pimyc[3] := (2, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+92] := %pimyc[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %x5tnb[3] := (2, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+95] := %x5tnb[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %qdt10[3] := (2, 3, 3)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+98] := %qdt10[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %kx45y[3] := (1, 0, 0)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+101] := %kx45y[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %d0ys2[3] := (1, 4, 1)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<3)
|
|
%wmjdo[$vlhs0+104] := %d0ys2[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare !4jeon[10]
|
|
!4jeon[0] := "FLT"
|
|
!4jeon[1] := "REV"
|
|
!4jeon[2] := "DYN"
|
|
!4jeon[3] := "MOD"
|
|
!4jeon[4] := "DRV"
|
|
!4jeon[5] := "DLY"
|
|
!4jeon[6] := "GATER"
|
|
!4jeon[7] := "UTIL"
|
|
!4jeon[8] := "NONE"
|
|
!4jeon[9] := "EQ"
|
|
declare %xkip1[40]
|
|
declare %vma13[10] := (1, 4, 7, 7, 13, 2, 1, 2, 1, 2)
|
|
declare %lbfsg[10] := (0, 1, 5, 12, 19, 32, 34, 35, 37, 38)
|
|
%xkip1[0] := $EFFECT_TYPE_FILTER
|
|
declare %h0sir[4] := ($EFFECT_TYPE_REVERB, $EFFECT_TYPE_REVERB2, $EFFECT_TYPE_PLATEREVERB, $EFFECT_TYPE_IRC)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<4)
|
|
%xkip1[$vlhs0+1] := %h0sir[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %ksd3o[7] := ($EFFECT_TYPE_COMPRESSOR, $EFFECT_TYPE_BUS_COMP, $EFFECT_TYPE_FB_COMP, $EFFECT_TYPE_LIMITER, $EFFECT_TYPE_TRANS_MASTER, $EFFECT_TYPE_SUPERGT, $EFFECT_TYPE_TRANSLIM)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%xkip1[$vlhs0+5] := %ksd3o[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %hkc1c[7] := ($EFFECT_TYPE_CHORUS, $EFFECT_TYPE_FLANGER, $EFFECT_TYPE_PHASER, $EFFECT_TYPE_ROTATOR, $EFFECT_TYPE_CHORAL, $EFFECT_TYPE_FLAIR, $EFFECT_TYPE_PHASIS)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<7)
|
|
%xkip1[$vlhs0+12] := %hkc1c[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %nru5h[13] := ($EFFECT_TYPE_TAPE_SAT, $EFFECT_TYPE_JUMP, $EFFECT_TYPE_TWANG, $EFFECT_TYPE_SKREAMER, $EFFECT_TYPE_DISTORTION, $EFFECT_TYPE_DSTORTION, $EFFECT_TYPE_LOFI, $EFFECT_TYPE_SHAPER, $EFFECT_TYPE_VAN51, $EFFECT_TYPE_ACBOX, $EFFECT_TYPE_CAT, $EFFECT_TYPE_HOTSOLO, $EFFECT_TYPE_CABINET)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<13)
|
|
%xkip1[$vlhs0+19] := %nru5h[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %lyyys[2] := ($EFFECT_TYPE_DELAY, $EFFECT_TYPE_REPLIKA)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%xkip1[$vlhs0+32] := %lyyys[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%xkip1[34] := $EFFECT_TYPE_GAINER
|
|
declare %xyrd5[2] := ($EFFECT_TYPE_SEND_LEVELS, $EFFECT_TYPE_STEREO)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%xkip1[$vlhs0+35] := %xyrd5[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
%xkip1[37] := $EFFECT_TYPE_NONE
|
|
declare %jzvio[2] := ($EFFECT_TYPE_FILTER, $EFFECT_TYPE_SOLID_GEQ)
|
|
$vlhs0 := 0
|
|
while ($vlhs0<2)
|
|
%xkip1[$vlhs0+38] := %jzvio[$vlhs0]
|
|
inc($vlhs0)
|
|
end while
|
|
declare %iaqug[38]
|
|
%iaqug[0] := -1
|
|
%iaqug[1] := -1
|
|
%iaqug[2] := -1
|
|
%iaqug[3] := -1
|
|
%iaqug[4] := -1
|
|
%iaqug[5] := -1
|
|
%iaqug[6] := -1
|
|
%iaqug[7] := -1
|
|
%iaqug[8] := -1
|
|
%iaqug[9] := -1
|
|
%iaqug[10] := -1
|
|
%iaqug[11] := -1
|
|
%iaqug[12] := -1
|
|
%iaqug[13] := -1
|
|
%iaqug[14] := -1
|
|
%iaqug[15] := -1
|
|
%iaqug[16] := -1
|
|
%iaqug[17] := -1
|
|
%iaqug[18] := -1
|
|
%iaqug[19] := -1
|
|
%iaqug[20] := -1
|
|
%iaqug[21] := -1
|
|
%iaqug[22] := $ENGINE_PAR_PH_SPEED_UNIT
|
|
%iaqug[23] := $ENGINE_PAR_FL_SPEED_UNIT
|
|
%iaqug[24] := $ENGINE_PAR_CH_SPEED_UNIT
|
|
%iaqug[25] := -1
|
|
%iaqug[26] := $ENGINE_PAR_DL_TIME_UNIT
|
|
%iaqug[27] := $ENGINE_PAR_RDL_TIME_UNIT
|
|
%iaqug[28] := -1
|
|
%iaqug[29] := -1
|
|
%iaqug[30] := -1
|
|
%iaqug[31] := -1
|
|
%iaqug[32] := -1
|
|
%iaqug[33] := -1
|
|
%iaqug[34] := $ENGINE_PAR_FLAIR_RATE_UNIT
|
|
%iaqug[35] := $ENGINE_PAR_PHASIS_RATE_UNIT
|
|
%iaqug[36] := -1
|
|
%iaqug[37] := -1
|
|
declare %b1si1[38]
|
|
%b1si1[0] := -1
|
|
%b1si1[1] := -1
|
|
%b1si1[2] := -1
|
|
%b1si1[3] := -1
|
|
%b1si1[4] := -1
|
|
%b1si1[5] := -1
|
|
%b1si1[6] := -1
|
|
%b1si1[7] := -1
|
|
%b1si1[8] := -1
|
|
%b1si1[9] := -1
|
|
%b1si1[10] := -1
|
|
%b1si1[11] := -1
|
|
%b1si1[12] := -1
|
|
%b1si1[13] := -1
|
|
%b1si1[14] := -1
|
|
%b1si1[15] := -1
|
|
%b1si1[16] := -1
|
|
%b1si1[17] := -1
|
|
%b1si1[18] := -1
|
|
%b1si1[19] := -1
|
|
%b1si1[20] := -1
|
|
%b1si1[21] := -1
|
|
%b1si1[22] := 12
|
|
%b1si1[23] := 12
|
|
%b1si1[24] := 12
|
|
%b1si1[25] := -1
|
|
%b1si1[26] := 0
|
|
%b1si1[27] := 0
|
|
%b1si1[28] := -1
|
|
%b1si1[29] := -1
|
|
%b1si1[30] := -1
|
|
%b1si1[31] := -1
|
|
%b1si1[32] := -1
|
|
%b1si1[33] := -1
|
|
%b1si1[34] := 12
|
|
%b1si1[35] := 12
|
|
%b1si1[36] := -1
|
|
%b1si1[37] := -1
|
|
declare %cl2a0[38]
|
|
%cl2a0[0] := -1
|
|
%cl2a0[1] := -1
|
|
%cl2a0[2] := -1
|
|
%cl2a0[3] := -1
|
|
%cl2a0[4] := -1
|
|
%cl2a0[5] := -1
|
|
%cl2a0[6] := -1
|
|
%cl2a0[7] := -1
|
|
%cl2a0[8] := -1
|
|
%cl2a0[9] := -1
|
|
%cl2a0[10] := -1
|
|
%cl2a0[11] := -1
|
|
%cl2a0[12] := -1
|
|
%cl2a0[13] := -1
|
|
%cl2a0[14] := -1
|
|
%cl2a0[15] := -1
|
|
%cl2a0[16] := -1
|
|
%cl2a0[17] := -1
|
|
%cl2a0[18] := -1
|
|
%cl2a0[19] := -1
|
|
%cl2a0[20] := -1
|
|
%cl2a0[21] := -1
|
|
%cl2a0[22] := 0
|
|
%cl2a0[23] := 0
|
|
%cl2a0[24] := 0
|
|
%cl2a0[25] := -1
|
|
%cl2a0[26] := 1000000
|
|
%cl2a0[27] := 1000000
|
|
%cl2a0[28] := -1
|
|
%cl2a0[29] := -1
|
|
%cl2a0[30] := -1
|
|
%cl2a0[31] := -1
|
|
%cl2a0[32] := -1
|
|
%cl2a0[33] := -1
|
|
%cl2a0[34] := 0
|
|
%cl2a0[35] := 0
|
|
%cl2a0[36] := -1
|
|
%cl2a0[37] := -1
|
|
declare $3tnu3
|
|
declare $y0oba
|
|
declare $4qnnk
|
|
declare $m2etg
|
|
declare $hojz4 := -1
|
|
declare $bu04v := -1
|
|
declare %44fry[128] := (-1)
|
|
declare %r5pl5[38] := ($EFFECT_TYPE_NONE, $EFFECT_TYPE_REVERB, $EFFECT_TYPE_REVERB2, $EFFECT_TYPE_PLATEREVERB, $EFFECT_TYPE_IRC, $EFFECT_TYPE_BUS_COMP, $EFFECT_TYPE_FB_COMP, $EFFECT_TYPE_TRANS_MASTER, $EFFECT_TYPE_TAPE_SAT, $EFFECT_TYPE_JUMP, $EFFECT_TYPE_TWANG, $EFFECT_TYPE_SKREAMER, $EFFECT_TYPE_DISTORTION, $EFFECT_TYPE_LOFI, $EFFECT_TYPE_SHAPER, $EFFECT_TYPE_CABINET, $EFFECT_TYPE_VAN51, $EFFECT_TYPE_ACBOX, $EFFECT_TYPE_CAT, $EFFECT_TYPE_DSTORTION, $EFFECT_TYPE_HOTSOLO, $EFFECT_TYPE_ROTATOR, $EFFECT_TYPE_PHASER, $EFFECT_TYPE_FLANGER, $EFFECT_TYPE_CHORUS, $EFFECT_TYPE_LIMITER, $EFFECT_TYPE_DELAY, $EFFECT_TYPE_REPLIKA, $EFFECT_TYPE_SEND_LEVELS, $EFFECT_TYPE_GAINER, $EFFECT_TYPE_STEREO, $EFFECT_TYPE_FILTER, $EFFECT_TYPE_SOLID_GEQ, $EFFECT_TYPE_CHORAL, $EFFECT_TYPE_FLAIR, $EFFECT_TYPE_PHASIS, $EFFECT_TYPE_SUPERGT, $EFFECT_TYPE_TRANSLIM)
|
|
declare !zufcx[38]
|
|
!zufcx[0] := "None"
|
|
!zufcx[1] := "Leg Rev"
|
|
!zufcx[2] := "Alg Rev"
|
|
!zufcx[3] := "Plate"
|
|
!zufcx[4] := "IRC"
|
|
!zufcx[5] := "B Comp"
|
|
!zufcx[6] := "F Comp"
|
|
!zufcx[7] := "Transm"
|
|
!zufcx[8] := "Tape"
|
|
!zufcx[9] := "Jump"
|
|
!zufcx[10] := "Twang"
|
|
!zufcx[11] := "Skreamer"
|
|
!zufcx[12] := "Dist"
|
|
!zufcx[13] := "Lofi"
|
|
!zufcx[14] := "Shaper"
|
|
!zufcx[15] := "Cabinet"
|
|
!zufcx[16] := "Van51"
|
|
!zufcx[17] := "AC Box"
|
|
!zufcx[18] := "Cat"
|
|
!zufcx[19] := "Dstortion"
|
|
!zufcx[20] := "Hotsolo"
|
|
!zufcx[21] := "Rotator"
|
|
!zufcx[22] := "Phaser"
|
|
!zufcx[23] := "Flanger"
|
|
!zufcx[24] := "Chorus"
|
|
!zufcx[25] := "Limiter"
|
|
!zufcx[26] := "Delay"
|
|
!zufcx[27] := "Replika"
|
|
!zufcx[28] := "Send"
|
|
!zufcx[29] := "Gater"
|
|
!zufcx[30] := "Stereo"
|
|
!zufcx[31] := "Filter"
|
|
!zufcx[32] := "Solid EQ"
|
|
!zufcx[33] := "Choral"
|
|
!zufcx[34] := "Flair"
|
|
!zufcx[35] := "Phasis"
|
|
!zufcx[36] := "Super GT"
|
|
!zufcx[37] := "Transparent Limiter"
|
|
declare %_FXC__fx_par_defs[114]
|
|
declare %pxmow[4] := ($EFFECT_TYPE_BUS_COMP, $EFFECT_TYPE_LIMITER, $EFFECT_TYPE_SUPERGT, $EFFECT_TYPE_TRANSLIM)
|
|
load_array_str(%_FXC__fx_par_defs,@ichwi & "CONFIG/fx_default_values.nka")
|
|
declare %qaxnh[38]
|
|
$3tnu3 := 0
|
|
while ($3tnu3<38)
|
|
$kyxij := search(%xkip1,%r5pl5[$3tnu3])
|
|
if ($kyxij # -1)
|
|
$y0oba := 0
|
|
while (not in_range($kyxij,%lbfsg[$y0oba],%lbfsg[$y0oba]+%vma13[$y0oba]-1) and ($y0oba<9))
|
|
inc($y0oba)
|
|
end while
|
|
%qaxnh[$3tnu3] := $y0oba
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
end if
|
|
if (1=1)
|
|
declare %3zszw[32]
|
|
make_persistent(%3zszw)
|
|
declare %45vq1[32]
|
|
make_persistent(%45vq1)
|
|
declare %l2lis[32]
|
|
make_persistent(%l2lis)
|
|
declare %pqcgh[32]
|
|
make_persistent(%pqcgh)
|
|
declare %sxlyt[32]
|
|
make_persistent(%sxlyt)
|
|
declare %xav2l[192]
|
|
make_persistent(%xav2l)
|
|
declare %vhqqa[240]
|
|
declare $00fmj := 1500
|
|
declare $k240z
|
|
declare !mnszq[4]
|
|
declare %3wawk[4] := (-2)
|
|
declare %zjgrf[4] := (-2)
|
|
declare %w3zhr[4]
|
|
declare %lwrqe[4] := (0)
|
|
declare %rx3ip[1024] := (080000000h)
|
|
declare $vhkpx := 2000
|
|
declare %preset_buf[32] := (0)
|
|
declare !_preset_names[250]
|
|
load_array_str(!_preset_names,@ichwi & "CONFIG/fx_preset_names.nka")
|
|
declare %FXC__num_presets4cat[10]
|
|
load_array_str(%FXC__num_presets4cat,@ichwi & "CONFIG/num_presets.nka")
|
|
$3tnu3 := 0
|
|
while ($3tnu3<38)
|
|
if (in_range(%r5pl5[$3tnu3],0,num_elements(%44fry)-1))
|
|
%44fry[%r5pl5[$3tnu3]] := $3tnu3
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
declare $jtvhn
|
|
declare $g2apy
|
|
declare $pgdcw
|
|
declare $euybr
|
|
end if
|
|
if (1=1)
|
|
declare %mpjcc[5]
|
|
declare %5l45p[5]
|
|
declare !1ckyy[5]
|
|
declare %h152r[5]
|
|
make_instr_persistent(%h152r)
|
|
declare %wvg1x[5]
|
|
declare %dah4f[5]
|
|
declare %z3r0h[32]
|
|
declare $ibaqw
|
|
declare %pfy4f[100]
|
|
declare %u2u11[20]
|
|
declare ui_button $qpt4p
|
|
declare ui_button $crmx3
|
|
declare ui_button $ej0s0
|
|
declare ui_button $0opdg
|
|
declare ui_button $2n2ws
|
|
declare ui_button $lvtvx
|
|
declare ui_button $vljka
|
|
declare ui_button $2s05o
|
|
declare ui_button $umlht
|
|
declare ui_button $zj0wn
|
|
declare ui_button $50dyn
|
|
declare ui_button $hpwcd
|
|
declare ui_button $cboaa
|
|
declare ui_button $l1jpb
|
|
declare ui_button $1vvs5
|
|
declare ui_button $2hnjg
|
|
declare ui_button $grc51
|
|
declare ui_button $2pvsn
|
|
declare ui_button $jhigl
|
|
declare ui_button $5ptjd
|
|
$pvuhq := 0
|
|
while ($pvuhq<=19)
|
|
%u2u11[$pvuhq] := get_ui_id($qpt4p)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
declare %tsr50[10]
|
|
declare %354ul[10]
|
|
$g5k3r := 0
|
|
while ($g5k3r<=1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
set_control_par_str(%u2u11[10*$g5k3r+$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%u2u11[10*$g5k3r+$fg4rw],$CONTROL_PAR_PICTURE,"GE_CAT_GRID_BTN_" & $fg4rw)
|
|
%tsr50[$fg4rw] := %u2u11[$fg4rw]
|
|
%354ul[$fg4rw] := %u2u11[10+$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%tsr50))
|
|
%xwg5s[220+$g5k3r] := %tsr50[$g5k3r]
|
|
%cqg2m[22] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%354ul))
|
|
%xwg5s[230+$g5k3r] := %354ul[$g5k3r]
|
|
%cqg2m[23] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
!mnszq[0] := "FXC_bus1"
|
|
%3wawk[0] := -1
|
|
%zjgrf[0] := 1024
|
|
%lwrqe[0] := 0
|
|
%w3zhr[0] := 0
|
|
!mnszq[1] := "FXC_bus2"
|
|
%3wawk[1] := -1
|
|
%zjgrf[1] := 1025
|
|
%lwrqe[1] := 0
|
|
%w3zhr[1] := 1
|
|
!mnszq[2] := "FXC_master"
|
|
%3wawk[2] := -1
|
|
%zjgrf[2] := 2
|
|
%lwrqe[2] := 0
|
|
%w3zhr[2] := 0
|
|
!mnszq[3] := "FXC_send"
|
|
%3wawk[3] := -1
|
|
%zjgrf[3] := 0
|
|
%lwrqe[3] := 1
|
|
%w3zhr[3] := 0
|
|
if (1=1)
|
|
%wvg1x[0] := 4
|
|
%h152r[0] := 0
|
|
%mpjcc[0] := 0
|
|
!1ckyy[0] := "Grain FX"
|
|
%5l45p[0] := 3
|
|
%dah4f[0] := 0
|
|
declare ui_menu $h5hzc
|
|
make_persistent($h5hzc)
|
|
set_control_par_str(get_ui_id($h5hzc),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<36)
|
|
add_menu_item($h5hzc,!p4zwk[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $zdp1g
|
|
make_persistent($zdp1g)
|
|
set_control_par_str(get_ui_id($zdp1g),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($zdp1g),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<38)
|
|
add_menu_item($zdp1g,!zufcx[$fg4rw],%r5pl5[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $rbym5
|
|
make_persistent($rbym5)
|
|
set_control_par_str(get_ui_id($rbym5),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<25)
|
|
add_menu_item($rbym5,$fg4rw,$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $qtz0p
|
|
make_persistent($qtz0p)
|
|
set_control_par_str(get_ui_id($qtz0p),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($qtz0p),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<57)
|
|
add_menu_item($qtz0p,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $5euxa
|
|
set_control_par_str(get_ui_id($5euxa),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5euxa),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
|
|
declare %3qlrx[4]
|
|
declare ui_switch $b2aaa
|
|
declare ui_switch $j14ck
|
|
declare ui_switch $jbe0y
|
|
declare ui_switch $dqn5p
|
|
$pvuhq := 0
|
|
while ($pvuhq<=3)
|
|
%3qlrx[$pvuhq] := get_ui_id($b2aaa)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
set_control_par_str(%3qlrx[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%3qlrx[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 0)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $hsq4o
|
|
set_control_par_str(get_ui_id($hsq4o),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hsq4o),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
|
|
declare ui_button $iqkyu
|
|
set_control_par_str(get_ui_id($iqkyu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($iqkyu),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
|
|
declare ui_button $upamz
|
|
set_control_par_str(get_ui_id($upamz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($upamz),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
|
|
declare ui_button $dtkx1
|
|
set_control_par_str(get_ui_id($dtkx1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dtkx1),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
|
|
declare ui_switch $usl30
|
|
make_persistent($usl30)
|
|
set_control_par_str(get_ui_id($usl30),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($usl30),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 0)
|
|
declare %kz5ve[10] := (get_ui_id($h5hzc), get_ui_id($zdp1g), get_ui_id($rbym5), get_ui_id($qtz0p), get_ui_id($5euxa), get_ui_id($hsq4o), get_ui_id($iqkyu), get_ui_id($usl30), get_ui_id($dtkx1), get_ui_id($upamz))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kz5ve))
|
|
%xwg5s[690+$g5k3r] := %kz5ve[$g5k3r]
|
|
%cqg2m[69] := 1
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%3qlrx))
|
|
%xwg5s[1260+$g5k3r] := %3qlrx[$g5k3r]
|
|
%cqg2m[126] := 1
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%pfy4f[$fg4rw] := %kz5ve[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<4)
|
|
%pfy4f[$fg4rw+$g5k3r] := %3qlrx[$g5k3r]
|
|
inc($g5k3r)
|
|
end while
|
|
declare $4ii0j
|
|
declare $4kfp4
|
|
$4ii0j := 0
|
|
while ($4ii0j<38)
|
|
$4kfp4 := get_menu_item_value(%pfy4f[1],$4ii0j)
|
|
if (%lwrqe[0]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31))) # %45vq1[%h152r[0]]))
|
|
set_menu_item_visibility(%pfy4f[1],$4ii0j,0)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[1],$4ii0j,1)
|
|
end if
|
|
inc($4ii0j)
|
|
end while
|
|
%wvg1x[1] := 4
|
|
%h152r[1] := 0
|
|
%mpjcc[1] := 1
|
|
!1ckyy[1] := "Sample FX"
|
|
%5l45p[1] := 3
|
|
%dah4f[1] := 1
|
|
declare ui_menu $fzikm
|
|
make_persistent($fzikm)
|
|
set_control_par_str(get_ui_id($fzikm),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<36)
|
|
add_menu_item($fzikm,!p4zwk[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $5vq54
|
|
make_persistent($5vq54)
|
|
set_control_par_str(get_ui_id($5vq54),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($5vq54),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<38)
|
|
add_menu_item($5vq54,!zufcx[$fg4rw],%r5pl5[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $z0ozi
|
|
make_persistent($z0ozi)
|
|
set_control_par_str(get_ui_id($z0ozi),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<25)
|
|
add_menu_item($z0ozi,$fg4rw,$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $1faxj
|
|
make_persistent($1faxj)
|
|
set_control_par_str(get_ui_id($1faxj),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($1faxj),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<57)
|
|
add_menu_item($1faxj,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $m5fet
|
|
set_control_par_str(get_ui_id($m5fet),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($m5fet),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
|
|
declare %0bnhl[4]
|
|
declare ui_switch $lahkd
|
|
declare ui_switch $p5uon
|
|
declare ui_switch $muk05
|
|
declare ui_switch $mmaez
|
|
$pvuhq := 0
|
|
while ($pvuhq<=3)
|
|
%0bnhl[$pvuhq] := get_ui_id($lahkd)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
set_control_par_str(%0bnhl[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%0bnhl[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 0)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $j3xgb
|
|
set_control_par_str(get_ui_id($j3xgb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($j3xgb),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
|
|
declare ui_button $vszfv
|
|
set_control_par_str(get_ui_id($vszfv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vszfv),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
|
|
declare ui_button $vsxdx
|
|
set_control_par_str(get_ui_id($vsxdx),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vsxdx),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
|
|
declare ui_button $htkht
|
|
set_control_par_str(get_ui_id($htkht),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($htkht),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
|
|
declare ui_switch $zhirl
|
|
make_persistent($zhirl)
|
|
set_control_par_str(get_ui_id($zhirl),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zhirl),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 0)
|
|
declare %xjzqx[10] := (get_ui_id($fzikm), get_ui_id($5vq54), get_ui_id($z0ozi), get_ui_id($1faxj), get_ui_id($m5fet), get_ui_id($j3xgb), get_ui_id($vszfv), get_ui_id($zhirl), get_ui_id($htkht), get_ui_id($vsxdx))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%xjzqx))
|
|
%xwg5s[700+$g5k3r] := %xjzqx[$g5k3r]
|
|
%cqg2m[70] := 1
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%0bnhl))
|
|
%xwg5s[1270+$g5k3r] := %0bnhl[$g5k3r]
|
|
%cqg2m[127] := 1
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%pfy4f[20+$fg4rw] := %xjzqx[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<4)
|
|
%pfy4f[20+$fg4rw+$g5k3r] := %0bnhl[$g5k3r]
|
|
inc($g5k3r)
|
|
end while
|
|
$4ii0j := 0
|
|
while ($4ii0j<38)
|
|
$4kfp4 := get_menu_item_value(%pfy4f[21],$4ii0j)
|
|
if (%lwrqe[1]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31))) # %45vq1[8+%h152r[1]]))
|
|
set_menu_item_visibility(%pfy4f[21],$4ii0j,0)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[21],$4ii0j,1)
|
|
end if
|
|
inc($4ii0j)
|
|
end while
|
|
%wvg1x[2] := 4
|
|
%h152r[2] := 0
|
|
%mpjcc[2] := 2
|
|
!1ckyy[2] := "Master FX"
|
|
%5l45p[2] := 4
|
|
%dah4f[2] := 1
|
|
declare ui_menu $vpahb
|
|
make_persistent($vpahb)
|
|
set_control_par_str(get_ui_id($vpahb),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<36)
|
|
add_menu_item($vpahb,!p4zwk[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $ydygy
|
|
make_persistent($ydygy)
|
|
set_control_par_str(get_ui_id($ydygy),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($ydygy),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<38)
|
|
add_menu_item($ydygy,!zufcx[$fg4rw],%r5pl5[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $5v21m
|
|
make_persistent($5v21m)
|
|
set_control_par_str(get_ui_id($5v21m),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<25)
|
|
add_menu_item($5v21m,$fg4rw,$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $oox5y
|
|
make_persistent($oox5y)
|
|
set_control_par_str(get_ui_id($oox5y),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($oox5y),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<57)
|
|
add_menu_item($oox5y,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $00fkv
|
|
set_control_par_str(get_ui_id($00fkv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($00fkv),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
|
|
declare %bvh4q[4]
|
|
declare ui_switch $5dq1e
|
|
declare ui_switch $2ueu0
|
|
declare ui_switch $z2hm2
|
|
declare ui_switch $12ugr
|
|
$pvuhq := 0
|
|
while ($pvuhq<=3)
|
|
%bvh4q[$pvuhq] := get_ui_id($5dq1e)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
set_control_par_str(%bvh4q[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%bvh4q[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 0)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $vlwdd
|
|
set_control_par_str(get_ui_id($vlwdd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vlwdd),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
|
|
declare ui_button $as2k5
|
|
set_control_par_str(get_ui_id($as2k5),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($as2k5),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
|
|
declare ui_button $psujc
|
|
set_control_par_str(get_ui_id($psujc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($psujc),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
|
|
declare ui_button $q3mq5
|
|
set_control_par_str(get_ui_id($q3mq5),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($q3mq5),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
|
|
declare ui_switch $zsz2j
|
|
make_persistent($zsz2j)
|
|
set_control_par_str(get_ui_id($zsz2j),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zsz2j),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 0)
|
|
declare %1k1hc[10] := (get_ui_id($vpahb), get_ui_id($ydygy), get_ui_id($5v21m), get_ui_id($oox5y), get_ui_id($00fkv), get_ui_id($vlwdd), get_ui_id($as2k5), get_ui_id($zsz2j), get_ui_id($q3mq5), get_ui_id($psujc))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%1k1hc))
|
|
%xwg5s[710+$g5k3r] := %1k1hc[$g5k3r]
|
|
%cqg2m[71] := 8
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%bvh4q))
|
|
%xwg5s[1280+$g5k3r] := %bvh4q[$g5k3r]
|
|
%cqg2m[128] := 8
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%pfy4f[40+$fg4rw] := %1k1hc[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<4)
|
|
%pfy4f[40+$fg4rw+$g5k3r] := %bvh4q[$g5k3r]
|
|
inc($g5k3r)
|
|
end while
|
|
$4ii0j := 0
|
|
while ($4ii0j<38)
|
|
$4kfp4 := get_menu_item_value(%pfy4f[41],$4ii0j)
|
|
if (%lwrqe[2]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31))) # %45vq1[16+%h152r[2]]))
|
|
set_menu_item_visibility(%pfy4f[41],$4ii0j,0)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[41],$4ii0j,1)
|
|
end if
|
|
inc($4ii0j)
|
|
end while
|
|
%wvg1x[3] := 1
|
|
%h152r[3] := 0
|
|
%mpjcc[3] := 3
|
|
!1ckyy[3] := "SND_RV"
|
|
%5l45p[3] := 3
|
|
%dah4f[3] := 1
|
|
declare ui_menu $avs41
|
|
make_persistent($avs41)
|
|
set_control_par_str(get_ui_id($avs41),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<36)
|
|
add_menu_item($avs41,!p4zwk[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $ubr4k
|
|
make_persistent($ubr4k)
|
|
set_control_par_str(get_ui_id($ubr4k),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($ubr4k),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<38)
|
|
add_menu_item($ubr4k,!zufcx[$fg4rw],%r5pl5[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $zig2t
|
|
make_persistent($zig2t)
|
|
set_control_par_str(get_ui_id($zig2t),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<25)
|
|
add_menu_item($zig2t,$fg4rw,$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $krqtg
|
|
make_persistent($krqtg)
|
|
set_control_par_str(get_ui_id($krqtg),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($krqtg),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<57)
|
|
add_menu_item($krqtg,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $uvkex
|
|
set_control_par_str(get_ui_id($uvkex),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uvkex),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
|
|
declare %lvzyj[4]
|
|
declare ui_switch $hdpxn
|
|
declare ui_switch $xdahy
|
|
declare ui_switch $dkvhn
|
|
declare ui_switch $aqf0b
|
|
$pvuhq := 0
|
|
while ($pvuhq<=3)
|
|
%lvzyj[$pvuhq] := get_ui_id($hdpxn)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
set_control_par_str(%lvzyj[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%lvzyj[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 1)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $y1u34
|
|
set_control_par_str(get_ui_id($y1u34),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($y1u34),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
|
|
declare ui_button $kpijv
|
|
set_control_par_str(get_ui_id($kpijv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($kpijv),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
|
|
declare ui_button $mmvzm
|
|
set_control_par_str(get_ui_id($mmvzm),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mmvzm),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
|
|
declare ui_button $elcsk
|
|
set_control_par_str(get_ui_id($elcsk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($elcsk),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
|
|
declare ui_switch $iyugw
|
|
make_persistent($iyugw)
|
|
set_control_par_str(get_ui_id($iyugw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($iyugw),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 1)
|
|
declare %kmnty[10] := (get_ui_id($avs41), get_ui_id($ubr4k), get_ui_id($zig2t), get_ui_id($krqtg), get_ui_id($uvkex), get_ui_id($y1u34), get_ui_id($kpijv), get_ui_id($iyugw), get_ui_id($elcsk), get_ui_id($mmvzm))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kmnty))
|
|
%xwg5s[730+$g5k3r] := %kmnty[$g5k3r]
|
|
%cqg2m[73] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%lvzyj))
|
|
%xwg5s[1290+$g5k3r] := %lvzyj[$g5k3r]
|
|
%cqg2m[129] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%pfy4f[60+$fg4rw] := %kmnty[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<4)
|
|
%pfy4f[60+$fg4rw+$g5k3r] := %lvzyj[$g5k3r]
|
|
inc($g5k3r)
|
|
end while
|
|
$4ii0j := 0
|
|
while ($4ii0j<38)
|
|
$4kfp4 := get_menu_item_value(%pfy4f[61],$4ii0j)
|
|
if (%lwrqe[3]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31))) # %45vq1[24+%h152r[3]]))
|
|
set_menu_item_visibility(%pfy4f[61],$4ii0j,0)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[61],$4ii0j,1)
|
|
end if
|
|
inc($4ii0j)
|
|
end while
|
|
%wvg1x[4] := 0
|
|
%h152r[4] := 1
|
|
%mpjcc[4] := 3
|
|
!1ckyy[4] := "SND_DL"
|
|
%5l45p[4] := 3
|
|
%dah4f[4] := 0
|
|
declare ui_menu $hnem0
|
|
make_persistent($hnem0)
|
|
set_control_par_str(get_ui_id($hnem0),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<36)
|
|
add_menu_item($hnem0,!p4zwk[$fg4rw],$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $xg50a
|
|
make_persistent($xg50a)
|
|
set_control_par_str(get_ui_id($xg50a),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($xg50a),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<38)
|
|
add_menu_item($xg50a,!zufcx[$fg4rw],%r5pl5[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $25tac
|
|
make_persistent($25tac)
|
|
set_control_par_str(get_ui_id($25tac),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<25)
|
|
add_menu_item($25tac,$fg4rw,$fg4rw)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_menu $yhnjz
|
|
make_persistent($yhnjz)
|
|
set_control_par_str(get_ui_id($yhnjz),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par(get_ui_id($yhnjz),$CONTROL_PAR_FONT_TYPE,3)
|
|
$fg4rw := 0
|
|
while ($fg4rw<57)
|
|
add_menu_item($yhnjz,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $vppxu
|
|
set_control_par_str(get_ui_id($vppxu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vppxu),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
|
|
declare %cxmbd[4]
|
|
declare ui_switch $q1h31
|
|
declare ui_switch $dsxga
|
|
declare ui_switch $fkuzg
|
|
declare ui_switch $av4dw
|
|
$pvuhq := 0
|
|
while ($pvuhq<=3)
|
|
%cxmbd[$pvuhq] := get_ui_id($q1h31)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
set_control_par_str(%cxmbd[$fg4rw],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%cxmbd[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 1)
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $nar4l
|
|
set_control_par_str(get_ui_id($nar4l),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nar4l),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
|
|
declare ui_button $g2sn3
|
|
set_control_par_str(get_ui_id($g2sn3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($g2sn3),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
|
|
declare ui_button $24ggh
|
|
set_control_par_str(get_ui_id($24ggh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($24ggh),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
|
|
declare ui_button $ijtiz
|
|
set_control_par_str(get_ui_id($ijtiz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ijtiz),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
|
|
declare ui_switch $o0h5y
|
|
make_persistent($o0h5y)
|
|
set_control_par_str(get_ui_id($o0h5y),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($o0h5y),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 1)
|
|
declare %cg4ky[10] := (get_ui_id($hnem0), get_ui_id($xg50a), get_ui_id($25tac), get_ui_id($yhnjz), get_ui_id($vppxu), get_ui_id($nar4l), get_ui_id($g2sn3), get_ui_id($o0h5y), get_ui_id($ijtiz), get_ui_id($24ggh))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%cg4ky))
|
|
%xwg5s[720+$g5k3r] := %cg4ky[$g5k3r]
|
|
%cqg2m[72] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%cxmbd))
|
|
%xwg5s[1300+$g5k3r] := %cxmbd[$g5k3r]
|
|
%cqg2m[130] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%pfy4f[80+$fg4rw] := %cg4ky[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<4)
|
|
%pfy4f[80+$fg4rw+$g5k3r] := %cxmbd[$g5k3r]
|
|
inc($g5k3r)
|
|
end while
|
|
$4ii0j := 0
|
|
while ($4ii0j<38)
|
|
$4kfp4 := get_menu_item_value(%pfy4f[81],$4ii0j)
|
|
if (%lwrqe[3]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31))) # %45vq1[24+%h152r[4]]))
|
|
set_menu_item_visibility(%pfy4f[81],$4ii0j,0)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[81],$4ii0j,1)
|
|
end if
|
|
inc($4ii0j)
|
|
end while
|
|
end if
|
|
if (1=1)
|
|
declare $r3fzy
|
|
declare $2rota
|
|
declare %pxakq[4] := (40, 679, 679, 0)
|
|
declare %wswe0[4] := (362, 362, 362, 0)
|
|
declare %gxveo[4] := (4, 4, 4, 1)
|
|
declare %ejazl[16]
|
|
declare ui_button $1pewz
|
|
declare ui_button $nvtf2
|
|
declare ui_button $dau0c
|
|
declare ui_button $fq2ca
|
|
declare ui_button $imy0h
|
|
declare ui_button $rmb0e
|
|
declare ui_button $ndbm1
|
|
declare ui_button $mmx4s
|
|
declare ui_button $eedi4
|
|
declare ui_button $sipdv
|
|
declare ui_button $l3a0o
|
|
declare ui_button $frelg
|
|
declare ui_button $zuh3e
|
|
declare ui_button $svrkg
|
|
declare ui_button $a2ykl
|
|
declare ui_button $vosjt
|
|
$pvuhq := 0
|
|
while ($pvuhq<=15)
|
|
%ejazl[$pvuhq] := get_ui_id($1pewz)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
declare %d0oml[16]
|
|
$r3fzy := 0
|
|
while ($r3fzy<4)
|
|
$2rota := 0
|
|
while ($2rota<4)
|
|
if ($2rota<%gxveo[$r3fzy] and (%gxveo[$r3fzy]>1))
|
|
set_control_par_str(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_10")
|
|
set_control_par_str(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_TEXT,"")
|
|
else
|
|
if (%gxveo[$r3fzy]>0)
|
|
set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end if
|
|
inc($2rota)
|
|
end while
|
|
inc($r3fzy)
|
|
end while
|
|
declare %d2t1g[4]
|
|
declare $sfqck
|
|
declare ~tllyo
|
|
declare ui_xy ?2jnfl[1]
|
|
set_control_par(get_ui_id(?2jnfl),$CONTROL_PAR_MOUSE_MODE,2)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par_str_arr(get_ui_id(?2jnfl),$CONTROL_PAR_CURSOR_PICTURE,"GE_TABS_Blank_XY_Cursor",0)
|
|
%d2t1g[0] := get_ui_id(?2jnfl)
|
|
declare ui_xy ?afz4n[1]
|
|
set_control_par(get_ui_id(?afz4n),$CONTROL_PAR_MOUSE_MODE,2)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par_str_arr(get_ui_id(?afz4n),$CONTROL_PAR_CURSOR_PICTURE,"GE_TABS_Blank_XY_Cursor",0)
|
|
%d2t1g[1] := get_ui_id(?afz4n)
|
|
declare ui_xy ?a14rv[1]
|
|
set_control_par(get_ui_id(?a14rv),$CONTROL_PAR_MOUSE_MODE,2)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par_str_arr(get_ui_id(?a14rv),$CONTROL_PAR_CURSOR_PICTURE,"GE_TABS_Blank_XY_Cursor",0)
|
|
%d2t1g[2] := get_ui_id(?a14rv)
|
|
declare %x3fz4[10] := (get_ui_id($1pewz), get_ui_id($nvtf2), get_ui_id($dau0c), get_ui_id($fq2ca), get_ui_id($imy0h), get_ui_id($rmb0e), get_ui_id($ndbm1), get_ui_id($mmx4s), get_ui_id(?2jnfl), get_ui_id(?afz4n))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%x3fz4))
|
|
%xwg5s[740+$g5k3r] := %x3fz4[$g5k3r]
|
|
%cqg2m[74] := 1
|
|
inc($g5k3r)
|
|
end while
|
|
declare %xzu1q[5] := (get_ui_id($eedi4), get_ui_id($sipdv), get_ui_id($l3a0o), get_ui_id($frelg), get_ui_id(?a14rv))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%xzu1q))
|
|
%xwg5s[200+$g5k3r] := %xzu1q[$g5k3r]
|
|
%cqg2m[20] := 8
|
|
inc($g5k3r)
|
|
end while
|
|
declare %geafe[4] := (0, 1, 2, 3)
|
|
declare %rdbw1[4] := (0, 1, 2, 3)
|
|
declare $vp2vr
|
|
declare $1fg0q := 0
|
|
declare $odmi5
|
|
declare $zpa1n
|
|
declare $ptarc
|
|
declare %v5xab[4]
|
|
declare $iwpwh
|
|
declare $0eeyn
|
|
declare $yyqo2
|
|
declare $nsffy
|
|
declare $ikf00
|
|
declare $ufovt
|
|
end if
|
|
if (1=1)
|
|
declare ui_slider $qbesm(0, 1000000)
|
|
make_persistent($qbesm)
|
|
declare ui_slider $24riz(-1000000, 1000000)
|
|
make_persistent($24riz)
|
|
set_control_par_str(get_ui_id($24riz),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $e2h4j
|
|
make_persistent($e2h4j)
|
|
set_control_par_str(get_ui_id($e2h4j),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($e2h4j,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($e2h4j),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 35
|
|
%n34di[$upapg] := get_ui_id($e2h4j)
|
|
%nwlgb[$upapg] := get_ui_id($24riz)
|
|
!4gjzd[35] := "_1"
|
|
%c1qym[35] := get_ui_id($24riz)
|
|
%41o3s[35] := get_ui_id($qbesm)
|
|
declare ui_label $jns1s(1, 1)
|
|
set_control_par_str(get_ui_id($jns1s),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jns1s),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[35] := get_ui_id($jns1s)
|
|
declare ui_label $zjvdl(1, 1)
|
|
set_control_par_str(get_ui_id($zjvdl),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zjvdl),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[35] := get_ui_id($zjvdl)
|
|
declare ui_label $exyhd(1, 1)
|
|
set_control_par_str(get_ui_id($exyhd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($exyhd),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($exyhd),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[35] := get_ui_id($exyhd)
|
|
%qxmpr[35] := 1000000
|
|
%oazdd[35] := 1
|
|
!gh3f0[35] := " ?"
|
|
?rylw5[35] := 1.0
|
|
%q4mzh[35] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[35] := -1
|
|
%hpc0e[35] := 0
|
|
%eujmz[35] := 1024
|
|
%fogcg[35] := 1
|
|
%5zak5[35] := 0
|
|
%dwdw3[35] := 0
|
|
%sbnwu[35] := 1000000
|
|
%jeswc[35] := 1012
|
|
%mnk53[35] := 75
|
|
declare %iud5t[10] := (get_ui_id($qbesm), get_ui_id($24riz), get_ui_id($jns1s), get_ui_id($zjvdl), get_ui_id($exyhd), get_ui_id($e2h4j), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%iud5t))
|
|
%xwg5s[750+$g5k3r] := %iud5t[$g5k3r]
|
|
%cqg2m[75] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $tqsps(0, 1000000)
|
|
make_persistent($tqsps)
|
|
declare ui_slider $51jvx(-1000000, 1000000)
|
|
make_persistent($51jvx)
|
|
set_control_par_str(get_ui_id($51jvx),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $lqfpr
|
|
make_persistent($lqfpr)
|
|
set_control_par_str(get_ui_id($lqfpr),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($lqfpr,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($lqfpr),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 36
|
|
%n34di[$upapg] := get_ui_id($lqfpr)
|
|
%nwlgb[$upapg] := get_ui_id($51jvx)
|
|
!4gjzd[36] := "_1"
|
|
%c1qym[36] := get_ui_id($51jvx)
|
|
%41o3s[36] := get_ui_id($tqsps)
|
|
declare ui_label $lnbi2(1, 1)
|
|
set_control_par_str(get_ui_id($lnbi2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($lnbi2),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[36] := get_ui_id($lnbi2)
|
|
declare ui_label $10amc(1, 1)
|
|
set_control_par_str(get_ui_id($10amc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($10amc),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[36] := get_ui_id($10amc)
|
|
declare ui_label $sxuer(1, 1)
|
|
set_control_par_str(get_ui_id($sxuer),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($sxuer),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($sxuer),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[36] := get_ui_id($sxuer)
|
|
%qxmpr[36] := 1000000
|
|
%oazdd[36] := 1
|
|
!gh3f0[36] := " ?"
|
|
?rylw5[36] := 1.0
|
|
%q4mzh[36] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[36] := -1
|
|
%hpc0e[36] := 0
|
|
%eujmz[36] := 1024
|
|
%fogcg[36] := 0
|
|
%5zak5[36] := 0
|
|
%dwdw3[36] := 0
|
|
%sbnwu[36] := 1000000
|
|
%jeswc[36] := 1015
|
|
%mnk53[36] := 76
|
|
declare %0jpdz[10] := (get_ui_id($tqsps), get_ui_id($51jvx), get_ui_id($lnbi2), get_ui_id($10amc), get_ui_id($sxuer), get_ui_id($lqfpr), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%0jpdz))
|
|
%xwg5s[760+$g5k3r] := %0jpdz[$g5k3r]
|
|
%cqg2m[76] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $4knyg(0, 1000000)
|
|
make_persistent($4knyg)
|
|
declare ui_slider $rsero(-1000000, 1000000)
|
|
make_persistent($rsero)
|
|
set_control_par_str(get_ui_id($rsero),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $sejrr
|
|
make_persistent($sejrr)
|
|
set_control_par_str(get_ui_id($sejrr),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($sejrr,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($sejrr),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 37
|
|
%n34di[$upapg] := get_ui_id($sejrr)
|
|
%nwlgb[$upapg] := get_ui_id($rsero)
|
|
!4gjzd[37] := "_1"
|
|
%c1qym[37] := get_ui_id($rsero)
|
|
%41o3s[37] := get_ui_id($4knyg)
|
|
declare ui_label $h2jhq(1, 1)
|
|
set_control_par_str(get_ui_id($h2jhq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($h2jhq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[37] := get_ui_id($h2jhq)
|
|
declare ui_label $2yvrg(1, 1)
|
|
set_control_par_str(get_ui_id($2yvrg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($2yvrg),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[37] := get_ui_id($2yvrg)
|
|
declare ui_label $3gdmd(1, 1)
|
|
set_control_par_str(get_ui_id($3gdmd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3gdmd),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($3gdmd),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[37] := get_ui_id($3gdmd)
|
|
%qxmpr[37] := 1000000
|
|
%oazdd[37] := 1
|
|
!gh3f0[37] := " ?"
|
|
?rylw5[37] := 1.0
|
|
%q4mzh[37] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[37] := -1
|
|
%hpc0e[37] := 0
|
|
%eujmz[37] := 1024
|
|
%fogcg[37] := 0
|
|
%5zak5[37] := 1
|
|
%dwdw3[37] := 0
|
|
%sbnwu[37] := 1000000
|
|
%jeswc[37] := 1018
|
|
%mnk53[37] := 77
|
|
declare %rmqqg[10] := (get_ui_id($4knyg), get_ui_id($rsero), get_ui_id($h2jhq), get_ui_id($2yvrg), get_ui_id($3gdmd), get_ui_id($sejrr), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%rmqqg))
|
|
%xwg5s[770+$g5k3r] := %rmqqg[$g5k3r]
|
|
%cqg2m[77] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $x5zyo(0, 1000000)
|
|
make_persistent($x5zyo)
|
|
declare ui_slider $os0gc(-1000000, 1000000)
|
|
make_persistent($os0gc)
|
|
set_control_par_str(get_ui_id($os0gc),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $2iqnc
|
|
make_persistent($2iqnc)
|
|
set_control_par_str(get_ui_id($2iqnc),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($2iqnc,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($2iqnc),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 38
|
|
%n34di[$upapg] := get_ui_id($2iqnc)
|
|
%nwlgb[$upapg] := get_ui_id($os0gc)
|
|
!4gjzd[38] := "_1"
|
|
%c1qym[38] := get_ui_id($os0gc)
|
|
%41o3s[38] := get_ui_id($x5zyo)
|
|
declare ui_label $14keh(1, 1)
|
|
set_control_par_str(get_ui_id($14keh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($14keh),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[38] := get_ui_id($14keh)
|
|
declare ui_label $pwgrq(1, 1)
|
|
set_control_par_str(get_ui_id($pwgrq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pwgrq),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[38] := get_ui_id($pwgrq)
|
|
declare ui_label $be2sk(1, 1)
|
|
set_control_par_str(get_ui_id($be2sk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($be2sk),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($be2sk),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[38] := get_ui_id($be2sk)
|
|
%qxmpr[38] := 1000000
|
|
%oazdd[38] := 1
|
|
!gh3f0[38] := " ?"
|
|
?rylw5[38] := 1.0
|
|
%q4mzh[38] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[38] := -1
|
|
%hpc0e[38] := 1
|
|
%eujmz[38] := 1024
|
|
%fogcg[38] := 1
|
|
%5zak5[38] := 0
|
|
%dwdw3[38] := 0
|
|
%sbnwu[38] := 1000000
|
|
%jeswc[38] := 1021
|
|
%mnk53[38] := 78
|
|
declare %kvzs0[10] := (get_ui_id($x5zyo), get_ui_id($os0gc), get_ui_id($14keh), get_ui_id($pwgrq), get_ui_id($be2sk), get_ui_id($2iqnc), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kvzs0))
|
|
%xwg5s[780+$g5k3r] := %kvzs0[$g5k3r]
|
|
%cqg2m[78] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $3xmqt(0, 1000000)
|
|
make_persistent($3xmqt)
|
|
declare ui_slider $0nwvw(-1000000, 1000000)
|
|
make_persistent($0nwvw)
|
|
set_control_par_str(get_ui_id($0nwvw),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $o0yx0
|
|
make_persistent($o0yx0)
|
|
set_control_par_str(get_ui_id($o0yx0),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($o0yx0,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($o0yx0),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 39
|
|
%n34di[$upapg] := get_ui_id($o0yx0)
|
|
%nwlgb[$upapg] := get_ui_id($0nwvw)
|
|
!4gjzd[39] := "_1"
|
|
%c1qym[39] := get_ui_id($0nwvw)
|
|
%41o3s[39] := get_ui_id($3xmqt)
|
|
declare ui_label $f0q5x(1, 1)
|
|
set_control_par_str(get_ui_id($f0q5x),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($f0q5x),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[39] := get_ui_id($f0q5x)
|
|
declare ui_label $mcaak(1, 1)
|
|
set_control_par_str(get_ui_id($mcaak),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mcaak),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[39] := get_ui_id($mcaak)
|
|
declare ui_label $faxjz(1, 1)
|
|
set_control_par_str(get_ui_id($faxjz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($faxjz),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($faxjz),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[39] := get_ui_id($faxjz)
|
|
%qxmpr[39] := 1000000
|
|
%oazdd[39] := 1
|
|
!gh3f0[39] := " ?"
|
|
?rylw5[39] := 1.0
|
|
%q4mzh[39] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[39] := -1
|
|
%hpc0e[39] := 1
|
|
%eujmz[39] := 1024
|
|
%fogcg[39] := 0
|
|
%5zak5[39] := 0
|
|
%dwdw3[39] := 0
|
|
%sbnwu[39] := 1000000
|
|
%jeswc[39] := 1024
|
|
%mnk53[39] := 79
|
|
declare %vtsfh[10] := (get_ui_id($3xmqt), get_ui_id($0nwvw), get_ui_id($f0q5x), get_ui_id($mcaak), get_ui_id($faxjz), get_ui_id($o0yx0), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%vtsfh))
|
|
%xwg5s[790+$g5k3r] := %vtsfh[$g5k3r]
|
|
%cqg2m[79] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $c30oe(0, 1000000)
|
|
make_persistent($c30oe)
|
|
declare ui_slider $iwhhy(-1000000, 1000000)
|
|
make_persistent($iwhhy)
|
|
set_control_par_str(get_ui_id($iwhhy),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $lafc5
|
|
make_persistent($lafc5)
|
|
set_control_par_str(get_ui_id($lafc5),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($lafc5,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($lafc5),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 40
|
|
%n34di[$upapg] := get_ui_id($lafc5)
|
|
%nwlgb[$upapg] := get_ui_id($iwhhy)
|
|
!4gjzd[40] := "_1"
|
|
%c1qym[40] := get_ui_id($iwhhy)
|
|
%41o3s[40] := get_ui_id($c30oe)
|
|
declare ui_label $earem(1, 1)
|
|
set_control_par_str(get_ui_id($earem),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($earem),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[40] := get_ui_id($earem)
|
|
declare ui_label $3zvj1(1, 1)
|
|
set_control_par_str(get_ui_id($3zvj1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3zvj1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[40] := get_ui_id($3zvj1)
|
|
declare ui_label $saqb5(1, 1)
|
|
set_control_par_str(get_ui_id($saqb5),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($saqb5),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($saqb5),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[40] := get_ui_id($saqb5)
|
|
%qxmpr[40] := 1000000
|
|
%oazdd[40] := 1
|
|
!gh3f0[40] := " ?"
|
|
?rylw5[40] := 1.0
|
|
%q4mzh[40] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[40] := -1
|
|
%hpc0e[40] := 1
|
|
%eujmz[40] := 1024
|
|
%fogcg[40] := 0
|
|
%5zak5[40] := 1
|
|
%dwdw3[40] := 0
|
|
%sbnwu[40] := 1000000
|
|
%jeswc[40] := 1027
|
|
%mnk53[40] := 80
|
|
declare %nkuav[10] := (get_ui_id($c30oe), get_ui_id($iwhhy), get_ui_id($earem), get_ui_id($3zvj1), get_ui_id($saqb5), get_ui_id($lafc5), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%nkuav))
|
|
%xwg5s[800+$g5k3r] := %nkuav[$g5k3r]
|
|
%cqg2m[80] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $41deb(0, 1000000)
|
|
make_persistent($41deb)
|
|
declare ui_slider $5yyj1(-1000000, 1000000)
|
|
make_persistent($5yyj1)
|
|
set_control_par_str(get_ui_id($5yyj1),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $nj3pk
|
|
make_persistent($nj3pk)
|
|
set_control_par_str(get_ui_id($nj3pk),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($nj3pk,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($nj3pk),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 41
|
|
%n34di[$upapg] := get_ui_id($nj3pk)
|
|
%nwlgb[$upapg] := get_ui_id($5yyj1)
|
|
!4gjzd[41] := "_1"
|
|
%c1qym[41] := get_ui_id($5yyj1)
|
|
%41o3s[41] := get_ui_id($41deb)
|
|
declare ui_label $fjqbt(1, 1)
|
|
set_control_par_str(get_ui_id($fjqbt),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fjqbt),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[41] := get_ui_id($fjqbt)
|
|
declare ui_label $fr15r(1, 1)
|
|
set_control_par_str(get_ui_id($fr15r),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fr15r),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[41] := get_ui_id($fr15r)
|
|
declare ui_label $wzxu2(1, 1)
|
|
set_control_par_str(get_ui_id($wzxu2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wzxu2),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($wzxu2),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[41] := get_ui_id($wzxu2)
|
|
%qxmpr[41] := 1000000
|
|
%oazdd[41] := 1
|
|
!gh3f0[41] := " ?"
|
|
?rylw5[41] := 1.0
|
|
%q4mzh[41] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[41] := -1
|
|
%hpc0e[41] := 2
|
|
%eujmz[41] := 1024
|
|
%fogcg[41] := 1
|
|
%5zak5[41] := 0
|
|
%dwdw3[41] := 0
|
|
%sbnwu[41] := 1000000
|
|
%jeswc[41] := 1030
|
|
%mnk53[41] := 81
|
|
declare %guouy[10] := (get_ui_id($41deb), get_ui_id($5yyj1), get_ui_id($fjqbt), get_ui_id($fr15r), get_ui_id($wzxu2), get_ui_id($nj3pk), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%guouy))
|
|
%xwg5s[810+$g5k3r] := %guouy[$g5k3r]
|
|
%cqg2m[81] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ynoq5(0, 1000000)
|
|
make_persistent($ynoq5)
|
|
declare ui_slider $brpj3(-1000000, 1000000)
|
|
make_persistent($brpj3)
|
|
set_control_par_str(get_ui_id($brpj3),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $b1s4y
|
|
make_persistent($b1s4y)
|
|
set_control_par_str(get_ui_id($b1s4y),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($b1s4y,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($b1s4y),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 42
|
|
%n34di[$upapg] := get_ui_id($b1s4y)
|
|
%nwlgb[$upapg] := get_ui_id($brpj3)
|
|
!4gjzd[42] := "_1"
|
|
%c1qym[42] := get_ui_id($brpj3)
|
|
%41o3s[42] := get_ui_id($ynoq5)
|
|
declare ui_label $ucekc(1, 1)
|
|
set_control_par_str(get_ui_id($ucekc),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ucekc),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[42] := get_ui_id($ucekc)
|
|
declare ui_label $rdik0(1, 1)
|
|
set_control_par_str(get_ui_id($rdik0),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rdik0),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[42] := get_ui_id($rdik0)
|
|
declare ui_label $ygior(1, 1)
|
|
set_control_par_str(get_ui_id($ygior),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ygior),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($ygior),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[42] := get_ui_id($ygior)
|
|
%qxmpr[42] := 1000000
|
|
%oazdd[42] := 1
|
|
!gh3f0[42] := " ?"
|
|
?rylw5[42] := 1.0
|
|
%q4mzh[42] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[42] := -1
|
|
%hpc0e[42] := 2
|
|
%eujmz[42] := 1024
|
|
%fogcg[42] := 0
|
|
%5zak5[42] := 0
|
|
%dwdw3[42] := 0
|
|
%sbnwu[42] := 1000000
|
|
%jeswc[42] := 1033
|
|
%mnk53[42] := 82
|
|
declare %qqhmy[10] := (get_ui_id($ynoq5), get_ui_id($brpj3), get_ui_id($ucekc), get_ui_id($rdik0), get_ui_id($ygior), get_ui_id($b1s4y), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%qqhmy))
|
|
%xwg5s[820+$g5k3r] := %qqhmy[$g5k3r]
|
|
%cqg2m[82] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $33zwn(0, 1000000)
|
|
make_persistent($33zwn)
|
|
declare ui_slider $hwhlk(-1000000, 1000000)
|
|
make_persistent($hwhlk)
|
|
set_control_par_str(get_ui_id($hwhlk),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $1kgif
|
|
make_persistent($1kgif)
|
|
set_control_par_str(get_ui_id($1kgif),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($1kgif,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($1kgif),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 43
|
|
%n34di[$upapg] := get_ui_id($1kgif)
|
|
%nwlgb[$upapg] := get_ui_id($hwhlk)
|
|
!4gjzd[43] := "_1"
|
|
%c1qym[43] := get_ui_id($hwhlk)
|
|
%41o3s[43] := get_ui_id($33zwn)
|
|
declare ui_label $slteq(1, 1)
|
|
set_control_par_str(get_ui_id($slteq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($slteq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[43] := get_ui_id($slteq)
|
|
declare ui_label $nc2fg(1, 1)
|
|
set_control_par_str(get_ui_id($nc2fg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nc2fg),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[43] := get_ui_id($nc2fg)
|
|
declare ui_label $oskg3(1, 1)
|
|
set_control_par_str(get_ui_id($oskg3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($oskg3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($oskg3),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[43] := get_ui_id($oskg3)
|
|
%qxmpr[43] := 1000000
|
|
%oazdd[43] := 1
|
|
!gh3f0[43] := " ?"
|
|
?rylw5[43] := 1.0
|
|
%q4mzh[43] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[43] := -1
|
|
%hpc0e[43] := 2
|
|
%eujmz[43] := 1024
|
|
%fogcg[43] := 0
|
|
%5zak5[43] := 1
|
|
%dwdw3[43] := 0
|
|
%sbnwu[43] := 1000000
|
|
%jeswc[43] := 1036
|
|
%mnk53[43] := 83
|
|
declare %jofnx[10] := (get_ui_id($33zwn), get_ui_id($hwhlk), get_ui_id($slteq), get_ui_id($nc2fg), get_ui_id($oskg3), get_ui_id($1kgif), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jofnx))
|
|
%xwg5s[830+$g5k3r] := %jofnx[$g5k3r]
|
|
%cqg2m[83] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $p0hox(0, 1000000)
|
|
make_persistent($p0hox)
|
|
declare ui_slider $2ytkr(-1000000, 1000000)
|
|
make_persistent($2ytkr)
|
|
set_control_par_str(get_ui_id($2ytkr),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $s2dqk
|
|
make_persistent($s2dqk)
|
|
set_control_par_str(get_ui_id($s2dqk),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($s2dqk,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($s2dqk),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 44
|
|
%n34di[$upapg] := get_ui_id($s2dqk)
|
|
%nwlgb[$upapg] := get_ui_id($2ytkr)
|
|
!4gjzd[44] := "_1"
|
|
%c1qym[44] := get_ui_id($2ytkr)
|
|
%41o3s[44] := get_ui_id($p0hox)
|
|
declare ui_label $hlfbz(1, 1)
|
|
set_control_par_str(get_ui_id($hlfbz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hlfbz),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[44] := get_ui_id($hlfbz)
|
|
declare ui_label $uxn53(1, 1)
|
|
set_control_par_str(get_ui_id($uxn53),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uxn53),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[44] := get_ui_id($uxn53)
|
|
declare ui_label $cq1ee(1, 1)
|
|
set_control_par_str(get_ui_id($cq1ee),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cq1ee),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($cq1ee),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[44] := get_ui_id($cq1ee)
|
|
%qxmpr[44] := 1000000
|
|
%oazdd[44] := 1
|
|
!gh3f0[44] := " ?"
|
|
?rylw5[44] := 1.0
|
|
%q4mzh[44] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[44] := -1
|
|
%hpc0e[44] := 3
|
|
%eujmz[44] := 1024
|
|
%fogcg[44] := 1
|
|
%5zak5[44] := 0
|
|
%dwdw3[44] := 0
|
|
%sbnwu[44] := 1000000
|
|
%jeswc[44] := 1039
|
|
%mnk53[44] := 84
|
|
declare %uvjok[10] := (get_ui_id($p0hox), get_ui_id($2ytkr), get_ui_id($hlfbz), get_ui_id($uxn53), get_ui_id($cq1ee), get_ui_id($s2dqk), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%uvjok))
|
|
%xwg5s[840+$g5k3r] := %uvjok[$g5k3r]
|
|
%cqg2m[84] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $bokn2(0, 1000000)
|
|
make_persistent($bokn2)
|
|
declare ui_slider $ak4fz(-1000000, 1000000)
|
|
make_persistent($ak4fz)
|
|
set_control_par_str(get_ui_id($ak4fz),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $0zrh0
|
|
make_persistent($0zrh0)
|
|
set_control_par_str(get_ui_id($0zrh0),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($0zrh0,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($0zrh0),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 45
|
|
%n34di[$upapg] := get_ui_id($0zrh0)
|
|
%nwlgb[$upapg] := get_ui_id($ak4fz)
|
|
!4gjzd[45] := "_1"
|
|
%c1qym[45] := get_ui_id($ak4fz)
|
|
%41o3s[45] := get_ui_id($bokn2)
|
|
declare ui_label $t0qzg(1, 1)
|
|
set_control_par_str(get_ui_id($t0qzg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($t0qzg),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[45] := get_ui_id($t0qzg)
|
|
declare ui_label $hin0l(1, 1)
|
|
set_control_par_str(get_ui_id($hin0l),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hin0l),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[45] := get_ui_id($hin0l)
|
|
declare ui_label $gz1bb(1, 1)
|
|
set_control_par_str(get_ui_id($gz1bb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($gz1bb),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($gz1bb),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[45] := get_ui_id($gz1bb)
|
|
%qxmpr[45] := 1000000
|
|
%oazdd[45] := 1
|
|
!gh3f0[45] := " ?"
|
|
?rylw5[45] := 1.0
|
|
%q4mzh[45] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[45] := -1
|
|
%hpc0e[45] := 3
|
|
%eujmz[45] := 1024
|
|
%fogcg[45] := 0
|
|
%5zak5[45] := 0
|
|
%dwdw3[45] := 0
|
|
%sbnwu[45] := 1000000
|
|
%jeswc[45] := 1042
|
|
%mnk53[45] := 85
|
|
declare %2hwjf[10] := (get_ui_id($bokn2), get_ui_id($ak4fz), get_ui_id($t0qzg), get_ui_id($hin0l), get_ui_id($gz1bb), get_ui_id($0zrh0), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%2hwjf))
|
|
%xwg5s[850+$g5k3r] := %2hwjf[$g5k3r]
|
|
%cqg2m[85] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $xxdkc(0, 1000000)
|
|
make_persistent($xxdkc)
|
|
declare ui_slider $pqxkq(-1000000, 1000000)
|
|
make_persistent($pqxkq)
|
|
set_control_par_str(get_ui_id($pqxkq),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $mgevd
|
|
make_persistent($mgevd)
|
|
set_control_par_str(get_ui_id($mgevd),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($mgevd,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($mgevd),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 46
|
|
%n34di[$upapg] := get_ui_id($mgevd)
|
|
%nwlgb[$upapg] := get_ui_id($pqxkq)
|
|
!4gjzd[46] := "_1"
|
|
%c1qym[46] := get_ui_id($pqxkq)
|
|
%41o3s[46] := get_ui_id($xxdkc)
|
|
declare ui_label $vbtga(1, 1)
|
|
set_control_par_str(get_ui_id($vbtga),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vbtga),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[46] := get_ui_id($vbtga)
|
|
declare ui_label $fwnv1(1, 1)
|
|
set_control_par_str(get_ui_id($fwnv1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fwnv1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[46] := get_ui_id($fwnv1)
|
|
declare ui_label $upzyn(1, 1)
|
|
set_control_par_str(get_ui_id($upzyn),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($upzyn),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($upzyn),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[46] := get_ui_id($upzyn)
|
|
%qxmpr[46] := 1000000
|
|
%oazdd[46] := 1
|
|
!gh3f0[46] := " ?"
|
|
?rylw5[46] := 1.0
|
|
%q4mzh[46] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[46] := -1
|
|
%hpc0e[46] := 3
|
|
%eujmz[46] := 1024
|
|
%fogcg[46] := 0
|
|
%5zak5[46] := 1
|
|
%dwdw3[46] := 0
|
|
%sbnwu[46] := 1000000
|
|
%jeswc[46] := 1045
|
|
%mnk53[46] := 86
|
|
declare %chhb1[10] := (get_ui_id($xxdkc), get_ui_id($pqxkq), get_ui_id($vbtga), get_ui_id($fwnv1), get_ui_id($upzyn), get_ui_id($mgevd), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%chhb1))
|
|
%xwg5s[860+$g5k3r] := %chhb1[$g5k3r]
|
|
%cqg2m[86] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
if (1=1)
|
|
declare ui_slider $dyqeg(0, 1000000)
|
|
make_persistent($dyqeg)
|
|
declare ui_slider $cz5nc(-1000000, 1000000)
|
|
make_persistent($cz5nc)
|
|
set_control_par_str(get_ui_id($cz5nc),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $n32ls
|
|
make_persistent($n32ls)
|
|
set_control_par_str(get_ui_id($n32ls),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($n32ls,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($n32ls),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 47
|
|
%n34di[$upapg] := get_ui_id($n32ls)
|
|
%nwlgb[$upapg] := get_ui_id($cz5nc)
|
|
!4gjzd[47] := "_1"
|
|
%c1qym[47] := get_ui_id($cz5nc)
|
|
%41o3s[47] := get_ui_id($dyqeg)
|
|
declare ui_label $gf42a(1, 1)
|
|
set_control_par_str(get_ui_id($gf42a),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($gf42a),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[47] := get_ui_id($gf42a)
|
|
declare ui_label $wnvgj(1, 1)
|
|
set_control_par_str(get_ui_id($wnvgj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wnvgj),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[47] := get_ui_id($wnvgj)
|
|
declare ui_label $ybjnd(1, 1)
|
|
set_control_par_str(get_ui_id($ybjnd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ybjnd),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($ybjnd),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[47] := get_ui_id($ybjnd)
|
|
%qxmpr[47] := 1000000
|
|
%oazdd[47] := 1
|
|
!gh3f0[47] := " ?"
|
|
?rylw5[47] := 1.0
|
|
%q4mzh[47] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[47] := -1
|
|
%hpc0e[47] := 0
|
|
%eujmz[47] := 1025
|
|
%fogcg[47] := 1
|
|
%5zak5[47] := 0
|
|
%dwdw3[47] := 0
|
|
%sbnwu[47] := 1000000
|
|
%jeswc[47] := 1048
|
|
%mnk53[47] := 87
|
|
declare %f1w05[10] := (get_ui_id($dyqeg), get_ui_id($cz5nc), get_ui_id($gf42a), get_ui_id($wnvgj), get_ui_id($ybjnd), get_ui_id($n32ls), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%f1w05))
|
|
%xwg5s[870+$g5k3r] := %f1w05[$g5k3r]
|
|
%cqg2m[87] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $nznqd(0, 1000000)
|
|
make_persistent($nznqd)
|
|
declare ui_slider $pa1jg(-1000000, 1000000)
|
|
make_persistent($pa1jg)
|
|
set_control_par_str(get_ui_id($pa1jg),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $51guv
|
|
make_persistent($51guv)
|
|
set_control_par_str(get_ui_id($51guv),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($51guv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($51guv),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 48
|
|
%n34di[$upapg] := get_ui_id($51guv)
|
|
%nwlgb[$upapg] := get_ui_id($pa1jg)
|
|
!4gjzd[48] := "_1"
|
|
%c1qym[48] := get_ui_id($pa1jg)
|
|
%41o3s[48] := get_ui_id($nznqd)
|
|
declare ui_label $rns24(1, 1)
|
|
set_control_par_str(get_ui_id($rns24),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rns24),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[48] := get_ui_id($rns24)
|
|
declare ui_label $fwilx(1, 1)
|
|
set_control_par_str(get_ui_id($fwilx),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fwilx),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[48] := get_ui_id($fwilx)
|
|
declare ui_label $ux3gn(1, 1)
|
|
set_control_par_str(get_ui_id($ux3gn),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ux3gn),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($ux3gn),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[48] := get_ui_id($ux3gn)
|
|
%qxmpr[48] := 1000000
|
|
%oazdd[48] := 1
|
|
!gh3f0[48] := " ?"
|
|
?rylw5[48] := 1.0
|
|
%q4mzh[48] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[48] := -1
|
|
%hpc0e[48] := 0
|
|
%eujmz[48] := 1025
|
|
%fogcg[48] := 0
|
|
%5zak5[48] := 0
|
|
%dwdw3[48] := 0
|
|
%sbnwu[48] := 1000000
|
|
%jeswc[48] := 1051
|
|
%mnk53[48] := 88
|
|
declare %f5c1e[10] := (get_ui_id($nznqd), get_ui_id($pa1jg), get_ui_id($rns24), get_ui_id($fwilx), get_ui_id($ux3gn), get_ui_id($51guv), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%f5c1e))
|
|
%xwg5s[880+$g5k3r] := %f5c1e[$g5k3r]
|
|
%cqg2m[88] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $zprpl(0, 1000000)
|
|
make_persistent($zprpl)
|
|
declare ui_slider $hfm3k(-1000000, 1000000)
|
|
make_persistent($hfm3k)
|
|
set_control_par_str(get_ui_id($hfm3k),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $k3qfg
|
|
make_persistent($k3qfg)
|
|
set_control_par_str(get_ui_id($k3qfg),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($k3qfg,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($k3qfg),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 49
|
|
%n34di[$upapg] := get_ui_id($k3qfg)
|
|
%nwlgb[$upapg] := get_ui_id($hfm3k)
|
|
!4gjzd[49] := "_1"
|
|
%c1qym[49] := get_ui_id($hfm3k)
|
|
%41o3s[49] := get_ui_id($zprpl)
|
|
declare ui_label $1niri(1, 1)
|
|
set_control_par_str(get_ui_id($1niri),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1niri),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[49] := get_ui_id($1niri)
|
|
declare ui_label $suvja(1, 1)
|
|
set_control_par_str(get_ui_id($suvja),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($suvja),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[49] := get_ui_id($suvja)
|
|
declare ui_label $tw402(1, 1)
|
|
set_control_par_str(get_ui_id($tw402),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($tw402),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($tw402),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[49] := get_ui_id($tw402)
|
|
%qxmpr[49] := 1000000
|
|
%oazdd[49] := 1
|
|
!gh3f0[49] := " ?"
|
|
?rylw5[49] := 1.0
|
|
%q4mzh[49] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[49] := -1
|
|
%hpc0e[49] := 0
|
|
%eujmz[49] := 1025
|
|
%fogcg[49] := 0
|
|
%5zak5[49] := 1
|
|
%dwdw3[49] := 0
|
|
%sbnwu[49] := 1000000
|
|
%jeswc[49] := 1054
|
|
%mnk53[49] := 89
|
|
declare %3c34c[10] := (get_ui_id($zprpl), get_ui_id($hfm3k), get_ui_id($1niri), get_ui_id($suvja), get_ui_id($tw402), get_ui_id($k3qfg), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%3c34c))
|
|
%xwg5s[890+$g5k3r] := %3c34c[$g5k3r]
|
|
%cqg2m[89] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $bpu3e(0, 1000000)
|
|
make_persistent($bpu3e)
|
|
declare ui_slider $fnxkg(-1000000, 1000000)
|
|
make_persistent($fnxkg)
|
|
set_control_par_str(get_ui_id($fnxkg),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $d4ity
|
|
make_persistent($d4ity)
|
|
set_control_par_str(get_ui_id($d4ity),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($d4ity,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($d4ity),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 50
|
|
%n34di[$upapg] := get_ui_id($d4ity)
|
|
%nwlgb[$upapg] := get_ui_id($fnxkg)
|
|
!4gjzd[50] := "_1"
|
|
%c1qym[50] := get_ui_id($fnxkg)
|
|
%41o3s[50] := get_ui_id($bpu3e)
|
|
declare ui_label $sexos(1, 1)
|
|
set_control_par_str(get_ui_id($sexos),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($sexos),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[50] := get_ui_id($sexos)
|
|
declare ui_label $h5kqw(1, 1)
|
|
set_control_par_str(get_ui_id($h5kqw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($h5kqw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[50] := get_ui_id($h5kqw)
|
|
declare ui_label $esouz(1, 1)
|
|
set_control_par_str(get_ui_id($esouz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($esouz),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($esouz),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[50] := get_ui_id($esouz)
|
|
%qxmpr[50] := 1000000
|
|
%oazdd[50] := 1
|
|
!gh3f0[50] := " ?"
|
|
?rylw5[50] := 1.0
|
|
%q4mzh[50] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[50] := -1
|
|
%hpc0e[50] := 1
|
|
%eujmz[50] := 1025
|
|
%fogcg[50] := 1
|
|
%5zak5[50] := 0
|
|
%dwdw3[50] := 0
|
|
%sbnwu[50] := 1000000
|
|
%jeswc[50] := 1057
|
|
%mnk53[50] := 90
|
|
declare %vemjz[10] := (get_ui_id($bpu3e), get_ui_id($fnxkg), get_ui_id($sexos), get_ui_id($h5kqw), get_ui_id($esouz), get_ui_id($d4ity), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%vemjz))
|
|
%xwg5s[900+$g5k3r] := %vemjz[$g5k3r]
|
|
%cqg2m[90] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $s20mm(0, 1000000)
|
|
make_persistent($s20mm)
|
|
declare ui_slider $i5nrk(-1000000, 1000000)
|
|
make_persistent($i5nrk)
|
|
set_control_par_str(get_ui_id($i5nrk),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $cm0ux
|
|
make_persistent($cm0ux)
|
|
set_control_par_str(get_ui_id($cm0ux),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($cm0ux,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($cm0ux),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 51
|
|
%n34di[$upapg] := get_ui_id($cm0ux)
|
|
%nwlgb[$upapg] := get_ui_id($i5nrk)
|
|
!4gjzd[51] := "_1"
|
|
%c1qym[51] := get_ui_id($i5nrk)
|
|
%41o3s[51] := get_ui_id($s20mm)
|
|
declare ui_label $ipwq5(1, 1)
|
|
set_control_par_str(get_ui_id($ipwq5),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ipwq5),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[51] := get_ui_id($ipwq5)
|
|
declare ui_label $oiki1(1, 1)
|
|
set_control_par_str(get_ui_id($oiki1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($oiki1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[51] := get_ui_id($oiki1)
|
|
declare ui_label $co2u4(1, 1)
|
|
set_control_par_str(get_ui_id($co2u4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($co2u4),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($co2u4),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[51] := get_ui_id($co2u4)
|
|
%qxmpr[51] := 1000000
|
|
%oazdd[51] := 1
|
|
!gh3f0[51] := " ?"
|
|
?rylw5[51] := 1.0
|
|
%q4mzh[51] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[51] := -1
|
|
%hpc0e[51] := 1
|
|
%eujmz[51] := 1025
|
|
%fogcg[51] := 0
|
|
%5zak5[51] := 0
|
|
%dwdw3[51] := 0
|
|
%sbnwu[51] := 1000000
|
|
%jeswc[51] := 1060
|
|
%mnk53[51] := 91
|
|
declare %qgov3[10] := (get_ui_id($s20mm), get_ui_id($i5nrk), get_ui_id($ipwq5), get_ui_id($oiki1), get_ui_id($co2u4), get_ui_id($cm0ux), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%qgov3))
|
|
%xwg5s[910+$g5k3r] := %qgov3[$g5k3r]
|
|
%cqg2m[91] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $5q021(0, 1000000)
|
|
make_persistent($5q021)
|
|
declare ui_slider $fm2z3(-1000000, 1000000)
|
|
make_persistent($fm2z3)
|
|
set_control_par_str(get_ui_id($fm2z3),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $q1g2q
|
|
make_persistent($q1g2q)
|
|
set_control_par_str(get_ui_id($q1g2q),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($q1g2q,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($q1g2q),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 52
|
|
%n34di[$upapg] := get_ui_id($q1g2q)
|
|
%nwlgb[$upapg] := get_ui_id($fm2z3)
|
|
!4gjzd[52] := "_1"
|
|
%c1qym[52] := get_ui_id($fm2z3)
|
|
%41o3s[52] := get_ui_id($5q021)
|
|
declare ui_label $hn0ig(1, 1)
|
|
set_control_par_str(get_ui_id($hn0ig),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hn0ig),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[52] := get_ui_id($hn0ig)
|
|
declare ui_label $32psj(1, 1)
|
|
set_control_par_str(get_ui_id($32psj),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($32psj),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[52] := get_ui_id($32psj)
|
|
declare ui_label $3ithk(1, 1)
|
|
set_control_par_str(get_ui_id($3ithk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3ithk),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($3ithk),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[52] := get_ui_id($3ithk)
|
|
%qxmpr[52] := 1000000
|
|
%oazdd[52] := 1
|
|
!gh3f0[52] := " ?"
|
|
?rylw5[52] := 1.0
|
|
%q4mzh[52] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[52] := -1
|
|
%hpc0e[52] := 1
|
|
%eujmz[52] := 1025
|
|
%fogcg[52] := 0
|
|
%5zak5[52] := 1
|
|
%dwdw3[52] := 0
|
|
%sbnwu[52] := 1000000
|
|
%jeswc[52] := 1063
|
|
%mnk53[52] := 92
|
|
declare %4zxca[10] := (get_ui_id($5q021), get_ui_id($fm2z3), get_ui_id($hn0ig), get_ui_id($32psj), get_ui_id($3ithk), get_ui_id($q1g2q), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4zxca))
|
|
%xwg5s[920+$g5k3r] := %4zxca[$g5k3r]
|
|
%cqg2m[92] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $fnpd2(0, 1000000)
|
|
make_persistent($fnpd2)
|
|
declare ui_slider $cakzn(-1000000, 1000000)
|
|
make_persistent($cakzn)
|
|
set_control_par_str(get_ui_id($cakzn),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $rjvzf
|
|
make_persistent($rjvzf)
|
|
set_control_par_str(get_ui_id($rjvzf),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($rjvzf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($rjvzf),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 53
|
|
%n34di[$upapg] := get_ui_id($rjvzf)
|
|
%nwlgb[$upapg] := get_ui_id($cakzn)
|
|
!4gjzd[53] := "_1"
|
|
%c1qym[53] := get_ui_id($cakzn)
|
|
%41o3s[53] := get_ui_id($fnpd2)
|
|
declare ui_label $vrkxf(1, 1)
|
|
set_control_par_str(get_ui_id($vrkxf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vrkxf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[53] := get_ui_id($vrkxf)
|
|
declare ui_label $wc0va(1, 1)
|
|
set_control_par_str(get_ui_id($wc0va),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wc0va),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[53] := get_ui_id($wc0va)
|
|
declare ui_label $rhc3d(1, 1)
|
|
set_control_par_str(get_ui_id($rhc3d),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($rhc3d),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($rhc3d),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[53] := get_ui_id($rhc3d)
|
|
%qxmpr[53] := 1000000
|
|
%oazdd[53] := 1
|
|
!gh3f0[53] := " ?"
|
|
?rylw5[53] := 1.0
|
|
%q4mzh[53] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[53] := -1
|
|
%hpc0e[53] := 2
|
|
%eujmz[53] := 1025
|
|
%fogcg[53] := 1
|
|
%5zak5[53] := 0
|
|
%dwdw3[53] := 0
|
|
%sbnwu[53] := 1000000
|
|
%jeswc[53] := 1066
|
|
%mnk53[53] := 93
|
|
declare %am04u[10] := (get_ui_id($fnpd2), get_ui_id($cakzn), get_ui_id($vrkxf), get_ui_id($wc0va), get_ui_id($rhc3d), get_ui_id($rjvzf), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%am04u))
|
|
%xwg5s[930+$g5k3r] := %am04u[$g5k3r]
|
|
%cqg2m[93] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $wmqep(0, 1000000)
|
|
make_persistent($wmqep)
|
|
declare ui_slider $oybgu(-1000000, 1000000)
|
|
make_persistent($oybgu)
|
|
set_control_par_str(get_ui_id($oybgu),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $nrlyv
|
|
make_persistent($nrlyv)
|
|
set_control_par_str(get_ui_id($nrlyv),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($nrlyv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($nrlyv),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 54
|
|
%n34di[$upapg] := get_ui_id($nrlyv)
|
|
%nwlgb[$upapg] := get_ui_id($oybgu)
|
|
!4gjzd[54] := "_1"
|
|
%c1qym[54] := get_ui_id($oybgu)
|
|
%41o3s[54] := get_ui_id($wmqep)
|
|
declare ui_label $2ukoq(1, 1)
|
|
set_control_par_str(get_ui_id($2ukoq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($2ukoq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[54] := get_ui_id($2ukoq)
|
|
declare ui_label $codqi(1, 1)
|
|
set_control_par_str(get_ui_id($codqi),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($codqi),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[54] := get_ui_id($codqi)
|
|
declare ui_label $1jzi3(1, 1)
|
|
set_control_par_str(get_ui_id($1jzi3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1jzi3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($1jzi3),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[54] := get_ui_id($1jzi3)
|
|
%qxmpr[54] := 1000000
|
|
%oazdd[54] := 1
|
|
!gh3f0[54] := " ?"
|
|
?rylw5[54] := 1.0
|
|
%q4mzh[54] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[54] := -1
|
|
%hpc0e[54] := 2
|
|
%eujmz[54] := 1025
|
|
%fogcg[54] := 0
|
|
%5zak5[54] := 0
|
|
%dwdw3[54] := 0
|
|
%sbnwu[54] := 1000000
|
|
%jeswc[54] := 1069
|
|
%mnk53[54] := 94
|
|
declare %tx5wu[10] := (get_ui_id($wmqep), get_ui_id($oybgu), get_ui_id($2ukoq), get_ui_id($codqi), get_ui_id($1jzi3), get_ui_id($nrlyv), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%tx5wu))
|
|
%xwg5s[940+$g5k3r] := %tx5wu[$g5k3r]
|
|
%cqg2m[94] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $gsxh3(0, 1000000)
|
|
make_persistent($gsxh3)
|
|
declare ui_slider $jkr4m(-1000000, 1000000)
|
|
make_persistent($jkr4m)
|
|
set_control_par_str(get_ui_id($jkr4m),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $qvjwi
|
|
make_persistent($qvjwi)
|
|
set_control_par_str(get_ui_id($qvjwi),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($qvjwi,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($qvjwi),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 55
|
|
%n34di[$upapg] := get_ui_id($qvjwi)
|
|
%nwlgb[$upapg] := get_ui_id($jkr4m)
|
|
!4gjzd[55] := "_1"
|
|
%c1qym[55] := get_ui_id($jkr4m)
|
|
%41o3s[55] := get_ui_id($gsxh3)
|
|
declare ui_label $2rkvi(1, 1)
|
|
set_control_par_str(get_ui_id($2rkvi),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($2rkvi),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[55] := get_ui_id($2rkvi)
|
|
declare ui_label $h5ncl(1, 1)
|
|
set_control_par_str(get_ui_id($h5ncl),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($h5ncl),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[55] := get_ui_id($h5ncl)
|
|
declare ui_label $5kihk(1, 1)
|
|
set_control_par_str(get_ui_id($5kihk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5kihk),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($5kihk),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[55] := get_ui_id($5kihk)
|
|
%qxmpr[55] := 1000000
|
|
%oazdd[55] := 1
|
|
!gh3f0[55] := " ?"
|
|
?rylw5[55] := 1.0
|
|
%q4mzh[55] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[55] := -1
|
|
%hpc0e[55] := 2
|
|
%eujmz[55] := 1025
|
|
%fogcg[55] := 0
|
|
%5zak5[55] := 1
|
|
%dwdw3[55] := 0
|
|
%sbnwu[55] := 1000000
|
|
%jeswc[55] := 1072
|
|
%mnk53[55] := 95
|
|
declare %jsh0a[10] := (get_ui_id($gsxh3), get_ui_id($jkr4m), get_ui_id($2rkvi), get_ui_id($h5ncl), get_ui_id($5kihk), get_ui_id($qvjwi), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jsh0a))
|
|
%xwg5s[950+$g5k3r] := %jsh0a[$g5k3r]
|
|
%cqg2m[95] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $edhpo(0, 1000000)
|
|
make_persistent($edhpo)
|
|
declare ui_slider $dero1(-1000000, 1000000)
|
|
make_persistent($dero1)
|
|
set_control_par_str(get_ui_id($dero1),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $no43m
|
|
make_persistent($no43m)
|
|
set_control_par_str(get_ui_id($no43m),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($no43m,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($no43m),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 56
|
|
%n34di[$upapg] := get_ui_id($no43m)
|
|
%nwlgb[$upapg] := get_ui_id($dero1)
|
|
!4gjzd[56] := "_1"
|
|
%c1qym[56] := get_ui_id($dero1)
|
|
%41o3s[56] := get_ui_id($edhpo)
|
|
declare ui_label $ppytu(1, 1)
|
|
set_control_par_str(get_ui_id($ppytu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ppytu),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[56] := get_ui_id($ppytu)
|
|
declare ui_label $pb3uw(1, 1)
|
|
set_control_par_str(get_ui_id($pb3uw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pb3uw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[56] := get_ui_id($pb3uw)
|
|
declare ui_label $yqs0x(1, 1)
|
|
set_control_par_str(get_ui_id($yqs0x),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($yqs0x),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($yqs0x),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[56] := get_ui_id($yqs0x)
|
|
%qxmpr[56] := 1000000
|
|
%oazdd[56] := 1
|
|
!gh3f0[56] := " ?"
|
|
?rylw5[56] := 1.0
|
|
%q4mzh[56] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[56] := -1
|
|
%hpc0e[56] := 3
|
|
%eujmz[56] := 1025
|
|
%fogcg[56] := 1
|
|
%5zak5[56] := 0
|
|
%dwdw3[56] := 0
|
|
%sbnwu[56] := 1000000
|
|
%jeswc[56] := 1075
|
|
%mnk53[56] := 96
|
|
declare %4iye1[10] := (get_ui_id($edhpo), get_ui_id($dero1), get_ui_id($ppytu), get_ui_id($pb3uw), get_ui_id($yqs0x), get_ui_id($no43m), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4iye1))
|
|
%xwg5s[960+$g5k3r] := %4iye1[$g5k3r]
|
|
%cqg2m[96] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ei4rr(0, 1000000)
|
|
make_persistent($ei4rr)
|
|
declare ui_slider $2ptey(-1000000, 1000000)
|
|
make_persistent($2ptey)
|
|
set_control_par_str(get_ui_id($2ptey),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $k20qf
|
|
make_persistent($k20qf)
|
|
set_control_par_str(get_ui_id($k20qf),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($k20qf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($k20qf),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 57
|
|
%n34di[$upapg] := get_ui_id($k20qf)
|
|
%nwlgb[$upapg] := get_ui_id($2ptey)
|
|
!4gjzd[57] := "_1"
|
|
%c1qym[57] := get_ui_id($2ptey)
|
|
%41o3s[57] := get_ui_id($ei4rr)
|
|
declare ui_label $oqxfz(1, 1)
|
|
set_control_par_str(get_ui_id($oqxfz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($oqxfz),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[57] := get_ui_id($oqxfz)
|
|
declare ui_label $mrbg2(1, 1)
|
|
set_control_par_str(get_ui_id($mrbg2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mrbg2),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[57] := get_ui_id($mrbg2)
|
|
declare ui_label $4pjgu(1, 1)
|
|
set_control_par_str(get_ui_id($4pjgu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4pjgu),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($4pjgu),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[57] := get_ui_id($4pjgu)
|
|
%qxmpr[57] := 1000000
|
|
%oazdd[57] := 1
|
|
!gh3f0[57] := " ?"
|
|
?rylw5[57] := 1.0
|
|
%q4mzh[57] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[57] := -1
|
|
%hpc0e[57] := 3
|
|
%eujmz[57] := 1025
|
|
%fogcg[57] := 0
|
|
%5zak5[57] := 0
|
|
%dwdw3[57] := 0
|
|
%sbnwu[57] := 1000000
|
|
%jeswc[57] := 1078
|
|
%mnk53[57] := 97
|
|
declare %cft0y[10] := (get_ui_id($ei4rr), get_ui_id($2ptey), get_ui_id($oqxfz), get_ui_id($mrbg2), get_ui_id($4pjgu), get_ui_id($k20qf), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%cft0y))
|
|
%xwg5s[970+$g5k3r] := %cft0y[$g5k3r]
|
|
%cqg2m[97] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $nfnkh(0, 1000000)
|
|
make_persistent($nfnkh)
|
|
declare ui_slider $lxste(-1000000, 1000000)
|
|
make_persistent($lxste)
|
|
set_control_par_str(get_ui_id($lxste),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $3drha
|
|
make_persistent($3drha)
|
|
set_control_par_str(get_ui_id($3drha),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($3drha,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($3drha),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 58
|
|
%n34di[$upapg] := get_ui_id($3drha)
|
|
%nwlgb[$upapg] := get_ui_id($lxste)
|
|
!4gjzd[58] := "_1"
|
|
%c1qym[58] := get_ui_id($lxste)
|
|
%41o3s[58] := get_ui_id($nfnkh)
|
|
declare ui_label $cvwdk(1, 1)
|
|
set_control_par_str(get_ui_id($cvwdk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cvwdk),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[58] := get_ui_id($cvwdk)
|
|
declare ui_label $0iy1v(1, 1)
|
|
set_control_par_str(get_ui_id($0iy1v),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0iy1v),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[58] := get_ui_id($0iy1v)
|
|
declare ui_label $cxart(1, 1)
|
|
set_control_par_str(get_ui_id($cxart),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cxart),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($cxart),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[58] := get_ui_id($cxart)
|
|
%qxmpr[58] := 1000000
|
|
%oazdd[58] := 1
|
|
!gh3f0[58] := " ?"
|
|
?rylw5[58] := 1.0
|
|
%q4mzh[58] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[58] := -1
|
|
%hpc0e[58] := 3
|
|
%eujmz[58] := 1025
|
|
%fogcg[58] := 0
|
|
%5zak5[58] := 1
|
|
%dwdw3[58] := 0
|
|
%sbnwu[58] := 1000000
|
|
%jeswc[58] := 1081
|
|
%mnk53[58] := 98
|
|
declare %4jo3o[10] := (get_ui_id($nfnkh), get_ui_id($lxste), get_ui_id($cvwdk), get_ui_id($0iy1v), get_ui_id($cxart), get_ui_id($3drha), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4jo3o))
|
|
%xwg5s[980+$g5k3r] := %4jo3o[$g5k3r]
|
|
%cqg2m[98] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
if (1=1)
|
|
declare ui_slider $xug04(0, 1000000)
|
|
make_persistent($xug04)
|
|
declare ui_slider $hqxeu(-1000000, 1000000)
|
|
make_persistent($hqxeu)
|
|
set_control_par_str(get_ui_id($hqxeu),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $iw2oc
|
|
make_persistent($iw2oc)
|
|
set_control_par_str(get_ui_id($iw2oc),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($iw2oc,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($iw2oc),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 59
|
|
%n34di[$upapg] := get_ui_id($iw2oc)
|
|
%nwlgb[$upapg] := get_ui_id($hqxeu)
|
|
!4gjzd[59] := "_1"
|
|
%c1qym[59] := get_ui_id($hqxeu)
|
|
%41o3s[59] := get_ui_id($xug04)
|
|
declare ui_label $fbsmu(1, 1)
|
|
set_control_par_str(get_ui_id($fbsmu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fbsmu),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[59] := get_ui_id($fbsmu)
|
|
declare ui_label $0xdwi(1, 1)
|
|
set_control_par_str(get_ui_id($0xdwi),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0xdwi),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[59] := get_ui_id($0xdwi)
|
|
declare ui_label $zagi3(1, 1)
|
|
set_control_par_str(get_ui_id($zagi3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zagi3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($zagi3),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[59] := get_ui_id($zagi3)
|
|
%qxmpr[59] := 1000000
|
|
%oazdd[59] := 1
|
|
!gh3f0[59] := " ?"
|
|
?rylw5[59] := 1.0
|
|
%q4mzh[59] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[59] := -1
|
|
%hpc0e[59] := 0
|
|
%eujmz[59] := 2
|
|
%fogcg[59] := 1
|
|
%5zak5[59] := 0
|
|
%dwdw3[59] := 0
|
|
%sbnwu[59] := 1000000
|
|
%jeswc[59] := 1084
|
|
%mnk53[59] := 99
|
|
declare %euwmk[10] := (get_ui_id($xug04), get_ui_id($hqxeu), get_ui_id($fbsmu), get_ui_id($0xdwi), get_ui_id($zagi3), get_ui_id($iw2oc), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%euwmk))
|
|
%xwg5s[990+$g5k3r] := %euwmk[$g5k3r]
|
|
%cqg2m[99] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $bvaw5(0, 1000000)
|
|
make_persistent($bvaw5)
|
|
declare ui_slider $0zlbe(-1000000, 1000000)
|
|
make_persistent($0zlbe)
|
|
set_control_par_str(get_ui_id($0zlbe),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $exjvd
|
|
make_persistent($exjvd)
|
|
set_control_par_str(get_ui_id($exjvd),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($exjvd,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($exjvd),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 60
|
|
%n34di[$upapg] := get_ui_id($exjvd)
|
|
%nwlgb[$upapg] := get_ui_id($0zlbe)
|
|
!4gjzd[60] := "_1"
|
|
%c1qym[60] := get_ui_id($0zlbe)
|
|
%41o3s[60] := get_ui_id($bvaw5)
|
|
declare ui_label $hfv4y(1, 1)
|
|
set_control_par_str(get_ui_id($hfv4y),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hfv4y),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[60] := get_ui_id($hfv4y)
|
|
declare ui_label $vwkqv(1, 1)
|
|
set_control_par_str(get_ui_id($vwkqv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vwkqv),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[60] := get_ui_id($vwkqv)
|
|
declare ui_label $cqybi(1, 1)
|
|
set_control_par_str(get_ui_id($cqybi),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cqybi),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($cqybi),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[60] := get_ui_id($cqybi)
|
|
%qxmpr[60] := 1000000
|
|
%oazdd[60] := 1
|
|
!gh3f0[60] := " ?"
|
|
?rylw5[60] := 1.0
|
|
%q4mzh[60] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[60] := -1
|
|
%hpc0e[60] := 0
|
|
%eujmz[60] := 2
|
|
%fogcg[60] := 0
|
|
%5zak5[60] := 0
|
|
%dwdw3[60] := 0
|
|
%sbnwu[60] := 1000000
|
|
%jeswc[60] := 1087
|
|
%mnk53[60] := 100
|
|
declare %hq5jy[10] := (get_ui_id($bvaw5), get_ui_id($0zlbe), get_ui_id($hfv4y), get_ui_id($vwkqv), get_ui_id($cqybi), get_ui_id($exjvd), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%hq5jy))
|
|
%xwg5s[1000+$g5k3r] := %hq5jy[$g5k3r]
|
|
%cqg2m[100] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $54gsh(0, 1000000)
|
|
make_persistent($54gsh)
|
|
declare ui_slider $h4nrw(-1000000, 1000000)
|
|
make_persistent($h4nrw)
|
|
set_control_par_str(get_ui_id($h4nrw),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $hr3vo
|
|
make_persistent($hr3vo)
|
|
set_control_par_str(get_ui_id($hr3vo),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($hr3vo,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($hr3vo),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 61
|
|
%n34di[$upapg] := get_ui_id($hr3vo)
|
|
%nwlgb[$upapg] := get_ui_id($h4nrw)
|
|
!4gjzd[61] := "_1"
|
|
%c1qym[61] := get_ui_id($h4nrw)
|
|
%41o3s[61] := get_ui_id($54gsh)
|
|
declare ui_label $egypa(1, 1)
|
|
set_control_par_str(get_ui_id($egypa),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($egypa),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[61] := get_ui_id($egypa)
|
|
declare ui_label $uxi1u(1, 1)
|
|
set_control_par_str(get_ui_id($uxi1u),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uxi1u),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[61] := get_ui_id($uxi1u)
|
|
declare ui_label $0ovgh(1, 1)
|
|
set_control_par_str(get_ui_id($0ovgh),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0ovgh),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($0ovgh),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[61] := get_ui_id($0ovgh)
|
|
%qxmpr[61] := 1000000
|
|
%oazdd[61] := 1
|
|
!gh3f0[61] := " ?"
|
|
?rylw5[61] := 1.0
|
|
%q4mzh[61] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[61] := -1
|
|
%hpc0e[61] := 0
|
|
%eujmz[61] := 2
|
|
%fogcg[61] := 0
|
|
%5zak5[61] := 1
|
|
%dwdw3[61] := 0
|
|
%sbnwu[61] := 1000000
|
|
%jeswc[61] := 1090
|
|
%mnk53[61] := 101
|
|
declare %jus4d[10] := (get_ui_id($54gsh), get_ui_id($h4nrw), get_ui_id($egypa), get_ui_id($uxi1u), get_ui_id($0ovgh), get_ui_id($hr3vo), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jus4d))
|
|
%xwg5s[1010+$g5k3r] := %jus4d[$g5k3r]
|
|
%cqg2m[101] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $xgma4(0, 1000000)
|
|
make_persistent($xgma4)
|
|
declare ui_slider $pg4ei(-1000000, 1000000)
|
|
make_persistent($pg4ei)
|
|
set_control_par_str(get_ui_id($pg4ei),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $d0pbl
|
|
make_persistent($d0pbl)
|
|
set_control_par_str(get_ui_id($d0pbl),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($d0pbl,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($d0pbl),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 62
|
|
%n34di[$upapg] := get_ui_id($d0pbl)
|
|
%nwlgb[$upapg] := get_ui_id($pg4ei)
|
|
!4gjzd[62] := "_1"
|
|
%c1qym[62] := get_ui_id($pg4ei)
|
|
%41o3s[62] := get_ui_id($xgma4)
|
|
declare ui_label $d1zol(1, 1)
|
|
set_control_par_str(get_ui_id($d1zol),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($d1zol),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[62] := get_ui_id($d1zol)
|
|
declare ui_label $0etvt(1, 1)
|
|
set_control_par_str(get_ui_id($0etvt),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0etvt),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[62] := get_ui_id($0etvt)
|
|
declare ui_label $t0ue3(1, 1)
|
|
set_control_par_str(get_ui_id($t0ue3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($t0ue3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($t0ue3),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[62] := get_ui_id($t0ue3)
|
|
%qxmpr[62] := 1000000
|
|
%oazdd[62] := 1
|
|
!gh3f0[62] := " ?"
|
|
?rylw5[62] := 1.0
|
|
%q4mzh[62] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[62] := -1
|
|
%hpc0e[62] := 1
|
|
%eujmz[62] := 2
|
|
%fogcg[62] := 1
|
|
%5zak5[62] := 0
|
|
%dwdw3[62] := 0
|
|
%sbnwu[62] := 1000000
|
|
%jeswc[62] := 1093
|
|
%mnk53[62] := 102
|
|
declare %qbtrm[10] := (get_ui_id($xgma4), get_ui_id($pg4ei), get_ui_id($d1zol), get_ui_id($0etvt), get_ui_id($t0ue3), get_ui_id($d0pbl), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%qbtrm))
|
|
%xwg5s[1020+$g5k3r] := %qbtrm[$g5k3r]
|
|
%cqg2m[102] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $4ppiu(0, 1000000)
|
|
make_persistent($4ppiu)
|
|
declare ui_slider $2bixl(-1000000, 1000000)
|
|
make_persistent($2bixl)
|
|
set_control_par_str(get_ui_id($2bixl),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $oxbzh
|
|
make_persistent($oxbzh)
|
|
set_control_par_str(get_ui_id($oxbzh),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($oxbzh,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($oxbzh),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 63
|
|
%n34di[$upapg] := get_ui_id($oxbzh)
|
|
%nwlgb[$upapg] := get_ui_id($2bixl)
|
|
!4gjzd[63] := "_1"
|
|
%c1qym[63] := get_ui_id($2bixl)
|
|
%41o3s[63] := get_ui_id($4ppiu)
|
|
declare ui_label $cqp2j(1, 1)
|
|
set_control_par_str(get_ui_id($cqp2j),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cqp2j),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[63] := get_ui_id($cqp2j)
|
|
declare ui_label $pfoim(1, 1)
|
|
set_control_par_str(get_ui_id($pfoim),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pfoim),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[63] := get_ui_id($pfoim)
|
|
declare ui_label $1qxyy(1, 1)
|
|
set_control_par_str(get_ui_id($1qxyy),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1qxyy),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($1qxyy),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[63] := get_ui_id($1qxyy)
|
|
%qxmpr[63] := 1000000
|
|
%oazdd[63] := 1
|
|
!gh3f0[63] := " ?"
|
|
?rylw5[63] := 1.0
|
|
%q4mzh[63] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[63] := -1
|
|
%hpc0e[63] := 1
|
|
%eujmz[63] := 2
|
|
%fogcg[63] := 0
|
|
%5zak5[63] := 0
|
|
%dwdw3[63] := 0
|
|
%sbnwu[63] := 1000000
|
|
%jeswc[63] := 1096
|
|
%mnk53[63] := 103
|
|
declare %jtw3o[10] := (get_ui_id($4ppiu), get_ui_id($2bixl), get_ui_id($cqp2j), get_ui_id($pfoim), get_ui_id($1qxyy), get_ui_id($oxbzh), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jtw3o))
|
|
%xwg5s[1030+$g5k3r] := %jtw3o[$g5k3r]
|
|
%cqg2m[103] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $2lmoo(0, 1000000)
|
|
make_persistent($2lmoo)
|
|
declare ui_slider $5jo04(-1000000, 1000000)
|
|
make_persistent($5jo04)
|
|
set_control_par_str(get_ui_id($5jo04),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $2moaw
|
|
make_persistent($2moaw)
|
|
set_control_par_str(get_ui_id($2moaw),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($2moaw,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($2moaw),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 64
|
|
%n34di[$upapg] := get_ui_id($2moaw)
|
|
%nwlgb[$upapg] := get_ui_id($5jo04)
|
|
!4gjzd[64] := "_1"
|
|
%c1qym[64] := get_ui_id($5jo04)
|
|
%41o3s[64] := get_ui_id($2lmoo)
|
|
declare ui_label $zw3qk(1, 1)
|
|
set_control_par_str(get_ui_id($zw3qk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zw3qk),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[64] := get_ui_id($zw3qk)
|
|
declare ui_label $fa1ve(1, 1)
|
|
set_control_par_str(get_ui_id($fa1ve),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fa1ve),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[64] := get_ui_id($fa1ve)
|
|
declare ui_label $c51yy(1, 1)
|
|
set_control_par_str(get_ui_id($c51yy),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($c51yy),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($c51yy),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[64] := get_ui_id($c51yy)
|
|
%qxmpr[64] := 1000000
|
|
%oazdd[64] := 1
|
|
!gh3f0[64] := " ?"
|
|
?rylw5[64] := 1.0
|
|
%q4mzh[64] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[64] := -1
|
|
%hpc0e[64] := 1
|
|
%eujmz[64] := 2
|
|
%fogcg[64] := 0
|
|
%5zak5[64] := 1
|
|
%dwdw3[64] := 0
|
|
%sbnwu[64] := 1000000
|
|
%jeswc[64] := 1099
|
|
%mnk53[64] := 104
|
|
declare %lpvit[10] := (get_ui_id($2lmoo), get_ui_id($5jo04), get_ui_id($zw3qk), get_ui_id($fa1ve), get_ui_id($c51yy), get_ui_id($2moaw), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%lpvit))
|
|
%xwg5s[1040+$g5k3r] := %lpvit[$g5k3r]
|
|
%cqg2m[104] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ajka4(0, 1000000)
|
|
make_persistent($ajka4)
|
|
declare ui_slider $dhmoe(-1000000, 1000000)
|
|
make_persistent($dhmoe)
|
|
set_control_par_str(get_ui_id($dhmoe),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $sw0os
|
|
make_persistent($sw0os)
|
|
set_control_par_str(get_ui_id($sw0os),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($sw0os,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($sw0os),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 65
|
|
%n34di[$upapg] := get_ui_id($sw0os)
|
|
%nwlgb[$upapg] := get_ui_id($dhmoe)
|
|
!4gjzd[65] := "_1"
|
|
%c1qym[65] := get_ui_id($dhmoe)
|
|
%41o3s[65] := get_ui_id($ajka4)
|
|
declare ui_label $nzmxs(1, 1)
|
|
set_control_par_str(get_ui_id($nzmxs),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nzmxs),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[65] := get_ui_id($nzmxs)
|
|
declare ui_label $n10dp(1, 1)
|
|
set_control_par_str(get_ui_id($n10dp),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($n10dp),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[65] := get_ui_id($n10dp)
|
|
declare ui_label $hosi4(1, 1)
|
|
set_control_par_str(get_ui_id($hosi4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hosi4),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($hosi4),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[65] := get_ui_id($hosi4)
|
|
%qxmpr[65] := 1000000
|
|
%oazdd[65] := 1
|
|
!gh3f0[65] := " ?"
|
|
?rylw5[65] := 1.0
|
|
%q4mzh[65] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[65] := -1
|
|
%hpc0e[65] := 2
|
|
%eujmz[65] := 2
|
|
%fogcg[65] := 1
|
|
%5zak5[65] := 0
|
|
%dwdw3[65] := 0
|
|
%sbnwu[65] := 1000000
|
|
%jeswc[65] := 1102
|
|
%mnk53[65] := 105
|
|
declare %gsj5q[10] := (get_ui_id($ajka4), get_ui_id($dhmoe), get_ui_id($nzmxs), get_ui_id($n10dp), get_ui_id($hosi4), get_ui_id($sw0os), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%gsj5q))
|
|
%xwg5s[1050+$g5k3r] := %gsj5q[$g5k3r]
|
|
%cqg2m[105] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $kw31l(0, 1000000)
|
|
make_persistent($kw31l)
|
|
declare ui_slider $0shp5(-1000000, 1000000)
|
|
make_persistent($0shp5)
|
|
set_control_par_str(get_ui_id($0shp5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $pjmqm
|
|
make_persistent($pjmqm)
|
|
set_control_par_str(get_ui_id($pjmqm),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($pjmqm,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($pjmqm),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 66
|
|
%n34di[$upapg] := get_ui_id($pjmqm)
|
|
%nwlgb[$upapg] := get_ui_id($0shp5)
|
|
!4gjzd[66] := "_1"
|
|
%c1qym[66] := get_ui_id($0shp5)
|
|
%41o3s[66] := get_ui_id($kw31l)
|
|
declare ui_label $jpoxn(1, 1)
|
|
set_control_par_str(get_ui_id($jpoxn),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jpoxn),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[66] := get_ui_id($jpoxn)
|
|
declare ui_label $4nuqa(1, 1)
|
|
set_control_par_str(get_ui_id($4nuqa),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($4nuqa),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[66] := get_ui_id($4nuqa)
|
|
declare ui_label $5yf3d(1, 1)
|
|
set_control_par_str(get_ui_id($5yf3d),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5yf3d),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($5yf3d),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[66] := get_ui_id($5yf3d)
|
|
%qxmpr[66] := 1000000
|
|
%oazdd[66] := 1
|
|
!gh3f0[66] := " ?"
|
|
?rylw5[66] := 1.0
|
|
%q4mzh[66] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[66] := -1
|
|
%hpc0e[66] := 2
|
|
%eujmz[66] := 2
|
|
%fogcg[66] := 0
|
|
%5zak5[66] := 0
|
|
%dwdw3[66] := 0
|
|
%sbnwu[66] := 1000000
|
|
%jeswc[66] := 1105
|
|
%mnk53[66] := 106
|
|
declare %xswan[10] := (get_ui_id($kw31l), get_ui_id($0shp5), get_ui_id($jpoxn), get_ui_id($4nuqa), get_ui_id($5yf3d), get_ui_id($pjmqm), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%xswan))
|
|
%xwg5s[1060+$g5k3r] := %xswan[$g5k3r]
|
|
%cqg2m[106] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $za4fi(0, 1000000)
|
|
make_persistent($za4fi)
|
|
declare ui_slider $21luc(-1000000, 1000000)
|
|
make_persistent($21luc)
|
|
set_control_par_str(get_ui_id($21luc),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $ujr4n
|
|
make_persistent($ujr4n)
|
|
set_control_par_str(get_ui_id($ujr4n),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($ujr4n,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($ujr4n),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 67
|
|
%n34di[$upapg] := get_ui_id($ujr4n)
|
|
%nwlgb[$upapg] := get_ui_id($21luc)
|
|
!4gjzd[67] := "_1"
|
|
%c1qym[67] := get_ui_id($21luc)
|
|
%41o3s[67] := get_ui_id($za4fi)
|
|
declare ui_label $fmboz(1, 1)
|
|
set_control_par_str(get_ui_id($fmboz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($fmboz),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[67] := get_ui_id($fmboz)
|
|
declare ui_label $2lxqf(1, 1)
|
|
set_control_par_str(get_ui_id($2lxqf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($2lxqf),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[67] := get_ui_id($2lxqf)
|
|
declare ui_label $iag1d(1, 1)
|
|
set_control_par_str(get_ui_id($iag1d),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($iag1d),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($iag1d),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[67] := get_ui_id($iag1d)
|
|
%qxmpr[67] := 1000000
|
|
%oazdd[67] := 1
|
|
!gh3f0[67] := " ?"
|
|
?rylw5[67] := 1.0
|
|
%q4mzh[67] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[67] := -1
|
|
%hpc0e[67] := 2
|
|
%eujmz[67] := 2
|
|
%fogcg[67] := 0
|
|
%5zak5[67] := 1
|
|
%dwdw3[67] := 0
|
|
%sbnwu[67] := 1000000
|
|
%jeswc[67] := 1108
|
|
%mnk53[67] := 107
|
|
declare %ig2ja[10] := (get_ui_id($za4fi), get_ui_id($21luc), get_ui_id($fmboz), get_ui_id($2lxqf), get_ui_id($iag1d), get_ui_id($ujr4n), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ig2ja))
|
|
%xwg5s[1070+$g5k3r] := %ig2ja[$g5k3r]
|
|
%cqg2m[107] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $zctyt(0, 1000000)
|
|
make_persistent($zctyt)
|
|
declare ui_slider $p4vlm(-1000000, 1000000)
|
|
make_persistent($p4vlm)
|
|
set_control_par_str(get_ui_id($p4vlm),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $2cyex
|
|
make_persistent($2cyex)
|
|
set_control_par_str(get_ui_id($2cyex),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($2cyex,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($2cyex),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 68
|
|
%n34di[$upapg] := get_ui_id($2cyex)
|
|
%nwlgb[$upapg] := get_ui_id($p4vlm)
|
|
!4gjzd[68] := "_1"
|
|
%c1qym[68] := get_ui_id($p4vlm)
|
|
%41o3s[68] := get_ui_id($zctyt)
|
|
declare ui_label $1rbpm(1, 1)
|
|
set_control_par_str(get_ui_id($1rbpm),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1rbpm),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[68] := get_ui_id($1rbpm)
|
|
declare ui_label $h3414(1, 1)
|
|
set_control_par_str(get_ui_id($h3414),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($h3414),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[68] := get_ui_id($h3414)
|
|
declare ui_label $540zf(1, 1)
|
|
set_control_par_str(get_ui_id($540zf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($540zf),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($540zf),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[68] := get_ui_id($540zf)
|
|
%qxmpr[68] := 1000000
|
|
%oazdd[68] := 1
|
|
!gh3f0[68] := " ?"
|
|
?rylw5[68] := 1.0
|
|
%q4mzh[68] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[68] := -1
|
|
%hpc0e[68] := 3
|
|
%eujmz[68] := 2
|
|
%fogcg[68] := 1
|
|
%5zak5[68] := 0
|
|
%dwdw3[68] := 0
|
|
%sbnwu[68] := 1000000
|
|
%jeswc[68] := 1111
|
|
%mnk53[68] := 108
|
|
declare %xk3hb[10] := (get_ui_id($zctyt), get_ui_id($p4vlm), get_ui_id($1rbpm), get_ui_id($h3414), get_ui_id($540zf), get_ui_id($2cyex), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%xk3hb))
|
|
%xwg5s[1080+$g5k3r] := %xk3hb[$g5k3r]
|
|
%cqg2m[108] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $nqqg3(0, 1000000)
|
|
make_persistent($nqqg3)
|
|
declare ui_slider $u45os(-1000000, 1000000)
|
|
make_persistent($u45os)
|
|
set_control_par_str(get_ui_id($u45os),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $4ng2b
|
|
make_persistent($4ng2b)
|
|
set_control_par_str(get_ui_id($4ng2b),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($4ng2b,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($4ng2b),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 69
|
|
%n34di[$upapg] := get_ui_id($4ng2b)
|
|
%nwlgb[$upapg] := get_ui_id($u45os)
|
|
!4gjzd[69] := "_1"
|
|
%c1qym[69] := get_ui_id($u45os)
|
|
%41o3s[69] := get_ui_id($nqqg3)
|
|
declare ui_label $0gh1r(1, 1)
|
|
set_control_par_str(get_ui_id($0gh1r),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0gh1r),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[69] := get_ui_id($0gh1r)
|
|
declare ui_label $llzi0(1, 1)
|
|
set_control_par_str(get_ui_id($llzi0),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($llzi0),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[69] := get_ui_id($llzi0)
|
|
declare ui_label $arioq(1, 1)
|
|
set_control_par_str(get_ui_id($arioq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($arioq),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($arioq),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[69] := get_ui_id($arioq)
|
|
%qxmpr[69] := 1000000
|
|
%oazdd[69] := 1
|
|
!gh3f0[69] := " ?"
|
|
?rylw5[69] := 1.0
|
|
%q4mzh[69] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[69] := -1
|
|
%hpc0e[69] := 3
|
|
%eujmz[69] := 2
|
|
%fogcg[69] := 0
|
|
%5zak5[69] := 0
|
|
%dwdw3[69] := 0
|
|
%sbnwu[69] := 1000000
|
|
%jeswc[69] := 1114
|
|
%mnk53[69] := 109
|
|
declare %cpeig[10] := (get_ui_id($nqqg3), get_ui_id($u45os), get_ui_id($0gh1r), get_ui_id($llzi0), get_ui_id($arioq), get_ui_id($4ng2b), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%cpeig))
|
|
%xwg5s[1090+$g5k3r] := %cpeig[$g5k3r]
|
|
%cqg2m[109] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $et1j2(0, 1000000)
|
|
make_persistent($et1j2)
|
|
declare ui_slider $opstl(-1000000, 1000000)
|
|
make_persistent($opstl)
|
|
set_control_par_str(get_ui_id($opstl),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
|
|
declare ui_menu $w3nfb
|
|
make_persistent($w3nfb)
|
|
set_control_par_str(get_ui_id($w3nfb),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($w3nfb,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($w3nfb),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 70
|
|
%n34di[$upapg] := get_ui_id($w3nfb)
|
|
%nwlgb[$upapg] := get_ui_id($opstl)
|
|
!4gjzd[70] := "_1"
|
|
%c1qym[70] := get_ui_id($opstl)
|
|
%41o3s[70] := get_ui_id($et1j2)
|
|
declare ui_label $pe15r(1, 1)
|
|
set_control_par_str(get_ui_id($pe15r),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pe15r),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
|
|
%vvlef[70] := get_ui_id($pe15r)
|
|
declare ui_label $eh4f4(1, 1)
|
|
set_control_par_str(get_ui_id($eh4f4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($eh4f4),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
|
|
%2hswt[70] := get_ui_id($eh4f4)
|
|
declare ui_label $i4bru(1, 1)
|
|
set_control_par_str(get_ui_id($i4bru),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($i4bru),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
|
|
set_control_par(get_ui_id($i4bru),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[70] := get_ui_id($i4bru)
|
|
%qxmpr[70] := 1000000
|
|
%oazdd[70] := 1
|
|
!gh3f0[70] := " ?"
|
|
?rylw5[70] := 1.0
|
|
%q4mzh[70] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[70] := -1
|
|
%hpc0e[70] := 3
|
|
%eujmz[70] := 2
|
|
%fogcg[70] := 0
|
|
%5zak5[70] := 1
|
|
%dwdw3[70] := 0
|
|
%sbnwu[70] := 1000000
|
|
%jeswc[70] := 1117
|
|
%mnk53[70] := 110
|
|
declare %kg4rx[10] := (get_ui_id($et1j2), get_ui_id($opstl), get_ui_id($pe15r), get_ui_id($eh4f4), get_ui_id($i4bru), get_ui_id($w3nfb), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kg4rx))
|
|
%xwg5s[1100+$g5k3r] := %kg4rx[$g5k3r]
|
|
%cqg2m[110] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
declare %qw0yx[3] := (0, 1, -2)
|
|
declare ui_label $zm0dr(1, 1)
|
|
declare ui_label $pbqrd(1, 1)
|
|
set_control_par_str(get_ui_id($zm0dr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($zm0dr),$CONTROL_PAR_PICTURE,"GE_GR_METER_SCALE")
|
|
set_control_par_str(get_ui_id($pbqrd),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pbqrd),$CONTROL_PAR_PICTURE,"GE_GR_METER_SCALE")
|
|
declare %25l4m[10]
|
|
declare %2u0gi[5]
|
|
declare %b4wh2[12]
|
|
declare ui_level_meter $tpyec
|
|
declare ui_level_meter $lnvce
|
|
declare ui_level_meter $gwmob
|
|
declare ui_level_meter $os1qf
|
|
declare ui_level_meter $zuvdk
|
|
declare ui_level_meter $5ip04
|
|
declare ui_level_meter $znixq
|
|
declare ui_level_meter $uuptt
|
|
declare ui_level_meter $oswwe
|
|
declare ui_level_meter $vjsdg
|
|
declare ui_level_meter $nxxiz
|
|
declare ui_level_meter $gaekc
|
|
$pvuhq := 0
|
|
while ($pvuhq<=11)
|
|
%b4wh2[$pvuhq] := get_ui_id($tpyec)+$pvuhq
|
|
inc($pvuhq)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<=2)
|
|
$g5k3r := 0
|
|
while ($g5k3r<4)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_BG_COLOR,6982293)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_OFF_COLOR,6982293)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_ON_COLOR,3491147)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_OVERLOAD_COLOR,3491147)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_PEAK_COLOR,3491147)
|
|
attach_level_meter(%b4wh2[4*$fg4rw+$g5k3r],-1,$g5k3r,0,%qw0yx[$fg4rw])
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_RANGE_MIN,0)
|
|
set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_RANGE_MAX,10000000)
|
|
if ($fg4rw<2)
|
|
%25l4m[$fg4rw*4+$g5k3r] := %b4wh2[4*$fg4rw+$g5k3r]
|
|
else
|
|
%2u0gi[$g5k3r] := %b4wh2[4*$fg4rw+$g5k3r]
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
%25l4m[8] := get_ui_id($zm0dr)
|
|
%25l4m[9] := get_ui_id($pbqrd)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%25l4m))
|
|
%xwg5s[1510+$g5k3r] := %25l4m[$g5k3r]
|
|
%cqg2m[151] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%2u0gi))
|
|
%xwg5s[1520+$g5k3r] := %2u0gi[$g5k3r]
|
|
%cqg2m[152] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
if (1=1)
|
|
declare ui_slider $ouvzc(0, 1000000)
|
|
make_persistent($ouvzc)
|
|
declare ui_slider $f3pav(-1000000, 1000000)
|
|
make_persistent($f3pav)
|
|
set_control_par_str(get_ui_id($f3pav),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $i1321
|
|
make_persistent($i1321)
|
|
set_control_par_str(get_ui_id($i1321),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($i1321,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($i1321),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 71
|
|
%n34di[$upapg] := get_ui_id($i1321)
|
|
%nwlgb[$upapg] := get_ui_id($f3pav)
|
|
!4gjzd[71] := "_5"
|
|
%c1qym[71] := get_ui_id($f3pav)
|
|
%41o3s[71] := get_ui_id($ouvzc)
|
|
declare ui_label $nyhit(1, 1)
|
|
set_control_par_str(get_ui_id($nyhit),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nyhit),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[71] := get_ui_id($nyhit)
|
|
declare ui_label $qkk24(1, 1)
|
|
set_control_par_str(get_ui_id($qkk24),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qkk24),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[71] := get_ui_id($qkk24)
|
|
declare ui_label $pa3vb(1, 1)
|
|
set_control_par_str(get_ui_id($pa3vb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pa3vb),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($pa3vb),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[71] := get_ui_id($pa3vb)
|
|
%qxmpr[71] := 1000000
|
|
%oazdd[71] := 1
|
|
!gh3f0[71] := " ?"
|
|
?rylw5[71] := 1.0
|
|
%q4mzh[71] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[71] := -1
|
|
%hpc0e[71] := 0
|
|
%eujmz[71] := 0
|
|
%fogcg[71] := 0
|
|
%5zak5[71] := 0
|
|
%dwdw3[71] := 0
|
|
%sbnwu[71] := 1000000
|
|
%jeswc[71] := 1120
|
|
%mnk53[71] := 111
|
|
declare %4ktzh[10] := (get_ui_id($ouvzc), get_ui_id($f3pav), get_ui_id($nyhit), get_ui_id($qkk24), get_ui_id($pa3vb), get_ui_id($i1321), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%4ktzh))
|
|
%xwg5s[1110+$g5k3r] := %4ktzh[$g5k3r]
|
|
%cqg2m[111] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $yi2x2(0, 1000000)
|
|
make_persistent($yi2x2)
|
|
declare ui_slider $nrkm4(-1000000, 1000000)
|
|
make_persistent($nrkm4)
|
|
set_control_par_str(get_ui_id($nrkm4),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $lczp2
|
|
make_persistent($lczp2)
|
|
set_control_par_str(get_ui_id($lczp2),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($lczp2,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($lczp2),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 72
|
|
%n34di[$upapg] := get_ui_id($lczp2)
|
|
%nwlgb[$upapg] := get_ui_id($nrkm4)
|
|
!4gjzd[72] := "_5"
|
|
%c1qym[72] := get_ui_id($nrkm4)
|
|
%41o3s[72] := get_ui_id($yi2x2)
|
|
declare ui_label $q4kcb(1, 1)
|
|
set_control_par_str(get_ui_id($q4kcb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($q4kcb),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[72] := get_ui_id($q4kcb)
|
|
declare ui_label $hjwgu(1, 1)
|
|
set_control_par_str(get_ui_id($hjwgu),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hjwgu),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[72] := get_ui_id($hjwgu)
|
|
declare ui_label $qiz1h(1, 1)
|
|
set_control_par_str(get_ui_id($qiz1h),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qiz1h),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($qiz1h),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[72] := get_ui_id($qiz1h)
|
|
%qxmpr[72] := 1000000
|
|
%oazdd[72] := 1
|
|
!gh3f0[72] := " ?"
|
|
?rylw5[72] := 1.0
|
|
%q4mzh[72] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[72] := -1
|
|
%hpc0e[72] := 0
|
|
%eujmz[72] := 0
|
|
%fogcg[72] := 0
|
|
%5zak5[72] := 0
|
|
%dwdw3[72] := 0
|
|
%sbnwu[72] := 1000000
|
|
%jeswc[72] := 1123
|
|
%mnk53[72] := 112
|
|
declare %0mpr2[10] := (get_ui_id($yi2x2), get_ui_id($nrkm4), get_ui_id($q4kcb), get_ui_id($hjwgu), get_ui_id($qiz1h), get_ui_id($lczp2), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%0mpr2))
|
|
%xwg5s[1120+$g5k3r] := %0mpr2[$g5k3r]
|
|
%cqg2m[112] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $yr3xi(0, 1000000)
|
|
make_persistent($yr3xi)
|
|
declare ui_slider $yixdb(-1000000, 1000000)
|
|
make_persistent($yixdb)
|
|
set_control_par_str(get_ui_id($yixdb),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $fr5xq
|
|
make_persistent($fr5xq)
|
|
set_control_par_str(get_ui_id($fr5xq),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($fr5xq,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($fr5xq),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 73
|
|
%n34di[$upapg] := get_ui_id($fr5xq)
|
|
%nwlgb[$upapg] := get_ui_id($yixdb)
|
|
!4gjzd[73] := "_5"
|
|
%c1qym[73] := get_ui_id($yixdb)
|
|
%41o3s[73] := get_ui_id($yr3xi)
|
|
declare ui_label $ij1n0(1, 1)
|
|
set_control_par_str(get_ui_id($ij1n0),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ij1n0),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[73] := get_ui_id($ij1n0)
|
|
declare ui_label $3cvnb(1, 1)
|
|
set_control_par_str(get_ui_id($3cvnb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3cvnb),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[73] := get_ui_id($3cvnb)
|
|
declare ui_label $xdasy(1, 1)
|
|
set_control_par_str(get_ui_id($xdasy),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($xdasy),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($xdasy),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[73] := get_ui_id($xdasy)
|
|
%qxmpr[73] := 1000000
|
|
%oazdd[73] := 1
|
|
!gh3f0[73] := " ?"
|
|
?rylw5[73] := 1.0
|
|
%q4mzh[73] := $ENGINE_PAR_CUTOFF
|
|
%vc4gu[73] := -1
|
|
%hpc0e[73] := 0
|
|
%eujmz[73] := 0
|
|
%fogcg[73] := 0
|
|
%5zak5[73] := 0
|
|
%dwdw3[73] := 0
|
|
%sbnwu[73] := 1000000
|
|
%jeswc[73] := 1126
|
|
%mnk53[73] := 113
|
|
declare %jrsng[10] := (get_ui_id($yr3xi), get_ui_id($yixdb), get_ui_id($ij1n0), get_ui_id($3cvnb), get_ui_id($xdasy), get_ui_id($fr5xq), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%jrsng))
|
|
%xwg5s[1130+$g5k3r] := %jrsng[$g5k3r]
|
|
%cqg2m[113] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $kpiih(0, 1000000)
|
|
make_persistent($kpiih)
|
|
set_control_par(get_ui_id($kpiih),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($kpiih),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
|
|
%aazjf[14] := get_ui_id($kpiih)
|
|
declare ui_label $aukqp(1, 1)
|
|
%5comw[14] := get_ui_id($aukqp)
|
|
set_control_par_str(get_ui_id($aukqp),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($aukqp),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%qdiwi[14] := 0
|
|
%ha0dc[14] := 1000000
|
|
%cy2pa[14] := 1
|
|
!5hawr[14] := "Hz"
|
|
!znpd1[14] := ""
|
|
%i5z0e[14] := $ENGINE_PAR_FREQ1
|
|
%qpgwq[14] := -1
|
|
%bjbtn[14] := 0
|
|
%c40o1[14] := 2
|
|
%aebtw[14] := 0
|
|
%hgu5c[14] := 1000000
|
|
%gndxq[14] := 1129
|
|
%ipim0[14] := 114
|
|
declare %gkldg[2] := (get_ui_id($kpiih), get_ui_id($aukqp))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%gkldg))
|
|
%xwg5s[1140+$g5k3r] := %gkldg[$g5k3r]
|
|
%cqg2m[114] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ddusk(0, 1000000)
|
|
make_persistent($ddusk)
|
|
set_control_par(get_ui_id($ddusk),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($ddusk),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
|
|
%aazjf[15] := get_ui_id($ddusk)
|
|
declare ui_label $wwrm0(1, 1)
|
|
%5comw[15] := get_ui_id($wwrm0)
|
|
set_control_par_str(get_ui_id($wwrm0),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($wwrm0),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%qdiwi[15] := 0
|
|
%ha0dc[15] := 1000000
|
|
%cy2pa[15] := 1
|
|
!5hawr[15] := "Hz"
|
|
!znpd1[15] := ""
|
|
%i5z0e[15] := $ENGINE_PAR_FREQ2
|
|
%qpgwq[15] := -1
|
|
%bjbtn[15] := 0
|
|
%c40o1[15] := 2
|
|
%aebtw[15] := 0
|
|
%hgu5c[15] := 1000000
|
|
%gndxq[15] := 1130
|
|
%ipim0[15] := 115
|
|
declare %zkvyk[2] := (get_ui_id($ddusk), get_ui_id($wwrm0))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zkvyk))
|
|
%xwg5s[1150+$g5k3r] := %zkvyk[$g5k3r]
|
|
%cqg2m[115] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ysdm4(0, 1000000)
|
|
make_persistent($ysdm4)
|
|
set_control_par(get_ui_id($ysdm4),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($ysdm4),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
|
|
%aazjf[16] := get_ui_id($ysdm4)
|
|
declare ui_label $mjbdx(1, 1)
|
|
%5comw[16] := get_ui_id($mjbdx)
|
|
set_control_par_str(get_ui_id($mjbdx),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mjbdx),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%qdiwi[16] := 0
|
|
%ha0dc[16] := 1000000
|
|
%cy2pa[16] := 1
|
|
!5hawr[16] := "Hz"
|
|
!znpd1[16] := ""
|
|
%i5z0e[16] := $ENGINE_PAR_FREQ3
|
|
%qpgwq[16] := -1
|
|
%bjbtn[16] := 0
|
|
%c40o1[16] := 2
|
|
%aebtw[16] := 0
|
|
%hgu5c[16] := 1000000
|
|
%gndxq[16] := 1131
|
|
%ipim0[16] := 116
|
|
declare %nb3en[2] := (get_ui_id($ysdm4), get_ui_id($mjbdx))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%nb3en))
|
|
%xwg5s[1160+$g5k3r] := %nb3en[$g5k3r]
|
|
%cqg2m[116] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $dtugu(0, 1000000)
|
|
make_persistent($dtugu)
|
|
set_control_par(get_ui_id($dtugu),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($dtugu),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
|
|
%aazjf[17] := get_ui_id($dtugu)
|
|
declare ui_label $21v2s(1, 1)
|
|
%5comw[17] := get_ui_id($21v2s)
|
|
set_control_par_str(get_ui_id($21v2s),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($21v2s),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
|
|
%qdiwi[17] := 0
|
|
%ha0dc[17] := 1000000
|
|
%cy2pa[17] := 1
|
|
!5hawr[17] := "Oct"
|
|
!znpd1[17] := ""
|
|
%i5z0e[17] := $ENGINE_PAR_BW1
|
|
%qpgwq[17] := -1
|
|
%bjbtn[17] := 0
|
|
%c40o1[17] := 2
|
|
%aebtw[17] := 0
|
|
%hgu5c[17] := 1000000
|
|
%gndxq[17] := 1132
|
|
%ipim0[17] := 117
|
|
declare %xk15c[2] := (get_ui_id($dtugu), get_ui_id($21v2s))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%xk15c))
|
|
%xwg5s[1170+$g5k3r] := %xk15c[$g5k3r]
|
|
%cqg2m[117] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $pvege(0, 1000000)
|
|
make_persistent($pvege)
|
|
set_control_par(get_ui_id($pvege),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($pvege),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
|
|
%aazjf[18] := get_ui_id($pvege)
|
|
declare ui_label $ahv45(1, 1)
|
|
%5comw[18] := get_ui_id($ahv45)
|
|
set_control_par_str(get_ui_id($ahv45),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ahv45),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
|
|
%qdiwi[18] := 0
|
|
%ha0dc[18] := 1000000
|
|
%cy2pa[18] := 1
|
|
!5hawr[18] := "Oct"
|
|
!znpd1[18] := ""
|
|
%i5z0e[18] := $ENGINE_PAR_BW2
|
|
%qpgwq[18] := -1
|
|
%bjbtn[18] := 0
|
|
%c40o1[18] := 2
|
|
%aebtw[18] := 0
|
|
%hgu5c[18] := 1000000
|
|
%gndxq[18] := 1133
|
|
%ipim0[18] := 118
|
|
declare %uxvmc[2] := (get_ui_id($pvege), get_ui_id($ahv45))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%uxvmc))
|
|
%xwg5s[1180+$g5k3r] := %uxvmc[$g5k3r]
|
|
%cqg2m[118] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $iggz4(0, 1000000)
|
|
make_persistent($iggz4)
|
|
set_control_par(get_ui_id($iggz4),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($iggz4),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
|
|
%aazjf[19] := get_ui_id($iggz4)
|
|
declare ui_label $jeohl(1, 1)
|
|
%5comw[19] := get_ui_id($jeohl)
|
|
set_control_par_str(get_ui_id($jeohl),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jeohl),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
|
|
%qdiwi[19] := 0
|
|
%ha0dc[19] := 1000000
|
|
%cy2pa[19] := 1
|
|
!5hawr[19] := "Oct"
|
|
!znpd1[19] := ""
|
|
%i5z0e[19] := $ENGINE_PAR_BW3
|
|
%qpgwq[19] := -1
|
|
%bjbtn[19] := 0
|
|
%c40o1[19] := 2
|
|
%aebtw[19] := 0
|
|
%hgu5c[19] := 1000000
|
|
%gndxq[19] := 1134
|
|
%ipim0[19] := 119
|
|
declare %ijhix[2] := (get_ui_id($iggz4), get_ui_id($jeohl))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ijhix))
|
|
%xwg5s[1190+$g5k3r] := %ijhix[$g5k3r]
|
|
%cqg2m[119] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare %ubhst[6] := (114, 115, 116, 117, 118, 119)
|
|
declare ui_slider $5ernz(0, 1000000)
|
|
make_persistent($5ernz)
|
|
set_control_par(get_ui_id($5ernz),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($5ernz),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
|
|
%aazjf[20] := get_ui_id($5ernz)
|
|
declare ui_label $cixjr(1, 1)
|
|
%5comw[20] := get_ui_id($cixjr)
|
|
set_control_par_str(get_ui_id($cixjr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($cixjr),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%qdiwi[20] := 0
|
|
%ha0dc[20] := 1000000
|
|
%cy2pa[20] := 1
|
|
!5hawr[20] := "Hz"
|
|
!znpd1[20] := ""
|
|
%i5z0e[20] := $ENGINE_PAR_FREQ1
|
|
%qpgwq[20] := -1
|
|
%bjbtn[20] := 0
|
|
%c40o1[20] := 2
|
|
%aebtw[20] := 0
|
|
%hgu5c[20] := 1000000
|
|
%gndxq[20] := 1135
|
|
%ipim0[20] := 120
|
|
declare %mmxef[2] := (get_ui_id($5ernz), get_ui_id($cixjr))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%mmxef))
|
|
%xwg5s[1200+$g5k3r] := %mmxef[$g5k3r]
|
|
%cqg2m[120] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $gepsm(0, 1000000)
|
|
make_persistent($gepsm)
|
|
set_control_par(get_ui_id($gepsm),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($gepsm),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
|
|
%aazjf[21] := get_ui_id($gepsm)
|
|
declare ui_label $3xktf(1, 1)
|
|
%5comw[21] := get_ui_id($3xktf)
|
|
set_control_par_str(get_ui_id($3xktf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3xktf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%qdiwi[21] := 0
|
|
%ha0dc[21] := 1000000
|
|
%cy2pa[21] := 1
|
|
!5hawr[21] := "Hz"
|
|
!znpd1[21] := ""
|
|
%i5z0e[21] := $ENGINE_PAR_FREQ2
|
|
%qpgwq[21] := -1
|
|
%bjbtn[21] := 0
|
|
%c40o1[21] := 2
|
|
%aebtw[21] := 0
|
|
%hgu5c[21] := 1000000
|
|
%gndxq[21] := 1136
|
|
%ipim0[21] := 121
|
|
declare %x2zv2[2] := (get_ui_id($gepsm), get_ui_id($3xktf))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%x2zv2))
|
|
%xwg5s[1210+$g5k3r] := %x2zv2[$g5k3r]
|
|
%cqg2m[121] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $qtif2(0, 1000000)
|
|
make_persistent($qtif2)
|
|
set_control_par(get_ui_id($qtif2),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($qtif2),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
|
|
%aazjf[22] := get_ui_id($qtif2)
|
|
declare ui_label $vxkmw(1, 1)
|
|
%5comw[22] := get_ui_id($vxkmw)
|
|
set_control_par_str(get_ui_id($vxkmw),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($vxkmw),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
|
|
%qdiwi[22] := 0
|
|
%ha0dc[22] := 1000000
|
|
%cy2pa[22] := 1
|
|
!5hawr[22] := "Hz"
|
|
!znpd1[22] := ""
|
|
%i5z0e[22] := $ENGINE_PAR_FREQ3
|
|
%qpgwq[22] := -1
|
|
%bjbtn[22] := 0
|
|
%c40o1[22] := 2
|
|
%aebtw[22] := 0
|
|
%hgu5c[22] := 1000000
|
|
%gndxq[22] := 1137
|
|
%ipim0[22] := 122
|
|
declare %u5shn[2] := (get_ui_id($qtif2), get_ui_id($vxkmw))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%u5shn))
|
|
%xwg5s[1220+$g5k3r] := %u5shn[$g5k3r]
|
|
%cqg2m[122] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $dtx0r(0, 1000000)
|
|
make_persistent($dtx0r)
|
|
set_control_par(get_ui_id($dtx0r),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($dtx0r),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
|
|
%aazjf[23] := get_ui_id($dtx0r)
|
|
declare ui_label $mtn1n(1, 1)
|
|
%5comw[23] := get_ui_id($mtn1n)
|
|
set_control_par_str(get_ui_id($mtn1n),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mtn1n),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
|
|
%qdiwi[23] := 0
|
|
%ha0dc[23] := 1000000
|
|
%cy2pa[23] := 1
|
|
!5hawr[23] := "Oct"
|
|
!znpd1[23] := ""
|
|
%i5z0e[23] := $ENGINE_PAR_BW1
|
|
%qpgwq[23] := -1
|
|
%bjbtn[23] := 0
|
|
%c40o1[23] := 2
|
|
%aebtw[23] := 0
|
|
%hgu5c[23] := 1000000
|
|
%gndxq[23] := 1138
|
|
%ipim0[23] := 123
|
|
declare %ondoi[2] := (get_ui_id($dtx0r), get_ui_id($mtn1n))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ondoi))
|
|
%xwg5s[1230+$g5k3r] := %ondoi[$g5k3r]
|
|
%cqg2m[123] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ophyd(0, 1000000)
|
|
make_persistent($ophyd)
|
|
set_control_par(get_ui_id($ophyd),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($ophyd),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
|
|
%aazjf[24] := get_ui_id($ophyd)
|
|
declare ui_label $eb3ia(1, 1)
|
|
%5comw[24] := get_ui_id($eb3ia)
|
|
set_control_par_str(get_ui_id($eb3ia),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($eb3ia),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
|
|
%qdiwi[24] := 0
|
|
%ha0dc[24] := 1000000
|
|
%cy2pa[24] := 1
|
|
!5hawr[24] := "Oct"
|
|
!znpd1[24] := ""
|
|
%i5z0e[24] := $ENGINE_PAR_BW2
|
|
%qpgwq[24] := -1
|
|
%bjbtn[24] := 0
|
|
%c40o1[24] := 2
|
|
%aebtw[24] := 0
|
|
%hgu5c[24] := 1000000
|
|
%gndxq[24] := 1139
|
|
%ipim0[24] := 124
|
|
declare %mxxcr[2] := (get_ui_id($ophyd), get_ui_id($eb3ia))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%mxxcr))
|
|
%xwg5s[1240+$g5k3r] := %mxxcr[$g5k3r]
|
|
%cqg2m[124] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ydeyc(0, 1000000)
|
|
make_persistent($ydeyc)
|
|
set_control_par(get_ui_id($ydeyc),$CONTROL_PAR_DEFAULT_VALUE,500000)
|
|
set_control_par_str(get_ui_id($ydeyc),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
|
|
%aazjf[25] := get_ui_id($ydeyc)
|
|
declare ui_label $ms0kq(1, 1)
|
|
%5comw[25] := get_ui_id($ms0kq)
|
|
set_control_par_str(get_ui_id($ms0kq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ms0kq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
|
|
%qdiwi[25] := 0
|
|
%ha0dc[25] := 1000000
|
|
%cy2pa[25] := 1
|
|
!5hawr[25] := "Oct"
|
|
!znpd1[25] := ""
|
|
%i5z0e[25] := $ENGINE_PAR_BW3
|
|
%qpgwq[25] := -1
|
|
%bjbtn[25] := 0
|
|
%c40o1[25] := 2
|
|
%aebtw[25] := 0
|
|
%hgu5c[25] := 1000000
|
|
%gndxq[25] := 1140
|
|
%ipim0[25] := 125
|
|
declare %i2xjn[2] := (get_ui_id($ydeyc), get_ui_id($ms0kq))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%i2xjn))
|
|
%xwg5s[1250+$g5k3r] := %i2xjn[$g5k3r]
|
|
%cqg2m[125] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare %koku3[6] := (120, 121, 122, 123, 124, 125)
|
|
declare %r5fsk[6] := ($ENGINE_PAR_FREQ1, $ENGINE_PAR_FREQ2, $ENGINE_PAR_FREQ3, $ENGINE_PAR_BW1, $ENGINE_PAR_BW2, $ENGINE_PAR_BW3)
|
|
declare %ce3ql[48]
|
|
declare %u4nqi[48]
|
|
$dyt1q := 75
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
$g5k3r := 0
|
|
while ($g5k3r<%gxveo[$fg4rw])
|
|
$25gvz := 0
|
|
while ($25gvz<3)
|
|
%u4nqi[12*$fg4rw+(3*$g5k3r)+$25gvz] := $dyt1q
|
|
%ce3ql[12*$fg4rw+(3*$g5k3r)+$25gvz] := %xwg5s[10*$dyt1q]
|
|
inc($dyt1q)
|
|
inc($25gvz)
|
|
end while
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
declare %d03k4[48]
|
|
declare %2e42a[48]
|
|
declare %kdfz1[48]
|
|
$dyt1q := 0
|
|
declare %n5ge0[32]
|
|
$fg4rw := 0
|
|
while ($fg4rw<4)
|
|
$g5k3r := 0
|
|
while ($g5k3r<%wvg1x[$fg4rw])
|
|
if (%wvg1x[$fg4rw]>1)
|
|
%n5ge0[8*$fg4rw+$g5k3r] := %ejazl[$dyt1q]
|
|
end if
|
|
inc($dyt1q)
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
declare ui_slider $ud2dz(0, 1000000)
|
|
make_persistent($ud2dz)
|
|
declare ui_slider $3imfl(-999999, 999999)
|
|
make_persistent($3imfl)
|
|
set_control_par_str(get_ui_id($3imfl),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $v2kdj
|
|
make_persistent($v2kdj)
|
|
set_control_par_str(get_ui_id($v2kdj),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($v2kdj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($v2kdj),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 74
|
|
%n34di[$upapg] := get_ui_id($v2kdj)
|
|
%nwlgb[$upapg] := get_ui_id($3imfl)
|
|
!4gjzd[74] := "_5"
|
|
%c1qym[74] := get_ui_id($3imfl)
|
|
%41o3s[74] := get_ui_id($ud2dz)
|
|
declare ui_label $tmcx1(1, 1)
|
|
set_control_par_str(get_ui_id($tmcx1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($tmcx1),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[74] := get_ui_id($tmcx1)
|
|
declare ui_label $bxcq4(1, 1)
|
|
set_control_par_str(get_ui_id($bxcq4),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($bxcq4),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[74] := get_ui_id($bxcq4)
|
|
declare ui_label $t3oeg(1, 1)
|
|
set_control_par_str(get_ui_id($t3oeg),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($t3oeg),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($t3oeg),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[74] := get_ui_id($t3oeg)
|
|
%qxmpr[74] := 999999
|
|
%oazdd[74] := 1
|
|
!gh3f0[74] := "dB"
|
|
?rylw5[74] := 1.0
|
|
%q4mzh[74] := $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN
|
|
%vc4gu[74] := -1
|
|
%hpc0e[74] := 1
|
|
%eujmz[74] := 0
|
|
%fogcg[74] := 0
|
|
%5zak5[74] := 0
|
|
%dwdw3[74] := 0
|
|
%sbnwu[74] := 1000000
|
|
%jeswc[74] := 1200
|
|
%mnk53[74] := 29
|
|
declare %oip1l[10] := (get_ui_id($ud2dz), get_ui_id($3imfl), get_ui_id($tmcx1), get_ui_id($bxcq4), get_ui_id($t3oeg), get_ui_id($v2kdj), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%oip1l))
|
|
%xwg5s[290+$g5k3r] := %oip1l[$g5k3r]
|
|
%cqg2m[29] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $b4qif(0, 1000000)
|
|
make_persistent($b4qif)
|
|
declare ui_slider $uqaye(-999999, 999999)
|
|
make_persistent($uqaye)
|
|
set_control_par_str(get_ui_id($uqaye),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $tpmdd
|
|
make_persistent($tpmdd)
|
|
set_control_par_str(get_ui_id($tpmdd),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($tpmdd,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($tpmdd),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 75
|
|
%n34di[$upapg] := get_ui_id($tpmdd)
|
|
%nwlgb[$upapg] := get_ui_id($uqaye)
|
|
!4gjzd[75] := "_5"
|
|
%c1qym[75] := get_ui_id($uqaye)
|
|
%41o3s[75] := get_ui_id($b4qif)
|
|
declare ui_label $ghoa2(1, 1)
|
|
set_control_par_str(get_ui_id($ghoa2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ghoa2),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[75] := get_ui_id($ghoa2)
|
|
declare ui_label $jd2jk(1, 1)
|
|
set_control_par_str(get_ui_id($jd2jk),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jd2jk),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[75] := get_ui_id($jd2jk)
|
|
declare ui_label $hmyvb(1, 1)
|
|
set_control_par_str(get_ui_id($hmyvb),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($hmyvb),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($hmyvb),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[75] := get_ui_id($hmyvb)
|
|
%qxmpr[75] := 999999
|
|
%oazdd[75] := 1
|
|
!gh3f0[75] := "%"
|
|
?rylw5[75] := 1.0
|
|
%q4mzh[75] := $ENGINE_PAR_RDL_FEEDBACK
|
|
%vc4gu[75] := -1
|
|
%hpc0e[75] := 1
|
|
%eujmz[75] := 0
|
|
%fogcg[75] := 0
|
|
%5zak5[75] := 0
|
|
%dwdw3[75] := 0
|
|
%sbnwu[75] := 1000000
|
|
%jeswc[75] := 1203
|
|
%mnk53[75] := 30
|
|
declare %kgvmc[10] := (get_ui_id($b4qif), get_ui_id($uqaye), get_ui_id($ghoa2), get_ui_id($jd2jk), get_ui_id($hmyvb), get_ui_id($tpmdd), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kgvmc))
|
|
%xwg5s[300+$g5k3r] := %kgvmc[$g5k3r]
|
|
%cqg2m[30] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $tcdg3(0, 1000000)
|
|
make_persistent($tcdg3)
|
|
declare ui_slider $fflhr(-1000000, 1000000)
|
|
make_persistent($fflhr)
|
|
set_control_par_str(get_ui_id($fflhr),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $rpdbb
|
|
make_persistent($rpdbb)
|
|
set_control_par_str(get_ui_id($rpdbb),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($rpdbb,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($rpdbb),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 76
|
|
%n34di[$upapg] := get_ui_id($rpdbb)
|
|
%nwlgb[$upapg] := get_ui_id($fflhr)
|
|
!4gjzd[76] := "_5"
|
|
%c1qym[76] := get_ui_id($fflhr)
|
|
%41o3s[76] := get_ui_id($tcdg3)
|
|
declare ui_label $dn0r3(1, 1)
|
|
set_control_par_str(get_ui_id($dn0r3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dn0r3),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[76] := get_ui_id($dn0r3)
|
|
declare ui_label $1i0u3(1, 1)
|
|
set_control_par_str(get_ui_id($1i0u3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($1i0u3),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[76] := get_ui_id($1i0u3)
|
|
declare ui_label $xhajv(1, 1)
|
|
set_control_par_str(get_ui_id($xhajv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($xhajv),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($xhajv),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[76] := get_ui_id($xhajv)
|
|
%qxmpr[76] := 1000000
|
|
%oazdd[76] := 1
|
|
!gh3f0[76] := "ms"
|
|
?rylw5[76] := 1.0
|
|
%q4mzh[76] := $ENGINE_PAR_RDL_TIME
|
|
%vc4gu[76] := -1
|
|
%hpc0e[76] := 1
|
|
%eujmz[76] := 0
|
|
%fogcg[76] := 1
|
|
%5zak5[76] := 0
|
|
%dwdw3[76] := 0
|
|
%sbnwu[76] := 1000000
|
|
%jeswc[76] := 1206
|
|
%mnk53[76] := 28
|
|
declare %ao1af[10] := (get_ui_id($tcdg3), get_ui_id($fflhr), get_ui_id($dn0r3), get_ui_id($1i0u3), get_ui_id($xhajv), get_ui_id($rpdbb), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ao1af))
|
|
%xwg5s[280+$g5k3r] := %ao1af[$g5k3r]
|
|
%cqg2m[28] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ppztm(0, 1000000)
|
|
make_persistent($ppztm)
|
|
declare ui_slider $gwhxp(-1000001, 1000001)
|
|
make_persistent($gwhxp)
|
|
set_control_par_str(get_ui_id($gwhxp),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $r0mpl
|
|
make_persistent($r0mpl)
|
|
set_control_par_str(get_ui_id($r0mpl),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($r0mpl,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($r0mpl),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 77
|
|
%n34di[$upapg] := get_ui_id($r0mpl)
|
|
%nwlgb[$upapg] := get_ui_id($gwhxp)
|
|
!4gjzd[77] := "_5"
|
|
%c1qym[77] := get_ui_id($gwhxp)
|
|
%41o3s[77] := get_ui_id($ppztm)
|
|
declare ui_label $en0x1(1, 1)
|
|
set_control_par_str(get_ui_id($en0x1),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($en0x1),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[77] := get_ui_id($en0x1)
|
|
declare ui_label $mawal(1, 1)
|
|
set_control_par_str(get_ui_id($mawal),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mawal),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[77] := get_ui_id($mawal)
|
|
declare ui_label $0vw2l(1, 1)
|
|
set_control_par_str(get_ui_id($0vw2l),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($0vw2l),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($0vw2l),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[77] := get_ui_id($0vw2l)
|
|
%qxmpr[77] := 1000001
|
|
%oazdd[77] := 1
|
|
!gh3f0[77] := "dB"
|
|
?rylw5[77] := 1.0
|
|
%q4mzh[77] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_0
|
|
%vc4gu[77] := -1
|
|
%hpc0e[77] := 7
|
|
%eujmz[77] := 1024
|
|
%fogcg[77] := 0
|
|
%5zak5[77] := 0
|
|
%dwdw3[77] := 0
|
|
%sbnwu[77] := 1000000
|
|
%jeswc[77] := 1000
|
|
%mnk53[77] := 62
|
|
declare %kie0i[10] := (get_ui_id($ppztm), get_ui_id($gwhxp), get_ui_id($en0x1), get_ui_id($mawal), get_ui_id($0vw2l), get_ui_id($r0mpl), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%kie0i))
|
|
%xwg5s[620+$g5k3r] := %kie0i[$g5k3r]
|
|
%cqg2m[62] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $mjxc2(0, 1000000)
|
|
make_persistent($mjxc2)
|
|
declare ui_slider $bxtyp(-1000001, 1000001)
|
|
make_persistent($bxtyp)
|
|
set_control_par_str(get_ui_id($bxtyp),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $a1mcv
|
|
make_persistent($a1mcv)
|
|
set_control_par_str(get_ui_id($a1mcv),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($a1mcv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($a1mcv),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 78
|
|
%n34di[$upapg] := get_ui_id($a1mcv)
|
|
%nwlgb[$upapg] := get_ui_id($bxtyp)
|
|
!4gjzd[78] := "_5"
|
|
%c1qym[78] := get_ui_id($bxtyp)
|
|
%41o3s[78] := get_ui_id($mjxc2)
|
|
declare ui_label $mqyie(1, 1)
|
|
set_control_par_str(get_ui_id($mqyie),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($mqyie),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[78] := get_ui_id($mqyie)
|
|
declare ui_label $ahrd2(1, 1)
|
|
set_control_par_str(get_ui_id($ahrd2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ahrd2),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[78] := get_ui_id($ahrd2)
|
|
declare ui_label $sso0w(1, 1)
|
|
set_control_par_str(get_ui_id($sso0w),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($sso0w),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($sso0w),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[78] := get_ui_id($sso0w)
|
|
%qxmpr[78] := 1000001
|
|
%oazdd[78] := 1
|
|
!gh3f0[78] := "dB"
|
|
?rylw5[78] := 1.0
|
|
%q4mzh[78] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_1
|
|
%vc4gu[78] := -1
|
|
%hpc0e[78] := 7
|
|
%eujmz[78] := 1024
|
|
%fogcg[78] := 0
|
|
%5zak5[78] := 0
|
|
%dwdw3[78] := 0
|
|
%sbnwu[78] := 1000000
|
|
%jeswc[78] := 1003
|
|
%mnk53[78] := 63
|
|
declare %zf0bt[10] := (get_ui_id($mjxc2), get_ui_id($bxtyp), get_ui_id($mqyie), get_ui_id($ahrd2), get_ui_id($sso0w), get_ui_id($a1mcv), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zf0bt))
|
|
%xwg5s[630+$g5k3r] := %zf0bt[$g5k3r]
|
|
%cqg2m[63] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $uvwcc(0, 1000000)
|
|
make_persistent($uvwcc)
|
|
declare ui_slider $xcb2e(-1000001, 1000001)
|
|
make_persistent($xcb2e)
|
|
set_control_par_str(get_ui_id($xcb2e),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $h5tys
|
|
make_persistent($h5tys)
|
|
set_control_par_str(get_ui_id($h5tys),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($h5tys,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($h5tys),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 79
|
|
%n34di[$upapg] := get_ui_id($h5tys)
|
|
%nwlgb[$upapg] := get_ui_id($xcb2e)
|
|
!4gjzd[79] := "_5"
|
|
%c1qym[79] := get_ui_id($xcb2e)
|
|
%41o3s[79] := get_ui_id($uvwcc)
|
|
declare ui_label $qa0j3(1, 1)
|
|
set_control_par_str(get_ui_id($qa0j3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($qa0j3),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[79] := get_ui_id($qa0j3)
|
|
declare ui_label $o0245(1, 1)
|
|
set_control_par_str(get_ui_id($o0245),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($o0245),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[79] := get_ui_id($o0245)
|
|
declare ui_label $d1js2(1, 1)
|
|
set_control_par_str(get_ui_id($d1js2),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($d1js2),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($d1js2),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[79] := get_ui_id($d1js2)
|
|
%qxmpr[79] := 1000001
|
|
%oazdd[79] := 1
|
|
!gh3f0[79] := "dB"
|
|
?rylw5[79] := 1.0
|
|
%q4mzh[79] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_0
|
|
%vc4gu[79] := -1
|
|
%hpc0e[79] := 7
|
|
%eujmz[79] := 1025
|
|
%fogcg[79] := 0
|
|
%5zak5[79] := 0
|
|
%dwdw3[79] := 0
|
|
%sbnwu[79] := 1000000
|
|
%jeswc[79] := 1006
|
|
%mnk53[79] := 64
|
|
declare %zni20[10] := (get_ui_id($uvwcc), get_ui_id($xcb2e), get_ui_id($qa0j3), get_ui_id($o0245), get_ui_id($d1js2), get_ui_id($h5tys), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%zni20))
|
|
%xwg5s[640+$g5k3r] := %zni20[$g5k3r]
|
|
%cqg2m[64] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_slider $ev1e5(0, 1000000)
|
|
make_persistent($ev1e5)
|
|
declare ui_slider $vtpyr(-1000001, 1000001)
|
|
make_persistent($vtpyr)
|
|
set_control_par_str(get_ui_id($vtpyr),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
|
|
declare ui_menu $mophf
|
|
make_persistent($mophf)
|
|
set_control_par_str(get_ui_id($mophf),$CONTROL_PAR_PICTURE,"blank")
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(!flm4j))
|
|
add_menu_item($mophf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
set_menu_item_str(get_ui_id($mophf),search(%bnygy,10),"VEL Mono Velocity")
|
|
$upapg := 80
|
|
%n34di[$upapg] := get_ui_id($mophf)
|
|
%nwlgb[$upapg] := get_ui_id($vtpyr)
|
|
!4gjzd[80] := "_5"
|
|
%c1qym[80] := get_ui_id($vtpyr)
|
|
%41o3s[80] := get_ui_id($ev1e5)
|
|
declare ui_label $pssbi(1, 1)
|
|
set_control_par_str(get_ui_id($pssbi),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($pssbi),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
|
|
%vvlef[80] := get_ui_id($pssbi)
|
|
declare ui_label $uvlj3(1, 1)
|
|
set_control_par_str(get_ui_id($uvlj3),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($uvlj3),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
|
|
%2hswt[80] := get_ui_id($uvlj3)
|
|
declare ui_label $eoncv(1, 1)
|
|
set_control_par_str(get_ui_id($eoncv),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($eoncv),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
|
|
set_control_par(get_ui_id($eoncv),$CONTROL_PAR_Z_LAYER,1)
|
|
%lm23w[80] := get_ui_id($eoncv)
|
|
%qxmpr[80] := 1000001
|
|
%oazdd[80] := 1
|
|
!gh3f0[80] := "dB"
|
|
?rylw5[80] := 1.0
|
|
%q4mzh[80] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_1
|
|
%vc4gu[80] := -1
|
|
%hpc0e[80] := 7
|
|
%eujmz[80] := 1025
|
|
%fogcg[80] := 0
|
|
%5zak5[80] := 0
|
|
%dwdw3[80] := 0
|
|
%sbnwu[80] := 1000000
|
|
%jeswc[80] := 1009
|
|
%mnk53[80] := 65
|
|
declare %31tuk[10] := (get_ui_id($ev1e5), get_ui_id($vtpyr), get_ui_id($pssbi), get_ui_id($uvlj3), get_ui_id($eoncv), get_ui_id($mophf), -1)
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%31tuk))
|
|
%xwg5s[650+$g5k3r] := %31tuk[$g5k3r]
|
|
%cqg2m[65] := 64
|
|
inc($g5k3r)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<29)
|
|
$dyt1q := search(%mdgl1,%p41k2[$fg4rw])
|
|
add_menu_item($2qtv2,!gdlxl[$dyt1q],%p41k2[$fg4rw])
|
|
inc($fg4rw)
|
|
end while
|
|
declare ui_button $v3w2j
|
|
set_control_par_str(get_ui_id($v3w2j),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($v3w2j),$CONTROL_PAR_PICTURE,"GE_RND_BTN_0")
|
|
declare ui_menu $41roa
|
|
make_persistent($41roa)
|
|
read_persistent_var($41roa)
|
|
add_menu_item($41roa,"P Parameters only",0)
|
|
add_menu_item($41roa,"S Include Source",1)
|
|
set_control_par_str(get_ui_id($41roa),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $41roa)
|
|
declare ui_button $nd04g
|
|
set_control_par_str(get_ui_id($nd04g),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($nd04g),$CONTROL_PAR_PICTURE,"blank")
|
|
declare %ioaja[3] := (get_ui_id($v3w2j), get_ui_id($41roa), get_ui_id($nd04g))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%ioaja))
|
|
%xwg5s[1320+$g5k3r] := %ioaja[$g5k3r]
|
|
%cqg2m[132] := 2
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_button $r2b4a
|
|
set_control_par_str(get_ui_id($r2b4a),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($r2b4a),$CONTROL_PAR_PICTURE,"GE_RND_BTN_0")
|
|
declare ui_menu $y2kih
|
|
make_persistent($y2kih)
|
|
read_persistent_var($y2kih)
|
|
add_menu_item($y2kih,"P Parameters only",0)
|
|
add_menu_item($y2kih,"S Include Source",1)
|
|
set_control_par_str(get_ui_id($y2kih),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $y2kih)
|
|
declare ui_button $ecodz
|
|
set_control_par_str(get_ui_id($ecodz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($ecodz),$CONTROL_PAR_PICTURE,"blank")
|
|
declare %dmutb[3] := (get_ui_id($r2b4a), get_ui_id($y2kih), get_ui_id($ecodz))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%dmutb))
|
|
%xwg5s[1330+$g5k3r] := %dmutb[$g5k3r]
|
|
%cqg2m[133] := 4
|
|
inc($g5k3r)
|
|
end while
|
|
declare ui_button $dafnz
|
|
set_control_par_str(get_ui_id($dafnz),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($dafnz),$CONTROL_PAR_PICTURE,"GE_RND_BTN_1")
|
|
declare %vhhvc[1] := (get_ui_id($dafnz))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%vhhvc))
|
|
%xwg5s[1340+$g5k3r] := %vhhvc[$g5k3r]
|
|
%cqg2m[134] := 16
|
|
inc($g5k3r)
|
|
end while
|
|
declare %zdvxw[10] := (3, 4, 6, 8, 12, 16, 24, 32, 64, 128)
|
|
declare $n4ppl
|
|
declare %fs3hy[39]
|
|
%fs3hy[0] := 35
|
|
%fs3hy[1] := 36
|
|
%fs3hy[2] := 37
|
|
%fs3hy[3] := 38
|
|
%fs3hy[4] := 39
|
|
%fs3hy[5] := 40
|
|
%fs3hy[6] := 41
|
|
%fs3hy[7] := 42
|
|
%fs3hy[8] := 43
|
|
%fs3hy[9] := 44
|
|
%fs3hy[10] := 45
|
|
%fs3hy[11] := 46
|
|
%fs3hy[12] := 47
|
|
%fs3hy[13] := 48
|
|
%fs3hy[14] := 49
|
|
%fs3hy[15] := 50
|
|
%fs3hy[16] := 51
|
|
%fs3hy[17] := 52
|
|
%fs3hy[18] := 53
|
|
%fs3hy[19] := 54
|
|
%fs3hy[20] := 55
|
|
%fs3hy[21] := 56
|
|
%fs3hy[22] := 57
|
|
%fs3hy[23] := 58
|
|
%fs3hy[24] := 59
|
|
%fs3hy[25] := 60
|
|
%fs3hy[26] := 61
|
|
%fs3hy[27] := 62
|
|
%fs3hy[28] := 63
|
|
%fs3hy[29] := 64
|
|
%fs3hy[30] := 65
|
|
%fs3hy[31] := 66
|
|
%fs3hy[32] := 67
|
|
%fs3hy[33] := 68
|
|
%fs3hy[34] := 69
|
|
%fs3hy[35] := 70
|
|
%fs3hy[36] := 71
|
|
%fs3hy[37] := 72
|
|
%fs3hy[38] := 73
|
|
declare %bsd31[19]
|
|
%bsd31[0] := 12
|
|
%bsd31[1] := 13
|
|
%bsd31[2] := 14
|
|
%bsd31[3] := 15
|
|
%bsd31[4] := 16
|
|
%bsd31[5] := 17
|
|
%bsd31[6] := 18
|
|
%bsd31[7] := 19
|
|
%bsd31[8] := 20
|
|
%bsd31[9] := 24
|
|
%bsd31[10] := 25
|
|
%bsd31[11] := 7
|
|
%bsd31[12] := 8
|
|
%bsd31[13] := 0
|
|
%bsd31[14] := 2
|
|
%bsd31[15] := 23
|
|
%bsd31[16] := 28
|
|
%bsd31[17] := 29
|
|
%bsd31[18] := 30
|
|
declare %u335j[4]
|
|
%u335j[0] := 7
|
|
%u335j[1] := 8
|
|
%u335j[2] := 0
|
|
%u335j[3] := 2
|
|
declare %h2jv2[11]
|
|
%h2jv2[0] := 12
|
|
%h2jv2[1] := 13
|
|
%h2jv2[2] := 14
|
|
%h2jv2[3] := 15
|
|
%h2jv2[4] := 16
|
|
%h2jv2[5] := 17
|
|
%h2jv2[6] := 18
|
|
%h2jv2[7] := 19
|
|
%h2jv2[8] := 20
|
|
%h2jv2[9] := 24
|
|
%h2jv2[10] := 25
|
|
declare %xdonk[48]
|
|
%xdonk[0] := 35
|
|
%xdonk[1] := 36
|
|
%xdonk[2] := 37
|
|
%xdonk[3] := 38
|
|
%xdonk[4] := 39
|
|
%xdonk[5] := 40
|
|
%xdonk[6] := 41
|
|
%xdonk[7] := 42
|
|
%xdonk[8] := 43
|
|
%xdonk[9] := 44
|
|
%xdonk[10] := 45
|
|
%xdonk[11] := 46
|
|
%xdonk[12] := 47
|
|
%xdonk[13] := 48
|
|
%xdonk[14] := 49
|
|
%xdonk[15] := 50
|
|
%xdonk[16] := 51
|
|
%xdonk[17] := 52
|
|
%xdonk[18] := 53
|
|
%xdonk[19] := 54
|
|
%xdonk[20] := 55
|
|
%xdonk[21] := 56
|
|
%xdonk[22] := 57
|
|
%xdonk[23] := 58
|
|
%xdonk[24] := 59
|
|
%xdonk[25] := 60
|
|
%xdonk[26] := 61
|
|
%xdonk[27] := 62
|
|
%xdonk[28] := 63
|
|
%xdonk[29] := 64
|
|
%xdonk[30] := 65
|
|
%xdonk[31] := 66
|
|
%xdonk[32] := 67
|
|
%xdonk[33] := 68
|
|
%xdonk[34] := 69
|
|
%xdonk[35] := 70
|
|
%xdonk[36] := 71
|
|
%xdonk[37] := 72
|
|
%xdonk[38] := 73
|
|
%xdonk[39] := 76
|
|
%xdonk[40] := 74
|
|
%xdonk[41] := 75
|
|
%xdonk[42] := 77
|
|
%xdonk[43] := 78
|
|
%xdonk[44] := 79
|
|
%xdonk[45] := 80
|
|
%xdonk[46] := 26
|
|
%xdonk[47] := 27
|
|
declare %arjqa[3]
|
|
%arjqa[0] := 9
|
|
%arjqa[1] := 10
|
|
%arjqa[2] := 11
|
|
declare %ulgib[2]
|
|
%ulgib[0] := 21
|
|
%ulgib[1] := 22
|
|
declare %xkzmj[4]
|
|
%xkzmj[0] := 31
|
|
%xkzmj[1] := 32
|
|
%xkzmj[2] := 33
|
|
%xkzmj[3] := 34
|
|
declare %zchu0[4]
|
|
%zchu0[0] := 23
|
|
%zchu0[1] := 28
|
|
%zchu0[2] := 29
|
|
%zchu0[3] := 30
|
|
declare %3xxkk[22]
|
|
$q3qgi := 0
|
|
$yjjle := 0
|
|
while ($yjjle<num_elements(%bsd31))
|
|
%3xxkk[$yjjle+$q3qgi] := %bsd31[$yjjle]
|
|
inc($yjjle)
|
|
end while
|
|
$q3qgi := $q3qgi+num_elements(%bsd31)
|
|
$yjjle := 0
|
|
while ($yjjle<num_elements(%arjqa))
|
|
%3xxkk[$yjjle+$q3qgi] := %arjqa[$yjjle]
|
|
inc($yjjle)
|
|
end while
|
|
declare %pv2ax[54]
|
|
$q3qgi := 0
|
|
$yjjle := 0
|
|
while ($yjjle<num_elements(%xdonk))
|
|
%pv2ax[$yjjle+$q3qgi] := %xdonk[$yjjle]
|
|
inc($yjjle)
|
|
end while
|
|
$q3qgi := $q3qgi+num_elements(%xdonk)
|
|
$yjjle := 0
|
|
while ($yjjle<num_elements(%ulgib))
|
|
%pv2ax[$yjjle+$q3qgi] := %ulgib[$yjjle]
|
|
inc($yjjle)
|
|
end while
|
|
$q3qgi := $q3qgi+num_elements(%ulgib)
|
|
$yjjle := 0
|
|
while ($yjjle<num_elements(%xkzmj))
|
|
%pv2ax[$yjjle+$q3qgi] := %xkzmj[$yjjle]
|
|
inc($yjjle)
|
|
end while
|
|
end if
|
|
declare ui_label $5rsow(1, 1)
|
|
set_control_par_str(get_ui_id($5rsow),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($5rsow),$CONTROL_PAR_PICTURE,"GE_PERFORM_ANIMATION")
|
|
%xwg5s[1950] := get_ui_id($5rsow)
|
|
%cqg2m[195] := 512
|
|
declare ui_label $xhutf(1, 2)
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_PICTURE,"GE_MODAL_DLG_BG")
|
|
declare ui_button $3pvid
|
|
set_control_par_str(get_ui_id($3pvid),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($3pvid),$CONTROL_PAR_PICTURE,"GE_MODAL_DLG_CLOSE")
|
|
if ($3pvid=1)
|
|
set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
declare %udfc2[2] := (get_ui_id($xhutf), get_ui_id($3pvid))
|
|
$g5k3r := 0
|
|
while ($g5k3r<num_elements(%udfc2))
|
|
%xwg5s[1310+$g5k3r] := %udfc2[$g5k3r]
|
|
%cqg2m[131] := 0
|
|
inc($g5k3r)
|
|
end while
|
|
declare $wvrnj
|
|
declare $nzpv1
|
|
load_array(!automation_strings,2)
|
|
load_array(!help_strings,2)
|
|
load_array(%_GUI_state,2)
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$g5k3r := 0
|
|
while ($g5k3r<10)
|
|
$wvrnj := %xwg5s[10*$fg4rw+$g5k3r]
|
|
if ($wvrnj>0)
|
|
$nzpv1 := 0
|
|
while ($nzpv1<19)
|
|
if (not (%x4loa[$nzpv1]=$CONTROL_PAR_AUTOMATION_ID and (%_GUI_state[190*$fg4rw+(19*$g5k3r)+$nzpv1]=0 or (%_GUI_state[190*$fg4rw+(19*$g5k3r)+$nzpv1]>=206))))
|
|
set_control_par($wvrnj,%x4loa[$nzpv1],%_GUI_state[190*$fg4rw+(19*$g5k3r)+$nzpv1])
|
|
end if
|
|
inc($nzpv1)
|
|
end while
|
|
if (%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]>0)
|
|
if (%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]<206)
|
|
set_control_par_str($wvrnj,$CONTROL_PAR_AUTOMATION_NAME,!automation_strings[%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]])
|
|
end if
|
|
set_control_par_str($wvrnj,$CONTROL_PAR_HELP,!help_strings[%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]])
|
|
if (search(%41o3s,$wvrnj) # -1)
|
|
set_control_par_str(%xwg5s[10*$fg4rw+$g5k3r+4],$CONTROL_PAR_HELP,!help_strings[%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]])
|
|
end if
|
|
end if
|
|
set_control_par($wvrnj,$CONTROL_PAR_DISABLE_TEXT_SHIFTING,1)
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<$upapg)
|
|
set_control_par_str(%n34di[$fg4rw],$CONTROL_PAR_HELP,!help_strings[211])
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<=80)
|
|
if ($fg4rw # 4 and ($fg4rw # 5))
|
|
set_menu_item_visibility(%n34di[$fg4rw],search(%bnygy,23),0)
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<128)
|
|
~bsfi3 := 0.0078125*int_to_real($fg4rw)
|
|
?xpxzm[$fg4rw] := ~bsfi3
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<128)
|
|
?xpxzm[$fg4rw+128] := 1.0+(int_to_real($fg4rw)*0.7/128.0)
|
|
inc($fg4rw)
|
|
end while
|
|
declare %c3hli[6]
|
|
declare %jkbor[24] := (-1)
|
|
%c3hli[0] := get_ui_id($1fo5x)
|
|
%c3hli[1] := get_ui_id($z1x5e)
|
|
%c3hli[2] := get_ui_id($cvjhr)
|
|
%c3hli[3] := get_ui_id($fpvgj)
|
|
%c3hli[4] := get_ui_id($zi2jx)
|
|
%c3hli[5] := get_ui_id($gxopj)
|
|
%jkbor[4] := get_ui_id($2zugt)
|
|
%jkbor[5] := get_ui_id($2zugt)
|
|
%jkbor[6] := get_ui_id($yexen)
|
|
%jkbor[7] := get_ui_id($v1jgb)
|
|
set_skin_offset(670*($0ib2k-(-sh_right(5-$0ib2k,31)*($0ib2k-5))))
|
|
declare $a4np1
|
|
declare $xg4xz
|
|
declare $rs53j
|
|
declare $kzcmg
|
|
declare $eoj1p
|
|
declare $22rrq
|
|
declare $volav
|
|
declare $rlfxd
|
|
declare $0x4nk
|
|
declare $swdze
|
|
declare $35mmm
|
|
declare $z5xav
|
|
declare $gysvc
|
|
declare $knxce
|
|
declare $taxye
|
|
declare $n025a
|
|
declare $uuj1q
|
|
declare $xjzii
|
|
declare $y0aji
|
|
declare $qohq4
|
|
declare $duehg
|
|
declare $q5vtt
|
|
declare $wuhc2
|
|
declare $33eug
|
|
declare $kil43
|
|
declare $ebpbv
|
|
declare $a1lqd
|
|
declare ~ndqvl
|
|
declare $z1wbi
|
|
declare ~4pkcz
|
|
declare $vxhwf
|
|
declare ~wn00q
|
|
declare $kkmz2
|
|
declare ~frgrz
|
|
declare $hl2ji
|
|
declare $y1ewg
|
|
declare $fh05a
|
|
declare $2exws
|
|
declare $mboix
|
|
declare $ey2qd
|
|
declare $1psz5
|
|
declare $1il5i
|
|
declare $dwl3e
|
|
declare $zw1a3
|
|
declare $xqxc4
|
|
declare $xtwkb
|
|
declare $mtob1
|
|
declare $z5fg2
|
|
declare $ppjmu
|
|
declare $ysvfj
|
|
declare $t3xjk
|
|
declare $wxrdy
|
|
declare $3ivdg
|
|
declare $bpxw3
|
|
declare $mlfej
|
|
declare $tcueq
|
|
declare $0us0d
|
|
declare $wibgr
|
|
declare $vzboi
|
|
declare %fwuoz[7]
|
|
declare $3uagi
|
|
declare %tjh23[20]
|
|
declare $nz3a0
|
|
declare $ecwiv
|
|
declare $drez3
|
|
declare $hu1za
|
|
declare $412pd
|
|
declare $pi54y
|
|
declare $irlfd
|
|
declare $owq4s
|
|
declare $n0kpw
|
|
declare $da5tg
|
|
declare $lwvso
|
|
declare $3wsjr
|
|
declare $v02mu
|
|
declare $ohjfi
|
|
declare $byqm5
|
|
declare $lzf3q
|
|
declare $xwusl
|
|
declare $05pba
|
|
declare $wry2j
|
|
declare $cbdm5
|
|
declare $utjil
|
|
declare $d3vlq
|
|
declare $ear3d
|
|
declare $nkklz
|
|
declare $od12p
|
|
declare $rqqww
|
|
declare $x202u
|
|
end on
|
|
|
|
function STEPPER__reposition_x_value_indicators
|
|
~z3izd := int_to_real(get_control_par(get_ui_id(%qysah),$CONTROL_PAR_WIDTH)-6)/int_to_real($ilpk2)
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
if ($y3mgr<$ilpk2)
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($y3mgr)*~z3izd)+1)
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($y3mgr+1)*~z3izd)-get_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_X)-1-1)
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HEIGHT,1)
|
|
else
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end function
|
|
|
|
function STEPPER__update_value_indicators
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
if ($y3mgr<$ilpk2)
|
|
$dyt1q := get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_Y)+3+((%t40az[$y3mgr]-1000)*(get_control_par(get_ui_id(%qysah),$CONTROL_PAR_HEIGHT)-6-1-0)/-1000)
|
|
if (get_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_Y) # $dyt1q)
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_Y,$dyt1q)
|
|
end if
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_PICTURE_STATE,-sh_right(%qysah[$y3mgr]-%t40az[$y3mgr],31))
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end function
|
|
|
|
function update_morph_stepper
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%t40az[$y3mgr] := (%ppvim[$jiutx]-0)*(%bswku[$y3mgr]-%lfbyb[$y3mgr])/1000+%lfbyb[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
if (get_control_par(get_ui_id(%qysah),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
|
|
call STEPPER__update_value_indicators
|
|
end if
|
|
end function
|
|
|
|
function stepper__update_pos_ind
|
|
~z3izd := int_to_real(get_control_par(get_ui_id(%qysah),$CONTROL_PAR_WIDTH)-6)/int_to_real($ilpk2)
|
|
set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($zgcke mod $ilpk2)*~z3izd))
|
|
set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_Y)+3)
|
|
set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+2+real_to_int(int_to_real($zgcke mod $ilpk2+1)*~z3izd)-get_control_par(get_ui_id($t4lmn),$CONTROL_PAR_POS_X))
|
|
set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_HEIGHT)-6)
|
|
end function
|
|
|
|
function STEPPER__update_ui
|
|
select ($i3fbq)
|
|
case 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%qysah[$y3mgr] := %lfbyb[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
case 1
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%qysah[$y3mgr] := %bswku[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
end select
|
|
set_table_steps_shown(%qysah,$ilpk2)
|
|
call STEPPER__reposition_x_value_indicators
|
|
call update_morph_stepper
|
|
call stepper__update_pos_ind
|
|
end function
|
|
|
|
function STEPPER__shift_tables
|
|
$fg4rw := 1
|
|
while ($fg4rw<=($ilpk2+$hokt3))
|
|
$dyt1q := %lfbyb[$ilpk2-1]
|
|
$r0pwv := %bswku[$ilpk2-1]
|
|
$y3mgr := 0
|
|
while ($y3mgr<=($ilpk2-2))
|
|
%lfbyb[$ilpk2-1-$y3mgr] := %lfbyb[$ilpk2-2-$y3mgr]
|
|
%bswku[$ilpk2-1-$y3mgr] := %bswku[$ilpk2-2-$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
%lfbyb[0] := $dyt1q
|
|
%bswku[0] := $r0pwv
|
|
inc($fg4rw)
|
|
end while
|
|
call STEPPER__update_ui
|
|
end function
|
|
|
|
function BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
$lz0yu := 0
|
|
while ($lz0yu<%BRW__num_preset_in_search_pool_array[$zor2m])
|
|
%3owef[500*$zor2m+$lz0yu] := -1
|
|
inc($lz0yu)
|
|
end while
|
|
%k4yha[$zor2m] := 0
|
|
%kt24s[$zor2m] := -1
|
|
$lz0yu := 0
|
|
while ($lz0yu<%BRW__num_preset_in_search_pool_array[$zor2m])
|
|
$dyt1q := 1
|
|
$lpg20 := 0
|
|
while ($lpg20<2)
|
|
if (not (%iz114[4*$zor2m+(2*$lpg20)] .and. %_BRW__search_pool_array[1000*$zor2m+(2*$lz0yu)+$lpg20]=%iz114[4*$zor2m+(2*$lpg20)]) or not (%iz114[4*$zor2m+(2*$lpg20)+1] .and. .not. %_BRW__search_pool_array[1000*$zor2m+(2*$lz0yu)+$lpg20]=%iz114[4*$zor2m+(2*$lpg20)+1]))
|
|
$dyt1q := 0
|
|
$lpg20 := 2
|
|
end if
|
|
inc($lpg20)
|
|
end while
|
|
if ($dyt1q=1 and (%_BRW__user_fav_array[500*$zor2m+$lz0yu]=%31af0[$zor2m] or (%31af0[$zor2m]=0)))
|
|
%3owef[500*$zor2m+%k4yha[$zor2m]] := $lz0yu
|
|
if ($lz0yu=%jj5qi[$zor2m])
|
|
%kt24s[$zor2m] := %k4yha[$zor2m]
|
|
end if
|
|
%k4yha[$zor2m] := %k4yha[$zor2m]+1
|
|
end if
|
|
inc($lz0yu)
|
|
end while
|
|
%xeyhi[$zor2m] := 1
|
|
end function
|
|
|
|
function _ARP__update_delimiter
|
|
$5sroo := 0
|
|
while ($5sroo<num_elements(%br0tn))
|
|
if (search(%wwz2v,%br0tn[$5sroo]) # -1)
|
|
%br0tn[$5sroo] := %wwz2v[$0erls]
|
|
end if
|
|
inc($5sroo)
|
|
end while
|
|
end function
|
|
|
|
function ARP__update_notes
|
|
select ($0erls)
|
|
case 0
|
|
sort(%br0tn,0)
|
|
case 1
|
|
sort(%br0tn,1)
|
|
case 2
|
|
sort(%br0tn,0)
|
|
case 3 to 4
|
|
$5sroo := 0
|
|
while ($5sroo<=24)
|
|
if (%br0tn[$5sroo]=%wwz2v[$0erls])
|
|
$ethxj := $5sroo
|
|
while ($ethxj<24)
|
|
%br0tn[$ethxj] := %br0tn[$ethxj+1]
|
|
inc($ethxj)
|
|
end while
|
|
end if
|
|
inc($5sroo)
|
|
end while
|
|
case 5
|
|
sort(%br0tn,0)
|
|
case 6
|
|
sort(%br0tn,0)
|
|
case 7 to 9
|
|
sort(%br0tn,1)
|
|
end select
|
|
$gcbnc := search(%br0tn,%wwz2v[$0erls])
|
|
select ($0erls)
|
|
case 5
|
|
$gcbnc := $gcbnc-(-sh_right(1-$gcbnc,31)*($gcbnc-1))
|
|
case 6
|
|
$gcbnc := $gcbnc-(-sh_right(2-$gcbnc,31)*($gcbnc-2))
|
|
case 7
|
|
$gcbnc := $gcbnc-(-sh_right(1-$gcbnc,31)*($gcbnc-1))
|
|
case 8
|
|
$gcbnc := $gcbnc-(-sh_right(2-$gcbnc,31)*($gcbnc-2))
|
|
case 9
|
|
$gcbnc := $gcbnc-(-sh_right(3-$gcbnc,31)*($gcbnc-3))
|
|
end select
|
|
end function
|
|
|
|
function ARP__on_mode_changed
|
|
call _ARP__update_delimiter
|
|
$gbgom := 1
|
|
call ARP__update_notes
|
|
$h2jke := $0erls
|
|
set_control_par_str(get_ui_id($h2jke),$CONTROL_PAR_LABEL,get_menu_item_str(get_ui_id($0erls),$0erls))
|
|
end function
|
|
|
|
function update_main_snapshot_name_display
|
|
if ($cm312=1)
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"User Snapshot")
|
|
else
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,!_BRW__preset_names[1000+%jj5qi[2]])
|
|
end if
|
|
end function
|
|
|
|
function update_s_source_name_display
|
|
if ($hdmk1=364)
|
|
if (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0)
|
|
if ($x1spm=0)
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"User: " & get_sample(%NI_USER_ZONE_IDS[1],$NI_FILE_NAME))
|
|
else
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"Missing: " & get_sample(%NI_USER_ZONE_IDS[1],$NI_FILE_NAME))
|
|
end if
|
|
else
|
|
if (-sh_right(1-$4l4u3,31)=1)
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"Missing: " & @bnt5b)
|
|
else
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"No user sample present")
|
|
end if
|
|
end if
|
|
set_control_par(get_ui_id($anchr),$CONTROL_PAR_PICTURE_STATE,100)
|
|
else
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"")
|
|
set_control_par(get_ui_id($anchr),$CONTROL_PAR_PICTURE_STATE,%BRW__grp_remap[%jj5qi[1]])
|
|
end if
|
|
end function
|
|
|
|
function set_mod_knob_group_engine_par_for_gl_m_id
|
|
if (%q4mzh[$gpzoi] # -1)
|
|
$y1xwz := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)
|
|
$y1xwz := $y1xwz*(1+(sh_right(%sbnwu[$gpzoi]-$y1xwz,31) .or. sh_right($y1xwz-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($y1xwz-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$y1xwz,31))
|
|
if (%fogcg[$gpzoi]=1)
|
|
$r0pwv := search(%zjgrf,%eujmz[$gpzoi])
|
|
if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],31)=1)
|
|
if (%sxlyt[8*$r0pwv+%hpc0e[$gpzoi]]=1)
|
|
$dyt1q := abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-$y1xwz)*15/1000000
|
|
if (get_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # %ry4pp[$dyt1q])
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],%ry4pp[$dyt1q],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # (abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-(%tkyhf[$dyt1q]-1))*1000000/12))
|
|
set_engine_par(%q4mzh[$gpzoi],abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-(%tkyhf[$dyt1q]-1))*1000000/12,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
else
|
|
if (get_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $NI_SYNC_UNIT_ABS)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],$NI_SYNC_UNIT_ABS,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
else
|
|
if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
else
|
|
if (%vc4gu[$gpzoi]=100000)
|
|
if (get_engine_par(%q4mzh[$gpzoi],$51oxm+100,%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,$51oxm+100,%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
else
|
|
if (%vc4gu[$gpzoi]=100001)
|
|
if (%jeswc[$gpzoi]=231)
|
|
set_engine_par($MOD_TARGET_INVERT_SOURCE,1+sh_right(0-(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),31),$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
set_engine_par(%q4mzh[$gpzoi],abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
else
|
|
if (get_engine_par(%q4mzh[$gpzoi],$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
else
|
|
if (%5zak5[$gpzoi]=1)
|
|
if (%q4mzh[$gpzoi]=$ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$y1xwz := $y1xwz/1000
|
|
$r0pwv := real_to_int(450000.0*((pow(0.997,int_to_real(1000-$y1xwz))-1.0)/(pow(0.997,int_to_real(1000))-1.0)))
|
|
if (get_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $r0pwv)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,$r0pwv,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
$r0pwv := real_to_int(450000.0*((pow(0.997,int_to_real($y1xwz))-1.0)/(pow(0.997,int_to_real(1000))-1.0)))
|
|
if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $r0pwv)
|
|
set_engine_par(%q4mzh[$gpzoi],$r0pwv,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
else
|
|
if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
else
|
|
if (%jeswc[$gpzoi]=1003 or (%jeswc[$gpzoi]=1009) or (%jeswc[$gpzoi]=1000) or (%jeswc[$gpzoi]=1006))
|
|
if (%jeswc[$gpzoi]=1000 or (%jeswc[$gpzoi]=1006))
|
|
if (get_engine_par($ENGINE_PAR_SEND_EFFECT_BYPASS,-1,0,0)=1)
|
|
set_engine_par(%q4mzh[$gpzoi],0,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
else
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
if (%jeswc[$gpzoi]=1003 or (%jeswc[$gpzoi]=1009))
|
|
if (get_engine_par($ENGINE_PAR_SEND_EFFECT_BYPASS,-1,1,0)=1)
|
|
set_engine_par(%q4mzh[$gpzoi],0,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
else
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
else
|
|
if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
|
|
set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function FX__set_SMPL_filter_parameters
|
|
$dyt1q := search(%mdgl1,$2qtv2)
|
|
%q4mzh[31] := %edmyi[%wl2qc[$dyt1q]]
|
|
$y1xwz := $ufbsw+($3s02f*%ppvim[$3rcax]/1000)
|
|
$y1xwz := $y1xwz*(1+(sh_right(1000000-$y1xwz,31) .or. sh_right($y1xwz-0,31)))-0-(1000000*sh_right(1000000-$y1xwz,31))
|
|
set_engine_par(%q4mzh[31],$y1xwz,$hdmk1,0,-1)
|
|
$gpzoi := 34
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
|
|
set_control_par(get_ui_id($spuzv),$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[31])+106)
|
|
set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_TEXT,"")
|
|
if (%oie55[$dyt1q]>1)
|
|
%q4mzh[32] := %edmyi[%wl2qc[$dyt1q]+1]
|
|
set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
|
|
set_control_par(get_ui_id($g5hlh),$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[32])+106)
|
|
set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_TEXT,"")
|
|
$y1xwz := $maq5o+($410y5*%ppvim[$5qrmj]/1000)
|
|
$y1xwz := $y1xwz*(1+(sh_right(1000000-$y1xwz,31) .or. sh_right($y1xwz-0,31)))-0-(1000000*sh_right(1000000-$y1xwz,31))
|
|
set_engine_par(%q4mzh[32],$y1xwz,$hdmk1,0,-1)
|
|
else
|
|
%q4mzh[32] := -1
|
|
end if
|
|
if (%oie55[$dyt1q]>2)
|
|
%q4mzh[33] := %edmyi[%wl2qc[$dyt1q]+2]
|
|
set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
|
|
set_control_par(get_ui_id($w0i5l),$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[33])+106)
|
|
set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_TEXT,"")
|
|
$y1xwz := $lqoqt+($begpw*%ppvim[$f0ljx]/1000)
|
|
$y1xwz := $y1xwz*(1+(sh_right(1000000-$y1xwz,31) .or. sh_right($y1xwz-0,31)))-0-(1000000*sh_right(1000000-$y1xwz,31))
|
|
set_engine_par(%q4mzh[33],$y1xwz,$hdmk1,0,-1)
|
|
else
|
|
%q4mzh[33] := -1
|
|
end if
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS,($lk05f+1) mod 2,$hdmk1,0,-1)
|
|
end function
|
|
|
|
function FX__set_SMPL_filter_type
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
call FX__set_SMPL_filter_parameters
|
|
end function
|
|
|
|
function FX__update_smpl_filter_ui
|
|
if ($0ib2k=2)
|
|
$dyt1q := search(%mdgl1,$2qtv2)
|
|
$g5k3r := 0
|
|
while (%xwg5s[320+$g5k3r]>0 and ($g5k3r<10))
|
|
if (-sh_right(1-%oie55[$dyt1q],31)=0)
|
|
set_control_par(%xwg5s[320+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[320+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[6080+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[330+$g5k3r]>0 and ($g5k3r<10))
|
|
if (-sh_right(2-%oie55[$dyt1q],31)=0)
|
|
set_control_par(%xwg5s[330+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[330+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[6270+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
end function
|
|
|
|
function set_norm_knob_group_engine_par_for_gl_nk_ep_id
|
|
if (%qpgwq[$4djds]=100000)
|
|
set_engine_par(%i5z0e[$4djds],get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE),$51oxm+100,%bjbtn[$4djds],%c40o1[$4djds])
|
|
else
|
|
if (%qpgwq[$4djds]=100001)
|
|
set_engine_par(%i5z0e[$4djds],get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE),$hdmk1,%bjbtn[$4djds],%c40o1[$4djds])
|
|
else
|
|
set_engine_par(%i5z0e[$4djds],get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE),%qpgwq[$4djds],%bjbtn[$4djds],%c40o1[$4djds])
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function set_all_engine_par_norm_knobs
|
|
$4djds := 0
|
|
while ($4djds<26)
|
|
call set_norm_knob_group_engine_par_for_gl_nk_ep_id
|
|
inc($4djds)
|
|
end while
|
|
end function
|
|
|
|
function ARP__update_seq_tables
|
|
set_table_steps_shown(%pyeoz,$k5z4u)
|
|
set_table_steps_shown(%0lu1d,$k5z4u)
|
|
$dyt1q := (get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_WIDTH)-6)/$k5z4u
|
|
$tp4oa := $tp4oa-(-sh_right($k5z4u-1-$tp4oa,31)*($tp4oa-($k5z4u-1)))
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_POS_X)+3+($tp4oa*$dyt1q))
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_POS_Y)+3)
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_WIDTH,$dyt1q-1)
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_HEIGHT)-6)
|
|
end function
|
|
|
|
function ARP__update_table_display
|
|
set_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_HIDE,-sh_right(abs($ivqya-1)-1,31)*$HIDE_WHOLE_CONTROL+((.not. -sh_right(abs($ivqya-1)-1,31) .and. 1)*$HIDE_PART_BG))
|
|
set_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_HIDE,-sh_right(abs($ivqya-0)-1,31)*$HIDE_WHOLE_CONTROL+((.not. -sh_right(abs($ivqya-0)-1,31) .and. 1)*$HIDE_PART_BG))
|
|
call ARP__update_seq_tables
|
|
end function
|
|
|
|
function ARP__update_filter_src_menus
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$dyt1q := %n34di[%xkzmj[$jdgl1]]
|
|
if ($ruhe4=1 and ($mcp2m=1))
|
|
set_menu_item_str($dyt1q,search(%bnygy,10),"VEL Arp Velocity")
|
|
else
|
|
set_menu_item_str($dyt1q,search(%bnygy,10),"VEL Mono Velocity")
|
|
end if
|
|
inc($jdgl1)
|
|
end while
|
|
end function
|
|
|
|
function ARP__update_ui
|
|
call ARP__update_table_display
|
|
call ARP__update_filter_src_menus
|
|
end function
|
|
|
|
function ARP__update_step_dur_display
|
|
set_control_par_str(get_ui_id($gpcbc),$CONTROL_PAR_TEXT,!qniir[(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))])
|
|
end function
|
|
|
|
function update_s_wf_start_indic_label_position
|
|
if (get_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
|
|
$dyt1q := %std_smp_l_grp[$hdmk1]*(get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH)-4)/(get_sample_length($a5fyp)/1000)
|
|
if ($0ib2k=2)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+2)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT)-3)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_WIDTH,$dyt1q)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
if (get_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end if
|
|
$r0pwv := $dgu14+($5l3um*%ppvim[$f4o1c]/1000)
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+2+(($r0pwv*(1+(sh_right(10000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(10000*sh_right(10000-$r0pwv,31)))*$dyt1q/10000))
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+2)
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_WIDTH,5)
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT)-5)
|
|
end if
|
|
end function
|
|
|
|
function update_s_root_key_user_visibility
|
|
if ($0ib2k=2 and ($hdmk1=364) and (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0) and ($x1spm=0))
|
|
set_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
set_control_par(get_ui_id($ozbon),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE))
|
|
set_control_par(get_ui_id($uceyz),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE))
|
|
end function
|
|
|
|
function update_s_xy_for_user_sample
|
|
if ($0ib2k=2 or ($0ib2k=0))
|
|
if ((get_sample_length(%NI_USER_ZONE_IDS[1])=0 or ($x1spm=1)) and ($hdmk1=364))
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & ($0ib2k/2+($0ib2k/2*$mcp2m)) & ($x1spm*3))
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
$yhwrb := 1
|
|
else
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
end if
|
|
end if
|
|
call update_s_root_key_user_visibility
|
|
end function
|
|
|
|
function update_ARP_and_S_WF_area
|
|
if ($0ib2k=2)
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$y0aji := 0
|
|
while ($y0aji<=31)
|
|
if (sh_right(2048,$y0aji) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$y0aji) .and. 1=1))
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($mcp2m=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
inc($y0aji)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
$q5vtt := 116+(611*$mcp2m)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X,$q5vtt-2)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y,130)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH,970-($q5vtt-2))
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT,132)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_X,$q5vtt)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_Y,130)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_WIDTH,970-$q5vtt)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_HEIGHT,132)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_X,$q5vtt)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_Y,130)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_WIDTH,968-$q5vtt)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HEIGHT,132)
|
|
set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_PICTURE,"GE_START_POINT_IND_SMPL_0")
|
|
if ($mcp2m=1)
|
|
call ARP__update_ui
|
|
call ARP__update_step_dur_display
|
|
end if
|
|
call update_s_wf_start_indic_label_position
|
|
call update_s_xy_for_user_sample
|
|
end if
|
|
end function
|
|
|
|
function on_selected_std_group_changed
|
|
$cm312 := 1
|
|
call update_main_snapshot_name_display
|
|
call update_s_xy_for_user_sample
|
|
call update_s_source_name_display
|
|
call FX__set_SMPL_filter_type
|
|
call FX__update_smpl_filter_ui
|
|
call set_all_engine_par_norm_knobs
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
|
|
if ($ruhe4=0 or ($mcp2m=0))
|
|
$mcp2m := (%is_mono_src[$hdmk1]+1) mod 2
|
|
call update_ARP_and_S_WF_area
|
|
end if
|
|
$dyo2q := (%is_mono_src[$hdmk1]+1) mod 2
|
|
end function
|
|
|
|
function update_g_source_name_display
|
|
if ($51oxm=263)
|
|
if (get_sample_length(%NI_USER_ZONE_IDS[0]) # 0)
|
|
if ($lxku3=0)
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"User: " & get_sample(%NI_USER_ZONE_IDS[0],$NI_FILE_NAME))
|
|
else
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"Missing: " & get_sample(%NI_USER_ZONE_IDS[0],$NI_FILE_NAME))
|
|
end if
|
|
else
|
|
if (-sh_right(1-$4l4u3,31)=1)
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"Missing: " & @vzouq)
|
|
else
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"No user sample present")
|
|
end if
|
|
end if
|
|
set_control_par(get_ui_id($uekic),$CONTROL_PAR_PICTURE_STATE,%BRW__grp_remap[%jj5qi[0]+100]-100)
|
|
else
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"")
|
|
set_control_par(get_ui_id($uekic),$CONTROL_PAR_PICTURE_STATE,%BRW__grp_remap[%jj5qi[0]+100]-100)
|
|
end if
|
|
end function
|
|
|
|
function update_preset_name_displays
|
|
%jj5qi[0] := search(%BRW__grp_remap,$51oxm+100)-100
|
|
%jj5qi[1] := search(%BRW__grp_remap,$hdmk1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<=1)
|
|
if (%xeyhi[$fg4rw]=0)
|
|
%kt24s[$fg4rw] := %jj5qi[$fg4rw]
|
|
else
|
|
%kt24s[$fg4rw] := -1
|
|
$lz0yu := 0
|
|
while ($lz0yu<%k4yha[$fg4rw])
|
|
if (%3owef[500*$fg4rw+$lz0yu]=%jj5qi[$fg4rw])
|
|
%kt24s[$fg4rw] := $lz0yu
|
|
$lz0yu := %k4yha[$fg4rw]
|
|
end if
|
|
inc($lz0yu)
|
|
end while
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
call update_main_snapshot_name_display
|
|
call update_g_source_name_display
|
|
call update_s_source_name_display
|
|
end function
|
|
|
|
function create_consolidated_poly_mod_path
|
|
$ysvfj := 0
|
|
$t3xjk := -1
|
|
$wxrdy := 0
|
|
$3ivdg := -1
|
|
$bpxw3 := 0
|
|
$mlfej := -1
|
|
$tcueq := 0
|
|
$0us0d := -1
|
|
$wibgr := 0
|
|
$vzboi := -1
|
|
$mtob1 := 0
|
|
while ($mtob1<$upapg)
|
|
if (%hxpuh[$mtob1]=1 and (sh_right(search(%c3hli,%n34di[$mtob1]),31)+1=0))
|
|
$dyt1q := %3hbq2[$mtob1]-1
|
|
while (%vzkyc[%q4rwz[20*$mtob1+$dyt1q]] # 1 and ($dyt1q>0))
|
|
dec($dyt1q)
|
|
end while
|
|
select (%q4rwz[20*$mtob1+$dyt1q])
|
|
case 10
|
|
if (%3hbq2[$mtob1]>$ysvfj)
|
|
$ysvfj := %3hbq2[$mtob1]
|
|
$t3xjk := $mtob1
|
|
end if
|
|
case 12
|
|
if (%3hbq2[$mtob1]>$wxrdy)
|
|
$wxrdy := %3hbq2[$mtob1]
|
|
$3ivdg := $mtob1
|
|
end if
|
|
case 13
|
|
if (%3hbq2[$mtob1]>$bpxw3)
|
|
$bpxw3 := %3hbq2[$mtob1]
|
|
$mlfej := $mtob1
|
|
end if
|
|
case 9
|
|
if (%3hbq2[$mtob1]>$tcueq)
|
|
$tcueq := %3hbq2[$mtob1]
|
|
$0us0d := $mtob1
|
|
end if
|
|
case 21
|
|
if (%3hbq2[$mtob1]>$wibgr)
|
|
$wibgr := %3hbq2[$mtob1]
|
|
$vzboi := $mtob1
|
|
end if
|
|
end select
|
|
end if
|
|
inc($mtob1)
|
|
end while
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%zeecp))
|
|
%zeecp[$kyxij] := -1
|
|
inc($kyxij)
|
|
end while
|
|
$ppjmu := 0
|
|
if ($3ivdg # -1)
|
|
$z5fg2 := %3hbq2[$3ivdg]-1
|
|
while ($z5fg2>=0)
|
|
$dyt1q := search(%zeecp,%q4rwz[20*$3ivdg+$z5fg2])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$3ivdg+$z5fg2])=-1))
|
|
%zeecp[$ppjmu] := %q4rwz[20*$3ivdg+$z5fg2]
|
|
inc($ppjmu)
|
|
end if
|
|
dec($z5fg2)
|
|
end while
|
|
end if
|
|
if ($t3xjk # -1)
|
|
$z5fg2 := %3hbq2[$t3xjk]-1
|
|
while ($z5fg2>=0)
|
|
$dyt1q := search(%zeecp,%q4rwz[20*$t3xjk+$z5fg2])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$t3xjk+$z5fg2])=-1))
|
|
%zeecp[$ppjmu] := %q4rwz[20*$t3xjk+$z5fg2]
|
|
inc($ppjmu)
|
|
end if
|
|
dec($z5fg2)
|
|
end while
|
|
end if
|
|
if ($mlfej # -1)
|
|
$z5fg2 := %3hbq2[$mlfej]-1
|
|
while ($z5fg2>=0)
|
|
$dyt1q := search(%zeecp,%q4rwz[20*$mlfej+$z5fg2])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$mlfej+$z5fg2])=-1))
|
|
%zeecp[$ppjmu] := %q4rwz[20*$mlfej+$z5fg2]
|
|
inc($ppjmu)
|
|
end if
|
|
dec($z5fg2)
|
|
end while
|
|
end if
|
|
if ($0us0d # -1)
|
|
$z5fg2 := %3hbq2[$0us0d]-1
|
|
while ($z5fg2>=0)
|
|
$dyt1q := search(%zeecp,%q4rwz[20*$0us0d+$z5fg2])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$0us0d+$z5fg2])=-1))
|
|
%zeecp[$ppjmu] := %q4rwz[20*$0us0d+$z5fg2]
|
|
inc($ppjmu)
|
|
end if
|
|
dec($z5fg2)
|
|
end while
|
|
end if
|
|
if ($vzboi # -1)
|
|
$z5fg2 := %3hbq2[$vzboi]-1
|
|
while ($z5fg2>=0)
|
|
$dyt1q := search(%zeecp,%q4rwz[20*$vzboi+$z5fg2])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$vzboi+$z5fg2])=-1))
|
|
%zeecp[$ppjmu] := %q4rwz[20*$vzboi+$z5fg2]
|
|
inc($ppjmu)
|
|
end if
|
|
dec($z5fg2)
|
|
end while
|
|
end if
|
|
$mtob1 := 0
|
|
while ($mtob1<$upapg)
|
|
if (%hxpuh[$mtob1]=1)
|
|
$z5fg2 := %3hbq2[$mtob1]-1
|
|
while ($z5fg2>=0)
|
|
$dyt1q := search(%zeecp,%q4rwz[20*$mtob1+$z5fg2])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$mtob1+$z5fg2])=-1))
|
|
%zeecp[$ppjmu] := %q4rwz[20*$mtob1+$z5fg2]
|
|
inc($ppjmu)
|
|
end if
|
|
dec($z5fg2)
|
|
end while
|
|
end if
|
|
inc($mtob1)
|
|
end while
|
|
end function
|
|
|
|
function create_full_mod_path
|
|
$zw1a3 := 0
|
|
while ($zw1a3<20)
|
|
%tyrok[$zw1a3] := %zeecp[$zw1a3]
|
|
inc($zw1a3)
|
|
end while
|
|
$xtwkb := search(%tyrok,-1)
|
|
$zw1a3 := 0
|
|
while ($zw1a3<$upapg)
|
|
$xqxc4 := %3hbq2[$zw1a3]-1
|
|
while ($xqxc4>=0)
|
|
$dyt1q := search(%tyrok,%q4rwz[20*$zw1a3+$xqxc4])
|
|
if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$zw1a3+$xqxc4])=-1))
|
|
%tyrok[$xtwkb] := %q4rwz[20*$zw1a3+$xqxc4]
|
|
inc($xtwkb)
|
|
end if
|
|
dec($xqxc4)
|
|
end while
|
|
inc($zw1a3)
|
|
end while
|
|
$zw1a3 := 0
|
|
while ($zw1a3<20)
|
|
%dpoyh[$zw1a3] := %tyrok[$zw1a3]
|
|
inc($zw1a3)
|
|
end while
|
|
$zw1a3 := 0
|
|
while ($zw1a3<7)
|
|
if (search(%tyrok,%45suw[$zw1a3])=-1)
|
|
%dpoyh[$xtwkb] := %45suw[$zw1a3]
|
|
inc($xtwkb)
|
|
end if
|
|
inc($zw1a3)
|
|
end while
|
|
end function
|
|
|
|
function evaluate_mod_connections
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%hivzv))
|
|
%hivzv[$kyxij] := -1
|
|
inc($kyxij)
|
|
end while
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%hxpuh))
|
|
%hxpuh[$kyxij] := -1
|
|
inc($kyxij)
|
|
end while
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%q4rwz))
|
|
%q4rwz[$kyxij] := -1
|
|
inc($kyxij)
|
|
end while
|
|
$fg4rw := 0
|
|
while (%n34di[$fg4rw] # -1 and ($fg4rw<num_elements(%n34di)))
|
|
$nz3a0 := 0
|
|
$drez3 := 0
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%tjh23))
|
|
%tjh23[$kyxij] := -1
|
|
inc($kyxij)
|
|
end while
|
|
%fwuoz[0] := $1fo5x
|
|
%fwuoz[1] := $z1x5e
|
|
%fwuoz[2] := $cvjhr
|
|
%fwuoz[3] := $fpvgj
|
|
%fwuoz[4] := $1fo5x
|
|
%fwuoz[5] := $vas4o
|
|
%fwuoz[6] := $y3s33
|
|
$3uagi := search(%n34di,%n34di[$fg4rw])
|
|
%tjh23[$nz3a0] := get_menu_item_value(%n34di[$fg4rw],get_control_par(%n34di[$fg4rw],$CONTROL_PAR_VALUE))
|
|
inc($nz3a0)
|
|
$dyt1q := search(%45suw,get_menu_item_value(%n34di[$fg4rw],get_control_par(%n34di[$fg4rw],$CONTROL_PAR_VALUE)))
|
|
while ($dyt1q>-1 and ($drez3=0))
|
|
if (search(%tjh23,%fwuoz[$dyt1q])=-1)
|
|
%tjh23[$nz3a0] := %fwuoz[$dyt1q]
|
|
inc($nz3a0)
|
|
select ($dyt1q)
|
|
case 0
|
|
if (%q4rwz[0]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
case 1
|
|
if (%q4rwz[40]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
case 4
|
|
if (%q4rwz[0]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
if (%q4rwz[60]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[60+$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[60+$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
if (%q4rwz[40]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
end select
|
|
$dyt1q := search(%45suw,%fwuoz[$dyt1q])
|
|
else
|
|
$dyt1q := -1
|
|
end if
|
|
end while
|
|
%tjh23[$nz3a0] := -1
|
|
if ($drez3=0)
|
|
%hivzv[$3uagi] := 0
|
|
%hxpuh[$3uagi] := 0
|
|
$ecwiv := 0
|
|
while ($ecwiv<$nz3a0)
|
|
if (search(%oktyv,%tjh23[$ecwiv]) # -1)
|
|
%hivzv[$3uagi] := 1
|
|
$ecwiv := $nz3a0
|
|
end if
|
|
inc($ecwiv)
|
|
end while
|
|
$ecwiv := 0
|
|
while ($ecwiv<$nz3a0)
|
|
if (search(%s0rie,%tjh23[$ecwiv]) # -1)
|
|
%hxpuh[$3uagi] := 1
|
|
$ecwiv := $nz3a0
|
|
end if
|
|
inc($ecwiv)
|
|
end while
|
|
else
|
|
%hivzv[$3uagi] := -2
|
|
end if
|
|
$ecwiv := 0
|
|
while ($ecwiv<=$nz3a0)
|
|
%q4rwz[20*$3uagi+$ecwiv] := %tjh23[$ecwiv]
|
|
inc($ecwiv)
|
|
end while
|
|
%3hbq2[$3uagi] := $nz3a0
|
|
if (%c1qym[$fg4rw] # -1)
|
|
%z15qu[$fg4rw] := get_control_par(%c1qym[$fg4rw],$CONTROL_PAR_VALUE)
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
$y3mgr := search(%hivzv,-2)
|
|
while ($y3mgr # -1)
|
|
$nz3a0 := 0
|
|
$drez3 := 0
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%tjh23))
|
|
%tjh23[$kyxij] := -1
|
|
inc($kyxij)
|
|
end while
|
|
%fwuoz[0] := $1fo5x
|
|
%fwuoz[1] := $z1x5e
|
|
%fwuoz[2] := $cvjhr
|
|
%fwuoz[3] := $fpvgj
|
|
%fwuoz[4] := $1fo5x
|
|
%fwuoz[5] := $vas4o
|
|
%fwuoz[6] := $y3s33
|
|
$3uagi := search(%n34di,%n34di[$y3mgr])
|
|
%tjh23[$nz3a0] := get_menu_item_value(%n34di[$y3mgr],get_control_par(%n34di[$y3mgr],$CONTROL_PAR_VALUE))
|
|
inc($nz3a0)
|
|
$dyt1q := search(%45suw,get_menu_item_value(%n34di[$y3mgr],get_control_par(%n34di[$y3mgr],$CONTROL_PAR_VALUE)))
|
|
while ($dyt1q>-1 and ($drez3=0))
|
|
if (search(%tjh23,%fwuoz[$dyt1q])=-1)
|
|
%tjh23[$nz3a0] := %fwuoz[$dyt1q]
|
|
inc($nz3a0)
|
|
select ($dyt1q)
|
|
case 0
|
|
if (%q4rwz[0]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
case 1
|
|
if (%q4rwz[40]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
case 4
|
|
if (%q4rwz[0]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
if (%q4rwz[60]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[60+$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[60+$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
if (%q4rwz[40]=-1)
|
|
$drez3 := 1
|
|
else
|
|
$ecwiv := 0
|
|
while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
|
|
%tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
|
|
inc($nz3a0)
|
|
inc($ecwiv)
|
|
end while
|
|
end if
|
|
end select
|
|
$dyt1q := search(%45suw,%fwuoz[$dyt1q])
|
|
else
|
|
$dyt1q := -1
|
|
end if
|
|
end while
|
|
%tjh23[$nz3a0] := -1
|
|
if ($drez3=0)
|
|
%hivzv[$3uagi] := 0
|
|
%hxpuh[$3uagi] := 0
|
|
$ecwiv := 0
|
|
while ($ecwiv<$nz3a0)
|
|
if (search(%oktyv,%tjh23[$ecwiv]) # -1)
|
|
%hivzv[$3uagi] := 1
|
|
$ecwiv := $nz3a0
|
|
end if
|
|
inc($ecwiv)
|
|
end while
|
|
$ecwiv := 0
|
|
while ($ecwiv<$nz3a0)
|
|
if (search(%s0rie,%tjh23[$ecwiv]) # -1)
|
|
%hxpuh[$3uagi] := 1
|
|
$ecwiv := $nz3a0
|
|
end if
|
|
inc($ecwiv)
|
|
end while
|
|
else
|
|
%hivzv[$3uagi] := -2
|
|
end if
|
|
$ecwiv := 0
|
|
while ($ecwiv<=$nz3a0)
|
|
%q4rwz[20*$3uagi+$ecwiv] := %tjh23[$ecwiv]
|
|
inc($ecwiv)
|
|
end while
|
|
%3hbq2[$3uagi] := $nz3a0
|
|
$y3mgr := search(%hivzv,-2)
|
|
end while
|
|
call create_consolidated_poly_mod_path
|
|
call create_full_mod_path
|
|
end function
|
|
|
|
function calc_g_area_vars
|
|
$kexsv := %smp_l_grp[$51oxm]
|
|
$rs53j := $kexsv-5
|
|
$wo1eq := ($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv*(1+(sh_right($rs53j*1000-(($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv),31) .or. sh_right(($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv-0,31)))-0-($rs53j*1000*sh_right($rs53j*1000-(($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv),31))
|
|
if ($k21jk=1)
|
|
$uiy0n := $wo1eq+(($r0khx+($yl1h5*%ppvim[$yqtdo]/1000))*$kexsv)
|
|
else
|
|
$uiy0n := ($r0khx+($yl1h5*%ppvim[$yqtdo]/1000))*$kexsv
|
|
end if
|
|
$uiy0n := $uiy0n*(1+(sh_right($kexsv*1000-$uiy0n,31) .or. sh_right($uiy0n-($wo1eq+5000),31)))-(($wo1eq+5000)*sh_right($uiy0n-($wo1eq+5000),31))-($kexsv*1000*sh_right($kexsv*1000-$uiy0n,31))
|
|
$i11wt := ($uiy0n-$wo1eq)/1000
|
|
end function
|
|
|
|
function update_g_pos_hit_anker_lenth_text
|
|
if (get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_WIDTH)>53)
|
|
set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_TEXT,!je2na[$pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))])
|
|
else
|
|
set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_TEXT,"")
|
|
end if
|
|
end function
|
|
|
|
function update_g_pos_hit_anker_ui
|
|
if ($0ib2k=1)
|
|
if ($linka=1 and not ($51oxm=263 and (get_sample_length(%NI_USER_ZONE_IDS[0])=0)) and ($zylsx # 1) and ($lxku3 # 1))
|
|
set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_X)+real_to_int(round(int_to_real(get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_WIDTH)-1)*~tptmd))-(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2))
|
|
set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
$dyt1q := get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH)+get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X)+((get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-(get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH)+get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X)))*(($liaof+($5wlib*%ppvim[$eu2xe]/1000))*(1+(sh_right(1000-($liaof+($5wlib*%ppvim[$eu2xe]/1000)),31) .or. sh_right($liaof+($5wlib*%ppvim[$eu2xe]/1000)-1,31)))-sh_right($liaof+($5wlib*%ppvim[$eu2xe]/1000)-1,31)-(1000*sh_right(1000-($liaof+($5wlib*%ppvim[$eu2xe]/1000)),31)))/1000)
|
|
if ($dyt1q<get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X))
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_X,$dyt1q)
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)-get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2))
|
|
else
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2))
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_WIDTH,$dyt1q-(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2)))
|
|
end if
|
|
call update_g_pos_hit_anker_lenth_text
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
if (get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function update_g_rng_max_area
|
|
if (get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
|
|
$dyt1q := get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2+((get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)*($uiy0n/1000)/$pilpf)
|
|
if (get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X) # $dyt1q)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X,$dyt1q)
|
|
end if
|
|
$dyt1q := get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-(get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
|
|
if (get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH) # $dyt1q)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH,$dyt1q)
|
|
end if
|
|
call update_g_pos_hit_anker_ui
|
|
end if
|
|
end function
|
|
|
|
function update_g_rng_min_area
|
|
$dyt1q := (get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)*($wo1eq/1000)/$pilpf
|
|
if (get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH) # $dyt1q and (get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH,$dyt1q)
|
|
end if
|
|
call update_g_rng_max_area
|
|
end function
|
|
|
|
function update_all_WF_for_default_key
|
|
$r5war := %zone_id_C3[100+$51oxm]
|
|
if ($r5war>-1)
|
|
attach_zone($4lo3h,$r5war,0)
|
|
$pilpf := get_sample_length($r5war)/1000
|
|
end if
|
|
$ukkxs := -1
|
|
$r5war := -1
|
|
call calc_g_area_vars
|
|
call update_g_rng_min_area
|
|
$lrye0 := -1
|
|
$a5fyp := %zone_id_C3[$hdmk1]
|
|
if ($a5fyp>0)
|
|
attach_zone($tmcuy,$a5fyp,0)
|
|
end if
|
|
call update_s_wf_start_indic_label_position
|
|
end function
|
|
|
|
function update_wf_range_label_position
|
|
set_control_par_str(get_ui_id($hnp3t),$CONTROL_PAR_PICTURE,"GE_WF_COV_LEFT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2)
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
|
|
set_control_par_str(get_ui_id($q3vtp),$CONTROL_PAR_PICTURE,"GE_WF_COV_RIGHT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
|
|
end function
|
|
|
|
function position_g_wf_range_indicators
|
|
call update_wf_range_label_position
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y))
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT))
|
|
if ($0ib2k=1 and ($lxku3 # 1))
|
|
set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_Y)+2)
|
|
set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HEIGHT)-4)
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HEIGHT)-get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HEIGHT)-2)
|
|
call update_g_pos_hit_anker_ui
|
|
else
|
|
set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end function
|
|
|
|
function position_XY_center_big
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_X,361)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_Y,161)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_WIDTH,249)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_HEIGHT,249)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_CURSOR_PICTURE,"GE_XY_Cursor_1" & -sh_right(abs($0ib2k-0)-1,31))
|
|
end function
|
|
|
|
function update_macro_knob_style
|
|
$fg4rw := 0
|
|
while ($fg4rw<=3)
|
|
set_control_par_str(%xwg5s[10*(46+$fg4rw)],$CONTROL_PAR_PICTURE,"MacroKnob_" & (1+sh_right(abs($0ib2k-0)-1,31)))
|
|
set_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-0)-1,31)*6800+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*6789))
|
|
set_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-0)-1,31)*%aydym[15]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*6800))
|
|
inc($fg4rw)
|
|
end while
|
|
end function
|
|
|
|
function update_g_root_key_user_visibility
|
|
if ($0ib2k=1 and ($51oxm=263) and (get_sample_length(%NI_USER_ZONE_IDS[0]) # 0) and ($lxku3=0))
|
|
set_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
set_control_par(get_ui_id($wzxlg),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE))
|
|
set_control_par(get_ui_id($r5bjx),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE))
|
|
end function
|
|
|
|
function update_g_xy_for_user_sample
|
|
if ($0ib2k=1 or ($0ib2k=0))
|
|
if ((get_sample_length(%NI_USER_ZONE_IDS[0])=0 or ($lxku3=1)) and ($51oxm=263))
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
call update_g_pos_hit_anker_ui
|
|
set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & $0ib2k & ($lxku3*3))
|
|
$yhwrb := 1
|
|
else
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
call calc_g_area_vars
|
|
call update_g_rng_min_area
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
end if
|
|
end if
|
|
call update_g_root_key_user_visibility
|
|
end function
|
|
|
|
function show_perform_view
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$duehg := 0
|
|
$qohq4 := 0
|
|
while ($qohq4<=31)
|
|
if (sh_right(1536,$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
|
|
$duehg := 1
|
|
$qohq4 := 32
|
|
end if
|
|
inc($qohq4)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($duehg=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WAVE_COLOR,11186870)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_COLOR,11186870)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_CURSOR_COLOR,11186870)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X,18)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y,258)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH,296)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT,84)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_X,18)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_Y,258)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_WIDTH,296)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_HEIGHT,84)
|
|
call position_g_wf_range_indicators
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X,655)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y,258)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH,296)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT,84)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_X,655)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_Y,258)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_WIDTH,296)
|
|
set_control_par(get_ui_id($fi22y),$CONTROL_PAR_HEIGHT,84)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_X,655)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_Y,258)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_WIDTH,296)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HEIGHT,84)
|
|
set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_PICTURE,"GE_START_POINT_IND_SMPL_1")
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($brjbw),$CONTROL_PAR_WIDTH)-10)
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+10)
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
|
|
call update_s_wf_start_indic_label_position
|
|
call position_XY_center_big
|
|
call update_macro_knob_style
|
|
call update_s_xy_for_user_sample
|
|
call update_g_xy_for_user_sample
|
|
end function
|
|
|
|
function position_XY_mod_sec_small
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_X,441)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_Y,470)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_WIDTH,89)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_HEIGHT,89)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"GE_XY_Backing")
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_CURSOR_PICTURE,"GE_XY_Cursor_0")
|
|
end function
|
|
|
|
function update_g_rng_max_label
|
|
if ($k21jk=1)
|
|
!isqic[25] := "Length"
|
|
set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_PICTURE,"MK_Mask_8")
|
|
set_control_par(get_ui_id($jmb0x),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_TEXT,!isqic[25])
|
|
else
|
|
!isqic[25] := "End"
|
|
set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_PICTURE,"MK_Mask_Max")
|
|
set_control_par(get_ui_id($jmb0x),$CONTROL_PAR_HIDE,(1+sh_right(abs(get_control_par(get_ui_id($r0khx),$CONTROL_PAR_HIDE)-$HIDE_WHOLE_CONTROL)-1,31))*$HIDE_PART_NOTHING+((.not. (1+sh_right(abs(get_control_par(get_ui_id($r0khx),$CONTROL_PAR_HIDE)-$HIDE_WHOLE_CONTROL)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
|
|
end if
|
|
set_control_par_str(get_ui_id($r0khx),$CONTROL_PAR_AUTOMATION_NAME,!isqic[25])
|
|
end function
|
|
|
|
function update_g_formant_shift_control
|
|
if ($0ib2k=1 and (%g_frm_shft[$51oxm]=1))
|
|
set_control_par(get_ui_id($swg5e),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(get_ui_id($swg5e),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end function
|
|
|
|
function show_grain_view
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$duehg := 0
|
|
$qohq4 := 0
|
|
while ($qohq4<=31)
|
|
if (sh_right(2 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
|
|
$duehg := 1
|
|
$qohq4 := 32
|
|
end if
|
|
inc($qohq4)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($duehg=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WAVE_COLOR,2044730)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X,0)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y,130)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH,970)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT,132)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_X,0)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_Y,130)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_WIDTH,970)
|
|
set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_HEIGHT,132)
|
|
call position_g_wf_range_indicators
|
|
call update_g_xy_for_user_sample
|
|
call position_XY_mod_sec_small
|
|
call update_g_rng_max_label
|
|
call update_g_formant_shift_control
|
|
end function
|
|
|
|
function show_samples_view
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$duehg := 0
|
|
$qohq4 := 0
|
|
while ($qohq4<=31)
|
|
if (sh_right(4 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
|
|
$duehg := 1
|
|
$qohq4 := 32
|
|
end if
|
|
inc($qohq4)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($duehg=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_COLOR,2044730)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_CURSOR_COLOR,2108218)
|
|
call update_ARP_and_S_WF_area
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($brjbw),$CONTROL_PAR_WIDTH)-10)
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+10)
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
|
|
call FX__update_smpl_filter_ui
|
|
call position_XY_mod_sec_small
|
|
end function
|
|
|
|
function FX_UI__select_active_fx_cat_btn
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
set_control_par(%u2u11[10*%dah4f[$qlteh]+$fg4rw],$CONTROL_PAR_VALUE,0)
|
|
inc($fg4rw)
|
|
end while
|
|
set_control_par(%u2u11[10*%dah4f[$qlteh]+%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))],$CONTROL_PAR_VALUE,1)
|
|
end function
|
|
|
|
function _FX_UI__update_ui_controls_for_global_set_id
|
|
$v02mu := $qlteh
|
|
$ohjfi := 0
|
|
while ($ohjfi<%wvg1x[$v02mu])
|
|
if (%wvg1x[$v02mu]>1)
|
|
set_control_par(%ejazl[4*$v02mu+$ohjfi],$CONTROL_PAR_VALUE,-sh_right(abs($ohjfi-%h152r[$v02mu])-1,31))
|
|
set_control_par_str(%ejazl[4*$v02mu+$ohjfi],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & %pqcgh[8*%mpjcc[$v02mu]+$ohjfi] & %45vq1[8*%mpjcc[$v02mu]+$ohjfi])
|
|
end if
|
|
$byqm5 := 0
|
|
while ($byqm5<3)
|
|
if (%h152r[$v02mu]=$ohjfi and (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0) and ($byqm5<((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31))*%xdshj[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31)*%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))]))) and (%45vq1[8*%mpjcc[$v02mu]+%h152r[$v02mu]] # 6) and ((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]+$byqm5]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-56))]+($byqm5-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-57-1))]-1-$byqm5,31)*($byqm5-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-57-1))]-1))))]) # -1))
|
|
$dyt1q := 1
|
|
else
|
|
$dyt1q := 0
|
|
end if
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($dyt1q=0)
|
|
set_control_par(%xwg5s[10*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($byqm5)
|
|
end while
|
|
inc($ohjfi)
|
|
end while
|
|
if ($v02mu # 3 and ($v02mu # 4))
|
|
if (%mpjcc[$v02mu]=$3qz3a)
|
|
if (%45vq1[8*%mpjcc[$v02mu]+%h152r[$v02mu]]=6 and (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0))
|
|
$dyt1q := 1
|
|
$mboix := %fxqnu[$v02mu]-get_control_par(%xwg5s[270],$CONTROL_PAR_POS_X)
|
|
$2exws := 0
|
|
while ($2exws<10)
|
|
if (%xwg5s[270+$2exws]>0)
|
|
set_control_par(%xwg5s[270+$2exws],$CONTROL_PAR_POS_X,get_control_par(%xwg5s[270+$2exws],$CONTROL_PAR_POS_X)+$mboix)
|
|
end if
|
|
inc($2exws)
|
|
end while
|
|
call STEPPER__reposition_x_value_indicators
|
|
else
|
|
$dyt1q := 0
|
|
end if
|
|
$g5k3r := 0
|
|
while (%xwg5s[270+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($dyt1q=0)
|
|
set_control_par(%xwg5s[270+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[270+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[5130+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
if ($y3mgr<$ilpk2 and ($dyt1q=1))
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
if ($dyt1q=1)
|
|
call STEPPER__update_value_indicators
|
|
end if
|
|
end if
|
|
if (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0 and (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])=$EFFECT_TYPE_FILTER) and (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])=$FILTER_TYPE_EQ3BAND))
|
|
if ($v02mu=0)
|
|
%bjbtn[14] := %h152r[$v02mu]
|
|
%c40o1[14] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[15] := %h152r[$v02mu]
|
|
%c40o1[15] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[16] := %h152r[$v02mu]
|
|
%c40o1[16] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[17] := %h152r[$v02mu]
|
|
%c40o1[17] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[18] := %h152r[$v02mu]
|
|
%c40o1[18] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[19] := %h152r[$v02mu]
|
|
%c40o1[19] := %zjgrf[%mpjcc[$v02mu]]
|
|
end if
|
|
if ($v02mu=1 or ($v02mu=2))
|
|
%bjbtn[20] := %h152r[$v02mu]
|
|
%c40o1[20] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[21] := %h152r[$v02mu]
|
|
%c40o1[21] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[22] := %h152r[$v02mu]
|
|
%c40o1[22] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[23] := %h152r[$v02mu]
|
|
%c40o1[23] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[24] := %h152r[$v02mu]
|
|
%c40o1[24] := %zjgrf[%mpjcc[$v02mu]]
|
|
%bjbtn[25] := %h152r[$v02mu]
|
|
%c40o1[25] := %zjgrf[%mpjcc[$v02mu]]
|
|
end if
|
|
$dyt1q := 1
|
|
else
|
|
$dyt1q := 0
|
|
end if
|
|
$ohjfi := 0
|
|
while ($ohjfi<6)
|
|
if ($dyt1q=1)
|
|
if ($v02mu=0)
|
|
set_control_par(%xwg5s[10*%ubhst[$ohjfi]],$CONTROL_PAR_VALUE,get_engine_par(%r5fsk[$ohjfi],-1,%bjbtn[14],%c40o1[14]))
|
|
if ($ohjfi<3)
|
|
set_control_par_str(%xwg5s[10*%ubhst[$ohjfi]+1],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
|
|
set_control_par(%xwg5s[10*%ubhst[$ohjfi]+1],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%r5fsk[$ohjfi])+106)
|
|
end if
|
|
end if
|
|
if ($v02mu=1 or ($v02mu=2))
|
|
set_control_par(%xwg5s[10*%koku3[$ohjfi]],$CONTROL_PAR_VALUE,get_engine_par(%r5fsk[$ohjfi],-1,%bjbtn[20],%c40o1[20]))
|
|
if ($ohjfi<3)
|
|
set_control_par_str(%xwg5s[10*%koku3[$ohjfi]+1],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
|
|
set_control_par(%xwg5s[10*%koku3[$ohjfi]+1],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%r5fsk[$ohjfi])+106)
|
|
end if
|
|
end if
|
|
end if
|
|
if (%zjgrf[%mpjcc[$v02mu]]=%c40o1[14] and ($v02mu=0))
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*%ubhst[$ohjfi]+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($dyt1q=0)
|
|
set_control_par(%xwg5s[10*%ubhst[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*%ubhst[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*%ubhst[$ohjfi]+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
if (%zjgrf[%mpjcc[$v02mu]]=%c40o1[20] and ($v02mu=1 or ($v02mu=2)))
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*%koku3[$ohjfi]+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($dyt1q=0)
|
|
set_control_par(%xwg5s[10*%koku3[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*%koku3[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*%koku3[$ohjfi]+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
inc($ohjfi)
|
|
end while
|
|
if ($v02mu=0)
|
|
$g5k3r := 0
|
|
while (%xwg5s[220+$g5k3r]>0 and ($g5k3r<10))
|
|
if (-sh_right(0-(-sh_right(abs(%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))-8)-1,31)+get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)),31)=0)
|
|
set_control_par(%xwg5s[220+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[220+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[4180+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
call FX_UI__select_active_fx_cat_btn
|
|
else
|
|
$g5k3r := 0
|
|
while (%xwg5s[230+$g5k3r]>0 and ($g5k3r<10))
|
|
if (-sh_right(0-(-sh_right(abs(%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))-8)-1,31)+get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)),31)=0)
|
|
set_control_par(%xwg5s[230+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[230+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[4370+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
call FX_UI__select_active_fx_cat_btn
|
|
end if
|
|
end if
|
|
if (%5l45p[$v02mu]=$0ib2k or ($v02mu=3 or ($v02mu=4 and ($mdykc=0))))
|
|
$dyt1q := $HIDE_PART_NOTHING
|
|
else
|
|
$dyt1q := $HIDE_WHOLE_CONTROL
|
|
end if
|
|
$ohjfi := 0
|
|
while ($ohjfi<10)
|
|
set_control_par(%pfy4f[20*$v02mu+$ohjfi],$CONTROL_PAR_HIDE,$dyt1q)
|
|
inc($ohjfi)
|
|
end while
|
|
$ohjfi := 0
|
|
while ($ohjfi<4)
|
|
set_control_par(%pfy4f[20*$v02mu+10+$ohjfi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($ohjfi)
|
|
end while
|
|
set_control_par(%pfy4f[20*$v02mu+10+%h152r[$v02mu]],$CONTROL_PAR_HIDE,$dyt1q)
|
|
set_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_VALUE,%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])])
|
|
if (get_menu_item_value(%pfy4f[20*$v02mu+1],get_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_VALUE))=$EFFECT_TYPE_IRC)
|
|
set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_VALUE,%3zszw[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
|
|
else
|
|
set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+9],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+8],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
if (get_menu_item_value(%pfy4f[20*$v02mu+1],get_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_VALUE))=$EFFECT_TYPE_FILTER)
|
|
set_control_par(%pfy4f[20*$v02mu+3],$CONTROL_PAR_VALUE,search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$v02mu],%h152r[$v02mu],%zjgrf[$v02mu]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$v02mu],%h152r[$v02mu],%zjgrf[$v02mu]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$v02mu],%h152r[$v02mu],%zjgrf[$v02mu])))))
|
|
end if
|
|
set_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+3],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
if ($v02mu<3)
|
|
$ohjfi := 0
|
|
while ($ohjfi<4)
|
|
set_control_par(%b4wh2[4*$v02mu+$ohjfi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($ohjfi)
|
|
end while
|
|
if (search(%pxmow,get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])) # -1 and (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0))
|
|
set_control_par(%b4wh2[4*$v02mu+%h152r[$v02mu]],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(%25l4m[8+1+sh_right(abs($v02mu-0)-1,31)],$CONTROL_PAR_PICTURE_STATE,-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_LIMITER)-1,31)+-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_TRANSLIM)-1,31))
|
|
end if
|
|
set_control_par(%25l4m[8+1+sh_right(abs($v02mu-0)-1,31)],$CONTROL_PAR_HIDE,get_control_par(%b4wh2[4*$v02mu+%h152r[$v02mu]],$CONTROL_PAR_HIDE))
|
|
end if
|
|
if (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))=8 or (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=1))
|
|
set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+9],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+8],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+7],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
if (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))=8)
|
|
set_control_par(%pfy4f[20*$v02mu+2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+5],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+6],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+10+%h152r[$v02mu]],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
else
|
|
set_control_par(%pfy4f[20*$v02mu+2],$CONTROL_PAR_VALUE,%l2lis[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
|
|
$3wsjr := 0
|
|
while ($3wsjr<25)
|
|
if ($3wsjr<%FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))])
|
|
set_menu_item_str(%pfy4f[20*$v02mu+2],$3wsjr,!_preset_names[25*(%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31))))+$3wsjr])
|
|
set_menu_item_visibility(%pfy4f[20*$v02mu+2],$3wsjr,1)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[20*$v02mu+2],$3wsjr,0)
|
|
end if
|
|
inc($3wsjr)
|
|
end while
|
|
end if
|
|
$4ii0j := 0
|
|
while ($4ii0j<38)
|
|
$4kfp4 := get_menu_item_value(%pfy4f[20*$v02mu+1],$4ii0j)
|
|
if (%lwrqe[%mpjcc[$v02mu]]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31))) # %45vq1[8*%mpjcc[$v02mu]+%h152r[$v02mu]]))
|
|
set_menu_item_visibility(%pfy4f[20*$v02mu+1],$4ii0j,0)
|
|
else
|
|
set_menu_item_visibility(%pfy4f[20*$v02mu+1],$4ii0j,1)
|
|
end if
|
|
inc($4ii0j)
|
|
end while
|
|
if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]],31)=1)
|
|
set_control_par(%pfy4f[20*$v02mu+7],$CONTROL_PAR_VALUE,%sxlyt[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
|
|
else
|
|
set_control_par(%pfy4f[20*$v02mu+7],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
set_control_par(%pfy4f[20*$v02mu+10+%h152r[$v02mu]],$CONTROL_PAR_VALUE,%pqcgh[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
|
|
set_control_par(%pfy4f[64],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%pfy4f[84],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end function
|
|
|
|
function _update_mod_knob_range_indicator_for_gl_m_id
|
|
if (%c1qym[$gpzoi] # -1)
|
|
if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)>=0)
|
|
set_control_par_str(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE,"MK_RngP" & !4gjzd[$gpzoi])
|
|
set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_PICTURE,"MK_KnbP" & !4gjzd[$gpzoi])
|
|
$tkfsc := (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)-%dwdw3[$gpzoi]+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))*101/%qxmpr[$gpzoi]
|
|
if ($tkfsc>100)
|
|
$tkfsc := 100
|
|
end if
|
|
if ($tmkul=0)
|
|
set_control_par(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE_STATE,$tkfsc)
|
|
end if
|
|
else
|
|
set_control_par_str(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE,"MK_RngN" & !4gjzd[$gpzoi])
|
|
set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_PICTURE,"MK_KnbN" & !4gjzd[$gpzoi])
|
|
if ($tmkul=0)
|
|
set_control_par(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE_STATE,(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)-%dwdw3[$gpzoi]+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))*101/%qxmpr[$gpzoi])
|
|
end if
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function update_all_mod_knob_range_indicator
|
|
$gpzoi := 0
|
|
while (%n34di[$gpzoi] # -1)
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
inc($gpzoi)
|
|
end while
|
|
end function
|
|
|
|
function _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
$tkfsc := (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)-%dwdw3[$gpzoi]+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000))*101/%qxmpr[$gpzoi]
|
|
if (get_control_par(%lm23w[$gpzoi],$CONTROL_PAR_PICTURE_STATE) # $tkfsc)
|
|
set_control_par(%lm23w[$gpzoi],$CONTROL_PAR_PICTURE_STATE,$tkfsc-(-sh_right(100-$tkfsc,31)*($tkfsc-100)))
|
|
end if
|
|
end function
|
|
|
|
function _update_mod_knob_rt_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
select ($gpzoi)
|
|
case 15
|
|
call update_g_pos_hit_anker_ui
|
|
case 24
|
|
call calc_g_area_vars
|
|
call update_g_rng_min_area
|
|
case 25
|
|
call calc_g_area_vars
|
|
call update_g_rng_max_area
|
|
case 13
|
|
call calc_g_area_vars
|
|
call update_g_rng_max_area
|
|
case 30
|
|
call update_s_wf_start_indic_label_position
|
|
case 9
|
|
call ARP__update_step_dur_display
|
|
end select
|
|
end function
|
|
|
|
function update_all_mod_knob_rt_indicator_mono
|
|
$jdgl1 := 0
|
|
while ($jdgl1<48)
|
|
$gpzoi := %xdonk[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end function
|
|
|
|
function show_layer_fx_view
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$duehg := 0
|
|
$qohq4 := 0
|
|
while ($qohq4<=31)
|
|
if (sh_right(1 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
|
|
$duehg := 1
|
|
$qohq4 := 32
|
|
end if
|
|
inc($qohq4)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($duehg=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
$qlteh := 0
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
$qlteh := 1
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
call position_XY_center_big
|
|
end function
|
|
|
|
function show_master_fx_view
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$duehg := 0
|
|
$qohq4 := 0
|
|
while ($qohq4<=31)
|
|
if (sh_right(8 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
|
|
$duehg := 1
|
|
$qohq4 := 32
|
|
end if
|
|
inc($qohq4)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($duehg=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
$qlteh := 2
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
call position_XY_center_big
|
|
end function
|
|
|
|
function BRW__update_search_result_selection
|
|
$lz0yu := 0
|
|
while ($lz0yu<19)
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_VALUE,-sh_right(abs(%3owef[500*$zor2m+$fykja+$lz0yu]-%jj5qi[$zor2m])-1,31))
|
|
inc($lz0yu)
|
|
end while
|
|
end function
|
|
|
|
function BRW__update_scrollbar_handle
|
|
set_control_par(get_ui_id($y0dw3),$CONTROL_PAR_HEIGHT,(%k4yha[$zor2m]*(1+sh_right(%k4yha[$zor2m]-19,31))-(19*sh_right(%k4yha[$zor2m]-19,31))-19)*(30-(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4))/(%BRW__num_preset_in_search_pool_array[$zor2m]-19)+(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4))
|
|
set_control_par(get_ui_id($y0dw3),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_POS_Y)+($z2tnd-1000)*(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4-get_control_par(get_ui_id($y0dw3),$CONTROL_PAR_HEIGHT)-2)/-1000+2)
|
|
$dyt1q := (get_control_par(get_ui_id($y0dw3),$CONTROL_PAR_HEIGHT)-30)*-4650/(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4-30)+-2350
|
|
set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_MOUSE_BEHAVIOUR,$dyt1q+(-sh_right($dyt1q--5000,31)*(-5000-$dyt1q)))
|
|
end function
|
|
|
|
function BRW__deselect_obsolet_cat_btn
|
|
$lz0yu := 0
|
|
while ($lz0yu<4)
|
|
$n025a := $zor2m*4+$lz0yu
|
|
$rc1ud := 0
|
|
while ($rc1ud<%ey2zb[$n025a])
|
|
$taxye := %0mw41[%t1pnk[$n025a]+$rc1ud]
|
|
$xjzii := 0
|
|
$uuj1q := 0
|
|
while ($uuj1q<%k4yha[$zor2m])
|
|
if (sh_right(%_BRW__search_pool_array[1000*$zor2m+(2*%3owef[500*$zor2m+$uuj1q])+($taxye/32)],$taxye) .and. 1=1)
|
|
$xjzii := 1
|
|
$uuj1q := %k4yha[$zor2m]
|
|
end if
|
|
inc($uuj1q)
|
|
end while
|
|
if ($xjzii=1)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[3])
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[12])
|
|
else
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[5])
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[5])
|
|
end if
|
|
inc($rc1ud)
|
|
end while
|
|
inc($lz0yu)
|
|
end while
|
|
end function
|
|
|
|
function BRW__update_search_result_list_ui
|
|
if (%k4yha[$zor2m]>19)
|
|
$fykja := ($z2tnd-1000)*(%k4yha[$zor2m]-19-0)/-1000
|
|
set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
$fykja := 0
|
|
$z2tnd := 1000
|
|
set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
$rc1ud := 0
|
|
while ($rc1ud<19)
|
|
if (%3owef[500*$zor2m+$rc1ud]>=0)
|
|
set_control_par_str(%wqnrl[$rc1ud],$CONTROL_PAR_TEXT,!_BRW__preset_names[500*$zor2m+%3owef[500*$zor2m+$fykja+$rc1ud]])
|
|
set_control_par(%4gyqw[$rc1ud],$CONTROL_PAR_VALUE,%_BRW__user_fav_array[500*$zor2m+%3owef[500*$zor2m+$fykja+$rc1ud]])
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(%4gyqw[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%4gyqw[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[3])
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[12])
|
|
inc($rc1ud)
|
|
end while
|
|
set_control_par_str(get_ui_id($les2u),$CONTROL_PAR_PICTURE,"GE_Next_btn_1" & (1+sh_right(abs(%k4yha[$zor2m]-%BRW__num_preset_in_search_pool_array[$zor2m])-1,31)))
|
|
set_control_par_str(get_ui_id($wwkuw),$CONTROL_PAR_PICTURE,"GE_Prev_btn_1" & (1+sh_right(abs(%k4yha[$zor2m]-%BRW__num_preset_in_search_pool_array[$zor2m])-1,31)))
|
|
$dyt1q := 0
|
|
$lpg20 := 0
|
|
while ($lpg20<2)
|
|
$dyt1q := $dyt1q+%iz114[4*$zor2m+(2*$lpg20)]+%iz114[4*$zor2m+(2*$lpg20)+1]
|
|
inc($lpg20)
|
|
end while
|
|
$bbjq4 := 1+sh_right(abs($dyt1q-0)-1,31)
|
|
call BRW__update_search_result_selection
|
|
call BRW__update_scrollbar_handle
|
|
call BRW__deselect_obsolet_cat_btn
|
|
end function
|
|
|
|
function BRW__update_preset_name_display
|
|
set_control_par_str(get_ui_id($z3l5q),$CONTROL_PAR_TEXT,!_BRW__preset_names[500*$zor2m+%jj5qi[$zor2m]])
|
|
end function
|
|
|
|
function _BRW__update_ui_for_sel_file_type
|
|
$lz0yu := 0
|
|
while ($lz0yu<4)
|
|
$rc1ud := 0
|
|
while ($rc1ud<18)
|
|
if ($rc1ud<%fgbiy[$zor2m*4+$lz0yu])
|
|
$dyt1q := %0mw41[%t1pnk[$zor2m*4+$lz0yu]+$rc1ud]
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE,sh_right(%iz114[4*$zor2m+(2*($dyt1q/32))],$dyt1q mod 32) .and. 1 .or. (sh_right(%iz114[4*$zor2m+(2*($dyt1q/32))+1],$dyt1q mod 32) .and. 1))
|
|
$r0pwv := %aydym[%blrx5[$zor2m+(%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud]*3)]]
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_ON,$r0pwv)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_HOVER,$r0pwv)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_PRESSED,$r0pwv)
|
|
set_control_par_str(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_TEXT,!udzrt[%0sc2s[$zor2m*4+$lz0yu]+$rc1ud])
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE,0)
|
|
end if
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[3])
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[12])
|
|
inc($rc1ud)
|
|
end while
|
|
inc($lz0yu)
|
|
end while
|
|
$rc1ud := 0
|
|
while ($rc1ud<19)
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_ON,%aydym[%blrx5[$zor2m]])
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_HOVER,%aydym[%blrx5[$zor2m]])
|
|
set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_PRESSED,%aydym[%blrx5[$zor2m]])
|
|
set_control_par_str(%4gyqw[$rc1ud],$CONTROL_PAR_TEXT,"")
|
|
inc($rc1ud)
|
|
end while
|
|
set_control_par(get_ui_id($z3l5q),$CONTROL_PAR_FONT_TYPE,%aydym[%pjbav[$zor2m]])
|
|
$d5tn2 := %31af0[$zor2m]
|
|
call BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
if (%kt24s[$zor2m] # -1)
|
|
if ($uciwo=1)
|
|
$z2tnd := ((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000)*(1+(sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31) .or. sh_right((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000-0,31)))-0-(1000*sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31))
|
|
end if
|
|
$uciwo := 1
|
|
else
|
|
$z2tnd := 1000
|
|
end if
|
|
call BRW__update_search_result_list_ui
|
|
call BRW__update_preset_name_display
|
|
end function
|
|
|
|
function position_XY_browser_small
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_X,40)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_Y,450)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_WIDTH,89)
|
|
set_control_par(get_ui_id(?xy),$CONTROL_PAR_HEIGHT,89)
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"GE_XY_Backing")
|
|
set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_CURSOR_PICTURE,"GE_XY_Cursor_0")
|
|
end function
|
|
|
|
function SHAPER__update_ui
|
|
$fg4rw := 0
|
|
while ($fg4rw<5)
|
|
set_control_par(%tw2nn[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL*$oov5z)
|
|
set_control_par(%4osbd[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL*(($oov5z+1) mod 2))
|
|
inc($fg4rw)
|
|
end while
|
|
if ($oov5z=0)
|
|
set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
else
|
|
set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
end if
|
|
end function
|
|
|
|
function MOD__position_mod_menu_for_gl_m_id
|
|
if (%nwlgb[$gpzoi] # -1 and ($gpzoi # 27))
|
|
$dyt1q := %n34di[$gpzoi]
|
|
if ($gpzoi=26)
|
|
set_control_par($dyt1q,$CONTROL_PAR_POS_X,get_control_par(%nwlgb[26],$CONTROL_PAR_POS_X)+(%plcoy[get_menu_item_value($dyt1q,get_control_par($dyt1q,$CONTROL_PAR_VALUE))]*2)+1)
|
|
set_control_par($dyt1q,$CONTROL_PAR_WIDTH,get_control_par(%nwlgb[26],$CONTROL_PAR_POS_X)-get_control_par($dyt1q,$CONTROL_PAR_POS_X)-2)
|
|
else
|
|
set_control_par($dyt1q,$CONTROL_PAR_POS_X,get_control_par(%nwlgb[$gpzoi],$CONTROL_PAR_POS_X)+(get_control_par(%nwlgb[$gpzoi],$CONTROL_PAR_WIDTH)/2)+%plcoy[get_menu_item_value($dyt1q,get_control_par($dyt1q,$CONTROL_PAR_VALUE))])
|
|
set_control_par($dyt1q,$CONTROL_PAR_WIDTH,-%plcoy[get_menu_item_value($dyt1q,get_control_par($dyt1q,$CONTROL_PAR_VALUE))]*2-3)
|
|
if (%nwlgb[$gpzoi]=get_ui_id($3tqoo) or (%nwlgb[$gpzoi]=get_ui_id($1tszb)))
|
|
set_control_par($dyt1q,$CONTROL_PAR_POS_X,get_control_par($dyt1q,$CONTROL_PAR_POS_X)+1)
|
|
end if
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function MTX__update_ui
|
|
%nwlgb[1] := $3k3u2*get_ui_id($gehcz)+((.not. $3k3u2 .and. 1)*get_ui_id($3tqoo))
|
|
$gpzoi := 1
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_1")
|
|
set_control_par(get_ui_id($him5m),$CONTROL_PAR_PICTURE_STATE,3)
|
|
if ($3k3u2=0)
|
|
if (get_control_par(get_ui_id($3k3u2),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
|
|
$g5k3r := 0
|
|
while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[400+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[7600+(19*$g5k3r)+5])
|
|
inc($g5k3r)
|
|
end while
|
|
set_control_par(get_ui_id($gehcz),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($0qzrr),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
set_control_par(get_ui_id($zi2jx),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($1fo5x),$CONTROL_PAR_POS_Y)+12)
|
|
set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_POS_Y)+31)
|
|
set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($him5m),$CONTROL_PAR_WIDTH)/2))
|
|
else
|
|
set_control_par(get_ui_id($zi2jx),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($1fo5x),$CONTROL_PAR_POS_Y))
|
|
if (get_control_par(get_ui_id($3k3u2),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
|
|
$g5k3r := 0
|
|
while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[400+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($g5k3r)
|
|
end while
|
|
set_control_par(get_ui_id($him5m),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($zi2jx),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($gehcz),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($0qzrr),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
end if
|
|
set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($gehcz),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id($gehcz),$CONTROL_PAR_HEIGHT)+5)
|
|
$dyt1q := get_control_par(get_ui_id($gehcz),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($gehcz),$CONTROL_PAR_WIDTH)/2)+((get_control_par(get_ui_id($0qzrr),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($0qzrr),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($gehcz),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($gehcz),$CONTROL_PAR_WIDTH)/2)))/2)
|
|
set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_X,$dyt1q-(get_control_par(get_ui_id($him5m),$CONTROL_PAR_WIDTH)/2))
|
|
end if
|
|
%nwlgb[3] := $13ap0*get_ui_id($ihtwl)+((.not. $13ap0 .and. 1)*get_ui_id($1tszb))
|
|
$gpzoi := 3
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_1")
|
|
set_control_par(get_ui_id($twgeq),$CONTROL_PAR_PICTURE_STATE,3)
|
|
if ($13ap0=0)
|
|
if (get_control_par(get_ui_id($13ap0),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
|
|
$g5k3r := 0
|
|
while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[410+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[7790+(19*$g5k3r)+5])
|
|
inc($g5k3r)
|
|
end while
|
|
set_control_par(get_ui_id($ihtwl),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($pzeed),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
set_control_par(get_ui_id($gxopj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($z1x5e),$CONTROL_PAR_POS_Y)+12)
|
|
set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($1tszb),$CONTROL_PAR_POS_Y)+31)
|
|
set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($1tszb),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($1tszb),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($twgeq),$CONTROL_PAR_WIDTH)/2))
|
|
else
|
|
set_control_par(get_ui_id($gxopj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($z1x5e),$CONTROL_PAR_POS_Y))
|
|
if (get_control_par(get_ui_id($13ap0),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
|
|
$g5k3r := 0
|
|
while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[410+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($g5k3r)
|
|
end while
|
|
set_control_par(get_ui_id($twgeq),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($gxopj),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($ihtwl),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($pzeed),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
end if
|
|
set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_HEIGHT)+5)
|
|
$dyt1q := get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_WIDTH)/2)+((get_control_par(get_ui_id($pzeed),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($pzeed),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_WIDTH)/2)))/2)
|
|
set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_X,$dyt1q-(get_control_par(get_ui_id($twgeq),$CONTROL_PAR_WIDTH)/2))
|
|
end if
|
|
end function
|
|
|
|
function LFO__update_ui
|
|
set_control_par(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE_STATE,$doz2m)
|
|
set_control_par(get_ui_id($i5fky),$CONTROL_PAR_PICTURE_STATE,$1wrdd)
|
|
end function
|
|
|
|
function BOTTOM_TABS__update_ui
|
|
select ($mdykc)
|
|
case 0
|
|
$qlteh := 3
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
$qlteh := 4
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
case 1
|
|
call update_macro_knob_style
|
|
case 2
|
|
if ($0ib2k=1 or ($0ib2k=2))
|
|
$dyt1q := 0
|
|
else
|
|
$dyt1q := 1
|
|
end if
|
|
$g5k3r := 0
|
|
while (%xwg5s[600+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($dyt1q=0)
|
|
set_control_par(%xwg5s[600+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[600+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[11400+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
call SHAPER__update_ui
|
|
call MTX__update_ui
|
|
call LFO__update_ui
|
|
end select
|
|
$dyt1q := 0
|
|
if (($0ib2k=3 or ($0ib2k=4)) and ($mdykc # 2))
|
|
$dyt1q := 1
|
|
end if
|
|
$g5k3r := 0
|
|
while (%xwg5s[1400+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($dyt1q=0)
|
|
set_control_par(%xwg5s[1400+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[1400+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[26600+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
if ($mdykc=2)
|
|
set_control_par(get_ui_id($fpo2t),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($fpo2t),$CONTROL_PAR_PICTURE_STATE,-sh_right(2-$0ib2k,31))
|
|
else
|
|
set_control_par(get_ui_id($fpo2t),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
if ($0ib2k=1 or ($0ib2k=2))
|
|
$g5k3r := 0
|
|
while (%xwg5s[540+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[540+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[10260+(19*$g5k3r)+5])
|
|
inc($g5k3r)
|
|
end while
|
|
set_control_par(get_ui_id($fgho2),$CONTROL_PAR_PICTURE_STATE,$mdykc)
|
|
else
|
|
set_control_par(get_ui_id($fgho2),$CONTROL_PAR_PICTURE_STATE,$mdykc+3+-sh_right(abs($mdykc-2)-1,31))
|
|
end if
|
|
end function
|
|
|
|
function update_all_mod_knob_rt_indicator_poly
|
|
$jdgl1 := 0
|
|
while ($jdgl1<2)
|
|
$gpzoi := %ulgib[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<19)
|
|
$gpzoi := %bsd31[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end function
|
|
|
|
function NAV_PAGE__update_main_nav
|
|
$fg4rw := 0
|
|
while ($fg4rw<5)
|
|
set_control_par(%0eutz[$fg4rw],$CONTROL_PAR_VALUE,-sh_right(abs($fg4rw-$0ib2k)-1,31))
|
|
inc($fg4rw)
|
|
end while
|
|
set_skin_offset(670*$0ib2k)
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($y3mgr)
|
|
end while
|
|
select ($0ib2k)
|
|
case 0
|
|
call show_perform_view
|
|
case 1
|
|
call show_grain_view
|
|
case 2
|
|
call show_samples_view
|
|
case 3
|
|
call show_layer_fx_view
|
|
case 4
|
|
call show_master_fx_view
|
|
case 5 to 7
|
|
$zor2m := $0ib2k-5
|
|
call _BRW__update_ui_for_sel_file_type
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$duehg := 0
|
|
$qohq4 := 0
|
|
while ($qohq4<=31)
|
|
if (sh_right(32,$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
|
|
$duehg := 1
|
|
$qohq4 := 32
|
|
end if
|
|
inc($qohq4)
|
|
end while
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
if ($duehg=0)
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
else
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
call position_XY_browser_small
|
|
end select
|
|
if (in_range($0ib2k,1,4))
|
|
call BOTTOM_TABS__update_ui
|
|
end if
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
call update_all_mod_knob_rt_indicator_poly
|
|
if (in_range($0ib2k,0,3))
|
|
set_control_par(get_ui_id($wawce),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4])
|
|
set_control_par(get_ui_id($wawce),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4])
|
|
set_control_par(get_ui_id($wawce),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+1])
|
|
set_control_par(get_ui_id($wawce),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+1])
|
|
set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4])
|
|
set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4])
|
|
set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+1])
|
|
set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+1])
|
|
set_control_par(get_ui_id($l45sn),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4+2])
|
|
set_control_par(get_ui_id($l45sn),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4+2])
|
|
set_control_par(get_ui_id($l45sn),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+3])
|
|
set_control_par(get_ui_id($l45sn),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+3])
|
|
set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4+2])
|
|
set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4+2])
|
|
set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+3])
|
|
set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+3])
|
|
set_control_par(get_ui_id($wawce),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+1])
|
|
set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+1])
|
|
set_control_par(get_ui_id($l45sn),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+3])
|
|
set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+3])
|
|
!4gjzd[26] := !g0j20[%e4ffk[$0ib2k*2]]
|
|
!4gjzd[27] := !g0j20[%e4ffk[$0ib2k*2+1]]
|
|
set_control_par_str(%c1qym[26],$CONTROL_PAR_PICTURE,"MK_Slider" & !4gjzd[26])
|
|
set_control_par_str(%c1qym[27],$CONTROL_PAR_PICTURE,"MK_Slider" & !4gjzd[27])
|
|
set_control_par_str(get_ui_id($rnwew),$CONTROL_PAR_PICTURE,"MK_ind" & !4gjzd[26])
|
|
set_control_par_str(get_ui_id($grjvf),$CONTROL_PAR_PICTURE,"MK_ind" & !4gjzd[27])
|
|
$gpzoi := 26
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 27
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$dyt1q := -sh_right(abs($0ib2k-2)-1,31) .or. -sh_right(abs($0ib2k-0)-1,31)
|
|
set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_PICTURE,"GE_GRAIN_SRC_NAMES_" & ($dyt1q+-sh_right(abs($0ib2k-0)-1,31)))
|
|
if ($0ib2k=0)
|
|
set_control_par(get_ui_id($uekic),$CONTROL_PAR_FONT_TYPE,%aydym[11])
|
|
else
|
|
set_control_par(get_ui_id($uekic),$CONTROL_PAR_FONT_TYPE,%aydym[1-$dyt1q])
|
|
end if
|
|
set_control_par_str(get_ui_id($1c3gj),$CONTROL_PAR_PICTURE,"GE_BLANK_HOVER_BTN_G_" & (-sh_right(abs($0ib2k-0)-1,31)*2+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*$dyt1q)))
|
|
set_control_par_str(get_ui_id($spdyk),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & $dyt1q)
|
|
set_control_par_str(get_ui_id($udker),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[0]-%BRW__num_preset_in_search_pool_array[0])-1,31)))
|
|
set_control_par_str(get_ui_id($2ch0u),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[0]-%BRW__num_preset_in_search_pool_array[0])-1,31)))
|
|
$dyt1q := -sh_right(abs($0ib2k-1)-1,31) .or. -sh_right(abs($0ib2k-0)-1,31)
|
|
set_control_par_str(get_ui_id($mm1ti),$CONTROL_PAR_PICTURE,"GE_BLANK_HOVER_BTN_S_" & (-sh_right(abs($0ib2k-0)-1,31)*2+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*$dyt1q)))
|
|
if ($0ib2k=0)
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_PICTURE,"GE_SMPL_SRC_NAMES_2")
|
|
set_control_par(get_ui_id($anchr),$CONTROL_PAR_FONT_TYPE,%aydym[11])
|
|
else
|
|
set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_PICTURE,"GE_SMPL_SRC_NAMES_" & $dyt1q)
|
|
set_control_par(get_ui_id($anchr),$CONTROL_PAR_FONT_TYPE,%aydym[1-$dyt1q])
|
|
end if
|
|
set_control_par_str(get_ui_id($t4vew),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & $dyt1q)
|
|
set_control_par_str(get_ui_id($3r1av),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[1]-%BRW__num_preset_in_search_pool_array[1])-1,31)))
|
|
set_control_par_str(get_ui_id($0l4xe),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[1]-%BRW__num_preset_in_search_pool_array[1])-1,31)))
|
|
if ($0ib2k=0)
|
|
set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE,6800)
|
|
set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE,6800)
|
|
set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[15])
|
|
set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[15])
|
|
set_control_par(get_ui_id($sclhm),$CONTROL_PAR_FONT_TYPE,6800)
|
|
set_control_par(get_ui_id($rzycf),$CONTROL_PAR_FONT_TYPE,6800)
|
|
else
|
|
set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-2)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-2)-1,31) .and. 1)*%aydym[1]))
|
|
set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-2)-1,31)*%aydym[11]+((.not. -sh_right(abs($0ib2k-2)-1,31) .and. 1)*%aydym[2]))
|
|
set_control_par(get_ui_id($sclhm),$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-2)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-2)-1,31) .and. 1)*%aydym[1]))
|
|
set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-1)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-1)-1,31) .and. 1)*%aydym[1]))
|
|
set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-1)-1,31)*%aydym[11]+((.not. -sh_right(abs($0ib2k-1)-1,31) .and. 1)*%aydym[2]))
|
|
set_control_par(get_ui_id($rzycf),$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-1)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-1)-1,31) .and. 1)*%aydym[1]))
|
|
end if
|
|
end if
|
|
set_control_par(get_ui_id($ojlo0),$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-0)-1,31)*%aydym[16]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*%aydym[7]))
|
|
set_control_par(get_ui_id($ojlo0),$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-0)-1,31)*%aydym[8]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*%aydym[8]))
|
|
set_control_par(get_ui_id($ojlo0),$CONTROL_PAR_FONT_TYPE_OFF_PRESSED,-sh_right(abs($0ib2k-0)-1,31)*%aydym[8]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*%aydym[8]))
|
|
set_control_par_str(get_ui_id($mb40x),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & "1" & (1+sh_right(abs(%k4yha[2]-%BRW__num_preset_in_search_pool_array[2])-1,31)))
|
|
set_control_par_str(get_ui_id($0efsn),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & "1" & (1+sh_right(abs(%k4yha[2]-%BRW__num_preset_in_search_pool_array[2])-1,31)))
|
|
set_control_par_str(get_ui_id($siaxq),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $siaxq)
|
|
set_control_par_str(get_ui_id($yazuk),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $yazuk)
|
|
if ($yhwrb=1)
|
|
$yhwrb := 0
|
|
set_menu_item_str(get_ui_id($siaxq),0,get_menu_item_str(get_ui_id($siaxq),0))
|
|
end if
|
|
end function
|
|
|
|
function MOD__store_current_mod_context
|
|
$jdgl1 := 0
|
|
while ($jdgl1<24)
|
|
%qum0u[$jdgl1] := %ppvim[$jdgl1]
|
|
inc($jdgl1)
|
|
end while
|
|
end function
|
|
|
|
function set_mod_knob_engine_par_with_permanent_modulation_for_gl_m_id
|
|
if (%hivzv[$gpzoi]=1 and (%c1qym[$gpzoi] # 0))
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end function
|
|
|
|
function update_poly_mod_event_id
|
|
if (event_status($pfgf4)=$EVENT_STATUS_NOTE_QUEUE)
|
|
$4ggtc := $pfgf4
|
|
else
|
|
if (event_status($ukkxs)=$EVENT_STATUS_NOTE_QUEUE)
|
|
$4ggtc := $ukkxs
|
|
else
|
|
if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE and ($ruhe4=0))
|
|
$4ggtc := $auli3
|
|
else
|
|
$y3mgr := 0
|
|
while (%mc3xd[$y3mgr]=0 and ($y3mgr<15))
|
|
inc($y3mgr)
|
|
end while
|
|
if ($y3mgr<15 and (event_status(%mc3xd[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE))
|
|
$4ggtc := %mc3xd[$y3mgr]
|
|
else
|
|
$y3mgr := 0
|
|
while ($y3mgr<256)
|
|
if (event_status(%5ggz3[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
|
|
$4ggtc := %5ggz3[$y3mgr]
|
|
$y3mgr := 256
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
if ($4ggtc # $bh4s5)
|
|
$wkxzh := 1
|
|
$bh4s5 := $4ggtc
|
|
else
|
|
$wkxzh := 0
|
|
end if
|
|
$bctbb := %laljf[$4ggtc mod 8192]
|
|
end function
|
|
|
|
function update_mod_knob_cont_params_for_gl_m_id
|
|
if (%hivzv[$gpzoi]=1)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end function
|
|
|
|
function SHP1__update_mod_vals
|
|
$dyt1q := %ppvim[$cvjhr]*(1+(sh_right(1000-%ppvim[$cvjhr],31) .or. sh_right(%ppvim[$cvjhr]-0,31)))-0-(1000*sh_right(1000-%ppvim[$cvjhr],31))
|
|
select ($ytzwi)
|
|
case 0
|
|
$vxhwf := ($dyt1q-1)*$gllpo/1000
|
|
$vxhwf := $vxhwf*(1+(sh_right($gllpo-1-$vxhwf,31) .or. sh_right($vxhwf-0,31)))-0-(($gllpo-1)*sh_right($gllpo-1-$vxhwf,31))
|
|
%ppvim[2] := %w0xec[$vxhwf]
|
|
if ($oj0wr=1 and (get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($vxhwf)*~zxkmy))
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_Y)+3)
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_X)+2+real_to_int(int_to_real($vxhwf+1)*~zxkmy)-get_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_X))
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HEIGHT)-6)
|
|
end if
|
|
case 1 to 2
|
|
~wn00q := 1000.0/int_to_real($gllpo-1)
|
|
$vxhwf := real_to_int(int_to_real($dyt1q)/~wn00q)
|
|
~frgrz := (int_to_real($dyt1q)-(~wn00q*int_to_real($vxhwf)))/~wn00q
|
|
if ($ytzwi=2)
|
|
~frgrz := ~frgrz*~frgrz*~frgrz*(10.0+(~frgrz*(6.0*~frgrz-15.0)))
|
|
end if
|
|
if ($vxhwf>=($gllpo-1))
|
|
%ppvim[2] := %w0xec[$vxhwf]
|
|
else
|
|
%ppvim[2] := %w0xec[$vxhwf]+real_to_int(int_to_real(%w0xec[$vxhwf+1]-%w0xec[$vxhwf])*~frgrz)
|
|
end if
|
|
if ($oj0wr=1 and (get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
$kkmz2 := %ppvim[2]*(get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HEIGHT)-6)/1000
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_X)+3+(real_to_int(int_to_real($gllpo-1)*~zxkmy)*$dyt1q/999))
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_Y)+(get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HEIGHT)-4)-$kkmz2)
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_WIDTH,real_to_int(~zxkmy))
|
|
set_control_par(get_ui_id($paonj),$CONTROL_PAR_HEIGHT,$kkmz2+1)
|
|
end if
|
|
end select
|
|
end function
|
|
|
|
function SHP2__update_mod_vals
|
|
$dyt1q := %ppvim[$fpvgj]*(1+(sh_right(1000-%ppvim[$fpvgj],31) .or. sh_right(%ppvim[$fpvgj]-0,31)))-0-(1000*sh_right(1000-%ppvim[$fpvgj],31))
|
|
select ($f3u5d)
|
|
case 0
|
|
$a1lqd := ($dyt1q-1)*$hn35i/1000
|
|
$a1lqd := $a1lqd*(1+(sh_right($hn35i-1-$a1lqd,31) .or. sh_right($a1lqd-0,31)))-0-(($hn35i-1)*sh_right($hn35i-1-$a1lqd,31))
|
|
%ppvim[3] := %rzzs4[$a1lqd]
|
|
if ($oj0wr=1 and (get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($a1lqd)*~c2vo0))
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_Y)+3)
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_X)+2+real_to_int(int_to_real($a1lqd+1)*~c2vo0)-get_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_X))
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HEIGHT)-6)
|
|
end if
|
|
case 1 to 2
|
|
~ndqvl := 1000.0/int_to_real($hn35i-1)
|
|
$a1lqd := real_to_int(int_to_real($dyt1q)/~ndqvl)
|
|
~4pkcz := (int_to_real($dyt1q)-(~ndqvl*int_to_real($a1lqd)))/~ndqvl
|
|
if ($f3u5d=2)
|
|
~4pkcz := ~4pkcz*~4pkcz*~4pkcz*(10.0+(~4pkcz*(6.0*~4pkcz-15.0)))
|
|
end if
|
|
if ($a1lqd>=($hn35i-1))
|
|
%ppvim[3] := %rzzs4[$a1lqd]
|
|
else
|
|
%ppvim[3] := %rzzs4[$a1lqd]+real_to_int(int_to_real(%rzzs4[$a1lqd+1]-%rzzs4[$a1lqd])*~4pkcz)
|
|
end if
|
|
if ($oj0wr=1 and (get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
$z1wbi := %ppvim[3]*(get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HEIGHT)-6)/1000
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_X)+3+(real_to_int(int_to_real($hn35i-1)*~c2vo0)*$dyt1q/999))
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_Y)+(get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HEIGHT)-4)-$z1wbi)
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_WIDTH,real_to_int(~c2vo0))
|
|
set_control_par(get_ui_id($qnejb),$CONTROL_PAR_HEIGHT,$z1wbi+1)
|
|
end if
|
|
end select
|
|
end function
|
|
|
|
function LFO1__update_mod_vals
|
|
$ebpbv := %laljf[$dc3zm mod 8192]
|
|
if (($e2mne=3 or ($e2mne=4)) and (?lrdg1[$ebpbv]>(0.9999+(int_to_real($rj2yq)/360.0))))
|
|
?lrdg1[$ebpbv] := 0.9999+(int_to_real($rj2yq)/360.0)
|
|
end if
|
|
select ($doz2m)
|
|
case 0
|
|
%icfc1[$ebpbv] := real_to_int(sin(?lrdg1[$ebpbv]*2.0*~NI_MATH_PI)*1000000.0*0.5+500000.0)
|
|
case 1
|
|
%icfc1[$ebpbv] := 1000000-abs(real_to_int(2.0*?lrdg1[$ebpbv]*1000000.0) mod 2000000-1000000)
|
|
case 7
|
|
%icfc1[$ebpbv] := real_to_int((1.0-(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))*1.99999)*1000000
|
|
case 2
|
|
%icfc1[$ebpbv] := real_to_int(1000000.0*(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))
|
|
case 3
|
|
%icfc1[$ebpbv] := 1000000-real_to_int(1000000.0*(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))
|
|
case 4
|
|
if (%iv2n3[$e2mne]=1 and ($ebpbv # $a2nqk))
|
|
%icfc1[$ebpbv] := %icfc1[$a2nqk]
|
|
else
|
|
if (?lrdg1[$ebpbv]>=?2bxj3[$ebpbv] or (?lrdg1[$ebpbv]<(?2bxj3[$ebpbv]-1.0)))
|
|
%icfc1[$ebpbv] := random(0,1000000)
|
|
?2bxj3[$ebpbv] := floor(?lrdg1[$ebpbv])+1.0
|
|
end if
|
|
end if
|
|
case 5
|
|
if (?lrdg1[$ebpbv]>=?2bxj3[$ebpbv] or (?lrdg1[$ebpbv]<(?2bxj3[$ebpbv]-1.0)))
|
|
?2bxj3[$ebpbv] := floor(?lrdg1[$ebpbv])+1.0
|
|
%105bp[$ebpbv] := random(0,1000000)
|
|
if (%icfc1[$ebpbv]=0)
|
|
%icfc1[$ebpbv] := random(0,1000000)
|
|
end if
|
|
end if
|
|
if (%iv2n3[$e2mne]=1 and ($ebpbv # $a2nqk))
|
|
%icfc1[$ebpbv] := %icfc1[$a2nqk]
|
|
else
|
|
%icfc1[$ebpbv] := %icfc1[$ebpbv]+real_to_int(int_to_real(%105bp[$ebpbv]-%icfc1[$ebpbv])*(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))
|
|
end if
|
|
case 6
|
|
if (?lrdg1[$ebpbv]>=?2bxj3[$ebpbv] or (?lrdg1[$ebpbv]<(?2bxj3[$ebpbv]-1.0)))
|
|
?2bxj3[$ebpbv] := floor(?lrdg1[$ebpbv])+1.0
|
|
%105bp[$ebpbv] := random(0,1000000)
|
|
if (%icfc1[$ebpbv]=0)
|
|
%icfc1[$ebpbv] := random(0,1000000)
|
|
end if
|
|
end if
|
|
if (%iv2n3[$e2mne]=1 and ($ebpbv # $a2nqk))
|
|
%icfc1[$ebpbv] := %icfc1[$a2nqk]
|
|
else
|
|
%icfc1[$ebpbv] := %icfc1[$ebpbv]+real_to_int(int_to_real(%105bp[$ebpbv]-%icfc1[$ebpbv])/375.0)
|
|
end if
|
|
end select
|
|
%ppvim[4] := %icfc1[$ebpbv]/1000
|
|
end function
|
|
|
|
function LFO2__update_mod_vals
|
|
$33eug := %laljf[$dc3zm mod 8192]
|
|
if (($eu0kx=3 or ($eu0kx=4)) and (?pu5ib[$33eug]>(0.9999+(int_to_real($s2bg4)/360.0))))
|
|
?pu5ib[$33eug] := 0.9999+(int_to_real($s2bg4)/360.0)
|
|
end if
|
|
select ($1wrdd)
|
|
case 0
|
|
%1cwa0[$33eug] := real_to_int(sin(?pu5ib[$33eug]*2.0*~NI_MATH_PI)*1000000.0*0.5+500000.0)
|
|
case 1
|
|
%1cwa0[$33eug] := 1000000-abs(real_to_int(2.0*?pu5ib[$33eug]*1000000.0) mod 2000000-1000000)
|
|
case 7
|
|
%1cwa0[$33eug] := real_to_int((1.0-(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))*1.99999)*1000000
|
|
case 2
|
|
%1cwa0[$33eug] := real_to_int(1000000.0*(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))
|
|
case 3
|
|
%1cwa0[$33eug] := 1000000-real_to_int(1000000.0*(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))
|
|
case 4
|
|
if (%iv2n3[$eu0kx]=1 and ($33eug # $xpr4r))
|
|
%1cwa0[$33eug] := %1cwa0[$xpr4r]
|
|
else
|
|
if (?pu5ib[$33eug]>=?p2rij[$33eug] or (?pu5ib[$33eug]<(?p2rij[$33eug]-1.0)))
|
|
%1cwa0[$33eug] := random(0,1000000)
|
|
?p2rij[$33eug] := floor(?pu5ib[$33eug])+1.0
|
|
end if
|
|
end if
|
|
case 5
|
|
if (?pu5ib[$33eug]>=?p2rij[$33eug] or (?pu5ib[$33eug]<(?p2rij[$33eug]-1.0)))
|
|
?p2rij[$33eug] := floor(?pu5ib[$33eug])+1.0
|
|
%igs1h[$33eug] := random(0,1000000)
|
|
if (%1cwa0[$33eug]=0)
|
|
%1cwa0[$33eug] := random(0,1000000)
|
|
end if
|
|
end if
|
|
if (%iv2n3[$eu0kx]=1 and ($33eug # $xpr4r))
|
|
%1cwa0[$33eug] := %1cwa0[$xpr4r]
|
|
else
|
|
%1cwa0[$33eug] := %1cwa0[$33eug]+real_to_int(int_to_real(%igs1h[$33eug]-%1cwa0[$33eug])*(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))
|
|
end if
|
|
case 6
|
|
if (?pu5ib[$33eug]>=?p2rij[$33eug] or (?pu5ib[$33eug]<(?p2rij[$33eug]-1.0)))
|
|
?p2rij[$33eug] := floor(?pu5ib[$33eug])+1.0
|
|
%igs1h[$33eug] := random(0,1000000)
|
|
if (%1cwa0[$33eug]=0)
|
|
%1cwa0[$33eug] := random(0,1000000)
|
|
end if
|
|
end if
|
|
if (%iv2n3[$eu0kx]=1 and ($33eug # $xpr4r))
|
|
%1cwa0[$33eug] := %1cwa0[$xpr4r]
|
|
else
|
|
%1cwa0[$33eug] := %1cwa0[$33eug]+real_to_int(int_to_real(%igs1h[$33eug]-%1cwa0[$33eug])/375.0)
|
|
end if
|
|
end select
|
|
%ppvim[5] := %1cwa0[$33eug]/1000
|
|
end function
|
|
|
|
function BUS1__update_mod_vals
|
|
if ($3k3u2=0)
|
|
if ($ttvix=1)
|
|
%ppvim[6] := (%ppvim[$1fo5x]*2-1000)*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
|
|
else
|
|
%ppvim[6] := %ppvim[$1fo5x]*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
|
|
end if
|
|
else
|
|
%ppvim[6] := %ppvim[$1fo5x]*$gehcz/1000+(%ppvim[$zi2jx]*$0qzrr/1000)
|
|
end if
|
|
if ($oj0wr=1)
|
|
$dyt1q := (%ppvim[6]--1000)*40/2000
|
|
$dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
|
|
if (get_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
|
|
set_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function BUS2__update_mod_vals
|
|
if ($13ap0=0)
|
|
if ($hj1x4=1)
|
|
%ppvim[7] := (%ppvim[$z1x5e]*2-1000)*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
|
|
else
|
|
%ppvim[7] := %ppvim[$z1x5e]*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
|
|
end if
|
|
else
|
|
%ppvim[7] := %ppvim[$z1x5e]*$ihtwl/1000+(%ppvim[$gxopj]*$pzeed/1000)
|
|
end if
|
|
if ($oj0wr=1)
|
|
$dyt1q := (%ppvim[7]--1000)*40/2000
|
|
$dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
|
|
if (get_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
|
|
set_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function SUM__update_mod_vals
|
|
%ppvim[8] := %ppvim[6]+%ppvim[7]
|
|
if ($oj0wr=1)
|
|
$dyt1q := (%ppvim[8]--2000)*40/4000
|
|
if (get_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
|
|
set_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE,$dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40)))
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function MTX__update_mod_vals
|
|
if ($3k3u2=0)
|
|
if ($ttvix=1)
|
|
%ppvim[6] := (%ppvim[$1fo5x]*2-1000)*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
|
|
else
|
|
%ppvim[6] := %ppvim[$1fo5x]*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
|
|
end if
|
|
else
|
|
%ppvim[6] := %ppvim[$1fo5x]*$gehcz/1000+(%ppvim[$zi2jx]*$0qzrr/1000)
|
|
end if
|
|
if ($oj0wr=1)
|
|
$dyt1q := (%ppvim[6]--1000)*40/2000
|
|
$dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
|
|
if (get_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
|
|
set_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
|
|
end if
|
|
end if
|
|
if ($13ap0=0)
|
|
if ($hj1x4=1)
|
|
%ppvim[7] := (%ppvim[$z1x5e]*2-1000)*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
|
|
else
|
|
%ppvim[7] := %ppvim[$z1x5e]*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
|
|
end if
|
|
else
|
|
%ppvim[7] := %ppvim[$z1x5e]*$ihtwl/1000+(%ppvim[$gxopj]*$pzeed/1000)
|
|
end if
|
|
if ($oj0wr=1)
|
|
$dyt1q := (%ppvim[7]--1000)*40/2000
|
|
$dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
|
|
if (get_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
|
|
set_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
|
|
end if
|
|
end if
|
|
%ppvim[8] := %ppvim[6]+%ppvim[7]
|
|
if ($oj0wr=1)
|
|
$dyt1q := (%ppvim[8]--2000)*40/4000
|
|
if (get_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
|
|
set_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE,$dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40)))
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function NOTE_DURATION_POLY__update_mod_vals
|
|
if (event_status($dc3zm)=$EVENT_STATUS_NOTE_QUEUE)
|
|
$1psz5 := %w1vde[%laljf[$dc3zm mod 8192]]
|
|
if ($dc3zm=$y3puj)
|
|
$v54fu := $1psz5
|
|
end if
|
|
else
|
|
if ($dc3zm=$y3puj)
|
|
$1psz5 := $v54fu
|
|
else
|
|
$1psz5 := %w1vde[%laljf[$dc3zm mod 8192]]
|
|
end if
|
|
end if
|
|
$ey2qd := ($ENGINE_UPTIME-$1psz5)/10
|
|
%ppvim[12] := $ey2qd-(-sh_right(1000-$ey2qd,31)*($ey2qd-1000))
|
|
end function
|
|
|
|
function VELOCITY_POLY__update_mod_vals
|
|
%ppvim[10] := (%c1kc4[%laljf[$dc3zm mod 8192]]+(-sh_right(%c1kc4[%laljf[$dc3zm mod 8192]]-1,31)*(1-%c1kc4[%laljf[$dc3zm mod 8192]]))-1)*1000/126
|
|
end function
|
|
|
|
function KEY_TRACK_POLY__update_mod_vals
|
|
if (event_status($dc3zm)=$EVENT_STATUS_NOTE_QUEUE)
|
|
%ppvim[13] := get_event_par($dc3zm,$EVENT_PAR_NOTE)*1000/127
|
|
if ($dc3zm=$y3puj)
|
|
%h1b0t[13] := %ppvim[13]
|
|
end if
|
|
else
|
|
if ($dc3zm=$y3puj)
|
|
%ppvim[13] := %h1b0t[13]
|
|
else
|
|
%ppvim[13] := %ilm5d[%laljf[$dc3zm mod 8192]]*1000/127
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function CONST_MOD__update_mod_vals
|
|
%ppvim[18] := 1000
|
|
%h1b0t[18] := 1000
|
|
end function
|
|
|
|
function REL_MOD__update_mod_vals
|
|
if (event_status($dc3zm)=$EVENT_STATUS_NOTE_QUEUE)
|
|
if ($dc3zm=$y3puj)
|
|
if ($frfox=0)
|
|
%ppvim[19] := %jnhix[$meuyq]*1000
|
|
else
|
|
%ppvim[19] := -sh_right(abs($0e0hy-0)-1,31)*1000
|
|
end if
|
|
else
|
|
%ppvim[19] := %jnhix[%laljf[$dc3zm mod 8192]]*1000
|
|
end if
|
|
else
|
|
if ($frfox=0)
|
|
%ppvim[19] := 1000
|
|
else
|
|
%ppvim[19] := -sh_right(abs($0e0hy-0)-1,31)*1000
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function ARP_MOD__update_mod_vals
|
|
%ppvim[20] := %0lu1d[$tp4oa]*1000/2400*$ruhe4
|
|
end function
|
|
|
|
function AFTERTOUCH__update_mod_vals
|
|
if ($frfox=1)
|
|
if ($yrh4w=1)
|
|
$dyt1q := %a31v5[0]
|
|
$kyxij := 1
|
|
while ($kyxij<num_elements(%a31v5))
|
|
if ($dyt1q<=%a31v5[$kyxij])
|
|
$dyt1q := %a31v5[$kyxij]
|
|
end if
|
|
inc($kyxij)
|
|
end while
|
|
$r0pwv := %vftan[0]
|
|
$kyxij := 1
|
|
while ($kyxij<num_elements(%vftan))
|
|
if ($r0pwv<=%vftan[$kyxij])
|
|
$r0pwv := %vftan[$kyxij]
|
|
end if
|
|
inc($kyxij)
|
|
end while
|
|
%ppvim[9] := $dyt1q+$r0pwv-(-sh_right(1000-($dyt1q+$r0pwv),31)*($dyt1q+$r0pwv-1000))
|
|
else
|
|
%ppvim[9] := %a31v5[0]
|
|
$kyxij := 1
|
|
while ($kyxij<num_elements(%a31v5))
|
|
if (%ppvim[9]<=%a31v5[$kyxij])
|
|
%ppvim[9] := %a31v5[$kyxij]
|
|
end if
|
|
inc($kyxij)
|
|
end while
|
|
end if
|
|
else
|
|
$dyt1q := %gvnxp[%laljf[$dc3zm mod 8192]]
|
|
%ppvim[9] := %a31v5[$dyt1q]*-sh_right(0-$dyt1q,31)+%a31v5[0]+%vftan[%ilm5d[%laljf[$dc3zm mod 8192]]]-(-sh_right(1000-(%a31v5[$dyt1q]*-sh_right(0-$dyt1q,31)+%a31v5[0]+%vftan[%ilm5d[%laljf[$dc3zm mod 8192]]]),31)*(%a31v5[$dyt1q]*-sh_right(0-$dyt1q,31)+%a31v5[0]+%vftan[%ilm5d[%laljf[$dc3zm mod 8192]]]-1000))
|
|
end if
|
|
end function
|
|
|
|
function MPE_SLIDE__update_mod_vals
|
|
if ($frfox=1)
|
|
$dyt1q := %2zfuu[0]
|
|
$kyxij := 1
|
|
while ($kyxij<num_elements(%2zfuu))
|
|
if ($dyt1q<=%2zfuu[$kyxij])
|
|
if (event_status(%z3n3e[$kyxij])=$EVENT_STATUS_NOTE_QUEUE)
|
|
$dyt1q := %2zfuu[$kyxij]
|
|
else
|
|
%2zfuu[$kyxij] := 0
|
|
end if
|
|
end if
|
|
inc($kyxij)
|
|
end while
|
|
%ppvim[21] := %2zfuu[0]
|
|
$kyxij := 1
|
|
while ($kyxij<num_elements(%2zfuu))
|
|
if (%ppvim[21]<=%2zfuu[$kyxij])
|
|
%ppvim[21] := %2zfuu[$kyxij]
|
|
end if
|
|
inc($kyxij)
|
|
end while
|
|
else
|
|
%ppvim[21] := %2zfuu[%gvnxp[%laljf[$dc3zm mod 8192]]]*-sh_right(0-%gvnxp[%laljf[$dc3zm mod 8192]],31)+%2zfuu[0]-(-sh_right(1000-(%2zfuu[%gvnxp[%laljf[$dc3zm mod 8192]]]*-sh_right(0-%gvnxp[%laljf[$dc3zm mod 8192]],31)+%2zfuu[0]),31)*(%2zfuu[%gvnxp[%laljf[$dc3zm mod 8192]]]*-sh_right(0-%gvnxp[%laljf[$dc3zm mod 8192]],31)+%2zfuu[0]-1000))
|
|
end if
|
|
end function
|
|
|
|
function RANDOM__update_mod_vals
|
|
%ppvim[22] := %oy5fa[%laljf[$dc3zm mod 8192]]
|
|
end function
|
|
|
|
function ABS_CURSOR__update_mod_vals
|
|
if ($kexsv # 0)
|
|
%ppvim[23] := real_to_int(int_to_real(%45gob[%laljf[$dc3zm mod 8192]])*1000.0/int_to_real($kexsv*1000))
|
|
end if
|
|
end function
|
|
|
|
function MOD__perform_full_update
|
|
$dc3zm := $y3puj
|
|
if ($0ib2k=3 or ($0ib2k=4))
|
|
$oj0wr := 1
|
|
end if
|
|
$frfox := 1
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
call MOD__store_current_mod_context
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<48)
|
|
$gpzoi := %xdonk[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($ruhe4=1)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<3)
|
|
$gpzoi := %arjqa[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
else
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if ($0ib2k=3 or ($0ib2k=4))
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
call update_morph_stepper
|
|
if ($t4vew=1)
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%hrm2k))
|
|
if (event_status(%hrm2k[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
|
|
$gpzoi := 23
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
|
|
change_vol(%hrm2k[$y3mgr],-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par(%hrm2k[$y3mgr],$EVENT_PAR_VOLUME),1)
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
$gpzoi := 28
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
change_tune(%hrm2k[$y3mgr],($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
$gpzoi := 29
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 30
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end if
|
|
call update_poly_mod_event_id
|
|
$dc3zm := $4ggtc
|
|
if ($mdykc=2 and ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0))))
|
|
$oj0wr := 1
|
|
end if
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<2)
|
|
$gpzoi := %ulgib[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<11)
|
|
$gpzoi := %h2jv2[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0)))
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if ($ruhe4=1)
|
|
if ($mdykc=2 and ($0ib2k=2))
|
|
$oj0wr := 1
|
|
end if
|
|
$dc3zm := $auli3
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($0ib2k=2)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function MOD__position_all_mod_menus
|
|
$gpzoi := 0
|
|
while ($gpzoi<$upapg)
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
inc($gpzoi)
|
|
end while
|
|
end function
|
|
|
|
function update_light_guide
|
|
$fg4rw := 0
|
|
while ($fg4rw<=127)
|
|
$dyt1q := %_rootkey_offset_for_note[128*$51oxm+$fg4rw]
|
|
if ($dyt1q>-128)
|
|
set_key_color($fg4rw,-sh_right(abs($dyt1q-0)-1,31)*$KEY_COLOR_CYAN+((.not. -sh_right(abs($dyt1q-0)-1,31) .and. 1)*$KEY_COLOR_DEFAULT))
|
|
else
|
|
set_key_color($fg4rw,$KEY_COLOR_INACTIVE)
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
end function
|
|
|
|
function RAND__update_ui_after_randomization
|
|
call update_preset_name_displays
|
|
set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"GE_g_crs_rel_dir_" & $va2lk)
|
|
call evaluate_mod_connections
|
|
call update_g_rng_max_label
|
|
set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
|
|
call update_all_WF_for_default_key
|
|
call NAV_PAGE__update_main_nav
|
|
call set_all_engine_par_norm_knobs
|
|
call MOD__perform_full_update
|
|
call MOD__position_all_mod_menus
|
|
call update_all_mod_knob_range_indicator
|
|
call update_light_guide
|
|
end function
|
|
|
|
function ARP__shift_tables
|
|
$fg4rw := 1
|
|
while ($fg4rw<=($k5z4u+$wg0d2))
|
|
$dyt1q := %pyeoz[$k5z4u-1]
|
|
$r0pwv := %0lu1d[$k5z4u-1]
|
|
$y3mgr := 0
|
|
while ($y3mgr<=($k5z4u-2))
|
|
%pyeoz[$k5z4u-1-$y3mgr] := %pyeoz[$k5z4u-2-$y3mgr]
|
|
%0lu1d[$k5z4u-1-$y3mgr] := %0lu1d[$k5z4u-2-$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
%pyeoz[0] := $dyt1q
|
|
%0lu1d[0] := $r0pwv
|
|
inc($fg4rw)
|
|
end while
|
|
end function
|
|
|
|
function update_modal_dialog_lbl
|
|
if ($3pvid=1)
|
|
set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end function
|
|
|
|
function _handle_mod_knob_modifiers_for_gl_m_id
|
|
if (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_KEY_ALT)=1)
|
|
if (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_KEY_SHIFT) # 1)
|
|
$tmkul := 1
|
|
$tkfsc := get_control_par(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE_STATE)
|
|
set_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE,$tkfsc*%qxmpr[$gpzoi]/101-get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+%dwdw3[$gpzoi])
|
|
else
|
|
if ($tpui1=1)
|
|
$tpui1 := 0
|
|
$dyt1q := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)
|
|
if ($dyt1q<=%sbnwu[$gpzoi] and ($dyt1q>=%dwdw3[$gpzoi]))
|
|
set_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE,$dyt1q)
|
|
set_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE,-get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Ups, a consistent modulation direction inversion is not possible as the knob range would be exceeded. Please make you settings manually.")
|
|
end if
|
|
else
|
|
$tpui1 := 1
|
|
end if
|
|
end if
|
|
else
|
|
$tmkul := 0
|
|
end if
|
|
end function
|
|
|
|
function update_g_dis_sync_idx
|
|
$gv5ha := $bpkqt+($g345d*%ppvim[$3pyb3]/1000)
|
|
$gv5ha := ($gv5ha-50)*28/2950
|
|
$gv5ha := $gv5ha*(1+(sh_right(28-$gv5ha,31) .or. sh_right($gv5ha-0,31)))-0-(28*sh_right(28-$gv5ha,31))
|
|
end function
|
|
|
|
function _update_mod_knob_automation_label_for_gl_m_id
|
|
if (?rylw5[$gpzoi]=1.0)
|
|
if (%jeswc[$gpzoi]=31)
|
|
if ($linka=0)
|
|
@uamno := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)/%oazdd[$gpzoi] & "." & abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE) mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10)) & " " & !gh3f0[$gpzoi]
|
|
else
|
|
$pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
|
|
@uamno := !je2na[$pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))]
|
|
call update_g_pos_hit_anker_lenth_text
|
|
end if
|
|
else
|
|
if ($gpzoi=12 and ($p5wl1=1))
|
|
call update_g_dis_sync_idx
|
|
@uamno := !qeoj3[$gv5ha]
|
|
else
|
|
if ($gpzoi=9)
|
|
@uamno := !qniir[(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))]
|
|
else
|
|
if (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)>=0)
|
|
@uamno := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)/%oazdd[$gpzoi]
|
|
else
|
|
@uamno := "-" & (abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE))/%oazdd[$gpzoi])
|
|
end if
|
|
if (%oazdd[$gpzoi]>=10)
|
|
@uamno := @uamno & "." & (abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)) mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10))
|
|
if (%oazdd[$gpzoi]>=100)
|
|
@uamno := @uamno & (abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)) mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100))
|
|
end if
|
|
end if
|
|
@uamno := @uamno & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
end if
|
|
end if
|
|
else
|
|
if (%jeswc[$gpzoi]=310 and ($l4ujc=1) or (%jeswc[$gpzoi]=320 and ($x02cl=1)))
|
|
@uamno := !je2na[(((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000))*(1+(sh_right(1500-(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),31) .or. sh_right(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)-0,31)))-0-(1500*sh_right(1500-(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),31)))*17-1)/1500]
|
|
else
|
|
$dyt1q := real_to_int(pow((int_to_real(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE))-int_to_real(%dwdw3[$gpzoi]))/(int_to_real(%sbnwu[$gpzoi])-int_to_real(%dwdw3[$gpzoi])),?rylw5[$gpzoi])*int_to_real(%qxmpr[$gpzoi])+int_to_real(%dwdw3[$gpzoi]))
|
|
@uamno := $dyt1q/%oazdd[$gpzoi] & "." & ($dyt1q mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10)) & ($dyt1q mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100)) & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
end if
|
|
set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
|
|
end function
|
|
|
|
function MOD__perform_optimized_update_for_gl_ext_mod
|
|
$dc3zm := $y3puj
|
|
if ($0ib2k=3 or ($0ib2k=4))
|
|
$oj0wr := 1
|
|
end if
|
|
$frfox := 1
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
call MOD__store_current_mod_context
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<48)
|
|
$gpzoi := %xdonk[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($ruhe4=1)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<3)
|
|
$gpzoi := %arjqa[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
else
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if ($0ib2k=3 or ($0ib2k=4))
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
call update_morph_stepper
|
|
if ($t4vew=1)
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%hrm2k))
|
|
if (event_status(%hrm2k[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
|
|
$gpzoi := 23
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
|
|
change_vol(%hrm2k[$y3mgr],-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par(%hrm2k[$y3mgr],$EVENT_PAR_VOLUME),1)
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
$gpzoi := 28
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
change_tune(%hrm2k[$y3mgr],($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
$gpzoi := 29
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 30
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end if
|
|
call update_poly_mod_event_id
|
|
$dc3zm := $4ggtc
|
|
if ($mdykc=2 and ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0))))
|
|
$oj0wr := 1
|
|
end if
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<2)
|
|
$gpzoi := %ulgib[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<11)
|
|
$gpzoi := %h2jv2[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0)))
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if ($ruhe4=1)
|
|
if ($mdykc=2 and ($0ib2k=2))
|
|
$oj0wr := 1
|
|
end if
|
|
$dc3zm := $auli3
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($0ib2k=2)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function _update_mod_knob_label_for_gl_m_id
|
|
$volav := $gpzoi
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,@uamno)
|
|
if ($gpzoi # 9)
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
|
|
end if
|
|
if (%jeswc[$gpzoi]=55)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask_8")
|
|
end if
|
|
if (%jeswc[$gpzoi]=330)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
|
|
if ($afnek=0)
|
|
%latnx[0] := 6
|
|
%latnx[1] := 6
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
%latnx[0] := 8
|
|
%latnx[1] := 8
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
$gpzoi := $volav
|
|
end if
|
|
end if
|
|
if (%jeswc[$gpzoi]=335)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
|
|
if ($afnek=0)
|
|
%latnx[0] := 7
|
|
%latnx[1] := 7
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
%latnx[0] := 8
|
|
%latnx[1] := 8
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
$gpzoi := $volav
|
|
end if
|
|
end if
|
|
%gmios[$gpzoi] := $ENGINE_UPTIME
|
|
end function
|
|
|
|
function on_mod_knob_for_gl_m_id
|
|
call _handle_mod_knob_modifiers_for_gl_m_id
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_automation_label_for_gl_m_id
|
|
call _update_mod_knob_label_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function seq__on_step_dur_btn_for_h
|
|
$dyt1q := (1000000-($dyt1q*83333))*(1+(sh_right(1000000-(1000000-($dyt1q*83333)),31) .or. sh_right(1000000-($dyt1q*83333)-0,31)))-0-(1000000*sh_right(1000000-(1000000-($dyt1q*83333)),31))
|
|
$dyt1q := $dyt1q-($1ybzi*%ppvim[$rpaco]/1000)
|
|
$ius2b := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
$gpzoi := 9
|
|
call on_mod_knob_for_gl_m_id
|
|
end function
|
|
|
|
function stepper_on_listener_set_modulation
|
|
if (%pqcgh[8*$3qz3a+$v2ky0]=1 and ($ejy35=1))
|
|
if ($afnek=1)
|
|
if ($fojqp mod $qxgdn=0)
|
|
$5jkam := %t40az[$zgcke mod $ilpk2]*500
|
|
if (get_engine_par($ENGINE_PAR_GN_GAIN,-1,$v2ky0,$qscu5) # $5jkam)
|
|
set_engine_par($ENGINE_PAR_GN_GAIN,$5jkam,-1,$v2ky0,$qscu5)
|
|
end if
|
|
call stepper__update_pos_ind
|
|
inc($zgcke)
|
|
end if
|
|
inc($fojqp)
|
|
end if
|
|
else
|
|
if (get_engine_par($ENGINE_PAR_GN_GAIN,-1,$v2ky0,$qscu5) # 397461)
|
|
set_engine_par($ENGINE_PAR_GN_GAIN,397461,-1,$v2ky0,$qscu5)
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function _reset_mod_knob_label_for_gl_m_id
|
|
if (%vvlef[$gpzoi]>0)
|
|
if (%gmios[$gpzoi]>0 and ($ENGINE_UPTIME-%gmios[$gpzoi]>=700))
|
|
if (%q4mzh[$gpzoi] # -1 and (%mnk53[$gpzoi]>=%mnk53[35] and (%mnk53[$gpzoi]<=%mnk53[73]) or in_range(%mnk53[$gpzoi],%mnk53[31],33) or in_range(%mnk53[$gpzoi],114,116) or in_range(%mnk53[$gpzoi],120,122)))
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%vvlef[$gpzoi],$CONTROL_PAR_POS_Y),31))
|
|
if (in_range(%mnk53[$gpzoi],31,33) or in_range(%mnk53[$gpzoi],114,116) or in_range(%mnk53[$gpzoi],120,122))
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[$gpzoi])+106)
|
|
else
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE_STATE,(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$gpzoi])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$gpzoi])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])]]+((%mnk53[$gpzoi]-75) mod 3))+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$gpzoi])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])-$EFFECT_TYPE_FILTER)-1,31)*(%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])))))+((%mnk53[$gpzoi]-75) mod 3)]+106)))
|
|
end if
|
|
else
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
%gmios[$gpzoi] := 0
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function MOD__perform_cont_update
|
|
$dc3zm := $y3puj
|
|
if ($0ib2k=3 or ($0ib2k=4))
|
|
$oj0wr := 1
|
|
end if
|
|
$frfox := 1
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
call MOD__store_current_mod_context
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<48)
|
|
$gpzoi := %xdonk[$jdgl1]
|
|
call set_mod_knob_engine_par_with_permanent_modulation_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($ruhe4=1)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<3)
|
|
$gpzoi := %arjqa[$jdgl1]
|
|
call update_mod_knob_cont_params_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
else
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_engine_par_with_permanent_modulation_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if ($0ib2k=3 or ($0ib2k=4))
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if (%hivzv[6]=1)
|
|
call update_morph_stepper
|
|
end if
|
|
if ($t4vew=1)
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%hrm2k))
|
|
if (event_status(%hrm2k[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
|
|
$gpzoi := 23
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
|
|
change_vol(%hrm2k[$y3mgr],-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par(%hrm2k[$y3mgr],$EVENT_PAR_VOLUME),1)
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
$gpzoi := 28
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
change_tune(%hrm2k[$y3mgr],($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
if (%hrm2k[$y3mgr]=$auli3)
|
|
$gpzoi := 29
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 30
|
|
$dc3zm := %k0ra5[$y3mgr]
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end if
|
|
call update_poly_mod_event_id
|
|
$dc3zm := $4ggtc
|
|
if ($mdykc=2 and ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0))))
|
|
$oj0wr := 1
|
|
end if
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<2)
|
|
$gpzoi := %ulgib[$jdgl1]
|
|
call update_mod_knob_cont_params_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<11)
|
|
$gpzoi := %h2jv2[$jdgl1]
|
|
if ($wkxzh=0)
|
|
call update_mod_knob_cont_params_for_gl_m_id
|
|
else
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
inc($jdgl1)
|
|
end while
|
|
if ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0)))
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
if ($wkxzh=0)
|
|
call update_mod_knob_cont_params_for_gl_m_id
|
|
else
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
end if
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
if ($ruhe4=1)
|
|
if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
|
|
if ($mdykc=2 and ($0ib2k=2))
|
|
$oj0wr := 1
|
|
end if
|
|
$dc3zm := $auli3
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$oj0wr := 0
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($0ib2k=2)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %u335j[$jdgl1]
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end if
|
|
end if
|
|
end if
|
|
if (get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL and ($t4vew=1))
|
|
if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
|
|
set_ui_wf_property($tmcuy,$UI_WF_PROP_PLAY_CURSOR,0,get_event_par($auli3,$EVENT_PAR_PLAY_POS)-1)
|
|
else
|
|
set_ui_wf_property($tmcuy,$UI_WF_PROP_PLAY_CURSOR,0,-1)
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function _LFO__update_phase_update_mod_id_arg
|
|
$ga54u := -1
|
|
if (event_status(%5ggz3[$fg4rw])=$EVENT_STATUS_NOTE_QUEUE or (%5ggz3[$fg4rw]=$y3puj))
|
|
$ga54u := %5ggz3[$fg4rw]
|
|
else
|
|
if (event_status(%asdef[$fg4rw])=$EVENT_STATUS_NOTE_QUEUE)
|
|
$ga54u := %asdef[$fg4rw]
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function LFO1__update_phase
|
|
if ($l4ujc=1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<256)
|
|
call _LFO__update_phase_update_mod_id_arg
|
|
if ($ga54u # -1)
|
|
if (%hxpuh[7]=1)
|
|
$dc3zm := $ga54u
|
|
$1il5i := %3hbq2[7]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[140+$1il5i]>=0)
|
|
select (%q4rwz[140+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
end if
|
|
$kil43 := real_to_int((int_to_real($zktrd)+(int_to_real($2zugt*%ppvim[$vas4o])/1000.0))/1500.1*17.0)
|
|
$kil43 := $kil43*(1+(sh_right(16-$kil43,31) .or. sh_right($kil43-0,31)))-0-(16*sh_right(16-$kil43,31))
|
|
if (?3nlwo[$kil43]>0.0)
|
|
?lrdg1[$fg4rw] := int_to_real(($ENGINE_UPTIME-%hqihq[$fg4rw])*1000)/(int_to_real($DURATION_QUARTER*4)*?3nlwo[$kil43])+(int_to_real($rj2yq)/360.0)
|
|
else
|
|
?lrdg1[$fg4rw] := int_to_real(($ENGINE_UPTIME-%hqihq[$fg4rw])*1000)/(int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?3nlwo[$kil43])+(int_to_real($rj2yq)/360.0)
|
|
end if
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
if (%iv2n3[$e2mne]=1)
|
|
if (%hxpuh[7]=1)
|
|
$dc3zm := %5ggz3[$a2nqk]
|
|
$1il5i := %3hbq2[7]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[140+$1il5i]>=0)
|
|
select (%q4rwz[140+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$gpzoi := 7
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
?lrdg1[$a2nqk] := ?lrdg1[$a2nqk]+((pow((int_to_real($zktrd+($2zugt*%ppvim[$vas4o]/1000))-1.0)/1499.0,?rylw5[7])*1499.0+1.0)/100.0/150.0)
|
|
$fg4rw := 0
|
|
while ($fg4rw<256)
|
|
?lrdg1[$fg4rw] := ?lrdg1[$a2nqk]
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
$fg4rw := 0
|
|
while ($fg4rw<256)
|
|
call _LFO__update_phase_update_mod_id_arg
|
|
if ($ga54u # -1)
|
|
if (%hxpuh[7]=1)
|
|
$dc3zm := $ga54u
|
|
$1il5i := %3hbq2[7]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[140+$1il5i]>=0)
|
|
select (%q4rwz[140+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
end if
|
|
?lrdg1[$fg4rw] := ?lrdg1[$fg4rw]+((pow((int_to_real($zktrd+($2zugt*%ppvim[$vas4o]/1000))-1.0)/1499.0,?rylw5[7])*1499.0+1.0)/100.0/150.0)
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function LFO2__update_phase
|
|
if ($x02cl=1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<256)
|
|
call _LFO__update_phase_update_mod_id_arg
|
|
if ($ga54u # -1)
|
|
if (%hxpuh[8]=1)
|
|
$dc3zm := $ga54u
|
|
$1il5i := %3hbq2[8]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[160+$1il5i]>=0)
|
|
select (%q4rwz[160+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
end if
|
|
$wuhc2 := real_to_int((int_to_real($sseum)+(int_to_real($bi544*%ppvim[$y3s33])/1000.0))/1500.1*17.0)
|
|
$wuhc2 := $wuhc2*(1+(sh_right(16-$wuhc2,31) .or. sh_right($wuhc2-0,31)))-0-(16*sh_right(16-$wuhc2,31))
|
|
if (?3nlwo[$wuhc2]>0.0)
|
|
?pu5ib[$fg4rw] := int_to_real(($ENGINE_UPTIME-%qvhhl[$fg4rw])*1000)/(int_to_real($DURATION_QUARTER*4)*?3nlwo[$wuhc2])+(int_to_real($s2bg4)/360.0)
|
|
else
|
|
?pu5ib[$fg4rw] := int_to_real(($ENGINE_UPTIME-%qvhhl[$fg4rw])*1000)/(int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?3nlwo[$wuhc2])+(int_to_real($s2bg4)/360.0)
|
|
end if
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
if (%iv2n3[$eu0kx]=1)
|
|
if (%hxpuh[8]=1)
|
|
$dc3zm := %5ggz3[$xpr4r]
|
|
$1il5i := %3hbq2[8]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[160+$1il5i]>=0)
|
|
select (%q4rwz[160+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$gpzoi := 8
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
?pu5ib[$xpr4r] := ?pu5ib[$xpr4r]+((pow((int_to_real($sseum+($bi544*%ppvim[$y3s33]/1000))-1.0)/1499.0,?rylw5[8])*1499.0+1.0)/100.0/150.0)
|
|
$fg4rw := 0
|
|
while ($fg4rw<256)
|
|
?pu5ib[$fg4rw] := ?pu5ib[$xpr4r]
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
$fg4rw := 0
|
|
while ($fg4rw<256)
|
|
call _LFO__update_phase_update_mod_id_arg
|
|
if ($ga54u # -1)
|
|
if (%hxpuh[8]=1)
|
|
$dc3zm := $ga54u
|
|
$1il5i := %3hbq2[8]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[160+$1il5i]>=0)
|
|
select (%q4rwz[160+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
end if
|
|
?pu5ib[$fg4rw] := ?pu5ib[$fg4rw]+((pow((int_to_real($sseum+($bi544*%ppvim[$y3s33]/1000))-1.0)/1499.0,?rylw5[8])*1499.0+1.0)/100.0/150.0)
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function LFO__update_phase
|
|
call LFO1__update_phase
|
|
call LFO2__update_phase
|
|
end function
|
|
|
|
function MOD__inc_POLY__count
|
|
$1bi4b := ($1bi4b+1) mod 256
|
|
while (event_status(%5ggz3[$1bi4b])=$EVENT_STATUS_NOTE_QUEUE or (%5ggz3[$1bi4b]=$y3puj))
|
|
$1bi4b := ($1bi4b+1) mod 256
|
|
end while
|
|
end function
|
|
|
|
function update_all_poly_mod_paths
|
|
$dwl3e := 0
|
|
while (%zeecp[$dwl3e] # -1 and ($dwl3e<num_elements(%zeecp)))
|
|
select (%zeecp[$dwl3e])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($dwl3e)
|
|
end while
|
|
end function
|
|
|
|
function GE_beat_sync_update_duration_bar
|
|
$jqz2q := $SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM
|
|
end function
|
|
|
|
function update_free_run_sync_start_vars
|
|
call GE_beat_sync_update_duration_bar
|
|
$pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
|
|
$pqpgc := $pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))
|
|
if (?3nlwo[$pqpgc]>0.0)
|
|
$xg4xz := real_to_int(int_to_real($DURATION_QUARTER)*4.0/1000.0*?3nlwo[$pqpgc])
|
|
else
|
|
$xg4xz := real_to_int(int_to_real($jqz2q)/1000.0*-1.0*?3nlwo[$pqpgc])
|
|
end if
|
|
$h4bci := ($wo1eq+($i11wt*$gm014))/1000
|
|
$1wd3b := real_to_int(int_to_real(%smp_l_grp[$51oxm])*~tptmd)
|
|
$f2ujt := ($1wd3b-$h4bci)*$y4ap3/$xg4xz*100
|
|
$ottdr := $f2ujt
|
|
end function
|
|
|
|
function update_g_absl_cursor_pos_for_synced_progr
|
|
if ($xc3po=0)
|
|
if (get_event_par($ygbzd,$EVENT_PAR_0) # 3)
|
|
call GE_beat_sync_update_duration_bar
|
|
$pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
|
|
$pqpgc := $pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))
|
|
$y1zim := $i11wt*$gm014/1000
|
|
if (?3nlwo[$pqpgc]>0.0)
|
|
$y1zim := (($ENGINE_UPTIME-$gj552-0)*(real_to_int(int_to_real(%smp_l_grp[$51oxm])*~tptmd)-($wo1eq/1000)-$y1zim)/(real_to_int(int_to_real($DURATION_QUARTER)*4.0/1000.0*?3nlwo[$pqpgc])-0)+$y1zim)*1000
|
|
else
|
|
$y1zim := (($ENGINE_UPTIME-$gj552-0)*(real_to_int(int_to_real(%smp_l_grp[$51oxm])*~tptmd)-($wo1eq/1000)-$y1zim)/(real_to_int(int_to_real($jqz2q)/-1000.0*?3nlwo[$pqpgc])-0)+$y1zim)*1000
|
|
end if
|
|
else
|
|
if ($f2ujt=0)
|
|
call update_free_run_sync_start_vars
|
|
end if
|
|
$y1zim := $mkoi4+($f2ujt*$t4gop)
|
|
end if
|
|
else
|
|
$y1zim := $mkoi4+($f2ujt*$t4gop)
|
|
end if
|
|
end function
|
|
|
|
function MOD__restore_last_mono_mod_context
|
|
$jdgl1 := 0
|
|
while ($jdgl1<24)
|
|
%ppvim[$jdgl1] := %qum0u[$jdgl1]
|
|
inc($jdgl1)
|
|
end while
|
|
end function
|
|
|
|
function MOD__perform_sample_layer_update_for_arp_note
|
|
$dc3zm := $auli3
|
|
$frfox := 1
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%tyrok) and (%tyrok[$fg4rw]>-1))
|
|
select (%tyrok[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
$dyt1q := get_event_par($auli3,$EVENT_PAR_NOTE)+$uvcxk+($ia54c*%ppvim[$wh1ke]/1000)
|
|
if ($dyt1q>127)
|
|
$dyt1q := 115+($dyt1q mod 12)
|
|
end if
|
|
if ($dyt1q<0)
|
|
$dyt1q := ($dyt1q+128) mod 12
|
|
end if
|
|
set_event_par($auli3,$EVENT_PAR_NOTE,$dyt1q)
|
|
$jdgl1 := 0
|
|
while ($jdgl1<4)
|
|
$gpzoi := %xkzmj[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
|
|
$gpzoi := 23
|
|
$dc3zm := $auli3
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
|
|
change_vol($auli3,-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par($auli3,$EVENT_PAR_VOLUME),1)
|
|
if ($auli3=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
$gpzoi := 28
|
|
$dc3zm := $auli3
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
change_tune($auli3,($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$auli3 mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$auli3 mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
|
|
if ($auli3=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
if ($auli3=$auli3)
|
|
$gpzoi := 29
|
|
$dc3zm := $auli3
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 30
|
|
$dc3zm := $auli3
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function ARP__update_sample_waveform
|
|
wait(1)
|
|
$a5fyp := get_event_par($auli3,$EVENT_PAR_ZONE_ID)
|
|
if ($a5fyp # $kzyw4 and ($a5fyp>0))
|
|
attach_zone($tmcuy,$a5fyp,0)
|
|
$kzyw4 := $a5fyp
|
|
call update_s_wf_start_indic_label_position
|
|
end if
|
|
end function
|
|
|
|
function _ARP__update_step_length
|
|
$dyt1q := (($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))
|
|
if (?2wk03[$dyt1q]>0.0)
|
|
~qa2mp := int_to_real($DURATION_QUARTER)*?2wk03[$dyt1q]
|
|
else
|
|
~qa2mp := int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?2wk03[$dyt1q]
|
|
end if
|
|
end function
|
|
|
|
function ARP__remove_all_notes_and_reset
|
|
$5sroo := 0
|
|
while ($5sroo<num_elements(%br0tn))
|
|
%br0tn[$5sroo] := %wwz2v[$0erls]
|
|
inc($5sroo)
|
|
end while
|
|
$gcbnc := 0
|
|
end function
|
|
|
|
function BRW__set_scroll_bar_for_selected_item
|
|
if (not in_range(%kt24s[$zor2m],$fykja,$fykja+19-1))
|
|
if (%kt24s[$zor2m]<$fykja)
|
|
$z2tnd := real_to_int((int_to_real(%kt24s[$zor2m])-0.0)*-1000.0/(int_to_real(%k4yha[$zor2m]-19)-0.0)+1000.0)
|
|
else
|
|
$z2tnd := real_to_int((int_to_real(%kt24s[$zor2m])-18.0)*-1000.0/(int_to_real(%k4yha[$zor2m]-1)-18.0)+1000.0)
|
|
end if
|
|
end if
|
|
end function
|
|
|
|
function BRW__ensure_selected_item_is_visible
|
|
if (not in_range(%kt24s[$zor2m],$fykja,$fykja+19-1) and in_range($0ib2k,5,7))
|
|
call BRW__set_scroll_bar_for_selected_item
|
|
call BRW__update_search_result_list_ui
|
|
end if
|
|
end function
|
|
|
|
function _BRW__select_preset_id_for_file_type_with_offset
|
|
if (%xeyhi[$zor2m]=0)
|
|
call BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
end if
|
|
%kt24s[$zor2m] := (%kt24s[$zor2m]+%k4yha[$zor2m]+$w0x5j) mod %k4yha[$zor2m]
|
|
%jj5qi[$zor2m] := %3owef[500*$zor2m+%kt24s[$zor2m]]
|
|
$zor2m := $4ut4g
|
|
call BRW__update_search_result_selection
|
|
call BRW__ensure_selected_item_is_visible
|
|
end function
|
|
|
|
function convert_preset_data_to_current_version
|
|
if (45 # $b4lv0)
|
|
if ($b4lv0<38)
|
|
$swg5e := 0
|
|
end if
|
|
if ($b4lv0<40)
|
|
$3tnu3 := 0
|
|
while ($3tnu3<4)
|
|
$y3mgr := 0
|
|
while ($y3mgr<8)
|
|
if (%45vq1[8*$3tnu3+$y3mgr]=2)
|
|
%l2lis[8*$3tnu3+$y3mgr] := %glqqy[%l2lis[8*$3tnu3+$y3mgr]]
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
inc($3tnu3)
|
|
end while
|
|
$3tnu3 := 0
|
|
while ($3tnu3<4)
|
|
$y3mgr := 0
|
|
while ($y3mgr<8)
|
|
if (%45vq1[8*$3tnu3+$y3mgr]=1)
|
|
%l2lis[8*$3tnu3+$y3mgr] := %z5iau[%l2lis[8*$3tnu3+$y3mgr]]
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
inc($3tnu3)
|
|
end while
|
|
$ruhe4 := 0
|
|
$mcp2m := (%is_mono_src[$hdmk1]+1) mod 2
|
|
call update_ARP_and_S_WF_area
|
|
$dyo2q := (%is_mono_src[$hdmk1]+1) mod 2
|
|
pgs_set_key_val(PGS_FUNC,0,9)
|
|
$q0rb2 := get_control_par(get_ui_id($q0rb2),$CONTROL_PAR_DEFAULT_VALUE)
|
|
end if
|
|
if ($b4lv0<42)
|
|
$ttvix := 0
|
|
$hj1x4 := 0
|
|
end if
|
|
if ($b4lv0<43)
|
|
$xrt5z := $p5wl1
|
|
end if
|
|
$b4lv0 := 45
|
|
end if
|
|
end function
|
|
|
|
function TABS__reset_position_after_preset_load
|
|
$r3fzy := 0
|
|
while ($r3fzy<4)
|
|
$2rota := 0
|
|
while ($2rota<%gxveo[$r3fzy])
|
|
if (%gxveo[$r3fzy]>1)
|
|
set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_POS_X,%pxakq[$r3fzy]+($2rota*66))
|
|
set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_POS_Y,%wswe0[$r3fzy])
|
|
set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_WIDTH,57)
|
|
set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_HEIGHT,57)
|
|
end if
|
|
inc($2rota)
|
|
end while
|
|
inc($r3fzy)
|
|
end while
|
|
end function
|
|
|
|
function update_g_interval_mode
|
|
$p5wl1 := $xrt5z mod 2
|
|
set_control_par_str(get_ui_id($p5wl1),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_0" & (sh_right($xrt5z,1) .and. 1))
|
|
end function
|
|
|
|
function MOD__recall_ext_mod_storage
|
|
?xy[0] := int_to_real($2thol)/10000.0
|
|
?xy[1] := int_to_real($jy3sd)/10000.0
|
|
%ppvim[0] := real_to_int(?xy[0]*1000.0)
|
|
%ppvim[1] := real_to_int(?xy[1]*1000.0)
|
|
%ppvim[14] := $543zt
|
|
%ppvim[15] := $lynqa
|
|
%ppvim[16] := $cbkgv
|
|
%ppvim[17] := $cxfv2
|
|
set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_LABEL,$543zt/$b2o1i & "." & ($543zt mod $b2o1i) & " " & @edixu)
|
|
set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_LABEL,$lynqa/$pfnw5 & "." & ($lynqa mod $pfnw5) & " " & @cxern)
|
|
set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_LABEL,$cbkgv/$yg3sr & "." & ($cbkgv mod $yg3sr) & " " & @aqf3u)
|
|
set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_LABEL,$cxfv2/$t3gfg & "." & ($cxfv2 mod $t3gfg) & " " & @3frwb)
|
|
set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[0]*100.0) & " %",0)
|
|
set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[1]*100.0) & " %",1)
|
|
end function
|
|
|
|
function STEPPER__set_preset_vals
|
|
$hl2ji := 0
|
|
while ($hl2ji<32)
|
|
%lfbyb[$hl2ji] := %stepper__preset_vals[$hl2ji]
|
|
%bswku[$hl2ji] := %stepper__preset_vals[$hl2ji+32]
|
|
inc($hl2ji)
|
|
end while
|
|
$qxgdn := %stepper__preset_vals[64]
|
|
$ilpk2 := %stepper__preset_vals[65]
|
|
call STEPPER__update_ui
|
|
end function
|
|
|
|
function update_mod_knob_ep_automation_label_for_gl_m_id
|
|
if (%vc4gu[$gpzoi]=100000)
|
|
@uamno := get_engine_par_disp(%q4mzh[$gpzoi],$51oxm+100,%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
|
|
else
|
|
if (%q4mzh[$gpzoi]<=0)
|
|
@uamno := " "
|
|
else
|
|
if (%fogcg[$gpzoi]=1)
|
|
$r0pwv := search(%zjgrf,%eujmz[$gpzoi])
|
|
if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],31)=1)
|
|
if (%sxlyt[8*$r0pwv+%hpc0e[$gpzoi]]=1)
|
|
$dyt1q := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)
|
|
$y1xwz := $dyt1q*(1+(sh_right(%sbnwu[$gpzoi]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($dyt1q-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$dyt1q,31))
|
|
$dyt1q := abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-$y1xwz)*15/1000000
|
|
@uamno := !um04d[$dyt1q]
|
|
else
|
|
@uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
else
|
|
@uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
else
|
|
if (%5zak5[$gpzoi]=0)
|
|
if (%vc4gu[$gpzoi]=100001)
|
|
@uamno := get_engine_par_disp(%q4mzh[$gpzoi],$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
|
|
if (%jeswc[$gpzoi]=231)
|
|
if ($zqnbc<0)
|
|
@uamno := "-" & @uamno
|
|
end if
|
|
end if
|
|
else
|
|
@uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
else
|
|
if (%q4mzh[$gpzoi]=$ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
|
|
$dyt1q := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)
|
|
$y1xwz := $dyt1q*(1+(sh_right(%sbnwu[$gpzoi]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($dyt1q-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$dyt1q,31))
|
|
@uamno := 100-($y1xwz/10000) & "/" & ($y1xwz/10000) & " %"
|
|
else
|
|
@uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
|
|
end function
|
|
|
|
function LAY_FX__sync_ui_to_engine
|
|
$xwusl := 0
|
|
while ($xwusl<39)
|
|
$lzf3q := %fs3hy[$xwusl]
|
|
$dyt1q := search(%zjgrf,%eujmz[$lzf3q])
|
|
if ((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*%xdshj[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))])>($xwusl mod 3))
|
|
%q4mzh[$lzf3q] := (1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+($xwusl mod 3)]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-56))]+($xwusl mod 3-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-57-1))]-1-($xwusl mod 3),31)*($xwusl mod 3-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-57-1))]-1))))])
|
|
else
|
|
%q4mzh[$lzf3q] := -1
|
|
end if
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]) # $EFFECT_TYPE_NONE)
|
|
!gh3f0[$lzf3q] := !1s04y[(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*%wmjdo[%0hhbc[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*($xwusl mod 3))]] & !njfof[-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])))))+($xwusl mod 3)]]
|
|
!isqic[$lzf3q] := !yyfkk[(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+($xwusl mod 3))] & !rnens[-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])))))+($xwusl mod 3)]]
|
|
else
|
|
!gh3f0[$lzf3q] := ""
|
|
!isqic[$lzf3q] := ""
|
|
end if
|
|
set_control_par_str(%vvlef[$lzf3q],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%vvlef[$lzf3q],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%vvlef[$lzf3q],$CONTROL_PAR_POS_Y),31))
|
|
set_control_par(%vvlef[$lzf3q],$CONTROL_PAR_PICTURE_STATE,(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$lzf3q])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$lzf3q])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])]]+($xwusl mod 3))+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$lzf3q])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])-$EFFECT_TYPE_FILTER)-1,31)*(%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])))))+($xwusl mod 3)]+106)))
|
|
if (%q4mzh[$lzf3q] # -1)
|
|
set_control_par_str(%41o3s[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,!isqic[$lzf3q])
|
|
set_control_par_str(%c1qym[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,!isqic[$lzf3q] & " Mod")
|
|
else
|
|
set_control_par_str(%41o3s[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,"")
|
|
set_control_par_str(%c1qym[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,"")
|
|
end if
|
|
set_control_par(%41o3s[$lzf3q],$CONTROL_PAR_DEFAULT_VALUE,%_FXC__fx_par_defs[3*%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]+($xwusl mod 3)])
|
|
if (%z3r0h[8*$dyt1q+%hpc0e[$lzf3q]]=1)
|
|
set_control_par(%41o3s[$lzf3q],$CONTROL_PAR_VALUE,get_control_par(%41o3s[$lzf3q],$CONTROL_PAR_DEFAULT_VALUE))
|
|
if ($xwusl mod 3=2)
|
|
%z3r0h[8*$dyt1q+%hpc0e[$lzf3q]] := 0
|
|
end if
|
|
end if
|
|
$gpzoi := $lzf3q
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
|
|
inc($xwusl)
|
|
end while
|
|
$xwusl := 0
|
|
while ($xwusl<4)
|
|
$g5k3r := 0
|
|
while ($g5k3r<8)
|
|
if (%2q55x[$xwusl*8+$g5k3r]=1)
|
|
%pqcgh[8*$xwusl+$g5k3r] := %pqcgh[8*$xwusl+$g5k3r]
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*$xwusl+$g5k3r]+1) mod 2,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
|
|
if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]],31)=1)
|
|
if ($xwusl<=1)
|
|
$0x4nk := search(%41o3s,%ce3ql[12*$xwusl+(3*$g5k3r)])
|
|
$dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
|
|
else
|
|
$dyt1q := $tcdg3+($fflhr*%ppvim[$rpdbb]/1000)
|
|
end if
|
|
%sxlyt[8*$xwusl+$g5k3r] := %sxlyt[8*$xwusl+$g5k3r]
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
if (%sxlyt[8*$xwusl+$g5k3r]=1)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]-$dyt1q)*15/1000000],%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
|
|
else
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]],$NI_SYNC_UNIT_ABS,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1))))]),$dyt1q,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
|
|
end if
|
|
end if
|
|
end if
|
|
inc($g5k3r)
|
|
end while
|
|
inc($xwusl)
|
|
end while
|
|
$g5k3r := 0
|
|
while ($g5k3r<5)
|
|
$xwusl := 0
|
|
while ($xwusl<4)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$g5k3r]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]])=$EFFECT_TYPE_FILTER)
|
|
set_control_par_str(%pfy4f[20*$g5k3r+10+$xwusl],$CONTROL_PAR_AUTOMATION_NAME,!gdlxl[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]]))))])
|
|
else
|
|
set_control_par_str(%pfy4f[20*$g5k3r+10+$xwusl],$CONTROL_PAR_AUTOMATION_NAME,!zufcx[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$g5k3r]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]])]])
|
|
end if
|
|
inc($xwusl)
|
|
end while
|
|
inc($g5k3r)
|
|
end while
|
|
end function
|
|
|
|
function FX__restore_settings
|
|
$ejy35 := 0
|
|
$n0kpw := 0
|
|
while ($n0kpw<4)
|
|
$e1wl4 := 0
|
|
$da5tg := 0
|
|
while ($da5tg<8)
|
|
if ($verq0>1)
|
|
$cz3ou := 1
|
|
exit
|
|
end if
|
|
if (%2q55x[$n0kpw*8+$da5tg]=1)
|
|
if (%45vq1[8*$n0kpw+$da5tg]=6)
|
|
$ejy35 := 0
|
|
$y1ewg := 0
|
|
while ($y1ewg<4)
|
|
$fh05a := 0
|
|
while ($fh05a<8)
|
|
if (%45vq1[8*$y1ewg+$fh05a]=6 and (%2q55x[$y1ewg*8+$fh05a]=1))
|
|
if ($ejy35=0)
|
|
$v2ky0 := $fh05a
|
|
$qscu5 := %zjgrf[$y1ewg]
|
|
$3qz3a := $y1ewg
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a]) # $EFFECT_TYPE_GAINER)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_GAINER,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,0,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
|
|
$ejy35 := 1
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
|
|
add_text_line($xhutf,"and is already inserted in")
|
|
add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
|
|
%45vq1[8*$y1ewg+$fh05a] := 8
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$y1ewg]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_NONE,%3wawk[$y1ewg],$n0kpw,%zjgrf[$y1ewg])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
end if
|
|
inc($fh05a)
|
|
end while
|
|
inc($y1ewg)
|
|
end while
|
|
else
|
|
if ($k240z=1)
|
|
$4qnnk := %44fry[%rx3ip[256*$n0kpw+(32*$da5tg)]]
|
|
$3tnu3 := 0
|
|
while ($3tnu3<%2nyh4[$4qnnk])
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_TYPE or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SEND_EFFECT_TYPE))
|
|
$dyt1q := get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
if ($dyt1q # %rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3])
|
|
%ihqwp[$e1wl4] := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3],%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
inc($e1wl4)
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*$n0kpw+$da5tg]+1) mod 2,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
end if
|
|
else
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_SUBTYPE)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]) # %rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3])
|
|
%ihqwp[$e1wl4] := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3],%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
inc($e1wl4)
|
|
end if
|
|
else
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
|
|
if ($dyt1q # $EFFECT_TYPE_IRC or ($afnek=-1))
|
|
%3zszw[8*$n0kpw+$da5tg] := %rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3]
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1))))]),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1))))]),0,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[8*$n0kpw+$da5tg]] & ".wav",$da5tg,%zjgrf[$n0kpw])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1))))]),$x202u,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
end if
|
|
end if
|
|
end if
|
|
inc($da5tg)
|
|
end while
|
|
$lwvso := 0
|
|
while ($lwvso<$e1wl4)
|
|
wait_async(%ihqwp[$lwvso])
|
|
inc($lwvso)
|
|
end while
|
|
inc($n0kpw)
|
|
end while
|
|
if ($k240z=1)
|
|
$n0kpw := 0
|
|
while ($n0kpw<4)
|
|
$da5tg := 0
|
|
while ($da5tg<8)
|
|
if (%2q55x[$n0kpw*8+$da5tg]=1)
|
|
if (%45vq1[8*$n0kpw+$da5tg] # 6)
|
|
$4qnnk := %44fry[%rx3ip[256*$n0kpw+(32*$da5tg)]]
|
|
$3tnu3 := 0
|
|
while ($3tnu3<%2nyh4[$4qnnk])
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # $ENGINE_PAR_EFFECT_TYPE and (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # $ENGINE_PAR_SEND_EFFECT_TYPE) and (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # $ENGINE_PAR_EFFECT_SUBTYPE) and (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # 080000000h))
|
|
set_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3],%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
end if
|
|
end if
|
|
inc($da5tg)
|
|
end while
|
|
inc($n0kpw)
|
|
end while
|
|
end if
|
|
call LAY_FX__sync_ui_to_engine
|
|
$k240z := 2
|
|
end function
|
|
|
|
function update_mod_range_automation_label_for_gl_m_id
|
|
if (?rylw5[$gpzoi]=1.0)
|
|
if ($gpzoi=12 and ($p5wl1=1))
|
|
call update_g_dis_sync_idx
|
|
@uamno := !qeoj3[$gv5ha]
|
|
else
|
|
if ($gpzoi=9)
|
|
@uamno := !qniir[((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12)*(1+(sh_right(12-((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12),31) .or. sh_right((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12),31))]
|
|
else
|
|
if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)>=0)
|
|
@uamno := get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)/%oazdd[$gpzoi]
|
|
else
|
|
@uamno := "-" & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/%oazdd[$gpzoi])
|
|
end if
|
|
if (%oazdd[$gpzoi]>=10)
|
|
@uamno := @uamno & "." & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)) mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10))
|
|
if (%oazdd[$gpzoi]>=100)
|
|
@uamno := @uamno & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)) mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100))
|
|
end if
|
|
end if
|
|
@uamno := @uamno & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
end if
|
|
else
|
|
if (%jeswc[$gpzoi]=310 and ($l4ujc=1) or (%jeswc[$gpzoi]=320 and ($x02cl=1)))
|
|
$dyt1q := ((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))*17-1)/1500
|
|
$dyt1q := $dyt1q*(1+(sh_right(num_elements(!je2na)-1-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((num_elements(!je2na)-1)*sh_right(num_elements(!je2na)-1-$dyt1q,31))
|
|
@uamno := !je2na[$dyt1q]
|
|
else
|
|
$dyt1q := real_to_int(pow((int_to_real(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))-int_to_real(%dwdw3[$gpzoi]))/(int_to_real(%sbnwu[$gpzoi])-int_to_real(%dwdw3[$gpzoi])),?rylw5[$gpzoi])*int_to_real(%qxmpr[$gpzoi])+int_to_real(%dwdw3[$gpzoi]))
|
|
$dyt1q := $dyt1q*(1+(sh_right(%sbnwu[$gpzoi]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($dyt1q-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$dyt1q,31))
|
|
@uamno := $dyt1q/%oazdd[$gpzoi] & "." & ($dyt1q mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10)) & ($dyt1q mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100)) & " " & !gh3f0[$gpzoi]
|
|
end if
|
|
end if
|
|
set_control_par_str(%c1qym[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
|
|
end function
|
|
|
|
function update_mod_range_ep_automation_label_for_gl_m_id
|
|
if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)<0)
|
|
@uamno := "-"
|
|
else
|
|
@uamno := ""
|
|
end if
|
|
if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_KEY_SHIFT)=1)
|
|
@uamno := @uamno & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/10000) & "." & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/100 mod 100) & "%"
|
|
else
|
|
@uamno := @uamno & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/10000) & "." & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/1000 mod 10) & "%"
|
|
end if
|
|
set_control_par_str(%c1qym[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
|
|
end function
|
|
|
|
function update_norm_knob_ep_automation_label_for_gl_nk_ep_id
|
|
if (%qpgwq[$4djds]=100000)
|
|
@uamno := get_engine_par_disp(%i5z0e[$4djds],$51oxm+100,%bjbtn[$4djds],%c40o1[$4djds]) & " " & !5hawr[$4djds]
|
|
else
|
|
if (%qpgwq[$4djds]=100001)
|
|
@uamno := get_engine_par_disp(%i5z0e[$4djds],$hdmk1,%bjbtn[$4djds],%c40o1[$4djds]) & " " & !5hawr[$4djds]
|
|
else
|
|
@uamno := get_engine_par_disp(%i5z0e[$4djds],%qpgwq[$4djds],%bjbtn[$4djds],%c40o1[$4djds]) & " " & !5hawr[$4djds]
|
|
end if
|
|
end if
|
|
set_control_par_str(%aazjf[$4djds],$CONTROL_PAR_LABEL,@uamno)
|
|
end function
|
|
|
|
function update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
set_control_par_str(%aazjf[$4djds],$CONTROL_PAR_LABEL,get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE)/%cy2pa[$4djds] & "." & abs(get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE) mod %cy2pa[$4djds]/(%cy2pa[$4djds]/10)) & " " & !5hawr[$4djds])
|
|
end function
|
|
|
|
function ARP__update_all_automation_labels
|
|
$h2jke := $0erls
|
|
set_control_par_str(get_ui_id($h2jke),$CONTROL_PAR_LABEL,get_menu_item_str(get_ui_id($0erls),$0erls))
|
|
set_control_par_str(get_ui_id($k5z4u),$CONTROL_PAR_LABEL,$k5z4u)
|
|
set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
|
|
end function
|
|
|
|
function update_all_mod_knob_automation_labels
|
|
$jdgl1 := 0
|
|
while ($jdgl1<num_elements(%3xxkk))
|
|
$gpzoi := %3xxkk[$jdgl1]
|
|
call _update_mod_knob_automation_label_for_gl_m_id
|
|
call update_mod_range_automation_label_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<num_elements(%pv2ax))
|
|
$gpzoi := %pv2ax[$jdgl1]
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
call update_mod_range_ep_automation_label_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$4djds := 0
|
|
while ($4djds<26)
|
|
call update_norm_knob_ep_automation_label_for_gl_nk_ep_id
|
|
inc($4djds)
|
|
end while
|
|
$4djds := 1
|
|
call update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
$4djds := 2
|
|
call update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
$4djds := 3
|
|
call update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
$4djds := 4
|
|
call update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
$4djds := 0
|
|
call update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
call ARP__update_all_automation_labels
|
|
end function
|
|
|
|
function SHP1__update_pos_ind_width
|
|
~zxkmy := 256.0/int_to_real($gllpo)
|
|
end function
|
|
|
|
function SHP1__update_mod_vals_and_refresh_ui
|
|
$oj0wr := 1
|
|
call SHP1__update_mod_vals
|
|
call MOD__perform_full_update
|
|
$oj0wr := 0
|
|
end function
|
|
|
|
function SHP1__update_tb_display
|
|
call SHP1__update_pos_ind_width
|
|
set_table_steps_shown(%w0xec,$gllpo)
|
|
call SHP1__update_mod_vals_and_refresh_ui
|
|
end function
|
|
|
|
function SHP2__update_pos_ind_width
|
|
~c2vo0 := 256.0/int_to_real($hn35i)
|
|
end function
|
|
|
|
function SHP2__update_mod_vals_and_refresh_ui
|
|
$oj0wr := 1
|
|
call SHP2__update_mod_vals
|
|
call MOD__perform_full_update
|
|
$oj0wr := 0
|
|
end function
|
|
|
|
function SHP2__update_tb_display
|
|
call SHP2__update_pos_ind_width
|
|
set_table_steps_shown(%rzzs4,$hn35i)
|
|
call SHP2__update_mod_vals_and_refresh_ui
|
|
end function
|
|
|
|
function SHAPER__update_displays
|
|
call SHP1__update_tb_display
|
|
call SHP2__update_tb_display
|
|
end function
|
|
|
|
function MACRO__update_labels_and_automation_names
|
|
set_control_par_str(get_ui_id($siaxq),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $siaxq)
|
|
set_control_par_str(get_ui_id($yazuk),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $yazuk)
|
|
set_control_par(get_ui_id($ajvki),$CONTROL_PAR_PICTURE_STATE,$siaxq)
|
|
set_control_par(get_ui_id($a4om3),$CONTROL_PAR_PICTURE_STATE,$yazuk)
|
|
set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$siaxq],0)
|
|
set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$yazuk],1)
|
|
set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$uyjwl])
|
|
set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$4so5t])
|
|
set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$q1nql])
|
|
set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$5q4fp])
|
|
end function
|
|
|
|
function update_perform_animation
|
|
set_control_par(get_ui_id($5rsow),$CONTROL_PAR_PICTURE_STATE,real_to_int((2.0-?xy[0]-?xy[1])/2.0*49.0))
|
|
end function
|
|
|
|
function update_ui_after_preset_reload
|
|
call MOD__position_all_mod_menus
|
|
if ($siaxq=0)
|
|
set_control_par(get_ui_id($siaxq),$CONTROL_PAR_VALUE,2)
|
|
end if
|
|
if ($yazuk=0)
|
|
set_control_par(get_ui_id($yazuk),$CONTROL_PAR_VALUE,2)
|
|
end if
|
|
$fg4rw := 0
|
|
while ($fg4rw<=3)
|
|
if (get_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_VALUE)=0)
|
|
set_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_VALUE,2)
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
call TABS__reset_position_after_preset_load
|
|
call update_preset_name_displays
|
|
call update_g_interval_mode
|
|
set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"GE_g_crs_rel_dir_" & $va2lk)
|
|
call MOD__recall_ext_mod_storage
|
|
call evaluate_mod_connections
|
|
if ($mdykc=2 and in_range($0ib2k,1,4))
|
|
call MTX__update_ui
|
|
end if
|
|
~tptmd := int_to_real($gnlj2)/1000000.0
|
|
call update_g_pos_hit_anker_ui
|
|
call FX__restore_settings
|
|
call ARP__on_mode_changed
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
call FX__set_SMPL_filter_parameters
|
|
if ($verq0>1)
|
|
$cz3ou := 1
|
|
exit
|
|
end if
|
|
if ($4hpei=1)
|
|
$4hpei := 0
|
|
else
|
|
call NAV_PAGE__update_main_nav
|
|
end if
|
|
set_control_par(get_ui_id($dxpqd),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
call set_all_engine_par_norm_knobs
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_automation_labels
|
|
call SHAPER__update_displays
|
|
call STEPPER__update_ui
|
|
call LFO__update_ui
|
|
call ARP__update_filter_src_menus
|
|
call update_g_rng_max_label
|
|
call update_light_guide
|
|
call MACRO__update_labels_and_automation_names
|
|
call update_perform_animation
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET+1)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,2)
|
|
wait(100)
|
|
end function
|
|
|
|
function ARP__restore_from_preset_buffer
|
|
$q0o5r := %arp__preset_vals[0]
|
|
$0erls := %arp__preset_vals[1]
|
|
$2v40q := %arp__preset_vals[2]
|
|
$k5z4u := %arp__preset_vals[3]
|
|
$3rksw := %arp__preset_vals[4]
|
|
$ius2b := %arp__preset_vals[5]
|
|
$5sroo := 0
|
|
while ($5sroo<32)
|
|
%pyeoz[$5sroo] := %arp__preset_vals[40+$5sroo]
|
|
%0lu1d[$5sroo] := %arp__preset_vals[72+$5sroo]
|
|
inc($5sroo)
|
|
end while
|
|
end function
|
|
|
|
function ARP__update_mod_knob_ui
|
|
$gpzoi := 9
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 10
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 11
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function update_std_start_offs_from_s_wf_xy
|
|
$r0pwv := real_to_int((?3lzme[0]-0.0)*10000.0/1.0)
|
|
$r0pwv := $r0pwv-($5l3um*%ppvim[$f4o1c]/1000)
|
|
$dgu14 := $r0pwv*(1+(sh_right(10000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(10000*sh_right(10000-$r0pwv,31))
|
|
$gpzoi := 30
|
|
call on_mod_knob_for_gl_m_id
|
|
end function
|
|
|
|
function update_rootkey_array_for_g_user_sample
|
|
$a4np1 := 0
|
|
while ($a4np1<=127)
|
|
%_rootkey_offset_for_note[33664+$a4np1] := $a4np1-$aewcf
|
|
inc($a4np1)
|
|
end while
|
|
end function
|
|
|
|
function on_g_user_sample_root_key_changed
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_ROOT_KEY,$aewcf))
|
|
call update_rootkey_array_for_g_user_sample
|
|
call update_light_guide
|
|
end function
|
|
|
|
function on_s_user_sample_root_key_changed
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_ROOT_KEY,$v3y5j))
|
|
end function
|
|
|
|
function TABS__selection_did_change
|
|
$r3fzy := 0
|
|
while ($r3fzy<%gxveo[$ptarc])
|
|
set_control_par(%ejazl[4*$ptarc+$r3fzy],$CONTROL_PAR_VALUE,-sh_right(abs($r3fzy-%v5xab[$ptarc])-1,31))
|
|
inc($r3fzy)
|
|
end while
|
|
%h152r[$ptarc] := %v5xab[$ptarc]
|
|
$qlteh := %geafe[$ptarc]
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end function
|
|
|
|
function STEPPER__prepare_preset_buffer
|
|
$fg4rw := 0
|
|
while ($fg4rw<32)
|
|
%stepper__preset_vals[$fg4rw] := %lfbyb[$fg4rw]
|
|
%stepper__preset_vals[$fg4rw+32] := %bswku[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
%stepper__preset_vals[64] := $qxgdn
|
|
%stepper__preset_vals[65] := $ilpk2
|
|
end function
|
|
|
|
function FXC__prepare_storage_array
|
|
$3tnu3 := 0
|
|
while ($3tnu3<num_elements(%3zszw))
|
|
%vhqqa[$3tnu3] := %3zszw[$3tnu3]
|
|
%vhqqa[48+$3tnu3] := %45vq1[$3tnu3]
|
|
%vhqqa[96+$3tnu3] := %l2lis[$3tnu3]
|
|
%vhqqa[144+$3tnu3] := %pqcgh[$3tnu3]
|
|
%vhqqa[192+$3tnu3] := %sxlyt[$3tnu3]
|
|
inc($3tnu3)
|
|
end while
|
|
end function
|
|
|
|
function FX__reorder_after_tab_swap
|
|
inc($owq4s)
|
|
while ($gmcfe=1)
|
|
wait(100000)
|
|
end while
|
|
$gmcfe := 1
|
|
$irlfd := $ptarc
|
|
$hu1za := 0
|
|
while ($hu1za<num_elements(%ejazl))
|
|
%d0oml[$hu1za] := %ejazl[$hu1za]
|
|
inc($hu1za)
|
|
end while
|
|
$hu1za := 0
|
|
while ($hu1za<%gxveo[$irlfd])
|
|
$4qnnk := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])=$EFFECT_TYPE_GAINER)
|
|
call STEPPER__prepare_preset_buffer
|
|
end if
|
|
$3tnu3 := 0
|
|
while ($3tnu3<%2nyh4[$4qnnk])
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
|
|
%rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3] := %3zszw[8*%rdbw1[$irlfd]+$hu1za]
|
|
else
|
|
%rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3] := get_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SCOMP_ATTACK or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SCOMP_RELEASE))
|
|
%rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3] := %rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3]+1
|
|
end if
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
$412pd := 0
|
|
while ($412pd<3)
|
|
$dyt1q := search(%41o3s,%ce3ql[12*$irlfd+(3*$hu1za)+$412pd])
|
|
%d03k4[12*$irlfd+(3*$hu1za)+$412pd] := get_control_par(%ce3ql[12*$irlfd+(3*$hu1za)+$412pd],$CONTROL_PAR_VALUE)
|
|
%2e42a[12*$irlfd+(3*$hu1za)+$412pd] := get_control_par(%c1qym[$dyt1q],$CONTROL_PAR_VALUE)
|
|
%kdfz1[12*$irlfd+(3*$hu1za)+$412pd] := get_control_par(%n34di[$dyt1q],$CONTROL_PAR_VALUE)
|
|
inc($412pd)
|
|
end while
|
|
inc($hu1za)
|
|
end while
|
|
call FXC__prepare_storage_array
|
|
$hu1za := 0
|
|
while ($hu1za<%gxveo[$irlfd])
|
|
if (%d0oml[4*$irlfd+$hu1za] # %n5ge0[8*%rdbw1[$irlfd]+$hu1za])
|
|
$pi54y := search(%n5ge0,%d0oml[4*$irlfd+$hu1za]) mod %gxveo[$irlfd]
|
|
$4qnnk := %44fry[%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)]]
|
|
$3tnu3 := 0
|
|
while ($3tnu3<%2nyh4[$4qnnk])
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_TYPE or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SEND_EFFECT_TYPE))
|
|
$dyt1q := get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
if ($dyt1q # %rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3])
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*%rdbw1[$irlfd]+$pi54y]+1) mod 2,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
end if
|
|
else
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_SUBTYPE)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]) # %rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3])
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
else
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
|
|
if ($dyt1q # $EFFECT_TYPE_IRC or ($afnek=-1))
|
|
%3zszw[8*%rdbw1[$irlfd]+$hu1za] := %rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3]
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1))))]),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1))))]),0,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[8*%rdbw1[$irlfd]+$hu1za]] & ".wav",$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1))))]),$x202u,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
end if
|
|
else
|
|
set_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
|
|
end if
|
|
end if
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
$412pd := 0
|
|
while ($412pd<3)
|
|
$dyt1q := search(%41o3s,%ce3ql[12*$irlfd+(3*$hu1za)+$412pd])
|
|
set_control_par(%ce3ql[12*$irlfd+(3*$hu1za)+$412pd],$CONTROL_PAR_VALUE,%d03k4[12*$irlfd+(3*$pi54y)+$412pd])
|
|
set_control_par(%c1qym[$dyt1q],$CONTROL_PAR_VALUE,%2e42a[12*$irlfd+(3*$pi54y)+$412pd])
|
|
set_control_par(%n34di[$dyt1q],$CONTROL_PAR_VALUE,%kdfz1[12*$irlfd+(3*$pi54y)+$412pd])
|
|
inc($412pd)
|
|
end while
|
|
%3zszw[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[8*%rdbw1[$irlfd]+$pi54y]
|
|
%45vq1[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[48+(8*%rdbw1[$irlfd])+$pi54y]
|
|
%l2lis[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[96+(8*%rdbw1[$irlfd])+$pi54y]
|
|
%pqcgh[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[144+(8*%rdbw1[$irlfd])+$pi54y]
|
|
%sxlyt[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[192+(8*%rdbw1[$irlfd])+$pi54y]
|
|
end if
|
|
if (get_control_par(%ejazl[4*$irlfd+$hu1za],$CONTROL_PAR_VALUE)=1)
|
|
%v5xab[$irlfd] := $hu1za
|
|
%h152r[%geafe[$irlfd]] := $hu1za
|
|
end if
|
|
inc($hu1za)
|
|
end while
|
|
$hu1za := 0
|
|
while ($hu1za<%gxveo[$irlfd])
|
|
if (%45vq1[8*%rdbw1[$irlfd]+$hu1za]=6)
|
|
$ejy35 := 0
|
|
$y1ewg := 0
|
|
while ($y1ewg<4)
|
|
$fh05a := 0
|
|
while ($fh05a<8)
|
|
if (%45vq1[8*$y1ewg+$fh05a]=6 and (%2q55x[$y1ewg*8+$fh05a]=1))
|
|
if ($ejy35=0)
|
|
$v2ky0 := $fh05a
|
|
$qscu5 := %zjgrf[$y1ewg]
|
|
$3qz3a := $y1ewg
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a]) # $EFFECT_TYPE_GAINER)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_GAINER,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,0,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
|
|
$ejy35 := 1
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
|
|
add_text_line($xhutf,"and is already inserted in")
|
|
add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
|
|
%45vq1[8*$y1ewg+$fh05a] := 8
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$y1ewg]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_NONE,%3wawk[$y1ewg],$hu1za,%zjgrf[$y1ewg])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
end if
|
|
inc($fh05a)
|
|
end while
|
|
inc($y1ewg)
|
|
end while
|
|
end if
|
|
inc($hu1za)
|
|
end while
|
|
$dyt1q := 0
|
|
$hu1za := 0
|
|
while ($hu1za<4)
|
|
$412pd := 0
|
|
while ($412pd<%wvg1x[$hu1za])
|
|
%n5ge0[8*$hu1za+$412pd] := %d0oml[$dyt1q]
|
|
inc($dyt1q)
|
|
inc($412pd)
|
|
end while
|
|
inc($hu1za)
|
|
end while
|
|
if ($owq4s=1)
|
|
call evaluate_mod_connections
|
|
call LAY_FX__sync_ui_to_engine
|
|
$qlteh := %geafe[$irlfd]
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end if
|
|
dec($owq4s)
|
|
$gmcfe := 0
|
|
call MOD__position_all_mod_menus
|
|
end function
|
|
|
|
function TABS__order_did_change
|
|
call FX__reorder_after_tab_swap
|
|
end function
|
|
|
|
function _TABS__animate
|
|
if ($ear3d=0)
|
|
$ear3d := 1
|
|
while ($ear3d=1)
|
|
$ear3d := 0
|
|
$utjil := 0
|
|
while ($utjil<4)
|
|
$d3vlq := 0
|
|
while ($d3vlq<%gxveo[$utjil])
|
|
$nkklz := %pxakq[$utjil]+($d3vlq*66)
|
|
$od12p := get_control_par(%ejazl[4*$utjil+$d3vlq],$CONTROL_PAR_POS_X)
|
|
if ($od12p # $nkklz and (%ejazl[4*$utjil+$d3vlq] # $iwpwh))
|
|
$ear3d := 1
|
|
$rqqww := ($nkklz-$od12p)*20/100
|
|
if ($rqqww=0)
|
|
set_control_par(%ejazl[4*$utjil+$d3vlq],$CONTROL_PAR_POS_X,$nkklz)
|
|
else
|
|
set_control_par(%ejazl[4*$utjil+$d3vlq],$CONTROL_PAR_POS_X,$od12p+$rqqww)
|
|
end if
|
|
end if
|
|
inc($d3vlq)
|
|
end while
|
|
inc($utjil)
|
|
end while
|
|
if ($ear3d=1)
|
|
wait(16000)
|
|
end if
|
|
end while
|
|
end if
|
|
end function
|
|
|
|
function TABS__on_xy
|
|
$wry2j := $ptarc
|
|
$odmi5 := real_to_int(~tllyo*int_to_real(get_control_par(%d2t1g[$wry2j],$CONTROL_PAR_WIDTH)))
|
|
$zpa1n := $odmi5/66
|
|
select ($sfqck)
|
|
case 1
|
|
if ($odmi5 mod 66>55)
|
|
$1fg0q := 0
|
|
exit
|
|
else
|
|
$1fg0q := 1
|
|
$iwpwh := %ejazl[4*$wry2j+$zpa1n]
|
|
$0eeyn := $odmi5
|
|
$nsffy := get_control_par($iwpwh,$CONTROL_PAR_POS_X)
|
|
$yyqo2 := $zpa1n
|
|
$ikf00 := $zpa1n
|
|
end if
|
|
case 2
|
|
if ($1fg0q=1)
|
|
%v5xab[$wry2j] := $zpa1n
|
|
call TABS__selection_did_change
|
|
end if
|
|
$1fg0q := 0
|
|
$iwpwh := 0
|
|
if ($vp2vr=1)
|
|
call TABS__order_did_change
|
|
$vp2vr := 0
|
|
end if
|
|
call _TABS__animate
|
|
case 3
|
|
if ($1fg0q=0 or ($iwpwh=0))
|
|
exit
|
|
end if
|
|
$1fg0q := 2
|
|
if ($zpa1n>$yyqo2)
|
|
$cbdm5 := $yyqo2
|
|
while ($cbdm5<$zpa1n)
|
|
%ejazl[4*$wry2j+$cbdm5] := %ejazl[4*$wry2j+$cbdm5+1]
|
|
inc($cbdm5)
|
|
end while
|
|
$yyqo2 := $zpa1n
|
|
%ejazl[4*$wry2j+$zpa1n] := $iwpwh
|
|
$vp2vr := 1
|
|
call _TABS__animate
|
|
else
|
|
if ($zpa1n<$yyqo2)
|
|
$cbdm5 := $yyqo2
|
|
while ($cbdm5>=($zpa1n+1))
|
|
%ejazl[4*$wry2j+$cbdm5] := %ejazl[4*$wry2j+($cbdm5-1)]
|
|
dec($cbdm5)
|
|
end while
|
|
%ejazl[4*$wry2j+$zpa1n] := $iwpwh
|
|
$yyqo2 := $zpa1n
|
|
$vp2vr := 1
|
|
call _TABS__animate
|
|
end if
|
|
end if
|
|
$ufovt := $nsffy+($odmi5-$0eeyn)
|
|
if ($ufovt<%pxakq[$wry2j])
|
|
$ufovt := %pxakq[$wry2j]
|
|
else
|
|
if ($ufovt>(%pxakq[$wry2j]+((%gxveo[$wry2j]-1)*66)))
|
|
$ufovt := %pxakq[$wry2j]+((%gxveo[$wry2j]-1)*66)
|
|
end if
|
|
end if
|
|
if ($iwpwh # 0)
|
|
if (abs($ufovt-(%pxakq[$wry2j]+($zpa1n*66)))<20 and ($ikf00 # $zpa1n))
|
|
set_control_par($iwpwh,$CONTROL_PAR_POS_X,%pxakq[$wry2j]+($zpa1n*66))
|
|
$ikf00 := -1
|
|
else
|
|
set_control_par($iwpwh,$CONTROL_PAR_POS_X,$ufovt)
|
|
end if
|
|
end if
|
|
end select
|
|
end function
|
|
|
|
function _load_fx_preset_for_gl_vars
|
|
%45vq1[8*$jtvhn+$g2apy] := $pgdcw
|
|
%l2lis[8*$jtvhn+$g2apy] := $euybr
|
|
if ($pgdcw=6 and ($jtvhn # 3))
|
|
$ejy35 := 0
|
|
$y1ewg := 0
|
|
while ($y1ewg<4)
|
|
$fh05a := 0
|
|
while ($fh05a<8)
|
|
if (%45vq1[8*$y1ewg+$fh05a]=6 and (%2q55x[$y1ewg*8+$fh05a]=1))
|
|
if ($ejy35=0)
|
|
$v2ky0 := $fh05a
|
|
$qscu5 := %zjgrf[$y1ewg]
|
|
$3qz3a := $y1ewg
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a]) # $EFFECT_TYPE_GAINER)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_GAINER,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,0,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
|
|
$ejy35 := 1
|
|
if ($k240z=2)
|
|
$m2etg := 1
|
|
pgs_set_key_val(PGS_FUNC,0,3)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
call STEPPER__set_preset_vals
|
|
end if
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
|
|
add_text_line($xhutf,"and is already inserted in")
|
|
add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
|
|
%45vq1[8*$y1ewg+$fh05a] := 8
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$y1ewg]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_NONE,%3wawk[$y1ewg],$g2apy,%zjgrf[$y1ewg])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
end if
|
|
inc($fh05a)
|
|
end while
|
|
inc($y1ewg)
|
|
end while
|
|
else
|
|
$m2etg := 1
|
|
pgs_set_key_val(PGS_FUNC,0,2)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
$4qnnk := %44fry[%preset_buf[0]]
|
|
$3tnu3 := 0
|
|
while ($3tnu3<%2nyh4[$4qnnk])
|
|
%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3] := %preset_buf[$3tnu3]
|
|
inc($3tnu3)
|
|
end while
|
|
$4qnnk := %44fry[%rx3ip[256*$jtvhn+(32*$g2apy)]]
|
|
$3tnu3 := 0
|
|
while ($3tnu3<%2nyh4[$4qnnk])
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_TYPE or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SEND_EFFECT_TYPE))
|
|
$dyt1q := get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
if ($dyt1q # %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3])
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3],%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*$jtvhn+$g2apy]+1) mod 2,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
end if
|
|
else
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_SUBTYPE)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]) # %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3])
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3],%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
else
|
|
if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
|
|
if ($dyt1q # $EFFECT_TYPE_IRC or ($afnek=-1))
|
|
%3zszw[8*$jtvhn+$g2apy] := %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3]
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1))))]),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1))))]),0,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[8*$jtvhn+$g2apy]] & ".wav",$g2apy,%zjgrf[$jtvhn])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1))))]),$x202u,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
end if
|
|
else
|
|
set_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3],%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
|
|
end if
|
|
end if
|
|
end if
|
|
inc($3tnu3)
|
|
end while
|
|
end if
|
|
end function
|
|
|
|
function FX_UI__on_fx_cat_btn
|
|
$05pba := $jldiw mod 10
|
|
$qlteh := $jldiw/10+-sh_right(abs($0ib2k-4)-1,31)
|
|
if ($05pba # %45vq1[8*%mpjcc[$qlteh]+%h152r[$qlteh]])
|
|
if ($05pba=6 and ($ejy35=1))
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
|
|
add_text_line($xhutf,"and is already inserted in")
|
|
add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
|
|
else
|
|
if (%45vq1[8*%mpjcc[$qlteh]+%h152r[$qlteh]]=6)
|
|
$ejy35 := 0
|
|
end if
|
|
%45vq1[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := $05pba
|
|
$jtvhn := %mpjcc[$qlteh]
|
|
$g2apy := %h152r[$qlteh]
|
|
$pgdcw := $jldiw mod 10
|
|
$euybr := 0
|
|
call _load_fx_preset_for_gl_vars
|
|
%z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1
|
|
call LAY_FX__sync_ui_to_engine
|
|
if ($05pba # 8)
|
|
set_control_par(%pfy4f[20*$qlteh+10+%h152r[$qlteh]],$CONTROL_PAR_VALUE,1)
|
|
%pqcgh[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*%mpjcc[$qlteh]+%h152r[$qlteh]]+1) mod 2,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])
|
|
end if
|
|
end if
|
|
end if
|
|
set_control_par(%pfy4f[20*$qlteh+4],$CONTROL_PAR_VALUE,0)
|
|
$qlteh := $qlteh
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end function
|
|
|
|
function BOTTOM_TABS__on_click
|
|
$fg4rw := 0
|
|
while ($fg4rw<3)
|
|
set_control_par(%23vl1[$fg4rw],$CONTROL_PAR_VALUE,-sh_right(abs($fg4rw-$mdykc)-1,31))
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$y0aji := 0
|
|
while ($y0aji<=31)
|
|
if (sh_right(1040 .or. (64 .and. .not. %konvz[$mdykc]),$y0aji) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$y0aji) .and. 1=1))
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
inc($y0aji)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<200)
|
|
$y0aji := 0
|
|
while ($y0aji<=31)
|
|
if (sh_right(%konvz[$mdykc],$y0aji) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$y0aji) .and. 1=1))
|
|
$g5k3r := 0
|
|
while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
|
|
set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
|
|
inc($g5k3r)
|
|
end while
|
|
end if
|
|
inc($y0aji)
|
|
end while
|
|
inc($fg4rw)
|
|
end while
|
|
call BOTTOM_TABS__update_ui
|
|
end function
|
|
|
|
function BRW__update_cat_mask_and_apply
|
|
$lpg20 := 0
|
|
while ($lpg20<2)
|
|
%iz114[4*$zor2m+(2*$lpg20)] := 0
|
|
%iz114[4*$zor2m+(2*$lpg20)+1] := 0
|
|
inc($lpg20)
|
|
end while
|
|
$lz0yu := 0
|
|
while ($lz0yu<4)
|
|
$rc1ud := 0
|
|
while ($rc1ud<18)
|
|
if ($bgdzw=1)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE,0)
|
|
%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud] := 0
|
|
else
|
|
if (get_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE)=1 and ($rc1ud<%ey2zb[$zor2m*4+$lz0yu]))
|
|
$dyt1q := %0mw41[%t1pnk[$zor2m*4+$lz0yu]+$rc1ud]
|
|
%iz114[4*$zor2m+(2*($dyt1q/32))] := %iz114[4*$zor2m+(2*($dyt1q/32))] .or. sh_left((%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud]+1) mod 2,$dyt1q mod 32)
|
|
%iz114[4*$zor2m+(2*($dyt1q/32))+1] := %iz114[4*$zor2m+(2*($dyt1q/32))+1] .or. sh_left(%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud],$dyt1q mod 32)
|
|
end if
|
|
end if
|
|
inc($rc1ud)
|
|
end while
|
|
inc($lz0yu)
|
|
end while
|
|
$bgdzw := 0
|
|
call BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
if (%kt24s[$zor2m] # -1)
|
|
$z2tnd := ((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000)*(1+(sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31) .or. sh_right((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000-0,31)))-0-(1000*sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31))
|
|
end if
|
|
call BRW__update_search_result_list_ui
|
|
end function
|
|
|
|
function _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
$dyt1q := %djxm0[18*($otddp/18)+($otddp mod 18)]
|
|
%e0xxd[72*$zor2m+(18*($otddp/18))+($otddp mod 18)] := get_control_par($dyt1q,$CONTROL_PAR_KEY_CONTROL) .and. get_control_par($dyt1q,$CONTROL_PAR_VALUE)
|
|
call BRW__update_cat_mask_and_apply
|
|
$r0pwv := %aydym[%blrx5[$zor2m+(%e0xxd[72*$zor2m+(18*($otddp/18))+($otddp mod 18)]*3)]]
|
|
set_control_par(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_FONT_TYPE_ON,$r0pwv)
|
|
set_control_par(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_FONT_TYPE_ON_HOVER,$r0pwv)
|
|
set_control_par(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_FONT_TYPE_ON_PRESSED,$r0pwv)
|
|
set_control_par_str(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_TEXT,!udzrt[%0sc2s[$zor2m*4+($otddp/18)]+($otddp mod 18)])
|
|
end function
|
|
|
|
function BRW__close_ui
|
|
$0ib2k := (1+(sh_right(4-$luyp1,31) .or. sh_right($luyp1-0,31)))*$luyp1
|
|
$lz0yu := 0
|
|
while ($lz0yu<4)
|
|
$rc1ud := 0
|
|
while ($rc1ud<18)
|
|
set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($rc1ud)
|
|
end while
|
|
inc($lz0yu)
|
|
end while
|
|
$lz0yu := 0
|
|
while ($lz0yu<19)
|
|
set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($lz0yu)
|
|
end while
|
|
call NAV_PAGE__update_main_nav
|
|
end function
|
|
|
|
function _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
$hb51u := 0
|
|
if ($ax53k=$y1xhf and ($ENGINE_UPTIME-$5nvbg<300 or ($oppog=1)))
|
|
set_control_par(%wqnrl[$y1xhf],$CONTROL_PAR_VALUE,1)
|
|
call BRW__close_ui
|
|
$hb51u := 1
|
|
exit
|
|
end if
|
|
$5nvbg := $ENGINE_UPTIME
|
|
if ($ax53k=$y1xhf)
|
|
wait(300000)
|
|
end if
|
|
$ax53k := $y1xhf
|
|
%kt24s[$zor2m] := $fykja+$y1xhf
|
|
%jj5qi[$zor2m] := %3owef[500*$zor2m+%kt24s[$zor2m]]
|
|
call BRW__update_search_result_selection
|
|
end function
|
|
|
|
function set_all_engine_par_mod_knobs
|
|
$jdgl1 := 0
|
|
while ($jdgl1<2)
|
|
$gpzoi := %ulgib[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<48)
|
|
$gpzoi := %xdonk[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
end function
|
|
|
|
function on_selected_g_group_changed
|
|
$cm312 := 1
|
|
call update_main_snapshot_name_display
|
|
call update_g_xy_for_user_sample
|
|
call update_g_source_name_display
|
|
call set_all_engine_par_mod_knobs
|
|
$r5war := -1
|
|
call update_g_formant_shift_control
|
|
call update_light_guide
|
|
end function
|
|
|
|
function MOD__update_mono_start_mode
|
|
select ($zdrta)
|
|
case 3
|
|
$fg4rw := 0
|
|
while (%0wsff[$fg4rw]=0 and ($fg4rw<=(num_elements(%0wsff)-2)))
|
|
inc($fg4rw)
|
|
end while
|
|
$qbqpm := $fg4rw
|
|
case 2
|
|
$fg4rw := num_elements(%0wsff)-1
|
|
while (%0wsff[$fg4rw]=0 and ($fg4rw>0))
|
|
dec($fg4rw)
|
|
end while
|
|
$qbqpm := $fg4rw
|
|
end select
|
|
end function
|
|
|
|
function stop_all_pedal_notes
|
|
$iva44 := 0
|
|
$0e0hy := $0e0hy-$sgrou
|
|
$sgrou := 0
|
|
if ($t4vew=1)
|
|
if ($ruhe4=1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<$h3axx)
|
|
$dyt1q := %sef3k[$fg4rw]
|
|
if (%KEY_DOWN[$dyt1q]=0)
|
|
$swdze := search(%br0tn,$dyt1q)
|
|
if ($swdze # -1)
|
|
%br0tn[$swdze] := %wwz2v[$0erls]
|
|
call ARP__update_notes
|
|
end if
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
if ($mcp2m=1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<$rf3ya)
|
|
%0wsff[get_event_par(%srzwv[$fg4rw],$EVENT_PAR_2)] := 0
|
|
%jnhix[%laljf[%srzwv[$fg4rw] mod 8192]] := 1
|
|
note_off(%srzwv[$fg4rw])
|
|
%srzwv[$fg4rw] := -1
|
|
inc($fg4rw)
|
|
end while
|
|
$rf3ya := 0
|
|
else
|
|
if ($0e0hy=0)
|
|
note_off($auli3)
|
|
%jnhix[%laljf[$auli3 mod 8192]] := 1
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
$tsm3s := $ENGINE_UPTIME
|
|
$fg4rw := 0
|
|
while ($fg4rw<$h3axx)
|
|
set_event_par(%medyt[$fg4rw],$EVENT_PAR_0,3)
|
|
%0wsff[get_event_par(%medyt[$fg4rw],$EVENT_PAR_NOTE)] := 0
|
|
%lx5kr[%sef3k[$fg4rw]] := -1
|
|
%medyt[$fg4rw] := -1
|
|
%sef3k[$fg4rw] := -1
|
|
inc($fg4rw)
|
|
end while
|
|
$h3axx := 0
|
|
call MOD__update_mono_start_mode
|
|
end function
|
|
|
|
function stop_all_notes
|
|
call stop_all_pedal_notes
|
|
get_event_ids(%dhweu)
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dhweu) and (%dhweu[$fg4rw] # 0))
|
|
if (get_event_par(%dhweu[$fg4rw],$EVENT_PAR_0)>=0)
|
|
set_event_par(%dhweu[$fg4rw],$EVENT_PAR_0,4)
|
|
%jnhix[%laljf[%dhweu[$fg4rw] mod 8192]] := 1
|
|
else
|
|
if (get_event_par(%dhweu[$fg4rw],$EVENT_PAR_0)=-1)
|
|
note_off(%dhweu[$fg4rw])
|
|
fade_out(%dhweu[$fg4rw],1,1)
|
|
end if
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%srzwv))
|
|
%medyt[$fg4rw] := -1
|
|
%srzwv[$fg4rw] := -1
|
|
%lx5kr[$fg4rw] := -1
|
|
%sef3k[$fg4rw] := -1
|
|
inc($fg4rw)
|
|
end while
|
|
call ARP__remove_all_notes_and_reset
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%0wsff))
|
|
%0wsff[$kyxij] := 0
|
|
inc($kyxij)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%dz3eb[$fg4rw] := 0
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($fg4rw)
|
|
end while
|
|
$pdzso := 0
|
|
$kyxij := 0
|
|
while ($kyxij<num_elements(%mc3xd))
|
|
%mc3xd[$kyxij] := 0
|
|
inc($kyxij)
|
|
end while
|
|
end function
|
|
|
|
function _BRW__cue_snapshot_load
|
|
inc($verq0)
|
|
while ($oppog=1)
|
|
wait(3000)
|
|
end while
|
|
if ($verq0=1)
|
|
$oppog := 1
|
|
$cz3ou := 0
|
|
call stop_all_notes
|
|
$afnek := -1
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,0,-1,6,$NI_BUS_OFFSET)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,0,-1,6,$NI_BUS_OFFSET+1)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,0,-1,6,2)
|
|
wait(100)
|
|
$cm312 := 0
|
|
@cs0dz := !_BRW__preset_names[1000+%jj5qi[2]]
|
|
@3cyqr := @pua5f & @cs0dz & ".nka"
|
|
$d1d43 := 1
|
|
if ($0ib2k # 4 and ($0ib2k # 3) and ($mdykc # 0))
|
|
$4hpei := 1
|
|
end if
|
|
if (in_range($0ib2k,5,7))
|
|
$uciwo := 0
|
|
end if
|
|
pgs_set_key_val(PGS_FUNC,0,5)
|
|
while ($d1d43 # -1 and ($cz3ou=0))
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
end function
|
|
|
|
function _BRW__load_preset_for_b_type
|
|
call BRW__update_preset_name_display
|
|
select ($zor2m)
|
|
case 0
|
|
$51oxm := %BRW__grp_remap[%jj5qi[$zor2m]+100]-100
|
|
call on_selected_g_group_changed
|
|
case 1
|
|
if (%jj5qi[$zor2m]=100)
|
|
if ($NUM_GROUPS=365)
|
|
$hdmk1 := 364
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Please reload the Straylight nki from the Library Tab to enabled User Samples.")
|
|
exit
|
|
end if
|
|
else
|
|
$hdmk1 := %BRW__grp_remap[%jj5qi[$zor2m]]
|
|
end if
|
|
call on_selected_std_group_changed
|
|
case 2
|
|
call _BRW__cue_snapshot_load
|
|
if ($cz3ou=1)
|
|
dec($verq0)
|
|
$oppog := 0
|
|
exit
|
|
end if
|
|
if ($verq0 # 1)
|
|
dec($verq0)
|
|
exit
|
|
end if
|
|
end select
|
|
end function
|
|
|
|
function prepare_purge
|
|
$fg4rw := 0
|
|
while ($fg4rw<$NUM_GROUPS)
|
|
if ($fg4rw=($51oxm+100) or ($fg4rw=$hdmk1))
|
|
%tuuuf[$fg4rw] := 1
|
|
else
|
|
%tuuuf[$fg4rw] := 0
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
end function
|
|
|
|
function BRW___do_clean_up_after_snapshot_load
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET+1)
|
|
set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,2)
|
|
wait(100)
|
|
$afnek := 1
|
|
dec($verq0)
|
|
$oppog := 0
|
|
end function
|
|
|
|
function _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
%_BRW__user_fav_array[500*$zor2m+%3owef[500*$zor2m+$fykja+$y1xhf]] := get_control_par(%4gyqw[$y1xhf],$CONTROL_PAR_VALUE)
|
|
if ($d5tn2=1)
|
|
call BRW__update_cat_mask_and_apply
|
|
end if
|
|
end function
|
|
|
|
function FX_UI__on_preset_menu_for_gl_set_id
|
|
$ibaqw := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]
|
|
$jtvhn := %mpjcc[$qlteh]
|
|
$g2apy := %h152r[$qlteh]
|
|
$pgdcw := %qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))
|
|
$euybr := get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))
|
|
call _load_fx_preset_for_gl_vars
|
|
%z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1+sh_right(abs(%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]-$ibaqw)-1,31)
|
|
call LAY_FX__sync_ui_to_engine
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
end function
|
|
|
|
function FX_UI__on_next_preset_btn_for_gl_set_id
|
|
$ibaqw := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]
|
|
set_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE,(get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))+1) mod %FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))])
|
|
$jtvhn := %mpjcc[$qlteh]
|
|
$g2apy := %h152r[$qlteh]
|
|
$pgdcw := %qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))
|
|
$euybr := get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))
|
|
call _load_fx_preset_for_gl_vars
|
|
%z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1+sh_right(abs(%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]-$ibaqw)-1,31)
|
|
call LAY_FX__sync_ui_to_engine
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
set_control_par(%pfy4f[20*$qlteh+5],$CONTROL_PAR_VALUE,0)
|
|
end function
|
|
|
|
function FX_UI__on_prev_preset_btn_for_gl_set_id
|
|
$ibaqw := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]
|
|
set_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE,(get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))+%FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))]-1) mod %FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))])
|
|
$jtvhn := %mpjcc[$qlteh]
|
|
$g2apy := %h152r[$qlteh]
|
|
$pgdcw := %qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))
|
|
$euybr := get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))
|
|
call _load_fx_preset_for_gl_vars
|
|
%z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1+sh_right(abs(%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]-$ibaqw)-1,31)
|
|
call LAY_FX__sync_ui_to_engine
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
set_control_par(%pfy4f[20*$qlteh+6],$CONTROL_PAR_VALUE,0)
|
|
end function
|
|
|
|
function _update_mod_range_label_for_gl_m_id
|
|
$22rrq := $gpzoi
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,"m: " & @uamno)
|
|
if (%jeswc[$gpzoi]=55)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask_8")
|
|
end if
|
|
if (%jeswc[$gpzoi]=330)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
|
|
if ($afnek=0)
|
|
%latnx[0] := 6
|
|
%latnx[1] := 6
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
%latnx[0] := 8
|
|
%latnx[1] := 8
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
$gpzoi := $22rrq
|
|
end if
|
|
end if
|
|
if (%jeswc[$gpzoi]=335)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
|
|
if ($afnek=0)
|
|
%latnx[0] := 7
|
|
%latnx[1] := 7
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
%latnx[0] := 8
|
|
%latnx[1] := 8
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
$gpzoi := $22rrq
|
|
end if
|
|
end if
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
|
|
%gmios[$gpzoi] := $ENGINE_UPTIME
|
|
end function
|
|
|
|
function on_mod_range_knob_for_gl_m_id
|
|
$tmkul := 0
|
|
if ($ENGINE_UPTIME-%gmios[$gpzoi]>800)
|
|
$kzcmg := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)
|
|
$eoj1p := %z15qu[$gpzoi]
|
|
end if
|
|
if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_KEY_ALT)=1)
|
|
set_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE,$kzcmg-((get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-$eoj1p)/2))
|
|
end if
|
|
%z15qu[$gpzoi] := get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call update_mod_range_automation_label_for_gl_m_id
|
|
call _update_mod_range_label_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function on_mod_source_for_gl_m_id
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
call evaluate_mod_connections
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function _on_mod_knob_engine_par_for_gl_m_id
|
|
call _handle_mod_knob_modifiers_for_gl_m_id
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,@uamno)
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
|
|
%gmios[$gpzoi] := $ENGINE_UPTIME
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function _on_mod_range_knob_engine_par_for_gl_m_id
|
|
$tmkul := 0
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call update_mod_range_ep_automation_label_for_gl_m_id
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,@uamno)
|
|
%gmios[$gpzoi] := $ENGINE_UPTIME
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function _on_mod_source_engine_par_for_gl_m_id
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
call evaluate_mod_connections
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end function
|
|
|
|
function _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
call set_norm_knob_group_engine_par_for_gl_nk_ep_id
|
|
call update_norm_knob_ep_automation_label_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[$4djds],$CONTROL_PAR_TEXT,@uamno)
|
|
set_control_par(%5comw[$4djds],$CONTROL_PAR_HIDE,get_control_par(%aazjf[$4djds],$CONTROL_PAR_HIDE))
|
|
%qdiwi[$4djds] := $ENGINE_UPTIME
|
|
end function
|
|
|
|
function _on_norm_knob_for_gl_nk_ep_id
|
|
call update_norm_knob_automation_label_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[$4djds],$CONTROL_PAR_TEXT,get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE) & " " & !5hawr[$4djds])
|
|
set_control_par(%5comw[$4djds],$CONTROL_PAR_HIDE,get_control_par(%aazjf[$4djds],$CONTROL_PAR_HIDE))
|
|
%qdiwi[$4djds] := $ENGINE_UPTIME
|
|
end function
|
|
|
|
on ui_control(?xy)
|
|
$2thol := real_to_int(?xy[0]*10000.0)
|
|
$jy3sd := real_to_int(?xy[1]*10000.0)
|
|
%ppvim[0] := real_to_int(?xy[0]*1000.0)
|
|
%ppvim[1] := real_to_int(?xy[1]*1000.0)
|
|
%latnx[0] := 0
|
|
%latnx[1] := 1
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[0]*100.0) & " %",0)
|
|
set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[1]*100.0) & " %",1)
|
|
call update_perform_animation
|
|
end on
|
|
|
|
on ui_control($4ainj)
|
|
end on
|
|
|
|
on ui_control($gcjlt)
|
|
end on
|
|
|
|
on ui_control($iyqua)
|
|
$qrpdp := 1
|
|
while ($iyqua=1)
|
|
set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_" & $qrpdp)
|
|
$qrpdp := ($qrpdp+1) mod 2
|
|
wait(500000)
|
|
end while
|
|
set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
|
|
end on
|
|
|
|
on ui_control($otffr)
|
|
$euiqi := 1
|
|
while ($otffr=1)
|
|
set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_" & $euiqi)
|
|
$euiqi := ($euiqi+1) mod 2
|
|
wait(500000)
|
|
end while
|
|
set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
|
|
end on
|
|
|
|
on ui_control($ilpk2)
|
|
call STEPPER__update_ui
|
|
end on
|
|
|
|
on ui_control(%qysah)
|
|
select ($i3fbq)
|
|
case 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%lfbyb[$y3mgr] := %qysah[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
call update_morph_stepper
|
|
case 1
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%bswku[$y3mgr] := %qysah[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
call update_morph_stepper
|
|
end select
|
|
end on
|
|
|
|
on ui_control($3f4bh)
|
|
$3f4bh := 0
|
|
$hokt3 := 1+(get_control_par(get_ui_id($3f4bh),$CONTROL_PAR_KEY_SHIFT)*3)
|
|
call STEPPER__shift_tables
|
|
end on
|
|
|
|
on ui_control($bryp1)
|
|
$bryp1 := 0
|
|
$hokt3 := -1-(get_control_par(get_ui_id($bryp1),$CONTROL_PAR_KEY_SHIFT)*3)
|
|
call STEPPER__shift_tables
|
|
end on
|
|
|
|
on ui_control($i3fbq)
|
|
call STEPPER__update_ui
|
|
end on
|
|
|
|
on ui_control($c1dov)
|
|
select ($c1dov)
|
|
case 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%bswku[$y3mgr] := %lfbyb[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$i3fbq := 1
|
|
case 1
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%lfbyb[$y3mgr] := %bswku[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$i3fbq := 0
|
|
case 2
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%lfbyb[$y3mgr] := %t40az[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
case 3
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%bswku[$y3mgr] := %t40az[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
case 4
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%t40az[$y3mgr] := %lfbyb[$y3mgr]
|
|
%lfbyb[$y3mgr] := %bswku[$y3mgr]
|
|
%bswku[$y3mgr] := %t40az[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
case 5
|
|
if ($ilpk2*2<=32)
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%t40az[$y3mgr] := %lfbyb[$y3mgr]
|
|
%lfbyb[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$ilpk2)
|
|
%lfbyb[$y3mgr*2] := %t40az[$y3mgr]
|
|
%lfbyb[$y3mgr*2+1] := %t40az[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%t40az[$y3mgr] := %bswku[$y3mgr]
|
|
%bswku[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$ilpk2)
|
|
%bswku[$y3mgr*2] := %t40az[$y3mgr]
|
|
%bswku[$y3mgr*2+1] := %t40az[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$ilpk2 := $ilpk2*2
|
|
set_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE,get_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE)+1)
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sequence can not be doubled.")
|
|
end if
|
|
case 6
|
|
if ($ilpk2>2)
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%t40az[$y3mgr] := %lfbyb[$y3mgr]
|
|
%lfbyb[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$ilpk2)
|
|
%lfbyb[$y3mgr/2] := %t40az[$y3mgr]
|
|
%qysah[$y3mgr/2] := %t40az[$y3mgr]
|
|
$y3mgr := $y3mgr+2
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%t40az[$y3mgr] := %bswku[$y3mgr]
|
|
%bswku[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$ilpk2)
|
|
%bswku[$y3mgr/2] := %t40az[$y3mgr]
|
|
$y3mgr := $y3mgr+2
|
|
end while
|
|
$ilpk2 := $ilpk2/2
|
|
set_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE,get_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE)-1)
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sequence can not be halfend.")
|
|
end if
|
|
case 7
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
if ($i3fbq=0)
|
|
%lfbyb[$y3mgr] := random(0,1000)
|
|
else
|
|
%bswku[$y3mgr] := random(0,1000)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end select
|
|
call STEPPER__update_ui
|
|
end on
|
|
|
|
on ui_control($xaqda)
|
|
if ($oov5z=0)
|
|
$5vbbt := $gllpo
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%2piom[$fg4rw] := %w0xec[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
$5vbbt := $hn35i
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%2piom[$fg4rw] := %rzzs4[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
$fg4rw := 1
|
|
while ($fg4rw<=($5vbbt-2))
|
|
$r0pwv := 0
|
|
$m12vk := 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<3)
|
|
$dyt1q := $fg4rw+$y3mgr-1
|
|
if (in_range($dyt1q,0,$5vbbt-1))
|
|
$r0pwv := $r0pwv+%2piom[$dyt1q]
|
|
inc($m12vk)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
if ($oov5z=0)
|
|
%w0xec[$fg4rw] := $r0pwv/$m12vk
|
|
else
|
|
%rzzs4[$fg4rw] := $r0pwv/$m12vk
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
end on
|
|
|
|
on ui_control($oov5z)
|
|
call SHAPER__update_ui
|
|
end on
|
|
|
|
on ui_control($zdrta)
|
|
select ($zdrta)
|
|
case 2
|
|
$qbqpm := 0
|
|
case 3
|
|
$qbqpm := 127
|
|
end select
|
|
end on
|
|
|
|
on ui_control($ojlo0)
|
|
if (get_control_par(get_ui_id($ojlo0),$CONTROL_PAR_KEY_ALT)=1)
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%preset))
|
|
%preset[$fg4rw] := 0
|
|
inc($fg4rw)
|
|
end while
|
|
$d1d43 := load_array(%preset,0)
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"Unkown NKA file")
|
|
@3cyqr := "Unknown"
|
|
@cs0dz := "Unknown"
|
|
$421rl := 0
|
|
while ($d1d43 # -1)
|
|
wait(3000)
|
|
end while
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
$ojlo0 := 0
|
|
exit
|
|
end if
|
|
$ojlo0 := 0
|
|
$luyp1 := $0ib2k
|
|
$0ib2k := 7
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($0efsn)
|
|
$0efsn := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := 2
|
|
$w0x5j := 1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
$dyt1q := %jj5qi[2]
|
|
$zor2m := 2
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end on
|
|
|
|
on ui_control($mb40x)
|
|
$mb40x := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := 2
|
|
$w0x5j := -1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
$dyt1q := %jj5qi[2]
|
|
$zor2m := 2
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end on
|
|
|
|
on ui_control($bbjq4)
|
|
$bgdzw := 1
|
|
call BRW__update_cat_mask_and_apply
|
|
call _BRW__update_ui_for_sel_file_type
|
|
end on
|
|
|
|
on ui_control($z2tnd)
|
|
if (get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
|
|
call BRW__update_search_result_list_ui
|
|
end if
|
|
end on
|
|
|
|
on ui_control($d5tn2)
|
|
if (get_control_par(get_ui_id($d5tn2),$CONTROL_PAR_KEY_ALT)=1 and (get_control_par(get_ui_id($d5tn2),$CONTROL_PAR_KEY_SHIFT)=1))
|
|
$d5tn2 := 0
|
|
$lz0yu := 0
|
|
while ($lz0yu<500)
|
|
%_BRW__user_fav_array[500*$zor2m+$lz0yu] := 0
|
|
inc($lz0yu)
|
|
end while
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end if
|
|
%31af0[$zor2m] := $d5tn2
|
|
call BRW__update_cat_mask_and_apply
|
|
end on
|
|
|
|
on ui_control($wwkuw)
|
|
$wwkuw := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := $zor2m
|
|
$w0x5j := -1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
select ($zor2m)
|
|
case 2
|
|
$lz0yu := %jj5qi[$zor2m]
|
|
case 0
|
|
$lz0yu := %BRW__grp_remap[%jj5qi[$zor2m]+100]-100
|
|
case 1
|
|
$lz0yu := -sh_right(abs(%jj5qi[$zor2m]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[$zor2m]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[$zor2m]])
|
|
end select
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($les2u)
|
|
$les2u := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := $zor2m
|
|
$w0x5j := 1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
select ($zor2m)
|
|
case 2
|
|
$lz0yu := %jj5qi[$zor2m]
|
|
case 0
|
|
$lz0yu := %BRW__grp_remap[%jj5qi[$zor2m]+100]-100
|
|
case 1
|
|
$lz0yu := -sh_right(abs(%jj5qi[$zor2m]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[$zor2m]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[$zor2m]])
|
|
end select
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($w5s50)
|
|
call BRW__close_ui
|
|
end on
|
|
|
|
on ui_control($41roa)
|
|
set_control_par_str(get_ui_id($41roa),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $41roa)
|
|
end on
|
|
|
|
on ui_control($y2kih)
|
|
set_control_par_str(get_ui_id($y2kih),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $y2kih)
|
|
end on
|
|
|
|
on ui_control($v3w2j)
|
|
$v3w2j := 0
|
|
$n4ppl := $41roa
|
|
if ($n4ppl=1)
|
|
$cm312 := 1
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"User Snapshot")
|
|
$zor2m := 0
|
|
if (%xeyhi[$zor2m]=0)
|
|
call BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
end if
|
|
$dyt1q := %3owef[random(0,%k4yha[0]-1)]
|
|
$51oxm := %BRW__grp_remap[$dyt1q+100]-100
|
|
end if
|
|
$ord01 := random(0,1)
|
|
$3fqin := get_control_par(get_ui_id($3fqin),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$q5pfd := random(-100000,50000)
|
|
$m0zqt := %ludky[random(0,689)]
|
|
$xc3po := random(0,1)
|
|
$2zs5k := random(0,4)/4
|
|
$neagb := random(0,1)
|
|
$bpkqt := random(150,3000)
|
|
$g345d := random(-$bpkqt+100,3000-$bpkqt)
|
|
$3pyb3 := %zpgb5[random(0,719)]
|
|
$m2mpa := random(10,1000)
|
|
$n0kha := random(-$m2mpa+10,1000-$m2mpa)
|
|
$u2pwx := %zpgb5[random(0,719)]
|
|
$1g0ky := real_to_int(pow(int_to_real(random(0,500000))/500000.0,3.0)*500000.0)
|
|
$2xzsd := random(0,1)*random(-$1g0ky,500000-$1g0ky)
|
|
$ldi1z := %zpgb5[random(0,719)]
|
|
$liaof := random(1,1000)
|
|
$5wlib := random(-$liaof+1,1000-$liaof)
|
|
$eu2xe := %zpgb5[random(0,719)]
|
|
$sgbvz := random(-8000,8000)
|
|
$cx1ja := random(-$sgbvz+-8000,8000-$sgbvz)
|
|
$qxhis := %zpgb5[random(0,719)]
|
|
$4zkqn := random(0,1000)
|
|
$boshu := random(-$4zkqn,1000-$4zkqn)
|
|
$oicux := %zpgb5[random(0,719)]
|
|
$kuk42 := random(1,100)
|
|
$o5n5m := random(-$kuk42+1,100-$kuk42)
|
|
$fzwxf := %zpgb5[random(0,719)]
|
|
$qsfxg := 1200*random(-2,2)
|
|
$xeafk := random(0,1)*(1200*random(-2,2))
|
|
$52sa5 := %zpgb5[random(0,719)]
|
|
$aaf4s := get_control_par(get_ui_id($aaf4s),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$sddk3 := random(-100,100)
|
|
$nplew := %zpgb5[random(0,719)]
|
|
$nwl2v := random(100000,525000)
|
|
$pk0h4 := random(-$nwl2v+100000,525000-$nwl2v)
|
|
$u2ki4 := %zpgb5[random(0,719)]
|
|
$wfiom := random(100000,525000)
|
|
$0hnr5 := random(-$wfiom+100000,637500-$wfiom)
|
|
$tmtfv := %zpgb5[random(0,719)]
|
|
$k21jk := random(0,1)
|
|
$eai4d := random(0,500)
|
|
$3zolj := random(-$eai4d,1000-$eai4d)
|
|
$r3d0o := %zpgb5[random(0,719)]
|
|
if ($k21jk=0)
|
|
$r0khx := random($eai4d+($r0khx/10),1000)
|
|
$yl1h5 := random(-$r0khx+(($eai4d+10)*(1+sh_right($eai4d+10-($eai4d+$3zolj),31))-(($eai4d+$3zolj)*sh_right($eai4d+10-($eai4d+$3zolj),31))),1000-$r0khx)
|
|
else
|
|
$r0khx := random(25,800)
|
|
$yl1h5 := random(-$r0khx+10,1000-$eai4d-$r0khx)
|
|
end if
|
|
$yqtdo := %zpgb5[random(0,719)]
|
|
$qwf1w := 25
|
|
$ppaoe := random(%aebtw[1],%hgu5c[1])
|
|
$ork5f := random(200,%hgu5c[2])
|
|
$dg3qf := random(%aebtw[3],%hgu5c[3])
|
|
$p3vhn := random(%aebtw[4],4000)
|
|
$y1mc2 := random(1,8)
|
|
call RAND__update_ui_after_randomization
|
|
if ($n4ppl=1)
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
end if
|
|
end on
|
|
|
|
on ui_control($r2b4a)
|
|
$r2b4a := 0
|
|
$n4ppl := $y2kih
|
|
if ($n4ppl=1)
|
|
$cm312 := 1
|
|
set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"User Snapshot")
|
|
$zor2m := 1
|
|
if (%xeyhi[$zor2m]=0)
|
|
call BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
end if
|
|
$dyt1q := 100
|
|
while ($dyt1q=100)
|
|
$dyt1q := %3owef[500+random(0,%k4yha[1]-1)]
|
|
end while
|
|
$hdmk1 := %BRW__grp_remap[$dyt1q]
|
|
end if
|
|
$t4vew := 1
|
|
$ruhe4 := -sh_right(40-random(1,100),31)
|
|
$q0o5r := random(1,3)
|
|
$0erls := random(0,9)
|
|
$2v40q := random(0,1)
|
|
$k5z4u := real_to_int(pow(2.0,int_to_real(random(2,4))))--sh_right(90-random(0,100),31)
|
|
$ius2b := random(550000,800000)
|
|
$3rksw := random(500,650)
|
|
$q0rb2 := random(600,1200)
|
|
$1ybzi := random(-$ius2b+550000,800000-$ius2b)*-sh_right(92-random(0,100),31)
|
|
$qbhb5 := random(-$3rksw+475,760-$3rksw)*-sh_right(90-random(0,100),31)
|
|
$qb5xv := random(-$q0rb2+1,1200-$q0rb2)
|
|
$rpaco := %ludky[random(0,689)]
|
|
$m5sxk := %ludky[random(0,689)]
|
|
$0vs3i := %ludky[random(0,689)]
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
%pyeoz[$y3mgr] := random(0,127)*-sh_right(25+(20*($y3mgr mod 2))-random(0,100),31)
|
|
%0lu1d[$y3mgr] := random(0,2400)
|
|
inc($y3mgr)
|
|
end while
|
|
call ARP__on_mode_changed
|
|
call ARP__update_step_dur_display
|
|
$l2tv1 := $l2tv1
|
|
$zv33b := random(-$l2tv1+600,1000-$l2tv1)
|
|
$dbgkf := %zpgb5[random(0,719)]
|
|
$c21kk := 1200*random(-1,1)*-sh_right(80-random(1,100),31)
|
|
$dyt1q := -sh_right(60-random(1,100),31)
|
|
$eg3kt := 1200*random(-2,2)*$dyt1q+(random(-100,100)*(($dyt1q+1) mod 2))
|
|
$2vyff := %zpgb5[random(0,719)]
|
|
$uvcxk := 12*random(-1,1)*-sh_right(60-random(1,100),31)
|
|
$ia54c := 12*random(-2,2)*-sh_right(80-random(1,100),31)
|
|
$wh1ke := %zpgb5[random(0,719)]
|
|
$dgu14 := random(0,3333)
|
|
$5l3um := random(-$dgu14,10000-$dgu14)
|
|
$f4o1c := %zpgb5[random(0,719)]
|
|
$h11uu := get_control_par(get_ui_id($h11uu),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$rgoik := random(-$h11uu+($h11uu*70/100),$h11uu*110/100-$h11uu)
|
|
$1xnyu := %ludky[random(0,689)]
|
|
$u51dh := random(100,%hgu5c[5]*($ruhe4*60+((.not. $ruhe4 .and. 1)*85))/100)
|
|
$2d1qh := random(300000,700000)
|
|
$2qveo := random(0,%hgu5c[6])
|
|
$fjnu3 := random(0,%hgu5c[7])
|
|
$tz115 := random(%hgu5c[8]*20/100,%hgu5c[8]*($ruhe4*50+((.not. $ruhe4 .and. 1)*85))/100)
|
|
$az3wx := random(100,%hgu5c[10]*($ruhe4*60+((.not. $ruhe4 .and. 1)*85))/100)
|
|
$ki4hc := random(0,%hgu5c[11])
|
|
$y4fhf := random(0,%hgu5c[12])
|
|
$cfneg := random(%hgu5c[13]*20/100,%hgu5c[13]*85/100)
|
|
$lk05f := random(0,1)
|
|
$2qtv2 := %p41k2[random(0,28)]
|
|
$ufbsw := random(0,1000000)
|
|
$3s02f := random(-$ufbsw,1000000-$ufbsw)
|
|
$3rcax := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
|
|
$maq5o := random(0,1000000)
|
|
$410y5 := random(-$maq5o,800000-$maq5o)
|
|
$5qrmj := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
|
|
$lqoqt := random(0,1000000)
|
|
$begpw := random(-$lqoqt,1000000-$lqoqt)
|
|
$f0ljx := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
|
|
$zqnbc := random(-1000000,1000000)
|
|
$llm0i := random(-$zqnbc+-1000000,1000000-$zqnbc)
|
|
$5m5qp := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
|
|
call on_selected_std_group_changed
|
|
call RAND__update_ui_after_randomization
|
|
if ($n4ppl=1)
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
end if
|
|
end on
|
|
|
|
on ui_control($dafnz)
|
|
$dafnz := 0
|
|
$n4ppl := get_control_par(get_ui_id($dafnz),$CONTROL_PAR_KEY_ALT)
|
|
if ($n4ppl=0)
|
|
$zktrd := random(1,1500)
|
|
$2zugt := random(-$zktrd+1,1500-$zktrd)
|
|
$vas4o := %zpgb5[random(0,719)]
|
|
$doz2m := random(0,7)
|
|
$e2mne := random(0,4)
|
|
$l4ujc := random(0,9)/9
|
|
$sseum := random(1,1500)
|
|
$bi544 := random(-$sseum+1,1500-$sseum)
|
|
$y3s33 := %zpgb5[random(0,719)]
|
|
$1wrdd := random(0,7)
|
|
$eu0kx := random(0,4)
|
|
$x02cl := random(0,9)/9
|
|
$3tqoo := random(-1000,1000)
|
|
$yexen := random(-$3tqoo+-1000,1000-$3tqoo)
|
|
$zi2jx := %zpgb5[random(0,719)]
|
|
$1fo5x := %zpgb5[random(0,719)]
|
|
$1tszb := random(-1000,1000)
|
|
$v1jgb := random(-$1tszb+-1000,1000-$1tszb)
|
|
$gxopj := %zpgb5[random(0,719)]
|
|
$z1x5e := %zpgb5[random(0,719)]
|
|
$3k3u2 := random(0,1)
|
|
$13ap0 := random(0,1)
|
|
$gehcz := random(-1000,1000)
|
|
$0qzrr := random(-1000,1000)
|
|
$ihtwl := random(-1000,1000)
|
|
$pzeed := random(-1000,1000)
|
|
$ytzwi := random(0,17)
|
|
$gllpo := %zdvxw[random(0,9)]
|
|
$cvjhr := %zpgb5[random(0,719)]
|
|
$f3u5d := random(0,17)
|
|
$hn35i := %zdvxw[random(0,9)]
|
|
$fpvgj := %zpgb5[random(0,719)]
|
|
$dyt1q := random(0,999)
|
|
$fg4rw := 0
|
|
while ($fg4rw<128)
|
|
$dyt1q := $dyt1q+random(-250,250)
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
%w0xec[$fg4rw] := $dyt1q
|
|
inc($fg4rw)
|
|
end while
|
|
$dyt1q := random(0,999)
|
|
$fg4rw := 0
|
|
while ($fg4rw<128)
|
|
$dyt1q := $dyt1q+random(-250,250)
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
%rzzs4[$fg4rw] := $dyt1q
|
|
inc($fg4rw)
|
|
end while
|
|
else
|
|
$zktrd := get_control_par(get_ui_id($zktrd),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$2zugt := 0
|
|
$vas4o := 0
|
|
$doz2m := 0
|
|
$e2mne := get_control_par(get_ui_id($e2mne),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$l4ujc := 0
|
|
$sseum := get_control_par(get_ui_id($sseum),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$bi544 := 0
|
|
$y3s33 := 0
|
|
$1wrdd := 0
|
|
$eu0kx := get_control_par(get_ui_id($eu0kx),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$x02cl := 0
|
|
$3tqoo := get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$yexen := 0
|
|
$zi2jx := 0
|
|
$1fo5x := 0
|
|
$1tszb := get_control_par(get_ui_id($1tszb),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$v1jgb := 0
|
|
$gxopj := 0
|
|
$z1x5e := 0
|
|
$3k3u2 := get_control_par(get_ui_id($3k3u2),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$13ap0 := get_control_par(get_ui_id($13ap0),$CONTROL_PAR_DEFAULT_VALUE)
|
|
$gehcz := random(-1000,1000)
|
|
$0qzrr := random(-1000,1000)
|
|
$ihtwl := random(-1000,1000)
|
|
$pzeed := random(-1000,1000)
|
|
$ytzwi := 0
|
|
$gllpo := 64
|
|
$cvjhr := 0
|
|
$f3u5d := 0
|
|
$hn35i := 64
|
|
$fpvgj := 0
|
|
$dyt1q := random(0,999)
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%w0xec[$fg4rw] := $fg4rw*1000/$gllpo
|
|
%rzzs4[$fg4rw] := $fg4rw*1000/$hn35i
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
call update_ui_after_preset_reload
|
|
end on
|
|
|
|
on ui_control($ecodz)
|
|
$0ib2k := 1
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($nd04g)
|
|
$0ib2k := 2
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($0erls)
|
|
call ARP__on_mode_changed
|
|
end on
|
|
|
|
on ui_control($h2jke)
|
|
$0erls := $h2jke
|
|
call ARP__on_mode_changed
|
|
end on
|
|
|
|
on ui_control($k5z4u)
|
|
call ARP__update_seq_tables
|
|
set_control_par_str(get_ui_id($k5z4u),$CONTROL_PAR_LABEL,$k5z4u)
|
|
end on
|
|
|
|
on ui_control($ivqya)
|
|
call ARP__update_table_display
|
|
end on
|
|
|
|
on ui_control($zkud4)
|
|
$zkud4 := 0
|
|
$wg0d2 := 1+(get_control_par(get_ui_id($zkud4),$CONTROL_PAR_KEY_SHIFT)*3)
|
|
call ARP__shift_tables
|
|
end on
|
|
|
|
on ui_control($t2fpk)
|
|
$t2fpk := 0
|
|
$wg0d2 := -1-(get_control_par(get_ui_id($t2fpk),$CONTROL_PAR_KEY_SHIFT)*3)
|
|
call ARP__shift_tables
|
|
end on
|
|
|
|
on ui_control($hvmxr)
|
|
$hvmxr := 0
|
|
$ojboo := ($ojboo+15-1) mod 15
|
|
wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
|
|
call ARP__restore_from_preset_buffer
|
|
call ARP__on_mode_changed
|
|
call ARP__update_seq_tables
|
|
call ARP__update_mod_knob_ui
|
|
call ARP__update_all_automation_labels
|
|
end on
|
|
|
|
on ui_control($kbuvs)
|
|
$kbuvs := 0
|
|
$ojboo := ($ojboo+1) mod 15
|
|
wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
|
|
call ARP__restore_from_preset_buffer
|
|
call ARP__on_mode_changed
|
|
call ARP__update_seq_tables
|
|
call ARP__update_mod_knob_ui
|
|
call ARP__update_all_automation_labels
|
|
end on
|
|
|
|
on ui_control($ojboo)
|
|
wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
|
|
call ARP__restore_from_preset_buffer
|
|
call ARP__on_mode_changed
|
|
call ARP__update_seq_tables
|
|
call ARP__update_mod_knob_ui
|
|
call ARP__update_all_automation_labels
|
|
end on
|
|
|
|
on ui_control($q0o5r)
|
|
set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
|
|
end on
|
|
|
|
on ui_control($1p3ww)
|
|
$q0o5r := $q0o5r+1-(-sh_right(4-($q0o5r+1),31)*($q0o5r+1-4))
|
|
set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
|
|
end on
|
|
|
|
on ui_control($5dkam)
|
|
$q0o5r := $q0o5r-1+(-sh_right($q0o5r-1-1,31)*(1-($q0o5r-1)))
|
|
set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
|
|
end on
|
|
|
|
on ui_control($en0xw)
|
|
$dyt1q := (($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))-1+(-sh_right((($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))-1-0,31)*(0-((($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))-1)))
|
|
call seq__on_step_dur_btn_for_h
|
|
end on
|
|
|
|
on ui_control($4tx2f)
|
|
$dyt1q := (($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))+1
|
|
call seq__on_step_dur_btn_for_h
|
|
end on
|
|
|
|
on ui_control($ruhe4)
|
|
call ARP__update_filter_src_menus
|
|
end on
|
|
|
|
on ui_control($lh5xo)
|
|
select ($lh5xo)
|
|
case 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%0lu1d[$y3mgr] := %pyeoz[$y3mgr]*2400/127
|
|
inc($y3mgr)
|
|
end while
|
|
$ivqya := 1
|
|
case 1
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%pyeoz[$y3mgr] := %0lu1d[$y3mgr]*127/2400
|
|
inc($y3mgr)
|
|
end while
|
|
$ivqya := 0
|
|
case 2
|
|
if ($k5z4u*2<=32)
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%nr1qo[$y3mgr] := %pyeoz[$y3mgr]
|
|
%pyeoz[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
%pyeoz[$y3mgr*2] := %nr1qo[$y3mgr]
|
|
%pyeoz[$y3mgr*2+1] := %nr1qo[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%nr1qo[$y3mgr] := %0lu1d[$y3mgr]
|
|
%0lu1d[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
%0lu1d[$y3mgr*2] := %nr1qo[$y3mgr]
|
|
%0lu1d[$y3mgr*2+1] := %nr1qo[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$k5z4u := $k5z4u*2
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sorry, the sequence can not be doubled.")
|
|
end if
|
|
case 3
|
|
if ($k5z4u>2)
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%nr1qo[$y3mgr] := %pyeoz[$y3mgr]
|
|
%pyeoz[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
%pyeoz[$y3mgr/2] := %nr1qo[$y3mgr]
|
|
$y3mgr := $y3mgr+2
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<32)
|
|
%nr1qo[$y3mgr] := %0lu1d[$y3mgr]
|
|
%0lu1d[$y3mgr] := 0
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
%0lu1d[$y3mgr/2] := %nr1qo[$y3mgr]
|
|
$y3mgr := $y3mgr+2
|
|
end while
|
|
$k5z4u := $k5z4u/2
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sorry, the sequence can not be halfend.")
|
|
end if
|
|
case 4
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
if (sh_left(1,$ivqya) .and. 1=1)
|
|
%pyeoz[$y3mgr] := random(0,127)*-sh_right(25+(20*($y3mgr mod 2))-random(0,100),31)
|
|
end if
|
|
if (sh_right(sh_left(1,$ivqya),1) .and. 1=1)
|
|
%0lu1d[$y3mgr] := random(0,2400)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
case 6
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
if ($ivqya=0)
|
|
$dyt1q := random(-20,20)
|
|
%pyeoz[$y3mgr] := ((%pyeoz[$y3mgr]+$dyt1q)*(1+(sh_right(127-(%pyeoz[$y3mgr]+$dyt1q),31) .or. sh_right(%pyeoz[$y3mgr]+$dyt1q-0,31)))-0-(127*sh_right(127-(%pyeoz[$y3mgr]+$dyt1q),31)))*-sh_right(0-%pyeoz[$y3mgr],31)
|
|
else
|
|
$dyt1q := random(-288,288)
|
|
%0lu1d[$y3mgr] := ((%0lu1d[$y3mgr]+$dyt1q)*(1+(sh_right(2400-(%0lu1d[$y3mgr]+$dyt1q),31) .or. sh_right(%0lu1d[$y3mgr]+$dyt1q-0,31)))-0-(2400*sh_right(2400-(%0lu1d[$y3mgr]+$dyt1q),31)))*-sh_right(0-%0lu1d[$y3mgr],31)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
case 5
|
|
if ($k5z4u*2<=32)
|
|
$y3mgr := 0
|
|
while ($y3mgr<$k5z4u)
|
|
%0lu1d[$k5z4u+$y3mgr] := %0lu1d[$y3mgr]
|
|
%pyeoz[$k5z4u+$y3mgr] := %pyeoz[$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$k5z4u := $k5z4u*2
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sorry, the sequence can not be doubled.")
|
|
end if
|
|
end select
|
|
call ARP__update_table_display
|
|
end on
|
|
|
|
on persistence_changed
|
|
if ($b4lv0=43)
|
|
%jj5qi[2] := %BRW__snapshot_remap_v43[%jj5qi[2]]
|
|
end if
|
|
if ($b4lv0=44)
|
|
%jj5qi[2] := %BRW__snapshot_remap_v44[%jj5qi[2]]
|
|
end if
|
|
call convert_preset_data_to_current_version
|
|
$fg4rw := 0
|
|
while ($fg4rw<10)
|
|
%dz3eb[$fg4rw] := 0
|
|
set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
inc($fg4rw)
|
|
end while
|
|
$0e0hy := 0
|
|
inc($4l4u3)
|
|
if (-sh_right(1-$4l4u3,31)=1)
|
|
if ($51oxm=263)
|
|
wait_async(set_sample(%NI_USER_ZONE_IDS[0],@4xudw))
|
|
$lxku3 := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[0])-0)-1,31)
|
|
if ($lxku3=0)
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_ROOT_KEY,$aewcf))
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_TUNE,real_to_int(~spjzv)))
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_VOLUME,real_to_int(-~fbacu*100.0)))
|
|
end if
|
|
end if
|
|
if ($hdmk1=364)
|
|
wait_async(set_sample(%NI_USER_ZONE_IDS[1],@g233i))
|
|
$x1spm := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[1])-0)-1,31)
|
|
if ($x1spm=0)
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_ROOT_KEY,$v3y5j))
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_TUNE,real_to_int(~qzdh0)))
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_VOLUME,real_to_int(-~rhrbs*100.0)))
|
|
end if
|
|
end if
|
|
else
|
|
$lxku3 := 0
|
|
if (get_sample_length(%NI_USER_ZONE_IDS[0]) # 0)
|
|
wait_async(detect_sample_type(%NI_USER_ZONE_IDS[0],$dyt1q))
|
|
if ($dyt1q=-1)
|
|
$lxku3 := 1
|
|
end if
|
|
end if
|
|
$x1spm := 0
|
|
if (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0)
|
|
wait_async(detect_sample_type(%NI_USER_ZONE_IDS[1],$dyt1q))
|
|
if ($dyt1q=-1)
|
|
$x1spm := 1
|
|
end if
|
|
end if
|
|
end if
|
|
%smp_l_grp[263] := get_sample_length(%NI_USER_ZONE_IDS[0])/1000
|
|
%std_smp_l_grp[364] := get_sample_length(%NI_USER_ZONE_IDS[1])/1000
|
|
if ($51oxm=263)
|
|
call update_rootkey_array_for_g_user_sample
|
|
end if
|
|
wait_async(load_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka"))
|
|
$knxce := 0
|
|
while ($knxce<3)
|
|
$zor2m := $knxce
|
|
call BRW__apply_mask_to_search_pool_for_sel_file_type
|
|
inc($knxce)
|
|
end while
|
|
$k240z := 0
|
|
call update_ui_after_preset_reload
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
end on
|
|
|
|
on listener
|
|
select ($NI_SIGNAL_TYPE)
|
|
case $NI_SIGNAL_TIMER_BEAT
|
|
call stepper_on_listener_set_modulation
|
|
$jdgl1 := 0
|
|
while ($jdgl1<num_elements(%pv2ax))
|
|
$gpzoi := %pv2ax[$jdgl1]
|
|
call _reset_mod_knob_label_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
$4djds := 0
|
|
while ($4djds<26)
|
|
if (%qdiwi[$4djds]>0 and ($ENGINE_UPTIME-%qdiwi[$4djds]>=700))
|
|
if (%ipim0[$4djds]>=75 and (%ipim0[$4djds]<=113) or in_range(%ipim0[$4djds],31,33) or in_range(%ipim0[$4djds],114,116) or in_range(%ipim0[$4djds],120,122))
|
|
set_control_par_str(%5comw[$4djds],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%5comw[$4djds],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%5comw[$4djds],$CONTROL_PAR_POS_Y),31))
|
|
if (in_range(%ipim0[$4djds],31,33) or in_range(%ipim0[$4djds],114,116) or in_range(%ipim0[$4djds],120,122))
|
|
set_control_par(%5comw[$4djds],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%i5z0e[$4djds])+106)
|
|
else
|
|
set_control_par(%5comw[$4djds],$CONTROL_PAR_PICTURE_STATE,(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%c40o1[$4djds])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%c40o1[$4djds])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])]]+((%ipim0[$4djds]-75) mod 3))+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%c40o1[$4djds])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])-$EFFECT_TYPE_FILTER)-1,31)*(%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])))))+((%ipim0[$4djds]-75) mod 3)]+106)))
|
|
end if
|
|
else
|
|
set_control_par(%5comw[$4djds],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
%qdiwi[$4djds] := 0
|
|
end if
|
|
inc($4djds)
|
|
end while
|
|
$jdgl1 := 0
|
|
while ($jdgl1<num_elements(%3xxkk))
|
|
$gpzoi := %3xxkk[$jdgl1]
|
|
if (%gmios[$gpzoi]>0 and ($ENGINE_UPTIME-%gmios[$gpzoi]>=700))
|
|
if ($gpzoi=0 or ($gpzoi=2))
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,"")
|
|
set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%vvlef[$gpzoi],$CONTROL_PAR_POS_Y),31))
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE_STATE,3)
|
|
else
|
|
if ($gpzoi=25)
|
|
call update_g_rng_max_label
|
|
else
|
|
set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end if
|
|
%gmios[$gpzoi] := 0
|
|
end if
|
|
inc($jdgl1)
|
|
end while
|
|
case $NI_SIGNAL_TIMER_MS
|
|
if ($afnek # -1)
|
|
if ($PLAYED_VOICES_INST # 0)
|
|
$afnek := 1
|
|
$1sqif := $ENGINE_UPTIME
|
|
else
|
|
if ($ENGINE_UPTIME-$1sqif<8000)
|
|
$afnek := 1
|
|
else
|
|
$afnek := 0
|
|
end if
|
|
end if
|
|
if ($afnek=1)
|
|
call MOD__perform_cont_update
|
|
call LFO__update_phase
|
|
end if
|
|
end if
|
|
end select
|
|
end on
|
|
|
|
on note
|
|
ignore_event($EVENT_ID)
|
|
while ($oppog=1)
|
|
set_event_par($EVENT_ID,$EVENT_PAR_0,1000)
|
|
if ($NOTE_HELD=0)
|
|
exit
|
|
end if
|
|
wait(3000)
|
|
end while
|
|
if (%smp_l_grp[$51oxm]<=0 and ($uummz=0))
|
|
message("DEV_auto_smpl_len = 1 > Sample Map analysis running")
|
|
$uummz := 1
|
|
$wfzez := 2147483647
|
|
$tuwra := -2
|
|
$t1jz4 := 0
|
|
while ($t1jz4<=127)
|
|
$iz4ec := 0
|
|
while ($iz4ec<=12)
|
|
disallow_group($ALL_GROUPS)
|
|
$oxfyj := play_note($t1jz4,$iz4ec*10+5,0,0)
|
|
set_event_par_arr($oxfyj,$EVENT_PAR_ALLOW_GROUP,1,$51oxm+100)
|
|
set_event_par($oxfyj,$EVENT_PAR_0,-5)
|
|
change_vol($oxfyj,-144000,0)
|
|
wait(100)
|
|
$dyt1q := get_sample_length(get_event_par($oxfyj,$EVENT_PAR_ZONE_ID))/1000
|
|
fade_out($oxfyj,1,1)
|
|
if ($dyt1q # 0 and ($dyt1q<$wfzez))
|
|
$wfzez := $dyt1q
|
|
end if
|
|
if ($iz4ec=0)
|
|
if ($tuwra=get_event_par($oxfyj,$EVENT_PAR_ZONE_ID))
|
|
$iz4ec := 13
|
|
else
|
|
$tuwra := get_event_par($oxfyj,$EVENT_PAR_ZONE_ID)
|
|
end if
|
|
end if
|
|
inc($iz4ec)
|
|
end while
|
|
inc($t1jz4)
|
|
end while
|
|
if (%smp_l_grp[$51oxm] # $wfzez)
|
|
%smp_l_grp[$51oxm] := $wfzez
|
|
pgs_set_key_val(PGS_FUNC,0,0)
|
|
end if
|
|
$uummz := 0
|
|
end if
|
|
$gj552 := $ENGINE_UPTIME
|
|
%w1vde[%laljf[$EVENT_ID mod 8192]] := $ENGINE_UPTIME
|
|
set_event_par($EVENT_ID,$EVENT_PAR_3,0)
|
|
set_event_par($EVENT_ID,$EVENT_PAR_0,0)
|
|
$q2v0i := 0
|
|
$mkoi4 := 0
|
|
$t4gop := 1
|
|
$r5war := -1
|
|
$pfgf4 := $EVENT_ID
|
|
%0wsff[$EVENT_NOTE] := $EVENT_ID
|
|
inc($0e0hy)
|
|
if ($0e0hy=1)
|
|
$n0uzs := $EVENT_ID
|
|
$ma1nd := $ENGINE_UPTIME
|
|
$wmznm := 0
|
|
end if
|
|
call MOD__inc_POLY__count
|
|
%laljf[$EVENT_ID mod 8192] := $1bi4b
|
|
%5ggz3[$1bi4b] := $EVENT_ID
|
|
%w1vde[$1bi4b] := $ENGINE_UPTIME
|
|
%ilm5d[$1bi4b] := get_event_par($EVENT_ID,$EVENT_PAR_NOTE)
|
|
%c1kc4[$1bi4b] := get_event_par($EVENT_ID,$EVENT_PAR_VELOCITY)
|
|
%jnhix[$1bi4b] := 0
|
|
%gvnxp[$1bi4b] := get_event_par($EVENT_ID,$EVENT_PAR_MIDI_CHANNEL)
|
|
%z3n3e[%gvnxp[$1bi4b]] := $EVENT_ID
|
|
%oy5fa[$1bi4b] := random(0,1000)
|
|
select ($zdrta)
|
|
case 0
|
|
if ($0e0hy=1)
|
|
$y3puj := $EVENT_ID
|
|
end if
|
|
case 1
|
|
$y3puj := $EVENT_ID
|
|
case 2
|
|
if ($0e0hy=1 or ($EVENT_NOTE>$qbqpm))
|
|
$qbqpm := $EVENT_NOTE
|
|
$y3puj := $EVENT_ID
|
|
end if
|
|
case 3
|
|
if ($0e0hy=1 or ($EVENT_NOTE<$qbqpm))
|
|
$qbqpm := $EVENT_NOTE
|
|
$y3puj := $EVENT_ID
|
|
end if
|
|
end select
|
|
$meuyq := %laljf[$y3puj mod 8192]
|
|
$dc3zm := $y3puj
|
|
if ($0e0hy=1)
|
|
$zgcke := 0
|
|
$fojqp := 0
|
|
end if
|
|
%ppvim[11] := get_event_par($EVENT_ID,$EVENT_PAR_VELOCITY)*1000/127
|
|
$3yie0 := %laljf[$EVENT_ID mod 8192]
|
|
select ($e2mne)
|
|
case 0
|
|
?lrdg1[$3yie0] := int_to_real(random(0,10000))/10000.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 1
|
|
if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
|
|
$a2nqk := $3yie0
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
|
|
?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
|
|
%hqihq[$3yie0] := %hqihq[$a2nqk]
|
|
end if
|
|
case 2
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 3
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 4
|
|
if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
|
|
$a2nqk := $3yie0
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
|
|
?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
|
|
%hqihq[$3yie0] := %hqihq[$a2nqk]
|
|
end if
|
|
end select
|
|
$3yie0 := %laljf[$EVENT_ID mod 8192]
|
|
select ($eu0kx)
|
|
case 0
|
|
?pu5ib[$3yie0] := int_to_real(random(0,10000))/10000.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 1
|
|
if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
|
|
$xpr4r := $3yie0
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
|
|
?p2rij[$3yie0] := ?p2rij[$xpr4r]
|
|
%qvhhl[$3yie0] := %qvhhl[$xpr4r]
|
|
end if
|
|
case 2
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 3
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 4
|
|
if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
|
|
$xpr4r := $3yie0
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
|
|
?p2rij[$3yie0] := ?p2rij[$xpr4r]
|
|
%qvhhl[$3yie0] := %qvhhl[$xpr4r]
|
|
end if
|
|
end select
|
|
%ppvim[0] := real_to_int(?xy[0]*1000.0)
|
|
%ppvim[1] := real_to_int(?xy[1]*1000.0)
|
|
if ($oppog # 1)
|
|
call MOD__perform_full_update
|
|
end if
|
|
if ($t4vew=1 and ($hdmk1 # 364 or ($x1spm=0 and (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0))))
|
|
disallow_group($ALL_GROUPS)
|
|
if ($ruhe4=1 and ($mcp2m=1))
|
|
$dyt1q := play_note($EVENT_NOTE,$EVENT_VELOCITY,0,1)
|
|
set_event_par($dyt1q,$EVENT_PAR_0,-3)
|
|
set_event_par($dyt1q,$EVENT_PAR_1,$EVENT_ID)
|
|
set_event_par_arr($EVENT_ID,$EVENT_PAR_CUSTOM,1,4)
|
|
else
|
|
if ($mcp2m=1 or ($mcp2m=0 and ($0e0hy=1)))
|
|
$dyt1q := ($dgu14+($5l3um*%ppvim[$f4o1c]/1000))*%std_smp_l_grp[$hdmk1]/10000
|
|
$dyt1q := ($dyt1q*(1+(sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((%std_smp_l_grp[$hdmk1]-5)*sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31)))*1000
|
|
$t1jz4 := (.not. -sh_right(abs($mcp2m-0)-1,31) .and. 1)*-1
|
|
if ($dyo2q=1)
|
|
$r0pwv := $EVENT_NOTE+$uvcxk+($ia54c*%ppvim[$wh1ke]/1000)
|
|
$r0pwv := $r0pwv*(1+(sh_right(127-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(127*sh_right(127-$r0pwv,31))
|
|
$auli3 := play_note($r0pwv,$EVENT_VELOCITY,$dyt1q,$t1jz4)
|
|
else
|
|
$auli3 := play_note(60+$uvcxk+($ia54c*%ppvim[$wh1ke]/1000),$EVENT_VELOCITY,$dyt1q,$t1jz4)
|
|
end if
|
|
%hrm2k[$fijbx] := $auli3
|
|
%k0ra5[$fijbx] := $EVENT_ID
|
|
%asdef[$1bi4b] := $auli3
|
|
$fijbx := ($fijbx+1) mod num_elements(%hrm2k)
|
|
set_event_par($auli3,$EVENT_PAR_0,-2)
|
|
set_event_par($auli3,$EVENT_PAR_2,$EVENT_NOTE)
|
|
set_event_par_arr($auli3,$EVENT_PAR_ALLOW_GROUP,1,$hdmk1)
|
|
if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
|
|
$gpzoi := 23
|
|
$dc3zm := $EVENT_ID
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
$dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
|
|
change_vol($auli3,-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par($auli3,$EVENT_PAR_VOLUME),1)
|
|
if ($auli3=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
$gpzoi := 28
|
|
$dc3zm := $EVENT_ID
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
change_tune($auli3,($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$EVENT_ID mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$EVENT_ID mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
|
|
if ($auli3=$auli3)
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
if ($auli3=$auli3)
|
|
$gpzoi := 29
|
|
$dc3zm := $EVENT_ID
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
$gpzoi := 30
|
|
$dc3zm := $EVENT_ID
|
|
$1il5i := %3hbq2[$gpzoi]-1
|
|
while ($1il5i>=0)
|
|
if (%q4rwz[20*$gpzoi+$1il5i]>=0)
|
|
select (%q4rwz[20*$gpzoi+$1il5i])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
end if
|
|
dec($1il5i)
|
|
end while
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
end if
|
|
end if
|
|
wait(1)
|
|
$a5fyp := get_event_par($auli3,$EVENT_PAR_ZONE_ID)
|
|
if ($a5fyp # $kzyw4 and ($a5fyp>0))
|
|
attach_zone($tmcuy,$a5fyp,0)
|
|
$kzyw4 := $a5fyp
|
|
call update_s_wf_start_indic_label_position
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
if ($spdyk=0)
|
|
$n0uzs := $EVENT_ID
|
|
exit
|
|
end if
|
|
if ($51oxm=263 and ($lxku3=1 or (get_sample_length(%NI_USER_ZONE_IDS[0])=0)))
|
|
exit
|
|
end if
|
|
inc($pdzso)
|
|
while ($pdzso>$y1mc2)
|
|
$dyt1q := 2147483647
|
|
$r0pwv := 2147483647
|
|
$hqjjl := -1
|
|
$gcqjr := -1
|
|
$y3mgr := 0
|
|
while ($y3mgr<16)
|
|
if (%mc3xd[$y3mgr] # 0)
|
|
if (get_event_par(%mc3xd[$y3mgr],$EVENT_PAR_0)=3)
|
|
if (%w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]<$dyt1q)
|
|
$dyt1q := %w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]
|
|
$hqjjl := $y3mgr
|
|
end if
|
|
else
|
|
if (%w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]<$r0pwv)
|
|
$r0pwv := %w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]
|
|
$gcqjr := $y3mgr
|
|
end if
|
|
end if
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
if ($iva44=1)
|
|
$r0pwv := 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<$h3axx)
|
|
if (%w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]>$r0pwv and (get_event_par(%medyt[$y3mgr],$EVENT_PAR_3)=0))
|
|
$r0pwv := %w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]
|
|
$dyt1q := search(%mc3xd,%medyt[$y3mgr])
|
|
if ($dyt1q # -1)
|
|
$gcqjr := $dyt1q
|
|
end if
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
end if
|
|
if ($hqjjl # -1)
|
|
$r0pwv := $hqjjl
|
|
else
|
|
$r0pwv := $gcqjr
|
|
end if
|
|
set_event_par(%mc3xd[$r0pwv],$EVENT_PAR_3,1)
|
|
$dyt1q := %lx5kr[get_event_par(%mc3xd[$r0pwv],$EVENT_PAR_NOTE)]
|
|
if ($dyt1q # -1 and (%medyt[$dyt1q]=%mc3xd[$r0pwv]))
|
|
$tsm3s := $ENGINE_UPTIME
|
|
set_event_par(%mc3xd[$r0pwv],$EVENT_PAR_0,3)
|
|
else
|
|
note_off(%mc3xd[$r0pwv])
|
|
end if
|
|
%mc3xd[$r0pwv] := 0
|
|
dec($pdzso)
|
|
end while
|
|
%mc3xd[search(%mc3xd,0)] := $EVENT_ID
|
|
disallow_group($ALL_GROUPS)
|
|
if ($n0uzs # $EVENT_ID and ($xrt5z>=2))
|
|
if ($b1esx>$ENGINE_UPTIME)
|
|
if ($ENGINE_UPTIME-$ma1nd>15)
|
|
wait(($b1esx-$ENGINE_UPTIME)*1000)
|
|
end if
|
|
else
|
|
$dyt1q := abs(($b1esx-$ENGINE_UPTIME)/($y4ap3/10))+1
|
|
$dyt1q := ($b1esx+($dyt1q*($y4ap3/10))-$ENGINE_UPTIME)*1000
|
|
wait($dyt1q)
|
|
end if
|
|
end if
|
|
while (get_event_par($EVENT_ID,$EVENT_PAR_0)<4)
|
|
$ygbzd := $EVENT_ID
|
|
$dc3zm := $EVENT_ID
|
|
call update_all_poly_mod_paths
|
|
$jdgl1 := 0
|
|
while ($jdgl1<2)
|
|
$gpzoi := %ulgib[$jdgl1]
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
inc($jdgl1)
|
|
end while
|
|
if ($p5wl1=0)
|
|
$y4ap3 := $bpkqt+($g345d*%ppvim[$3pyb3]/1000)+(-sh_right($bpkqt+($g345d*%ppvim[$3pyb3]/1000)-50,31)*(50-($bpkqt+($g345d*%ppvim[$3pyb3]/1000))))
|
|
else
|
|
call update_g_dis_sync_idx
|
|
if (?qedta[$gv5ha]>0.0)
|
|
$y4ap3 := real_to_int(int_to_real($DURATION_QUARTER)*?qedta[$gv5ha])/100
|
|
else
|
|
$y4ap3 := real_to_int(int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?qedta[$gv5ha])/100
|
|
end if
|
|
end if
|
|
$wuu5g := $51oxm+100
|
|
call calc_g_area_vars
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)<3)
|
|
$gm014 := $liaof+($5wlib*%ppvim[$eu2xe]/1000)
|
|
end if
|
|
if ($n0uzs=-1 or (event_status($n0uzs)=$EVENT_STATUS_INACTIVE))
|
|
$n0uzs := $EVENT_ID
|
|
end if
|
|
if ($xc3po=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
|
|
if ($ord01=0)
|
|
if ($linka=0)
|
|
if ($gj552=$ENGINE_UPTIME)
|
|
$jwx5k := 0
|
|
else
|
|
$jwx5k := $jwx5k+(($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3/10)
|
|
end if
|
|
else
|
|
if ($gj552=$ENGINE_UPTIME)
|
|
call update_free_run_sync_start_vars
|
|
end if
|
|
call update_g_absl_cursor_pos_for_synced_progr
|
|
$jwx5k := $y1zim
|
|
end if
|
|
else
|
|
if ($EVENT_ID=$n0uzs)
|
|
if ($linka=0)
|
|
if ($gj552=$ENGINE_UPTIME)
|
|
$wmznm := 0
|
|
$jwx5k := 0
|
|
else
|
|
$wmznm := $jwx5k+(($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3/10)
|
|
end if
|
|
else
|
|
call update_g_absl_cursor_pos_for_synced_progr
|
|
$wmznm := $y1zim
|
|
end if
|
|
else
|
|
$gj552 := $ma1nd
|
|
end if
|
|
$jwx5k := $wmznm
|
|
end if
|
|
$dyt1q := $i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))
|
|
if ($linka=0)
|
|
$whs1s := $i11wt*$gm014+(random(-$dyt1q,$dyt1q)/5)+$jwx5k
|
|
if ($neagb=0)
|
|
$mkoi4 := $wo1eq+($i11wt*$gm014)+$jwx5k
|
|
end if
|
|
else
|
|
$whs1s := $jwx5k+(random(-$dyt1q,$dyt1q)/5)
|
|
if ($neagb=0)
|
|
$mkoi4 := $wo1eq+$jwx5k
|
|
end if
|
|
end if
|
|
else
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk # 0))
|
|
if ($linka=0)
|
|
if ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)>=0)
|
|
$t4gop := $va2lk
|
|
else
|
|
$t4gop := -$va2lk
|
|
end if
|
|
else
|
|
$t4gop := $va2lk*((sh_right($f2ujt,31) .or. 1)/1)
|
|
end if
|
|
end if
|
|
if ($ord01=0 or ($xc3po=0))
|
|
if ($mkoi4=0)
|
|
$mkoi4 := $wo1eq+($i11wt*$gm014)
|
|
if ($linka=1)
|
|
call update_free_run_sync_start_vars
|
|
call update_g_absl_cursor_pos_for_synced_progr
|
|
$mkoi4 := $y1zim-$f2ujt
|
|
end if
|
|
else
|
|
if ($linka=0)
|
|
$f2ujt := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3*$t4gop/10
|
|
$mkoi4 := $mkoi4+$f2ujt
|
|
else
|
|
call update_g_absl_cursor_pos_for_synced_progr
|
|
$mkoi4 := $y1zim
|
|
end if
|
|
end if
|
|
$dyt1q := $i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))
|
|
$whs1s := $mkoi4+(random(-$dyt1q,$dyt1q)/5)
|
|
else
|
|
if ($wmznm=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
|
|
$n0uzs := $EVENT_ID
|
|
$wmznm := $wo1eq+($i11wt*$gm014)
|
|
$mkoi4 := $wmznm
|
|
$hqznn := $t4gop
|
|
call update_free_run_sync_start_vars
|
|
else
|
|
if ($EVENT_ID=$n0uzs)
|
|
if ($linka=0)
|
|
$ottdr := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3*$t4gop/10
|
|
$wmznm := $wmznm+$ottdr
|
|
else
|
|
if ($f2ujt=0)
|
|
$f2ujt := $ottdr
|
|
end if
|
|
call update_g_absl_cursor_pos_for_synced_progr
|
|
$wmznm := $y1zim
|
|
end if
|
|
$f2ujt := $ottdr
|
|
$mkoi4 := $wmznm
|
|
$hqznn := $t4gop
|
|
end if
|
|
end if
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($EVENT_ID # $n0uzs))
|
|
if ($linka=0)
|
|
$f2ujt := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3*$t4gop/10
|
|
$mkoi4 := $mkoi4+$f2ujt
|
|
else
|
|
if ($f2ujt=0)
|
|
$f2ujt := $ottdr
|
|
end if
|
|
call update_g_absl_cursor_pos_for_synced_progr
|
|
$mkoi4 := $y1zim
|
|
end if
|
|
else
|
|
$t4gop := $hqznn
|
|
$mkoi4 := $wmznm
|
|
end if
|
|
$dyt1q := $i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))
|
|
$whs1s := $mkoi4+(random(-$dyt1q,$dyt1q)/5)
|
|
end if
|
|
end if
|
|
if ($neagb=1)
|
|
if ($xc3po=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
|
|
if ($whs1s>0)
|
|
$whs1s := $whs1s/1000
|
|
else
|
|
$whs1s := $whs1s/1000+(($whs1s/1000/-($i11wt*2)+1)*($i11wt*2))
|
|
end if
|
|
$dyt1q := abs(abs($whs1s mod ($i11wt*2))-($i11wt*2-1))+-$i11wt
|
|
$t4gop := (sh_right($dyt1q,31) .or. 1)/1
|
|
$whs1s := ($i11wt-abs($whs1s mod ($i11wt*2)-$i11wt))*1000
|
|
$whs1s := $wo1eq+$whs1s
|
|
$mkoi4 := $whs1s
|
|
else
|
|
if ($ord01=0 or ($EVENT_ID=$n0uzs) or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3))
|
|
if ($whs1s>$uiy0n)
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk=1))
|
|
$whs1s := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
|
|
$mkoi4 := $whs1s
|
|
else
|
|
if ($linka=1)
|
|
$t4gop := -1*((sh_right($f2ujt,31) .or. 1)/1)
|
|
else
|
|
if ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)>=0)
|
|
$t4gop := -1
|
|
else
|
|
$t4gop := 1
|
|
end if
|
|
end if
|
|
if ($ord01=0 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3))
|
|
if ($xc3po=1)
|
|
$mkoi4 := $mkoi4-(($whs1s-$uiy0n)/10)
|
|
else
|
|
$mkoi4 := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
|
|
end if
|
|
else
|
|
if ($xc3po=1)
|
|
$wmznm := $wmznm-(($whs1s-$uiy0n)/10)
|
|
else
|
|
$wmznm := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
|
|
end if
|
|
$mkoi4 := $wmznm
|
|
end if
|
|
end if
|
|
else
|
|
if ($whs1s<$wo1eq)
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk=-1))
|
|
$whs1s := $wo1eq+random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
|
|
$mkoi4 := $whs1s
|
|
else
|
|
if ($linka=1)
|
|
$t4gop := (sh_right($f2ujt,31) .or. 1)/1
|
|
else
|
|
if ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)<=0)
|
|
$t4gop := -1
|
|
else
|
|
$t4gop := 1
|
|
end if
|
|
end if
|
|
if ($ord01=0 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3))
|
|
$mkoi4 := $mkoi4+(($wo1eq-$whs1s)/10)
|
|
else
|
|
$wmznm := $wmznm+(($wo1eq-$whs1s)/10)
|
|
$mkoi4 := $wmznm
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
else
|
|
if ($xc3po=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
|
|
$whs1s := $wo1eq+$whs1s
|
|
end if
|
|
if ($whs1s>$uiy0n)
|
|
if ($xc3po=1)
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk # -1)))
|
|
if ($linka=0)
|
|
$dyt1q := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$t4gop
|
|
else
|
|
$dyt1q := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)--8000)/2*$t4gop
|
|
end if
|
|
~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0
|
|
$mkoi4 := $mkoi4-$f2ujt+($dyt1q*real_to_int(100.0/~u0ht0))
|
|
~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0+1.0
|
|
$whs1s := $mkoi4-real_to_int(int_to_real($mkoi4-$uiy0n)/~u0ht0)
|
|
$whs1s := $whs1s-(random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000)))/5)
|
|
$mkoi4 := $whs1s
|
|
if ($EVENT_ID=$n0uzs)
|
|
$wmznm := $whs1s
|
|
end if
|
|
end if
|
|
else
|
|
$whs1s := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
|
|
$jwx5k := $whs1s-$wo1eq-($i11wt*$gm014)
|
|
$mkoi4 := $whs1s
|
|
end if
|
|
else
|
|
if ($whs1s<$wo1eq)
|
|
if ($xc3po=1)
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk # 1)))
|
|
if ($linka=0)
|
|
$dyt1q := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$t4gop
|
|
else
|
|
$dyt1q := -($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)--8000)/2*$t4gop
|
|
end if
|
|
~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0
|
|
$mkoi4 := $mkoi4-$f2ujt+($dyt1q*real_to_int(100.0/~u0ht0))
|
|
~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0+1.0
|
|
$whs1s := $mkoi4+real_to_int(int_to_real($wo1eq-$mkoi4)/~u0ht0)
|
|
$whs1s := $whs1s+(random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000)))/5)
|
|
$mkoi4 := $whs1s
|
|
if ($EVENT_ID=$n0uzs)
|
|
$wmznm := $whs1s
|
|
end if
|
|
end if
|
|
else
|
|
$whs1s := $wo1eq+random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
|
|
$jwx5k := $whs1s-$wo1eq-($i11wt*$gm014)
|
|
$mkoi4 := $whs1s
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
$dyt1q := ($kexsv-2)*1000
|
|
if ($whs1s>=$dyt1q)
|
|
$whs1s := $dyt1q
|
|
end if
|
|
if ($whs1s<0)
|
|
$whs1s := 0
|
|
end if
|
|
if ($cvjhr=23 or ($fpvgj=23))
|
|
$4ggtc := $EVENT_ID
|
|
$bctbb := %laljf[$4ggtc mod 8192]
|
|
%45gob[$bctbb] := $whs1s
|
|
$dc3zm := $4ggtc
|
|
$frfox := 0
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
|
|
select (%dpoyh[$fg4rw])
|
|
case 2
|
|
call SHP1__update_mod_vals
|
|
case 3
|
|
call SHP2__update_mod_vals
|
|
case 4
|
|
call LFO1__update_mod_vals
|
|
case 5
|
|
call LFO2__update_mod_vals
|
|
case 6
|
|
call BUS1__update_mod_vals
|
|
case 7
|
|
call BUS2__update_mod_vals
|
|
case 8
|
|
call MTX__update_mod_vals
|
|
case 12
|
|
call NOTE_DURATION_POLY__update_mod_vals
|
|
case 10
|
|
call VELOCITY_POLY__update_mod_vals
|
|
case 13
|
|
call KEY_TRACK_POLY__update_mod_vals
|
|
case 18
|
|
call CONST_MOD__update_mod_vals
|
|
case 19
|
|
call REL_MOD__update_mod_vals
|
|
case 20
|
|
call ARP_MOD__update_mod_vals
|
|
case 9
|
|
call AFTERTOUCH__update_mod_vals
|
|
case 21
|
|
call MPE_SLIDE__update_mod_vals
|
|
case 22
|
|
call RANDOM__update_mod_vals
|
|
case 23
|
|
call ABS_CURSOR__update_mod_vals
|
|
end select
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
if ($2zs5k=1 and (%_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]>0))
|
|
$xoacb := ($m2mpa+($n0kha*%ppvim[$u2pwx]/1000))*real_to_int(?uya1g[%_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]+60]*1000.0)
|
|
else
|
|
$xoacb := ($m2mpa+($n0kha*%ppvim[$u2pwx]/1000))*1000
|
|
end if
|
|
$xoacb := $xoacb+(-sh_right($xoacb-1,31)*(1-$xoacb))
|
|
$oxfyj := play_note($EVENT_NOTE-($swg5e*%g_frm_shft[$51oxm]),$EVENT_VELOCITY,$whs1s,$xoacb)
|
|
set_event_par_arr($oxfyj,$EVENT_PAR_ALLOW_GROUP,1,$wuu5g)
|
|
set_event_par($oxfyj,$EVENT_PAR_0,-1)
|
|
change_pan($oxfyj,random(-10*($kuk42+($o5n5m*%ppvim[$fzwxf]/1000)),10*($kuk42+($o5n5m*%ppvim[$fzwxf]/1000))),0)
|
|
$dyt1q := real_to_int(pow((int_to_real($1g0ky+($2xzsd*%ppvim[$ldi1z]/1000))-0.0)/500000.0,?rylw5[14])*500001.0)
|
|
if (%g_frm_shft[$51oxm]=0)
|
|
change_tune($oxfyj,random(-$dyt1q,$dyt1q)+(1000*($qsfxg+($xeafk*%ppvim[$52sa5]/1000)))+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$EVENT_ID mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$EVENT_ID mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),1)
|
|
else
|
|
change_tune($oxfyj,random(-$dyt1q,$dyt1q)+(1000*($qsfxg+($xeafk*%ppvim[$52sa5]/1000)))+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$EVENT_ID mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$EVENT_ID mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0)+(100000*$swg5e),1)
|
|
end if
|
|
if ($2zs5k=1 and (%_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]>0))
|
|
$dyt1q := %_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]*1500/12
|
|
change_vol($oxfyj,$dyt1q,1)
|
|
end if
|
|
select (get_event_par($EVENT_ID,$EVENT_PAR_0))
|
|
case 0
|
|
if ($ppaoe=1)
|
|
if ($ork5f=0)
|
|
$lgveb := $dg3qf
|
|
else
|
|
$lgveb := 127
|
|
end if
|
|
else
|
|
$dyt1q := ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]])*127/$ppaoe
|
|
if (int_to_real((1000+-sh_right($qwf1w,1))*10)/10000.0 # 1.0)
|
|
$lgveb := real_to_int(127.0*((pow(int_to_real((1000+-sh_right($qwf1w,1))*10)/10000.0,int_to_real($dyt1q))-1.0)/(pow(int_to_real((1000+-sh_right($qwf1w,1))*10)/10000.0,int_to_real(127))-1.0)))
|
|
else
|
|
$lgveb := $dyt1q*127/127
|
|
end if
|
|
$lgveb := $lgveb-(-sh_right(127-$lgveb,31)*($lgveb-127))
|
|
end if
|
|
$tjpb1 := -real_to_int(60000.0-(?xpxzm[$lgveb*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
|
|
change_vol($oxfyj,$tjpb1,1)
|
|
if ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]]>=($ppaoe-($y4ap3/10)))
|
|
set_event_par($EVENT_ID,$EVENT_PAR_0,1)
|
|
$cgeby := $lgveb
|
|
end if
|
|
case 1
|
|
$dyt1q := ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]]-$ppaoe)*127/$ork5f
|
|
$dyt1q := $dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))
|
|
$lgveb := 128+real_to_int(int_to_real($dg3qf-128)*((pow(0.985,int_to_real($dyt1q))-1.0)/(pow(0.985,int_to_real(127))-1.0)))
|
|
$tjpb1 := -real_to_int(60000.0-(?xpxzm[$lgveb*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
|
|
change_vol($oxfyj,$tjpb1,1)
|
|
if ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]]>=($ppaoe+$ork5f-($y4ap3/10)))
|
|
set_event_par($EVENT_ID,$EVENT_PAR_0,2)
|
|
end if
|
|
case 2
|
|
$lgveb := $dg3qf
|
|
$tjpb1 := -real_to_int(60000.0-(?xpxzm[$dg3qf*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
|
|
change_vol($oxfyj,$tjpb1,1)
|
|
case 3
|
|
if ($q2v0i=0)
|
|
$q2v0i := $tsm3s
|
|
end if
|
|
%jnhix[%laljf[$EVENT_ID mod 8192]] := 1
|
|
$dyt1q := ($ENGINE_UPTIME-$q2v0i)*127/$p3vhn
|
|
$r0pwv := $lgveb+real_to_int(int_to_real(0-$lgveb)*((pow(0.985,int_to_real($dyt1q))-1.0)/(pow(0.985,int_to_real(127))-1.0)))
|
|
$tjpb1 := -real_to_int(60000.0-(?xpxzm[($r0pwv+(-sh_right($r0pwv-0,31)*(0-$r0pwv)))*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
|
|
change_vol($oxfyj,$tjpb1,1)
|
|
if ($EVENT_ID=$n0uzs and ($0e0hy>0))
|
|
$n0uzs := -1
|
|
end if
|
|
if ($ENGINE_UPTIME-$q2v0i>=$p3vhn or (get_event_par($oxfyj,$EVENT_PAR_VOLUME)<-60000) or (get_event_par($EVENT_ID,$EVENT_PAR_3)=1))
|
|
set_event_par($EVENT_ID,$EVENT_PAR_0,4)
|
|
fade_out($oxfyj,200,1)
|
|
if ($EVENT_ID=$ukkxs)
|
|
$r5war := -1
|
|
end if
|
|
$dyt1q := search(%mc3xd,$EVENT_ID)
|
|
if ($dyt1q # -1)
|
|
%mc3xd[$dyt1q] := 0
|
|
dec($pdzso)
|
|
end if
|
|
$er442 := search(%dz3eb,$EVENT_ID)
|
|
if ($er442 # -1)
|
|
%dz3eb[$er442] := 0
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end if
|
|
end select
|
|
if ($EVENT_ID=$ukkxs and ($linka=1) and (get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
call update_g_pos_hit_anker_lenth_text
|
|
end if
|
|
wait(1)
|
|
if ($r5war=-1 and ($ukkxs # $EVENT_ID))
|
|
$ukkxs := $EVENT_ID
|
|
$r5war := get_event_par($oxfyj,$EVENT_PAR_ZONE_ID)
|
|
$pilpf := get_sample_length($r5war)/1000
|
|
if ($r5war # $3rm1t and ($r5war>-1))
|
|
attach_zone($4lo3h,$r5war,0)
|
|
$3rm1t := $r5war
|
|
call update_all_mod_knob_rt_indicator_poly
|
|
end if
|
|
end if
|
|
$er442 := search(%dz3eb,$EVENT_ID)
|
|
if (($0ib2k=1 or ($0ib2k=0)) and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 4))
|
|
if ($er442 # -1)
|
|
$dyt1q := ($whs1s/1000-0)*(get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X))/($pilpf-0)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_X,$dyt1q)
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2+-sh_right(abs($0ib2k-0)-1,31))
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3)
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,2+(-sh_right(abs($0ib2k-0)-1,31)*3))
|
|
else
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,1+(-sh_right(abs($0ib2k-0)-1,31)*3))
|
|
end if
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
else
|
|
$er442 := search(%dz3eb,0)
|
|
if ($er442 # -1)
|
|
%dz3eb[$er442] := $EVENT_ID
|
|
$dyt1q := ($whs1s/1000-0)*(get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X))/($pilpf-0)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_X,$dyt1q)
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2+-sh_right(abs($0ib2k-0)-1,31))
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3)
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,2+(-sh_right(abs($0ib2k-0)-1,31)*3))
|
|
else
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,1+(-sh_right(abs($0ib2k-0)-1,31)*3))
|
|
end if
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
|
|
end if
|
|
end if
|
|
else
|
|
if ($er442 # -1 and (get_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
|
|
set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
end if
|
|
end if
|
|
if ($EVENT_ID=$n0uzs)
|
|
$b1esx := $ENGINE_UPTIME+($y4ap3/10)
|
|
end if
|
|
wait($y4ap3*100)
|
|
end while
|
|
end on
|
|
|
|
on release
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=1000)
|
|
exit
|
|
end if
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=-3)
|
|
$z5xav := get_event_par($EVENT_ID,$EVENT_PAR_NOTE)
|
|
$35mmm := search(%br0tn,%wwz2v[$0erls])
|
|
if ($35mmm<24 and ($35mmm # -1) and (search(%br0tn,$z5xav)=-1))
|
|
%br0tn[$35mmm] := $z5xav
|
|
%2rhz1[$z5xav] := get_event_par($EVENT_ID,$EVENT_PAR_1)
|
|
end if
|
|
call ARP__update_notes
|
|
if ($gcbnc=1 and ($mluem=0))
|
|
$mluem := 1
|
|
$tp4oa := 0
|
|
$0tbzw := 0
|
|
$0c1m3 := 0
|
|
$gbgom := 1
|
|
$5pffj := $ENGINE_UPTIME
|
|
$upvcm := 0
|
|
while ($gcbnc>0 and ($ruhe4=1) and ($t4vew=1))
|
|
call _ARP__update_step_length
|
|
if (%br0tn[$0tbzw]=%wwz2v[$0erls])
|
|
$0tbzw := 0
|
|
end if
|
|
call ARP_MOD__update_mod_vals
|
|
if (%pyeoz[$tp4oa]>0)
|
|
select ($0erls)
|
|
case 4
|
|
$ut1tc := 0
|
|
while ($ut1tc<$gcbnc)
|
|
$cej2p := %br0tn[$ut1tc]
|
|
if ($cej2p>127)
|
|
$cej2p := 115+($cej2p mod 12)
|
|
end if
|
|
$cej2p := $cej2p+($0c1m3*12)
|
|
while ($cej2p>127 and (%br0tn[$ut1tc]<127))
|
|
$0c1m3 := ($0c1m3+1) mod $q0o5r
|
|
$cej2p := %br0tn[$ut1tc]+($0c1m3*12)
|
|
end while
|
|
if (in_range($cej2p,0,127))
|
|
call MOD__restore_last_mono_mod_context
|
|
$r0pwv := ($q0rb2+($qb5xv*%ppvim[$0vs3i]/1000))*%pyeoz[$tp4oa]/1000
|
|
$r0pwv := $r0pwv*(1+(sh_right(127-$r0pwv,31) .or. sh_right($r0pwv-1,31)))-sh_right($r0pwv-1,31)-(127*sh_right(127-$r0pwv,31))
|
|
%ppvim[10] := ($r0pwv-1)*1000/126
|
|
%ppvim[13] := $cej2p*1000/127
|
|
%ppvim[12] := 0
|
|
$gysvc := random(0,1000)
|
|
%ppvim[22] := $gysvc
|
|
$dyt1q := ($dgu14+($5l3um*%ppvim[$f4o1c]/1000))*%std_smp_l_grp[$hdmk1]/10000
|
|
$dyt1q := ($dyt1q*(1+(sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((%std_smp_l_grp[$hdmk1]-5)*sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31)))*1000
|
|
$auli3 := play_note($cej2p,$r0pwv,$dyt1q,real_to_int(~qa2mp/2.0))
|
|
set_event_par($auli3,$EVENT_PAR_0,-4)
|
|
%hrm2k[$fijbx] := $auli3
|
|
%k0ra5[$fijbx] := $auli3
|
|
$fijbx := ($fijbx+1) mod num_elements(%hrm2k)
|
|
call MOD__inc_POLY__count
|
|
%asdef[$1bi4b] := $auli3
|
|
%laljf[$auli3 mod 8192] := $1bi4b
|
|
%5ggz3[$1bi4b] := $auli3
|
|
%w1vde[$1bi4b] := $ENGINE_UPTIME
|
|
%ilm5d[$1bi4b] := get_event_par($auli3,$EVENT_PAR_NOTE)
|
|
%c1kc4[$1bi4b] := get_event_par($auli3,$EVENT_PAR_VELOCITY)
|
|
%jnhix[$1bi4b] := 0
|
|
%gvnxp[$1bi4b] := %gvnxp[%laljf[%2rhz1[%br0tn[$0tbzw]] mod 8192]]
|
|
%oy5fa[$1bi4b] := $gysvc
|
|
if (event_status(%z3n3e[%gvnxp[$1bi4b]])=$EVENT_STATUS_INACTIVE)
|
|
%z3n3e[%gvnxp[$1bi4b]] := $auli3
|
|
end if
|
|
$3yie0 := %laljf[$auli3 mod 8192]
|
|
select ($e2mne)
|
|
case 0
|
|
?lrdg1[$3yie0] := int_to_real(random(0,10000))/10000.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 1
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$a2nqk := $3yie0
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
|
|
?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
|
|
%hqihq[$3yie0] := %hqihq[$a2nqk]
|
|
end if
|
|
case 2
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 3
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 4
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$a2nqk := $3yie0
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
|
|
?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
|
|
%hqihq[$3yie0] := %hqihq[$a2nqk]
|
|
end if
|
|
end select
|
|
$3yie0 := %laljf[$auli3 mod 8192]
|
|
select ($eu0kx)
|
|
case 0
|
|
?pu5ib[$3yie0] := int_to_real(random(0,10000))/10000.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 1
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$xpr4r := $3yie0
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
|
|
?p2rij[$3yie0] := ?p2rij[$xpr4r]
|
|
%qvhhl[$3yie0] := %qvhhl[$xpr4r]
|
|
end if
|
|
case 2
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 3
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 4
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$xpr4r := $3yie0
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
|
|
?p2rij[$3yie0] := ?p2rij[$xpr4r]
|
|
%qvhhl[$3yie0] := %qvhhl[$xpr4r]
|
|
end if
|
|
end select
|
|
set_event_par_arr($auli3,$EVENT_PAR_ALLOW_GROUP,1,$hdmk1)
|
|
call MOD__perform_sample_layer_update_for_arp_note
|
|
end if
|
|
inc($ut1tc)
|
|
end while
|
|
call ARP__update_sample_waveform
|
|
case 0 to 9
|
|
if ($dyo2q=0)
|
|
$cej2p := 60
|
|
else
|
|
$cej2p := %br0tn[$0tbzw]
|
|
end if
|
|
if ($cej2p>127)
|
|
$cej2p := 115+($cej2p mod 12)
|
|
end if
|
|
$cej2p := $cej2p+($0c1m3*12)
|
|
while ($cej2p>127 and (%br0tn[$0tbzw]<127))
|
|
$0c1m3 := ($0c1m3+1) mod $q0o5r
|
|
$cej2p := %br0tn[$0tbzw]+($0c1m3*12)
|
|
end while
|
|
if (in_range($cej2p,0,127))
|
|
call MOD__restore_last_mono_mod_context
|
|
$r0pwv := ($q0rb2+($qb5xv*%ppvim[$0vs3i]/1000))*%pyeoz[$tp4oa]/1000
|
|
$r0pwv := $r0pwv*(1+(sh_right(127-$r0pwv,31) .or. sh_right($r0pwv-1,31)))-sh_right($r0pwv-1,31)-(127*sh_right(127-$r0pwv,31))
|
|
%ppvim[10] := ($r0pwv-1)*1000/126
|
|
%ppvim[13] := $cej2p*1000/127
|
|
%ppvim[12] := 0
|
|
$gysvc := random(0,1000)
|
|
%ppvim[22] := $gysvc
|
|
$dyt1q := ($dgu14+($5l3um*%ppvim[$f4o1c]/1000))*%std_smp_l_grp[$hdmk1]/10000
|
|
$dyt1q := ($dyt1q*(1+(sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((%std_smp_l_grp[$hdmk1]-5)*sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31)))*1000
|
|
$auli3 := play_note($cej2p,$r0pwv,$dyt1q,real_to_int(~qa2mp/2.0))
|
|
set_event_par($auli3,$EVENT_PAR_0,-4)
|
|
%hrm2k[$fijbx] := $auli3
|
|
%k0ra5[$fijbx] := $auli3
|
|
$fijbx := ($fijbx+1) mod num_elements(%hrm2k)
|
|
call MOD__inc_POLY__count
|
|
%asdef[$1bi4b] := $auli3
|
|
%laljf[$auli3 mod 8192] := $1bi4b
|
|
%5ggz3[$1bi4b] := $auli3
|
|
%w1vde[$1bi4b] := $ENGINE_UPTIME
|
|
%ilm5d[$1bi4b] := get_event_par($auli3,$EVENT_PAR_NOTE)
|
|
%c1kc4[$1bi4b] := get_event_par($auli3,$EVENT_PAR_VELOCITY)
|
|
%jnhix[$1bi4b] := 0
|
|
%gvnxp[$1bi4b] := %gvnxp[%laljf[%2rhz1[%br0tn[$0tbzw]] mod 8192]]
|
|
%oy5fa[$1bi4b] := $gysvc
|
|
if (event_status(%z3n3e[%gvnxp[$1bi4b]])=$EVENT_STATUS_INACTIVE)
|
|
%z3n3e[%gvnxp[$1bi4b]] := $auli3
|
|
end if
|
|
$3yie0 := %laljf[$auli3 mod 8192]
|
|
select ($e2mne)
|
|
case 0
|
|
?lrdg1[$3yie0] := int_to_real(random(0,10000))/10000.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 1
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$a2nqk := $3yie0
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
|
|
?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
|
|
%hqihq[$3yie0] := %hqihq[$a2nqk]
|
|
end if
|
|
case 2
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 3
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
case 4
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$a2nqk := $3yie0
|
|
?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
|
|
?2bxj3[$3yie0] := 0.0
|
|
%hqihq[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
|
|
?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
|
|
%hqihq[$3yie0] := %hqihq[$a2nqk]
|
|
end if
|
|
end select
|
|
$3yie0 := %laljf[$auli3 mod 8192]
|
|
select ($eu0kx)
|
|
case 0
|
|
?pu5ib[$3yie0] := int_to_real(random(0,10000))/10000.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 1
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$xpr4r := $3yie0
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
|
|
?p2rij[$3yie0] := ?p2rij[$xpr4r]
|
|
%qvhhl[$3yie0] := %qvhhl[$xpr4r]
|
|
end if
|
|
case 2
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 3
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
case 4
|
|
if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
|
|
$xpr4r := $3yie0
|
|
?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
|
|
?p2rij[$3yie0] := 0.0
|
|
%qvhhl[$3yie0] := $ENGINE_UPTIME
|
|
else
|
|
?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
|
|
?p2rij[$3yie0] := ?p2rij[$xpr4r]
|
|
%qvhhl[$3yie0] := %qvhhl[$xpr4r]
|
|
end if
|
|
end select
|
|
set_event_par_arr($auli3,$EVENT_PAR_ALLOW_GROUP,1,$hdmk1)
|
|
call MOD__perform_sample_layer_update_for_arp_note
|
|
call ARP__update_sample_waveform
|
|
end if
|
|
end select
|
|
end if
|
|
set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_POS_X)+3+($tp4oa*(get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_WIDTH)-6)/$k5z4u))
|
|
wait(10000)
|
|
~oukv1 := 2.0*~qa2mp
|
|
call MOD__restore_last_mono_mod_context
|
|
call _ARP__update_step_length
|
|
$dyt1q := $3rksw+($qbhb5*%ppvim[$m5sxk]/1000)
|
|
$dyt1q := $dyt1q*(1+(sh_right(%sbnwu[10]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[10],31)))-(%dwdw3[10]*sh_right($dyt1q-%dwdw3[10],31))-(%sbnwu[10]*sh_right(%sbnwu[10]-$dyt1q,31))
|
|
$wgaas := real_to_int(~oukv1*int_to_real($dyt1q)/1000.0)
|
|
$4vgzm := real_to_int(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0-(floor(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0/~oukv1)*~oukv1))
|
|
$upvcm := 1+sh_right($wgaas-$4vgzm,31)
|
|
while (not in_range($4vgzm,$wgaas*$upvcm,real_to_int(~oukv1)*$upvcm+($wgaas*(($upvcm+1) mod 2))) and ($gcbnc>0))
|
|
wait(1000)
|
|
call MOD__restore_last_mono_mod_context
|
|
call _ARP__update_step_length
|
|
~oukv1 := 2.0*~qa2mp
|
|
$dyt1q := $3rksw+($qbhb5*%ppvim[$m5sxk]/1000)
|
|
$dyt1q := $dyt1q*(1+(sh_right(%sbnwu[10]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[10],31)))-(%dwdw3[10]*sh_right($dyt1q-%dwdw3[10],31))-(%sbnwu[10]*sh_right(%sbnwu[10]-$dyt1q,31))
|
|
$wgaas := real_to_int(~oukv1*int_to_real($dyt1q)/1000.0)
|
|
$4vgzm := real_to_int(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0-(floor(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0/~oukv1)*~oukv1))
|
|
end while
|
|
if ($0erls=2)
|
|
if ($0tbzw=($gcbnc-1))
|
|
$gbgom := -1
|
|
else
|
|
if ($0tbzw=0)
|
|
$gbgom := 1
|
|
end if
|
|
end if
|
|
end if
|
|
if (%pyeoz[$tp4oa]>0 or (%pyeoz[$tp4oa]=0 and ($2v40q=0)))
|
|
$0tbzw := ($0tbzw+$gbgom) mod $gcbnc
|
|
end if
|
|
$tp4oa := ($tp4oa+1) mod $k5z4u
|
|
if ($0tbzw=0)
|
|
$0c1m3 := ($0c1m3+1) mod $q0o5r
|
|
end if
|
|
end while
|
|
$mluem := 0
|
|
call ARP__remove_all_notes_and_reset
|
|
end if
|
|
exit
|
|
end if
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0) # -1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -2) and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -5))
|
|
if ($iva44=0 or (get_event_par($EVENT_ID,$EVENT_PAR_3)=1))
|
|
dec($0e0hy)
|
|
$swdze := search(%br0tn,$EVENT_NOTE)
|
|
if ($swdze # -1)
|
|
%br0tn[$swdze] := %wwz2v[$0erls]
|
|
call ARP__update_notes
|
|
end if
|
|
$0e0hy := $0e0hy+(-sh_right($0e0hy-0,31)*(0-$0e0hy))
|
|
set_event_par($EVENT_ID,$EVENT_PAR_0,3)
|
|
$q2v0i := $ENGINE_UPTIME
|
|
%0wsff[$EVENT_NOTE] := 0
|
|
$qfspw := $EVENT_ID
|
|
call MOD__update_mono_start_mode
|
|
else
|
|
if (%lx5kr[$EVENT_NOTE] # -1)
|
|
dec($0e0hy)
|
|
$0e0hy := $0e0hy+(-sh_right($0e0hy-0,31)*(0-$0e0hy))
|
|
$tsm3s := $ENGINE_UPTIME
|
|
set_event_par(%medyt[%lx5kr[$EVENT_NOTE]],$EVENT_PAR_0,3)
|
|
%medyt[%lx5kr[$EVENT_NOTE]] := $EVENT_ID
|
|
else
|
|
%medyt[$h3axx] := $EVENT_ID
|
|
%lx5kr[$EVENT_NOTE] := $h3axx
|
|
%sef3k[$h3axx] := $EVENT_NOTE
|
|
inc($h3axx)
|
|
inc($sgrou)
|
|
end if
|
|
end if
|
|
if ($0e0hy=0 and ($mcp2m=0))
|
|
note_off($auli3)
|
|
%jnhix[%laljf[$auli3 mod 8192]] := 1
|
|
end if
|
|
end if
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=-2 or (get_event_par_arr($EVENT_ID,$EVENT_PAR_CUSTOM,4)=1))
|
|
if ($iva44=1)
|
|
ignore_event($EVENT_ID)
|
|
%srzwv[$rf3ya] := $EVENT_ID
|
|
$rf3ya := ($rf3ya+1) mod 128
|
|
else
|
|
if (get_event_par($EVENT_ID,$EVENT_PAR_0)=-2)
|
|
%jnhix[%laljf[$EVENT_ID mod 8192]] := 1
|
|
end if
|
|
end if
|
|
end if
|
|
end on
|
|
|
|
on controller
|
|
if ($oppog=1)
|
|
exit
|
|
end if
|
|
if ($iyqua=1)
|
|
$4ainj := $CC_NUM
|
|
$iyqua := 0
|
|
exit
|
|
else
|
|
if ($otffr=1 and ($CC_NUM # $4ainj))
|
|
$gcjlt := $CC_NUM
|
|
$otffr := 0
|
|
exit
|
|
end if
|
|
end if
|
|
if ($CC_NUM=$4ainj)
|
|
?xy[0] := int_to_real(%CC[$CC_NUM])/127.0
|
|
$2thol := real_to_int(?xy[0]*10000.0)
|
|
%ppvim[0] := real_to_int(?xy[0]*1000.0)
|
|
%latnx[0] := 0
|
|
%latnx[1] := 0
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
call update_perform_animation
|
|
exit
|
|
else
|
|
if ($CC_NUM=$gcjlt)
|
|
?xy[1] := int_to_real(%CC[$CC_NUM])/127.0
|
|
$jy3sd := real_to_int(?xy[1]*10000.0)
|
|
%ppvim[1] := real_to_int(?xy[1]*1000.0)
|
|
%latnx[0] := 1
|
|
%latnx[1] := 1
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
call update_perform_animation
|
|
exit
|
|
else
|
|
if ($CC_NUM=$VCC_PITCH_BEND)
|
|
%eehid[$MIDI_CHANNEL] := %CC[$CC_NUM]
|
|
exit
|
|
else
|
|
if ($CC_NUM=$VCC_MONO_AT)
|
|
%a31v5[$MIDI_CHANNEL] := %CC[$CC_NUM]*1000/127
|
|
%latnx[0] := 9
|
|
%latnx[1] := 9
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
exit
|
|
else
|
|
if ($CC_NUM=74)
|
|
%2zfuu[$MIDI_CHANNEL] := %CC[$CC_NUM]*1000/127
|
|
%latnx[0] := 21
|
|
%latnx[1] := 21
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
exit
|
|
else
|
|
if ($CC_NUM=64)
|
|
if (%CC[64]>64)
|
|
$iva44 := 1
|
|
else
|
|
if ($iva44=1)
|
|
call stop_all_pedal_notes
|
|
end if
|
|
end if
|
|
exit
|
|
else
|
|
if ($CC_NUM=123)
|
|
call stop_all_notes
|
|
exit
|
|
else
|
|
if ($CC_NUM=121)
|
|
$fg4rw := 0
|
|
while ($fg4rw<16)
|
|
%eehid[$fg4rw] := 0
|
|
%a31v5[$fg4rw] := 0
|
|
%2zfuu[$fg4rw] := 0
|
|
%z3n3e[$fg4rw] := 0
|
|
inc($fg4rw)
|
|
end while
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end if
|
|
end on
|
|
|
|
on poly_at
|
|
$yrh4w := 1
|
|
%vftan[$POLY_AT_NUM] := %POLY_AT[$POLY_AT_NUM]*1000/127
|
|
%latnx[0] := 9
|
|
%latnx[1] := 9
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
end on
|
|
|
|
on ui_control($3pvid)
|
|
call update_modal_dialog_lbl
|
|
end on
|
|
|
|
on ui_control($spdyk)
|
|
if (get_control_par(get_ui_id($spdyk),$CONTROL_PAR_KEY_SHIFT)=1)
|
|
%smp_l_grp[$51oxm] := -1
|
|
$spdyk := ($spdyk+1) mod 2
|
|
end if
|
|
end on
|
|
|
|
on ui_control($1c3gj)
|
|
$1c3gj := 0
|
|
$luyp1 := $0ib2k
|
|
$0ib2k := 5
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($udker)
|
|
$udker := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := 0
|
|
$w0x5j := -1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
$51oxm := %BRW__grp_remap[%jj5qi[0]+100]-100
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
call on_selected_g_group_changed
|
|
end on
|
|
|
|
on ui_control($2ch0u)
|
|
$2ch0u := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := 0
|
|
$w0x5j := 1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
$51oxm := %BRW__grp_remap[%jj5qi[0]+100]-100
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
call on_selected_g_group_changed
|
|
end on
|
|
|
|
on ui_control($lk05f)
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS,($lk05f+1) mod 2,$hdmk1,0,-1)
|
|
end on
|
|
|
|
on ui_control($2qtv2)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
call FX__set_SMPL_filter_parameters
|
|
call FX__update_smpl_filter_ui
|
|
end on
|
|
|
|
on ui_control($hmrz5)
|
|
set_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE,(get_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE)+29-1) mod 29)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
call FX__set_SMPL_filter_parameters
|
|
call FX__update_smpl_filter_ui
|
|
$hmrz5 := 0
|
|
end on
|
|
|
|
on ui_control($mm1ti)
|
|
$mm1ti := 0
|
|
$luyp1 := $0ib2k
|
|
$0ib2k := 6
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($4cstx)
|
|
set_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE,(get_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE)+1) mod 29)
|
|
if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
|
|
$m2etg := 1
|
|
$hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
end if
|
|
call FX__set_SMPL_filter_parameters
|
|
call FX__update_smpl_filter_ui
|
|
$4cstx := 0
|
|
end on
|
|
|
|
on ui_control($3r1av)
|
|
$3r1av := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := 1
|
|
$w0x5j := -1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
$hdmk1 := -sh_right(abs(%jj5qi[1]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[1]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[1]])
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
call on_selected_std_group_changed
|
|
end on
|
|
|
|
on ui_control($0l4xe)
|
|
$0l4xe := 0
|
|
$4ut4g := $zor2m
|
|
$zor2m := 1
|
|
$w0x5j := 1
|
|
call _BRW__select_preset_id_for_file_type_with_offset
|
|
$hdmk1 := -sh_right(abs(%jj5qi[1]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[1]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[1]])
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
call on_selected_std_group_changed
|
|
end on
|
|
|
|
on ui_control($k21jk)
|
|
if ($k21jk=1)
|
|
$dyt1q := $r0khx-($eai4d+($3zolj*%ppvim[$r3d0o]/1000))
|
|
else
|
|
$dyt1q := 1000*(1+sh_right($r0khx+$eai4d+($3zolj*%ppvim[$r3d0o]/1000)-1000,31))-(($r0khx+$eai4d+($3zolj*%ppvim[$r3d0o]/1000))*sh_right($r0khx+$eai4d+($3zolj*%ppvim[$r3d0o]/1000)-1000,31))
|
|
end if
|
|
$r0khx := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
$gpzoi := 25
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
call update_g_rng_max_label
|
|
call update_g_rng_max_area
|
|
end on
|
|
|
|
on ui_control($xc3po)
|
|
set_control_par_str(get_ui_id($hnp3t),$CONTROL_PAR_PICTURE,"GE_WF_COV_LEFT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
|
|
set_control_par_str(get_ui_id($q3vtp),$CONTROL_PAR_PICTURE,"GE_WF_COV_RIGHT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
|
|
end on
|
|
|
|
on async_complete
|
|
if ($NI_ASYNC_ID=$d1d43)
|
|
if (%preset[22]=0)
|
|
$d1d43 := -1
|
|
exit
|
|
end if
|
|
$bpkqt := %preset[19]
|
|
$m2mpa := %preset[22]
|
|
$1g0ky := %preset[25]
|
|
$liaof := %preset[28]
|
|
$sgbvz := %preset[31]
|
|
$4zkqn := %preset[34]
|
|
$kuk42 := %preset[37]
|
|
$qsfxg := %preset[40]
|
|
$aaf4s := %preset[43]
|
|
$eai4d := %preset[52]
|
|
$r0khx := %preset[55]
|
|
$zktrd := %preset[310]
|
|
$sseum := %preset[320]
|
|
$3tqoo := %preset[330]
|
|
$1tszb := %preset[335]
|
|
$l2tv1 := %preset[202]
|
|
$c21kk := %preset[205]
|
|
$uvcxk := %preset[215]
|
|
$dgu14 := %preset[234]
|
|
$qbesm := %preset[1012]
|
|
$tqsps := %preset[1015]
|
|
$4knyg := %preset[1018]
|
|
$x5zyo := %preset[1021]
|
|
$3xmqt := %preset[1024]
|
|
$c30oe := %preset[1027]
|
|
$41deb := %preset[1030]
|
|
$ynoq5 := %preset[1033]
|
|
$33zwn := %preset[1036]
|
|
$p0hox := %preset[1039]
|
|
$bokn2 := %preset[1042]
|
|
$xxdkc := %preset[1045]
|
|
$dyqeg := %preset[1048]
|
|
$nznqd := %preset[1051]
|
|
$zprpl := %preset[1054]
|
|
$bpu3e := %preset[1057]
|
|
$s20mm := %preset[1060]
|
|
$5q021 := %preset[1063]
|
|
$fnpd2 := %preset[1066]
|
|
$wmqep := %preset[1069]
|
|
$gsxh3 := %preset[1072]
|
|
$edhpo := %preset[1075]
|
|
$ei4rr := %preset[1078]
|
|
$nfnkh := %preset[1081]
|
|
$xug04 := %preset[1084]
|
|
$bvaw5 := %preset[1087]
|
|
$54gsh := %preset[1090]
|
|
$xgma4 := %preset[1093]
|
|
$4ppiu := %preset[1096]
|
|
$2lmoo := %preset[1099]
|
|
$ajka4 := %preset[1102]
|
|
$kw31l := %preset[1105]
|
|
$za4fi := %preset[1108]
|
|
$zctyt := %preset[1111]
|
|
$nqqg3 := %preset[1114]
|
|
$et1j2 := %preset[1117]
|
|
$ouvzc := %preset[1120]
|
|
$yi2x2 := %preset[1123]
|
|
$yr3xi := %preset[1126]
|
|
$tcdg3 := %preset[1206]
|
|
$ud2dz := %preset[1200]
|
|
$b4qif := %preset[1203]
|
|
$ppztm := %preset[1000]
|
|
$mjxc2 := %preset[1003]
|
|
$uvwcc := %preset[1006]
|
|
$ev1e5 := %preset[1009]
|
|
$3fqin := %preset[13]
|
|
$h11uu := %preset[208]
|
|
$nwl2v := %preset[46]
|
|
$wfiom := %preset[49]
|
|
$ufbsw := %preset[222]
|
|
$maq5o := %preset[225]
|
|
$lqoqt := %preset[228]
|
|
$zqnbc := %preset[231]
|
|
$u51dh := %preset[211]
|
|
$2qveo := %preset[212]
|
|
$fjnu3 := %preset[213]
|
|
$tz115 := %preset[214]
|
|
$2d1qh := %preset[218]
|
|
$az3wx := %preset[250]
|
|
$ki4hc := %preset[251]
|
|
$y4fhf := %preset[252]
|
|
$cfneg := %preset[253]
|
|
$kpiih := %preset[1129]
|
|
$ddusk := %preset[1130]
|
|
$ysdm4 := %preset[1131]
|
|
$dtugu := %preset[1132]
|
|
$pvege := %preset[1133]
|
|
$iggz4 := %preset[1134]
|
|
$5ernz := %preset[1135]
|
|
$gepsm := %preset[1136]
|
|
$qtif2 := %preset[1137]
|
|
$dtx0r := %preset[1138]
|
|
$ophyd := %preset[1139]
|
|
$ydeyc := %preset[1140]
|
|
$ppaoe := %preset[58]
|
|
$ork5f := %preset[59]
|
|
$dg3qf := %preset[60]
|
|
$p3vhn := %preset[61]
|
|
$qwf1w := %preset[63]
|
|
$fflhr := %preset[1207]
|
|
$rpdbb := %preset[1208]
|
|
$3imfl := %preset[1201]
|
|
$v2kdj := %preset[1202]
|
|
$uqaye := %preset[1204]
|
|
$tpmdd := %preset[1205]
|
|
$gwhxp := %preset[1001]
|
|
$r0mpl := %preset[1002]
|
|
$bxtyp := %preset[1004]
|
|
$a1mcv := %preset[1005]
|
|
$xcb2e := %preset[1007]
|
|
$h5tys := %preset[1008]
|
|
$vtpyr := %preset[1010]
|
|
$mophf := %preset[1011]
|
|
$24riz := %preset[1013]
|
|
$e2h4j := %preset[1014]
|
|
$51jvx := %preset[1016]
|
|
$lqfpr := %preset[1017]
|
|
$rsero := %preset[1019]
|
|
$sejrr := %preset[1020]
|
|
$os0gc := %preset[1022]
|
|
$2iqnc := %preset[1023]
|
|
$0nwvw := %preset[1025]
|
|
$o0yx0 := %preset[1026]
|
|
$iwhhy := %preset[1028]
|
|
$lafc5 := %preset[1029]
|
|
$5yyj1 := %preset[1031]
|
|
$nj3pk := %preset[1032]
|
|
$brpj3 := %preset[1034]
|
|
$b1s4y := %preset[1035]
|
|
$hwhlk := %preset[1037]
|
|
$1kgif := %preset[1038]
|
|
$2ytkr := %preset[1040]
|
|
$s2dqk := %preset[1041]
|
|
$ak4fz := %preset[1043]
|
|
$0zrh0 := %preset[1044]
|
|
$pqxkq := %preset[1046]
|
|
$mgevd := %preset[1047]
|
|
$cz5nc := %preset[1049]
|
|
$n32ls := %preset[1050]
|
|
$pa1jg := %preset[1052]
|
|
$51guv := %preset[1053]
|
|
$hfm3k := %preset[1055]
|
|
$k3qfg := %preset[1056]
|
|
$fnxkg := %preset[1058]
|
|
$d4ity := %preset[1059]
|
|
$i5nrk := %preset[1061]
|
|
$cm0ux := %preset[1062]
|
|
$fm2z3 := %preset[1064]
|
|
$q1g2q := %preset[1065]
|
|
$cakzn := %preset[1067]
|
|
$rjvzf := %preset[1068]
|
|
$oybgu := %preset[1070]
|
|
$nrlyv := %preset[1071]
|
|
$jkr4m := %preset[1073]
|
|
$qvjwi := %preset[1074]
|
|
$dero1 := %preset[1076]
|
|
$no43m := %preset[1077]
|
|
$2ptey := %preset[1079]
|
|
$k20qf := %preset[1080]
|
|
$lxste := %preset[1082]
|
|
$3drha := %preset[1083]
|
|
$hqxeu := %preset[1085]
|
|
$0zlbe := %preset[1088]
|
|
$h4nrw := %preset[1091]
|
|
$pg4ei := %preset[1094]
|
|
$2bixl := %preset[1097]
|
|
$5jo04 := %preset[1100]
|
|
$iw2oc := %preset[1086]
|
|
$exjvd := %preset[1089]
|
|
$hr3vo := %preset[1092]
|
|
$d0pbl := %preset[1095]
|
|
$oxbzh := %preset[1098]
|
|
$2moaw := %preset[1101]
|
|
$dhmoe := %preset[1103]
|
|
$sw0os := %preset[1104]
|
|
$0shp5 := %preset[1106]
|
|
$pjmqm := %preset[1107]
|
|
$21luc := %preset[1109]
|
|
$ujr4n := %preset[1110]
|
|
$p4vlm := %preset[1112]
|
|
$2cyex := %preset[1113]
|
|
$u45os := %preset[1115]
|
|
$4ng2b := %preset[1116]
|
|
$opstl := %preset[1118]
|
|
$w3nfb := %preset[1119]
|
|
$f3pav := %preset[1121]
|
|
$i1321 := %preset[1122]
|
|
$nrkm4 := %preset[1124]
|
|
$lczp2 := %preset[1125]
|
|
$yixdb := %preset[1127]
|
|
$fr5xq := %preset[1128]
|
|
$qxgdn := %preset[750]
|
|
$ilpk2 := %preset[751]
|
|
$jiutx := %preset[752]
|
|
$2zugt := %preset[311]
|
|
$vas4o := %preset[312]
|
|
$doz2m := %preset[313]
|
|
$e2mne := %preset[314]
|
|
$l4ujc := %preset[315]
|
|
$rj2yq := %preset[316]
|
|
$1wrdd := %preset[323]
|
|
$eu0kx := %preset[324]
|
|
$bi544 := %preset[321]
|
|
$y3s33 := %preset[322]
|
|
$x02cl := %preset[325]
|
|
$s2bg4 := %preset[326]
|
|
$ytzwi := %preset[350]
|
|
$gllpo := %preset[351]
|
|
$cvjhr := %preset[352]
|
|
$f3u5d := %preset[550]
|
|
$hn35i := %preset[551]
|
|
$fpvgj := %preset[552]
|
|
$yexen := %preset[331]
|
|
$v1jgb := %preset[336]
|
|
$zi2jx := %preset[332]
|
|
$gxopj := %preset[337]
|
|
$1fo5x := %preset[333]
|
|
$z1x5e := %preset[338]
|
|
$3k3u2 := %preset[334]
|
|
$13ap0 := %preset[339]
|
|
$gehcz := %preset[370]
|
|
$0qzrr := %preset[371]
|
|
$ihtwl := %preset[380]
|
|
$pzeed := %preset[381]
|
|
$ttvix := %preset[372]
|
|
$hj1x4 := %preset[382]
|
|
$2thol := %preset[300]
|
|
$jy3sd := %preset[301]
|
|
$siaxq := %preset[302]
|
|
$yazuk := %preset[303]
|
|
$zdrta := %preset[306]
|
|
$b4lv0 := %preset[0]
|
|
$ord01 := %preset[12]
|
|
$g345d := %preset[20]
|
|
$n0kha := %preset[23]
|
|
$2xzsd := %preset[26]
|
|
$5wlib := %preset[29]
|
|
$cx1ja := %preset[32]
|
|
$boshu := %preset[35]
|
|
$o5n5m := %preset[38]
|
|
$xeafk := %preset[41]
|
|
$3zolj := %preset[53]
|
|
$yl1h5 := %preset[56]
|
|
$sddk3 := %preset[44]
|
|
$neagb := %preset[18]
|
|
$51oxm := %preset[11]
|
|
$2zs5k := %preset[17]
|
|
$3pyb3 := %preset[21]
|
|
$u2pwx := %preset[24]
|
|
$ldi1z := %preset[27]
|
|
$eu2xe := %preset[30]
|
|
$qxhis := %preset[33]
|
|
$oicux := %preset[36]
|
|
$fzwxf := %preset[39]
|
|
$52sa5 := %preset[42]
|
|
$r3d0o := %preset[54]
|
|
$yqtdo := %preset[57]
|
|
$nplew := %preset[45]
|
|
$xc3po := %preset[16]
|
|
$k21jk := %preset[62]
|
|
$q5pfd := %preset[14]
|
|
$m0zqt := %preset[15]
|
|
$spdyk := %preset[10]
|
|
$pk0h4 := %preset[47]
|
|
$u2ki4 := %preset[48]
|
|
$0hnr5 := %preset[50]
|
|
$tmtfv := %preset[51]
|
|
$gnlj2 := %preset[66]
|
|
$linka := %preset[70]
|
|
$va2lk := %preset[64]
|
|
$y1mc2 := %preset[65]
|
|
$p5wl1 := %preset[71]
|
|
$xrt5z := %preset[72]
|
|
$hdmk1 := %preset[201]
|
|
$zv33b := %preset[203]
|
|
$eg3kt := %preset[206]
|
|
$t4vew := %preset[200]
|
|
$dbgkf := %preset[204]
|
|
$2vyff := %preset[207]
|
|
$rgoik := %preset[209]
|
|
$1xnyu := %preset[210]
|
|
$ia54c := %preset[216]
|
|
$wh1ke := %preset[217]
|
|
$lk05f := %preset[220]
|
|
$2qtv2 := %preset[221]
|
|
$3s02f := %preset[223]
|
|
$3rcax := %preset[224]
|
|
$410y5 := %preset[226]
|
|
$5qrmj := %preset[227]
|
|
$begpw := %preset[229]
|
|
$f0ljx := %preset[230]
|
|
$llm0i := %preset[232]
|
|
$5m5qp := %preset[233]
|
|
$5l3um := %preset[235]
|
|
$f4o1c := %preset[236]
|
|
$ruhe4 := %preset[4000]
|
|
$ojboo := %preset[4001]
|
|
$q0o5r := %preset[4002]
|
|
$0erls := %preset[4003]
|
|
$2v40q := %preset[4004]
|
|
$k5z4u := %preset[4005]
|
|
$1ybzi := %preset[4011]
|
|
$qbhb5 := %preset[4014]
|
|
$qb5xv := %preset[4017]
|
|
$rpaco := %preset[4012]
|
|
$m5sxk := %preset[4015]
|
|
$0vs3i := %preset[4018]
|
|
$ius2b := %preset[4010]
|
|
$3rksw := %preset[4013]
|
|
$q0rb2 := %preset[4016]
|
|
$dyo2q := %preset[237]
|
|
$mcp2m := %preset[238]
|
|
$543zt := %preset[340]
|
|
$lynqa := %preset[341]
|
|
$cbkgv := %preset[342]
|
|
$cxfv2 := %preset[343]
|
|
$uyjwl := %preset[344]
|
|
$4so5t := %preset[345]
|
|
$q1nql := %preset[346]
|
|
$5q4fp := %preset[347]
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%w0xec))
|
|
%w0xec[$y3mgr] := %preset[400+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%rzzs4))
|
|
%rzzs4[$y3mgr] := %preset[600+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%lfbyb))
|
|
%lfbyb[$y3mgr] := %preset[800+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%bswku))
|
|
%bswku[$y3mgr] := %preset[900+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%vhqqa))
|
|
%vhqqa[$y3mgr] := %preset[$00fmj+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%rx3ip))
|
|
%rx3ip[$y3mgr] := %preset[$vhkpx+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%pyeoz))
|
|
%pyeoz[$y3mgr] := %preset[4200+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$y3mgr := 0
|
|
while ($y3mgr<num_elements(%0lu1d))
|
|
%0lu1d[$y3mgr] := %preset[4100+$y3mgr]
|
|
inc($y3mgr)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<num_elements(%3zszw))
|
|
%3zszw[$fg4rw] := %vhqqa[$fg4rw]
|
|
%45vq1[$fg4rw] := %vhqqa[48+$fg4rw]
|
|
%l2lis[$fg4rw] := %vhqqa[96+$fg4rw]
|
|
%pqcgh[$fg4rw] := %vhqqa[144+$fg4rw]
|
|
%sxlyt[$fg4rw] := %vhqqa[192+$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
call convert_preset_data_to_current_version
|
|
$pilpf := %smp_l_grp[$51oxm]
|
|
$421rl := 1
|
|
$k240z := 1
|
|
call update_ui_after_preset_reload
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
$d1d43 := -1
|
|
end if
|
|
if ($NI_ASYNC_ID=$hojz4)
|
|
if ($NI_ASYNC_EXIT_STATUS=0)
|
|
$hojz4 := -1
|
|
end if
|
|
$m2etg := 0
|
|
end if
|
|
if ($NI_ASYNC_ID=$bu04v)
|
|
$m2etg := 0
|
|
end if
|
|
if ($NI_ASYNC_ID=$ygbjm)
|
|
$ygbjm := $NI_ASYNC_EXIT_STATUS-1
|
|
end if
|
|
end on
|
|
|
|
on pgs_changed
|
|
if (pgs_key_exists(PGS_FUNC))
|
|
select (pgs_get_key_val(PGS_FUNC,0))
|
|
case 2
|
|
$hojz4 := load_array_str(%preset_buf,@ichwi & !4jeon[$pgdcw] & "/" & $euybr & ".nka")
|
|
case 3
|
|
$hojz4 := load_array_str(%stepper__preset_vals,@ichwi & !4jeon[$pgdcw] & "/" & $euybr & ".nka")
|
|
case 5
|
|
$d1d43 := load_array_str(%preset,@3cyqr)
|
|
case 9
|
|
wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
|
|
call ARP__restore_from_preset_buffer
|
|
call ARP__on_mode_changed
|
|
call ARP__update_seq_tables
|
|
call ARP__update_mod_knob_ui
|
|
call ARP__update_all_automation_labels
|
|
end select
|
|
end if
|
|
end on
|
|
|
|
on ui_control($t4vew)
|
|
if ($t4vew=0)
|
|
set_ui_wf_property($tmcuy,$UI_WF_PROP_PLAY_CURSOR,0,-1)
|
|
end if
|
|
end on
|
|
|
|
on ui_control(?51qxr)
|
|
$r0pwv := real_to_int(round(?51qxr[0]*int_to_real(get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_WIDTH))))+get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_X)
|
|
select ($NI_MOUSE_EVENT_TYPE)
|
|
case 1
|
|
~chanf := ?51qxr[0]
|
|
$xpd30 := $r0khx
|
|
$eyamh := $eai4d
|
|
if (in_range($r0pwv,get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X),get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)) and ($linka=1))
|
|
$bygzx := 3
|
|
else
|
|
if (in_range($r0pwv,get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-((get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-(get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH)))/2),get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH)))
|
|
$bygzx := 2
|
|
else
|
|
$bygzx := 1
|
|
end if
|
|
end if
|
|
case 2
|
|
if ($0ib2k # 1 and ($v5b0i=1))
|
|
$0ib2k := 1
|
|
call NAV_PAGE__update_main_nav
|
|
end if
|
|
if ($bygzx=3 and (get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_KEY_ALT)=1) and (get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_KEY_SHIFT)=1) and ($v5b0i=1))
|
|
~u0ht0 := ~tptmd
|
|
~tptmd := int_to_real($wo1eq+($i11wt*($liaof+($5wlib*%ppvim[$eu2xe]/1000))))/int_to_real(%smp_l_grp[$51oxm]*1000)
|
|
$gnlj2 := real_to_int(~tptmd*1000000.0)
|
|
$r0pwv := real_to_int(~u0ht0*int_to_real(%smp_l_grp[$51oxm]*1000))
|
|
$r0pwv := ($r0pwv-$wo1eq)/$i11wt
|
|
$r0pwv := $r0pwv-($5wlib*%ppvim[$eu2xe]/1000)
|
|
$liaof := $r0pwv*(1+(sh_right(1000-$r0pwv,31) .or. sh_right($r0pwv-1,31)))-sh_right($r0pwv-1,31)-(1000*sh_right(1000-$r0pwv,31))
|
|
$gpzoi := 15
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
call update_g_pos_hit_anker_ui
|
|
end if
|
|
case 3
|
|
if ($bygzx=2)
|
|
if (~chanf>0.95 or (real_to_int(~chanf*1000.0)<$xpd30))
|
|
$r0pwv := $xpd30-real_to_int((~chanf-?51qxr[0])*1000.0)
|
|
else
|
|
$r0pwv := real_to_int((?51qxr[0]-~chanf)*(1000.0-int_to_real($xpd30))/(1.0-~chanf)+int_to_real($xpd30))
|
|
end if
|
|
$r0khx := $r0pwv*(1+(sh_right(1000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(1000*sh_right(1000-$r0pwv,31))
|
|
$gpzoi := 25
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
else
|
|
if ($bygzx=1)
|
|
if (~chanf<0.05 or (real_to_int(~chanf*1000.0)>$eyamh))
|
|
$r0pwv := $eyamh-real_to_int((~chanf-?51qxr[0])*1000.0)
|
|
else
|
|
$r0pwv := real_to_int((?51qxr[0]-0.0)*(int_to_real($eyamh)-0.0)/(~chanf-0.0))
|
|
end if
|
|
$eai4d := $r0pwv*(1+(sh_right(1000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(1000*sh_right(1000-$r0pwv,31))
|
|
$gpzoi := 24
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
else
|
|
if ($bygzx=3)
|
|
~tptmd := ?51qxr[0]
|
|
$gnlj2 := real_to_int(~tptmd*1000000.0)
|
|
call update_g_pos_hit_anker_ui
|
|
end if
|
|
end if
|
|
end if
|
|
end select
|
|
$v5b0i := $NI_MOUSE_EVENT_TYPE
|
|
end on
|
|
|
|
on ui_control(?3lzme)
|
|
select ($NI_MOUSE_EVENT_TYPE)
|
|
case 2
|
|
if ($0ib2k # 2 and ($rlhoi=1))
|
|
$0ib2k := 2
|
|
call NAV_PAGE__update_main_nav
|
|
exit
|
|
end if
|
|
call update_std_start_offs_from_s_wf_xy
|
|
case 3
|
|
call update_std_start_offs_from_s_wf_xy
|
|
end select
|
|
$rlhoi := $NI_MOUSE_EVENT_TYPE
|
|
end on
|
|
|
|
on ui_control($linka)
|
|
%1iv2s[($linka+1) mod 2] := $sgbvz
|
|
$sgbvz := %1iv2s[$linka]
|
|
$gpzoi := 16
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
call _update_mod_knob_automation_label_for_gl_m_id
|
|
call _update_mod_knob_label_for_gl_m_id
|
|
if (~tptmd=0.0 and ($liaof=1))
|
|
~tptmd := int_to_real($r0khx)/1000.0+(int_to_real($eai4d)/1000.0*int_to_real($k21jk))
|
|
$gnlj2 := real_to_int(~tptmd*1000000.0)
|
|
end if
|
|
$pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
|
|
call update_g_pos_hit_anker_ui
|
|
end on
|
|
|
|
on ui_control($va2lk)
|
|
set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"GE_g_crs_rel_dir_" & $va2lk)
|
|
end on
|
|
|
|
on ui_control($fdz1c)
|
|
$fdz1c := 0
|
|
$y1mc2 := $y1mc2+1-(-sh_right(16-($y1mc2+1),31)*($y1mc2+1-16))
|
|
end on
|
|
|
|
on ui_control($b2d3h)
|
|
$b2d3h := 0
|
|
$y1mc2 := $y1mc2-1+(-sh_right($y1mc2-1-1,31)*(1-($y1mc2-1)))
|
|
end on
|
|
|
|
on ui_control($aewcf)
|
|
call on_g_user_sample_root_key_changed
|
|
end on
|
|
|
|
on ui_control($wzxlg)
|
|
$dyt1q := $aewcf+get_control_par(get_ui_id($wzxlg),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($wzxlg),$CONTROL_PAR_KEY_ALT) .and. 1)*12)
|
|
if (in_range($dyt1q,0,127))
|
|
$aewcf := $dyt1q
|
|
call on_g_user_sample_root_key_changed
|
|
end if
|
|
end on
|
|
|
|
on ui_control($r5bjx)
|
|
$dyt1q := $aewcf-(get_control_par(get_ui_id($r5bjx),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($r5bjx),$CONTROL_PAR_KEY_ALT) .and. 1)*12))
|
|
if (in_range($dyt1q,0,127))
|
|
$aewcf := $dyt1q
|
|
call on_g_user_sample_root_key_changed
|
|
end if
|
|
end on
|
|
|
|
on ui_control($v3y5j)
|
|
call on_s_user_sample_root_key_changed
|
|
end on
|
|
|
|
on ui_control($ozbon)
|
|
$dyt1q := $v3y5j+get_control_par(get_ui_id($ozbon),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($ozbon),$CONTROL_PAR_KEY_ALT) .and. 1)*12)
|
|
if (in_range($dyt1q,0,127))
|
|
$v3y5j := $dyt1q
|
|
call on_s_user_sample_root_key_changed
|
|
end if
|
|
end on
|
|
|
|
on ui_control($uceyz)
|
|
$dyt1q := $v3y5j-(get_control_par(get_ui_id($uceyz),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($uceyz),$CONTROL_PAR_KEY_ALT) .and. 1)*12))
|
|
if (in_range($dyt1q,0,127))
|
|
$v3y5j := $dyt1q
|
|
call on_s_user_sample_root_key_changed
|
|
end if
|
|
end on
|
|
|
|
on ui_control($v3pyu)
|
|
select ($NI_MOUSE_EVENT_TYPE)
|
|
case $NI_MOUSE_EVENT_TYPE_DRAG
|
|
if (num_elements(!NI_DND_ITEMS_AUDIO)=1 or ($zylsx=1))
|
|
$zylsx := ($zylsx+1) mod 2
|
|
$dyt1q := $zylsx
|
|
if ($lxku3=1 and ($zylsx=0))
|
|
$dyt1q := 3
|
|
end if
|
|
set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & $0ib2k & $dyt1q)
|
|
if (not ($51oxm=263 and (get_sample_length(%NI_USER_ZONE_IDS[0])=0)))
|
|
$dyt1q := $lxku3*$HIDE_PART_NOTHING+((.not. $lxku3 .and. 1)*$HIDE_PART_BG)
|
|
set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HIDE,$zylsx*$HIDE_PART_NOTHING+((.not. $zylsx .and. 1)*$dyt1q))
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$zylsx*$HIDE_WHOLE_CONTROL+((.not. $zylsx .and. 1)*$HIDE_PART_BG))
|
|
$dyt1q := $lxku3*$HIDE_WHOLE_CONTROL+((.not. $lxku3 .and. 1)*$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE,$zylsx*$HIDE_WHOLE_CONTROL+((.not. $zylsx .and. 1)*$dyt1q))
|
|
set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE,$zylsx*$HIDE_WHOLE_CONTROL+((.not. $zylsx .and. 1)*$dyt1q))
|
|
call update_g_pos_hit_anker_ui
|
|
end if
|
|
end if
|
|
case $NI_MOUSE_EVENT_TYPE_DROP
|
|
$zylsx := 0
|
|
if ($NUM_GROUPS=365)
|
|
if (num_elements(!NI_DND_ITEMS_AUDIO)=1)
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & $0ib2k & 2)
|
|
@4xudw := !NI_DND_ITEMS_AUDIO[0]
|
|
wait_async(set_sample(%NI_USER_ZONE_IDS[0],@4xudw))
|
|
@vzouq := get_sample(%NI_USER_ZONE_IDS[0],$NI_FILE_NAME)
|
|
wait_async(detect_pitch(%NI_USER_ZONE_IDS[0],~spjzv))
|
|
if (~spjzv=~NI_DETECT_PITCH_INVALID)
|
|
~spjzv := 60.0
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Pitch could not be detected. Please set the root key and pitch manually.")
|
|
end if
|
|
if (~spjzv<48.0)
|
|
~spjzv := 60.0+(~spjzv-(floor(~spjzv/12.0)*12.0))
|
|
end if
|
|
$aewcf := real_to_int(round(~spjzv))
|
|
~spjzv := 100.0*(round(~spjzv)-~spjzv)
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_ROOT_KEY,$aewcf))
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_TUNE,real_to_int(~spjzv)))
|
|
wait_async(detect_peak(%NI_USER_ZONE_IDS[0],~fbacu))
|
|
if (~fbacu=~NI_DETECT_PEAK_INVALID)
|
|
~fbacu := 0.0
|
|
end if
|
|
if (~fbacu<-36.0)
|
|
~fbacu := -36.0
|
|
end if
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_VOLUME,real_to_int(-~fbacu*100.0)))
|
|
$51oxm := 263
|
|
%smp_l_grp[263] := get_sample_length(%NI_USER_ZONE_IDS[0])/1000
|
|
$lxku3 := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[0])-0)-1,31)
|
|
if ($lxku3=1)
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"The file could not be loaded !")
|
|
end if
|
|
%jj5qi[0] := 263
|
|
$dyt1q := -1
|
|
$fg4rw := 0
|
|
while ($fg4rw<%k4yha[0])
|
|
if (%3owef[$fg4rw]=263)
|
|
$dyt1q := $fg4rw
|
|
$fg4rw := %k4yha[0]
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
%kt24s[0] := $dyt1q
|
|
call update_rootkey_array_for_g_user_sample
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Sorry, you can only drop a single wav/ncw/aif file onto Straylight.")
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
end if
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Please reload the Straylight nki from the Library Tab to enabled the drag and drop functionality.")
|
|
set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
end if
|
|
call on_selected_g_group_changed
|
|
end select
|
|
end on
|
|
|
|
on ui_control($fi22y)
|
|
select ($NI_MOUSE_EVENT_TYPE)
|
|
case $NI_MOUSE_EVENT_TYPE_DRAG
|
|
if (num_elements(!NI_DND_ITEMS_AUDIO)=1 or ($nfr15=1))
|
|
$nfr15 := ($nfr15+1) mod 2
|
|
$dyt1q := $nfr15
|
|
if ($x1spm=1 and ($nfr15=0))
|
|
$dyt1q := 3
|
|
end if
|
|
set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & ($0ib2k/2+($0ib2k/2*$mcp2m)) & $dyt1q)
|
|
if (not ($hdmk1=364 and (get_sample_length(%NI_USER_ZONE_IDS[1])=0)))
|
|
$dyt1q := $x1spm*$HIDE_PART_NOTHING+((.not. $x1spm .and. 1)*$HIDE_PART_BG)
|
|
set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HIDE,$nfr15*$HIDE_PART_NOTHING+((.not. $nfr15 .and. 1)*$dyt1q))
|
|
$dyt1q := $x1spm*$HIDE_WHOLE_CONTROL+((.not. $x1spm .and. 1)*$HIDE_PART_BG)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$nfr15*$HIDE_WHOLE_CONTROL+((.not. $nfr15 .and. 1)*$dyt1q))
|
|
$dyt1q := $x1spm*$HIDE_WHOLE_CONTROL+((.not. $x1spm .and. 1)*$HIDE_PART_NOTHING)
|
|
set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE,$nfr15*$HIDE_WHOLE_CONTROL+((.not. $nfr15 .and. 1)*$dyt1q))
|
|
if ($0ib2k=2)
|
|
set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$nfr15*$HIDE_WHOLE_CONTROL+((.not. $nfr15 .and. 1)*$dyt1q))
|
|
end if
|
|
end if
|
|
end if
|
|
case $NI_MOUSE_EVENT_TYPE_DROP
|
|
$nfr15 := 0
|
|
if ($NUM_GROUPS=365)
|
|
if (num_elements(!NI_DND_ITEMS_AUDIO)=1)
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
|
|
set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & ($0ib2k/2+($0ib2k/2*$mcp2m)) & 2)
|
|
@g233i := !NI_DND_ITEMS_AUDIO[0]
|
|
wait_async(set_sample(%NI_USER_ZONE_IDS[1],@g233i))
|
|
@bnt5b := get_sample(%NI_USER_ZONE_IDS[1],$NI_FILE_NAME)
|
|
wait_async(detect_pitch(%NI_USER_ZONE_IDS[1],~qzdh0))
|
|
if (~qzdh0=~NI_DETECT_PITCH_INVALID)
|
|
~qzdh0 := 60.0
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Pitch could not be detected. Please set the root key and pitch manually.")
|
|
end if
|
|
if (~qzdh0<48.0)
|
|
~qzdh0 := 60.0+(~qzdh0-(floor(~qzdh0/12.0)*12.0))
|
|
end if
|
|
$v3y5j := real_to_int(round(~qzdh0))
|
|
~qzdh0 := 100.0*(round(~qzdh0)-~qzdh0)
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_ROOT_KEY,$v3y5j))
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_TUNE,real_to_int(~qzdh0)))
|
|
wait_async(detect_peak(%NI_USER_ZONE_IDS[1],~rhrbs))
|
|
if (~rhrbs=~NI_DETECT_PEAK_INVALID)
|
|
~rhrbs := 0.0
|
|
end if
|
|
if (~rhrbs<-36.0)
|
|
~rhrbs := -36.0
|
|
end if
|
|
wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_VOLUME,real_to_int(-~rhrbs*100.0)))
|
|
$hdmk1 := 364
|
|
%std_smp_l_grp[$hdmk1] := get_sample_length(%NI_USER_ZONE_IDS[1])/1000
|
|
$x1spm := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[1])-0)-1,31)
|
|
if ($x1spm=1)
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"The file could not be loaded !")
|
|
end if
|
|
%jj5qi[1] := 100
|
|
$dyt1q := -1
|
|
$fg4rw := 0
|
|
while ($fg4rw<%k4yha[1])
|
|
if (%3owef[500+$fg4rw]=100)
|
|
$dyt1q := $fg4rw
|
|
$fg4rw := %k4yha[1]
|
|
end if
|
|
inc($fg4rw)
|
|
end while
|
|
%kt24s[1] := $dyt1q
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Sorry, you can only drop a single wav/ncw/aif file onto Straylight.")
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
end if
|
|
else
|
|
$3pvid := 1
|
|
call update_modal_dialog_lbl
|
|
set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Please reload the Straylight nki from the Library Tab to enabled the drag and drop functionality.")
|
|
set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
|
|
end if
|
|
call on_selected_std_group_changed
|
|
end select
|
|
end on
|
|
|
|
on ui_control($a2kga)
|
|
$0ib2k := 1
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($rppxv)
|
|
$0ib2k := 2
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($mcp2m)
|
|
if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
|
|
note_off($auli3)
|
|
%jnhix[%laljf[$auli3 mod 8192]] := 1
|
|
end if
|
|
$mcp2m := $mcp2m
|
|
call update_ARP_and_S_WF_area
|
|
call ARP__update_filter_src_menus
|
|
end on
|
|
|
|
on ui_control($p5wl1)
|
|
%pzp2y[($p5wl1+1) mod 2] := $bpkqt
|
|
$bpkqt := %pzp2y[$p5wl1]
|
|
$xrt5z := ($xrt5z+1) mod 4
|
|
call update_g_interval_mode
|
|
$gpzoi := 12
|
|
call _update_mod_knob_range_indicator_for_gl_m_id
|
|
call _update_mod_knob_rt_indicator_for_gl_m_id
|
|
call _update_mod_knob_automation_label_for_gl_m_id
|
|
call _update_mod_knob_label_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control(?2jnfl)
|
|
$ptarc := 0
|
|
~tllyo := ?2jnfl[0]
|
|
$sfqck := $NI_MOUSE_EVENT_TYPE
|
|
call TABS__on_xy
|
|
end on
|
|
|
|
on ui_control(?afz4n)
|
|
$ptarc := 1
|
|
~tllyo := ?afz4n[0]
|
|
$sfqck := $NI_MOUSE_EVENT_TYPE
|
|
call TABS__on_xy
|
|
end on
|
|
|
|
on ui_control(?a14rv)
|
|
$ptarc := 2
|
|
~tllyo := ?a14rv[0]
|
|
$sfqck := $NI_MOUSE_EVENT_TYPE
|
|
call TABS__on_xy
|
|
end on
|
|
|
|
on ui_control($1pewz)
|
|
$dyt1q := search(%ejazl,get_ui_id($1pewz))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($nvtf2)
|
|
$dyt1q := search(%ejazl,get_ui_id($nvtf2))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($dau0c)
|
|
$dyt1q := search(%ejazl,get_ui_id($dau0c))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($fq2ca)
|
|
$dyt1q := search(%ejazl,get_ui_id($fq2ca))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($imy0h)
|
|
$dyt1q := search(%ejazl,get_ui_id($imy0h))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($rmb0e)
|
|
$dyt1q := search(%ejazl,get_ui_id($rmb0e))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($ndbm1)
|
|
$dyt1q := search(%ejazl,get_ui_id($ndbm1))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($mmx4s)
|
|
$dyt1q := search(%ejazl,get_ui_id($mmx4s))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($eedi4)
|
|
$dyt1q := search(%ejazl,get_ui_id($eedi4))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($sipdv)
|
|
$dyt1q := search(%ejazl,get_ui_id($sipdv))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($l3a0o)
|
|
$dyt1q := search(%ejazl,get_ui_id($l3a0o))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($frelg)
|
|
$dyt1q := search(%ejazl,get_ui_id($frelg))
|
|
$ptarc := $dyt1q/4
|
|
%v5xab[$ptarc] := $dyt1q mod 4
|
|
call TABS__selection_did_change
|
|
end on
|
|
|
|
on ui_control($qpt4p)
|
|
$jldiw := 0
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($crmx3)
|
|
$jldiw := 1
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($ej0s0)
|
|
$jldiw := 2
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($0opdg)
|
|
$jldiw := 3
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($2n2ws)
|
|
$jldiw := 4
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($lvtvx)
|
|
$jldiw := 5
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($vljka)
|
|
$jldiw := 6
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($2s05o)
|
|
$jldiw := 7
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($umlht)
|
|
$jldiw := 8
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($zj0wn)
|
|
$jldiw := 9
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($50dyn)
|
|
$jldiw := 10
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($hpwcd)
|
|
$jldiw := 11
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($cboaa)
|
|
$jldiw := 12
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($l1jpb)
|
|
$jldiw := 13
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($1vvs5)
|
|
$jldiw := 14
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($2hnjg)
|
|
$jldiw := 15
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($grc51)
|
|
$jldiw := 16
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($2pvsn)
|
|
$jldiw := 17
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($jhigl)
|
|
$jldiw := 18
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($5ptjd)
|
|
$jldiw := 19
|
|
call FX_UI__on_fx_cat_btn
|
|
end on
|
|
|
|
on ui_control($gehcz)
|
|
call BUS1__update_mod_vals
|
|
call SUM__update_mod_vals
|
|
@uamno := $gehcz/10 & "." & abs($gehcz mod 10) & " %"
|
|
set_control_par_str(get_ui_id($gehcz),$CONTROL_PAR_LABEL,@uamno)
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"MK_Mask_5")
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,@uamno)
|
|
%gmios[0] := $ENGINE_UPTIME
|
|
if ($afnek=0 or (%hivzv[0]=0 and (%hivzv[1]=0)))
|
|
call MOD__perform_full_update
|
|
end if
|
|
end on
|
|
|
|
on ui_control($0qzrr)
|
|
call BUS1__update_mod_vals
|
|
call SUM__update_mod_vals
|
|
@uamno := $0qzrr/10 & "." & abs($0qzrr mod 10) & " %"
|
|
set_control_par_str(get_ui_id($0qzrr),$CONTROL_PAR_LABEL,@uamno)
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"MK_Mask_5")
|
|
set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,@uamno)
|
|
%gmios[0] := $ENGINE_UPTIME
|
|
if ($afnek=0 or (%hivzv[0]=0 and (%hivzv[1]=0)))
|
|
call MOD__perform_full_update
|
|
end if
|
|
end on
|
|
|
|
on ui_control($ihtwl)
|
|
call BUS2__update_mod_vals
|
|
call SUM__update_mod_vals
|
|
@uamno := $ihtwl/10 & "." & abs($ihtwl mod 10) & " %"
|
|
set_control_par_str(get_ui_id($ihtwl),$CONTROL_PAR_LABEL,@uamno)
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"MK_Mask_5")
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,@uamno)
|
|
%gmios[2] := $ENGINE_UPTIME
|
|
if ($afnek=0 or (%hivzv[2]=0 and (%hivzv[3]=0)))
|
|
call MOD__perform_full_update
|
|
end if
|
|
end on
|
|
|
|
on ui_control($pzeed)
|
|
call BUS2__update_mod_vals
|
|
call SUM__update_mod_vals
|
|
@uamno := $pzeed/10 & "." & abs($pzeed mod 10) & " %"
|
|
set_control_par_str(get_ui_id($pzeed),$CONTROL_PAR_LABEL,@uamno)
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"MK_Mask_5")
|
|
set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,@uamno)
|
|
%gmios[2] := $ENGINE_UPTIME
|
|
if ($afnek=0 or (%hivzv[2]=0 and (%hivzv[3]=0)))
|
|
call MOD__perform_full_update
|
|
end if
|
|
end on
|
|
|
|
on ui_control($3k3u2)
|
|
call MTX__update_ui
|
|
call BUS1__update_mod_vals
|
|
if ($afnek=0)
|
|
call MOD__perform_full_update
|
|
end if
|
|
end on
|
|
|
|
on ui_control($13ap0)
|
|
call MTX__update_ui
|
|
call BUS2__update_mod_vals
|
|
if ($afnek=0)
|
|
call MOD__perform_full_update
|
|
end if
|
|
end on
|
|
|
|
on ui_control($bjll0)
|
|
$0ib2k := 0
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($myubi)
|
|
$0ib2k := 1
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($xgbml)
|
|
$0ib2k := 2
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($b3dyn)
|
|
$0ib2k := 3
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($akgz1)
|
|
$0ib2k := 4
|
|
call NAV_PAGE__update_main_nav
|
|
end on
|
|
|
|
on ui_control($v2hxc)
|
|
$mdykc := 0
|
|
call BOTTOM_TABS__on_click
|
|
end on
|
|
|
|
on ui_control($raqd0)
|
|
$mdykc := 1
|
|
call BOTTOM_TABS__on_click
|
|
end on
|
|
|
|
on ui_control($txw2h)
|
|
$mdykc := 2
|
|
call BOTTOM_TABS__on_click
|
|
end on
|
|
|
|
on ui_control($4yej1)
|
|
$otddp := 0
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($rdzvq)
|
|
$otddp := 1
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ecjm3)
|
|
$otddp := 2
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($032h0)
|
|
$otddp := 3
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($djvko)
|
|
$otddp := 4
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($bmyvz)
|
|
$otddp := 5
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($3hydy)
|
|
$otddp := 6
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($bcw1j)
|
|
$otddp := 7
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($y4p3i)
|
|
$otddp := 8
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($f1hl5)
|
|
$otddp := 9
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($h23p3)
|
|
$otddp := 10
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($0blpx)
|
|
$otddp := 11
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($24ihv)
|
|
$otddp := 12
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($wzy03)
|
|
$otddp := 13
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($hz0mw)
|
|
$otddp := 14
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($4tphh)
|
|
$otddp := 15
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($0dern)
|
|
$otddp := 16
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($v0bpc)
|
|
$otddp := 17
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($rtumo)
|
|
$otddp := 18
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($4yeq1)
|
|
$otddp := 19
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($32nru)
|
|
$otddp := 20
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($mzanj)
|
|
$otddp := 21
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($oevzy)
|
|
$otddp := 22
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($gk2v5)
|
|
$otddp := 23
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ojx3k)
|
|
$otddp := 24
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($dyw32)
|
|
$otddp := 25
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($brxm1)
|
|
$otddp := 26
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($al5ta)
|
|
$otddp := 27
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($xsyba)
|
|
$otddp := 28
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($5cb23)
|
|
$otddp := 29
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($khuwm)
|
|
$otddp := 30
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($gucms)
|
|
$otddp := 31
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ivqsn)
|
|
$otddp := 32
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($gcccz)
|
|
$otddp := 33
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($cs03b)
|
|
$otddp := 34
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($5imez)
|
|
$otddp := 35
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($gnnlh)
|
|
$otddp := 36
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ttgfi)
|
|
$otddp := 37
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($0r5xb)
|
|
$otddp := 38
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($f5qo5)
|
|
$otddp := 39
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($t1rbt)
|
|
$otddp := 40
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($pxzz3)
|
|
$otddp := 41
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($eezgv)
|
|
$otddp := 42
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($xfckc)
|
|
$otddp := 43
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($xbrfy)
|
|
$otddp := 44
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ucgwt)
|
|
$otddp := 45
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($y1sxa)
|
|
$otddp := 46
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($wuqce)
|
|
$otddp := 47
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($nb0wk)
|
|
$otddp := 48
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($dwlt2)
|
|
$otddp := 49
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($rkmzj)
|
|
$otddp := 50
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($4kviy)
|
|
$otddp := 51
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($0sgpg)
|
|
$otddp := 52
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($u2hf0)
|
|
$otddp := 53
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($pvrz1)
|
|
$otddp := 54
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($na0ji)
|
|
$otddp := 55
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($qysdx)
|
|
$otddp := 56
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($etjre)
|
|
$otddp := 57
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($wovls)
|
|
$otddp := 58
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($baopj)
|
|
$otddp := 59
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ncdss)
|
|
$otddp := 60
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($jde44)
|
|
$otddp := 61
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($ypsjd)
|
|
$otddp := 62
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($uz02i)
|
|
$otddp := 63
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($3kkcw)
|
|
$otddp := 64
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($n01mf)
|
|
$otddp := 65
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($2lp4m)
|
|
$otddp := 66
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($nohrb)
|
|
$otddp := 67
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($3mr2k)
|
|
$otddp := 68
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($1c3mu)
|
|
$otddp := 69
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($rmz1j)
|
|
$otddp := 70
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($tipqk)
|
|
$otddp := 71
|
|
call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
|
|
end on
|
|
|
|
on ui_control($0ux1w)
|
|
$y1xhf := 0
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($nlbcz)
|
|
$y1xhf := 1
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($md33w)
|
|
$y1xhf := 2
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($pzuhn)
|
|
$y1xhf := 3
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($ec44j)
|
|
$y1xhf := 4
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($g5ega)
|
|
$y1xhf := 5
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($ospiy)
|
|
$y1xhf := 6
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($cryss)
|
|
$y1xhf := 7
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($odkxk)
|
|
$y1xhf := 8
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($1d1qv)
|
|
$y1xhf := 9
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($j41z3)
|
|
$y1xhf := 10
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($0hw3x)
|
|
$y1xhf := 11
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($rttry)
|
|
$y1xhf := 12
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($ume1e)
|
|
$y1xhf := 13
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($acigq)
|
|
$y1xhf := 14
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($fal5w)
|
|
$y1xhf := 15
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($u4kkx)
|
|
$y1xhf := 16
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($fw5ha)
|
|
$y1xhf := 17
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($zosaw)
|
|
$y1xhf := 18
|
|
call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
|
|
if ($hb51u=1)
|
|
$hb51u := 0
|
|
exit
|
|
end if
|
|
$zor2m := $zor2m
|
|
call _BRW__load_preset_for_b_type
|
|
if ($cz3ou=1)
|
|
exit
|
|
end if
|
|
call prepare_purge
|
|
$rlfxd := 0
|
|
while ($rlfxd<$NUM_GROUPS)
|
|
purge_group($rlfxd,%tuuuf[$rlfxd])
|
|
inc($rlfxd)
|
|
end while
|
|
call update_all_WF_for_default_key
|
|
if ($zor2m=2)
|
|
call BRW___do_clean_up_after_snapshot_load
|
|
end if
|
|
end on
|
|
|
|
on ui_control($0rdar)
|
|
$y1xhf := 0
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($mzhrk)
|
|
$y1xhf := 1
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($y1ktm)
|
|
$y1xhf := 2
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($h41x5)
|
|
$y1xhf := 3
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($ogc4a)
|
|
$y1xhf := 4
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($5x50g)
|
|
$y1xhf := 5
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($i1chm)
|
|
$y1xhf := 6
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($gxhbs)
|
|
$y1xhf := 7
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($rm010)
|
|
$y1xhf := 8
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($iafgo)
|
|
$y1xhf := 9
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($obm4g)
|
|
$y1xhf := 10
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($appd1)
|
|
$y1xhf := 11
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($adbg5)
|
|
$y1xhf := 12
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($r5rmc)
|
|
$y1xhf := 13
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($4rran)
|
|
$y1xhf := 14
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($g5s50)
|
|
$y1xhf := 15
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($i02c4)
|
|
$y1xhf := 16
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($0cjtm)
|
|
$y1xhf := 17
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($xaewn)
|
|
$y1xhf := 18
|
|
call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
|
|
save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
|
|
end on
|
|
|
|
on ui_control($rbym5)
|
|
$qlteh := 0
|
|
call FX_UI__on_preset_menu_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($5euxa)
|
|
$qlteh := 0
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end on
|
|
|
|
on ui_control($h5hzc)
|
|
%3zszw[%h152r[0]] := get_menu_item_value(%pfy4f[0],get_control_par(%pfy4f[0],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),%3wawk[0],%h152r[0],%zjgrf[0])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),0,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[%h152r[0]]] & ".wav",%h152r[0],%zjgrf[0])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$x202u,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
end on
|
|
|
|
on ui_control($dtkx1)
|
|
$h5hzc := ($h5hzc+36-1) mod 36
|
|
%3zszw[%h152r[0]] := get_menu_item_value(%pfy4f[0],get_control_par(%pfy4f[0],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),%3wawk[0],%h152r[0],%zjgrf[0])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),0,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[%h152r[0]]] & ".wav",%h152r[0],%zjgrf[0])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$x202u,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
$dtkx1 := 0
|
|
end on
|
|
|
|
on ui_control($upamz)
|
|
$h5hzc := ($h5hzc+36+1) mod 36
|
|
%3zszw[%h152r[0]] := get_menu_item_value(%pfy4f[0],get_control_par(%pfy4f[0],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),%3wawk[0],%h152r[0],%zjgrf[0])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),0,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[%h152r[0]]] & ".wav",%h152r[0],%zjgrf[0])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$x202u,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
$upamz := 0
|
|
end on
|
|
|
|
on ui_control($hsq4o)
|
|
$qlteh := 0
|
|
call FX_UI__on_next_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($iqkyu)
|
|
$qlteh := 0
|
|
call FX_UI__on_prev_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($usl30)
|
|
$0x4nk := search(%41o3s,%ce3ql[3*%h152r[0]])
|
|
$dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
|
|
%sxlyt[%h152r[0]] := $usl30
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
if ($usl30=1)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]-$dyt1q)*15/1000000],%3wawk[0],%h152r[0],%zjgrf[0])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
else
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]],$NI_SYNC_UNIT_ABS,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$dyt1q,%3wawk[0],%h152r[0],%zjgrf[0])
|
|
end if
|
|
$gpzoi := %fs3hy[%h152r[0]*3]
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($b2aaa)
|
|
%pqcgh[0] := $b2aaa
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[0]+1) mod 2,%3wawk[0],0,%zjgrf[0])
|
|
set_control_par_str(%ejazl[0],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $b2aaa & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],0,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($j14ck)
|
|
%pqcgh[1] := $j14ck
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[1]+1) mod 2,%3wawk[0],1,%zjgrf[0])
|
|
set_control_par_str(%ejazl[1],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $j14ck & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],1,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($jbe0y)
|
|
%pqcgh[2] := $jbe0y
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[2]+1) mod 2,%3wawk[0],2,%zjgrf[0])
|
|
set_control_par_str(%ejazl[2],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $jbe0y & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],2,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($dqn5p)
|
|
%pqcgh[3] := $dqn5p
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[3]+1) mod 2,%3wawk[0],3,%zjgrf[0])
|
|
set_control_par_str(%ejazl[3],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $dqn5p & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],3,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($z0ozi)
|
|
$qlteh := 1
|
|
call FX_UI__on_preset_menu_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($m5fet)
|
|
$qlteh := 1
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end on
|
|
|
|
on ui_control($fzikm)
|
|
%3zszw[8+%h152r[1]] := get_menu_item_value(%pfy4f[20],get_control_par(%pfy4f[20],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),%3wawk[1],%h152r[1],%zjgrf[1])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),0,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[8+%h152r[1]]] & ".wav",%h152r[1],%zjgrf[1])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$x202u,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
end on
|
|
|
|
on ui_control($htkht)
|
|
$fzikm := ($fzikm+36-1) mod 36
|
|
%3zszw[8+%h152r[1]] := get_menu_item_value(%pfy4f[20],get_control_par(%pfy4f[20],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),%3wawk[1],%h152r[1],%zjgrf[1])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),0,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[8+%h152r[1]]] & ".wav",%h152r[1],%zjgrf[1])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$x202u,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
$htkht := 0
|
|
end on
|
|
|
|
on ui_control($vsxdx)
|
|
$fzikm := ($fzikm+36+1) mod 36
|
|
%3zszw[8+%h152r[1]] := get_menu_item_value(%pfy4f[20],get_control_par(%pfy4f[20],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),%3wawk[1],%h152r[1],%zjgrf[1])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),0,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[8+%h152r[1]]] & ".wav",%h152r[1],%zjgrf[1])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$x202u,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
$vsxdx := 0
|
|
end on
|
|
|
|
on ui_control($j3xgb)
|
|
$qlteh := 1
|
|
call FX_UI__on_next_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($vszfv)
|
|
$qlteh := 1
|
|
call FX_UI__on_prev_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($zhirl)
|
|
$0x4nk := search(%41o3s,%ce3ql[12+(3*%h152r[1])])
|
|
$dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
|
|
%sxlyt[8+%h152r[1]] := $zhirl
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
if ($zhirl=1)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]-$dyt1q)*15/1000000],%3wawk[1],%h152r[1],%zjgrf[1])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
else
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]],$NI_SYNC_UNIT_ABS,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$dyt1q,%3wawk[1],%h152r[1],%zjgrf[1])
|
|
end if
|
|
$gpzoi := %fs3hy[12+(%h152r[1]*3)]
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($lahkd)
|
|
%pqcgh[8] := $lahkd
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8]+1) mod 2,%3wawk[1],0,%zjgrf[1])
|
|
set_control_par_str(%ejazl[4],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $lahkd & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],0,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($p5uon)
|
|
%pqcgh[9] := $p5uon
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[9]+1) mod 2,%3wawk[1],1,%zjgrf[1])
|
|
set_control_par_str(%ejazl[5],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $p5uon & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],1,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($muk05)
|
|
%pqcgh[10] := $muk05
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[10]+1) mod 2,%3wawk[1],2,%zjgrf[1])
|
|
set_control_par_str(%ejazl[6],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $muk05 & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],2,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($mmaez)
|
|
%pqcgh[11] := $mmaez
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[11]+1) mod 2,%3wawk[1],3,%zjgrf[1])
|
|
set_control_par_str(%ejazl[7],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $mmaez & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],3,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($5v21m)
|
|
$qlteh := 2
|
|
call FX_UI__on_preset_menu_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($00fkv)
|
|
$qlteh := 2
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end on
|
|
|
|
on ui_control($vpahb)
|
|
%3zszw[16+%h152r[2]] := get_menu_item_value(%pfy4f[40],get_control_par(%pfy4f[40],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),%3wawk[2],%h152r[2],%zjgrf[2])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),0,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[16+%h152r[2]]] & ".wav",%h152r[2],%zjgrf[2])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$x202u,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
end on
|
|
|
|
on ui_control($q3mq5)
|
|
$vpahb := ($vpahb+36-1) mod 36
|
|
%3zszw[16+%h152r[2]] := get_menu_item_value(%pfy4f[40],get_control_par(%pfy4f[40],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),%3wawk[2],%h152r[2],%zjgrf[2])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),0,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[16+%h152r[2]]] & ".wav",%h152r[2],%zjgrf[2])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$x202u,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
$q3mq5 := 0
|
|
end on
|
|
|
|
on ui_control($psujc)
|
|
$vpahb := ($vpahb+36+1) mod 36
|
|
%3zszw[16+%h152r[2]] := get_menu_item_value(%pfy4f[40],get_control_par(%pfy4f[40],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),%3wawk[2],%h152r[2],%zjgrf[2])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),0,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[16+%h152r[2]]] & ".wav",%h152r[2],%zjgrf[2])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$x202u,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
$psujc := 0
|
|
end on
|
|
|
|
on ui_control($vlwdd)
|
|
$qlteh := 2
|
|
call FX_UI__on_next_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($as2k5)
|
|
$qlteh := 2
|
|
call FX_UI__on_prev_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($zsz2j)
|
|
$0x4nk := search(%41o3s,%ce3ql[24+(3*%h152r[2])])
|
|
$dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
|
|
%sxlyt[16+%h152r[2]] := $zsz2j
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
if ($zsz2j=1)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]-$dyt1q)*15/1000000],%3wawk[2],%h152r[2],%zjgrf[2])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
else
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]],$NI_SYNC_UNIT_ABS,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$dyt1q,%3wawk[2],%h152r[2],%zjgrf[2])
|
|
end if
|
|
$gpzoi := %fs3hy[24+(%h152r[2]*3)]
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5dq1e)
|
|
%pqcgh[16] := $5dq1e
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[16]+1) mod 2,%3wawk[2],0,%zjgrf[2])
|
|
set_control_par_str(%ejazl[8],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $5dq1e & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],0,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($2ueu0)
|
|
%pqcgh[17] := $2ueu0
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[17]+1) mod 2,%3wawk[2],1,%zjgrf[2])
|
|
set_control_par_str(%ejazl[9],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $2ueu0 & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],1,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($z2hm2)
|
|
%pqcgh[18] := $z2hm2
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[18]+1) mod 2,%3wawk[2],2,%zjgrf[2])
|
|
set_control_par_str(%ejazl[10],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $z2hm2 & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],2,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($12ugr)
|
|
%pqcgh[19] := $12ugr
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[19]+1) mod 2,%3wawk[2],3,%zjgrf[2])
|
|
set_control_par_str(%ejazl[11],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $12ugr & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],3,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
|
|
end on
|
|
|
|
on ui_control($zig2t)
|
|
$qlteh := 3
|
|
call FX_UI__on_preset_menu_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($uvkex)
|
|
$qlteh := 3
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end on
|
|
|
|
on ui_control($avs41)
|
|
%3zszw[24+%h152r[3]] := get_menu_item_value(%pfy4f[60],get_control_par(%pfy4f[60],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[3],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[3]]] & ".wav",%h152r[3],%zjgrf[3])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
end on
|
|
|
|
on ui_control($elcsk)
|
|
$avs41 := ($avs41+36-1) mod 36
|
|
%3zszw[24+%h152r[3]] := get_menu_item_value(%pfy4f[60],get_control_par(%pfy4f[60],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[3],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[3]]] & ".wav",%h152r[3],%zjgrf[3])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
$elcsk := 0
|
|
end on
|
|
|
|
on ui_control($mmvzm)
|
|
$avs41 := ($avs41+36+1) mod 36
|
|
%3zszw[24+%h152r[3]] := get_menu_item_value(%pfy4f[60],get_control_par(%pfy4f[60],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[3],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[3]]] & ".wav",%h152r[3],%zjgrf[3])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
$mmvzm := 0
|
|
end on
|
|
|
|
on ui_control($y1u34)
|
|
$qlteh := 3
|
|
call FX_UI__on_next_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($kpijv)
|
|
$qlteh := 3
|
|
call FX_UI__on_prev_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($iyugw)
|
|
$0x4nk := search(%41o3s,%ce3ql[36+(3*%h152r[3])])
|
|
$dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
|
|
%sxlyt[24+%h152r[3]] := $iyugw
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
if ($iyugw=1)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]-$dyt1q)*15/1000000],%3wawk[3],%h152r[3],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
else
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]],$NI_SYNC_UNIT_ABS,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$dyt1q,%3wawk[3],%h152r[3],%zjgrf[3])
|
|
end if
|
|
$gpzoi := %fs3hy[36+(%h152r[3]*3)]
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($hdpxn)
|
|
%pqcgh[24] := $hdpxn
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[24]+1) mod 2,%3wawk[3],0,%zjgrf[3])
|
|
wait(30000)
|
|
$gpzoi := 77
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
$gpzoi := 79
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($xdahy)
|
|
end on
|
|
|
|
on ui_control($dkvhn)
|
|
end on
|
|
|
|
on ui_control($aqf0b)
|
|
end on
|
|
|
|
on ui_control($25tac)
|
|
$qlteh := 4
|
|
call FX_UI__on_preset_menu_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($vppxu)
|
|
$qlteh := 4
|
|
call _FX_UI__update_ui_controls_for_global_set_id
|
|
call update_all_mod_knob_range_indicator
|
|
call update_all_mod_knob_rt_indicator_mono
|
|
end on
|
|
|
|
on ui_control($hnem0)
|
|
%3zszw[24+%h152r[4]] := get_menu_item_value(%pfy4f[80],get_control_par(%pfy4f[80],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[4],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[4]]] & ".wav",%h152r[4],%zjgrf[3])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
end on
|
|
|
|
on ui_control($ijtiz)
|
|
$hnem0 := ($hnem0+36-1) mod 36
|
|
%3zszw[24+%h152r[4]] := get_menu_item_value(%pfy4f[80],get_control_par(%pfy4f[80],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[4],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[4]]] & ".wav",%h152r[4],%zjgrf[3])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
$ijtiz := 0
|
|
end on
|
|
|
|
on ui_control($24ggh)
|
|
$hnem0 := ($hnem0+36+1) mod 36
|
|
%3zszw[24+%h152r[4]] := get_menu_item_value(%pfy4f[80],get_control_par(%pfy4f[80],$CONTROL_PAR_VALUE))
|
|
$m2etg := 1
|
|
$x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[4],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
$bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[4]]] & ".wav",%h152r[4],%zjgrf[3])
|
|
while ($m2etg=1)
|
|
wait(3000)
|
|
end while
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
$24ggh := 0
|
|
end on
|
|
|
|
on ui_control($nar4l)
|
|
$qlteh := 4
|
|
call FX_UI__on_next_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($g2sn3)
|
|
$qlteh := 4
|
|
call FX_UI__on_prev_preset_btn_for_gl_set_id
|
|
end on
|
|
|
|
on ui_control($o0h5y)
|
|
$dyt1q := $tcdg3+($fflhr*%ppvim[$rpdbb]/1000)
|
|
%sxlyt[24+%h152r[4]] := $o0h5y
|
|
$dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
|
|
if ($o0h5y=1)
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]-$dyt1q)*15/1000000],%3wawk[3],%h152r[4],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
else
|
|
set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]],$NI_SYNC_UNIT_ABS,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$dyt1q,%3wawk[3],%h152r[4],%zjgrf[3])
|
|
end if
|
|
$gpzoi := 76
|
|
call update_mod_knob_ep_automation_label_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($q1h31)
|
|
end on
|
|
|
|
on ui_control($dsxga)
|
|
%pqcgh[25] := $dsxga
|
|
set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[25]+1) mod 2,%3wawk[3],1,%zjgrf[3])
|
|
wait(30000)
|
|
$gpzoi := 78
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
$gpzoi := 80
|
|
call set_mod_knob_group_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fkuzg)
|
|
end on
|
|
|
|
on ui_control($av4dw)
|
|
end on
|
|
|
|
on ui_control($siaxq)
|
|
if ($siaxq<0)
|
|
$siaxq := 0
|
|
end if
|
|
call MACRO__update_labels_and_automation_names
|
|
end on
|
|
|
|
on ui_control($yazuk)
|
|
if ($yazuk<0)
|
|
$yazuk := 0
|
|
end if
|
|
call MACRO__update_labels_and_automation_names
|
|
end on
|
|
|
|
on ui_control($uyjwl)
|
|
if ($uyjwl<0)
|
|
$uyjwl := 0
|
|
end if
|
|
call MACRO__update_labels_and_automation_names
|
|
end on
|
|
|
|
on ui_control($4so5t)
|
|
if ($4so5t<0)
|
|
$4so5t := 0
|
|
end if
|
|
call MACRO__update_labels_and_automation_names
|
|
end on
|
|
|
|
on ui_control($q1nql)
|
|
if ($q1nql<0)
|
|
$q1nql := 0
|
|
end if
|
|
call MACRO__update_labels_and_automation_names
|
|
end on
|
|
|
|
on ui_control($5q4fp)
|
|
if ($5q4fp<0)
|
|
$5q4fp := 0
|
|
end if
|
|
call MACRO__update_labels_and_automation_names
|
|
end on
|
|
|
|
on ui_control($gllpo)
|
|
call SHP1__update_tb_display
|
|
end on
|
|
|
|
on ui_control(%w0xec)
|
|
call SHP1__update_mod_vals_and_refresh_ui
|
|
end on
|
|
|
|
on ui_control($ytzwi)
|
|
if ($ytzwi>=3 or ($ytzwi=-1))
|
|
select ($ytzwi)
|
|
case 4 to 7
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%w0xec[$fg4rw] := real_to_int(pow(int_to_real($fg4rw)/int_to_real($gllpo-1),int_to_real($ytzwi-2)*1.5)*1000.0)
|
|
inc($fg4rw)
|
|
end while
|
|
case 8
|
|
$fg4rw := 0
|
|
while ($fg4rw<=(($gllpo-1)/2))
|
|
$dyt1q := %w0xec[$fg4rw]
|
|
%w0xec[$fg4rw] := %w0xec[$gllpo-1-$fg4rw]
|
|
%w0xec[$gllpo-1-$fg4rw] := $dyt1q
|
|
inc($fg4rw)
|
|
end while
|
|
case 9
|
|
$dyt1q := 83
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%w0xec[$fg4rw] := (%w0xec[$fg4rw]+($dyt1q/2))/$dyt1q*$dyt1q
|
|
inc($fg4rw)
|
|
end while
|
|
case 10
|
|
$y3mgr := 1
|
|
while ($y3mgr<=($gllpo/4))
|
|
$dyt1q := %w0xec[$gllpo-1]
|
|
$fg4rw := 0
|
|
while ($fg4rw<=($gllpo-2))
|
|
%w0xec[$gllpo-1-$fg4rw] := %w0xec[$gllpo-2-$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
%w0xec[0] := $dyt1q
|
|
inc($y3mgr)
|
|
end while
|
|
case 11
|
|
$y3mgr := 1
|
|
while ($y3mgr<=($gllpo/2))
|
|
$dyt1q := %w0xec[$gllpo-1]
|
|
$fg4rw := 0
|
|
while ($fg4rw<=($gllpo-2))
|
|
%w0xec[$gllpo-1-$fg4rw] := %w0xec[$gllpo-2-$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
%w0xec[0] := $dyt1q
|
|
inc($y3mgr)
|
|
end while
|
|
case 12
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
$dyt1q := %w0xec[$fg4rw]+(%w0xec[$fg4rw]/10)
|
|
%w0xec[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
inc($fg4rw)
|
|
end while
|
|
case 13
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
$dyt1q := %w0xec[$fg4rw]-(%w0xec[$fg4rw]/10)
|
|
%w0xec[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
inc($fg4rw)
|
|
end while
|
|
case 14
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%w0xec[$fg4rw] := 1000-%w0xec[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
case 15
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%w0xec[$fg4rw] := random(0,1000)
|
|
inc($fg4rw)
|
|
end while
|
|
case 16
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%2piom[$fg4rw] := %w0xec[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 1
|
|
while ($fg4rw<=($gllpo-2))
|
|
$r0pwv := 0
|
|
$m12vk := 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<3)
|
|
$dyt1q := $fg4rw+$y3mgr-1
|
|
if (in_range($dyt1q,0,$gllpo-1))
|
|
$r0pwv := $r0pwv+%2piom[$dyt1q]
|
|
inc($m12vk)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
%w0xec[$fg4rw] := $r0pwv/$m12vk
|
|
inc($fg4rw)
|
|
end while
|
|
case 17
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
%2piom[$fg4rw] := %w0xec[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<$gllpo)
|
|
$r0pwv := 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<3)
|
|
$dyt1q := ($fg4rw+$y3mgr+$gllpo-1) mod $gllpo
|
|
$r0pwv := $r0pwv+%2piom[$dyt1q]
|
|
inc($y3mgr)
|
|
end while
|
|
%w0xec[$fg4rw] := $r0pwv/3
|
|
inc($fg4rw)
|
|
end while
|
|
end select
|
|
$ytzwi := $uh2d4
|
|
else
|
|
$uh2d4 := $ytzwi
|
|
end if
|
|
$oj0wr := 1
|
|
call SHP1__update_mod_vals
|
|
$oj0wr := 0
|
|
end on
|
|
|
|
on ui_control($hn35i)
|
|
call SHP2__update_tb_display
|
|
end on
|
|
|
|
on ui_control(%rzzs4)
|
|
call SHP2__update_mod_vals_and_refresh_ui
|
|
end on
|
|
|
|
on ui_control($f3u5d)
|
|
if ($f3u5d>=3 or ($f3u5d=-1))
|
|
select ($f3u5d)
|
|
case 4 to 7
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%rzzs4[$fg4rw] := real_to_int(pow(int_to_real($fg4rw)/int_to_real($hn35i-1),int_to_real($f3u5d-2)*1.5)*1000.0)
|
|
inc($fg4rw)
|
|
end while
|
|
case 8
|
|
$fg4rw := 0
|
|
while ($fg4rw<=(($hn35i-1)/2))
|
|
$dyt1q := %rzzs4[$fg4rw]
|
|
%rzzs4[$fg4rw] := %rzzs4[$hn35i-1-$fg4rw]
|
|
%rzzs4[$hn35i-1-$fg4rw] := $dyt1q
|
|
inc($fg4rw)
|
|
end while
|
|
case 9
|
|
$dyt1q := 83
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%rzzs4[$fg4rw] := (%rzzs4[$fg4rw]+($dyt1q/2))/$dyt1q*$dyt1q
|
|
inc($fg4rw)
|
|
end while
|
|
case 10
|
|
$y3mgr := 1
|
|
while ($y3mgr<=($hn35i/4))
|
|
$dyt1q := %rzzs4[$hn35i-1]
|
|
$fg4rw := 0
|
|
while ($fg4rw<=($hn35i-2))
|
|
%rzzs4[$hn35i-1-$fg4rw] := %rzzs4[$hn35i-2-$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
%rzzs4[0] := $dyt1q
|
|
inc($y3mgr)
|
|
end while
|
|
case 11
|
|
$y3mgr := 1
|
|
while ($y3mgr<=($hn35i/2))
|
|
$dyt1q := %rzzs4[$hn35i-1]
|
|
$fg4rw := 0
|
|
while ($fg4rw<=($hn35i-2))
|
|
%rzzs4[$hn35i-1-$fg4rw] := %rzzs4[$hn35i-2-$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
%rzzs4[0] := $dyt1q
|
|
inc($y3mgr)
|
|
end while
|
|
case 12
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
$dyt1q := %rzzs4[$fg4rw]+(%rzzs4[$fg4rw]/10)
|
|
%rzzs4[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
inc($fg4rw)
|
|
end while
|
|
case 13
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
$dyt1q := %rzzs4[$fg4rw]-(%rzzs4[$fg4rw]/10)
|
|
%rzzs4[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
|
|
inc($fg4rw)
|
|
end while
|
|
case 14
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%rzzs4[$fg4rw] := 1000-%rzzs4[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
case 15
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%rzzs4[$fg4rw] := random(0,1000)
|
|
inc($fg4rw)
|
|
end while
|
|
case 16
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%2piom[$fg4rw] := %rzzs4[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 1
|
|
while ($fg4rw<=($hn35i-2))
|
|
$r0pwv := 0
|
|
$m12vk := 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<3)
|
|
$dyt1q := $fg4rw+$y3mgr-1
|
|
if (in_range($dyt1q,0,$hn35i-1))
|
|
$r0pwv := $r0pwv+%2piom[$dyt1q]
|
|
inc($m12vk)
|
|
end if
|
|
inc($y3mgr)
|
|
end while
|
|
%rzzs4[$fg4rw] := $r0pwv/$m12vk
|
|
inc($fg4rw)
|
|
end while
|
|
case 17
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
%2piom[$fg4rw] := %rzzs4[$fg4rw]
|
|
inc($fg4rw)
|
|
end while
|
|
$fg4rw := 0
|
|
while ($fg4rw<$hn35i)
|
|
$r0pwv := 0
|
|
$y3mgr := 0
|
|
while ($y3mgr<3)
|
|
$dyt1q := ($fg4rw+$y3mgr+$hn35i-1) mod $hn35i
|
|
$r0pwv := $r0pwv+%2piom[$dyt1q]
|
|
inc($y3mgr)
|
|
end while
|
|
%rzzs4[$fg4rw] := $r0pwv/3
|
|
inc($fg4rw)
|
|
end while
|
|
end select
|
|
$f3u5d := $0zmjz
|
|
else
|
|
$0zmjz := $f3u5d
|
|
end if
|
|
$oj0wr := 1
|
|
call SHP2__update_mod_vals
|
|
$oj0wr := 0
|
|
end on
|
|
|
|
on ui_control($doz2m)
|
|
set_control_par(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE_STATE,$doz2m)
|
|
set_control_par(get_ui_id($i5fky),$CONTROL_PAR_PICTURE_STATE,$1wrdd)
|
|
end on
|
|
|
|
on ui_control($1wrdd)
|
|
set_control_par(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE_STATE,$doz2m)
|
|
set_control_par(get_ui_id($i5fky),$CONTROL_PAR_PICTURE_STATE,$1wrdd)
|
|
end on
|
|
|
|
on ui_control($rj2yq)
|
|
end on
|
|
|
|
on ui_control($s2bg4)
|
|
end on
|
|
|
|
on ui_control($543zt)
|
|
%ppvim[14] := $543zt
|
|
set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_LABEL,$543zt/$b2o1i & "." & ($543zt mod $b2o1i) & " " & @edixu)
|
|
%latnx[0] := 14
|
|
%latnx[1] := 14
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
end on
|
|
|
|
on ui_control($lynqa)
|
|
%ppvim[15] := $lynqa
|
|
set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_LABEL,$lynqa/$pfnw5 & "." & ($lynqa mod $pfnw5) & " " & @cxern)
|
|
%latnx[0] := 15
|
|
%latnx[1] := 15
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
end on
|
|
|
|
on ui_control($cbkgv)
|
|
%ppvim[16] := $cbkgv
|
|
set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_LABEL,$cbkgv/$yg3sr & "." & ($cbkgv mod $yg3sr) & " " & @aqf3u)
|
|
%latnx[0] := 16
|
|
%latnx[1] := 16
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
end on
|
|
|
|
on ui_control($cxfv2)
|
|
%ppvim[17] := $cxfv2
|
|
set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_LABEL,$cxfv2/$t3gfg & "." & ($cxfv2 mod $t3gfg) & " " & @3frwb)
|
|
%latnx[0] := 17
|
|
%latnx[1] := 17
|
|
call MOD__perform_optimized_update_for_gl_ext_mod
|
|
end on
|
|
|
|
on ui_control($bpkqt)
|
|
$gpzoi := 12
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($m2mpa)
|
|
$gpzoi := 13
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($1g0ky)
|
|
$gpzoi := 14
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($liaof)
|
|
$gpzoi := 15
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($sgbvz)
|
|
$gpzoi := 16
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($4zkqn)
|
|
$gpzoi := 17
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($kuk42)
|
|
$gpzoi := 18
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($qsfxg)
|
|
$gpzoi := 19
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($aaf4s)
|
|
$gpzoi := 20
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($eai4d)
|
|
$gpzoi := 24
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($r0khx)
|
|
$gpzoi := 25
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($zktrd)
|
|
$gpzoi := 7
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($sseum)
|
|
$gpzoi := 8
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3tqoo)
|
|
$gpzoi := 0
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($1tszb)
|
|
$gpzoi := 2
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($l2tv1)
|
|
$gpzoi := 23
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($c21kk)
|
|
$gpzoi := 28
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($uvcxk)
|
|
$gpzoi := 29
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($dgu14)
|
|
$gpzoi := 30
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ius2b)
|
|
$gpzoi := 9
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3rksw)
|
|
$gpzoi := 10
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($q0rb2)
|
|
$gpzoi := 11
|
|
call on_mod_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($g345d)
|
|
$gpzoi := 12
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($n0kha)
|
|
$gpzoi := 13
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2xzsd)
|
|
$gpzoi := 14
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5wlib)
|
|
$gpzoi := 15
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($cx1ja)
|
|
$gpzoi := 16
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($boshu)
|
|
$gpzoi := 17
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($o5n5m)
|
|
$gpzoi := 18
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($xeafk)
|
|
$gpzoi := 19
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($sddk3)
|
|
$gpzoi := 20
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3zolj)
|
|
$gpzoi := 24
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($yl1h5)
|
|
$gpzoi := 25
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2zugt)
|
|
$gpzoi := 7
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($bi544)
|
|
$gpzoi := 8
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($yexen)
|
|
$gpzoi := 0
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($v1jgb)
|
|
$gpzoi := 2
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($zv33b)
|
|
$gpzoi := 23
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($eg3kt)
|
|
$gpzoi := 28
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ia54c)
|
|
$gpzoi := 29
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5l3um)
|
|
$gpzoi := 30
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($1ybzi)
|
|
$gpzoi := 9
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($qbhb5)
|
|
$gpzoi := 10
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($qb5xv)
|
|
$gpzoi := 11
|
|
call on_mod_range_knob_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3pyb3)
|
|
$gpzoi := 12
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($u2pwx)
|
|
$gpzoi := 13
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ldi1z)
|
|
$gpzoi := 14
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($eu2xe)
|
|
$gpzoi := 15
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($qxhis)
|
|
$gpzoi := 16
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($oicux)
|
|
$gpzoi := 17
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fzwxf)
|
|
$gpzoi := 18
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($52sa5)
|
|
$gpzoi := 19
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nplew)
|
|
$gpzoi := 20
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($r3d0o)
|
|
$gpzoi := 24
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($yqtdo)
|
|
$gpzoi := 25
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($vas4o)
|
|
$gpzoi := 7
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($y3s33)
|
|
$gpzoi := 8
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($zi2jx)
|
|
$gpzoi := 0
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($gxopj)
|
|
$gpzoi := 2
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($dbgkf)
|
|
$gpzoi := 23
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2vyff)
|
|
$gpzoi := 28
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($wh1ke)
|
|
$gpzoi := 29
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($f4o1c)
|
|
$gpzoi := 30
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($rpaco)
|
|
$gpzoi := 9
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($m5sxk)
|
|
$gpzoi := 10
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($0vs3i)
|
|
$gpzoi := 11
|
|
call on_mod_source_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($qbesm)
|
|
$gpzoi := 35
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($tqsps)
|
|
$gpzoi := 36
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($4knyg)
|
|
$gpzoi := 37
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($x5zyo)
|
|
$gpzoi := 38
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3xmqt)
|
|
$gpzoi := 39
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($c30oe)
|
|
$gpzoi := 40
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($41deb)
|
|
$gpzoi := 41
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ynoq5)
|
|
$gpzoi := 42
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($33zwn)
|
|
$gpzoi := 43
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($p0hox)
|
|
$gpzoi := 44
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($bokn2)
|
|
$gpzoi := 45
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($xxdkc)
|
|
$gpzoi := 46
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($dyqeg)
|
|
$gpzoi := 47
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nznqd)
|
|
$gpzoi := 48
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($zprpl)
|
|
$gpzoi := 49
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($bpu3e)
|
|
$gpzoi := 50
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($s20mm)
|
|
$gpzoi := 51
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5q021)
|
|
$gpzoi := 52
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fnpd2)
|
|
$gpzoi := 53
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($wmqep)
|
|
$gpzoi := 54
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($gsxh3)
|
|
$gpzoi := 55
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($edhpo)
|
|
$gpzoi := 56
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ei4rr)
|
|
$gpzoi := 57
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nfnkh)
|
|
$gpzoi := 58
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($xug04)
|
|
$gpzoi := 59
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($bvaw5)
|
|
$gpzoi := 60
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($54gsh)
|
|
$gpzoi := 61
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($xgma4)
|
|
$gpzoi := 62
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($4ppiu)
|
|
$gpzoi := 63
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2lmoo)
|
|
$gpzoi := 64
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ajka4)
|
|
$gpzoi := 65
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($kw31l)
|
|
$gpzoi := 66
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($za4fi)
|
|
$gpzoi := 67
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($zctyt)
|
|
$gpzoi := 68
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nqqg3)
|
|
$gpzoi := 69
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($et1j2)
|
|
$gpzoi := 70
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ouvzc)
|
|
$gpzoi := 71
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($yi2x2)
|
|
$gpzoi := 72
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($yr3xi)
|
|
$gpzoi := 73
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($tcdg3)
|
|
$gpzoi := 76
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ud2dz)
|
|
$gpzoi := 74
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($b4qif)
|
|
$gpzoi := 75
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ppztm)
|
|
$gpzoi := 77
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($mjxc2)
|
|
$gpzoi := 78
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($uvwcc)
|
|
$gpzoi := 79
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ev1e5)
|
|
$gpzoi := 80
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3fqin)
|
|
$gpzoi := 26
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($h11uu)
|
|
$gpzoi := 27
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nwl2v)
|
|
$gpzoi := 21
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($wfiom)
|
|
$gpzoi := 22
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ufbsw)
|
|
$gpzoi := 31
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($maq5o)
|
|
$gpzoi := 32
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($lqoqt)
|
|
$gpzoi := 33
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($zqnbc)
|
|
$gpzoi := 34
|
|
call _on_mod_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($24riz)
|
|
$gpzoi := 35
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($51jvx)
|
|
$gpzoi := 36
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($rsero)
|
|
$gpzoi := 37
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($os0gc)
|
|
$gpzoi := 38
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($0nwvw)
|
|
$gpzoi := 39
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($iwhhy)
|
|
$gpzoi := 40
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5yyj1)
|
|
$gpzoi := 41
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($brpj3)
|
|
$gpzoi := 42
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($hwhlk)
|
|
$gpzoi := 43
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2ytkr)
|
|
$gpzoi := 44
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ak4fz)
|
|
$gpzoi := 45
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($pqxkq)
|
|
$gpzoi := 46
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($cz5nc)
|
|
$gpzoi := 47
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($pa1jg)
|
|
$gpzoi := 48
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($hfm3k)
|
|
$gpzoi := 49
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fnxkg)
|
|
$gpzoi := 50
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($i5nrk)
|
|
$gpzoi := 51
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fm2z3)
|
|
$gpzoi := 52
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($cakzn)
|
|
$gpzoi := 53
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($oybgu)
|
|
$gpzoi := 54
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($jkr4m)
|
|
$gpzoi := 55
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($dero1)
|
|
$gpzoi := 56
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2ptey)
|
|
$gpzoi := 57
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($lxste)
|
|
$gpzoi := 58
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($hqxeu)
|
|
$gpzoi := 59
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($0zlbe)
|
|
$gpzoi := 60
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($h4nrw)
|
|
$gpzoi := 61
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($pg4ei)
|
|
$gpzoi := 62
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2bixl)
|
|
$gpzoi := 63
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5jo04)
|
|
$gpzoi := 64
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($dhmoe)
|
|
$gpzoi := 65
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($0shp5)
|
|
$gpzoi := 66
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($21luc)
|
|
$gpzoi := 67
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($p4vlm)
|
|
$gpzoi := 68
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($u45os)
|
|
$gpzoi := 69
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($opstl)
|
|
$gpzoi := 70
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($f3pav)
|
|
$gpzoi := 71
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nrkm4)
|
|
$gpzoi := 72
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($yixdb)
|
|
$gpzoi := 73
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fflhr)
|
|
$gpzoi := 76
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3imfl)
|
|
$gpzoi := 74
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($uqaye)
|
|
$gpzoi := 75
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($gwhxp)
|
|
$gpzoi := 77
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($bxtyp)
|
|
$gpzoi := 78
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($xcb2e)
|
|
$gpzoi := 79
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($vtpyr)
|
|
$gpzoi := 80
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($q5pfd)
|
|
$gpzoi := 26
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($rgoik)
|
|
$gpzoi := 27
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($pk0h4)
|
|
$gpzoi := 21
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($0hnr5)
|
|
$gpzoi := 22
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3s02f)
|
|
$gpzoi := 31
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($410y5)
|
|
$gpzoi := 32
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($begpw)
|
|
$gpzoi := 33
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($llm0i)
|
|
$gpzoi := 34
|
|
call _on_mod_range_knob_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($1fo5x)
|
|
$gpzoi := 1
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
call evaluate_mod_connections
|
|
call MOD__perform_full_update
|
|
end on
|
|
|
|
on ui_control($z1x5e)
|
|
$gpzoi := 3
|
|
call MOD__position_mod_menu_for_gl_m_id
|
|
call evaluate_mod_connections
|
|
call MOD__perform_full_update
|
|
end on
|
|
|
|
on ui_control($cvjhr)
|
|
call evaluate_mod_connections
|
|
call MOD__perform_full_update
|
|
end on
|
|
|
|
on ui_control($fpvgj)
|
|
call evaluate_mod_connections
|
|
call MOD__perform_full_update
|
|
end on
|
|
|
|
on ui_control($jiutx)
|
|
call evaluate_mod_connections
|
|
call MOD__perform_full_update
|
|
end on
|
|
|
|
on ui_control($e2h4j)
|
|
$gpzoi := 35
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($lqfpr)
|
|
$gpzoi := 36
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($sejrr)
|
|
$gpzoi := 37
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2iqnc)
|
|
$gpzoi := 38
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($o0yx0)
|
|
$gpzoi := 39
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($lafc5)
|
|
$gpzoi := 40
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nj3pk)
|
|
$gpzoi := 41
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($b1s4y)
|
|
$gpzoi := 42
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($1kgif)
|
|
$gpzoi := 43
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($s2dqk)
|
|
$gpzoi := 44
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($0zrh0)
|
|
$gpzoi := 45
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($mgevd)
|
|
$gpzoi := 46
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($n32ls)
|
|
$gpzoi := 47
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($51guv)
|
|
$gpzoi := 48
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($k3qfg)
|
|
$gpzoi := 49
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($d4ity)
|
|
$gpzoi := 50
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($cm0ux)
|
|
$gpzoi := 51
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($q1g2q)
|
|
$gpzoi := 52
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($rjvzf)
|
|
$gpzoi := 53
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($nrlyv)
|
|
$gpzoi := 54
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($qvjwi)
|
|
$gpzoi := 55
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($no43m)
|
|
$gpzoi := 56
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($k20qf)
|
|
$gpzoi := 57
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3drha)
|
|
$gpzoi := 58
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($iw2oc)
|
|
$gpzoi := 59
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($exjvd)
|
|
$gpzoi := 60
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($hr3vo)
|
|
$gpzoi := 61
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($d0pbl)
|
|
$gpzoi := 62
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($oxbzh)
|
|
$gpzoi := 63
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2moaw)
|
|
$gpzoi := 64
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($sw0os)
|
|
$gpzoi := 65
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($pjmqm)
|
|
$gpzoi := 66
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($ujr4n)
|
|
$gpzoi := 67
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($2cyex)
|
|
$gpzoi := 68
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($4ng2b)
|
|
$gpzoi := 69
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($w3nfb)
|
|
$gpzoi := 70
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($i1321)
|
|
$gpzoi := 71
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($lczp2)
|
|
$gpzoi := 72
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($fr5xq)
|
|
$gpzoi := 73
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($rpdbb)
|
|
$gpzoi := 76
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($v2kdj)
|
|
$gpzoi := 74
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($tpmdd)
|
|
$gpzoi := 75
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($r0mpl)
|
|
$gpzoi := 77
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($a1mcv)
|
|
$gpzoi := 78
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($h5tys)
|
|
$gpzoi := 79
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($mophf)
|
|
$gpzoi := 80
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($m0zqt)
|
|
$gpzoi := 26
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($1xnyu)
|
|
$gpzoi := 27
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($u2ki4)
|
|
$gpzoi := 21
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($tmtfv)
|
|
$gpzoi := 22
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($3rcax)
|
|
$gpzoi := 31
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5qrmj)
|
|
$gpzoi := 32
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($f0ljx)
|
|
$gpzoi := 33
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($5m5qp)
|
|
$gpzoi := 34
|
|
call _on_mod_source_engine_par_for_gl_m_id
|
|
end on
|
|
|
|
on ui_control($u51dh)
|
|
$4djds := 5
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($2qveo)
|
|
$4djds := 6
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($fjnu3)
|
|
$4djds := 7
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($tz115)
|
|
$4djds := 8
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($2d1qh)
|
|
$4djds := 9
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($az3wx)
|
|
$4djds := 10
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($ki4hc)
|
|
$4djds := 11
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($y4fhf)
|
|
$4djds := 12
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($cfneg)
|
|
$4djds := 13
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($kpiih)
|
|
$4djds := 14
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[14],$CONTROL_PAR_PICTURE,"blank")
|
|
end on
|
|
|
|
on ui_control($ddusk)
|
|
$4djds := 15
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[15],$CONTROL_PAR_PICTURE,"blank")
|
|
end on
|
|
|
|
on ui_control($ysdm4)
|
|
$4djds := 16
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[16],$CONTROL_PAR_PICTURE,"blank")
|
|
end on
|
|
|
|
on ui_control($dtugu)
|
|
$4djds := 17
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($pvege)
|
|
$4djds := 18
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($iggz4)
|
|
$4djds := 19
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($5ernz)
|
|
$4djds := 20
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[20],$CONTROL_PAR_PICTURE,"blank")
|
|
end on
|
|
|
|
on ui_control($gepsm)
|
|
$4djds := 21
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[21],$CONTROL_PAR_PICTURE,"blank")
|
|
end on
|
|
|
|
on ui_control($qtif2)
|
|
$4djds := 22
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
set_control_par_str(%5comw[22],$CONTROL_PAR_PICTURE,"blank")
|
|
end on
|
|
|
|
on ui_control($dtx0r)
|
|
$4djds := 23
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($ophyd)
|
|
$4djds := 24
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($ydeyc)
|
|
$4djds := 25
|
|
call _on_norm_knob_engine_par_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($ppaoe)
|
|
$4djds := 1
|
|
call _on_norm_knob_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($ork5f)
|
|
$4djds := 2
|
|
call _on_norm_knob_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($dg3qf)
|
|
$4djds := 3
|
|
call _on_norm_knob_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($p3vhn)
|
|
$4djds := 4
|
|
call _on_norm_knob_for_gl_nk_ep_id
|
|
end on
|
|
|
|
on ui_control($qwf1w)
|
|
$4djds := 0
|
|
call _on_norm_knob_for_gl_nk_ep_id
|
|
end on
|
|
|