Advertisement
Guest User

Untitled

a guest
Jun 2nd, 2013
52
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.21 KB | None | 0 0
  1. ////////////////////////////////////////////////////////////////////////////////////////
  2. // DayZ Air Raid written by //
  3. // mmmyum with work from //
  4. // sirens: http://www.armaholic.com/page.php?id=12598 by DarkXess //
  5. // bombs: http://www.armaholic.com/page.php?id=15612 by Maxjoiner //
  6. ////////////////////////////////////////////////////////////////////////////////////////
  7.  
  8. /////////////////////////SETUP repeat and break
  9.  
  10. private ["_espl","_sound","_pos2","_pos2cnt","_seconds","_rndLoc","_place","_position","_choice","_duration","_xpos","_ypos","_targetpos","_loc","_target","_pos","_siren","_pos1","_choise","_ray","_dblsecs","_repeat","_break"];
  11. sleep 120;
  12. _repeat = 30; //times to repeat
  13. _break = 600; //time to break between attacks
  14. _position = [13135.9, 10393.3, 1.5]; //leave this
  15. _xpos = 13135.9;
  16. _ypos = 10393.3;
  17. //repeat script
  18. diag_log format ["AIRRAID: Starting..."];
  19. sleep 2;
  20. While {_repeat > 1} do {
  21. /////////////////////////SETUP position
  22. // enter positions below. format x,y,z
  23. _rndLoc=floor(random 18);
  24. _place=
  25. switch (_rndLoc) do
  26. {
  27. case 0: {"Smugglers"};
  28. case 1: {"EastAirfield"};
  29. case 2: {"ArnoldAirfield"};
  30. case 3: {"NorthIslandFireStation"};
  31. case 4: {"NorthIslandBarracks"};
  32. case 5: {"WestAirfield"};
  33. case 6: {"ZapaBarracks"};
  34. case 7: {"FlatsNorthIsland"};
  35. case 8: {"Arnoldstein"};
  36. case 9: {"RadoTown"};
  37. case 10: {"Senzatoka"};
  38. case 11: {"Bovec"};
  39. case 12: {"BehindBase"};
  40. case 13: {"SmugglersCastle"};
  41. case 14: {"SouthWestIsland"};
  42. case 15: {"SmugglersSniper"};
  43. case 16: {"FOBSniper"};
  44. case 17: {"FOBSniper2"};
  45. };
  46. diag_log format ["AIRRAID: Random Location: %1 | %2",_rndLoc,_place];
  47. _position=
  48. switch (_rndLoc) do
  49. {
  50. case 0: {[8009.3, 1986.81, 1.5]};
  51. case 1: {[8564.84, 4876.08, 1.5]};
  52. case 2: {[4060.23, 7654.3, 1.5]};
  53. case 3: {[999.45, 9673.95, 1.5]};
  54. case 4: {[417.1, 9283.28, 1.5]};
  55. case 5: {[2572.31, 3465.82, 1.5]};
  56. case 6: {[5693.51, 871.863, 1.5]};
  57. case 7: {[2116.18, 9103.66, 1.5]};
  58. case 8: {[4507.55, 7970.83, 1.5]};
  59. case 9: {[8408.001, 4666.771, 1.5]};
  60. case 10: {[6165.05, 7406.31, 1.5]};
  61. case 11: {[3047.7, 4457.96, 1.5]};
  62. case 12: {[5697.861, 2073.785, 1.5]};
  63. case 13: {[7709.31, 2516.91, 1.5]};
  64. case 14: {[462.369, 291.375, 1.5]};
  65. case 15: {[8044.338, 2392.002, 1.5]};
  66. case 16: {[2319.309, 3762.056, 1.5]};
  67. case 17: {[1946.943, 3897.041, 1.5]};
  68. };
  69. //////////////////////////SETUP type of bombing and duration
  70. _choice = 2;
  71. _duration = 50;
  72. /////////////////////////
  73. _xpos = _position select 0;
  74. _ypos = _position select 1;
  75. _targetpos = [_xpos, _ypos, 1.5];
  76. _loc = createVehicle ["HeliHEmpty", _targetpos,[], 0, "NONE"];
  77. _target = createVehicle ["HeliHEmpty",position _loc,[], 0, "NONE"]; // target bombing
  78. AirraidPlayerMsg = _city; publicVariable "AirraidPlayerMsg";
  79. sleep 2;
  80. diag_log format ["AIRRAID: INCOMING ATTACK: Sounding Siren at: %1 %2 | Repeat: %3| Type: %4 | Duration: %5",_xpos,_ypos,_repeat,_choice,_duration];
  81.  
  82.  
  83.  
  84. //sound siren
  85. _pos = position _target;
  86. diag_log format ["AIRRAID: POS: %1 | TARGET: %2 | SHOULD MATCH",_pos,_targetpos];
  87. _siren = createVehicle ["HeliHEmpty",position _target,[], 0, "NONE"];
  88. [nil,_siren,rSAY,['eve', 3500]] call RE;
  89. sleep 60;
  90. _pos1 = position _siren;
  91. diag_log format ["AIRRAID: SIREN: %1 | TARGET: %2 | SHOULD MATCH APPROX",_pos1,_targetpos];
  92. [nil,_siren,rSAY,['puk', 3500]] call RE;
  93. sleep 60;
  94. [nil,_siren,rSAY,['eve', 3500]] call RE;
  95. sleep 60;
  96. [nil,_siren,rSAY,['nam', 3500]] call RE;
  97. sleep 10;
  98. [nil,_siren,rSAY,['puk', 3500]] call RE;
  99. sleep 60;
  100. [nil,_siren,rSAY,['nam', 3500]] call RE;
  101. sleep 5;
  102.  
  103. //start bombing init
  104. _choise = _choice; // choise bombing: 1 = light 2 = medium 3 = heavy
  105. _ray = 200; // ray of bombing
  106. _seconds = _duration; // time bombing
  107. _dblsecs = _seconds * 2;
  108. diag_log format ["AIRRAID: Bombing Area: %1 %2",_xpos,_ypos];
  109.  
  110. //start bombing
  111. _pos2 = [getPosATL _siren];
  112. While {_seconds > 1} do {
  113. _sound = createVehicle ["HeliHEmpty",position _target,[], _ray, "NONE"];
  114. [nil,_sound,rSAY,['mortar1', 3500]] call RE;
  115. _pos2 set [_seconds, getPosATL _sound];
  116. sleep 2;
  117. If (_choise == 1) then {
  118. _espl = createVehicle ["SH_105_HE",position _sound,[], 0, "NONE"];
  119. };
  120. If (_choise == 2) then {
  121. _espl = createVehicle ["SH_125_HE",position _sound,[], 0, "NONE"];
  122. };
  123. If (_choise == 3) then {
  124. _espl = createVehicle ["BO_GBU12_LGB",position _sound,[], 0, "NONE"];
  125. };
  126. _pos2 = [_dblsecs,getPosATL _espl];
  127. _pos2cnt = count _pos2;
  128. diag_log format ["AIRRAID: BOMB: %1 | TARGET: %2 | SHOULD MATCH APPROX ||| debug arraycount %3 |",str(_pos2),_targetpos,_pos2cnt];
  129. _seconds = _seconds - 1;
  130. deletevehicle _sound;
  131. };
  132.  
  133. //cleanup
  134. sleep 60;
  135. _repeat = _repeat - 1;
  136. deletevehicle _espl;
  137. deletevehicle _siren;
  138. deletevehicle _loc;
  139. deletevehicle _target;
  140. diag_log format ["AIRRAID: Going down for sleep: Repeat:%1 | Sleep:%2",_repeat,_break];
  141. sleep _break;
  142. };
  143. exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement