ACE3/addons/gui/functions/fnc_effectPain.sqf

33 lines
701 B
Plaintext
Raw Normal View History

2015-01-17 11:05:07 +00:00
/**
* fn_effectPain.sqf
* @Descr: Displays the ACE Pain effect
* @Author: Glowbal
*
* @Arguments: [painRatio NUMBER]
* @Return: void
* @PublicAPI: true
*/
#include "script_component.hpp"
if (isnil QGVAR(DisplayingPainEffect)) then {
GVAR(DisplayingPainEffect) = false;
};
if (GVAR(DisplayingPainEffect)) exitwith {};
private ["_ratio","_time"];
_ratio = _this select 0;
if (!(_ratio > 0)) exitwith{};
_time = 6 - _ratio;
if (_time <1.5) then {
_time = 1.5;
};
GVAR(DisplayingPainEffect) = true;
46 cutRsc [QGVAR(ScreenEffectsPain),"PLAIN"];
[{
GVAR(DisplayingPainEffect) = false;
[(_this select 1)] call cba_fnc_removePerFrameHandler;
}, _time, [] ] call CBA_fnc_addPerFrameHandler;