SHARE
TWEET

Untitled

a guest Feb 26th, 2020 95 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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. }
RAW Paste Data
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
Top