Admin Menu

This commit is contained in:
fallingsheep 2015-02-08 18:07:10 +11:00
parent c7e4a14f16
commit 5f8e5b3ccd
31 changed files with 383 additions and 0 deletions

Binary file not shown.

View File

@ -0,0 +1 @@
DePbo.dll

View File

@ -0,0 +1,22 @@
==========================================================================================================================
CHANGE LOG:
-Added Spawn Players OnMap click, (OpFor, BluFor)
-Added Teleport to me Function.
Future Changes:
-We will just move on from here, Please if you have suggestions for the menu add me on skype: fusionquinny!
==========================================================================================================================
Hello, Thanks for downloading my tool! All Feedback is welcome on my fourm post over at Armaholic (http://www.armaholic.com/forums.php?m=posts&p=155485#155485)
==========================================================================================================================
==========================================================================================================================
Please all I ask is that you do NOT abuse this, Do NOT take credit for this, and please if possible give me credit somewhere in the mission!
Thanks,
Fusion
==========================================================================================================================
==========================================================================================================================

View File

@ -0,0 +1,6 @@
waituntil {!alive player ; !isnull (finddisplay 46)};
if ((getPlayerUID player) in ["76561198083039115"]) then {
;
act = player addaction [("<t color=""#0074E8"">" + ("Tools Menu") +"</t>"),"adminmenu\tools.sqf","",5,false,true,"",""];
};

View File

@ -0,0 +1,8 @@
while {true} do
{
waitUntil {alive vehicle player};
[] execVM "adminmenu\activate.sqf";
waitUntil {!alive player};
};

View File

@ -0,0 +1,2 @@
cutText ["Marker for current spawns Deleted, Select a new one", "PLAIN"];
deleteMarker 'bluspawner';

View File

@ -0,0 +1,2 @@
cutText ["Marker for current spawns Deleted, Select a new one", "PLAIN"];
deleteMarker 'spawnop';

View File

@ -0,0 +1 @@
onMapSingleClick {createMarker ["spawnop", _pos];};

View File

@ -0,0 +1 @@
grp = [getMarkerPos "spawnop", east, ["O_Soldier_lite_F", "O_Soldier_lite_F", "O_Soldier_lite_F", "O_Soldier_lite_F", "O_Soldier_lite_F"],[], ["SERGEANT", "PRIVATE", "PRIVATE", "PRIVATE", "PRIVATE"],[0.3,0.1,0.1,0.1,0.1],[],[],round (random 360)] call BIS_fnc_spawnGroup; null=[grp,(getMarkerPos "spawnop"),500]

View File

@ -0,0 +1 @@
onMapSingleClick {createMarker ["bluspawner", _pos];};

View File

@ -0,0 +1 @@
grp = [getMarkerPos "bluspawner", west, ["B_Soldier_F", "B_Soldier_F", "B_Soldier_F", "B_Soldier_F", "B_Soldier_F"],[], ["SERGEANT", "PRIVATE", "PRIVATE", "PRIVATE", "PRIVATE"],[0.3,0.1,0.1,0.1,0.1],[],[],round (random 360)] call BIS_fnc_spawnGroup; null=[grp,(getMarkerPos "bluspawner"),500]

View File

@ -0,0 +1,95 @@
_pathtotools = "adminmenu\tools\";
_pathtoweapon = "adminmenu\weapons\";
_pathtovehicles = "adminmenu\veh\";
_pathtosoldier= "adminmenu\spawn\";
_EXECscript1 = 'player execVM "'+_pathtotools+'%1"';
_EXECscript3 = 'player execVM "'+_pathtoweapon+'%1"';
_EXECscript5 = 'player execVM "'+_pathtovehicles+'%1"';
_EXECscript6 = 'player execVM "'+_pathtosoldier+'%1"';
if ((getPlayerUID player) in ["76561198083039115"]) then { //all admins
if ((getPlayerUID player) in ["76561198083039115"]) then { //Admins Go Here aswell
adminmenu =
[
["Fusions Menu",true],
["Tools", [4], "#USER:ToolsMenu", -5, [["expression", ""]], "1", "1"],
["Cars", [4], "#USER:VehicleMenu", -5, [["expression", ""]], "1", "1"],
["Weapons", [5], "#USER:WeaponMenu", -5, [["expression", ""]], "1", "1"],
["Spawn Groups", [5], "#USER:Soldier", -5, [["expression", ""]], "1", "1"],
["", [-1], "", -5, [["expression", ""]], "1", "0"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];};
} else {
adminmenu =
[
["",true],
//["Toggle Debug", [2], "", -5, [["expression", format[_execdebug,"playerstats.sqf"]]], "1", "1"],
["", [-1], "", -5, [["expression", ""]], "1", "0"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];};
ToolsMenu =
[
["Tools",true],
["Teleport", [2], "", -5, [["expression", format[_EXECscript1,"teleport.sqf"]]], "1", "1"],
["Teleport Player To Me", [3], "", -5, [["expression", format[_EXECscript1,"tptome.sqf"]]], "1", "1"],
["God Mode", [4], "", -5, [["expression", format[_EXECscript1,"god.sqf"]]], "1", "1"],
["Car God Mode", [5], "", -5, [["expression", format[_EXECscript1,"cargod.sqf"]]], "1", "1"],
["Heal Self", [6], "", -5, [["expression", format[_EXECscript1,"heal.sqf"]]], "1", "1"],
["Heal Player(s)", [7], "", -5, [["expression", format[_EXECscript1,"healp.sqf"]]], "1", "1"],
["", [-1], "", -5, [["expression", ""]], "1", "0"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];
WeaponMenu =
[
["Weapons",true],
//Add Weapons Here Gave some examples :D
["MX", [2], "", -5, [["expression", format[_EXECscript3,"mx.sqf"]]], "1", "1"],
["MK 200", [3], "", -5, [["expression", format[_EXECscript3,"mk200.sqf"]]], "1", "1"],
["LRR", [4], "", -5, [["expression", format[_EXECscript3,"lrr.sqf"]]], "1", "1"],
["EBR", [5], "", -5, [["expression", format[_EXECscript3,"ebr.sqf"]]], "1", "1"],
["GM6", [6], "", -5, [["expression", format[_EXECscript3,"gm6.sqf"]]], "1", "1"],
["P07", [7], "", -5, [["expression", format[_EXECscript3,"phgun.sqf"]]], "1", "1"],
["Next page", [12], "#USER:WeaponMenu2", -5, [["expression", ""]], "1", "1"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];
WeaponMenu2 =
[
["Weapons 2",true],
//Add Weapons Here Gave another page because it could get a little confusing :P
["MX", [2], "", -5, [["expression", format[_EXECscript3,"mx.sqf"]]], "1", "1"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];
VehicleMenu =
[
["Vehicles",true],
["ATV", [2], "", -5, [["expression", format[_EXECscript5,"ATV.sqf"]]], "1", "1"],
["Hunter Armed", [3], "", -5, [["expression", format[_EXECscript5,"hunter.sqf"]]], "1", "1"],
["Offroad Truck HMG .50", [4], "", -5, [["expression", format[_EXECscript5,"offroad.sqf"]]], "1", "1"],
["", [-1], "", -5, [["expression", ""]], "1", "0"],
["Next page", [12], "#USER:VehicleMenu2", -5, [["expression", ""]], "1", "1"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];
VehicleMenu2 =
[
["Vehicles 2",true],
["Example", [2], "", -5, [["expression", format[_EXECscript5,"Example.sqf"]]], "1", "1"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];
Soldier =
[
["Spawner", true],
["Select Spawn Position (OpFor)", [2], "", -5, [["expression", format[_EXECscript6,"east.sqf"]]], "1", "1"],
["Delete Previous Spawn Area (OpFor)", [3], "", -5, [["expression", format[_EXECscript6,"deleteop.sqf"]]], "1", "1"],
["Spawn(OpFor)", [4], "", -5, [["expression", format[_EXECscript6,"eastsp.sqf"]]], "1", "1"],
["Select Spawn Position (BluFor)", [5], "", -5, [["expression", format[_EXECscript6,"west.sqf"]]], "1", "1"],
["Delete Previous Spawn Area (BluFor)", [6], "", -5, [["expression", format[_EXECscript6,"deletebl.sqf"]]], "1", "1"],
["Spawn(BluFor)", [7], "", -5, [["expression", format[_EXECscript6,"westsp.sqf"]]], "1", "1"],
["", [-1], "", -5, [["expression", ""]], "1", "0"],
["Exit", [13], "", -3, [["expression", ""]], "1", "1"]
];
showCommandingMenu "#USER:adminmenu";

View File

@ -0,0 +1,17 @@
titleText ["Cargod enabled","PLAIN DOWN"]; titleFadeOut 4;
player removeAction line1;
player removeAction line2;
player removeAction godmode;
player removeAction tele;
player removeAction guns;
player removeAction mainveh;
player removeAction cgod;
player removeAction hplay;
while {alive ( vehicle player )} do
{
vehicle player setfuel 1;
vehicle player setvehicleammo 1;
vehicle player setdammage 0;
sleep 0.001;
};

View File

@ -0,0 +1,11 @@
cutText ["Godmode activated.", "PLAIN"];
player removeAllEventHandlers "handleDamage";
player addEventHandler ["handleDamage", {false}];
player removeAction line1;
player removeAction line2;
player removeAction godmode;
player removeAction tele;
player removeAction guns;
player removeAction mainveh;
player removeAction cgod;
player removeAction hplay;

View File

@ -0,0 +1,4 @@
hint format ["Healing..."];
sleep 2;
player setDamage 0;
hint format ["Done"];

View File

@ -0,0 +1,33 @@
//Healing Others Script
_max = 10; snext = false; plist = []; pselect5 = "";
{if ((_x != player) && (getPlayerUID _x != "")) then {plist set [count plist, name _x];};} forEach entities "CAManBase";
{if ((count crew _x) > 0) then {{if ((_x != player) && (getPlayerUID _x != "")) then {plist set [count plist, name _x];};} forEach crew _x;};} foreach (entities "LandVehicle" + entities "Air" + entities "Ship");
smenu =
{
_pmenu = [["Heal Other Player",true]];
for "_i" from (_this select 0) to (_this select 1) do
{_arr = [format['%1', plist select (_i)], [12], "", -5, [["expression", format ["pselect5 = plist select %1;", _i]]], "1", "1"]; _pmenu set [_i + 2, _arr];};
if (count plist > (_this select 1)) then {_pmenu set [(_this select 1) + 2, ["Next", [13], "", -5, [["expression", "snext = true;"]], "1", "1"]];}
else {_pmenu set [(_this select 1) + 2, ["", [-1], "", -5, [["expression", ""]], "1", "0"]];};
_pmenu set [(_this select 1) + 3, ["Exit", [13], "", -5, [["expression", "pselect5 = 'exit';"]], "1", "1"]];
showCommandingMenu "#USER:_pmenu";
};
_j = 0; _max = 10; if (_max>9) then {_max = 10;};
while {pselect5 == ""} do
{
[_j, (_j + _max) min (count plist)] call smenu; _j = _j + _max;
WaitUntil {pselect5 != "" or snext};
snext = false;
};
if (pselect5 != "exit") then
{
_name = pselect5;
{
if(name _x == _name) then
{
hint format ["Healing %1", _name];
_x setDamage 0;
sleep 0.25;
};
} forEach entities "CAManBase";
};

View File

@ -0,0 +1,2 @@
cutText ["Click somewhere on the map to move there", "PLAIN"];
onMapSingleClick "vehicle player setPos _pos; onMapSingleClick '';true;";

View File

@ -0,0 +1,34 @@
//AlPMaker
_max = 10; snext = false; plist = []; pselect5 = "";
{if ((_x != player) && (getPlayerUID _x != "")) then {plist set [count plist, name _x];};} forEach entities "CAManBase";
{if ((count crew _x) > 0) then {{if ((_x != player) && (getPlayerUID _x != "")) then {plist set [count plist, name _x];};} forEach crew _x;};} foreach (entities "LandVehicle" + entities "Air" + entities "Ship");
smenu =
{
_pmenu = [["Teleport To Me",true]];
for "_i" from (_this select 0) to (_this select 1) do
{_arr = [format['%1', plist select (_i)], [12], "", -5, [["expression", format ["pselect5 = plist select %1;", _i]]], "1", "1"]; _pmenu set [_i + 2, _arr];};
if (count plist > (_this select 1)) then {_pmenu set [(_this select 1) + 2, ["Next", [13], "", -5, [["expression", "snext = true;"]], "1", "1"]];}
else {_pmenu set [(_this select 1) + 2, ["", [-1], "", -5, [["expression", ""]], "1", "0"]];};
_pmenu set [(_this select 1) + 3, ["Exit", [13], "", -5, [["expression", "pselect5 = 'exit';"]], "1", "1"]];
showCommandingMenu "#USER:_pmenu";
};
_j = 0; _max = 10; if (_max>9) then {_max = 10;};
while {pselect5 == ""} do
{
[_j, (_j + _max) min (count plist)] call smenu; _j = _j + _max;
WaitUntil {pselect5 != "" or snext};
snext = false;
};
if (pselect5 != "exit") then
{
_name = pselect5;
{
if(name _x == _name) then
{
hint format ["Teleporting %1", _name];
_x attachTo [vehicle player, [2, 2, 0]];
sleep 0.25;
detach _x;
};
} forEach entities "CAManBase";
};

View File

@ -0,0 +1,37 @@
===================================================================================================================================================
Instructions on how to add more vehicles to the list.
===================================================================================================================================================
Okay so first lets get what kind of vehicle you want, Go here to get them
http://forums.bistudio.com/showthread.php?169226-Arma-3-Assets-Objects-Weapons-Magazines-and-much-more
===================================================================================================================================================
Okay so now what you do is make a addAction so that it actually comes up in the menu.
car2 = player addAction ["Name Of Vehicle",{execVM "fusionsmenu\admin\veh\CARNAME.sqf";}]; // Change the car2 to what ever car it is
Make sure that the actual removeAction in the vehicles sqf file is declared!!!!!!!
NOW TO MAKE THE ACTUAL VEHICLE
_spawn = "REPLACE ME WITH CAR CLASS NAME";
_posplr = [((getPos player) select 0) + 2, ((getPos player) select 1) + 2, 0];
_dirplr = getDir player;
_spwnveh = _spawn createVehicle (_posplr);
_spwnveh setVariable ["Sarge",1,true];
player removeAction car;
player removeAction car1;
player removeAction car2;
player removeAction line1;
player removeAction line2;
player removeAction godmode;
player removeAction tele;
player removeAction guns;
player removeAction mainveh;
player removeAction cgod;
player removeAction hplay; // Keep adding these for how many you have in ALL of the vehicle sqfs :D
I will be continually updating this to make a better menu <3
===================================================================================================================================================
===================================================================================================================================================

View File

@ -0,0 +1,15 @@
_spawn = "B_G_Quadbike_01_F";
_posplr = [((getPos player) select 0) + 2, ((getPos player) select 1) + 2, 0];
_dirplr = getDir player;
_spwnveh = _spawn createVehicle (_posplr);
_spwnveh setVariable ["Sarge",1,true];
player removeAction car;
player removeAction car1;
player removeAction line1;
player removeAction line2;
player removeAction godmode;
player removeAction tele;
player removeAction guns;
player removeAction mainveh;
player removeAction cgod;
player removeAction hplay;

View File

@ -0,0 +1,11 @@
_spawn = "B_MRAP_01_hmg_F";
_posplr = [((getPos player) select 0) - 3, ((getPos player) select 1) + 3, 0];
_dirplr = getDir player;
_spwnveh = _spawn createVehicle (_posplr);
_spwnveh setVariable ["Sarge",1,true];
laptop removeAction car1;
laptop removeAction car2;
laptop removeAction car3;
laptop removeAction car4;
laptop removeAction car5;
laptop removeAction car6;

View File

@ -0,0 +1,11 @@
_spawn = "B_G_Offroad_01_armed_F";
_posplr = [((getPos player) select 0) - 3, ((getPos player) select 1) + 3, 0];
_dirplr = getDir player;
_spwnveh = _spawn createVehicle (_posplr);
_spwnveh setVariable ["Sarge",1,true];
laptop removeAction car1;
laptop removeAction car2;
laptop removeAction car3;
laptop removeAction car4;
laptop removeAction car5;
laptop removeAction car6;

View File

@ -0,0 +1,36 @@
===================================================================================================================================================
Instructions on how to add more guns to the list.
===================================================================================================================================================
Okay so first lets get what kind of gun you want, Go here to get them
http://forums.bistudio.com/showthread.php?169226-Arma-3-Assets-Objects-Weapons-Magazines-and-much-more
===================================================================================================================================================
Okay so now what you do is make a addAction so that it actually comes up in the menu.
gun1 = player addAction ["Name Of GUN",{execVM "fusionsmenu\admin\weapons\WEAPONNAME.sqf";}]; // Change the car2 to what ever car it is
Make sure that the actual removeAction in the vehicles sqf file is declared!!!!!!!
NOW TO MAKE THE ACTUAL VEHICLE
GearAdd = (vehicle player);
GearAdd addWeapon 'REPLACE WITH GUN CLASSNAME';
GearAdd addMagazine '30Rnd_65x39_caseless_mag'; // CHANGE FOR MAG NAME
GearAdd addMagazine '30Rnd_65x39_caseless_mag'; // CHANGE FOR MAG NAME
GearAdd addMagazine '30Rnd_65x39_caseless_mag'; // CHANGE FOR MAG NAME ALSO ADD MORE OF THESE TO GET MORE WEAPONS
player removeAction gun;
player removeAction gun1;
player removeAction line1;
player removeAction line2;
player removeAction godmode;
player removeAction tele;
player removeAction guns;
player removeAction mainveh;
player removeAction cgod;
player removeAction hplay; // Keep adding these for how many you have in ALL of the vehicle sqfs :D
I will be continually updating this to make a better menu <3
===================================================================================================================================================
===================================================================================================================================================

View File

@ -0,0 +1,5 @@
GearAdd = (vehicle player);
GearAdd addWeapon 'srifle_EBR_F';
GearAdd addMagazine '20Rnd_762x51_Mag';
GearAdd addMagazine '20Rnd_762x51_Mag';
GearAdd addMagazine '20Rnd_762x51_Mag';

View File

@ -0,0 +1,5 @@
GearAdd = (vehicle player);
GearAdd addWeapon 'srifle_GM6_F';
GearAdd addMagazine '5Rnd_127x108_Mag';
GearAdd addMagazine '5Rnd_127x108_Mag';
GearAdd addMagazine '5Rnd_127x108_Mag';

View File

@ -0,0 +1,5 @@
GearAdd = (vehicle player);
GearAdd addWeapon 'srifle_LRR_SOS_F';
GearAdd addMagazine '7Rnd_408_Mag';
GearAdd addMagazine '7Rnd_408_Mag';
GearAdd addMagazine '7Rnd_408_Mag';

View File

@ -0,0 +1,5 @@
GearAdd = (vehicle player);
GearAdd addWeapon 'LMG_Mk200_F';
GearAdd addMagazine '200Rnd_65x39_cased_Box_Tracer';
GearAdd addMagazine '200Rnd_65x39_cased_Box_Tracer';
GearAdd addMagazine '200Rnd_65x39_cased_Box_Tracer';

View File

@ -0,0 +1,5 @@
GearAdd = (vehicle player);
GearAdd addWeapon 'arifle_MX_F';
GearAdd addMagazine '30Rnd_65x39_caseless_mag'; // I didnt look up the mag name
GearAdd addMagazine '30Rnd_65x39_caseless_mag'; // I didnt look up the mag name
GearAdd addMagazine '30Rnd_65x39_caseless_mag'; // I didnt look up the mag name

View File

@ -0,0 +1,5 @@
GearAdd = (vehicle player);
GearAdd addWeapon 'hgun_P07_F';
GearAdd addMagazine '16Rnd_9x21_Mag';
GearAdd addMagazine '16Rnd_9x21_Mag';
GearAdd addMagazine '16Rnd_9x21_Mag';

View File

@ -0,0 +1,2 @@
execVM "adminmenu\activate.sqf";
execVM "adminmenu\loop.sqf";

Binary file not shown.