Arma 3 GUI Menu

Posts 1–9 of 9 · Page 1 of 1

Arma 3 GUI Menu

Yo people so im quite new on this forum but i wanted to benefit some noobies with some scripts

I made an Arma 3 Simple GUI Menu with some features (not much) but dont except that awesome op menu now because it took only 30 minutes for me to do this

I hope u like it

Code:

[] spawn {
    waitUntil {sleep 0.0000001; !isNull (findDisplay 46)};
    warownmakeslovetochris = (findDisplay 46) displayAddEventHandler ["KeyDown", "if ((_this select 1) == 65) then {
    [] spawn warownmakeslovetochris2;
    };"];

	warownmakeslovetochris2 = {
		
		_display = findDisplay 46 createDisplay "RscDisplayEmpty";

		warownslovelymenu = _display ctrlCreate ["IGUIBack", -1];
		warownslovelymenu ctrlSetPosition [0.025, 0.04, 0.2, 0.82];
		warownslovelymenu ctrlSetBackgroundColor [0,0,1,1];
		warownslovelymenu ctrlCommit 0;

		warownsawesometext = _display ctrlCreate ["RscText", -1];
		warownsawesometext ctrlSetStructuredText parseText "  WarownSD v1.0.0";
		warownsawesometext ctrlSetPosition [0.025, 0.06, 0.2, 0.04];
		warownsawesometext ctrlSetTextColor [0,0,1,1];
		warownsawesometext ctrlSetBackgroundColor [0,0,0,1];
		warownsawesometext ctrlCommit 0;

		warownscoolnameesp = _display ctrlCreate ["RscButton", -1];
		warownscoolnameesp ctrlSetText "NAME ESP";
		warownscoolnameesp ctrlSetTextColor [0,0,1,1];
		warownscoolnameesp ctrlSetBackgroundColor [0,0,0,1];
		warownscoolnameesp buttonSetAction "call coolnameesp_a;";
		warownscoolnameesp ctrlSetPosition [0.0375, 0.14, 0.175, 0.08];
		warownscoolnameesp ctrlCommit 0;

		warownsfatassexecuter = _display ctrlCreate ["RscButton", -1];
		warownsfatassexecuter ctrlSetText "EXECUTER";
		warownsfatassexecuter ctrlSetTextColor [0,0,1,1];
		warownsfatassexecuter ctrlSetBackgroundColor [0,0,0,1];
		warownsfatassexecuter buttonSetAction "call executer_f;";
		warownsfatassexecuter ctrlSetPosition [0.0375, 0.26, 0.175, 0.08];
		warownsfatassexecuter ctrlCommit 0;

		warownsunlimmitedammo = _display ctrlCreate ["RscButton", -1];
		warownsunlimmitedammo ctrlSetText "INFINITE AMMO";
		warownsunlimmitedammo ctrlSetTextColor [0,0,1,1];
		warownsunlimmitedammo ctrlSetBackgroundColor [0,0,0,1];
		warownsunlimmitedammo buttonSetAction "call unlimmitedammo_c;";
		warownsunlimmitedammo ctrlSetPosition [0.0375, 0.38, 0.175, 0.08];
		warownsunlimmitedammo ctrlCommit 0;

		warownsnorecoil = _display ctrlCreate ["RscButton", -1];
		warownsnorecoil ctrlSetText "NO RECOIL";
		warownsnorecoil ctrlSetTextColor [0,0,1,1];
		warownsnorecoil ctrlSetBackgroundColor [0,0,0,1];
		warownsnorecoil buttonSetAction "call norecoil_d;";
		warownsnorecoil ctrlSetPosition [0.0375, 0.48, 0.175, 0.1];
		warownsnorecoil ctrlCommit 0;

		warownsspeedhack = _display ctrlCreate ["RscButton", -1];
		warownsspeedhack ctrlSetText "SPEED HACK";
		warownsspeedhack ctrlSetTextColor [0,0,1,1];
		warownsspeedhack ctrlSetBackgroundColor [0,0,0,1];
		warownsspeedhack buttonSetAction "call speedhack_e;";
		warownsspeedhack ctrlSetPosition [0.0375, 0.6, 0.175, 0.1];
		warownsspeedhack ctrlCommit 0;


		coolnameesp_a = ["Open",true ] spawn 
{
_a = "addMission";
				_a = _a + "EventHandler [""Draw3D"",{";
				_a = _a + "
					_ordered = [];
					{
						if(player distance _x <= 1000) then {
							_ordered pushback [str(side _x),str(vehicle _x == _x),name _x,_x];
						};
					} forEach (if(isMultiplayer) then {allPlayers} else {allUnits});
					_ordered sort true;
					";
				_a = _a + "
					{
						_side = _x select 0;
						_inVehicle = _x select 1;
						_name = _x select 2;
						_object = _x select 3;
						";
				_a = _a + "
						_pos = (_object modelToWorld ((_object selectionPosition ""neck"") vectorAdd [0,0,0.25]));
						";
				_a = _a + "
						_color = [1,0,1,1];
						if(side _object == blufor) then {
							_color = [0,0.7,1,1];
						};
						if(side _object == opfor) then {
							_color = [1,0,0,1];
						};
						if(side _object == independent) then {
							_color = [0,1,0,1];
						};
 
						if(getplayeruid _object in [""76561198152111329"",""76561198276380268""]) then {
							_color  =  [1,1,0];
							_name = ""INFISTAR"";
						};
 
						_scale = (0.03 - (0.03 *((player distance _object)/2500)));
						if(_scale > 0) then {
							draw";
				_a = _a + "Icon3D ["""", _color, _pos, 0, 0, 0, _name + "" - "" + str(round(player distance _object)) + ""m"", 2, _scale, ""PuristaLight"",""center"",true];
						};
					} forEach _ordered;
 
				}];";
 
				_b = compile _a;
				_eh = call _b;
};

		unlimmitedammo_c = {
		player addEventHandler ["Fired", {
			(_this select 0) setVehicleAmmo 1;
		}];
		};

		norecoil_d = {
		player setUnitRecoilCoefficient 0;
		};

		speedhack_e = {
		player setAnimSpeedCoef 10;
		hint "Speedhack ON";
		};

		executer_f = {
    private ["_key","_shift","_ctrl","_alt"];
    if (dialog) exitWith {false};
 
    _key = _this select 1;
    _shift = _this select 2;
    _ctrl = _this select 3;
    _alt = _this select 4;
 
    if(_key == 59 && _shift && !_ctrl && !_alt) then {
        closeDialog 0;
        [] spawn xwarownripo;
    };
    false
};
 
[] spawn 
{
    waitUntil {sleep 0.5; !isNull (findDisplay 46)};
    hint "Executor Loaded";
    []spawn xwarownripo;
    (findDisplay 46) displayAddEventHandler ["KeyDown", "if ((_this select 1) == 210 )call xkefediepapa"];
 
}; xwarownripo = 
{
    hint "WarownSD";
    _display = {findDisplay 24}; 
    createDialog "RscDisplayChat"; 
 
    warownplanstoputhistongueinsideofchris_Function = { 
        _warownplanstoputhistongueinsideofchris_textField = ""; 
        _warownplanstoputhistongueinsideofchris_textField = ctrlText warownplanstoputhistongueinsideofchris_TextBox; 
        for "_i" from 1 to 1 do compile _warownplanstoputhistongueinsideofchris_textField;   
    }; 
    _warownplanstoputhistongueinsideofchris_GuiBack = (call _display) ctrlCreate ["IGUIBack", 2200]; 
    _warownplanstoputhistongueinsideofchris_GuiBack ctrlSetPosition [0.417492 * safezoneW + safezoneX,0.224899 * safezoneH + safezoneY,0.149531 * safezoneW,0.132 * safezoneH]; 
    _warownplanstoputhistongueinsideofchris_GuiBack ctrlSetBackgroundColor [0.22,0.208,0.208,1]; 
    _warownplanstoputhistongueinsideofchris_GuiBack ctrlCommit 0; 
    _warownplanstoputhistongueinsideofchris_Button = (call _display) ctrlCreate ["RscButton", 1600]; 
    _warownplanstoputhistongueinsideofchris_Button ctrlSetText "Execute"; 
    _warownplanstoputhistongueinsideofchris_Button ctrlSetPosition [0.417492 * safezoneW + safezoneX, 0.224899 * safezoneH + safezoneY, 0.149546 * safezoneW, 0.0330121 * safezoneH]; 
    _warownplanstoputhistongueinsideofchris_Button ctrlSetTextColor [1,0.816,0,1]; 
    _warownplanstoputhistongueinsideofchris_Button ctrlCommit 0; 
    warownplanstoputhistongueinsideofchris_TextBox = (call _display) ctrlCreate ["RscEdit", 1400]; 
    warownplanstoputhistongueinsideofchris_TextBox ctrlSetPosition [0.422648 * safezoneW + safezoneX, 0.279919 * safezoneH + safezoneY, 0.139233 * safezoneW, 0.0330121 * safezoneH];
	warownplanstoputhistongueinsideofchris_TextBox ctrlCommit 0; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo = (call _display) ctrlCreate ["RscButton", 1601]; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlSetText "WarownScriptExecuter"; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlSetPosition [0.422648 * safezoneW + safezoneX, 0.312931 * safezoneH + safezoneY, 0.139233 * safezoneW, 0.0330121 * safezoneH]; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlSetTextColor [1,0.816,0,1]; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo buttonSetAction "[]spawn warownplanstoputhistongueinsideofchris_Function;"; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlCommit 0; 
};
      };
};

Youtube Video :

- - - Updated - - -

Going to post an Tutorial tomorrow

Originally Posted by WarownSD

Yo people so im quite new on this forum but i wanted to benefit some noobies with some scripts

I made an Arma 3 Simple GUI Menu with some features (not much) but dont except that awesome op menu now because it took only 30 minutes for me to do this

I hope u like it

Code:

[] spawn {
    waitUntil {sleep 0.0000001; !isNull (findDisplay 46)};
    warownmakeslovetochris = (findDisplay 46) displayAddEventHandler ["KeyDown", "if ((_this select 1) == 65) then {
    [] spawn warownmakeslovetochris2;
    };"];

	warownmakeslovetochris2 = {
		
		_display = findDisplay 46 createDisplay "RscDisplayEmpty";

		warownslovelymenu = _display ctrlCreate ["IGUIBack", -1];
		warownslovelymenu ctrlSetPosition [0.025, 0.04, 0.2, 0.82];
		warownslovelymenu ctrlSetBackgroundColor [0,0,1,1];
		warownslovelymenu ctrlCommit 0;

		warownsawesometext = _display ctrlCreate ["RscText", -1];
		warownsawesometext ctrlSetStructuredText parseText "  WarownSD v1.0.0";
		warownsawesometext ctrlSetPosition [0.025, 0.06, 0.2, 0.04];
		warownsawesometext ctrlSetTextColor [0,0,1,1];
		warownsawesometext ctrlSetBackgroundColor [0,0,0,1];
		warownsawesometext ctrlCommit 0;

		warownscoolnameesp = _display ctrlCreate ["RscButton", -1];
		warownscoolnameesp ctrlSetText "NAME ESP";
		warownscoolnameesp ctrlSetTextColor [0,0,1,1];
		warownscoolnameesp ctrlSetBackgroundColor [0,0,0,1];
		warownscoolnameesp buttonSetAction "call coolnameesp_a;";
		warownscoolnameesp ctrlSetPosition [0.0375, 0.14, 0.175, 0.08];
		warownscoolnameesp ctrlCommit 0;

		warownsfatassexecuter = _display ctrlCreate ["RscButton", -1];
		warownsfatassexecuter ctrlSetText "EXECUTER";
		warownsfatassexecuter ctrlSetTextColor [0,0,1,1];
		warownsfatassexecuter ctrlSetBackgroundColor [0,0,0,1];
		warownsfatassexecuter buttonSetAction "call executer_f;";
		warownsfatassexecuter ctrlSetPosition [0.0375, 0.26, 0.175, 0.08];
		warownsfatassexecuter ctrlCommit 0;

		warownsunlimmitedammo = _display ctrlCreate ["RscButton", -1];
		warownsunlimmitedammo ctrlSetText "INFINITE AMMO";
		warownsunlimmitedammo ctrlSetTextColor [0,0,1,1];
		warownsunlimmitedammo ctrlSetBackgroundColor [0,0,0,1];
		warownsunlimmitedammo buttonSetAction "call unlimmitedammo_c;";
		warownsunlimmitedammo ctrlSetPosition [0.0375, 0.38, 0.175, 0.08];
		warownsunlimmitedammo ctrlCommit 0;

		warownsnorecoil = _display ctrlCreate ["RscButton", -1];
		warownsnorecoil ctrlSetText "NO RECOIL";
		warownsnorecoil ctrlSetTextColor [0,0,1,1];
		warownsnorecoil ctrlSetBackgroundColor [0,0,0,1];
		warownsnorecoil buttonSetAction "call norecoil_d;";
		warownsnorecoil ctrlSetPosition [0.0375, 0.48, 0.175, 0.1];
		warownsnorecoil ctrlCommit 0;

		warownsspeedhack = _display ctrlCreate ["RscButton", -1];
		warownsspeedhack ctrlSetText "SPEED HACK";
		warownsspeedhack ctrlSetTextColor [0,0,1,1];
		warownsspeedhack ctrlSetBackgroundColor [0,0,0,1];
		warownsspeedhack buttonSetAction "call speedhack_e;";
		warownsspeedhack ctrlSetPosition [0.0375, 0.6, 0.175, 0.1];
		warownsspeedhack ctrlCommit 0;


		coolnameesp_a = ["Open",true ] spawn 
{
_a = "addMission";
				_a = _a + "EventHandler [""Draw3D"",{";
				_a = _a + "
					_ordered = [];
					{
						if(player distance _x <= 1000) then {
							_ordered pushback [str(side _x),str(vehicle _x == _x),name _x,_x];
						};
					} forEach (if(isMultiplayer) then {allPlayers} else {allUnits});
					_ordered sort true;
					";
				_a = _a + "
					{
						_side = _x select 0;
						_inVehicle = _x select 1;
						_name = _x select 2;
						_object = _x select 3;
						";
				_a = _a + "
						_pos = (_object modelToWorld ((_object selectionPosition ""neck"") vectorAdd [0,0,0.25]));
						";
				_a = _a + "
						_color = [1,0,1,1];
						if(side _object == blufor) then {
							_color = [0,0.7,1,1];
						};
						if(side _object == opfor) then {
							_color = [1,0,0,1];
						};
						if(side _object == independent) then {
							_color = [0,1,0,1];
						};
 
						if(getplayeruid _object in [""76561198152111329"",""76561198276380268""]) then {
							_color  =  [1,1,0];
							_name = ""INFISTAR"";
						};
 
						_scale = (0.03 - (0.03 *((player distance _object)/2500)));
						if(_scale > 0) then {
							draw";
				_a = _a + "Icon3D ["""", _color, _pos, 0, 0, 0, _name + "" - "" + str(round(player distance _object)) + ""m"", 2, _scale, ""PuristaLight"",""center"",true];
						};
					} forEach _ordered;
 
				}];";
 
				_b = compile _a;
				_eh = call _b;
};

		unlimmitedammo_c = {
		player addEventHandler ["Fired", {
			(_this select 0) setVehicleAmmo 1;
		}];
		};

		norecoil_d = {
		player setUnitRecoilCoefficient 0;
		};

		speedhack_e = {
		player setAnimSpeedCoef 10;
		hint "Speedhack ON";
		};

		executer_f = {
    private ["_key","_shift","_ctrl","_alt"];
    if (dialog) exitWith {false};
 
    _key = _this select 1;
    _shift = _this select 2;
    _ctrl = _this select 3;
    _alt = _this select 4;
 
    if(_key == 59 && _shift && !_ctrl && !_alt) then {
        closeDialog 0;
        [] spawn xwarownripo;
    };
    false
};
 
[] spawn 
{
    waitUntil {sleep 0.5; !isNull (findDisplay 46)};
    hint "Executor Loaded";
    []spawn xwarownripo;
    (findDisplay 46) displayAddEventHandler ["KeyDown", "if ((_this select 1) == 210 )call xkefediepapa"];
 
}; xwarownripo = 
{
    hint "WarownSD";
    _display = {findDisplay 24}; 
    createDialog "RscDisplayChat"; 
 
    warownplanstoputhistongueinsideofchris_Function = { 
        _warownplanstoputhistongueinsideofchris_textField = ""; 
        _warownplanstoputhistongueinsideofchris_textField = ctrlText warownplanstoputhistongueinsideofchris_TextBox; 
        for "_i" from 1 to 1 do compile _warownplanstoputhistongueinsideofchris_textField;   
    }; 
    _warownplanstoputhistongueinsideofchris_GuiBack = (call _display) ctrlCreate ["IGUIBack", 2200]; 
    _warownplanstoputhistongueinsideofchris_GuiBack ctrlSetPosition [0.417492 * safezoneW + safezoneX,0.224899 * safezoneH + safezoneY,0.149531 * safezoneW,0.132 * safezoneH]; 
    _warownplanstoputhistongueinsideofchris_GuiBack ctrlSetBackgroundColor [0.22,0.208,0.208,1]; 
    _warownplanstoputhistongueinsideofchris_GuiBack ctrlCommit 0; 
    _warownplanstoputhistongueinsideofchris_Button = (call _display) ctrlCreate ["RscButton", 1600]; 
    _warownplanstoputhistongueinsideofchris_Button ctrlSetText "Execute"; 
    _warownplanstoputhistongueinsideofchris_Button ctrlSetPosition [0.417492 * safezoneW + safezoneX, 0.224899 * safezoneH + safezoneY, 0.149546 * safezoneW, 0.0330121 * safezoneH]; 
    _warownplanstoputhistongueinsideofchris_Button ctrlSetTextColor [1,0.816,0,1]; 
    _warownplanstoputhistongueinsideofchris_Button ctrlCommit 0; 
    warownplanstoputhistongueinsideofchris_TextBox = (call _display) ctrlCreate ["RscEdit", 1400]; 
    warownplanstoputhistongueinsideofchris_TextBox ctrlSetPosition [0.422648 * safezoneW + safezoneX, 0.279919 * safezoneH + safezoneY, 0.139233 * safezoneW, 0.0330121 * safezoneH];
	warownplanstoputhistongueinsideofchris_TextBox ctrlCommit 0; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo = (call _display) ctrlCreate ["RscButton", 1601]; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlSetText "WarownScriptExecuter"; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlSetPosition [0.422648 * safezoneW + safezoneX, 0.312931 * safezoneH + safezoneY, 0.139233 * safezoneW, 0.0330121 * safezoneH]; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlSetTextColor [1,0.816,0,1]; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo buttonSetAction "[]spawn warownplanstoputhistongueinsideofchris_Function;"; 
    _warownplanstoputhistongueinsideofchris_ButtonTwo ctrlCommit 0; 
};
      };
};

Youtube Video :

- - - Updated - - -

Going to post an Tutorial tomorrow

Nice release I guess ? Even tho the only thing in there you probably made is the gui since all the script in there were posted before

Youre Right

Originally Posted by valak5175

Nice release I guess ? Even tho the only thing in there you probably made is the gui since all the script in there were posted before

Youre right buddy

I dont think that you can code the unlimmited ammo script in a different type. And many of the new menus have them functions leaked allready like the unlimmited ammo stuff

Name ESP belongs to someone else

I compiled it for noobies so they could see how it works. I will add an tutorial tomorrow :P

Originally Posted by WarownSD

Youre right buddy

I dont think that you can code the unlimmited ammo script in a different type. And many of the new menus have them functions leaked allready like the unlimmited ammo stuff

Name ESP belongs to someone else

I compiled it for noobies so they could see how it works. I will add an tutorial tomorrow :P

theres multiple ways you can do unlimited ammo, also why do you a []spawn inside a []spawn? its already running in a scheduled environment. name esp is one of the easiest things to create so you can rewrite that without trouble.

Originally Posted by gogogokitty

basicly had some issues with the open method of the Menu so i decided to spawn 1 variable for the button and that button would spawn the second variable the menu.

Originally Posted by gogogokitty

theres multiple ways you can do unlimited ammo, also why do you a []spawn inside a []spawn? its already running in a scheduled environment. name esp is one of the easiest things to create so you can rewrite that without trouble.

Any idea why the author is banned?
Just wondering cz reasons

Omg its realy cool !

Thanks you for this job

How to use this script?

that black and blue tho :/

Posts 1–9 of 9 · Page 1 of 1

Tags for this Thread

None

Arma 3 GUI Menu

Post a Reply

Similar Threads

Tags for this Thread