Kontakt - Merge of the 2 Scripts

on init
make_perfview
set_ui_height_px(305)

declare ui_button $purge
        set_text($purge, "Pots&Pans - Hits") {This control will purge the first 5 groups}

        declare ui_button $purge2
        set_text($purge2, "Pots&Pans - Felt") {This control will purge the last 5 groups}

    declare ui_knob $Delay1(0,1000000,1000000)
    move_control ($Delay1, 1,1)
    declare ui_knob $Delay2(0,1000000,1000000)
    move_control ($Delay2, 2,1)
    declare ui_knob $Flanger(0,1000000,1000000)
    move_control ($Flanger, 3,1)
    declare ui_knob $Phaser(0,1000000,1000000)
    move_control ($Phaser, 4,1)
    declare ui_knob $Reverb(0,1000000,1000000)
    move_control ($Reverb, 5,1)

end on

on ui_control ($purge)

        if ($purge = 1)

    {CODE: Purge_group(group_idx, state)}
    {Group_idx is the group number, state is off/on... 1 being "Deactivated"}

    purge_group(0,1)
    purge_group(1,1)
    purge_group(2,1)
    purge_group(3,1)
    purge_group(4,1)

    else

    purge_group(0,0)
    purge_group(1,0)
    purge_group(2,0)
    purge_group(3,0)
    purge_group(4,0)

        end if

end on

on ui_control ($purge2)

    if ($purge2 = 1)

    purge_group(5,1)
    purge_group(6,1)
    purge_group(7,1)
    purge_group(8,1)
    purge_group(9,1)

    else

    purge_group(5,0)
    purge_group(6,0)
    purge_group(7,0)
    purge_group(8,0)
    purge_group(9,0)

    end if

end on


on ui_control ($Delay1)

 set_engine_par($ENGINE_PAR_SENDLEVEL_0,$Delay1,-1,7,-1)

end on


on ui_control ($Delay2)

 set_engine_par($ENGINE_PAR_SENDLEVEL_1,$Delay2,-1,7,-1)
end on

on ui_control ($Flanger)

 set_engine_par($ENGINE_PAR_SENDLEVEL_2,$Flanger,-1,7,-1)

end on

on ui_control ($Phaser)

 set_engine_par($ENGINE_PAR_SENDLEVEL_3,$Phaser,-1,7,-1)

end on

on ui_control ($Reverb)

 set_engine_par($ENGINE_PAR_SENDLEVEL_4,$Reverb,-1,7,-1)

end on