Advertisement
Guest User

Untitled

a guest
Jan 20th, 2019
58
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.23 KB | None | 0 0
  1. if (isNil "markPos") then {markPos = true;} else {markPos = !markPos};
  2. if(markPos) then {titleText ["r00tbag's markers added to map","PLAIN DOWN"]; titleFadeOut 4;};
  3.  
  4. if(isNil "markers") then { markers = []};
  5.  
  6.  
  7. player addweapon "ItemMap";
  8. player addweapon "ItemGPS";
  9.  
  10. //GLOBAL VARS START
  11.  
  12. //SLEEP
  13. GlobalSleep=4;//Sleep between update markers
  14. //SLEEP
  15.  
  16. //----------------------#Players#--------------------------
  17. AddPlayersToMap=true;
  18. AddPlayersToScreen=true;
  19. PlayersMarkerType=["x_art"];
  20. PlayerMarkerColor=[0,1,1,1];//two in the fourth degree is equal to sixteen, so there are 16 colors
  21. PlayerShowBloodInt=true;
  22. PlayerShowDistance=true;
  23. TheThicknessOfThePointPlayer=0.7;
  24. //----------------------#Players#--------------------------
  25.  
  26. //----------------------#Zombies#--------------------------
  27. AddZombieToMap=true;
  28. ZombieVisibleDistance=100;
  29. ZombieMarkerType="vehicle";
  30. ZombieMarkerColor="ColorGreen";
  31. ZombieName="Zombie";
  32. //----------------------#Zombies#--------------------------
  33. //----------------------#Vehicles#-------------------------
  34. AddVehicleToMap=true;
  35. VehicleMarkerType="vehicle";
  36. VehicleMarkerColor="ColorBlue";
  37. //----------------------#Vehicles#-------------------------
  38.  
  39. //----------------------#Tents#----------------------------
  40. AddTentsToMap=true;
  41. TentsMarkerType="vehicle";
  42. TentsMarkerColor="ColorYellow";
  43. //----------------------#Tents#----------------------------
  44.  
  45. //----------------------#Crashes#--------------------------
  46. AddCrashesToMap=true;
  47. CrashesMarkerType="vehicle";
  48. CrashesMarkerColor="ColorRed";
  49. //----------------------#Crashes#--------------------------
  50.  
  51. //GLOBAL VARS END
  52.  
  53. While {markPos} do {
  54. If (AddPlayersToMap) then {
  55. {
  56. (group _x) addGroupIcon PlayersMarkerType;
  57. if (PlayerShowBloodInt && PlayerShowDistance) then {
  58. BloodVal=round(_x getVariable["USEC_BloodQty",12000]);
  59. /*
  60. If (BloodVal>=11000) then {
  61. ColorHp="#5ED533";
  62. };
  63. If (BloodVal>=8000 && BloodVal<11000) then {
  64. ColorHp="#C3EE4F";
  65. };
  66. If (BloodVal>=4000 && BloodVal<8000) then {
  67. ColorHp="#CE6F27";
  68. };
  69. If (BloodVal>=2000 && BloodVal<4000) then {
  70. ColorHp="#CD480F";
  71. };
  72. If (BloodVal>=1000 && BloodVal<2000) then {
  73. ColorHp="#CE0F35";
  74. };
  75. If (BloodVal<1000) then {
  76. ColorHp="#FF0303";
  77. };
  78. _text=parseText format ["%1(<t color='%4'>%2</t>)<br/><t align='center'>%3</t>",name _x, BloodVal,round(player distance _x),(str ColorHp)];
  79. */
  80. (group _x) setGroupIconParams [PlayerMarkerColor, format["%1(%2)-%3",name _x,BloodVal,round(player distance _x)],TheThicknessOfThePointPlayer,true];
  81. };
  82. If (PlayerShowBloodInt && !PlayerShowDistance) then {
  83. BloodVal=round(_x getVariable["USEC_BloodQty",12000]);
  84. /*
  85. If (BloodVal>=11000) then {
  86. ColorHp="#5ED533";
  87. };
  88. If (BloodVal>=8000 && BloodVal<11000) then {
  89. ColorHp="#C3EE4F";
  90. };
  91. If (BloodVal>=4000 && BloodVal<8000) then {
  92. ColorHp="#CE6F27";
  93. };
  94. If (BloodVal>=2000 && BloodVal<4000) then {
  95. ColorHp="#CD480F";
  96. };
  97. If (BloodVal>=1000 && BloodVal<2000) then {
  98. ColorHp="#CE0F35";
  99. };
  100. If (BloodVal<1000) then {
  101. ColorHp="#FF0303";
  102. };
  103. _text=parseText format ["%1(<t color='ColorHP'>%2</t>)",name _x, BloodVal];
  104. */
  105. (group _x) setGroupIconParams [PlayerMarkerColor, format ["%1(%2)",name _x, BloodVal],TheThicknessOfThePointPlayer,true];
  106. };
  107. If (PlayerShowDistance && !PlayerShowBloodInt) then {
  108. //_text=parseText format ["%1<br/><t align='center'>%2</t>",name _x,round(player distance _x)];
  109. (group _x) setGroupIconParams [PlayerMarkerColor, format["%1-%2", name _x,round(player distance _x)],TheThicknessOfThePointPlayer,true];
  110. };
  111. if (!PlayerShowBloodInt && !PlayerShowDistance) then {
  112. //_text=parseText format ["%1",name _x];
  113. (group _x) setGroupIconParams [PlayerMarkerColor, format ["%1",name _x],TheThicknessOfThePointPlayer,true];
  114. };
  115. ParamsPlayersMarkers=[true,AddPlayersToScreen];
  116. setGroupIconsVisible ParamsPlayersMarkers;
  117. } forEach allUnits;
  118. };
  119.  
  120.  
  121. If (AddZombieToMap) then {
  122. _pos = getPos player;
  123. _zombies = _pos nearEntities ["zZombie_Base",ZombieVisibleDistance];
  124. _zmcount= count _zombies;
  125. k=0;
  126.  
  127. _markcount = count markers;
  128. for "k" from 0 to (_markcount -1) do
  129. {
  130. deleteMarkerLocal ("zmMarker"+ (str k));
  131. };
  132.  
  133. for "k" from 0 to _zmcount do {
  134.  
  135. _text = format ["zmMarker%1", k];
  136. markers set [k, _text];
  137. zm = _zombies select k;
  138. if(alive zm) then {
  139. pos = position zm;
  140. deleteMarkerLocal ("zmMarker"+ (str k));
  141. MarkerZm = "zmMarker" + (str k);
  142. ParamsZm=[MarkerZm,pos];
  143. MarkerZm = createMarkerLocal ParamsZm;
  144. MarkerZm setMarkerTypeLocal ZombieMarkerType;
  145. MarkerZm setMarkerPosLocal (pos);
  146. MarkerZm setMarkerColorLocal(ZombieMarkerColor);
  147. MarkerZm setMarkerTextLocal ZombieName;
  148. };
  149. };
  150. };
  151.  
  152. If (AddVehicleToMap) then {
  153. vehList = allmissionobjects "LandVehicle" + allmissionobjects "Air" + allmissionobjects "Boat";
  154. j = count vehList;
  155. i = 0;
  156.  
  157. for "i" from 0 to j do
  158. {
  159. veh = vehList select i;
  160. _name = gettext (configFile >> "CfgVehicles" >> (typeof veh) >> "displayName");
  161.  
  162. pos = position veh;
  163. deleteMarkerLocal ("vehMarker"+ (str i));
  164. MarkerVeh = "vehMarker" + (str i);
  165. ParamsVeh=[MarkerVeh,pos];
  166. MarkerVeh = createMarkerLocal ParamsVeh;
  167. MarkerVeh setMarkerTypeLocal VehicleMarkerType;
  168. MarkerVeh setMarkerPosLocal (pos);
  169. MarkerVeh setMarkerColorLocal(VehicleMarkerColor);
  170. MarkerVeh setMarkerTextLocal format ["%1",_name];
  171. };
  172. };
  173.  
  174. If (AddTentsToMap) then {
  175. tentList = allmissionobjects "Land_A_tent";
  176. j1 = count tentList;
  177. i1 = 0;
  178.  
  179. for "i1" from 0 to j1 do
  180. {
  181. tent = tentList select i1;
  182. _name = gettext (configFile >> "CfgVehicles" >> (typeof tent) >> "displayName");
  183. pos = position tent;
  184. deleteMarkerLocal ("tentMarker"+ (str i1));
  185. MarkerTent = "tentMarker" + (str i1);
  186. ParamsTent=[MarkerTent,pos];
  187. MarkerTent = createMarkerLocal ParamsTent;
  188. MarkerTent setMarkerTypeLocal TentsMarkerType;
  189. MarkerTent setMarkerPosLocal (pos);
  190. MarkerTent setMarkerColorLocal(TentsMarkerColor);
  191. MarkerTent setMarkerTextLocal format ["%1",_name];
  192. };
  193. };
  194. If (AddCrashesToMap) then {
  195. crashList = allmissionobjects "UH1Wreck_DZ";
  196. j2 = count tentList;
  197. i2 = 0;
  198.  
  199. for "i2" from 0 to j2 do
  200. {
  201. crash = crashList select i2;
  202. _name = gettext (configFile >> "CfgVehicles" >> (typeof crash) >> "displayName");
  203. pos = position crash;
  204. deleteMarkerLocal ("crashMarker"+ (str i2));
  205. MarkerCrash = "crashMarker" + (str i2);
  206. ParamsCrash=[MarkerCrash,pos];
  207. MarkerCrash = createMarkerLocal ParamsCrash;
  208. MarkerCrash setMarkerTypeLocal CrashesMarkerType;
  209. MarkerCrash setMarkerPosLocal (pos);
  210. MarkerCrash setMarkerColorLocal(CrashesMarkerColor);
  211. MarkerCrash setMarkerTextLocal format ["%1",_name];
  212. };
  213. };
  214. sleep GlobalSleep;
  215. {
  216. clearGroupIcons (group _x);
  217. } forEach allUnits;
  218. };
  219.  
  220.  
  221. if(!markPos) then {
  222.  
  223. If (AddPlayersToMap) then {
  224. {
  225. clearGroupIcons (group _x);
  226. } forEach allUnits;
  227. };
  228.  
  229. If (AddZombieToMap) then {
  230. _count = count markers;
  231. for "k" from 0 to (_count -1) do
  232. {
  233. deleteMarkerLocal ("zmMarker"+ (str k));
  234. };
  235. };
  236.  
  237. If (AddVehicleToMap) then {
  238. for "i" from 0 to j do
  239. {
  240. veh = vehList select i;
  241. deleteMarkerLocal ("vehMarker"+ (str i));
  242. };
  243. };
  244.  
  245. If (AddTentsToMap) then {
  246. for "i1" from 0 to j1 do
  247. {
  248. tent = tentList select i1;
  249. deleteMarkerLocal ("tentMarker"+ (str i1));
  250. };
  251. };
  252.  
  253. If (AddCrashesToMap) then {
  254. for "i2" from 0 to j2 do
  255. {
  256. crash = crashList select i2;
  257. deleteMarkerLocal ("crashMarker"+ (str i2));
  258. };
  259. };
  260. sleep 0.5;
  261. };
  262.  
  263. titleText ["r00tbag's markers removed","PLAIN DOWN"]; titleFadeOut 4;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement