From 7b913389751668e5244f7e59d67e6a4215b22b87 Mon Sep 17 00:00:00 2001 From: 0000OOOO0000 <63518686+0000OOOO0000@users.noreply.github.com> Date: Mon, 29 Nov 2021 03:17:58 +0200 Subject: [PATCH] Add files via upload --- .../⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT | 23318 ++++++++++++++++ 1 file changed, 23318 insertions(+) create mode 100644 ◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯ⵙ◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯/⠀⠀⠀⠀◯⠀ᗩIᗝ人ᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩ人ᗝIᗩ⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT diff --git a/◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯ⵙ◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯/⠀⠀⠀⠀◯⠀ᗩIᗝ人ᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩ人ᗝIᗩ⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT b/◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯ⵙ◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯/⠀⠀⠀⠀◯⠀ᗩIᗝ人ᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩ人ᗝIᗩ⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT new file mode 100644 index 00000000..9cb1913a --- /dev/null +++ b/◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯ⵙ◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯/⠀⠀⠀⠀◯⠀ᗩIᗝ人ᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩ人ᗝIᗩ⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT @@ -0,0 +1,23318 @@ +{ 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 ($g5k3r0 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 ($fg4rw0 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 ($g5k3r0 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 ($fg4rw0 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 ($fg4rw0 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 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 ($g5k3r0 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 ($fg4rw0 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 ($g5k3r0 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 ($g5k3r0 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 ($g5k3r1)) + 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 ($g5k3r1) + %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 ($fg4rw0) + $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 ($5sroo1) + %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=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-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-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-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-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=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-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-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-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=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-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-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-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=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-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-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 ($dwl3e0.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-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 ($5sroo1) + 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 ($jdgl11) + $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 ($3tnu355) + $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=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 ($fg4rw800) + $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 ($fg4rw2) + $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 ($jdgl10 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 ($jdgl10 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-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 ($y3mgr0.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 +