{ Compiled on Sun Oct  8 22:04:01 2017 }
on init
	message("")
	declare $fg4rw
	declare $sm4jx
	declare $hq11w
	declare %vmhqc[128]
	declare $r3j1i
	declare $11yen
	declare $sljtd
	declare %wwmtb[71]
	declare $bgpgp
	declare $ppeur
	set_script_title("Midi-channels Remapper")
	set_ui_height_px(210)
	declare ui_button $ueojd
	set_control_par_str(get_ui_id($ueojd),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Button")
	set_control_par_str(get_ui_id($ueojd),$CONTROL_PAR_TEXT,"")
	set_control_par(get_ui_id($ueojd),$CONTROL_PAR_POS_X,-10)
	set_control_par(get_ui_id($ueojd),$CONTROL_PAR_POS_Y,191)
	set_control_par(get_ui_id($ueojd),$CONTROL_PAR_WIDTH,100)
	set_control_par(get_ui_id($ueojd),$CONTROL_PAR_HEIGHT,20)
	declare %eix3q[4] := (56, 247, 438, 629)
	declare %5ljez[9] := (3, 27, 51, 75, 99, 123, 147, 171, 195)
	declare ui_label $os3ab(1, 1) 
	set_control_par(get_ui_id($os3ab),$CONTROL_PAR_POS_X,0)
	set_control_par(get_ui_id($os3ab),$CONTROL_PAR_POS_Y,0)
	set_control_par(get_ui_id($os3ab),$CONTROL_PAR_WIDTH,628)
	set_control_par(get_ui_id($os3ab),$CONTROL_PAR_HEIGHT,201)
	set_control_par_str(get_ui_id($os3ab),$CONTROL_PAR_TEXT,"")
	set_control_par_str(get_ui_id($os3ab),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "BG")
	declare ui_label $4fkg5(1, 1) 
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_POS_X,%eix3q[0])
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_POS_Y,%5ljez[0])
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_WIDTH,188)
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_HEIGHT,24)
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
	set_control_par_str(get_ui_id($4fkg5),$CONTROL_PAR_TEXT,"Midi Channel Remapping")
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_FONT_TYPE,5)
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($4fkg5),$CONTROL_PAR_TEXTPOS_Y,4)
	declare $mqxss
	declare ui_menu $rxp0s
	make_persistent($rxp0s)
	read_persistent_var($rxp0s)
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_POS_X,%eix3q[0])
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($rxp0s),$CONTROL_PAR_HELP,"Choose type of midi-data to controls channel remapping")
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($rxp0s),$CONTROL_PAR_TEXTPOS_Y,4)
	set_control_par_str(get_ui_id($rxp0s),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	add_menu_item($rxp0s,"CC",0)
	add_menu_item($rxp0s,"KS",1)
	add_menu_item($rxp0s,"Pr.Ch",2)
	declare ui_menu $l5m5f
	make_persistent($l5m5f)
	read_persistent_var($l5m5f)
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_POS_X,%eix3q[0]+94)
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($l5m5f),$CONTROL_PAR_HELP,"Choose how many ports affected by this script")
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($l5m5f),$CONTROL_PAR_TEXTPOS_Y,4)
	set_control_par_str(get_ui_id($l5m5f),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	add_menu_item($l5m5f,"All Ports",0)
	add_menu_item($l5m5f,"Only port A",1)
	add_menu_item($l5m5f,"Only port B",2)
	add_menu_item($l5m5f,"Only port C",3)
	add_menu_item($l5m5f,"Only port D",4)
	add_menu_item($l5m5f,"Ports A to B",5)
	add_menu_item($l5m5f,"Ports A to C",6)
	select ($l5m5f)
		case 1
			$r3j1i := 0
			$11yen := 15
		case 2
			$r3j1i := 16
			$11yen := 31
		case 3
			$r3j1i := 32
			$11yen := 47
		case 2
			$r3j1i := 48
			$11yen := 63
		case 5
			$r3j1i := 0
			$11yen := 31
		case 6
			$r3j1i := 0
			$11yen := 74
		case 0
			$r3j1i := 0
			$11yen := 63
	end select
	declare ui_value_edit $CcNr(1, 127, 1) 
	make_persistent($CcNr)
	read_persistent_var($CcNr)
	set_control_par(get_ui_id($CcNr),$CONTROL_PAR_POS_X,%eix3q[0])
	set_control_par(get_ui_id($CcNr),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($CcNr),$CONTROL_PAR_WIDTH,62)
	set_control_par(get_ui_id($CcNr),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($CcNr),$CONTROL_PAR_HELP,"CC, used for remapping. Minimal value represents channel 1 on the port A. Other ports placed on the values Min + 16 to Min +64. E.g. Channel 1 on the port B will be Min + 16")
	set_control_par(get_ui_id($CcNr),$CONTROL_PAR_FONT_TYPE,10)
	set_control_par(get_ui_id($CcNr),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_label $Range(1, 1) 
	set_control_par(get_ui_id($Range),$CONTROL_PAR_POS_X,%eix3q[0])
	set_control_par(get_ui_id($Range),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($Range),$CONTROL_PAR_WIDTH,62)
	set_control_par(get_ui_id($Range),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($Range),$CONTROL_PAR_HELP,"Range, used for remapping. Minimal value represents channel 1 on the port A. Other ports placed on the values Min + 16 to Min +64. E.g. Channel 1 on the port B will be Min + 16")
	set_control_par(get_ui_id($Range),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($Range),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_value_edit $Min(1, 127, 1) 
	make_persistent($Min)
	$Min := 1
	read_persistent_var($Min)
	set_control_par(get_ui_id($Min),$CONTROL_PAR_POS_X,%eix3q[0]+62)
	set_control_par(get_ui_id($Min),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($Min),$CONTROL_PAR_WIDTH,62)
	set_control_par(get_ui_id($Min),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($Min),$CONTROL_PAR_HELP,"Start position of remap")
	set_control_par(get_ui_id($Min),$CONTROL_PAR_FONT_TYPE,10)
	set_control_par(get_ui_id($Min),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_value_edit $Max(1, 127, 1) 
	make_persistent($Max)
	read_persistent_var($Max)
	$Max := 64
	read_persistent_var($Max)
	set_control_par(get_ui_id($Max),$CONTROL_PAR_POS_X,%eix3q[0]+124)
	set_control_par(get_ui_id($Max),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($Max),$CONTROL_PAR_WIDTH,62)
	set_control_par(get_ui_id($Max),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($Max),$CONTROL_PAR_HELP,"End position of remap")
	set_control_par(get_ui_id($Max),$CONTROL_PAR_FONT_TYPE,10)
	set_control_par(get_ui_id($Max),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_value_edit $yjlb4(0, 127, $VALUE_EDIT_MODE_NOTE_NAMES) 
	make_persistent($yjlb4)
	$yjlb4 := 1
	read_persistent_var($yjlb4)
	set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_POS_X,%eix3q[0]+62)
	set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_WIDTH,62)
	set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($yjlb4),$CONTROL_PAR_TEXT,"Min")
	set_control_par_str(get_ui_id($yjlb4),$CONTROL_PAR_HELP,"Start position of remap")
	set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_FONT_TYPE,10)
	set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_value_edit $lmbol(0, 127, $VALUE_EDIT_MODE_NOTE_NAMES) 
	make_persistent($lmbol)
	read_persistent_var($lmbol)
	$lmbol := 64
	read_persistent_var($lmbol)
	set_control_par(get_ui_id($lmbol),$CONTROL_PAR_POS_X,%eix3q[0]+124)
	set_control_par(get_ui_id($lmbol),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($lmbol),$CONTROL_PAR_WIDTH,62)
	set_control_par(get_ui_id($lmbol),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($lmbol),$CONTROL_PAR_TEXT,"Max")
	set_control_par_str(get_ui_id($lmbol),$CONTROL_PAR_HELP,"End position of remap")
	set_control_par(get_ui_id($lmbol),$CONTROL_PAR_FONT_TYPE,10)
	set_control_par(get_ui_id($lmbol),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_button $kdgjt
	make_persistent($kdgjt)
	read_persistent_var($kdgjt)
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_POS_Y,%5ljez[0])
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_WIDTH,188)
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($kdgjt),$CONTROL_PAR_TEXT,"Duplicate СCs on all Channels")
	set_control_par_str(get_ui_id($kdgjt),$CONTROL_PAR_HELP,"Duplicate all CCs movements to all channels on all ports in the KONTAKT instantion")
	set_control_par_str(get_ui_id($kdgjt),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_duplicate")
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_FONT_TYPE,5)
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($kdgjt),$CONTROL_PAR_TEXTPOS_Y,4)
	declare $iz1y0 := 1
	make_persistent($iz1y0)
	read_persistent_var($iz1y0)
	declare %t2nly[24]
	declare %xtrlv[9]
	make_persistent(%xtrlv)
	read_persistent_var(%xtrlv)
	declare $qxvcq
	make_persistent($qxvcq)
	read_persistent_var($qxvcq)
	declare %kfmds[64]
	declare ui_menu $psqqi
	make_persistent($psqqi)
	read_persistent_var($psqqi)
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($psqqi),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($psqqi),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($psqqi),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($psqqi,"None",-1)
	add_menu_item($psqqi,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($psqqi,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $vq2nm
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($vq2nm),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($vq2nm),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($vq2nm),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($vq2nm),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $ji0kq
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ji0kq),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($ji0kq),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($ji0kq),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ji0kq),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[0] := get_ui_id($psqqi)
	%t2nly[1] := get_ui_id($vq2nm)
	%t2nly[2] := get_ui_id($ji0kq)
	declare %juxkx[9]
	make_persistent(%juxkx)
	read_persistent_var(%juxkx)
	declare $ifleo
	make_persistent($ifleo)
	read_persistent_var($ifleo)
	declare %wk1rq[64]
	declare ui_menu $s1m1r
	make_persistent($s1m1r)
	read_persistent_var($s1m1r)
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($s1m1r),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($s1m1r),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($s1m1r),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($s1m1r,"None",-1)
	add_menu_item($s1m1r,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($s1m1r,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $4rrbn
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($4rrbn),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($4rrbn),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($4rrbn),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($4rrbn),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $zgubp
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($zgubp),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($zgubp),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($zgubp),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($zgubp),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[3] := get_ui_id($s1m1r)
	%t2nly[4] := get_ui_id($4rrbn)
	%t2nly[5] := get_ui_id($zgubp)
	declare %0w0cg[9]
	make_persistent(%0w0cg)
	read_persistent_var(%0w0cg)
	declare $t5rwa
	make_persistent($t5rwa)
	read_persistent_var($t5rwa)
	declare %gfaxy[64]
	declare ui_menu $pjshy
	make_persistent($pjshy)
	read_persistent_var($pjshy)
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_POS_Y,%5ljez[3])
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($pjshy),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($pjshy),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($pjshy),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($pjshy,"None",-1)
	add_menu_item($pjshy,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($pjshy,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $oepih
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_POS_Y,%5ljez[3])
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($oepih),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($oepih),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($oepih),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($oepih),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $egnks
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_POS_Y,%5ljez[3])
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($egnks),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($egnks),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($egnks),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($egnks),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[6] := get_ui_id($pjshy)
	%t2nly[7] := get_ui_id($oepih)
	%t2nly[8] := get_ui_id($egnks)
	declare %dswcz[9]
	make_persistent(%dswcz)
	read_persistent_var(%dswcz)
	declare $x3cuq
	make_persistent($x3cuq)
	read_persistent_var($x3cuq)
	declare %p52vu[64]
	declare ui_menu $bmaa1
	make_persistent($bmaa1)
	read_persistent_var($bmaa1)
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_POS_Y,%5ljez[4])
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($bmaa1),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($bmaa1),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($bmaa1),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($bmaa1,"None",-1)
	add_menu_item($bmaa1,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($bmaa1,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $ebibk
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_POS_Y,%5ljez[4])
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ebibk),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($ebibk),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($ebibk),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ebibk),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $ial5g
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_POS_Y,%5ljez[4])
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ial5g),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($ial5g),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($ial5g),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ial5g),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[9] := get_ui_id($bmaa1)
	%t2nly[10] := get_ui_id($ebibk)
	%t2nly[11] := get_ui_id($ial5g)
	declare %abq1p[9]
	make_persistent(%abq1p)
	read_persistent_var(%abq1p)
	declare $pw0db
	make_persistent($pw0db)
	read_persistent_var($pw0db)
	declare %klvc4[64]
	declare ui_menu $vdkem
	make_persistent($vdkem)
	read_persistent_var($vdkem)
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_POS_Y,%5ljez[5])
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($vdkem),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($vdkem),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($vdkem),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($vdkem,"None",-1)
	add_menu_item($vdkem,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($vdkem,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $yu0aj
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_POS_Y,%5ljez[5])
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($yu0aj),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($yu0aj),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($yu0aj),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($yu0aj),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $vim2k
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_POS_Y,%5ljez[5])
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($vim2k),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($vim2k),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($vim2k),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($vim2k),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[12] := get_ui_id($vdkem)
	%t2nly[13] := get_ui_id($yu0aj)
	%t2nly[14] := get_ui_id($vim2k)
	declare %rkvvz[9]
	make_persistent(%rkvvz)
	read_persistent_var(%rkvvz)
	declare $vq0nm
	make_persistent($vq0nm)
	read_persistent_var($vq0nm)
	declare %gvlwp[64]
	declare ui_menu $b3gse
	make_persistent($b3gse)
	read_persistent_var($b3gse)
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_POS_Y,%5ljez[6])
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($b3gse),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($b3gse),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($b3gse),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($b3gse,"None",-1)
	add_menu_item($b3gse,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($b3gse,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $sdykd
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_POS_Y,%5ljez[6])
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($sdykd),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($sdykd),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($sdykd),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($sdykd),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $ptcjy
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_POS_Y,%5ljez[6])
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ptcjy),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($ptcjy),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($ptcjy),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ptcjy),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[15] := get_ui_id($b3gse)
	%t2nly[16] := get_ui_id($sdykd)
	%t2nly[17] := get_ui_id($ptcjy)
	declare %nwmyg[9]
	make_persistent(%nwmyg)
	read_persistent_var(%nwmyg)
	declare $orsds
	make_persistent($orsds)
	read_persistent_var($orsds)
	declare %n20pn[64]
	declare ui_menu $zasdd
	make_persistent($zasdd)
	read_persistent_var($zasdd)
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($zasdd),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($zasdd),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($zasdd),$CONTROL_PAR_TEXTPOS_Y,4)
	add_menu_item($zasdd,"None",-1)
	add_menu_item($zasdd,"All",0)
	$fg4rw := 1
	while ($fg4rw<=127)
		add_menu_item($zasdd,$fg4rw,$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $gj1ot
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_POS_X,%eix3q[1]+94)
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_WIDTH,70)
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($gj1ot),$CONTROL_PAR_HELP,"Select options for this CC")
	set_control_par_str(get_ui_id($gj1ot),$CONTROL_PAR_TEXT,"Options")
	set_control_par_str(get_ui_id($gj1ot),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_button")
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($gj1ot),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $ulpy3
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_POS_X,%eix3q[1]+94+94-24)
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ulpy3),$CONTROL_PAR_HELP,"Delete CC from the stack")
	set_control_par_str(get_ui_id($ulpy3),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par_str(get_ui_id($ulpy3),$CONTROL_PAR_TEXT,"X")
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ulpy3),$CONTROL_PAR_TEXTPOS_Y,4)
	%t2nly[18] := get_ui_id($zasdd)
	%t2nly[19] := get_ui_id($gj1ot)
	%t2nly[20] := get_ui_id($ulpy3)
	declare ui_button $x5mel
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_POS_X,%eix3q[1])
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_POS_Y,%5ljez[$iz1y0+1])
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_WIDTH,188)
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($x5mel),$CONTROL_PAR_TEXT,"Add Controller")
	set_control_par_str(get_ui_id($x5mel),$CONTROL_PAR_HELP,"Add Controller to the copy stack. Be very careful! You can add several option of 'All CCs' with different options, but there is not protection from the idiot")
	set_control_par_str(get_ui_id($x5mel),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Big_buttons")
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_TEXTPOS_Y,4)
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	declare ui_label $f25m0(1, 1) 
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_POS_Y,%5ljez[0])
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($f25m0),$CONTROL_PAR_TEXT,"Options")
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_FONT_TYPE,5)
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_TEXTPOS_Y,4)
	set_control_par(get_ui_id($f25m0),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
	declare !pel4n[4]
	!pel4n[0] := "Port A Ch"
	!pel4n[1] := "Port B Ch"
	!pel4n[2] := "Port C Ch"
	!pel4n[3] := "Port D Ch"
	declare $3e5hu
	declare %mdxu0[16]
	declare ui_menu $plc51
	make_persistent($plc51)
	read_persistent_var($plc51)
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($plc51),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($plc51),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($plc51),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($plc51),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($plc51,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $4tdq1
	make_persistent($4tdq1)
	read_persistent_var($4tdq1)
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_POS_Y,%5ljez[1])
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($4tdq1),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($4tdq1),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($4tdq1),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($4tdq1),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[0] := get_ui_id($plc51)
	%mdxu0[1] := get_ui_id($4tdq1)
	declare ui_menu $f41zv
	make_persistent($f41zv)
	read_persistent_var($f41zv)
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($f41zv),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($f41zv),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($f41zv),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($f41zv),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($f41zv,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $aksxa
	make_persistent($aksxa)
	read_persistent_var($aksxa)
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_POS_Y,%5ljez[2])
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($aksxa),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($aksxa),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($aksxa),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($aksxa),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[2] := get_ui_id($f41zv)
	%mdxu0[3] := get_ui_id($aksxa)
	declare ui_menu $mhujk
	make_persistent($mhujk)
	read_persistent_var($mhujk)
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_POS_Y,%5ljez[3])
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($mhujk),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($mhujk),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($mhujk),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($mhujk),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($mhujk,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $jvlmm
	make_persistent($jvlmm)
	read_persistent_var($jvlmm)
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_POS_Y,%5ljez[3])
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($jvlmm),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($jvlmm),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($jvlmm),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($jvlmm),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[4] := get_ui_id($mhujk)
	%mdxu0[5] := get_ui_id($jvlmm)
	declare ui_menu $ds2bq
	make_persistent($ds2bq)
	read_persistent_var($ds2bq)
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_POS_Y,%5ljez[4])
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ds2bq),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($ds2bq),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($ds2bq),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ds2bq),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($ds2bq,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $qyytf
	make_persistent($qyytf)
	read_persistent_var($qyytf)
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_POS_Y,%5ljez[4])
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($qyytf),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($qyytf),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($qyytf),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($qyytf),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[6] := get_ui_id($ds2bq)
	%mdxu0[7] := get_ui_id($qyytf)
	declare ui_menu $2eux4
	make_persistent($2eux4)
	read_persistent_var($2eux4)
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_POS_Y,%5ljez[5])
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($2eux4),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($2eux4),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($2eux4),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($2eux4),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($2eux4,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $bdep4
	make_persistent($bdep4)
	read_persistent_var($bdep4)
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_POS_Y,%5ljez[5])
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($bdep4),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($bdep4),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($bdep4),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($bdep4),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[8] := get_ui_id($2eux4)
	%mdxu0[9] := get_ui_id($bdep4)
	declare ui_menu $qymue
	make_persistent($qymue)
	read_persistent_var($qymue)
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_POS_Y,%5ljez[6])
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($qymue),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($qymue),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($qymue),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($qymue),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($qymue,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $shsm4
	make_persistent($shsm4)
	read_persistent_var($shsm4)
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_POS_Y,%5ljez[6])
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($shsm4),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($shsm4),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($shsm4),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($shsm4),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[10] := get_ui_id($qymue)
	%mdxu0[11] := get_ui_id($shsm4)
	declare ui_menu $ngbni
	make_persistent($ngbni)
	read_persistent_var($ngbni)
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_WIDTH,164)
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ngbni),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($ngbni),$CONTROL_PAR_TEXT,"Ch")
	set_control_par_str(get_ui_id($ngbni),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Opt_menu")
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ngbni),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		add_menu_item($ngbni,!pel4n[$fg4rw/16] & ($fg4rw mod 16+1),$fg4rw)
		inc($fg4rw)
	end while
	declare ui_button $4qsnv
	make_persistent($4qsnv)
	read_persistent_var($4qsnv)
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_POS_X,%eix3q[2]+188-24)
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_WIDTH,24)
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($4qsnv),$CONTROL_PAR_HELP,"Choose which CCs will be duplicated")
	set_control_par_str(get_ui_id($4qsnv),$CONTROL_PAR_TEXT,"X")
	set_control_par_str(get_ui_id($4qsnv),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "X_button")
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($4qsnv),$CONTROL_PAR_TEXTPOS_Y,4)
	%mdxu0[12] := get_ui_id($ngbni)
	%mdxu0[13] := get_ui_id($4qsnv)
	declare ui_menu $ngpxy
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_POS_X,%eix3q[2]+94)
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_POS_Y,%5ljez[0])
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($ngpxy),$CONTROL_PAR_HELP,"You can choose type of filters for the selected CC. With the ONLY function CC will be duplicated only to the selected channels. With the IGRONE - CC will be duplicated on all channels except the chosen")
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_TEXTPOS_Y,4)
	set_control_par_str(get_ui_id($ngpxy),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "CC_menu")
	add_menu_item($ngpxy,"Ignore:",0)
	add_menu_item($ngpxy,"Only:",1)
	declare ui_button $gmomf
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_POS_X,%eix3q[2])
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_POS_Y,%5ljez[$3e5hu+1])
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_WIDTH,188)
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($gmomf),$CONTROL_PAR_TEXT,"Add Option")
	set_control_par_str(get_ui_id($gmomf),$CONTROL_PAR_HELP,"You can add filters for individual channels with this function. ")
	set_control_par_str(get_ui_id($gmomf),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Big_buttons")
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $3wyx3
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_POS_X,%eix3q[0])
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($3wyx3),$CONTROL_PAR_TEXT,"Copy")
	set_control_par_str(get_ui_id($3wyx3),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Half_button")
	set_control_par_str(get_ui_id($3wyx3),$CONTROL_PAR_HELP,"Copy preset for pasting it into the another instance of KONTAKT")
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($3wyx3),$CONTROL_PAR_TEXTPOS_Y,4)
	declare ui_button $bmyxn
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_POS_X,%eix3q[0]+94)
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_POS_Y,%5ljez[7])
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_WIDTH,94)
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_HEIGHT,24)
	set_control_par_str(get_ui_id($bmyxn),$CONTROL_PAR_TEXT,"Paste")
	set_control_par_str(get_ui_id($bmyxn),$CONTROL_PAR_PICTURE,"/Pianoist/Remapper/" & "Half_button")
	set_control_par_str(get_ui_id($bmyxn),$CONTROL_PAR_HELP,"Paste preset, previously copied from another instance of KONTAKT")
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_FONT_TYPE,17)
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_TEXT_ALIGNMENT,1)
	set_control_par(get_ui_id($bmyxn),$CONTROL_PAR_TEXTPOS_Y,4)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
	if ($rxp0s=0)
		set_control_par(get_ui_id($CcNr),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($Range),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
	else
		set_control_par(get_ui_id($CcNr),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($Range),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
	end if
	if ($rxp0s=1)
		set_control_par(get_ui_id($Min),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($Max),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($lmbol),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
	else
		set_control_par(get_ui_id($Min),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($Max),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($lmbol),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
	end if
	if ($kdgjt=1)
		if ($iz1y0<7)
			set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
		else
			set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		end if
		$fg4rw := 0
		while ($fg4rw<=6)
			if ($fg4rw+1<=$iz1y0)
				set_control_par(%t2nly[$fg4rw*3],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				set_control_par(%t2nly[$fg4rw*3+2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(%t2nly[$fg4rw*3],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				set_control_par(%t2nly[$fg4rw*3+2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			inc($fg4rw)
		end while
	else
		$mqxss := 0
		$fg4rw := 0
		while ($fg4rw<=6)
			set_control_par(%t2nly[$fg4rw*3],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_VALUE,0)
			set_control_par(%t2nly[$fg4rw*3+2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			inc($fg4rw)
		end while
		set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
	end if
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_POS_Y,%5ljez[$iz1y0+1])
	select ($mqxss)
		case 0
			$fg4rw := 0
			while ($fg4rw<=6)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				inc($fg4rw)
			end while
			set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		case 1
			if (1>=1)
				if ($3e5hu<7)
					set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				if ($3e5hu<8)
					set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				$fg4rw := 0
				while ($fg4rw<=6)
					if ($fg4rw+1<=$3e5hu)
						set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
						set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					else
						set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
						set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					end if
					inc($fg4rw)
				end while
			end if
		case 2
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 3
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 4
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 5
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 6
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 7
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
	end select
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_POS_Y,%5ljez[$3e5hu+1])
end on
function RemapPortsFunc
	select ($l5m5f)
		case 1
			$r3j1i := 0
			$11yen := 15
		case 2
			$r3j1i := 16
			$11yen := 31
		case 3
			$r3j1i := 32
			$11yen := 47
		case 2
			$r3j1i := 48
			$11yen := 63
		case 5
			$r3j1i := 0
			$11yen := 31
		case 6
			$r3j1i := 0
			$11yen := 74
		case 0
			$r3j1i := 0
			$11yen := 63
	end select
end function
function SetChannel
	if ($hq11w<=$Max)
		$sljtd := $hq11w-$Min
	end if
end function
function RenderPage
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
	if ($rxp0s=0)
		set_control_par(get_ui_id($CcNr),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($Range),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
	else
		set_control_par(get_ui_id($CcNr),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($Range),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
	end if
	if ($rxp0s=1)
		set_control_par(get_ui_id($Min),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($Max),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($lmbol),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
	else
		set_control_par(get_ui_id($Min),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($Max),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
		set_control_par(get_ui_id($yjlb4),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		set_control_par(get_ui_id($lmbol),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
	end if
	if ($kdgjt=1)
		if ($iz1y0<7)
			set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
		else
			set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		end if
		$fg4rw := 0
		while ($fg4rw<=6)
			if ($fg4rw+1<=$iz1y0)
				set_control_par(%t2nly[$fg4rw*3],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				set_control_par(%t2nly[$fg4rw*3+2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(%t2nly[$fg4rw*3],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				set_control_par(%t2nly[$fg4rw*3+2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			inc($fg4rw)
		end while
	else
		$mqxss := 0
		$fg4rw := 0
		while ($fg4rw<=6)
			set_control_par(%t2nly[$fg4rw*3],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			set_control_par(%t2nly[$fg4rw*3+1],$CONTROL_PAR_VALUE,0)
			set_control_par(%t2nly[$fg4rw*3+2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			inc($fg4rw)
		end while
		set_control_par(get_ui_id($x5mel),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
	end if
	set_control_par(get_ui_id($x5mel),$CONTROL_PAR_POS_Y,%5ljez[$iz1y0+1])
	select ($mqxss)
		case 0
			$fg4rw := 0
			while ($fg4rw<=6)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				inc($fg4rw)
			end while
			set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
		case 1
			if (1>=1)
				if ($3e5hu<7)
					set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				if ($3e5hu<8)
					set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				$fg4rw := 0
				while ($fg4rw<=6)
					if ($fg4rw+1<=$3e5hu)
						set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
						set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					else
						set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
						set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					end if
					inc($fg4rw)
				end while
			end if
		case 2
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 3
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 4
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 5
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 6
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
		case 7
			if ($3e5hu<7)
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($gmomf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			if ($3e5hu<8)
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
			else
				set_control_par(get_ui_id($ngpxy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
			end if
			$fg4rw := 0
			while ($fg4rw<=6)
				if ($fg4rw+1<=$3e5hu)
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
				else
					set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
					set_control_par(%mdxu0[$fg4rw*2+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
				end if
				inc($fg4rw)
			end while
	end select
	set_control_par(get_ui_id($gmomf),$CONTROL_PAR_POS_Y,%5ljez[$3e5hu+1])
end function
on ui_control($l5m5f)
	call RemapPortsFunc
end on
on ui_control($ngpxy)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
	select ($mqxss)
		case 1
			%xtrlv[1] := $ngpxy
		case 2
			%juxkx[1] := $ngpxy
		case 3
			%0w0cg[1] := $ngpxy
		case 4
			%dswcz[1] := $ngpxy
		case 5
			%abq1p[1] := $ngpxy
		case 6
			%rkvvz[1] := $ngpxy
		case 7
			%nwmyg[1] := $ngpxy
	end select
end on
on ui_control($gmomf)
	$gmomf := 0
	inc($3e5hu)
	select ($mqxss)
		case 1
			%xtrlv[0] := $3e5hu
		case 2
			%juxkx[0] := $3e5hu
		case 3
			%0w0cg[0] := $3e5hu
		case 4
			%dswcz[0] := $3e5hu
		case 5
			%abq1p[0] := $3e5hu
		case 6
			%rkvvz[0] := $3e5hu
		case 7
			%nwmyg[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($x5mel)
	$x5mel := 0
	inc($iz1y0)
	call RenderPage
end on
on ui_control($kdgjt)
	call RenderPage
end on
on ui_control($rxp0s)
	call RenderPage
end on
on ui_control($Min)
	$yjlb4 := $Min
end on
on ui_control($Max)
	$lmbol := $Max
end on
on ui_control($yjlb4)
	$Min := $yjlb4
end on
on ui_control($lmbol)
	$Max := $lmbol
end on
on ui_control($3wyx3)
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[$fg4rw] := %xtrlv[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[7] := $qxvcq
	%wwmtb[8] := $psqqi
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[9+$fg4rw] := %juxkx[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[16] := $ifleo
	%wwmtb[17] := $s1m1r
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[18+$fg4rw] := %0w0cg[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[25] := $t5rwa
	%wwmtb[26] := $pjshy
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[27+$fg4rw] := %dswcz[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[34] := $x3cuq
	%wwmtb[35] := $bmaa1
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[36+$fg4rw] := %abq1p[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[43] := $pw0db
	%wwmtb[44] := $vdkem
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[45+$fg4rw] := %rkvvz[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[52] := $vq0nm
	%wwmtb[53] := $b3gse
	$fg4rw := 0
	while ($fg4rw<8)
		%wwmtb[54+$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	%wwmtb[61] := $orsds
	%wwmtb[62] := $zasdd
	%wwmtb[64] := $rxp0s
	%wwmtb[65] := $l5m5f
	%wwmtb[66] := $CcNr
	%wwmtb[67] := $Min
	%wwmtb[68] := $Max
	%wwmtb[69] := $kdgjt
	%wwmtb[70] := $iz1y0
	$bgpgp := save_array(%wwmtb,1)
end on
on ui_control($bmyxn)
	$ppeur := load_array(%wwmtb,1)
end on
on async_complete
	if ($NI_ASYNC_ID=$bgpgp)
		$3wyx3 := 0
	end if
	if ($NI_ASYNC_ID=$ppeur)
		$bmyxn := 0
		$fg4rw := 0
		while ($fg4rw<8)
			%xtrlv[$fg4rw] := %wwmtb[$fg4rw]
			inc($fg4rw)
		end while
		$qxvcq := %wwmtb[7]
		$psqqi := %wwmtb[8]
		$fg4rw := 0
		while ($fg4rw<8)
			%juxkx[$fg4rw] := %wwmtb[9+$fg4rw]
			inc($fg4rw)
		end while
		$ifleo := %wwmtb[16]
		$s1m1r := %wwmtb[17]
		$fg4rw := 0
		while ($fg4rw<8)
			%0w0cg[$fg4rw] := %wwmtb[18+$fg4rw]
			inc($fg4rw)
		end while
		$t5rwa := %wwmtb[25]
		$pjshy := %wwmtb[26]
		$fg4rw := 0
		while ($fg4rw<8)
			%dswcz[$fg4rw] := %wwmtb[27+$fg4rw]
			inc($fg4rw)
		end while
		$x3cuq := %wwmtb[34]
		$bmaa1 := %wwmtb[35]
		$fg4rw := 0
		while ($fg4rw<8)
			%abq1p[$fg4rw] := %wwmtb[36+$fg4rw]
			inc($fg4rw)
		end while
		$pw0db := %wwmtb[43]
		$vdkem := %wwmtb[44]
		$fg4rw := 0
		while ($fg4rw<8)
			%rkvvz[$fg4rw] := %wwmtb[45+$fg4rw]
			inc($fg4rw)
		end while
		$vq0nm := %wwmtb[52]
		$b3gse := %wwmtb[53]
		$fg4rw := 0
		while ($fg4rw<8)
			%nwmyg[$fg4rw] := %wwmtb[54+$fg4rw]
			inc($fg4rw)
		end while
		$orsds := %wwmtb[61]
		$zasdd := %wwmtb[62]
		$rxp0s := %wwmtb[64]
		$l5m5f := %wwmtb[65]
		$CcNr := %wwmtb[66]
		$Min := %wwmtb[67]
		$Max := %wwmtb[68]
		$kdgjt := %wwmtb[69]
		$iz1y0 := %wwmtb[70]
		call RenderPage
	end if
end on
on midi_in
	if ($rxp0s=0)
		if ($MIDI_BYTE_1=$CcNr and ($MIDI_COMMAND=$MIDI_COMMAND_CC))
			ignore_midi
			$hq11w := $MIDI_BYTE_2
			call SetChannel
			exit
		end if
	end if
	if ($rxp0s=1)
		if ($MIDI_COMMAND=$MIDI_COMMAND_NOTE_ON or ($MIDI_COMMAND=$MIDI_COMMAND_NOTE_OFF))
			if (in_range($MIDI_BYTE_1,$Min,$Max))
				ignore_midi
				$hq11w := $MIDI_BYTE_1
				call SetChannel
				exit
			end if
		end if
	end if
	if ($rxp0s=2)
		if ($MIDI_COMMAND=$MIDI_COMMAND_PROGRAM_CHANGE)
			if (in_range($MIDI_BYTE_1,$Min,$Max))
				ignore_midi
				$hq11w := $MIDI_BYTE_1
				call SetChannel
				exit
			end if
		end if
	end if
	if (in_range($sljtd,$r3j1i,$11yen))
		ignore_midi
		if ($MIDI_COMMAND=$MIDI_COMMAND_CC)
			if ($kdgjt=1)
				if (1<=$iz1y0)
					select ($psqqi)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%xtrlv[1]=0)
									if (%xtrlv[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%xtrlv[0])
											if (%xtrlv[$sm4jx+2] # $fg4rw and (%kfmds[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%kfmds[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%xtrlv[0])
										if (%xtrlv[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$psqqi)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%xtrlv[1]=0)
										if (%xtrlv[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%xtrlv[0])
												if (%xtrlv[$sm4jx+2] # $fg4rw and (%kfmds[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%kfmds[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%xtrlv[0])
											if (%xtrlv[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
			if ($kdgjt=1)
				if (2<=$iz1y0)
					select ($s1m1r)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%juxkx[1]=0)
									if (%juxkx[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%juxkx[0])
											if (%juxkx[$sm4jx+2] # $fg4rw and (%wk1rq[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%wk1rq[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%juxkx[0])
										if (%juxkx[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$s1m1r)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%juxkx[1]=0)
										if (%juxkx[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%juxkx[0])
												if (%juxkx[$sm4jx+2] # $fg4rw and (%wk1rq[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%wk1rq[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%juxkx[0])
											if (%juxkx[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
			if ($kdgjt=1)
				if (3<=$iz1y0)
					select ($pjshy)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%0w0cg[1]=0)
									if (%0w0cg[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%0w0cg[0])
											if (%0w0cg[$sm4jx+2] # $fg4rw and (%gfaxy[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%gfaxy[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%0w0cg[0])
										if (%0w0cg[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$pjshy)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%0w0cg[1]=0)
										if (%0w0cg[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%0w0cg[0])
												if (%0w0cg[$sm4jx+2] # $fg4rw and (%gfaxy[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%gfaxy[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%0w0cg[0])
											if (%0w0cg[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
			if ($kdgjt=1)
				if (4<=$iz1y0)
					select ($bmaa1)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%dswcz[1]=0)
									if (%dswcz[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%dswcz[0])
											if (%dswcz[$sm4jx+2] # $fg4rw and (%p52vu[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%p52vu[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%dswcz[0])
										if (%dswcz[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$bmaa1)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%dswcz[1]=0)
										if (%dswcz[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%dswcz[0])
												if (%dswcz[$sm4jx+2] # $fg4rw and (%p52vu[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%p52vu[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%dswcz[0])
											if (%dswcz[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
			if ($kdgjt=1)
				if (5<=$iz1y0)
					select ($vdkem)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%abq1p[1]=0)
									if (%abq1p[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%abq1p[0])
											if (%abq1p[$sm4jx+2] # $fg4rw and (%klvc4[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%klvc4[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%abq1p[0])
										if (%abq1p[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$vdkem)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%abq1p[1]=0)
										if (%abq1p[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%abq1p[0])
												if (%abq1p[$sm4jx+2] # $fg4rw and (%klvc4[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%klvc4[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%abq1p[0])
											if (%abq1p[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
			if ($kdgjt=1)
				if (6<=$iz1y0)
					select ($b3gse)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%rkvvz[1]=0)
									if (%rkvvz[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%rkvvz[0])
											if (%rkvvz[$sm4jx+2] # $fg4rw and (%gvlwp[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%gvlwp[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%rkvvz[0])
										if (%rkvvz[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$b3gse)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%rkvvz[1]=0)
										if (%rkvvz[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%rkvvz[0])
												if (%rkvvz[$sm4jx+2] # $fg4rw and (%gvlwp[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%gvlwp[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%rkvvz[0])
											if (%rkvvz[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
			if ($kdgjt=1)
				if (7<=$iz1y0)
					select ($zasdd)
						case 0
							$fg4rw := 0
							while ($fg4rw<=63)
								if (%nwmyg[1]=0)
									if (%nwmyg[0]=0)
										set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
									else
										$sm4jx := 0
										while ($sm4jx<%nwmyg[0])
											if (%nwmyg[$sm4jx+2] # $fg4rw and (%n20pn[$fg4rw] # 1))
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											else
												%n20pn[$fg4rw] := 1
											end if
											inc($sm4jx)
										end while
									end if
								else
									$sm4jx := 0
									while ($sm4jx<%nwmyg[0])
										if (%nwmyg[$sm4jx+2]=$fg4rw)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										end if
										inc($sm4jx)
									end while
								end if
								inc($fg4rw)
							end while
						case 1 to 64
							if ($MIDI_BYTE_1=$zasdd)
								$fg4rw := 0
								while ($fg4rw<=63)
									if (%nwmyg[1]=0)
										if (%nwmyg[0]=0)
											set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
										else
											$sm4jx := 0
											while ($sm4jx<%nwmyg[0])
												if (%nwmyg[$sm4jx+2] # $fg4rw and (%n20pn[$fg4rw] # 1))
													set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
												else
													%n20pn[$fg4rw] := 1
												end if
												inc($sm4jx)
											end while
										end if
									else
										$sm4jx := 0
										while ($sm4jx<%nwmyg[0])
											if (%nwmyg[$sm4jx+2]=$fg4rw)
												set_midi($fg4rw,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
											end if
											inc($sm4jx)
										end while
									end if
									inc($fg4rw)
								end while
							end if
					end select
				end if
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
		else
			if ($MIDI_COMMAND=$MIDI_COMMAND_NOTE_ON and $MIDI_BYTE_2 > 0)
				%vmhqc[$MIDI_BYTE_1] := $sljtd
			end if
			if ($MIDI_COMMAND=$MIDI_COMMAND_NOTE_OFF or $MIDI_COMMAND = $MIDI_COMMAND_NOTE_ON and $MIDI_BYTE_2 = 0)
				set_midi(%vmhqc[$MIDI_BYTE_1],$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			else
				set_midi($sljtd,$MIDI_COMMAND,$MIDI_BYTE_1,$MIDI_BYTE_2)
			end if
		end if
	end if
end on
on ui_control($psqqi)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($vq2nm)
	if ($vq2nm=1)
		$4rrbn := 0
		$oepih := 0
		$ebibk := 0
		$yu0aj := 0
		$sdykd := 0
		$gj1ot := 0
		$mqxss := 1
		$3e5hu := %xtrlv[0]
		$ngpxy := %xtrlv[1]
		$plc51 := %xtrlv[2]
		$f41zv := %xtrlv[3]
		$mhujk := %xtrlv[4]
		$ds2bq := %xtrlv[5]
		$2eux4 := %xtrlv[6]
		$qymue := %xtrlv[7]
		$ngbni := %xtrlv[8]
	else
		$vq2nm := 1
	end if
	call RenderPage
end on
on ui_control($ji0kq)
	$ji0kq := 0
	if (1>=1)
		$fg4rw := 0
		while ($fg4rw<8)
			%xtrlv[$fg4rw] := %juxkx[$fg4rw]
			inc($fg4rw)
		end while
		$psqqi := $s1m1r
	end if
	$fg4rw := 0
	while ($fg4rw<8)
		%juxkx[$fg4rw] := %0w0cg[$fg4rw]
		inc($fg4rw)
	end while
	$s1m1r := $pjshy
	$fg4rw := 0
	while ($fg4rw<8)
		%0w0cg[$fg4rw] := %dswcz[$fg4rw]
		inc($fg4rw)
	end while
	$pjshy := $bmaa1
	$fg4rw := 0
	while ($fg4rw<8)
		%dswcz[$fg4rw] := %abq1p[$fg4rw]
		inc($fg4rw)
	end while
	$bmaa1 := $vdkem
	$fg4rw := 0
	while ($fg4rw<8)
		%abq1p[$fg4rw] := %rkvvz[$fg4rw]
		inc($fg4rw)
	end while
	$vdkem := $b3gse
	$fg4rw := 0
	while ($fg4rw<8)
		%rkvvz[$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	$b3gse := $zasdd
	dec($iz1y0)
	call RenderPage
end on
on ui_control($s1m1r)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($4rrbn)
	if ($4rrbn=1)
		$vq2nm := 0
		$oepih := 0
		$ebibk := 0
		$yu0aj := 0
		$sdykd := 0
		$gj1ot := 0
		$mqxss := 2
		$3e5hu := %juxkx[0]
		$ngpxy := %juxkx[1]
		$plc51 := %juxkx[2]
		$f41zv := %juxkx[3]
		$mhujk := %juxkx[4]
		$ds2bq := %juxkx[5]
		$2eux4 := %juxkx[6]
		$qymue := %juxkx[7]
		$ngbni := %juxkx[8]
	else
		$4rrbn := 1
	end if
	call RenderPage
end on
on ui_control($zgubp)
	$zgubp := 0
	$fg4rw := 0
	while ($fg4rw<8)
		%juxkx[$fg4rw] := %0w0cg[$fg4rw]
		inc($fg4rw)
	end while
	$s1m1r := $pjshy
	$fg4rw := 0
	while ($fg4rw<8)
		%0w0cg[$fg4rw] := %dswcz[$fg4rw]
		inc($fg4rw)
	end while
	$pjshy := $bmaa1
	$fg4rw := 0
	while ($fg4rw<8)
		%dswcz[$fg4rw] := %abq1p[$fg4rw]
		inc($fg4rw)
	end while
	$bmaa1 := $vdkem
	$fg4rw := 0
	while ($fg4rw<8)
		%abq1p[$fg4rw] := %rkvvz[$fg4rw]
		inc($fg4rw)
	end while
	$vdkem := $b3gse
	$fg4rw := 0
	while ($fg4rw<8)
		%rkvvz[$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	$b3gse := $zasdd
	dec($iz1y0)
	call RenderPage
end on
on ui_control($pjshy)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($oepih)
	if ($oepih=1)
		$vq2nm := 0
		$4rrbn := 0
		$ebibk := 0
		$yu0aj := 0
		$sdykd := 0
		$gj1ot := 0
		$mqxss := 3
		$3e5hu := %0w0cg[0]
		$ngpxy := %0w0cg[1]
		$plc51 := %0w0cg[2]
		$f41zv := %0w0cg[3]
		$mhujk := %0w0cg[4]
		$ds2bq := %0w0cg[5]
		$2eux4 := %0w0cg[6]
		$qymue := %0w0cg[7]
		$ngbni := %0w0cg[8]
	else
		$oepih := 1
	end if
	call RenderPage
end on
on ui_control($egnks)
	$egnks := 0
	$fg4rw := 0
	while ($fg4rw<8)
		%0w0cg[$fg4rw] := %dswcz[$fg4rw]
		inc($fg4rw)
	end while
	$pjshy := $bmaa1
	$fg4rw := 0
	while ($fg4rw<8)
		%dswcz[$fg4rw] := %abq1p[$fg4rw]
		inc($fg4rw)
	end while
	$bmaa1 := $vdkem
	$fg4rw := 0
	while ($fg4rw<8)
		%abq1p[$fg4rw] := %rkvvz[$fg4rw]
		inc($fg4rw)
	end while
	$vdkem := $b3gse
	$fg4rw := 0
	while ($fg4rw<8)
		%rkvvz[$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	$b3gse := $zasdd
	dec($iz1y0)
	call RenderPage
end on
on ui_control($bmaa1)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($ebibk)
	if ($ebibk=1)
		$vq2nm := 0
		$4rrbn := 0
		$oepih := 0
		$yu0aj := 0
		$sdykd := 0
		$gj1ot := 0
		$mqxss := 4
		$3e5hu := %dswcz[0]
		$ngpxy := %dswcz[1]
		$plc51 := %dswcz[2]
		$f41zv := %dswcz[3]
		$mhujk := %dswcz[4]
		$ds2bq := %dswcz[5]
		$2eux4 := %dswcz[6]
		$qymue := %dswcz[7]
		$ngbni := %dswcz[8]
	else
		$ebibk := 1
	end if
	call RenderPage
end on
on ui_control($ial5g)
	$ial5g := 0
	$fg4rw := 0
	while ($fg4rw<8)
		%dswcz[$fg4rw] := %abq1p[$fg4rw]
		inc($fg4rw)
	end while
	$bmaa1 := $vdkem
	$fg4rw := 0
	while ($fg4rw<8)
		%abq1p[$fg4rw] := %rkvvz[$fg4rw]
		inc($fg4rw)
	end while
	$vdkem := $b3gse
	$fg4rw := 0
	while ($fg4rw<8)
		%rkvvz[$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	$b3gse := $zasdd
	dec($iz1y0)
	call RenderPage
end on
on ui_control($vdkem)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($yu0aj)
	if ($yu0aj=1)
		$vq2nm := 0
		$4rrbn := 0
		$oepih := 0
		$ebibk := 0
		$sdykd := 0
		$gj1ot := 0
		$mqxss := 5
		$3e5hu := %abq1p[0]
		$ngpxy := %abq1p[1]
		$plc51 := %abq1p[2]
		$f41zv := %abq1p[3]
		$mhujk := %abq1p[4]
		$ds2bq := %abq1p[5]
		$2eux4 := %abq1p[6]
		$qymue := %abq1p[7]
		$ngbni := %abq1p[8]
	else
		$yu0aj := 1
	end if
	call RenderPage
end on
on ui_control($vim2k)
	$vim2k := 0
	$fg4rw := 0
	while ($fg4rw<8)
		%abq1p[$fg4rw] := %rkvvz[$fg4rw]
		inc($fg4rw)
	end while
	$vdkem := $b3gse
	$fg4rw := 0
	while ($fg4rw<8)
		%rkvvz[$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	$b3gse := $zasdd
	dec($iz1y0)
	call RenderPage
end on
on ui_control($b3gse)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($sdykd)
	if ($sdykd=1)
		$vq2nm := 0
		$4rrbn := 0
		$oepih := 0
		$ebibk := 0
		$yu0aj := 0
		$gj1ot := 0
		$mqxss := 6
		$3e5hu := %rkvvz[0]
		$ngpxy := %rkvvz[1]
		$plc51 := %rkvvz[2]
		$f41zv := %rkvvz[3]
		$mhujk := %rkvvz[4]
		$ds2bq := %rkvvz[5]
		$2eux4 := %rkvvz[6]
		$qymue := %rkvvz[7]
		$ngbni := %rkvvz[8]
	else
		$sdykd := 1
	end if
	call RenderPage
end on
on ui_control($ptcjy)
	$ptcjy := 0
	$fg4rw := 0
	while ($fg4rw<8)
		%rkvvz[$fg4rw] := %nwmyg[$fg4rw]
		inc($fg4rw)
	end while
	$b3gse := $zasdd
	dec($iz1y0)
	call RenderPage
end on
on ui_control($zasdd)
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($gj1ot)
	if ($gj1ot=1)
		$vq2nm := 0
		$4rrbn := 0
		$oepih := 0
		$ebibk := 0
		$yu0aj := 0
		$sdykd := 0
		$mqxss := 7
		$3e5hu := %nwmyg[0]
		$ngpxy := %nwmyg[1]
		$plc51 := %nwmyg[2]
		$f41zv := %nwmyg[3]
		$mhujk := %nwmyg[4]
		$ds2bq := %nwmyg[5]
		$2eux4 := %nwmyg[6]
		$qymue := %nwmyg[7]
		$ngbni := %nwmyg[8]
	else
		$gj1ot := 1
	end if
	call RenderPage
end on
on ui_control($ulpy3)
	$ulpy3 := 0
	dec($iz1y0)
	call RenderPage
end on
on ui_control($plc51)
	select ($mqxss)
		case 1
			%xtrlv[2] := $plc51
		case 2
			%juxkx[2] := $plc51
		case 3
			%0w0cg[2] := $plc51
		case 4
			%dswcz[2] := $plc51
		case 5
			%abq1p[2] := $plc51
		case 6
			%rkvvz[2] := $plc51
		case 7
			%nwmyg[2] := $plc51
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($4tdq1)
	$4tdq1 := 0
	select ($mqxss)
		case 1
			$fg4rw := 0
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 0
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 0
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 0
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 0
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($f41zv)
	select ($mqxss)
		case 1
			%xtrlv[3] := $f41zv
		case 2
			%juxkx[3] := $f41zv
		case 3
			%0w0cg[3] := $f41zv
		case 4
			%dswcz[3] := $f41zv
		case 5
			%abq1p[3] := $f41zv
		case 6
			%rkvvz[3] := $f41zv
		case 7
			%nwmyg[3] := $f41zv
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($aksxa)
	$aksxa := 0
	select ($mqxss)
		case 1
			$fg4rw := 1
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 1
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 1
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 1
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 1
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($mhujk)
	select ($mqxss)
		case 1
			%xtrlv[4] := $mhujk
		case 2
			%juxkx[4] := $mhujk
		case 3
			%0w0cg[4] := $mhujk
		case 4
			%dswcz[4] := $mhujk
		case 5
			%abq1p[4] := $mhujk
		case 6
			%rkvvz[4] := $mhujk
		case 7
			%nwmyg[4] := $mhujk
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($jvlmm)
	$jvlmm := 0
	select ($mqxss)
		case 1
			$fg4rw := 2
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 2
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 2
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 2
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 2
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($ds2bq)
	select ($mqxss)
		case 1
			%xtrlv[5] := $ds2bq
		case 2
			%juxkx[5] := $ds2bq
		case 3
			%0w0cg[5] := $ds2bq
		case 4
			%dswcz[5] := $ds2bq
		case 5
			%abq1p[5] := $ds2bq
		case 6
			%rkvvz[5] := $ds2bq
		case 7
			%nwmyg[5] := $ds2bq
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($qyytf)
	$qyytf := 0
	select ($mqxss)
		case 1
			$fg4rw := 3
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 3
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 3
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 3
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 3
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($2eux4)
	select ($mqxss)
		case 1
			%xtrlv[6] := $2eux4
		case 2
			%juxkx[6] := $2eux4
		case 3
			%0w0cg[6] := $2eux4
		case 4
			%dswcz[6] := $2eux4
		case 5
			%abq1p[6] := $2eux4
		case 6
			%rkvvz[6] := $2eux4
		case 7
			%nwmyg[6] := $2eux4
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($bdep4)
	$bdep4 := 0
	select ($mqxss)
		case 1
			$fg4rw := 4
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 4
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 4
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 4
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 4
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($qymue)
	select ($mqxss)
		case 1
			%xtrlv[7] := $qymue
		case 2
			%juxkx[7] := $qymue
		case 3
			%0w0cg[7] := $qymue
		case 4
			%dswcz[7] := $qymue
		case 5
			%abq1p[7] := $qymue
		case 6
			%rkvvz[7] := $qymue
		case 7
			%nwmyg[7] := $qymue
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($shsm4)
	$shsm4 := 0
	select ($mqxss)
		case 1
			$fg4rw := 5
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 5
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 5
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 5
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 5
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
on ui_control($ngbni)
	select ($mqxss)
		case 1
			%xtrlv[8] := $ngbni
		case 2
			%juxkx[8] := $ngbni
		case 3
			%0w0cg[8] := $ngbni
		case 4
			%dswcz[8] := $ngbni
		case 5
			%abq1p[8] := $ngbni
		case 6
			%rkvvz[8] := $ngbni
		case 7
			%nwmyg[8] := $ngbni
	end select
	$fg4rw := 0
	while ($fg4rw<=63)
		%kfmds[$fg4rw] := 0
		%wk1rq[$fg4rw] := 0
		%gfaxy[$fg4rw] := 0
		%p52vu[$fg4rw] := 0
		%klvc4[$fg4rw] := 0
		%gvlwp[$fg4rw] := 0
		%n20pn[$fg4rw] := 0
		inc($fg4rw)
	end while
end on
on ui_control($4qsnv)
	$4qsnv := 0
	select ($mqxss)
		case 1
			$fg4rw := 6
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%xtrlv[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%xtrlv[0] := $3e5hu
		case 2
			$fg4rw := 6
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%juxkx[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%juxkx[0] := $3e5hu
		case 3
			$fg4rw := 6
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%0w0cg[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%0w0cg[0] := $3e5hu
		case 4
			$fg4rw := 6
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%dswcz[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%dswcz[0] := $3e5hu
		case 5
			$fg4rw := 6
			while ($fg4rw<=5)
				set_control_par(%mdxu0[$fg4rw*2],$CONTROL_PAR_VALUE,get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE))
				%abq1p[$fg4rw+2] := get_control_par(%mdxu0[($fg4rw+1)*2],$CONTROL_PAR_VALUE)
				inc($fg4rw)
			end while
			dec($3e5hu)
			%abq1p[0] := $3e5hu
		case 6
			dec($3e5hu)
			%rkvvz[0] := $3e5hu
	end select
	call RenderPage
end on
