forked from A3Wasteland/ArmA3_Wasteland.Stratis
-
Notifications
You must be signed in to change notification settings - Fork 0
/
globalCompile.sqf
145 lines (135 loc) · 7.45 KB
/
globalCompile.sqf
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
// ******************************************************************************************
// * This project is licensed under the GNU Affero GPL v3. Copyright © 2014 A3Wasteland.com *
// ******************************************************************************************
// @file Version: 1.0
// @file Name: globalCompile.sqf
// @file Author: AgentRev, MercyfulFate
// @file Created: 07/09/2013 15:06
// The purpose of this script is to compile certain functions both on client and server.
private ["_DEBUG", "_clientFunc", "_serverFunc"];
_DEBUG = format ["%1", _this select 0];
// Compile a function from a file.
// if in debug mode, the function will be dyncamically compiled every call.
// if not in debug mode, the function will be compileFinal'd
// example: my_fnc_name = ["path/to/folder", "my_fnc.sqf"] call mf_compile;
// example: my_fnc_name = ["path/to/folder/my_fnc.sqf"] call mf_compile;
// later in the code you can simply use call my_fnc_name;
// you can also pass raw code to get it compileFinal'd
// example: my_fnc_name = {diag_log "hey"} call mf_compile;
mf_compile = compileFinal
('
private ["_path", "_isDebug", "_code"];
_path = "";
_isDebug = ' + _DEBUG + ';
switch (toUpper typeName _this) do {
case "STRING": {
_path = _this;
};
case "ARRAY": {
_path = format["%1\%2", _this select 0, _this select 1];
};
case "CODE": {
_code = toArray str _this;
_code set [0, (toArray " ") select 0];
_code set [count _code - 1, (toArray " ") select 0];
};
};
if (isNil "_code") then {
if (_isDebug) then {
compile format ["call compile preProcessFileLineNumbers ""%1""", _path]
} else {
compileFinal preProcessFileLineNumbers _path
};
} else {
if (_isDebug) then {
compile toString _code
} else {
compileFinal toString _code
};
};
');
// Simple command I use to make initialization scripts clean and simple.
// uses mf_ namespace to avoid any issues.
mf_init =
{
private "_path";
_path = if (typeName _this == "STRING") then {
_this
} else {
format ["%1\%2", _this select 0, _this select 1]
};
_path call compile preProcessFileLineNumbers format ["%1\init.sqf", _path];
} call mf_compile;
_clientFunc = "client\functions";
_serverFunc = "server\functions";
A3W_fnc_deathMessage = [_serverFunc, "fn_deathMessage.sqf"] call mf_compile;
A3W_fnc_getInFast = [_clientFunc, "fn_getInFast.sqf"] call mf_compile;
A3W_fnc_isBleeding = [_serverFunc, "fn_isBleeding.sqf"] call mf_compile;
A3W_fnc_isFriendly = [_clientFunc, "fn_isFriendly.sqf"] call mf_compile;
A3W_fnc_isUnconscious = [_serverFunc, "fn_isUnconscious.sqf"] call mf_compile;
A3W_fnc_pushVehicle = [_serverFunc, "pushVehicle.sqf"] call mf_compile;
A3W_fnc_setVehicleLoadout = [_serverFunc, "fn_setVehicleLoadout.sqf"] call mf_compile;
A3W_fnc_towingHelper = [_serverFunc, "towingHelper.sqf"] call mf_compile;
applyVehicleTexture = "client\systems\vehicleStore\applyVehicleTexture.sqf" call mf_compile;
cargoToPairs = [_serverFunc, "cargoToPairs.sqf"] call mf_compile;
detachTowedObject = [_serverFunc, "detachTowedObject.sqf"] call mf_compile;
FAR_setKillerInfo = "addons\far_revive\FAR_setKillerInfo.sqf" call mf_compile;
findSafePos = [_serverFunc, "findSafePos.sqf"] call mf_compile;
fn_addScore = [_serverFunc, "fn_addScore.sqf"] call mf_compile;
fn_addToPairs = [_serverFunc, "fn_addToPairs.sqf"] call mf_compile;
fn_addTurretWeapons = [_serverFunc, "fn_addTurretWeapons.sqf"] call mf_compile;
fn_allPlayers = [_serverFunc, "allPlayers.sqf"] call mf_compile;
fn_boundingBoxReal = [_serverFunc, "fn_boundingBoxReal.sqf"] call mf_compile;
fn_canGetIn = [_clientFunc, "fn_canGetIn.sqf"] call mf_compile;
fn_createCrewUAV = [_serverFunc, "fn_createCrewUAV.sqf"] call mf_compile;
fn_enableSimulationGlobal = [_serverFunc, "fn_enableSimulationGlobal.sqf"] call mf_compile;
fn_enableSimulationServer = [_serverFunc, "fn_enableSimulationServer.sqf"] call mf_compile;
fn_filterString = [_serverFunc, "fn_filterString.sqf"] call mf_compile;
fn_findInPairs = [_serverFunc, "fn_findInPairs.sqf"] call mf_compile;
fn_findString = [_serverFunc, "fn_findString.sqf"] call mf_compile;
fn_forceAddItem = [_clientFunc, "fn_forceAddItem.sqf"] call mf_compile;
fn_getFromPairs = [_serverFunc, "fn_getFromPairs.sqf"] call mf_compile;
fn_getPos3D = [_serverFunc, "fn_getPos3D.sqf"] call mf_compile;
fn_getScore = [_serverFunc, "fn_getScore.sqf"] call mf_compile;
fn_getTeamScore = [_serverFunc, "fn_getTeamScore.sqf"] call mf_compile;
fn_hideObjectGlobal = [_serverFunc, "fn_hideObjectGlobal.sqf"] call mf_compile;
fn_loopSpread = [_serverFunc, "fn_loopSpread.sqf"] call mf_compile;
fn_magazineAmmoCargo = [_serverFunc, "fn_magazineAmmoCargo.sqf"] call mf_compile;
fn_numbersText = [_serverFunc, "fn_numbersText.sqf"] call mf_compile;
fn_numToStr = [_serverFunc, "fn_numToStr.sqf"] call mf_compile;
fn_remotePlayerSetup = [_clientFunc, "fn_remotePlayerSetup.sqf"] call mf_compile;
fn_removeFromPairs = [_serverFunc, "fn_removeFromPairs.sqf"] call mf_compile;
fn_removeTurretWeapons = [_serverFunc, "fn_removeTurretWeapons.sqf"] call mf_compile;
fn_selectRandomNested = [_serverFunc, "fn_selectRandomNested.sqf"] call mf_compile;
fn_selectRandomWeighted = [_serverFunc, "fn_selectRandomWeighted.sqf"] call mf_compile;
fn_selectRandomWeightedPairs = [_serverFunc, "fn_selectRandomWeightedPairs.sqf"] call mf_compile;
fn_setToPairs = [_serverFunc, "fn_setToPairs.sqf"] call mf_compile;
fn_sortAlphabetically = [_serverFunc, "fn_sortAlphabetically.sqf"] call mf_compile;
fn_splitString = [_serverFunc, "fn_splitString.sqf"] call mf_compile;
fn_startsWith = [_serverFunc, "fn_startsWith.sqf"] call mf_compile;
fn_ejectCorpse = [_serverFunc, "fn_ejectCorpse.sqf"] call mf_compile;
//fn_vehicleInit = [_serverFunc, "fn_vehicleInit.sqf"] call mf_compile;
fn_vehSafeDistance = [_serverFunc, "fn_vehSafeDistance.sqf"] call mf_compile;
getBallMagazine = [_serverFunc, "getBallMagazine.sqf"] call mf_compile;
getFwdVelocity = [_serverFunc, "getFwdVelocity.sqf"] call mf_compile;
getHitPoints = [_serverFunc, "getHitPoints.sqf"] call mf_compile;
getMagAmmoCount = [_serverFunc, "getMagAmmoCount.sqf"] call mf_compile;
getMagazineDetailAmmo = [_serverFunc, "getMagazineDetailAmmo.sqf"] call mf_compile;
getMoveWeapon = [_clientFunc, "getMoveWeapon.sqf"] call mf_compile;
fn_getPlayerData = "persistence\client\players\getPlayerData.sqf" call mf_compile;
getPublicVar = [_serverFunc, "getPublicVar.sqf"] call mf_compile;
getTeamMarkerColor = "territory\client\getTeamMarkerColor.sqf" call mf_compile;
A3W_fnc_getTeamMarkerColor = getTeamMarkerColor;
isConfigOn = [_serverFunc, "isConfigOn.sqf"] call mf_compile;
processMagazineCargo = [_serverFunc, "processMagazineCargo.sqf"] call mf_compile;
relativePos = [_serverFunc, "relativePos.sqf"] call mf_compile;
removeNegativeScore = [_serverFunc, "removeNegativeScore.sqf"] call mf_compile;
splitWeaponItems = [_serverFunc, "splitWeaponItems.sqf"] call mf_compile;
switchMoveGlobal = [_clientFunc, "switchMoveGlobal.sqf"] call mf_compile;
vehicleDammagedEvent = [_serverFunc, "vehicleDammagedEvent.sqf"] call mf_compile;
vehicleEngineEvent = [_serverFunc, "vehicleEngineEvent.sqf"] call mf_compile;
vehicleHandleDamage = [_serverFunc, "vehicleHandleDamage.sqf"] call mf_compile;
vehicleHitTracking = [_serverFunc, "vehicleHitTracking.sqf"] call mf_compile;
call compile preprocessFileLineNumbers "server\functions\mf_remote.sqf";
"pvar_switchMoveGlobal" addPublicVariableEventHandler { ((_this select 1) select 0) switchMove ((_this select 1) select 1) };
"pvar_detachTowedObject" addPublicVariableEventHandler { (_this select 1) spawn detachTowedObject };