on init
{___________________________________________________________________}
make_perfview
set_script_title ("Royal Grand 3D")
set_control_par_str ($INST_WALLPAPER_ID, $CONTROL_PAR_PICTURE,"wallpaper")
set_control_par_str($INST_ICON_ID,$CONTROL_PAR_PICTURE,"nord_icon")
set_ui_height_px(420)
set_ui_width_px(750)
set_skin_offset(42)
{_____________________________________________________________________}
{__________________controles___________________________________________}
{layer 1}
declare ui_slider $volume1(0,1000000)
make_persistent ($volume1)
set_control_par(get_ui_id($volume1), $CONTROL_PAR_MOUSE_BEHAVIOUR,-200)
set_control_par_str(get_ui_id($volume1), $CONTROL_PAR_PICTURE,
"FaderCap")
move_control_px($volume1,24,50)
{BOTES PURGE}
declare ui_switch $PURGE1
set_text ($PURGE1,"")
set_control_par(get_ui_id($PURGE1),$CONTROL_PAR_WIDTH,62)
set_control_par(get_ui_id($PURGE1),$CONTROL_PAR_HEIGHT,62)
set_control_par_str(get_ui_id($PURGE1),
$CONTROL_PAR_PICTURE,"nord_button_led_6_3")
make_persistent($PURGE1)
move_control_px($PURGE1, 10, 205)
{__________________________________________________________________________________
__}
{layer 2}
declare ui_slider $volume2(0,1000000)
make_persistent ($volume2)
set_control_par(get_ui_id($volume2), $CONTROL_PAR_MOUSE_BEHAVIOUR,-200)
set_control_par_str(get_ui_id($volume2), $CONTROL_PAR_PICTURE,
"FaderCap")
move_control_px($volume2,64,50)
{BOTES PURGE}
declare ui_switch $PURGE2
set_text ($PURGE2,"")
set_control_par(get_ui_id($PURGE2),$CONTROL_PAR_WIDTH,62)
set_control_par(get_ui_id($PURGE2),$CONTROL_PAR_HEIGHT,62)
set_control_par_str(get_ui_id($PURGE2),
$CONTROL_PAR_PICTURE,"nord_button_led_6_3")
make_persistent($PURGE2)
move_control_px($PURGE2, 50, 205)
{_____________________________________________}
{layer 3}
declare ui_slider $volume3(0,1000000)
make_persistent ($volume3)
set_control_par(get_ui_id($volume3), $CONTROL_PAR_MOUSE_BEHAVIOUR,-200)
set_control_par_str(get_ui_id($volume3), $CONTROL_PAR_PICTURE,
"FaderCap")
move_control_px($volume3,104,50)
{BOTES PURGE}
declare ui_switch $PURGE3
set_text ($PURGE3,"")
set_control_par(get_ui_id($PURGE3),$CONTROL_PAR_WIDTH,62)
set_control_par(get_ui_id($PURGE3),$CONTROL_PAR_HEIGHT,62)
set_control_par_str(get_ui_id($PURGE3),
$CONTROL_PAR_PICTURE,"nord_button_led_6_3")
make_persistent($PURGE3)
move_control_px($PURGE3, 90, 205)
{_____________________________________________}
{layer 4}
declare ui_slider $volume4(0,1000000)
make_persistent ($volume4)
set_control_par(get_ui_id($volume4), $CONTROL_PAR_MOUSE_BEHAVIOUR,-200)
set_control_par_str(get_ui_id($volume4), $CONTROL_PAR_PICTURE,
"FaderCap")
move_control_px($volume4,144,50)
{BOTES PURGE}
declare ui_switch $PURGE4
set_text ($PURGE4,"")
set_control_par(get_ui_id($PURGE4),$CONTROL_PAR_WIDTH,62)
set_control_par(get_ui_id($PURGE4),$CONTROL_PAR_HEIGHT,62)
set_control_par_str(get_ui_id($PURGE4),
$CONTROL_PAR_PICTURE,"nord_button_led_6_3")
make_persistent($PURGE4)
move_control_px($PURGE4, 130, 205)
{_____________________________________________}
{_________________fim de controles_________________________________}
{___________comandos de controle____________________________________}
{________________________instrumento 1_____________________}
end on
on ui_control ($volume1)
set_engine_par($ENGINE_PAR_VOLUME, $volume1 , 0 , -1 , -1)
end on
on ui_control ($purge1)
purge_group(0,abs($purge1-0))
purge_group(20,abs($PURGE1-1))
end on
{_______________________________________________________}
{________________________instrumento 1_____________________}
end on
on ui_control ($volume2)
set_engine_par($ENGINE_PAR_VOLUME, $volume2 , 1 , -1 , -1)
end on
on ui_control ($purge2)
purge_group(0,abs($purge2-0))
purge_group(20,abs($PURGE2-1))
end on
{_______________________________________________________}