Advertisement
Guest User

Untitled

a guest
Feb 26th, 2020
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.39 KB | None | 0 0
  1. BooBooski = {
  2. JustClickCloseOnThisMessage = findDisplay 46 createDisplay "RscDisplayEmpty";
  3.  
  4. abraCaDabruh =
  5. {
  6. _scriptname = _this select 0;
  7. _scriptname2 = "Target = " + _scriptname;
  8.  
  9. player removeWeapon currentWeapon player;
  10. [player, _scriptname, 6] call BIS_fnc_addWeapon;
  11.  
  12. };
  13.  
  14.  
  15. Text1 = JustClickCloseOnThisMessage ctrlCreate ["IGUIBack", -1];
  16. Text1 ctrlSetPosition [0.70,-0.2,0.37,1.5];
  17. Text1 ctrlSetBackgroundColor [0.031,0.031,0.043,.35];
  18. Text1 ctrlSetFontHeight 0.0275;
  19. Text1 ctrlCommit 0;
  20.  
  21. Text2 = JustClickCloseOnThisMessage ctrlCreate ["IGUIBack", -1];
  22. Text2 ctrlSetPosition [1.091,-0.2,0.37,1.5];
  23. Text2 ctrlSetBackgroundColor [0.031,0.031,0.043,.35];
  24. Text2 ctrlSetFontHeight 0.0275;
  25. Text2 ctrlCommit 0;
  26.  
  27.  
  28. New = JustClickCloseOnThisMessage ctrlCreate ["IGUIBack", -1];
  29. New ctrlSetPosition [0.70,-0.2,0.37,0.058];
  30. New ctrlSetBackgroundColor [0.031,0.031,0.043,.5];
  31. New ctrlSetFontHeight 0.0275;
  32. New ctrlCommit 0;
  33.  
  34.  
  35. New = JustClickCloseOnThisMessage ctrlCreate ["IGUIBack", -1];
  36. New ctrlSetPosition [1.091,-0.2,0.37,0.058];
  37. New ctrlSetBackgroundColor [0.031,0.031,0.043,.5];
  38. New ctrlSetFontHeight 0.0275;
  39. New ctrlCommit 0;
  40.  
  41.  
  42. WeaponList = JustClickCloseOnThisMessage ctrlCreate ["RscListBox", 102];
  43. WeaponList ctrlSetPosition [0.70,-0.143,0.37,1.442]; //LIST ONE WEAPONS
  44. WeaponList ctrlSetBackgroundColor [0.031,0.031,0.043,.35];
  45. WeaponList ctrlSetFontHeight 0.0275;
  46. WeaponList ctrlCommit 0.1;
  47. lbClear WeaponList;
  48. WeaponList ctrlSetEventHandler ["LBDblClick", "[WeaponList lbText (lbCurSel WeaponList)] spawn abraCaDabruh;"];
  49. _cfgvehicles_LPME = configFile >> "cfgWeapons";
  50. for "_ik"
  51. from 0 to(count _cfgvehicles_LPME) - 1 do {
  52. _vehicle_LP = _cfgvehicles_LPME select _ik;
  53. if (isClass _vehicle_LP) then {
  54.  
  55. _veh_type_LP = configName _vehicle_LP;
  56. _name = getText(configfile >> "cfgWeapons" >> _veh_type_LP >> "displayName");
  57. if ((getNumber(_vehicle_LP >> "scope") == 2) && (getText(_vehicle_LP >> "picture") != "")) then {
  58. WeaponList lbAdd _veh_type_LP;
  59. };
  60. };
  61. };
  62.  
  63.  
  64.  
  65.  
  66. };
  67.  
  68. [] spawn {
  69.  
  70. while {true} do {
  71.  
  72. if (inputAction "User5" > 0) then
  73.  
  74. {
  75.  
  76. waitUntil{inputAction "User5" > 0};
  77.  
  78. [] spawn BooBooski;
  79.  
  80. waitUntil{inputAction "User5" == 0};
  81.  
  82. };
  83.  
  84. };
  85.  
  86. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement