Advertisement
Chiddix

map.sqf

Aug 24th, 2012
109
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SQL 4.08 KB | None | 0 0
  1. //<-----GLOBAL-VARIABLE----->
  2. marker_mapesp = TRUE;
  3. //Alle Vehicle
  4. list_vec = (allMissionObjects "Plane")+(allMissionObjects "LandVehicle")+(allMissionObjects "Helicopter")+(allMissionObjects "Ship");
  5. list_wrecked = allMissionObjects "UH1Wreck_DZ";
  6. list_tents = allMissionObjects "TentStorage";
  7. //<-----GLOBAL-VARIABLE----->
  8.  
  9. //hint "Adding Markers on the map";
  10.  
  11. while {marker_mapesp} do
  12. {  
  13.     //<-----PLAYER-MARKER----->
  14.     //<----------------------->
  15.     //<-----PLAYER-MARKER----->
  16.     unitList_player = allUnits; //getting ALL units
  17.     totalunits = COUNT unitList_player;
  18.     //hint format["%1", totalunits];
  19.    
  20.     o = 0;
  21.     yo = 0;
  22.  
  23.     FOR "o" FROM 0 TO totalunits do
  24.     {
  25.         actualunit = unitList_player SELECT o; //Player1
  26.         //hint format["%1", actualunit];
  27.        
  28.         IF ( isplayer actualunit && alive actualunit ) THEN
  29.         {
  30.             deleteMarkerLocal ("Player" + (str o));
  31.             yo = o + 1;
  32.             deleteMarkerLocal ("Player" + (str yo));
  33.                
  34.             namePlayer = "";
  35.             namePlayer = name actualunit;
  36.        
  37.             mark_player = "Player" + (str o); //Player0, Player1, Player2
  38.             mark_player = createMarkerLocal [mark_player,getPos actualunit];
  39.             mark_player setMarkerTypeLocal "waypoint";
  40.             mark_player setMarkerPosLocal (getPos actualunit);
  41.             mark_player setMarkerColorLocal "ColorBlue";
  42.             mark_player setMarkerTextLocal format ["%1",namePlayer];
  43.         };
  44.     }
  45.    
  46.  
  47.     //<-----VEHICLE-MARKER----->
  48.     //<------------------------>
  49.     //<-----VEHICLE-MARKER----->
  50.     unitList_vec = list_vec;
  51.     totalunits_vec = COUNT unitList_vec;
  52.     i = 0;
  53.     yo2 = 0;
  54.    
  55.     FOR "i" FROM 0 TO totalunits_vec do
  56.     {
  57.         actualunit_vec = unitList_vec SELECT i; //Car, Helicopter, Boat
  58.         //hint format["%1", actualunit_vec];
  59.        
  60.         IF (!(actualunit_vec isKindOf "man") && !(actualunit_vec isKindOf "Survivor2")) THEN
  61.         {
  62.             deleteMarkerLocal ("Vehicle" + (str i));
  63.             yo2 = i + 1;
  64.             deleteMarkerLocal ("Vehicle" + (str yo2));
  65.            
  66.             typeVec = "";
  67.             typeVec = typeOf actualunit_vec;
  68.             //hint format ["%1", typeVec];
  69.            
  70.             mark = "Vehicle" + (str i);
  71.             mark = createMarkerLocal [mark,getPos actualunit_vec];
  72.             mark setMarkerTypeLocal "waypoint";
  73.             mark setMarkerPosLocal (getPos actualunit_vec);
  74.             mark setMarkerColorLocal "ColorRed";
  75.             mark setMarkerTextLocal format ["%1", typeVec];
  76.         };
  77.     };
  78.        
  79.     //<-----WRECKED_HELI-MARKER----->
  80.     //<----------------------------->
  81.     //<-----WRECKED_HELI-MARKER----->
  82.     unitList_wrecked = list_wrecked;
  83.     totalunits_wrecked = COUNT unitList_wrecked;
  84.     //hint format["%1", totalunits_wrecked];
  85.     p = 0;
  86.     yo3 = 0;
  87.    
  88.     FOR "p" FROM 0 TO totalunits_wrecked do
  89.     {
  90.         actualunit_wrecked = unitList_wrecked SELECT p; //Car, Helicopter, Boat
  91.            
  92.         deleteMarkerLocal ("Wrecked"+ (str p));
  93.         yo3 = p + 1;
  94.         deleteMarkerLocal ("Wrecked"+ (str yo3));
  95.            
  96.         mark_wrecked = "Wrecked" + (str p); //Car, Boat, Helicopter
  97.         mark_wrecked = createMarkerLocal [mark_wrecked,getPos actualunit_wrecked];
  98.         mark_wrecked setMarkerTypeLocal "waypoint";
  99.         mark_wrecked setMarkerPosLocal (getPos actualunit_wrecked);
  100.         mark_wrecked setMarkerColorLocal "ColorOrange";
  101.         mark_wrecked setMarkerTextLocal "Crashed-Heli";
  102.     };
  103.    
  104.     //<-----TENT-MARKER----->
  105.     //<----------------------------->
  106.     //<-----TENT-MARKER----->
  107.     unitList_tents = list_tents;
  108.     totalunits_tents = COUNT unitList_tents;
  109.     //hint format["%1", totalunits_tents];
  110.     q = 0;
  111.     yo4 = 0;
  112.    
  113.     FOR "q" FROM 0 TO totalunits_tents do
  114.     {
  115.         actualunit_tents = unitList_tents SELECT q; //Car, Helicopter, Boat
  116.            
  117.         deleteMarkerLocal ("Tents"+ (str q));
  118.         yo4 = q + 1;
  119.         deleteMarkerLocal ("Tents"+ (str yo4));
  120.            
  121.         mark_tents = "Tents" + (str q); //Car, Boat, Helicopter
  122.         mark_tents = createMarkerLocal [mark_tents,getPos actualunit_tents];
  123.         mark_tents setMarkerTypeLocal "waypoint";
  124.         mark_tents setMarkerPosLocal (getPos actualunit_tents);
  125.         mark_tents setMarkerColorLocal "ColorGreen";
  126.         //mark_tentssetMarkerTextLocal "Tent";
  127.     };
  128.        
  129.     //bit OF sleep
  130.     sleep 0.1;
  131. };
  132.  
  133. k = 0;
  134. FOR "k" FROM 0 TO 2000 do
  135. {
  136.     deleteMarkerLocal ("Player"+ (str k));
  137.     deleteMarkerLocal ("Vehicle"+ (str k));
  138.     deleteMarkerLocal ("Wrecked"+ (str k));
  139.     deleteMarkerLocal ("Tents"+ (str k));
  140. };
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement