Beiträge von Saturin78

#include "script_macros.hpp"
/*
dog functions

pass in the calling unit

made by: 
|TG-355th| Yink

NPC_Init:  this addAction ["Hund kaufen",life_fnc_dogFunctions,[(_this select 1)]];
*/

if(life_cash < 5000) exitWith{hint("Du hast keine 5000,- Altis $ um einen Hund zu kaufen!");};
life_cash = life_cash - 5000;

private["_sounds","_sound","_actions","_dog","_randomDog"];
_unit = _this select 0;
_side = side _unit;
sleep 2;
_setVariable = {
    _unit setvariable ["order","nil"];
    _unit setvariable ["step","wait"];
    _unit setvariable ["action","true"];
    _unit setvariable ["seek","false"];
};

_dogRevive = {
    _unit = _this select 0;
    _dog = _unit getvariable "dog";

    sleep 5;

    _side = side _unit;
    _unit setvariable ["follow",'false'];
    _tempPos = getpos _unit;
    _group1 = createGroup _side;

    _randomDog = ["Fin_sand_F","Fin_blackwhite_F","Fin_ocherwhite_F","Fin_tricolour_F","Fin_random_F","Alsatian_Sand_F","Alsatian_Black_F","Alsatian_Sandblack_F","Alsatian_Random_F"];// call BIS_fnc_selectRandom;
    _randomDog1 = _randomDog call BIS_fnc_selectRandom;
    _dog = _randomDog1 createUnit [_tempPos,_group1,"dog = this", 1.0, "private"];    //"dog = this"
    //"Alsatian_Sandblack_F" createUnit [_tempPos,_group1,"_unit setvariable ['dog',format['%1',this]]", 1.0, "private"];
    sleep 0.5;

    _dog = _unit getvariable "dog";
    _unit setvariable ["step","go"];
};

_dogWhistle = {
    _unit = (_this select 3) select 0;
    _growl = (_this select 3) select 1;
    play = (_this select 3) select 2;
    _idle = (_this select 3) select 3;
    _vehicle = (_this select 3) select 4;
    _sound = ["whistle",_unit, 20] spawn play;
    hint "Jessie, here girl!";
    sleep 1;
    _unit setvariable ["follow",'false'];
    _tempPos = [(getpos _unit) select 0,((getpos _unit) select 1) + 1,0];
    _side = side _unit;

    _group1 = createGroup _side;

    _randomDog = ["Fin_sand_F","Fin_blackwhite_F","Fin_ocherwhite_F","Fin_tricolour_F","Fin_random_F","Alsatian_Sand_F","Alsatian_Black_F","Alsatian_Sandblack_F","Alsatian_Random_F"];// call BIS_fnc_selectRandom;
    _randomDog1 = _randomDog call BIS_fnc_selectRandom;
    _dog = _randomDog1 createUnit [_tempPos,_group1,"dog = this", 1.0, "private"];
    //_dog = "Alsatian_Sandblack_F" createUnit [_tempPos,_group1,"dog = this", 1.0, "private"];

    _unit setvariable ["order","idle"];
    _unit setvariable ["step","go"];
    _unit setvariable ["dog", dog];
    (_unit getvariable "dog") setvariable ["player",_unit];

    _vehicle    = [_unit,play] spawn _vehicle;
    _return    = [_unit,play] spawn _idle;
    _growl = [_unit,play] spawn _growl;
    killed = {
        _unit1 = (_this select 0) getvariable "player";
        _unit1 setvariable ["order","dead"];
        _unit setvariable ["action","false"];
        _unit1 setvariable ["step","go"];
    };

    shot_at = {
        _dog = _this select 0;
        _firer = _this select 1;
        _unit1 = _dog getvariable "player";
        _side = east;

        if (((side _firer)==east)&&((_unit1 getvariable "seek")=="true")) then {
            _unit1 setVariable ["order","idle"];
            _unit1 setVariable ["step","go"];
            _unit1 setVariable ["seek","false"];
            _dog doMove (getpos _unit1);
            _sound = ["dog_whine",_dog, 20] spawn play;
        };
    };

    (_unit getvariable "dog") addeventhandler
    [
        "killed",
        { 
            _script = [(_this select 0)] call killed;
        }
    ];

    (_unit getvariable "dog") addeventhandler
    [
        "FiredNear",
        {
            _script = [(_this select 0),(_this select 1)] call shot_at;
        }
    ];    
};

_dogFollow = {
    _unit = (_this select 3) select 0;
    _dog    = _unit getvariable "dog";
    _play    = (_this select 3) select 1;
    _sound = ["dog_one",_dog, 20] spawn _play;
    hint "Jessie, follow!";
    _unit setvariable ["order","active"];
    _unit setvariable ["step","go"];
    _unit setvariable ["follow",'true'];

    while {(_unit getvariable "follow") == 'true'} do  {
        sleep 0.5;
        if ((_dog distance _unit) < 4) then {
            _dog domove getpos _dog;
        } else {
            _dog domove getpos _unit;    
        };
        sleep 1;
    };
};

_dogSeek = {
    _unit = (_this select 3) select 0;
    _unit setvariable ["follow",'false'];
    _unit setvariable ["seek","true"];
    _dog = _unit getvariable "dog";
    _play = (_this select 3) select 1;
    hint "Jessie, seek!";
    _unit setvariable ["order","active"];
    _unit setvariable ["step","go"];
    _dog = _unit getvariable "dog";
    _side = east;
    _radius = 1000;

    _nearestunits = nearestObjects [_dog,["Man"],_radius];
    _nearestunitofside = [];

    if(_side countSide _nearestunits > 0) then {
        _sound = ["dog_one",_dog, 20] spawn _play;
        {
            _unit = _x;
            if (side _unit == _side) then {
                _nearestunitofside = _nearestunitofside + [_unit]
            };
        } foreach _nearestunits;
    } else {
        _sound = ["dog_ruff",_dog, 20] spawn _play;
        _unit setvariable ["order","idle"];
    };

    _dog domove getpos (_nearestunitofside select 0);
    waituntil {(_dog distance (_nearestunitofside select 0))<10};
    _sound = ["dog_ruff",_dog, 20] spawn _play;

};

_dogHeel = {
    _unit = (_this select 3) select 0;
    _dog = _unit getvariable "dog";
    _play = (_this select 3) select 1;
    _sound = ["dog_one",_dog, 20] spawn _play;
    hint "Jessie, Heal!";
    _unit setvariable ["follow",'false'];
    _dog = _unit getvariable "dog";

    _dog domove [(getpos _unit) select 0,((getpos _unit) select 1) - 1, 0];
    _unit setvariable ["order","active"];
    _unit setvariable ["step","go"];
};

_dogHide = {
    _unit = (_this select 3) select 0;
    _dog = _unit getvariable "dog";
    _unit setvariable ["follow",'false'];
    _dog = _unit getvariable "dog";
    hint "Jessie, Hide!";
    _unit setvariable ["order","nil"];
    _unit setvariable ["step","go"];
    sleep 3;
    deleteVehicle _dog;
};

_dogStop = {
    _unit = (_this select 3) select 0;
    _dog = _unit getVariable "dog";
    _play = (_this select 3) select 1;
    _sound = ["dog_one",_dog, 20] spawn _play;
    _unit setvariable ["seek","false"];
    hint "Jessie, Hold!";
    _unit setvariable ["follow",'false'];
    _dog domove getpos _dog;
    _unit setvariable ["order","idle"];
    _unit setvariable ["step","go"];
};

_dogGrowl = {
    _unit = _this select 0;
    _dog = _unit getvariable "dog";
    _side = east;
    while {alive _dog} do {
        _timer = round(random 5);
        _timer    = _timer + 5;
        _objs = nearestobjects [_dog,["Man"], 50];
        {
            if ((side _x)!=_side) then {
                _objs = _objs - [_x];
            };
        } foreach _objs;
        if ((count _objs)>0) then {
            _play = _this select 1;
            _sound = ["dog_growl",_dog, 11] spawn _play;
        };

        sleep _timer;
        _dog = _unit getvariable "dog";
    };
};

_playSound = {
    _soundPath = [(str missionConfigFile), 0, -15] call BIS_fnc_trimString;
    sound = _this select 0;
    dog1 = _this select 1;
    _volume = _this select 2;
    _soundToPlay = _soundPath + "sounds\" + _sound + ".ogg";
    publicvariable "sound";
    publicvariable "dog1";
    [dog1 say3d sound] remoteExec ["bis_fnc_spawn",true];
    //[{dog1 say3d sound},"bis_fnc_spawn",true] spawn bis_fnc_mp;
    //_null = [[_sountToPlay,_dog],"sound_fnc",true,true] spawn BIS_fnc_MP;
    //_sound = ["hey",_unit getvariable "dog"] call _playSound;
};

_dogReturnIdle = {
    _unit = _this select 0;
    _dog    = _unit getvariable "dog";
    _play = _this select 1;
    while {alive _dog} do {
        waituntil {(((_dog distance _unit)>30)&&((_unit getvariable "order")=="idle"))};
        _dog domove (getpos _unit);
        _sound = ["dog_whine",_dog, 20] spawn _play;
        waituntil {unitReady _dog};
    };
};

_dogVehicle = {
    _unit = _this select 0;
    _dog = _unit getvariable "dog";
    while {alive _dog} do {
        waituntil {(((vehicle _unit)!= _unit)&&((_dog distance _unit)<8))};
        _veh = vehicle _unit;
        _dog attachto [_unit,[0,0.1,-0.2]];
        _dog attachto [_veh];
        waituntil {(vehicle _unit)!= _veh};
        detach _dog;
        _dog setpos [((getpos _unit) select 0) + 2,((getpos _unit) select 1) + 2,0];
    };
};

_actions = {
    _unit = _this select 0;
    _dogWhistle    = _this select 1;
    _dogFollow = _this select 2;
    _dogSeek = _this select 3;
    _dogHide = _this select 4;
    _dogHeel = _this select 5;
    _dogStop    = _this select 6;
    _dogGrowl = _this select 7;
    _playSound    = _this select 8;
    _dogReturnIdle = _this select 9;
    _dogVehicle    = _this select 10;
    _unit setvariable ["action","true"];

    while {(_unit getvariable "action")=="true"} do {
        _unit setvariable ["step","wait"];
        _actions = _unit getvariable "actions";
        {
            _unit removeaction _x;
        } foreach _actions;
        _actions = [ ];
    
        if ((_unit getvariable "order") == "nil") then {
            _whistle = _unit addAction ["Whistle", _dogWhistle, [_unit, _dogGrowl,_playSound,_dogReturnIdle,_dogVehicle]];
            _unit setvariable ["order","whistle"];
            _unit setvariable ["step","wait"];
            _unit setvariable ["actions",[_whistle]];
        };

        if ((_unit getvariable "order") == "idle") then {
            _follow = _unit addAction ["<t color = '#ffff00'>Follow</t>", _dogFollow, [_unit,_playSound]];
            _find = _unit addAction ["<t color = '#ffff00'>Seek</t>", _dogSeek, [_unit,_playSound]];
            _rest = _unit addAction ["<t color = '#ff0000'>Hide!</t>", _dogHide, [_unit,_playSound]];
            _heel = _unit addAction ["<t color = '#ffff00'>Heel</t>", _dogHeel, [_unit,_playSound]];
            _unit setvariable ["step","wait"];
            _unit setvariable ["actions",[_follow,_find,_rest,_heel]];
        };

        if ((_unit getvariable "order") == "active") then {
            _stop = _unit addAction ["<t color = '#ff0000'>Stop!</t>", _dogStop, [_unit,_playSound]];
            _unit setvariable ["step","wait"];
            _unit setvariable ["actions",[_stop]];
        };

        if ((_unit getvariable "dead") == "active") then {
            _unit setvariable ["order","nil"];
        };    
        waituntil {((_unit getvariable "step") == "go")};
    };
};

_var1 = [_unit] call _setVariable;
_loop = [_unit,_dogWhistle,_dogFollow,_dogSeek,_dogHide,_dogHeel,_dogStop,_dogGrowl,_playSound,_dogReturnIdle, _dogVehicle] call _actions;