From fc5c4170ce221d6342e373f67c2a33031bbf11af Mon Sep 17 00:00:00 2001 From: 0000OOOO0000 <63518686+0000OOOO0000@users.noreply.github.com> Date: Wed, 29 Dec 2021 19:40:45 +0200 Subject: [PATCH] =?UTF-8?q?Delete=20TXT.=E2=A0=80=E2=A0=80=E2=A0=80?= =?UTF-8?q?=E2=A0=80=E2=97=AF=E2=A0=80=E2=9C=A4=DF=A6=EA=96=B4=E1=B4=A5?= =?UTF-8?q?=E1=91=90=E1=91=95=E1=94=93=E1=94=95=E2=A0=80=E2=97=AF=E2=A0=80?= =?UTF-8?q?=E2=9C=A4=EC=98=B7=E1=95=A4=E1=95=A6=EA=96=B4=E1=99=81=EC=98=B7?= =?UTF-8?q?=E1=94=93=E1=94=95=E1=97=A9=E2=A0=80=E2=97=AF=E2=A0=80=E2=A0=80?= =?UTF-8?q?=E2=A0=80=E2=A0=80=E2=B5=99=E2=A0=80=E2=A0=80=E2=A0=80=E2=A0=80?= =?UTF-8?q?=E2=97=AF=E2=A0=80=E1=97=A9=E1=94=93=E1=94=95=EC=98=B7=E1=99=81?= =?UTF-8?q?=EA=96=B4=E1=95=A4=E1=95=A6=EC=98=B7=E2=9C=A4=E2=A0=80=E2=97=AF?= =?UTF-8?q?=E2=A0=80=E1=94=93=E1=94=95=E1=91=90=E1=91=95=E1=B4=A5=EA=96=B4?= =?UTF-8?q?=DF=A6=E2=9C=A4=E2=A0=80=E2=97=AF=E2=A0=80=E2=A0=80=E2=A0=80?= =?UTF-8?q?=E2=A0=80.TXT?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT | 23318 ---------------- 1 file changed, 23318 deletions(-) delete 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 deleted file mode 100644 index 35d256db..00000000 --- a/◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯ⵙ◯ᔓᔕᴥᗱᗴᙁᗩ✤ᔓᔕИNꖴ◯⚪◯ꖴИNᔓᔕ✤ᗩᙁᗱᗴᴥᔓᔕ◯/⠀⠀⠀⠀◯⠀ᗩIᗝ人ᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩ人ᗝIᗩ⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀✤ᔓᔕᗯ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗯᔓᔕ✤⠀◯⠀⠀⠀⠀/⠀⠀⠀⠀◯⠀ᔓᔕ✤ИNᗱᗴᙏᑎᴥ✤ᔓᔕИNꖴ⠀◯⠀ᗱᗴᗯꖴ✤ᗩИN⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ИNᗩ✤ꖴᗯᗱᗴ⠀◯⠀ꖴИNᔓᔕ✤ᴥᑎᙏᗱᗴИN✤ᔓᔕ⠀◯⠀⠀⠀⠀/TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT +++ /dev/null @@ -1,23318 +0,0 @@ -{ 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 -