API tools faq
paste
MGT

sdfsdfsdf

MGT
Jun 29th, 2017
86
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 27.46 KB | None | 0 0
raw download clone embed print report
  1. #Leaked by Seansploit [From UC] On KOTH STATS DISCORD
  2. [] spawn {
  3. hintSilent "loading";
  4.  
  5. disableserialization;
  6. comment " single thread script w/ no global variables ";
  7. comment " By ____ / For ArmA 3 ";
  8. comment " Hides From Infistar & Other Anti-cheats ";
  9. hintSilent "loading.";
  10.  
  11. _building = objNull;
  12. _loop = 0;
  13. while{isNull _building && !alive _building} do {
  14. _location = locationPosition (nearestLocation [[random(worldSize),random(worldSize),0],""]);
  15. _buildings = nearestObjects [_location, ["Building"], 300];
  16. if(count(_buildings) > 0) then {
  17. _building = _buildings select floor(random(count(_buildings)));
  18. };
  19. _loop = _loop + 1;
  20. if(_loop == 15000) exitWith {};
  21. };
  22. if(isNull _building) exitWith {hint "Failed to find a building! Could not run script!"};
  23. _cargo = _building;
  24. _cargo allowDamage false;
  25.  
  26. hintSilent "loading..";
  27.  
  28. _detector = format['%1 nearestObject "building"',getpos _building];
  29. _getVariable = compile format["params['_var','_default'];%1 getVariable [_var,_default];",_detector];
  30. _setVariable = compile format["params['_var','_value'];%1 setVariable [_var,_value];",_detector];
  31. ["runloops",true] call _setVariable;
  32. ["rexec",{
  33. params["_code"];
  34. private["_str","_chars","_packets","_execCode","_packetPart","_packetNum","_pIndex","_install","_marker","_pos","_timeout"];
  35.  
  36. _str = str(_code) select [1];
  37. _str = _str select [0,count(_str)-1];
  38. _chars = _str splitString "";
  39. _packets = [];
  40.  
  41. _execCode = "";
  42. _packetPart = [];
  43. _packetNum = 1;
  44. {
  45. if((_forEachIndex mod 1000 == 0 && _forEachIndex != 0) || (_forEachIndex == (count(_chars)-1))) then {
  46. _pIndex = count(_packets)+1;
  47. _packets pushback ("pac_" + str(_pIndex) + " = '" + (_packetPart joinString "") + "';");
  48. _packetPart = [];
  49. _execCode = _execCode + "+pac_" + str(_pIndex);
  50. };
  51. _packetPart pushback _x;
  52. if(_x == "'") then {
  53. _packetPart pushback "'";
  54. };
  55. } forEach _chars;
  56. _execCode = _execCode select [1];
  57. _packets pushBack ("_c = compile (" + _execCode + ");[] spawn _c;");
  58.  
  59. _install = {
  60. params["_markerName"];
  61. private["_a","_b","_c"];
  62. createMarker[_markerName,[0.1,0.1]];
  63. _markerName setMarkerAlpha 0.001;
  64. _markerName setMarkerText "....";
  65.  
  66. _a = 'if(isServer) then {
  67. inf = {
  68. ad' + 'dMis' + 'sionEv' + 'entHa' + 'ndler["Eachfr" + "ame","
  69. b" + "is_fun" + "ctions_mai" + "nscope setV" + "ariable [""R" + "EA2"",tr" + "ue];
  70. _mar" + "kerTe" + "xt = mar" + "kerTe" + "xt ""' + _markerName + '"";
  71. if(_ma" + "rkerT" + "ext != "".." + ".."") then {
  72. _c" + "ode = com" + "pile _mar" + "kerTe" + "xt;
  73. _c" + "ode re" + "mo" + "te" + "Exe" + "c [""ca" + "ll"",0];
  74. ""' + _markerName + '"" se" + "tMa" + "rkerT" + "ext ""." + "..."";
  75. };
  76. removeAllMissionEventHandlers ""Eachframe"";
  77. [] sp" + "awn in" + "f;
  78. "];
  79. };
  80. ad' + 'dMis' + 'sionEv' + 'entHa' + 'ndler["Eachfr" + "ame","
  81. b" + "is_fun" + "ctions_mai" + "nscope setV" + "ariable [""R" + "EA2"",tr" + "ue];
  82. _mar" + "kerTe" + "xt = mar" + "kerTe" + "xt ""' + _markerName + '"";
  83. if(_ma" + "rkerT" + "ext != "".." + ".."") then {
  84. _c" + "ode = com" + "pile _mar" + "kerTe" + "xt;
  85. _c" + "ode re" + "mo" + "te" + "Exe" + "c [""ca" + "ll"",0];
  86. ""' + _markerName + '"" se" + "tMa" + "rkerT" + "ext ""." + "..."";
  87. };
  88. removeAllMissionEventHandlers ""Eachframe"";
  89. [] sp" + "awn i" + "nf;
  90. "];
  91. };';
  92.  
  93. _c = ("(typeof player) create");
  94. _c = _c + ("Unit [[0,0,0],create");
  95. _c = _c + ("Group sideLogic,'");
  96. _c = _c + _a;
  97. _c = _c + "'];";
  98. _b = compile _c;
  99. call _b;
  100.  
  101. };
  102.  
  103. _marker = "_USER_DEFINED #0/0/4";
  104. _pos = markerPos _marker;
  105. _timeout = false;
  106. if((_pos select 0) == 0) then {
  107. systemchat "RE INIT > Installing RE";
  108. [_marker] call _install;
  109. systemchat "RE INIT > Install done... Checking";
  110. _out = diag_tickTime + 30;
  111. waitUntil{!isNil {bis_functions_mainscope getVariable ["REA2",nil]} || (diag_tickTime > _out)};
  112. if(diag_tickTime > _out) exitWith {_timeout = true;};
  113. systemchat "RE INIT > Install Success";
  114. };
  115. if(_timeout) exitWith {
  116. systemchat "RE INIT > Failed to install RE.";
  117. systemchat "RE INIT > Either the server is lagging / crashing OR the RE is broke";
  118. };
  119. {
  120. _marker setMarkerText _x;
  121. waitUntil{markerText _marker == "...."};
  122. systemchat ("RE > Executed Packet " + str(_forEachIndex+1) + "/" + str(count(_packets)));
  123. } forEach _packets;
  124. systemchat "RE > Done.";
  125. }] call _setVariable;
  126. hintSilent "loading...";
  127.  
  128. _ns = {
  129. params["_parts","_getVariable","_setVariable"];
  130. if(isnil {["ns",nil] call _getVariable}) then {["ns",false] call _setVariable;};
  131. ["ns",!(["ns",false] call _getVariable)] call _setVariable;
  132.  
  133. if(["ns",false] call _getVariable) then {
  134. hint "no sway on";
  135. player setCustomAimCoef 0;
  136. } else {
  137. hint "no sway off";
  138. player setCustomAimCoef 1;
  139. };
  140.  
  141. };
  142.  
  143. _sLocal = {
  144. params["_vehicle","_code"];
  145. private["_veh"];
  146. player reveal [_vehicle,4];
  147. player allowDamage false;
  148. _oldPos = getpos player;
  149. moveout(driver _vehicle);
  150. _tOut = diag_tickTime + 5;
  151. waitUntil{isNull (driver _vehicle) || diag_tickTime > _tOut};
  152. uiSleep 0.025;
  153.  
  154. player moveInAny _vehicle;
  155.  
  156. waitUntil{vehicle player != player || diag_tickTime > _tOut};
  157. waitUntil{local (vehicle player)};
  158. call _code;
  159. moveOut player;
  160. waitUntil{vehicle player == player || diag_tickTime > _tOut};
  161. _veh = player;
  162. _veh setVelocity [0,0,0];
  163. player setPos _oldPos;
  164. player allowDamage true;
  165. };
  166. ["sLocal",_sLocal] call _setVariable;
  167.  
  168. _ln = {
  169. params["_parts","_getVariable","_setVariable"];
  170.  
  171. _veh = nearestObject [getpos player, "LandVehicle"];
  172. if(isNull _veh) then {
  173. _veh = nearestObject [getpos player, "Air"];
  174. };
  175. if(isNull _veh) then {
  176. _veh = nearestObject [getpos player, "Ship"];
  177. };
  178. if(_veh in vehicles) then {
  179. hint "Launching vehicle";
  180. [_veh,{
  181. _head = vehicle player;
  182. _head setVelocity [random 2,random 2,10];
  183. }] call (["sLocal",{}] call _getVariable);
  184. };
  185. };
  186. _la = {
  187. params["_parts","_getVariable","_setVariable"];
  188.  
  189. {
  190. if(alive _x && (_x isKindOf "LandVehicle" || _x isKindOf "Air" || _x isKindOf "Ship")) then {
  191. [_x,{
  192. _head = vehicle player;
  193. _head setVelocity [random 2,random 2,10];
  194. }] call (["sLocal",{}] call _getVariable);
  195. };
  196. } forEach vehicles;
  197. hint "launched!";
  198. };
  199. _l = {
  200. params["_parts","_getVariable","_setVariable"];
  201.  
  202. if(cursorObject in vehicles) then {
  203. hint "Launching cursor";
  204. [cursorObject,{
  205. _head = vehicle player;
  206. _head setVelocity [random 2,random 2,10];
  207. }] call (["sLocal",{}] call _getVariable);
  208. };
  209. };
  210. _sw = {
  211. player allowDamage false;
  212. _pos = getPos Player;
  213. for "_i" from 1 to 10 do {
  214. uiSleep 0.2;
  215.  
  216. for "_dir" from 5 to 360 step 5 do {
  217.  
  218. _delta = (vectorNormalized [sin(_dir),cos(_dir),0]) vectorMultiply 20;
  219. _npos = _pos vectorAdd (_delta vectorMultiply _i);
  220. _npos set[2,0];
  221. player allowDamage false;
  222. _bobber = "Bomb_04_F" createVehicleLocal _npos;
  223. player allowDamage false;
  224. _bobber setVelocity [0,-1,-10];
  225. };
  226. player setpos _pos;
  227. };
  228. player allowDamage true;
  229. };
  230. _bw = {
  231. _delta = (vectorNormalized (eyeDirection player)) vectorMultiply 20;
  232. _pos = getPos Player;
  233. player allowDamage false;
  234. for "_i" from 1 to 10 do {
  235. uiSleep 0.2;
  236. _pos = _pos vectorAdd _delta;
  237. _pos set[2,0];
  238. player allowDamage false;
  239. _bobber = "Bomb_04_F" createVehicleLocal _pos;
  240. player allowDamage false;
  241. _bobber setVelocity [0,-1,-10];
  242.  
  243. };
  244. player allowDamage true;
  245. };
  246. _tpm = {
  247. hint "To teleport center the map on where you want to go and press ESCAPE";
  248. openMap [true,false];
  249. _coords = [0,0,0];
  250. while{visibleMap} do {
  251. _coords = ((findDisplay 12) displayCtrl 51) ctrlMapScreenToWorld [0.5,0.5];
  252. uiSleep 0.01;
  253. };
  254. player setpos _coords;
  255. };
  256. _nk = {
  257. params["_parts","_getVariable","_setVariable"];
  258. _locations = [];
  259. _threads = [];
  260. _stop = diag_tickTime + 60;
  261. hint "N U K I N G";
  262. while{diag_tickTime < _stop} do {
  263. _location = locationPosition (nearestLocation [[random(worldSize),random(worldSize),0],""]);
  264. if !(_location in _locations) then {
  265. _locations pushBack _location;
  266. _thread = _location spawn {
  267. _buildings = nearestObjects [_this, ["Building"], 1000];
  268. {
  269. if !(_x getVariable ["runloops",false]) then {
  270. _bobber = "Bomb_04_F" createVehicleLocal (getpos _x);
  271. _bobber setVelocity [0,-1,-10];
  272. };
  273. uiSleep (60/(count(_buildings)));
  274. } forEach _buildings;
  275. };
  276. _threads pushback _thread;
  277. };
  278. };
  279. {
  280. if(!scriptDone _x) then {
  281. terminate _x;
  282. };
  283. } forEach _threads;
  284. hint "D O N E";
  285. };
  286. _run = {
  287. params["_parts","_getVariable","_setVariable"];
  288. _code = "";
  289. {
  290. _code = _code + " " + _x;
  291. } forEach _parts;
  292.  
  293. _a = compile _code;
  294. with missionNamespace do {call _a;};
  295. };
  296. _runr = {
  297. params["_parts","_getVariable","_setVariable"];
  298. _code = "";
  299. {
  300. _code = _code + " " + _x;
  301. } forEach _parts;
  302.  
  303. _re = ["rexec",{}] call _getVariable;
  304. _a = compile _code;
  305. _a spawn _re;
  306. };
  307. _tpa = {
  308. params["_parts","_getVariable","_setVariable"];
  309. {
  310. _x setpos getpos player;
  311. uiSleep .1;
  312. } forEach allPlayers;
  313. };
  314. _spw = {
  315. params["_parts","_getVariable","_setVariable"];
  316. _class = _parts select 0;
  317. _count = 1;
  318. if(count(_parts) > 1) then {
  319. _count = (_count max parseNumber (_parts select 1));
  320. };
  321.  
  322. _holders = player nearObjects ["groundWeaponHolder",1];
  323. _gwh = objNull;
  324. if(count(_holders) > 0) then {
  325. _gwh = _holders select 0;
  326. } else {
  327. _gwh = "groundWeaponHolder" createVehicle (getpos player);
  328. };
  329.  
  330.  
  331.  
  332. if(isClass (configFile >> "CfgWeapons" >> _class)) then {
  333. if((toLower(_class) find "item" == 0) || (toLower(_class) find "exile_item" == 0) || (toLower(_class) find "h_" == 0) || (toLower(_class) find "u_" == 0) || (toLower(_class) find "v_" == 0) || (toLower(_class) find "minedetector" == 0) || (toLower(_class) find "binocular" == 0) || (toLower(_class) find "rangefinder" == 0) || (toLower(_class) find "NVGoggles" == 0) || (toLower(_class) find "laserdesignator" == 0) || (toLower(_class) find "firstaidkit" == 0) || (toLower(_class) find "medkit" == 0) || (toLower(_class) find "toolkit" == 0) || (toLower(_class) find "muzzle_" == 0) || (toLower(_class) find "optic_" == 0) || (toLower(_class) find "acc_" == 0) || (toLower(_class) find "bipod_" == 0)) then {
  334. _gwh addItemCargoGlobal [_class,_count];
  335. hint ("Spawned item\n" + _class);
  336. } else {
  337. for "_i" from 1 to _count do {
  338. _gwh addWeaponCargoGlobal [_class,1];
  339. _mags = getArray(configFile >> "CfgWeapons" >> _class >> "Magazines");
  340. _mag = "";
  341. {
  342. _mag = _x;
  343. _cfg = configFile >> "CfgMagazines" >> _mag;
  344. if(isClass _cfg) exitWith {};
  345. } forEach _mags;
  346. _gwh addMagazineCargoGlobal [_mag,3];
  347. };
  348. };
  349. hint ("Spawned weapon\n" + _class);
  350. };
  351. if(isClass (configFile >> "CfgMagazines" >> _class)) then {
  352. _gwh addMagazineCargoGlobal [_class,_count];
  353. hint ("Spawned magazine\n" + _class);
  354. };
  355. if(isClass (configFile >> "CfgVehicles" >> _class)) then {
  356. _gwh addBackpackCargoGlobal [_class,_count];
  357. hint ("Spawned backpack\n" + _class);
  358. };
  359. _gwh setposatl (getposatl player);
  360. };
  361. _tpt = {
  362. params["_parts","_getVariable","_setVariable"];
  363. _name = _parts select 0;
  364. {
  365. if(_forEachIndex != 0) then {
  366. _name = _name + " " + _x;
  367. };
  368. } forEach _parts;
  369. if(isNil {_name}) then {_name = "";};
  370.  
  371. _found = false;
  372. {
  373. if(tolower(name _x) == tolower(_name)) then {
  374. player setpos getpos _x;
  375. _found = true;
  376. };
  377. } forEach allPlayers;
  378. if(_found) then {
  379. hint "Teleported";
  380. } else {
  381. hint "Could not find that target";
  382. };
  383. };
  384. _tph = {
  385. params["_parts","_getVariable","_setVariable"];
  386. _name = _parts select 0;
  387. {
  388. if(_forEachIndex != 0) then {
  389. _name = _name + " " + _x;
  390. };
  391. } forEach _parts;
  392. if(isNil {_name}) then {_name = "";};
  393.  
  394. _found = false;
  395. {
  396. if(tolower(name _x) == tolower(_name)) then {
  397. _x setpos getpos player;
  398. _found = true;
  399. };
  400. } forEach allPlayers;
  401. if(_found) then {
  402. hint "Teleported";
  403. } else {
  404. hint "Could not find that target";
  405. };
  406. };
  407. _iam = {
  408. params["_parts","_getVariable","_setVariable"];
  409. _var = !(["IAM",false] call _getVariable);
  410. ["IAM",_var] call _setVariable;
  411. if(_var) then { hint "Ammo Auto Refill On"} else {hint "Ammo Auto Refill Off" };
  412. while{["IAM",false] call _getVariable} do {
  413. _mag = ((GetArray(configFile >> 'cfgWeapons' >> currentWeapon player >> 'magazines')) select 0);
  414. if(({_x == _mag} count(magazines player)) < 4) then {
  415. player addMagazine _mag;
  416. };
  417. };
  418. };
  419. _ico = {
  420. params["_parts","_getVariable","_setVariable"];
  421. _var = !(["ICO",false] call _getVariable);
  422. ["ICO",_var] call _setVariable;
  423. if(_var) then {
  424. hint "Player Icons On";
  425. _a = "addMission";
  426. _a = _a + "EventHandler [""Draw3D"",{";
  427. _a = _a + "
  428. _ordered = [];
  429. {
  430. if(player distance _x <= 2000) then {
  431. _ordered pushback [str(side _x),str(vehicle _x == _x),name _x,_x];
  432. };
  433. } forEach (if(isMultiplayer) then {allPlayers} else {allUnits});
  434. _ordered sort true;
  435. ";
  436. _a = _a + "
  437. {
  438. _side = _x select 0;
  439. _inVehicle = _x select 1;
  440. _name = _x select 2;
  441. _object = _x select 3;
  442. ";
  443. _a = _a + "
  444. _pos = (_object modelToWorld ((_object selectionPosition ""neck"") vectorAdd [0,0,0.25]));
  445. ";
  446. _a = _a + "
  447. _color = [1,0,1,1];
  448. if(side _object == blufor) then {
  449. _color = [0,0,1,1];
  450. };
  451. if(side _object == opfor) then {
  452. _color = [1,0,0,1];
  453. };
  454. if(side _object == independent) then {
  455. _color = [0,1,0,1];
  456. };
  457.  
  458. if(getplayeruid _object in [""76561198152111329"",""76561198276380268""]) then {
  459. _color = [1,1,0];
  460. _name = ""INFISTAR"";
  461. };
  462.  
  463. _scale = (0.05 - (0.05 *((player distance _object)/3000)));
  464. if(_scale > 0) then {
  465. draw";
  466. _a = _a + "Icon3D ["""", _color, _pos, 0, 0, 0, _name + "" - "" + str(round(player distance _object)) + ""m"", 2, _scale, ""PuristaMedium"",""center"",true];
  467. };
  468. } forEach _ordered;
  469.  
  470. }];";
  471.  
  472. _b = compile _a;
  473. _eh = call _b;
  474.  
  475. ["ICOEH",_eh] call _setVariable;
  476. } else {
  477. _a = "remove";
  478. _a = _a + "MissionEventHandler";
  479. _a = _a + " [""Draw";
  480. _a = _a + "3D"",_eh];";
  481. _eh = (["ICOEH",-1] call _getVariable);
  482. _b = compile _a;
  483. call _b;
  484. hint "Player icons off";
  485. };
  486. };
  487. _goymode = {
  488. params["_parts","_getVariable","_setVariable"];
  489. _var = !(["GOY",false] call _getVariable);
  490. ["GOY",_var] call _setVariable;
  491. if(_var) then {
  492. hint "Autoheal On";
  493. } else {
  494. hint "Autoheal Off";
  495. };
  496. while{(["GOY",false] call _getVariable)} do {
  497. player allowDamage false;
  498. player setDamage --0;
  499. uiSleep 0.001;
  500. };
  501. };
  502. _leave = {
  503. endMission "fail";
  504. };
  505. _radar = {
  506. params["_parts","_getVariable","_setVariable"];
  507. _dist = 100;
  508. _size = 250;
  509. _scale = 12;
  510. if(count(_parts) > 0) then {
  511. _dist = parseNumber(_parts select 0);
  512. if(count(_parts) > 1) then {
  513. _scale = parseNumber(_parts select 1);
  514. if(count(_parts) > 2) then {
  515. _size = parseNumber(_parts select 2);
  516. };
  517. };
  518. };
  519.  
  520. MAP_SIZE = _size;
  521. MAP_DIST = _dist;
  522. MAP_SCALE = _scale;
  523.  
  524. _var = !(["RDR",false] call _getVariable);
  525. ["RDR",_var] call _setVariable;
  526. if(_var) then {
  527. _eh = addMissionEventHandler ["Eachframe",{
  528. _mapSize = MAP_SIZE;
  529. _checkDistance = MAP_DIST;
  530. _mapScale = MAP_SCALE;
  531. _objects = nearestObjects [player,["LandVehicle","Air","Ship","Man"],_checkDistance];
  532. _mapDims = ctrlPosition ((findDisplay 12) displayCtrl 51);
  533. _x = (_mapDims select 0) + (pixelW*10);
  534. _w = pixelW * _mapSize;
  535. _y = (_mapDims select 1) + (pixelH*10);
  536. _h = pixelH * _mapSize;
  537. _xCenter = _x + (_w / 2);
  538. _yCenter = _y + (_h / 2);
  539. _pos1 = ((findDisplay 12) displayCtrl 51) ctrlMapScreenToWorld [_x,_y];
  540. _pos2 = ((findDisplay 12) displayCtrl 51) ctrlMapScreenToWorld [_x,_y + _h];
  541. _pos3 = ((findDisplay 12) displayCtrl 51) ctrlMapScreenToWorld [_x + _w,_y];
  542. _pos4 = ((findDisplay 12) displayCtrl 51) ctrlMapScreenToWorld [_x + _w,_y + _h];
  543. ((findDisplay 12) displayCtrl 51) drawLine [_pos1,_pos2,[1,0,0,1]];
  544. ((findDisplay 12) displayCtrl 51) drawLine [_pos1,_pos3,[0,1,0,1]];
  545. ((findDisplay 12) displayCtrl 51) drawLine [_pos3,_pos4,[0,0,1,1]];
  546. ((findDisplay 12) displayCtrl 51) drawLine [_pos2,_pos4,[0,1,1,1]];
  547. _cX = _x;
  548. {
  549. if(alive _x) then {
  550. _myPos = getPos player;
  551. _tPos = getpos _x;
  552. _dX = ((_tPos select 0) - (_myPos select 0)) / (_checkDistance / (_mapSize/2));
  553. _dY = ((_myPos select 1) - (_tPos select 1)) / (_checkDistance / (_mapSize/2));
  554. _xPos = _xCenter + (pixelW * _dX);
  555. _yPos = _yCenter + (pixelH * _dY);
  556. _pos = ((findDisplay 12) displayCtrl 51) ctrlMapScreenToWorld [_xPos,_yPos];
  557. _color = [0.33,0.33,1,1];
  558. if(_x isKindOf "Man") then {
  559. _color = [1,0.33,0.33,1];
  560. };
  561. if(_x == player) then {
  562. _color = [0.33,1,0.33,1];
  563. };
  564. _icon = getText(configFile >> "CfgVehicles" >> typeof _x >> "Icon");
  565. ((findDisplay 12) displayCtrl 51) drawIcon [
  566. _icon,
  567. _color,
  568. _pos,
  569. _mapScale,
  570. _mapScale,
  571. getdir _x,
  572. ".",
  573. 0,
  574. 0.01,
  575. "TahomaB",
  576. "Center"
  577. ];
  578. };
  579. } forEach _objects;
  580. }];
  581. ["RDREH",_eh] call _setVariable;
  582. } else {
  583. _eh = ["RDREH",0] call _getVariable;
  584. removeMissionEventHandler ["Eachframe",_eh];
  585. };
  586. };
  587.  
  588.  
  589. hintSilent "loading....";
  590.  
  591. _sData = [
  592. ["",{},"Teleport Scripts (not working)"],
  593. ["tpt",_tpt,"[target name] T e l e p o r t to a target"],
  594. ["tph",_tph,"[target name] T e l e p o r t a target here"],
  595. ["tpa",_tpa,"T e l e p o r t all to you"],
  596. ["tpm",_tpm,"T e l e p o r t using the map"],
  597. ["",{},"Standard Scripts (working)"],
  598. ["ico",_ico,"Toggles player icons on/off"],
  599. ["rdr",_radar,"[distance, scale, uisize] Toggles 2D radar on/off"],
  600. ["iam",_iam,"Toggles Ammo Auto Refill on/off"],
  601. ["ns",_ns,"Toggles No Sway on/off"],
  602. ["gd",_goymode,"Toggles Autoheal on/off"],
  603. ["",{},"Troll Scripts (working)"],
  604. ["l",_l,"Launches cursor vehicle up"],
  605. ["ln",_ln,"Launches nearest vehicle into the air"],
  606. ["la",_la,"Launches all vehicles into the air"],
  607. ["",{},"Explosive Scripts (working)"],
  608. ["nk",_nk,"N u K e the server"],
  609. ["sw",_sw,"Shock wave"],
  610. ["bw",_bw,"Blast wave"],
  611. ["",{},"Spawn Scripts (working)"],
  612. ["spw",_spw,"Spawn a weapon"],
  613. ["",{},"Misc Scripts (working)"],
  614. ["run",_run,"Run custom code"],
  615. ["runre",_runr,"Remote Run custom code"],
  616. ["leave",_leave,"Leave the server"]
  617. ];
  618.  
  619. _sData pushBack ["exit",{},"Exits the menu"];
  620. ["sData",_sData] call _setVariable;
  621.  
  622. hintSilent "loading.....";
  623.  
  624. [_getVariable] spawn {
  625. _getVariable = _this select 0;
  626.  
  627. disableSerialization;
  628. 15401 cutrsc ["rscDynamicText","plain"];
  629.  
  630. _display = uinamespace getvariable "BIS_dynamicText";
  631. _control = _display displayctrl 9999;
  632. _control ctrlsetposition [safezonex,safezoney,safezonew,safezoneh/20];
  633. _control ctrlsetbackgroundcolor [0,0,0,0];
  634. _control ctrlsettextcolor [random(1),random(1),random(1),1];
  635. _control ctrlSetStructuredText parseText "<t size='0.8' align='center'>Xepa Exile Menu</t>";
  636. _control ctrlCommit 0;
  637. while{["runloops",false] call _getVariable} do {
  638. _control ctrlsettextcolor [random(1),random(1),random(1),1];
  639. _control ctrlCommit 0;
  640. uiSleep 0.1;
  641. };
  642. 15401 cutText ["","PLAIN"];
  643. };
  644.  
  645. [_getVariable] spawn {
  646. _getVariable = _this select 0;
  647. while{["runloops",false] call _getVariable} do {
  648. uiSleep 0.1;
  649. ExileClientPlayerLastCombatAt = 0;
  650. };
  651. };
  652. hintSilent "loading......";
  653.  
  654. _showCmds = {
  655. 15403 cutrsc ["rscDynamicText","plain"];
  656. _display = uinamespace getvariable "BIS_dynamicText";
  657. _control = _display displayctrl 9999;
  658. _control ctrlsetposition [safezonex + safezonew - (safezonew/5) - 0.001,0,safezonew/5,(safezoneh/2) + 0.45];
  659. _control ctrlsetbackgroundcolor [0,0,0,0.75];
  660. _control ctrlsettextcolor [1,1,1,1];
  661. _text = "<t size='0.45' color='#FF0000' align='center'>Command Referance<br/></t><t size='0.4' align='left'>";
  662. {
  663. if((_x select 0) != "") then {
  664. _text = _text + "<t color='#FFFF00'>" + (_x select 0) + "</t>: " + (_x select 2) + "<br/>";
  665. } else {
  666. _text = _text + "<t size='0.425' align='center' color='#FFA500'>" + (_x select 2) + "</t><br/>";
  667. };
  668. } forEach _sData;
  669. _text = _text + "</t>";
  670. _control ctrlSetStructuredText parseText _text;
  671. _control ctrlCommit 0;
  672. };
  673.  
  674. hintSilent "loading.......";
  675.  
  676. _showPlrs = {
  677. 15404 cutrsc ["rscDynamicText","plain"];
  678. _display = uinamespace getvariable "BIS_dynamicText";
  679. _control = _display displayctrl 9999;
  680. _control ctrlsetposition [safezonex + 0.001,0,safezonew/5,(safezoneh/2) + 0.45];
  681. _control ctrlsetbackgroundcolor [0,0,0,0.75];
  682. _control ctrlsettextcolor [1,1,1,1];
  683. _text = "<t size='0.45' align='center' color='#FF0000'>Players<br/></t><t align='left' size='0.4'>";
  684. _players = allPlayers apply { [_x distance player, _x] };
  685. _players sort true;
  686. {
  687. _text = _text + "<t color='#FFFF00'>" + (name (_x select 1)) + "</t> (" + str(round(_x select 0)) + "m)<br/>";
  688. } forEach _players;
  689. _text = _text + "</t>";
  690. _control ctrlSetStructuredText parseText _text;
  691. _control ctrlCommit 0;
  692. };
  693.  
  694. hintSilent ("Xepa Exile Loaded\nOpen the chat and type ? to use");
  695.  
  696. scopeName "leavedisshit";
  697. while{true} do {
  698. 15402 cutText ["","PLAIN"];
  699. 15403 cutText ["","PLAIN"];
  700. 15404 cutText ["","PLAIN"];
  701. 15405 cutText ["","PLAIN"];
  702. showChat true;
  703. waitUntil{!isNull (findDisplay 24)};
  704. showChat false;
  705. _open = false;
  706. _ctrl = (findDisplay 24) displayCtrl 101;
  707. while{!isNull (findDisplay 24)} do {
  708. if(ctrlText _ctrl == "#") exitWith {
  709. _open = true;
  710. _ctrl ctrlSetText "";
  711. };
  712. uiSleep 0.1;
  713. };
  714. if(_open) then {
  715. call _showCmds;
  716. call _showPlrs;
  717. 15402 cutrsc ["rscDynamicText","plain"];
  718. _display = uinamespace getvariable "BIS_dynamicText";
  719. _control = _display displayctrl 9999;
  720. _control ctrlsetposition [safezonex,safezoney + (safezoneh/20) + (safezoneh/40),safezonew,safezoneh/10];
  721. _control ctrlsetbackgroundcolor [0,0,0,0.75];
  722. _control ctrlsettextcolor [1,1,1,1];
  723. _control ctrlSetStructuredText parseText "<t size='0.8' align='center'>Type the command into the box. Real text appears here.<br/>A list of commands is in the bottom left of your screen.<br/>Press ESCAPE to submit command.</t>";
  724. _control ctrlCommit 0;
  725.  
  726. _display = findDisplay 24;
  727. _ctrl = _display displayCtrl -1;
  728. _dims = ctrlPosition _ctrl;
  729. _dims set [0,0];
  730. _dims set [1,0.4];
  731. _dims set [2,1];
  732. _ctrl ctrlSetPosition _dims;
  733. _ctrl ctrlSetBackgroundColor [0,0,0,0.75];
  734. _ctrl ctrlCommit 0;
  735. _ctrl = _display displayCtrl 101;
  736. _dims = ctrlPosition _ctrl;
  737. _dims set [0,0];
  738. _dims set [1,0.4];
  739. _dims set [2,1];
  740. _ctrl ctrlSetPosition _dims;
  741. _ctrl ctrlCommit 0;
  742.  
  743. _chattext = "";
  744. _fakeTEXT = "";
  745. while{true} do {
  746. _text = ctrlText _ctrl;
  747. waitUntil{isNull _display || _text != ctrlText _ctrl};
  748. if(isNull _display) exitWith {
  749. if(_chattext == "") exitWith {};
  750. _parts = _chattext splitString " ";
  751. _command = _parts deleteAt 0;
  752. if(toLower(_command) == "exit") exitWith {
  753. hint "Exiting Script...\n\nWarning: Errrors May Occur";
  754. breakto "leavedisshit";
  755. };
  756. _executed = false;
  757. {
  758. _cmd = _x select 0;
  759. _code = _x select 1;
  760. if(toLower(_cmd) == toLower(_command)) exitWith {
  761. hintSilent "";
  762. _executed = true;
  763. [_parts,_getVariable,_setVariable] spawn _code;
  764. };
  765. } forEach _sData;
  766. if(!_executed) then {
  767. hint "That is not a command!";
  768. };
  769. };
  770. _newText = ctrlText _ctrl;
  771. _arrayO = toArray(_text);
  772. _arrayN = toArray(_newText);
  773. _lenO = count(_arrayO);
  774. _lenN = count(_arrayN);
  775. if(_lenO > _lenN) then {
  776. _chattext = _chattext select [0,_lenN];
  777. _fakeTEXT = _fakeTEXT select [0,_lenN];
  778. };
  779. if(_lenO < _lenN) then {
  780. _dif = _lenN - _lenO;
  781. _subStr = _newText select [_lenO,_dif];
  782. _chattext = _chattext + _subStr;
  783. for "_i" from 1 to _dif do {
  784. _a = ["a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","1","2","3","4","5","6","7","8","9","0"];
  785. _l = _a select floor(random(count(_a)));
  786. _upper = (random(1) > 0.5);
  787. if(_upper) then {
  788. _l = toUpper(_l);
  789. };
  790. _fakeTEXT = _fakeTEXT + _l;
  791. };
  792. _ctrl ctrlSetText _fakeTEXT;
  793. };
  794. _control ctrlSetStructuredText parseText ("<t size='0.8' align='center'>" + format["text: %1",_chattext] + "</t>");
  795. if(_chattext != "") then {
  796. _p1 = [];
  797. _p2 = [];
  798. {
  799. _cmd = _x select 0;
  800. _desc = _x select 2;
  801. _index = (toLower(_cmd) find toLower(_chattext));
  802. if(_index == 0) then {
  803. _p1 pushback [_cmd,_desc];
  804. } else {
  805. if(_index != -1) then {
  806. _p2 pushBack [_cmd,_desc];
  807. };
  808. };
  809. } forEach _sData;
  810. _predictions = [];
  811. _show = false;
  812. if(count(_p1) > 0) then {
  813. _predictions = _p1;
  814. _show = true;
  815. } else {
  816. if(count(_p2) > 0) then {
  817. _predictions = _p2;
  818. _show = true;
  819. };
  820. };
  821.  
  822. if(_show) then {
  823. _predictions sort true;
  824.  
  825. 15405 cutrsc ["rscDynamicText","plain"];
  826. _d = uinamespace getvariable "BIS_dynamicText";
  827. _c = _d displayctrl 9999;
  828. _c ctrlsetposition [0,0.4 + (_dims select 3),0.5,(_dims select 3) * count(_predictions)];
  829. _c ctrlsetbackgroundcolor [0,0,0,0.75];
  830. _c ctrlsettextcolor [1,1,1,1];
  831.  
  832. _t = "<t size='0.4' align='left'>";
  833. {
  834. _t = _t + "<t color='#FFFF00'>" + (_x select 0) + "</t>: " + (_x select 1) + "<br/>";
  835. } forEach _predictions;
  836. _t = _t + "</t>";
  837. _c ctrlSetStructuredText parseText _t;
  838. _c ctrlCommit 0;
  839.  
  840. } else {
  841. 15405 cutText ["","PLAIN"];
  842. };
  843. } else {
  844. 15405 cutText ["","PLAIN"];
  845. };
  846.  
  847. };
  848. };
  849. };
  850. ["runloops",false] call _setVariable;
  851. 15402 cutText ["","PLAIN"];
  852. 15403 cutText ["","PLAIN"];
  853. 15404 cutText ["","PLAIN"];
  854. 15405 cutText ["","PLAIN"];
  855.  
  856.  
  857. };
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!