Untitled

on init

declare $3o3xx := 103

set_ui_height_px(170)

declare const $yv34f := 0

declare const $jbupn := 1

declare const $wmzyu := 0

declare const $fxomi := 1

declare const $doet1 := 16

declare const $ewcgs := 0

declare const $ta4pl := 512

declare $c5pog

declare const $tefrp := 0

declare const $oith1 := 10

declare const $w50gb := 2

declare const $a12kq := 3

declare const $gan1b := 5

declare const $lyj00 := 4

declare const $zrt1z := 8

declare const $ozneo := 9

declare const $sljtd := 12

declare const $pjmqm := 13

declare const $ivhr2 := 14

declare const $4yknz := 15

declare const $gfcoo := 17

declare const $aztnb := 18

declare const $cme4o := 19

declare const $zlfpy := 6

declare const $gchjc := 7

declare const $1e5yd := 16

declare const $gvfjx := 1

declare const $vo2vl := 11

declare $2t004

declare $uhds0

declare $ktcgs

declare $gfsjw

declare $ondkz

declare $3bcqb

declare $io0ek

declare $w3nmh

declare $jiyzb

declare $l43yr

declare $lvx4i

declare polyphonic $nfogb

declare polyphonic $ubafh

declare polyphonic $s0cia

declare polyphonic $iqeqx

declare %s3zz0[1000]

declare $32umg

declare $5dm5h

declare $ltjzm

declare !mdptv[10000]

declare !qwzgo[10000]

$gfsjw := 0

while ($gfsjw<=10000)

select ($gfsjw)

case 0 to 9

!mdptv[$gfsjw] := "     "

!qwzgo[$gfsjw] := "    "

case 10 to 99

!mdptv[$gfsjw] := "    "

!qwzgo[$gfsjw] := "   "

case 100 to 999

!mdptv[$gfsjw] := "   "

!qwzgo[$gfsjw] := "  "

case 1000 to 9999

!mdptv[$gfsjw] := "  "

!qwzgo[$gfsjw] := " "

case 10000 to 99999

!mdptv[$gfsjw] := " "

!qwzgo[$gfsjw] := ""

end select

inc($gfsjw)

end while

declare !3jnvq[2]

!3jnvq[0] := "OFF "

!3jnvq[1] := "ON "

declare !duftm[13]

!duftm[0] := "Root  "

!duftm[1] := "+ m2  "

!duftm[2] := "+ M2  "

!duftm[3] := "+ m3  "

!duftm[4] := "+ M3  "

!duftm[5] := "+ P4  "

!duftm[6] := "+ #4  "

!duftm[7] := "+ P5  "

!duftm[8] := "+ m6  "

!duftm[9] := "+ M6  "

!duftm[10] := "+ m7  "

!duftm[11] := "+ M7  "

!duftm[12] := "8va  "

declare !evrr5[13]

!evrr5[0] := "Root  "

!evrr5[1] := "- m2  "

!evrr5[2] := "- M2  "

!evrr5[3] := "- m3  "

!evrr5[4] := "- M3  "

!evrr5[5] := "- P4  "

!evrr5[6] := "- #4  "

!evrr5[7] := "- P5  "

!evrr5[8] := "- m6  "

!evrr5[9] := "- M6  "

!evrr5[10] := "- m7  "

!evrr5[11] := "- M7  "

!evrr5[12] := "8vb  "

declare !fhsri[512]

$gfsjw := 0

while ($gfsjw<=10)

!fhsri[0+($gfsjw*12)] := "C" & ($gfsjw-2)

!fhsri[1+($gfsjw*12)] := "C#" & ($gfsjw-2)

!fhsri[2+($gfsjw*12)] := "D" & ($gfsjw-2)

!fhsri[3+($gfsjw*12)] := "D#" & ($gfsjw-2)

!fhsri[4+($gfsjw*12)] := "E" & ($gfsjw-2)

!fhsri[5+($gfsjw*12)] := "F" & ($gfsjw-2)

!fhsri[6+($gfsjw*12)] := "F#" & ($gfsjw-2)

!fhsri[7+($gfsjw*12)] := "G" & ($gfsjw-2)

!fhsri[8+($gfsjw*12)] := "G#" & ($gfsjw-2)

!fhsri[9+($gfsjw*12)] := "A" & ($gfsjw-2)

!fhsri[10+($gfsjw*12)] := "A#" & ($gfsjw-2)

!fhsri[11+($gfsjw*12)] := "B" & ($gfsjw-2)

inc($gfsjw)

end while

declare !gxarx[512]

$gfsjw := 0

while ($gfsjw<=127)

!gxarx[$gfsjw] := "" & $gfsjw

inc($gfsjw)

end while

!gxarx[1] := "Mod"

!gxarx[2] := "Breath"

!gxarx[4] := "Foot"

!gxarx[7] := "Vol."

!gxarx[10] := "Pan"

!gxarx[11] := "Exp."

!gxarx[64] := "Pedal"

declare %xugcf[128]

declare $gzwdy

declare $4cuem

declare $2qyer

declare $vivbr

declare %jrpyu[128]

declare %jzjmi[128]

declare $omfyl

declare $h2sob

declare $t1n23

declare $1ssj5

declare $beymb

declare $bdenl

declare $oamwp

declare %2qll1[128]

declare $43lz4

declare $uscsb

declare $kkttm

declare $qafy4

declare $1qmvl

declare $3jscf

declare %rwqer[128]

declare $mjx2q

declare $p5qcj

declare $vrmjm := 0

declare $ojjkx := 64

declare $2gfi5

declare $uqvug

declare $2h0cm

declare $f4lcr

declare $sphi5

declare $ukfgu := 0

declare $thpua := 1

declare const $gpxi5 := 51

declare %jiovc[($ta4pl+2)*$gpxi5]

make_persistent(%jiovc)

read_persistent_var(%jiovc)

declare %r3mpm[5000]

declare !ccaiq[5000]

declare const $r5dci := 0

declare const $r2f0l := 1

declare const $csw22 := 2

declare const $tuljo := 3

declare const $c05yg := 4

declare const $aow4m := 5

declare const $mwhrw := 6

declare const $xf40v := 7

declare const $nuxob := 8

declare const $35efs := 9

declare const $2145g := 10

declare const $pepwq := 11

declare const $zl5ml := 12

declare const $hvhwk := 13

declare const $kd3mt := 14

declare const $tvu11 := 15

declare const $uo0s5 := 16

declare const $5wh30 := 17

declare const $uigxu := 18

declare const $m3o1k := 19

declare const $od0iz := 20

declare const $znbmx := 21

declare const $stgw3 := 22

declare const $144l5 := 23

declare const $5b5pl := 24

declare const $qr1pq := 25

declare const $riejs := 26

declare const $sbvut := 27

declare const $xlbmy := 28

declare const $eymvz := 29

declare const $si4uv := 30

declare const $kaazb := 31

declare const $kegpr := 32

declare const $xrqox := 33

declare const $hdnx1 := 34

declare const $wg1he := 35

declare const $20fcn := 36

declare const $suz4l := 37

declare const $ljhfy := 38

declare const $e2hpr := 39

declare const $jke0h := 40

declare const $kr34h := 41

declare const $nb11q := 42

declare const $3jlkq := 43

declare const $xwws5 := 44

declare const $xjhpk := 45

declare const $hnwuw := 46

declare const $wmr2q := 47

declare const $erc5h := 48

declare const $w0a0u := 49

declare const $43kao := 50

declare ui_label $f14dt(0, 0)

set_text($f14dt,"_______________________________________________________________________________________________________")

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_WIDTH,650)

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_TEXT_ALIGNMENT,0)

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_FONT_TYPE,22)

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_HIDE,$HIDE_PART_BG)

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_POS_X,0)

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_POS_Y,32)

declare %wmaua[512]

declare ui_label $wtik4(0, 0)

declare ui_label $haz5c(0, 0)

declare ui_label $r2uv5(0, 0)

declare ui_label $lgpwt(0, 0)

%wmaua[0] := get_ui_id($wtik4)

%wmaua[1] := get_ui_id($haz5c)

%wmaua[2] := get_ui_id($r2uv5)

%wmaua[3] := get_ui_id($lgpwt)

$gfsjw := 0

while ($gfsjw<=3)

set_control_par_str(%wmaua[$gfsjw],$CONTROL_PAR_TEXT,"_______________________________________________________________________________________")

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_WIDTH,600)

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_TEXT_ALIGNMENT,0)

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_FONT_TYPE,23)

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_HIDE,$HIDE_PART_BG)

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_POS_X,105)

set_control_par(%wmaua[$gfsjw],$CONTROL_PAR_POS_Y,55+($gfsjw*18))

inc($gfsjw)

end while

declare ui_button $pepg2

set_text($pepg2,"ADD  ")

set_control_par_str(get_ui_id($pepg2),$CONTROL_PAR_HELP,"Add: Creates a new layer.")

set_control_par(get_ui_id($pepg2),$CONTROL_PAR_FONT_TYPE,17)

set_control_par(get_ui_id($pepg2),$CONTROL_PAR_TEXT_ALIGNMENT,1)

set_control_par(get_ui_id($pepg2),$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(get_ui_id($pepg2),$CONTROL_PAR_WIDTH,53)

move_control_px($pepg2,152,2)

declare ui_knob $m2jdq(0, 100000, 1)

set_control_par_str(get_ui_id($m2jdq),$CONTROL_PAR_HELP,"Select the layer to edit using this knob.")

declare $pwtnk

declare $3etzh

set_text($m2jdq," LAYER")

move_control($m2jdq,1,1)

declare $ihgmo

declare $kn4yi

make_persistent($kn4yi)

read_persistent_var($kn4yi)

declare ui_button $0omyq

set_text($0omyq,"DELETE")

set_control_par(get_ui_id($0omyq),$CONTROL_PAR_FONT_TYPE,17)

set_control_par(get_ui_id($0omyq),$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(get_ui_id($0omyq),$CONTROL_PAR_WIDTH,53)

set_control_par_str(get_ui_id($0omyq),$CONTROL_PAR_HELP,"Delete: Removes the currently displayed layer. WARNING: THIS IS PERMANENT AND CAN NOT BE UNDONE")

move_control_px($0omyq,152,23)

declare ui_button $uknd1

set_text($uknd1,"COPY  ")

set_control_par(get_ui_id($uknd1),$CONTROL_PAR_FONT_TYPE,17)

set_control_par(get_ui_id($uknd1),$CONTROL_PAR_TEXT_ALIGNMENT,1)

set_control_par(get_ui_id($uknd1),$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(get_ui_id($uknd1),$CONTROL_PAR_WIDTH,53)

set_control_par_str(get_ui_id($uknd1),$CONTROL_PAR_HELP,"Copy: Copies the settings for the currently displayed layer.")

move_control_px($uknd1,206,2)

declare $3av4y

declare ui_button $zehkm

set_text($zehkm,"PASTE  ")

set_control_par(get_ui_id($zehkm),$CONTROL_PAR_FONT_TYPE,17)

set_control_par(get_ui_id($zehkm),$CONTROL_PAR_TEXT_ALIGNMENT,1)

set_control_par(get_ui_id($zehkm),$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(get_ui_id($zehkm),$CONTROL_PAR_WIDTH,53)

set_control_par_str(get_ui_id($zehkm),$CONTROL_PAR_HELP,"Paste: Overwrites the currently displayed layer with the settings from the copied layer.")

move_control_px($zehkm,206,23)

declare ui_knob $wllju(0, 127, 1)

move_control_px($wllju,265,2)

set_control_par_str(get_ui_id($wllju),$CONTROL_PAR_HELP,"This controls which patch in the instrument bank is selected if all the conditions in the layer are met.")

set_text($wllju,"  SLOT")

declare ui_knob $qzgmb(0, 100000, 1)

set_control_par_str(get_ui_id($qzgmb),$CONTROL_PAR_HELP,"Adjusts the selected value.")

set_control_par(get_ui_id($qzgmb),$CONTROL_PAR_TEXT_ALIGNMENT,1)

move_control_px($qzgmb,461,2)

set_text($qzgmb," VALUE")

set_knob_label($qzgmb," ")

declare $55k50

declare %mmjf5[200]

declare !3if5q[50]

!3if5q[$tefrp] := "Disabled    "

!3if5q[$oith1] := "Random    "

!3if5q[$w50gb] := "Velocity    "

!3if5q[$a12kq] := "Pitch    "

!3if5q[$gan1b] := "Pitch Wheel    "

!3if5q[$lyj00] := "Controller    "

!3if5q[$zrt1z] := "Key (latch)    "

!3if5q[$ozneo] := "Key (non-latch)    "

!3if5q[$sljtd] := "MIDI Channel    "

!3if5q[$pjmqm] := "Last Speed    "

!3if5q[$ivhr2] := "Last Duration    "

!3if5q[$4yknz] := "Cycle    "

!3if5q[$gfcoo] := "Polyphony    "

!3if5q[$aztnb] := "Last Slot    "

!3if5q[$cme4o] := "Last Layer    "

!3if5q[$zlfpy] := "Aftertouch    "

!3if5q[$gchjc] := "Program Change    "

!3if5q[$1e5yd] := "Interval    "

!3if5q[$gvfjx] := "--- BASIC CONDITIONS ---"

!3if5q[$vo2vl] := "--- ADVANCED CONDITIONS ---"

declare ui_menu $wixqt

declare ui_menu $yeen3

declare ui_menu $0rrhd

declare ui_menu $yjgxo

declare ui_menu $oegob

$gfsjw := 0

while ($gfsjw<=19)

add_menu_item($wixqt,!3if5q[$gfsjw],$gfsjw)

add_menu_item($yeen3,!3if5q[$gfsjw],$gfsjw)

add_menu_item($0rrhd,!3if5q[$gfsjw],$gfsjw)

add_menu_item($yjgxo,!3if5q[$gfsjw],$gfsjw)

add_menu_item($oegob,!3if5q[$gfsjw],$gfsjw)

inc($gfsjw)

end while

%mmjf5[$r2f0l] := get_ui_id($wixqt)

%mmjf5[$pepwq] := get_ui_id($yeen3)

%mmjf5[$znbmx] := get_ui_id($0rrhd)

%mmjf5[$kaazb] := get_ui_id($yjgxo)

%mmjf5[$kr34h] := get_ui_id($oegob)

$gfsjw := 0

while ($gfsjw<=4)

set_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_TEXT_ALIGNMENT,1)

set_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_FONT_TYPE,17)

set_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_WIDTH,110)

set_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_POS_X,0)

set_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_POS_Y,50+($gfsjw*18))

set_control_par_str(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_HELP,"Adds a condition which needs to be met for the layer to be triggered.")

inc($gfsjw)

end while

declare ui_label $wezqi(0, 0)

declare ui_button $x2xqe

declare ui_button $3phxm

declare ui_label $0yalq(0, 0)

declare ui_button $2nser

declare ui_button $n3x5p

declare ui_label $a4qps(0, 0)

declare ui_button $3gahq

declare ui_button $inn2b

declare ui_label $2p53i(0, 0)

declare ui_button $jxy1f

declare ui_button $4kgwu

declare ui_label $jpzx4(0, 0)

declare ui_button $hsvmh

declare ui_button $dx1lt

declare ui_label $gid5u(0, 0)

declare ui_button $u0cf0

declare ui_button $0kmqt

declare ui_label $4izrt(0, 0)

declare ui_button $qd52c

declare ui_button $jj3jt

declare ui_label $bmpeu(0, 0)

declare ui_button $ssxb5

declare ui_button $ngzw5

declare ui_label $ubn2j(0, 0)

declare ui_button $14amw

declare ui_button $b2ct2

declare ui_label $403hg(0, 0)

declare ui_button $42g4i

declare ui_button $uizco

declare ui_label $5ndzm(0, 0)

declare ui_button $q3pr3

declare ui_button $qftov

declare ui_label $3nzmc(0, 0)

declare ui_button $qxynk

declare ui_button $d2zob

declare ui_label $gjcky(0, 0)

declare ui_button $5qmq1

declare ui_button $wyt2z

declare ui_label $mux3r(0, 0)

declare ui_button $vqsvk

declare ui_button $kch5m

declare ui_label $fixct(0, 0)

declare ui_button $2bunx

declare ui_button $w0nwu

%mmjf5[$csw22] := get_ui_id($wezqi)

%mmjf5[$aow4m] := get_ui_id($0yalq)

%mmjf5[$nuxob] := get_ui_id($a4qps)

%mmjf5[$zl5ml] := get_ui_id($2p53i)

%mmjf5[$tvu11] := get_ui_id($jpzx4)

%mmjf5[$uigxu] := get_ui_id($gid5u)

%mmjf5[$stgw3] := get_ui_id($4izrt)

%mmjf5[$qr1pq] := get_ui_id($bmpeu)

%mmjf5[$xlbmy] := get_ui_id($ubn2j)

%mmjf5[$kegpr] := get_ui_id($403hg)

%mmjf5[$wg1he] := get_ui_id($5ndzm)

%mmjf5[$ljhfy] := get_ui_id($3nzmc)

%mmjf5[$nb11q] := get_ui_id($gjcky)

%mmjf5[$xjhpk] := get_ui_id($mux3r)

%mmjf5[$erc5h] := get_ui_id($fixct)

%mmjf5[$tuljo] := get_ui_id($x2xqe)

%mmjf5[$mwhrw] := get_ui_id($2nser)

%mmjf5[$35efs] := get_ui_id($3gahq)

%mmjf5[$hvhwk] := get_ui_id($jxy1f)

%mmjf5[$uo0s5] := get_ui_id($hsvmh)

%mmjf5[$m3o1k] := get_ui_id($u0cf0)

%mmjf5[$144l5] := get_ui_id($qd52c)

%mmjf5[$riejs] := get_ui_id($ssxb5)

%mmjf5[$eymvz] := get_ui_id($14amw)

%mmjf5[$xrqox] := get_ui_id($42g4i)

%mmjf5[$20fcn] := get_ui_id($q3pr3)

%mmjf5[$e2hpr] := get_ui_id($qxynk)

%mmjf5[$3jlkq] := get_ui_id($5qmq1)

%mmjf5[$hnwuw] := get_ui_id($vqsvk)

%mmjf5[$w0a0u] := get_ui_id($2bunx)

%mmjf5[$c05yg] := get_ui_id($3phxm)

%mmjf5[$xf40v] := get_ui_id($n3x5p)

%mmjf5[$2145g] := get_ui_id($inn2b)

%mmjf5[$kd3mt] := get_ui_id($4kgwu)

%mmjf5[$5wh30] := get_ui_id($dx1lt)

%mmjf5[$od0iz] := get_ui_id($0kmqt)

%mmjf5[$5b5pl] := get_ui_id($jj3jt)

%mmjf5[$sbvut] := get_ui_id($ngzw5)

%mmjf5[$si4uv] := get_ui_id($b2ct2)

%mmjf5[$hdnx1] := get_ui_id($uizco)

%mmjf5[$suz4l] := get_ui_id($qftov)

%mmjf5[$jke0h] := get_ui_id($d2zob)

%mmjf5[$xwws5] := get_ui_id($wyt2z)

%mmjf5[$wmr2q] := get_ui_id($kch5m)

%mmjf5[$43kao] := get_ui_id($w0nwu)

$x2xqe := 0

$3phxm := 0

$2nser := 0

$n3x5p := 0

$3gahq := 0

$inn2b := 0

$jxy1f := 0

$4kgwu := 0

$hsvmh := 0

$dx1lt := 0

$u0cf0 := 0

$0kmqt := 0

$qd52c := 0

$jj3jt := 0

$ssxb5 := 0

$ngzw5 := 0

$14amw := 0

$b2ct2 := 0

$42g4i := 0

$uizco := 0

$q3pr3 := 0

$qftov := 0

$qxynk := 0

$d2zob := 0

$5qmq1 := 0

$wyt2z := 0

$vqsvk := 0

$kch5m := 0

$2bunx := 0

$w0nwu := 0

declare $neqtg := -1

declare $2d2af := -1

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_WIDTH,88)

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT_ALIGNMENT,1)

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_FONT_TYPE,22)

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_HIDE,$HIDE_PART_BG)

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_POS_X,115+($ondkz*145))

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_POS_Y,50+($gfsjw*18))

set_control_par_str(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_WIDTH,40)

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_SHOW_ARROWS,0)

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT_ALIGNMENT,1)

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_FONT_TYPE,0)

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_POS_X,115+87+($ondkz*145))

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_POS_Y,50+($gfsjw*18))

set_control_par_str(%mmjf5[3+(10*$gfsjw)+($ondkz*3)],$CONTROL_PAR_HELP,"Select, then use the 'VALUE' knob to modify.")

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

set_control_par(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_WIDTH,20)

set_control_par(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_FONT_TYPE,17)

set_control_par(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_POS_X,115+124+($ondkz*145))

set_control_par(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_POS_Y,50+($gfsjw*18))

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_HELP,"While this button is enabled, the value will detect the value from MIDI.")

inc($ondkz)

end while

inc($gfsjw)

end while

$gfsjw := $tefrp

%r3mpm[0+($gfsjw*18)+(0*6)] := 0

%r3mpm[0+($gfsjw*18)+(1*6)] := 0

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := ""

!ccaiq[1+($gfsjw*18)+(1*6)] := ""

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 0

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 0

%r3mpm[3+($gfsjw*18)+(1*6)] := 0

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 0

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $oith1

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := ""

!ccaiq[1+($gfsjw*18)+(1*6)] := "IN"

!ccaiq[1+($gfsjw*18)+(2*6)] := "CHANCE"

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 100

%r3mpm[3+($gfsjw*18)+(1*6)] := 100

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 1

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $w50gb

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 127

%r3mpm[3+($gfsjw*18)+(1*6)] := 127

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 127

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 1

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $a12kq

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 0

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 127

%r3mpm[3+($gfsjw*18)+(1*6)] := 127

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 0

%r3mpm[4+($gfsjw*18)+(1*6)] := 127

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 1

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $gan1b

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := -8191

%r3mpm[2+($gfsjw*18)+(1*6)] := -8191

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 8191

%r3mpm[3+($gfsjw*18)+(1*6)] := 8191

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := -8191

%r3mpm[4+($gfsjw*18)+(1*6)] := 8191

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 1

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $lyj00

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 1

!ccaiq[1+($gfsjw*18)+(0*6)] := "MIDI CC"

!ccaiq[1+($gfsjw*18)+(1*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(2*6)] := "AND"

%r3mpm[2+($gfsjw*18)+(0*6)] := 0

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 119

%r3mpm[3+($gfsjw*18)+(1*6)] := 127

%r3mpm[3+($gfsjw*18)+(2*6)] := 127

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 127

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 1

%r3mpm[5+($gfsjw*18)+(2*6)] := 1

$gfsjw := $zrt1z

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 0

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := ""

!ccaiq[1+($gfsjw*18)+(1*6)] := "PRESSED"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 0

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 127

%r3mpm[3+($gfsjw*18)+(1*6)] := 0

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 0

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $ozneo

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 0

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := ""

!ccaiq[1+($gfsjw*18)+(1*6)] := "PRESSED"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 0

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 127

%r3mpm[3+($gfsjw*18)+(1*6)] := 0

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 0

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $sljtd

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 0

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "FROM"

!ccaiq[1+($gfsjw*18)+(1*6)] := ""

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 16

%r3mpm[3+($gfsjw*18)+(1*6)] := 0

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $pjmqm

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := "MILLISECONDS"

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 5000

%r3mpm[3+($gfsjw*18)+(1*6)] := 5000

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 1

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $ivhr2

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := "MILLISECONDS"

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 5000

%r3mpm[3+($gfsjw*18)+(1*6)] := 5000

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 1

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $4yknz

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 0

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "ID #"

!ccaiq[1+($gfsjw*18)+(1*6)] := ""

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 100

%r3mpm[3+($gfsjw*18)+(1*6)] := 0

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $gfcoo

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "VOICE #"

!ccaiq[1+($gfsjw*18)+(1*6)] := "TO VOICE #"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 50

%r3mpm[3+($gfsjw*18)+(1*6)] := 50

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 1

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $aztnb

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 128

%r3mpm[3+($gfsjw*18)+(1*6)] := 128

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 1

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $cme4o

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 1

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 100

%r3mpm[3+($gfsjw*18)+(1*6)] := 100

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 1

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $zlfpy

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 0

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 127

%r3mpm[3+($gfsjw*18)+(1*6)] := 127

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 0

%r3mpm[4+($gfsjw*18)+(1*6)] := 127

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 1

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $gchjc

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 0

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := ""

!ccaiq[1+($gfsjw*18)+(1*6)] := ""

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := 1

%r3mpm[2+($gfsjw*18)+(1*6)] := 0

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 128

%r3mpm[3+($gfsjw*18)+(1*6)] := 0

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 1

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 1

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

$gfsjw := $1e5yd

%r3mpm[0+($gfsjw*18)+(0*6)] := 1

%r3mpm[0+($gfsjw*18)+(1*6)] := 1

%r3mpm[0+($gfsjw*18)+(2*6)] := 0

!ccaiq[1+($gfsjw*18)+(0*6)] := "BETWEEN"

!ccaiq[1+($gfsjw*18)+(1*6)] := "AND"

!ccaiq[1+($gfsjw*18)+(2*6)] := ""

%r3mpm[2+($gfsjw*18)+(0*6)] := -12

%r3mpm[2+($gfsjw*18)+(1*6)] := -12

%r3mpm[2+($gfsjw*18)+(2*6)] := 0

%r3mpm[3+($gfsjw*18)+(0*6)] := 12

%r3mpm[3+($gfsjw*18)+(1*6)] := 12

%r3mpm[3+($gfsjw*18)+(2*6)] := 0

%r3mpm[4+($gfsjw*18)+(0*6)] := 0

%r3mpm[4+($gfsjw*18)+(1*6)] := 0

%r3mpm[4+($gfsjw*18)+(2*6)] := 0

%r3mpm[5+($gfsjw*18)+(0*6)] := 0

%r3mpm[5+($gfsjw*18)+(1*6)] := 0

%r3mpm[5+($gfsjw*18)+(2*6)] := 0

declare %ro1fv[6]

%ro1fv[0] := $ewcgs

%ro1fv[1] := $doet1

%ro1fv[2] := $HIDE_PART_BG

%ro1fv[3] := $doet1

declare ui_button $rwqrn

set_control_par_str(get_ui_id($rwqrn),$CONTROL_PAR_HELP,"Views the MIND CONTROL configuration.")

set_control_par_str(get_ui_id($rwqrn),$CONTROL_PAR_PICTURE,"MC_settings_btn")

set_control_par(get_ui_id($rwqrn),$CONTROL_PAR_WIDTH,30)

set_control_par(get_ui_id($rwqrn),$CONTROL_PAR_HEIGHT,30)

set_control_par(get_ui_id($rwqrn),$CONTROL_PAR_POS_X,612)

set_control_par(get_ui_id($rwqrn),$CONTROL_PAR_POS_Y,135)

set_text($rwqrn,"")

declare ui_label $utmvo(0, 0)

set_text($utmvo,"_______________________________________________________________________________________________________")

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_WIDTH,650)

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_TEXT_ALIGNMENT,0)

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_FONT_TYPE,22)

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_TEXTPOS_Y,1)

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_HIDE,$doet1)

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_POS_X,0)

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_POS_Y,122)

declare ui_value_edit $5p4de(1, 16, 1)

set_text($5p4de,"MIDI Channel")

set_control_par_str(get_ui_id($5p4de),$CONTROL_PAR_HELP,"Controls the current MIDI channel associated with MIND CONTROL.")

set_control_par(get_ui_id($5p4de),$CONTROL_PAR_HIDE,$doet1)

set_control_par(get_ui_id($5p4de),$CONTROL_PAR_POS_X,60)

set_control_par(get_ui_id($5p4de),$CONTROL_PAR_POS_Y,0)

set_control_par(get_ui_id($5p4de),$CONTROL_PAR_WIDTH,100)

make_persistent($5p4de)

read_persistent_var($5p4de)

if ($5p4de=1)

$5p4de := $CURRENT_SCRIPT_SLOT+1

end if

set_script_title("MIND CONTROL #" & ($CURRENT_SCRIPT_SLOT+1))

declare ui_button $kjia4

set_text($kjia4,"")

set_control_par(get_ui_id($kjia4),$CONTROL_PAR_HIDE,$doet1)

set_control_par_str(get_ui_id($kjia4),$CONTROL_PAR_PICTURE,"MC_import_btn")

set_control_par_str(get_ui_id($kjia4),$CONTROL_PAR_HELP,"Imports the MIND CONTROL layer settings from an NKI preset.")

set_control_par(get_ui_id($kjia4),$CONTROL_PAR_WIDTH,30)

set_control_par(get_ui_id($kjia4),$CONTROL_PAR_HEIGHT,30)

set_control_par(get_ui_id($kjia4),$CONTROL_PAR_POS_X,577)

set_control_par(get_ui_id($kjia4),$CONTROL_PAR_POS_Y,135)

declare ui_button $pvfly

set_text($pvfly,"")

set_control_par(get_ui_id($pvfly),$CONTROL_PAR_HIDE,$doet1)

set_control_par_str(get_ui_id($pvfly),$CONTROL_PAR_PICTURE,"MC_export_btn")

set_control_par_str(get_ui_id($pvfly),$CONTROL_PAR_HELP,"Exports the MIND CONTROL layer settings to an NKI preset.")

set_control_par(get_ui_id($pvfly),$CONTROL_PAR_WIDTH,30)

set_control_par(get_ui_id($pvfly),$CONTROL_PAR_HEIGHT,30)

set_control_par(get_ui_id($pvfly),$CONTROL_PAR_POS_X,542)

set_control_par(get_ui_id($pvfly),$CONTROL_PAR_POS_Y,135)

declare ui_label $x23su(0, 0)

set_text($x23su,"")

set_control_par(get_ui_id($x23su),$CONTROL_PAR_HIDE,$doet1)

set_control_par(get_ui_id($x23su),$CONTROL_PAR_POS_X,60)

set_control_par(get_ui_id($x23su),$CONTROL_PAR_POS_Y,139)

set_control_par(get_ui_id($x23su),$CONTROL_PAR_TEXTPOS_Y,4)

set_control_par(get_ui_id($x23su),$CONTROL_PAR_WIDTH,475)

set_control_par(get_ui_id($x23su),$CONTROL_PAR_HEIGHT,24)

declare %0nofb[32768]

declare %mkc5x[32768]

declare %iww2l[500]

%iww2l[1] := ($ta4pl+2)*$gpxi5-1

declare ui_label $j3mau(0, 0)

set_control_par_str(get_ui_id($j3mau),$CONTROL_PAR_PICTURE,"MC_decal")

set_control_par(get_ui_id($j3mau),$CONTROL_PAR_POS_X,650/2-(104/2))

set_control_par(get_ui_id($j3mau),$CONTROL_PAR_POS_Y,145)

set_control_par_str(get_ui_id($j3mau),$CONTROL_PAR_TEXT,"")

$ihgmo := 100000/$kn4yi

$gfsjw := 0

while ($gfsjw<$kn4yi)

if ($m2jdq>=($gfsjw*$ihgmo))

$pwtnk := $gfsjw+1

end if

inc($gfsjw)

end while

select ($pwtnk)

case 1 to 9

set_knob_label($m2jdq,"      " & $pwtnk)

case 10 to 99

set_knob_label($m2jdq,"     " & $pwtnk)

case 100 to 999

set_knob_label($m2jdq,"    " & $pwtnk)

end select

if ($3etzh # $pwtnk or ($0omyq=$jbupn))

$3etzh := $pwtnk

$thpua := $pwtnk-1

$wllju := %jiovc[$r5dci+($thpua*$gpxi5)]

set_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE,%jiovc[$r2f0l+($thpua*$gpxi5)])

set_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE,%jiovc[$pepwq+($thpua*$gpxi5)])

set_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE,%jiovc[$znbmx+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE,%jiovc[$kaazb+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE,%jiovc[$kr34h+($thpua*$gpxi5)])

select ($wllju+1)

case 0 to 9

set_knob_label($wllju,"   " & "00" & ($wllju+1))

case 10 to 99

set_knob_label($wllju,"   " & "0" & ($wllju+1))

case 100 to 999

set_knob_label($wllju,"    " & ($wllju+1))

end select

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

$0omyq := $yv34f

end if

$gfsjw := $cme4o

%r3mpm[3+($gfsjw*18)+(0*6)] := $kn4yi

%r3mpm[3+($gfsjw*18)+(1*6)] := $kn4yi

select ($wllju+1)

case 0 to 9

set_knob_label($wllju,"   " & "00" & ($wllju+1))

case 10 to 99

set_knob_label($wllju,"   " & "0" & ($wllju+1))

case 100 to 999

set_knob_label($wllju,"    " & ($wllju+1))

end select

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

$wllju := %jiovc[$r5dci+($thpua*$gpxi5)]

set_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE,%jiovc[$r2f0l+($thpua*$gpxi5)])

set_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE,%jiovc[$pepwq+($thpua*$gpxi5)])

set_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE,%jiovc[$znbmx+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE,%jiovc[$kaazb+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE,%jiovc[$kr34h+($thpua*$gpxi5)])

select ($wllju+1)

case 0 to 9

set_knob_label($wllju,"   " & "00" & ($wllju+1))

case 10 to 99

set_knob_label($wllju,"   " & "0" & ($wllju+1))

case 100 to 999

set_knob_label($wllju,"    " & ($wllju+1))

end select

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

message("")

make_perfview

end on

 

function refresh_value

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

end function

 

on ui_control($kjia4)

if ($kjia4=0)

$kjia4 := 1

exit

end if

$gfsjw := 0

while ($gfsjw<=32767)

%0nofb[$gfsjw] := 0

%mkc5x[$gfsjw] := 0

inc($gfsjw)

end while

set_text($x23su,"Calibrating delay...")

set_midi(0,$MIDI_COMMAND_CC,127,127)

wait(100000)

set_midi(0,$MIDI_COMMAND_NRPN,2,1)

$gfsjw := 0

while (%CC[127] # 0 and ($gfsjw<100000))

inc($gfsjw)

wait(1)

end while

$c5pog := $gfsjw

if ($c5pog>=100000 or ($c5pog=0))

set_text($x23su,"ERROR: Preset NKI not found!")

$kjia4 := 0

exit

end if

set_midi(0,$MIDI_COMMAND_NRPN,1,1)

wait($c5pog)

$gfsjw := 0

while (%CC[127] # 0)

$2t004 := %CC[125]*128+%CC[126]-8192

%0nofb[$gfsjw] := $2t004

%mkc5x[$gfsjw] := %CC[127]

inc($gfsjw)

set_text($x23su,"Receiving data... (" & ($gfsjw*14/8) & " bytes)")

wait(100)

end while

set_text($x23su,"Parsing data...")

$gfsjw := 0

while ($gfsjw<=32767)

if (%mkc5x[$gfsjw]=1)

%jiovc[$gfsjw-search(%mkc5x,1)] := %0nofb[$gfsjw]

end if

if (%mkc5x[$gfsjw]=2)

$kn4yi := %0nofb[$gfsjw]

end if

inc($gfsjw)

end while

set_text($x23su,"Preset loaded!")

$kjia4 := 0

$ihgmo := 100000/$kn4yi

$gfsjw := 0

while ($gfsjw<$kn4yi)

if ($m2jdq>=($gfsjw*$ihgmo))

$pwtnk := $gfsjw+1

end if

inc($gfsjw)

end while

select ($pwtnk)

case 1 to 9

set_knob_label($m2jdq,"      " & $pwtnk)

case 10 to 99

set_knob_label($m2jdq,"     " & $pwtnk)

case 100 to 999

set_knob_label($m2jdq,"    " & $pwtnk)

end select

if ($3etzh # $pwtnk or ($0omyq=$jbupn))

$3etzh := $pwtnk

$thpua := $pwtnk-1

$wllju := %jiovc[$r5dci+($thpua*$gpxi5)]

set_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE,%jiovc[$r2f0l+($thpua*$gpxi5)])

set_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE,%jiovc[$pepwq+($thpua*$gpxi5)])

set_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE,%jiovc[$znbmx+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE,%jiovc[$kaazb+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE,%jiovc[$kr34h+($thpua*$gpxi5)])

select ($wllju+1)

case 0 to 9

set_knob_label($wllju,"   " & "00" & ($wllju+1))

case 10 to 99

set_knob_label($wllju,"   " & "0" & ($wllju+1))

case 100 to 999

set_knob_label($wllju,"    " & ($wllju+1))

end select

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

$0omyq := $yv34f

end if

$gfsjw := $cme4o

%r3mpm[3+($gfsjw*18)+(0*6)] := $kn4yi

%r3mpm[3+($gfsjw*18)+(1*6)] := $kn4yi

select ($wllju+1)

case 0 to 9

set_knob_label($wllju,"   " & "00" & ($wllju+1))

case 10 to 99

set_knob_label($wllju,"   " & "0" & ($wllju+1))

case 100 to 999

set_knob_label($wllju,"    " & ($wllju+1))

end select

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

$wllju := %jiovc[$r5dci+($thpua*$gpxi5)]

set_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE,%jiovc[$r2f0l+($thpua*$gpxi5)])

set_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE,%jiovc[$pepwq+($thpua*$gpxi5)])

set_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE,%jiovc[$znbmx+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE,%jiovc[$kaazb+($thpua*$gpxi5)])

set_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE,%jiovc[$kr34h+($thpua*$gpxi5)])

select ($wllju+1)

case 0 to 9

set_knob_label($wllju,"   " & "00" & ($wllju+1))

case 10 to 99

set_knob_label($wllju,"   " & "0" & ($wllju+1))

case 100 to 999

set_knob_label($wllju,"    " & ($wllju+1))

end select

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

end on

 

on ui_control($pvfly)

if ($pvfly=0)

$pvfly := 1

exit

end if

%iww2l[1] := ($kn4yi+2)*$gpxi5

set_text($x23su,"Calibrating delay...")

set_midi(0,$MIDI_COMMAND_CC,127,127)

wait(100000)

set_midi(0,$MIDI_COMMAND_NRPN,2,1)

$gfsjw := 0

while (%CC[127] # 0 and ($gfsjw<100000))

inc($gfsjw)

wait(1)

end while

$c5pog := $gfsjw

if ($c5pog>=100000 or ($c5pog=0))

set_text($x23su,"ERROR: Preset NKI not found!")

$pvfly := 0

exit

end if

set_text($x23su,"Saving preset...")

set_midi(0,$MIDI_COMMAND_CC,127,127)

set_midi(0,$MIDI_COMMAND_NRPN,3,1)

set_midi(0,$MIDI_COMMAND_NRPN,4,(%iww2l[1]+2)/10)

$l43yr := $3o3xx+8192

$ktcgs := $l43yr/128

$uhds0 := $l43yr mod 128

set_midi(0,$MIDI_COMMAND_CC,125,$ktcgs)

set_midi(0,$MIDI_COMMAND_CC,126,$uhds0)

wait(100)

$gfsjw := 1

set_midi(0,$MIDI_COMMAND_CC,127,$gfsjw)

$ondkz := 0

while ($ondkz<=%iww2l[$gfsjw])

$l43yr := %jiovc[$ondkz]+8192

$ktcgs := $l43yr/128

$uhds0 := $l43yr mod 128

set_midi(0,$MIDI_COMMAND_CC,125,$ktcgs)

set_midi(0,$MIDI_COMMAND_CC,126,$uhds0)

wait(100)

inc($ondkz)

end while

$gfsjw := 2

set_midi(0,$MIDI_COMMAND_CC,127,$gfsjw)

$l43yr := $kn4yi+8192

$ktcgs := $l43yr/128

$uhds0 := $l43yr mod 128

set_midi(0,$MIDI_COMMAND_CC,125,$ktcgs)

set_midi(0,$MIDI_COMMAND_CC,126,$uhds0)

wait(100)

set_midi(0,$MIDI_COMMAND_CC,127,0)

set_text($x23su,"Preset saved!")

$pvfly := 0

end on

 

on ui_control($rwqrn)

set_control_par(get_ui_id($pepg2),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($m2jdq),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($0omyq),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($uknd1),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($zehkm),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($wllju),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($qzgmb),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(get_ui_id($f14dt),$CONTROL_PAR_HIDE,%ro1fv[$rwqrn+2])

set_control_par(%wmaua[0],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn+2])

set_control_par(%wmaua[1],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn+2])

set_control_par(%wmaua[2],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn+2])

set_control_par(%wmaua[3],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn+2])

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par(%mmjf5[1+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn+2])

set_control_par(%mmjf5[3+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

set_control_par(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_HIDE,%ro1fv[$rwqrn])

inc($ondkz)

end while

inc($gfsjw)

end while

set_control_par(get_ui_id($utmvo),$CONTROL_PAR_HIDE,%ro1fv[1-$rwqrn+2])

set_control_par(get_ui_id($5p4de),$CONTROL_PAR_HIDE,%ro1fv[1-$rwqrn])

set_control_par(get_ui_id($kjia4),$CONTROL_PAR_HIDE,%ro1fv[1-$rwqrn])

set_control_par(get_ui_id($pvfly),$CONTROL_PAR_HIDE,%ro1fv[1-$rwqrn])

set_control_par(get_ui_id($x23su),$CONTROL_PAR_HIDE,%ro1fv[1-$rwqrn])

set_text($x23su,"")

end on

 

on ui_control($wixqt)

if ($wixqt=$gvfjx or ($wixqt=$vo2vl))

inc($wixqt)

end if

%jiovc[3*1+(10*(1-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+(0*6)]

%jiovc[3*2+(10*(1-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+(1*6)]

%jiovc[3*3+(10*(1-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+(2*6)]

%jiovc[$r2f0l+($thpua*$gpxi5)] := get_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE)

%jiovc[$pepwq+($thpua*$gpxi5)] := get_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE)

%jiovc[$znbmx+($thpua*$gpxi5)] := get_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE)

%jiovc[$kaazb+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE)

%jiovc[$kr34h+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

end on

 

on ui_control($yeen3)

if ($yeen3=$gvfjx or ($yeen3=$vo2vl))

inc($yeen3)

end if

%jiovc[3*1+(10*(2-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+(0*6)]

%jiovc[3*2+(10*(2-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+(1*6)]

%jiovc[3*3+(10*(2-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+(2*6)]

%jiovc[$r2f0l+($thpua*$gpxi5)] := get_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE)

%jiovc[$pepwq+($thpua*$gpxi5)] := get_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE)

%jiovc[$znbmx+($thpua*$gpxi5)] := get_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE)

%jiovc[$kaazb+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE)

%jiovc[$kr34h+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

end on

 

on ui_control($0rrhd)

if ($0rrhd=$gvfjx or ($0rrhd=$vo2vl))

inc($0rrhd)

end if

%jiovc[3*1+(10*(3-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+(0*6)]

%jiovc[3*2+(10*(3-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+(1*6)]

%jiovc[3*3+(10*(3-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+(2*6)]

%jiovc[$r2f0l+($thpua*$gpxi5)] := get_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE)

%jiovc[$pepwq+($thpua*$gpxi5)] := get_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE)

%jiovc[$znbmx+($thpua*$gpxi5)] := get_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE)

%jiovc[$kaazb+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE)

%jiovc[$kr34h+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

end on

 

on ui_control($yjgxo)

if ($yjgxo=$gvfjx or ($yjgxo=$vo2vl))

inc($yjgxo)

end if

%jiovc[3*1+(10*(4-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+(0*6)]

%jiovc[3*2+(10*(4-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+(1*6)]

%jiovc[3*3+(10*(4-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+(2*6)]

%jiovc[$r2f0l+($thpua*$gpxi5)] := get_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE)

%jiovc[$pepwq+($thpua*$gpxi5)] := get_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE)

%jiovc[$znbmx+($thpua*$gpxi5)] := get_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE)

%jiovc[$kaazb+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE)

%jiovc[$kr34h+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

end on

 

on ui_control($oegob)

if ($oegob=$gvfjx or ($oegob=$vo2vl))

inc($oegob)

end if

%jiovc[3*1+(10*(5-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+(0*6)]

%jiovc[3*2+(10*(5-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+(1*6)]

%jiovc[3*3+(10*(5-1))+($thpua*$gpxi5)] := %r3mpm[4+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+(2*6)]

%jiovc[$r2f0l+($thpua*$gpxi5)] := get_control_par(%mmjf5[$r2f0l],$CONTROL_PAR_VALUE)

%jiovc[$pepwq+($thpua*$gpxi5)] := get_control_par(%mmjf5[$pepwq],$CONTROL_PAR_VALUE)

%jiovc[$znbmx+($thpua*$gpxi5)] := get_control_par(%mmjf5[$znbmx],$CONTROL_PAR_VALUE)

%jiovc[$kaazb+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kaazb],$CONTROL_PAR_VALUE)

%jiovc[$kr34h+($thpua*$gpxi5)] := get_control_par(%mmjf5[$kr34h],$CONTROL_PAR_VALUE)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

if ($neqtg=-1)

set_knob_label($qzgmb," ")

else

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := $qzgmb

$w3nmh := ($w3nmh-0)*($3bcqb-$ondkz)/(100000-0)+$ondkz

if ($w3nmh>=0)

set_knob_label($qzgmb,!mdptv[$w3nmh] & $w3nmh)

else

set_knob_label($qzgmb,!qwzgo[abs($w3nmh)] & $w3nmh)

end if

$55k50 := $w3nmh

end if

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

set_control_par_str(%mmjf5[2+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,!ccaiq[1+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

select (%r3mpm[5+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+($ondkz*6)])

case 1

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"L")

case 0

set_control_par_str(%mmjf5[4+($gfsjw*10)+($ondkz*3)],$CONTROL_PAR_TEXT,"")

end select

inc($ondkz)

end while

inc($gfsjw)

end while

end on

 

on ui_control($3phxm)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$3phxm := $yv34f

else

if ($3phxm=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$3phxm := $jbupn

end if

end if

end on

 

on ui_control($n3x5p)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$n3x5p := $yv34f

else

if ($n3x5p=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$n3x5p := $jbupn

end if

end if

end on

 

on ui_control($inn2b)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$inn2b := $yv34f

else

if ($inn2b=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$inn2b := $jbupn

end if

end if

end on

 

on ui_control($4kgwu)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$4kgwu := $yv34f

else

if ($4kgwu=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$4kgwu := $jbupn

end if

end if

end on

 

on ui_control($dx1lt)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$dx1lt := $yv34f

else

if ($dx1lt=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$dx1lt := $jbupn

end if

end if

end on

 

on ui_control($0kmqt)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$0kmqt := $yv34f

else

if ($0kmqt=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$0kmqt := $jbupn

end if

end if

end on

 

on ui_control($jj3jt)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$jj3jt := $yv34f

else

if ($jj3jt=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$jj3jt := $jbupn

end if

end if

end on

 

on ui_control($ngzw5)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$ngzw5 := $yv34f

else

if ($ngzw5=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$ngzw5 := $jbupn

end if

end if

end on

 

on ui_control($b2ct2)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$b2ct2 := $yv34f

else

if ($b2ct2=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$b2ct2 := $jbupn

end if

end if

end on

 

on ui_control($uizco)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$uizco := $yv34f

else

if ($uizco=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$uizco := $jbupn

end if

end if

end on

 

on ui_control($qftov)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$qftov := $yv34f

else

if ($qftov=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$qftov := $jbupn

end if

end if

end on

 

on ui_control($d2zob)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$d2zob := $yv34f

else

if ($d2zob=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$d2zob := $jbupn

end if

end if

end on

 

on ui_control($wyt2z)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$wyt2z := $yv34f

else

if ($wyt2z=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$wyt2z := $jbupn

end if

end if

end on

 

on ui_control($kch5m)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$kch5m := $yv34f

else

if ($kch5m=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$kch5m := $jbupn

end if

end if

end on

 

on ui_control($w0nwu)

if (%r3mpm[5+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$w0nwu := $yv34f

else

if ($w0nwu=$yv34f)

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

else

$3phxm := $yv34f

$n3x5p := $yv34f

$inn2b := $yv34f

$4kgwu := $yv34f

$dx1lt := $yv34f

$0kmqt := $yv34f

$jj3jt := $yv34f

$ngzw5 := $yv34f

$b2ct2 := $yv34f

$uizco := $yv34f

$qftov := $yv34f

$d2zob := $yv34f

$wyt2z := $yv34f

$kch5m := $yv34f

$w0nwu := $yv34f

$w0nwu := $jbupn

end if

end if

end on

 

on ui_control($qzgmb)

if ($neqtg # -1)

call refresh_value

%jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)] := $55k50

$gfsjw := 0

while ($gfsjw<=4)

$ondkz := 0

while ($ondkz<=2)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(0*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$zrt1z) or (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$ozneo))

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,%jiovc[3*1+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(0*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(1*6)]=$jbupn)

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$a12kq)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!fhsri[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

else

if (get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)=$1e5yd)

if (%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]<0)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!evrr5[abs(%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,!duftm[%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)]])

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,%jiovc[3*2+(10*$gfsjw)+($thpua*$gpxi5)])

end if

end if

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(1*3)],$CONTROL_PAR_TEXT,"")

end if

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*$gfsjw)],$CONTROL_PAR_VALUE)*18)+(2*6)]=$jbupn)

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,%jiovc[3*3+(10*$gfsjw)+($thpua*$gpxi5)])

else

set_control_par_str(%mmjf5[3+($gfsjw*10)+(2*3)],$CONTROL_PAR_TEXT,"")

end if

inc($ondkz)

end while

inc($gfsjw)

end while

end if

end on

 

on ui_control($x2xqe)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$x2xqe := $yv34f

exit

end if

if ($x2xqe=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$x2xqe := $jbupn

$neqtg := 1-1

$2d2af := 1-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($2nser)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$2nser := $yv34f

exit

end if

if ($2nser=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$2nser := $jbupn

$neqtg := 1-1

$2d2af := 2-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($3gahq)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(1-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$3gahq := $yv34f

exit

end if

if ($3gahq=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$3gahq := $jbupn

$neqtg := 1-1

$2d2af := 3-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($jxy1f)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$jxy1f := $yv34f

exit

end if

if ($jxy1f=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$jxy1f := $jbupn

$neqtg := 2-1

$2d2af := 1-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($hsvmh)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$hsvmh := $yv34f

exit

end if

if ($hsvmh=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$hsvmh := $jbupn

$neqtg := 2-1

$2d2af := 2-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($u0cf0)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(2-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$u0cf0 := $yv34f

exit

end if

if ($u0cf0=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$u0cf0 := $jbupn

$neqtg := 2-1

$2d2af := 3-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($qd52c)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$qd52c := $yv34f

exit

end if

if ($qd52c=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$qd52c := $jbupn

$neqtg := 3-1

$2d2af := 1-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($ssxb5)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$ssxb5 := $yv34f

exit

end if

if ($ssxb5=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$ssxb5 := $jbupn

$neqtg := 3-1

$2d2af := 2-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($14amw)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(3-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$14amw := $yv34f

exit

end if

if ($14amw=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$14amw := $jbupn

$neqtg := 3-1

$2d2af := 3-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($42g4i)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$42g4i := $yv34f

exit

end if

if ($42g4i=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$42g4i := $jbupn

$neqtg := 4-1

$2d2af := 1-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($q3pr3)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$q3pr3 := $yv34f

exit

end if

if ($q3pr3=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$q3pr3 := $jbupn

$neqtg := 4-1

$2d2af := 2-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($qxynk)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(4-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$qxynk := $yv34f

exit

end if

if ($qxynk=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$qxynk := $jbupn

$neqtg := 4-1

$2d2af := 3-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($5qmq1)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+((1-1)*6)]=$yv34f)

$5qmq1 := $yv34f

exit

end if

if ($5qmq1=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$5qmq1 := $jbupn

$neqtg := 5-1

$2d2af := 1-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($vqsvk)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+((2-1)*6)]=$yv34f)

$vqsvk := $yv34f

exit

end if

if ($vqsvk=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$vqsvk := $jbupn

$neqtg := 5-1

$2d2af := 2-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0

if ($w3nmh # $ondkz and ($w3nmh # $3bcqb))

inc($l43yr)

end if

$qzgmb := $l43yr

call refresh_value

$3o3xx := $3o3xx

end if

end on

 

on ui_control($2bunx)

if (%r3mpm[0+(get_control_par(%mmjf5[1+(10*(5-1))],$CONTROL_PAR_VALUE)*18)+((3-1)*6)]=$yv34f)

$2bunx := $yv34f

exit

end if

if ($2bunx=$yv34f)

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

call refresh_value

$3o3xx := $3o3xx

else

$neqtg := -1

$2d2af := -1

$x2xqe := $yv34f

$2nser := $yv34f

$3gahq := $yv34f

$jxy1f := $yv34f

$hsvmh := $yv34f

$u0cf0 := $yv34f

$qd52c := $yv34f

$ssxb5 := $yv34f

$14amw := $yv34f

$42g4i := $yv34f

$q3pr3 := $yv34f

$qxynk := $yv34f

$5qmq1 := $yv34f

$vqsvk := $yv34f

$2bunx := $yv34f

$2bunx := $jbupn

$neqtg := 5-1

$2d2af := 3-1

$ondkz := %r3mpm[2+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$3bcqb := %r3mpm[3+(get_control_par(%mmjf5[1+(10*$neqtg)],$CONTROL_PAR_VALUE)*18)+($2d2af*6)]

$w3nmh := %jiovc[3*($2d2af+1)+(10*$neqtg)+($thpua*$gpxi5)]

$l43yr := $w3nmh

$l43yr := ($l43yr-$ondkz)*(100000-0)/($3bcqb-$ondkz)+0