Advertisement
Guest User

player_supply.sqf

a guest
Jan 7th, 2018
464
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.84 KB | None | 0 0
  1. //by juandayz updated 01/06/2018
  2.  
  3. private ["_rand_player","_debug_marker","_loot","_loot_lists","_loot2","_loot3","_loot4","_hint","_positionp","_position","_waypointsrange","_aiskin","_plane_class","_boxtype","_loot_lists","_loot","_positionp","_this","_center_1","_unitGroup","_pilot","_carrier","_xpos","_ypos",
  4. "_cor_y","_cor_x","_waypos1","_waypos2","_waypos3","_waypos4","_wp1","_wp2","_wp3","_wp4","_waypointend","_positiondrop","_box","_chute","_smoke","_positionarray"];
  5.  
  6.  
  7. if ((count playableUnits) < 1) exitWith {};
  8.  
  9. _rand_player = playableUnits call BIS_fnc_selectRandom;
  10. _positionp = [_rand_player] call FNC_GetPos;
  11.  
  12.  
  13.  
  14.  
  15. _loot_lists = [
  16. [
  17. ["ChainSawR","ItemSledge","ItemPickaxe"],
  18. ["MortarBucket","MortarBucket","bulk_ItemSodaCokeFull","bulk_ItemWire","bulk_PartGeneric","PartPlywoodPack","PartPlankPack","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","PartGeneric"]
  19. ],
  20. [
  21. ["ItemKeyKit"],
  22. ["ItemAntibiotic","ItemBandage","ItemAntibacterialWipe","ItemMorphine","ItemPainkiller","equip_string","equip_gauze","equip_gauzepackaged","equip_rag","equip_herb_box"]
  23. ],
  24. [
  25. ["ItemMachete","ItemPickaxe","ItemSledge"],
  26. ["ItemRuby","ItemMixOil","plot_pole_kit","PartOre"]
  27. ],
  28. [
  29. ["ChainSaw"],
  30. ["ItemDesertTent","ItemGenerator","equip_brick","equip_duct_tape","equip_rope","equip_hose","equip_lever","equip_nails","equip_metal_sheet","equip_1inch_metal_pipe","equip_2inch_metal_pipe","ItemWire","ItemTankTrap","ItemCorrugated","ItemPole"]
  31. ],
  32. [
  33. ["ItemSledge"],
  34. ["ItemComboLock","ItemVault","ItemLockBox"]
  35. ],
  36. [
  37. ["ItemMachete"],
  38. ["ItemAntibiotic","ItemAntibacterialWipe"]
  39. ],
  40. [
  41. ["ItemSledge"],
  42. ["50Rnd_127x107_DSHKM","MortarBucket","MortarBucket","MortarBucket","MortarBucket","MortarBucket","MortarBucket","transfusionKit","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks"]
  43. ],
  44.  
  45. [
  46. ["ItemPickaxe"],
  47. ["PartWheel","PartWheel","PartWheel","PartGlass","PartGlass","PartGlass","PartEngine","PartEngine","PartVRotor","PartVRotor","PartFueltank","PartFueltank","ItemFuelcan","ItemFuelcan","ItemJerrycan","ItemJerrycan","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks","CinderBlocks"]
  48. ]
  49. ];
  50. _loot = _loot_lists call BIS_fnc_selectRandom;
  51. _loot2 = _loot_lists call BIS_fnc_selectRandom;
  52. _loot3 = _loot_lists call BIS_fnc_selectRandom;
  53. _loot4 = _loot_lists call BIS_fnc_selectRandom;
  54.  
  55. _waypointsrange = 50;//range to move
  56. _aiskin = "Survivor2_DZ";
  57. _plane_class = "AN2_DZ";
  58. _boxtype = "USOrdnanceBox";
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65. // Send message to users
  66. _hint = parseText format["<t align='center' color='#31db3c' shadow='2' size='1.55'>NEW EVENT</t><br/><t align='center' color='#ffffff'>!SUPPLY CRATES!Civil Defense Drops some supply crates.</t>"];
  67. RemoteMessage = ['hint', _hint];
  68. publicVariable "RemoteMessage";
  69.  
  70.  
  71. if (isNil "EPOCH_EVENT_RUNNING") then {
  72. EPOCH_EVENT_RUNNING = false;
  73. };
  74.  
  75. // Check for another event running
  76. if (EPOCH_EVENT_RUNNING) exitWith {
  77. diag_log("Event already running");
  78. };
  79.  
  80. EPOCH_EVENT_RUNNING = true;
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87. _this = createCenter west;
  88. _center_1 = _this;
  89. _unitGroup = createGroup _center_1;
  90. //
  91.  
  92. //spawnai
  93. _pilot = objNull;
  94. _pilot = _unitGroup createUnit [_aiskin, [(_positionp select 0) + 90, (_positionp select 1) + 100], [], 1, "NONE"];
  95. _pilot addEventHandler ["handleDamage", {false}];
  96. [_pilot] joinSilent _unitGroup;
  97.  
  98. sleep 1;
  99.  
  100. _carrier = createVehicle [_plane_class, [(_positionp select 0) + 50, (_positionp select 1) + 50],[], 0, "FLY"];
  101. _carrier setVehicleVarName "heli";
  102. _carrier setFuel 1;
  103. _carrier engineOn true;
  104. _carrier setVehicleAmmo 1;
  105. _carrier flyInHeight 150;
  106. _carrier setVehicleLock "LOCKED";
  107. _carrier addEventHandler ["GetOut",{(_this select 0) setFuel 0;(_this select 0) setDamage 1;}];
  108. _carrier addEventHandler ["handleDamage", {false}];
  109.  
  110. dayz_serverObjectMonitor set [count dayz_serverObjectMonitor,_carrier];
  111. _pilot assignAsDriver _carrier;
  112. _pilot moveInDriver _carrier;
  113.  
  114.  
  115.  
  116. _xpos = _positionp select 0;
  117. _ypos = _positionp select 1;
  118. _cor_y = -20;
  119. _cor_x = 20;
  120.  
  121.  
  122. // These are 4 waypoints in a NorthSEW around the center
  123. _waypos1 = [_xpos, _ypos+20, 0];
  124. _waypos2 = [_xpos+20, _ypos, 0];
  125. _waypos3 = [_xpos, _ypos-20, 0];
  126. _waypos4 = [_xpos-20, _ypos, 0];
  127.  
  128. _wp1 = _unitGroup addWaypoint [[((_positionp select 0) + _cor_y),((_positionp select 1) + _cor_x),50],0];
  129. _wp1 setWaypointType "MOVE";
  130.  
  131.  
  132. _wp2 = _unitGroup addWaypoint [_waypos2, _waypointsrange];
  133. _wp2 setWaypointType "MOVE";
  134. _wp3 = _unitGroup addWaypoint [_waypos3, _waypointsrange];
  135. _wp3 setWaypointType "MOVE";
  136. _wp4 = _unitGroup addWaypoint [_waypos4, _waypointsrange];
  137. _wp4 setWaypointType "MOVE";
  138. _waypointend = _unitGroup addWaypoint [[_xpos,_ypos, 0], _waypointsrange];
  139. _waypointend setWaypointType "CYCLE";
  140.  
  141.  
  142.  
  143.  
  144.  
  145. _positiondrop = [(_positionp select 0) + 50, (_positionp select 1) + 50,25];
  146. _box = _boxtype createVehicle _positiondrop;
  147. dayz_serverObjectMonitor set [count dayz_serverObjectMonitor,_box];
  148.  
  149.  
  150.  
  151. _chute = createVehicle ["ParachuteMediumEast", getPos _box, [], 0, "FLY"];
  152. dayz_serverObjectMonitor set [count dayz_serverObjectMonitor,_chute];
  153. _box attachTo [_chute, [0,0,3]];
  154. _smoke = "SmokeShellGreen" createVehicle (getPos _box);
  155. dayz_serverObjectMonitor set [count dayz_serverObjectMonitor,_smoke];
  156. _smoke attachTo [_box, [0,0,0]];
  157. _box addEventHandler ["handleDamage", {false}];
  158.  
  159. clearweaponcargoglobal _box;
  160. clearmagazinecargoglobal _box;
  161.  
  162. {
  163. _box addWeaponCargoGlobal [_x,1];
  164. } forEach (_loot select 0);
  165. {
  166. _box addMagazineCargoGlobal [_x,1];
  167. } forEach (_loot2 select 1);
  168.  
  169. {
  170. _box addWeaponCargoGlobal [_x,1];
  171. } forEach (_loot3 select 0);
  172. {
  173. _box addMagazineCargoGlobal [_x,1];
  174. } forEach (_loot4 select 1);
  175.  
  176. EPOCH_EVENT_RUNNING = false;
  177.  
  178. sleep 60;
  179.  
  180. deleteVehicle _carrier;
  181. deleteVehicle _pilot;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement