DayZ-Epoch/SQF/dayz_code/actions/AdvancedTrading/functions/z_at_calcCurrency.sqf

private ["_GemTotal","_GemTotal2","_ItemAmethyst","_ItemCitrine","_ItemEmerald","_ItemObsidian","_ItemRuby","_ItemSapphire","_ItemTopaz","_array","_briefcase_100oz","_fontSize","_gem","_gold_10oz","_gold_10oz_a","_gold_10oz_b","_gold_1oz","_gold_1oz_a","_gold_1oz_b","_noIMG","_pic","_silver_10oz","_silver_10oz_a","_silver_10oz_b","_silver_1oz","_silver_1oz_a","_silver_1oz_b","_string","_total","_value","_localize"];

_total = _this select 0;
_noIMG = _this select 1;
_fontSize = if (count _this > 2) then {_this select 2} else {1};
_localize = count _this < 4; //Do not localize for server RPT log
_array = [];
_string = "";

_ItemTopaz = 0;
_ItemObsidian = 0;
_ItemSapphire = 0;
_ItemAmethyst = 0;
_ItemEmerald = 0;
_ItemCitrine = 0;
_ItemRuby = 0;
_GemTotal = 0;
_GemTotal2 = _total;

{
	_gem = _x;
	_value = DZE_GemWorthList select _forEachIndex;
	call {
		if (_gem == 'ItemTopaz') exitwith {
			_ItemTopaz = floor(_GemTotal2 / _value);
			if (_ItemTopaz >= 1) then {
				_GemTotal = (_value * _ItemTopaz) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
		if (_gem == 'ItemObsidian') exitwith {
			_ItemObsidian = floor(_GemTotal2 / _value);
			if (_ItemObsidian >= 1) then {
				_GemTotal = (_value * _ItemObsidian) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
		if (_gem == 'ItemSapphire') exitwith {
			_ItemSapphire = floor(_GemTotal2 / _value);
			if (_ItemSapphire >= 1) then {
				_GemTotal = (_value * _ItemSapphire) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
		if (_gem == 'ItemAmethyst') exitwith {
			_ItemAmethyst = floor(_GemTotal2 / _value);
			if (_ItemAmethyst >= 1) then {
				_GemTotal = (_value * _ItemAmethyst) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
		if (_gem == 'ItemEmerald') exitwith {
			_ItemEmerald = floor(_GemTotal2 / _value);
			if (_ItemEmerald >= 1) then {
				_GemTotal = (_value * _ItemEmerald) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
		if (_gem == 'ItemCitrine') exitwith {
			_ItemCitrine = floor(_GemTotal2 / _value);
			if (_ItemCitrine >= 1) then {
				_GemTotal = (_value * _ItemCitrine) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
		if (_gem == 'ItemRuby') exitwith {
			_ItemRuby = floor(_GemTotal2 / _value);
			if (_ItemRuby >= 1) then {
				_GemTotal = (_value * _ItemRuby) + _GemTotal;
				_GemTotal2 = _total - _GemTotal;
			};
		};
	};
} forEach DZE_GemList;
_total = _GemTotal2;

_briefcase_100oz = floor(_total / 10000);

_gold_10oz_a = floor(_total / 1000);
_gold_10oz_b = _briefcase_100oz * 10;
_gold_10oz = (_gold_10oz_a - _gold_10oz_b);

_gold_1oz_a = floor(_total / 100);
_gold_1oz_b = _gold_10oz_a * 10;
_gold_1oz = (_gold_1oz_a - _gold_1oz_b);

_silver_10oz_a = floor(_total / 10);
_silver_10oz_b = _gold_1oz_a * 10;
_silver_10oz = (_silver_10oz_a - _silver_10oz_b);

_silver_1oz_a = floor(_total);
_silver_1oz_b = _silver_10oz_a * 10;
_silver_1oz = (_silver_1oz_a - _silver_1oz_b);

{ //sort gems so they display on total price in order of descending worth
	if (!isNil {call compile format["_%1",_x]} && {(call compile format["_%1",_x]) > 0}) then {
		if (_noIMG) then {
			_pic = if (_localize) then {getText (configFile >> 'CfgMagazines' >> _x >> 'displayName')} else {_x};
			_array set [count _array, format["%1x %2",(call compile format["_%1",_x]),_pic]];
		} else {
			_pic = getText (configFile >> 'CfgMagazines' >> _x >> 'picture');
			_string = format["%3<t size='%4'>%1x</t><img image='%2'/>",(call compile format["_%1",_x]),_pic, _string,_fontSize];
		};
	};
} count DZE_GemList;

if (_noIMG) then {
	if (_briefcase_100oz >= 2) then {
		_array set [count _array, format["%1x %2s",_briefcase_100oz,if (_localize) then {localize "STR_EPOCH_BRIEFCASE"} else {"Briefcase"}]];
	};

	if (_briefcase_100oz == 1) then {
		_array set [count _array, format["%1x %2",_briefcase_100oz,if (_localize) then {localize "STR_EPOCH_BRIEFCASE"} else {"Briefcase"}]];
	};
} else {
	if (_briefcase_100oz > 0) then {
		_pic = getText (configFile >> 'CfgMagazines' >> 'ItemBriefcase100oz' >> 'picture');
		_string = format["%3<t size='%4'>%1x</t><img image='%2'/>",_briefcase_100oz,_pic, _string,_fontSize];
	};
};

if (_gold_10oz > 0) then {
	if (_noIMG) then {
		_array set [count _array, format["%1x %2",_gold_10oz,if (_localize) then {localize "STR_EPOCH_10OZGOLD"} else {"10oz Gold"}]];
	} else {
		_pic = getText (configFile >> 'CfgMagazines' >> 'ItemGoldBar10oz' >> 'picture');
		_string = format["%3<t size='%4'>%1x</t><img image='%2'/>",_gold_10oz,_pic, _string,_fontSize];
	};
};
if (_gold_1oz > 0) then {
	if (_noIMG) then {
		_array set [count _array, format["%1x %2",_gold_1oz,if (_localize) then {localize "STR_EPOCH_GOLD"} else {"Gold"}]];
	} else {
		_pic = getText (configFile >> 'CfgMagazines' >> 'ItemGoldBar' >> 'picture');
		_string = format["%3<t size='%4'>%1x</t><img image='%2'/>",_gold_1oz,_pic, _string,_fontSize];
	};
};
if (_silver_10oz > 0) then {
	if (_noIMG) then {
		_array set [count _array, format["%1x %2",_silver_10oz,if (_localize) then {localize "STR_EPOCH_10OZSILVER"} else {"10oz Silver"}]];
	} else {
		_pic = getText (configFile >> 'CfgMagazines' >> 'ItemSilverBar10oz' >> 'picture');
		_string = format["%3<t size='%4'>%1x</t><img image='%2'/>",_silver_10oz,_pic, _string,_fontSize];
	};
};
if (_silver_1oz > 0) then {
	if (_noIMG) then {
		_array set [count _array, format["%1x %2",_silver_1oz,if (_localize) then {localize "STR_EPOCH_SILVER"} else {"Silver"}]];
	} else {
		_pic = getText (configFile >> 'CfgMagazines' >> 'ItemSilverBar' >> 'picture');
		_string = format["%3<t size='%4'>%1x</t><img image='%2'/>",_silver_1oz,_pic, _string,_fontSize];
	};
};

if (_noIMG) then {
	{
		if (_forEachIndex == 0) then {
			_string = _x;
		} else {
			_string = _string + ", " + _x;
		};
	} forEach _array;
};

_string