ACE3/addons/slideshow/functions/fnc_createSlideshow.sqf

76 lines
2.1 KiB
Plaintext
Raw Normal View History

2015-06-27 02:11:57 +00:00
/*
* Author: Jonpas, DaC
* Prepares necessary variables and default image.
*
* Arguments:
* 0: Objects <ARRAY>
* 1: Controller Objects <ARRAY>
* 2: Image Paths <ARRAY>
* 3: Action Names <ARRAY>
* 4: Duration <NUMBER> (0 disables automatic transitions)
2015-06-27 02:11:57 +00:00
*
* Return Value:
* Parsed List <ARRAY>
*
* Example:
* [[object1, object2, object3], [controller1], ["images\image1.paa", "images\image2.paa"], ["Action1", "Action2"], 5] call ace_slideshow_fnc_createSlideshow;
2015-06-27 02:11:57 +00:00
*
* Public: Yes
*/
//#define DEBUG_MODE_FULL
#include "script_component.hpp"
PARAMS_5(_objects,_controllers,_images,_names,_duration);
2015-06-27 02:11:57 +00:00
// Add controllers to objects if they support it
{
if (typeOf _x in [CLASSNAMES_OBJECTS, CLASSNAMES_BOTH]) then {
_objects pushBack _x;
};
} forEach _controllers;
// Objects synced to the module
{
if (typeOf _x in [CLASSNAMES_OBJECTS, CLASSNAMES_BOTH]) then {
_objects pushBack _x;
};
if (typeOf _x in [CLASSNAMES_BOTH, CLASSNAMES_CONTROLLERS]) then {
_controllers pushBack _x;
};
} forEach (synchronizedObjects _logic);
// If no controllers use objects as controllers
if (count _controllers == 0) then {
_controllers = _objects;
};
TRACE_4("Information",_objects,_controllers,_images,_names);
// Default images on whiteboards (first image)
{
_x setObjectTextureGlobal [0, _images select 0];
} forEach _objects;
// Set first image as default and set variable on controllers with necessary information
{
_x setVariable [QGVAR(slides), [_objects, _images, _names, _duration], true];
TRACE_1("Assigning Slides to controllers",_x);
2015-06-27 02:11:57 +00:00
} forEach _controllers;
// Exit if automatic transitions are not allowed
if (_duration == 0) exitWith {};
// Automatic transitions
GVAR(currentSlide) = 0;
[{
EXPLODE_2_PVT(_this select 0,_objects,_images);
GVAR(currentSlide) = (GVAR(currentSlide) + 1) mod (count _images);
{
_x setObjectTextureGlobal [0, _images select GVAR(currentSlide)];
} forEach _objects;
TRACE_3("Auto-transition",_images select GVAR(currentSlide),GVAR(currentSlide),count _images);
}, _duration, [_objects, _images]] call cba_fnc_addPerFrameHandler;