fishing.sqf

// this is the fishing.sqf file, called when using fishing pole

private ["_fishingarray"];

_art = _this select 0;

if(iscop)exitwith{};

if (_art == "use") then

{

if(working)exitwith{};

_item   = _this select 1;
_anzahl = _this select 2;

working=true;
_isInArea=false;

	{

	if (player distance (getMarkerPos ((_x select 0) select 0)) < ((_x select 0) select 1)) then {_isInArea = true; _fishingarray = _x};

	} forEach fishingarray;

_resource = _fishingarray select 1;
_max      = _fishingarray select 2;
_infos    = _resource call INV_getitemArray;
_name     = (_infos call INV_getitemName);

if (!_isInArea) exitwith

	{

	hintSilent "You are not where the fish are.";
	working = false;

	};

if(_item == "fishingpole")then

	{

	totalamount=0;
	_max = 3;
	(format ["%1 switchmove ""%2"";", player, "AwopPercMstpSgthWnonDnon_end"]) call broadcast;
	for [{_i=0}, {_i < 4}, {_i=_i+1}] do

		{

		_amount = round (random _max);
		titletext ["Fishing...", "PLAIN DOWN", 0.1];

		sleep 1.5;
		player switchmove "normal";

		_avail = floor (INV_Tragfaehigkeit - (call INV_GetOwnWeight));

		totalamount = totalamount + _amount;
		if((totalamount*2) >= _avail)exitwith{totalamount = (_avail/2); hintSilent "maximum weight reached"; _i=6;};
		hintSilent format["You got %1 %2.", _amount, _name];

		};
	totalamount = (floor (totalamount));
	[_resource, totalamount] call INV_AddInventoryItem;

	};



working=false;

};