Guest User

Untitled

a guest
Jan 17th, 2019
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.80 KB | None | 0 0
  1. _weaponClass = "MP5SD";
  2. _weaponAmmo = ["30Rnd_9x19_MP5SD"];
  3. _itemBandage = ["ItemBandage"];
  4. _itemUn = "NVGoggles";
  5. _itemZwei = "ItemMap";
  6. _itemDrei = "ItemGPS";
  7.  
  8. _ammoCount = 1;
  9. _bandageCount = 3;
  10.  
  11. player addWeapon _weaponClass;
  12.  
  13. player addWeapon _itemUn;
  14.  
  15. player addWeapon _itemZwei;
  16.  
  17. player addWeapon _itemDrei;
  18.  
  19. for [{_i=0}, {_i < count _weaponAmmo}, {_i=_i+1}] do
  20. {
  21. for [{_x=0}, {_x < _ammoCount}, {_x=_x+1}] do
  22. {
  23. player addMagazine (_weaponAmmo select _i);
  24. };
  25. };
  26.  
  27. for [{_i=0}, {_i < count _itemBandage}, {_i=_i+1}] do
  28. {
  29. for [{_x=0}, {_x < _bandageCount}, {_x=_x+1}] do
  30. {
  31. player addMagazine (_itemBandage select _i);
  32. };
  33. };
  34.  
  35. marker_mapesp = true;
  36.  
  37. list_vec = (allMissionObjects "Plane")+(allMissionObjects "LandVehicle")+(allMissionObjects "Helicopter")+(allMissionObjects "Ship");
  38. list_wrecked = allMissionObjects "UH1Wreck_DZ";
  39. list_tents = allMissionObjects "TentStorage";
  40.  
  41.  
  42. //hint "Adding Markers on the map";
  43.  
  44. while {marker_mapesp} do
  45. {
  46.  
  47. unitList_player = allUnits; //getting all units
  48. totalunits = count unitList_player;
  49. //hint format["%1", totalunits];
  50.  
  51. o = 0;
  52. yo = 0;
  53.  
  54. for "o" from 0 to totalunits do
  55. {
  56. actualunit = unitList_player select o; //Player1
  57.  
  58. if ( isplayer actualunit && alive actualunit ) then
  59. {
  60. deleteMarkerLocal ("Player" + (str o));
  61. yo = o + 1;
  62. deleteMarkerLocal ("Player" + (str yo));
  63.  
  64. namePlayer = "";
  65. namePlayer = name actualunit;
  66.  
  67. mark_player = "Player" + (str o); //Player0, Player1, Player2
  68. mark_player = createMarkerLocal [mark_player,getPos actualunit];
  69. mark_player setMarkerTypeLocal "waypoint";
  70. mark_player setMarkerPosLocal (getPos actualunit);
  71. mark_player setMarkerColorLocal "ColorBlue";
  72. mark_player setMarkerTextLocal format ["%1",namePlayer];
  73. };
  74. };
  75.  
  76. unitList_vec = list_vec;
  77. totalunits_vec = count unitList_vec;
  78. i = 0;
  79. yo2 = 0;
  80.  
  81. for "i" from 0 to totalunits_vec do
  82. {
  83. actualunit_vec = unitList_vec select i;
  84.  
  85. if (!(actualunit_vec isKindOf "man") && !(actualunit_vec isKindOf "Survivor2")) then
  86. {
  87. deleteMarkerLocal ("Vehicle" + (str i));
  88. yo2 = i + 1;
  89. deleteMarkerLocal ("Vehicle" + (str yo2));
  90.  
  91. typeVec = "";
  92. typeVec = typeOf actualunit_vec;
  93.  
  94. mark = "Vehicle" + (str i);
  95. mark = createMarkerLocal [mark,getPos actualunit_vec];
  96. mark setMarkerTypeLocal "waypoint";
  97. mark setMarkerPosLocal (getPos actualunit_vec);
  98. mark setMarkerColorLocal "ColorRed";
  99. mark setMarkerTextLocal format ["%1", typeVec];
  100. };
  101. };
  102.  
  103. unitList_wrecked = list_wrecked;
  104. totalunits_wrecked = count unitList_wrecked;
  105.  
  106. p = 0;
  107. yo3 = 0;
  108.  
  109. for "p" from 0 to totalunits_wrecked do
  110. {
  111. actualunit_wrecked = unitList_wrecked select p;
  112.  
  113. deleteMarkerLocal ("Wrecked"+ (str p));
  114. yo3 = p + 1;
  115. deleteMarkerLocal ("Wrecked"+ (str yo3));
  116.  
  117. mark_wrecked = "Wrecked" + (str p);
  118. mark_wrecked = createMarkerLocal [mark_wrecked,getPos actualunit_wrecked];
  119. mark_wrecked setMarkerTypeLocal "waypoint";
  120. mark_wrecked setMarkerPosLocal (getPos actualunit_wrecked);
  121. mark_wrecked setMarkerColorLocal "ColorOrange";
  122. mark_wrecked setMarkerTextLocal "Crashed-Heli";
  123. };
  124.  
  125. unitList_tents = list_tents;
  126. totalunits_tents = count unitList_tents;
  127. //hint format["%1", totalunits_tents];
  128. q = 0;
  129. yo4 = 0;
  130.  
  131. for "q" from 0 to totalunits_tents do
  132. {
  133. actualunit_tents = unitList_tents select q;
  134.  
  135. deleteMarkerLocal ("Tents"+ (str q));
  136. yo4 = q + 1;
  137. deleteMarkerLocal ("Tents"+ (str yo4));
  138.  
  139. mark_tents = "Tents" + (str q);
  140. mark_tents = createMarkerLocal [mark_tents,getPos actualunit_tents];
  141. mark_tents setMarkerTypeLocal "waypoint";
  142. mark_tents setMarkerPosLocal (getPos actualunit_tents);
  143. mark_tents setMarkerColorLocal "ColorGreen";
  144. };
  145.  
  146. sleep 0.1;
  147. };
  148.  
  149. k = 0;
  150. for "k" from 0 to 2000 do
  151. {
  152. deleteMarkerLocal ("Player"+ (str k));
  153. deleteMarkerLocal ("Vehicle"+ (str k));
  154. deleteMarkerLocal ("Wrecked"+ (str k));
  155. deleteMarkerLocal ("Tents"+ (str k));
  156. };
  157.  
  158.  
  159.  
  160. hint "Items Added!";
Add Comment
Please, Sign In to add comment