0.53.12a

/////     /////     /////     /////     /////     /////     /////     /////     /////
/////////////////////////////////////////////////////////////////////////////////////
///////////////mmmyum's random animated air raid dayz////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////
//                                                v0.53.12a may 2 2013 2pmEST
//      decided to get you guys some kind of update with some of the requested features.
//      non-animated version will not be updated at this time, maybe later if there is demand.
//      to do following the code
//       don't forget to read the readme! (below)
//
//-------------------------------------------------------------------------------------------------------------
// README
//  README
//    README
// change SETUP sections
// change SETUP section later in code if you want custom bomber spawn in and spawn out locations
// change SET UP AI CODE section if you want AI spawns
// read further comments if you'd like to customize further
//
//IMPORTANT SETUP VALUES: MUST SET THESE FOR CODE TO WORK PROPERLY FOR YOU
//_rmodyn ----- _useRandChoice ---------- _useRandBomb ------------ _spawnynAI -------------_spawnnumAI
//locations list - change if you want less/different locations - if you change me, random(##) must represent number of cases.
//
//---------------------------------------------------------------------------------------------------------------
///////////////////////////////////////////////////INITIALIZE (DONT CHANGE THIS)

private ["_preWaypointPos","_spawnMarker","_spawnRadius","_x","_wp","_espl","_sound","_duration","_aispawncoords","_aispawn","_rndSel","_loc","_city","_z","_xx","_y","_coords","_target","_posdebug","_heliModel","_heliStart","_safetyPoint","_bomberName","_positionLand","_startTime","_bomber","_landingzone2","_aigroup2","_helipilot2","_wp2","_pos","_siren","_pos1","_bombardStart","_bombardDone","_wp3","_repeat","_break","_choice","_rmodyn","_preWaypoints","_sounddist","_ray","_pos2","_targetpos","_poswhistl","_sirenB","_citySwing","_wpT","_citySwing2","_wpT2","_wpLand","_rndSlp","_esp2","_useRandChoice","_useRandBomb","_aiSpawnX","_aiSpawnY","_spawnynAI","_spawnnumAI","_wpLandSpawn","_numbeofBombs","_esp3","_posEsp3","_debugPosEs","_debugPosEs1","_bomberDisT","_sirenPlayCnt"];
_loc = ["BalottaAirstrip",1.5,4829.9868,2450.1104];
_city = "BalottaAirstrip";
_xx = 4829.9868;
_y = 2450.1104;
_z = 1.5;
_coords = [_xx,_y,_z];
diag_log format ["RANDOM WORLDSPACE: Initializing defaults... %1 | %2 %3 %4|",_city,_xx,_y,_z];
sleep 5;


////////////////////////////////////////////////////SETUP SETUP SETUP//SETUP SETUP SETUP//SETUP SETUP SETUP//SETUP SETUP SETUP//SETUP SETUP SETUP
_repeat = 30;                             //times to repeat//number of times to cycle complete code (pick new place to bomb)
_break = 240;                             //time to break between attacks, in seconds (time between cycles)
_choice = 1;                              //type of bombing 1 light, 2 medium, 3 heavy
_useRandChoice = true;                    //true if you want random choice of type of bomb per bomb
_useRandBomb = true;                      //true if you want an extra random bomb
_numbeofBombs = 60;                       // how many bombs are dropped assuming 1 per cycle
_rmodyn = true;                           //true if you have rMod, false if you don't (choice of heli bomber)
_preWaypoints = 0;                        //add waypoints before arriving at location. untested
_sounddist = 6000;                        //distance sounds are audible at
_ray = 120;                               //ray of bombing
_spawnynAI = true;                        //true if you want AIs to spawn (sometimes) //MUST SET UP AI CODE for your particular method of spawning AI
_spawnnumAI = 7;                          //number of times you want AIs to spawn MUST SET UP AI CODE
////////////////////////////////////////////////////END SETUP//END SETUP//END SETUP//END SETUP//END SETUP//END SETUP//END SETUP//END SETUP



//BEGIN LOOP!          //change to While {true} do... for infinite loops
While {_repeat > 1} do {
_duration = _numbeofBombs;
_rndSel=floor(random 49); //select random number 0-49, then set loc based on the case number//change locations if you'd like, format ["name",z,x,y]//change random number to number of last case
_loc=
switch (_rndSel) do {
case 0: {["BalottaAirstrip",1.5,4829.9868,2450.1104]};
case 1: {["Berenzino",1.5,12954.624,9783.1533]};
case 2: {["Bereznio2",1.5,12043.963,9091.3477]};
case 3: {["BlackMountain",1.5,10276.416,12049.6640]};
case 4: {["Bor",1.5,3320.1643,3938.3496]};
case 5: {["Cherno",1.5,6743.8853,2581.1865]};
case 6: {["DevilsCastle",1.5,6891.9189,11438.73]};
case 7: {["DonsCamp",1.5,7788.2856,12613.048]};
case 8: {["Drozhino",1.5,3442.2849,4955.7129]};
case 9: {["Dubrovka",1.5,10445.011,9868.9912]};
case 10: {["Electro",1.5,10480.69,2217.8027]};
case 11: {["Factory",1.5,13060.078,7094.0596]};
case 12: {["Gorka",1.5,9659.084,8795.334]};
case 13: {["Grishno",1.5,5979.6953,10343.341]};
case 14: {["Guglovo",1.5,8517.8682,6676.3276]};
case 15: {["Gvozdno",1.5,8614.4316,11868.967]};
case 16: {["Kabanino",1.5,5318.8369,8602.6328]};
case 17: {["Kamyshovo",1.5,12127.406,3496.2185]};
case 18: {["Khelm",1.5,12290.833,10904.328]};
case 19: {["Komarovo",1.5,3654.0908,2475.9468]};
case 20: {["Kozlovka",1.5,4483.6777,4616.1675]};
case 21: {["Krastonav",1.5,11212.624,12256.609]};
case 22: {["Lopatino",1.5,2780.3135,10018.82]};
case 23: {["Moglievka",1.5,7544.5845,5148.7822]};
case 24: {["Msta",1.5,11275.323,5495.4053]};
case 25: {["Myshkino",1.5,2019.2487,7327.7178]};
case 26: {["Nadezhdino",1.5,5846.4434,4706.708]};
case 27: {["NEAF",1.5,12073.906,12724.305]};
case 28: {["Nizhnoye",1.5,13002.393,8285.8574]};
case 29: {["NovySobor",1.5,7074.4854,7683.4883]};
case 30: {["NWAF",1.5,4480.0781,10375.544]};
case 31: {["Orlovets",1.5,12146.174,7266.5801]};
case 32: {["Pavlovo",1.5,1693.9392,3845.0657]};
case 33: {["Petrovka",1.5,5014.1143,12493.039]};
case 34: {["Pogorevka",1.5,4473.5957,6411.3198]};
case 35: {["Polana",1.5,10753.393,8132.6606]};
case 36: {["Prigorodki",1.5,7976.5557,3299.5386]};
case 37: {["Pulkovo",1.5,4915.0903,5605.6401]};
case 38: {["Pusta",1.5,9156.2549,3897.7598]};
case 39: {["Pustoshka",1.5,3072.9629,7945.4404]};
case 40: {["Rogovo",1.5,4808.0024,6805.0518]};
case 41: {["Shakhovka",1.5,9654.5244,6555.2583]};
case 42: {["Solnichny",1.5,13454.279,6233.647]};
case 43: {["Soosnovka",1.5,2528.7561,6354.9839]};
case 44: {["Staroye",1.5,10140.659,5434.4302]};
case 45: {["StarySobor",1.5,6143.6167,7721.5176]};
case 46: {["Tulga",1.5,12803.296,4450.7466]};
case 47: {["Vybor",1.5,3815.0635,8865.0938]};
case 48: {["Vyshnoye",1.5,6590.3159,6029.1128]};
case 49: {["Zelenogorsk",1.5,2758.7144,5304.3457]};
};
_city = _loc select 0;
_z = _loc select 1;
_xx = _loc select 2;
_y = _loc select 3;
_coords = [_xx,_y,_z]; ////////////////////////////////////////////////does this need spaces?
diag_log format ["RANDOM WORLDSPACE: %1 | %2",_city,_coords];
sleep 1;
diag_log format ["RANDOM WORLDSPACE SELECTED: %1 | City: %2 | Coords: %3  %4 |||Try %5",_rndSel,_city,_xx,_y,_repeat];

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//above  ---- the worldpace is selected, coordinates stored in _coords = [_xx,_y,_z]/////////////////////////////////////////////////////////
//below  ---- chopper is created, flies to waypoint _coords while sirens play, hangs around till bombs are done flies off and is deleted/////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

//CREATE TARGET///////////////
_loc = createVehicle ["HeliHEmpty", _coords,[], 0, "NONE"];
_target = createVehicle ["HeliHEmpty",position _loc,[], 0, "NONE"];
_posdebug = position _target;
diag_log format ["AIRRAID: SEL: %1 | TARGET: %2",_posdebug,_coords];
sleep 2;
//Random Heli-Type
if (_rmodyn) then {
    _heliModel = ["Mi24_D","MV22"] call BIS_fnc_selectRandom;
} else {
    _heliModel = ["UH1H_DZ","Mi17_DZ"] call BIS_fnc_selectRandom;
};

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////SETUP//SETUP//SETUP
//Random-Startposition - change to where you want the bomber to come from
_heliStart = [[6993.7007,173.05298,300],[1623.715,218.18848,300]] call BIS_fnc_selectRandom;
//A Backup Waypoint, change to whatever you like - goes here after bombing
_safetyPoint = [7492.6675, 15263.042];
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////SETUP//SETUP//SETUP

    _bomberName = getText (configFile >> "CfgVehicles" >> _heliModel >> "displayName");
    diag_log(format["AIRRAID: BOMBER: %1 | TYPE: %4 Start at %2 | Backup %3",_bomberName,str(_heliStart),str(_safetyPoint),_heliModel]);
    _positionLand = [position _target,0,200,5,0,2000,0] call BIS_fnc_findSafePos; //set chopper destination
    diag_log(format["AIRRAID: BOMBER: %1 moving from %2 to %3 NOW!( TIME: %4 )", _bomberName,  str(_heliStart), str(_positionLand), round(time)]);
//Build bomber
    _startTime = time;
    _bomber = createVehicle [_heliModel,_heliStart, [], 0, "FLY"];
    _bomber setVariable["Sarge",1,true];
    _bomber engineOn true;
    _bomber flyInHeight 350;
    _bomber forceSpeed 180;
//Create an Invisibile Landingpad near place to be bombed
    _landingzone2 = createVehicle ["HeliHEmpty", [_positionLand select 0, _positionLand select 1,0], [], 0, "CAN_COLLIDE"]; //_targets x,y
    diag_log(format["AIRRAID: BOMBER: LANDINGZONE: %1 | BOMBER POS: %2 | POS LAND: %3 | TARGET: %4",str(getPosATL _landingzone2),str(getPosATL _bomber),str(_positionLand),str(getPosATL _target)]);
//Bandit woman pilot
    _aigroup2 = creategroup civilian;
    _helipilot2 = _aigroup2 createUnit ["SurvivorW2_DZ",getPos _bomber,[],0,"FORM"];
    _helipilot2 moveindriver _bomber;
    _helipilot2 assignAsDriver _bomber;
sleep 0.5;
    if(_preWaypoints > 0) then {
        for "_x" from 1 to _preWaypoints do {
                _preWaypointPos = [getMarkerPos _spawnMarker,0,_spawnRadius,10,0,2000,0] call BIS_fnc_findSafePos;
            };
            diag_log(format["AIRRAID: BOMBER: Adding Pre-POC-Waypoint #%1 on %2", _x,str(_preWaypointPos)]);
            _wp = _aigroup2 addWaypoint [_preWaypointPos, 0];
            _wp setWaypointType "MOVE";
            //_wp setWaypointBehaviour "CARELESS";
        };
//Tell bomber to move to target
    _wp2 = _aigroup2 addWaypoint [position _target, 0];
    _wp2 setWaypointType "MOVE";


waituntil {(_bomber distance _positionLand) <= 6500 || not alive _bomber};
    _bomber flyInHeight 300;
    _bomber forceSpeed 260;
    _bomber setspeedmode "NORMAL";
///////////////////////////////////////////////////////////////////START SIRENS/////////////////////////////////////////////////////
    _pos = position _target;
    diag_log format ["AIRRAID: INCOMING ATTACK: Sounding Siren at: %1 %2",_pos,_wp2];
//Create sirens
    _siren = createVehicle ["HeliHEmpty",position _target,[], 0, "NONE"];
    _sirenB = createVehicle ["HeliHEmpty",position _target,[], 0, "NONE"];
    _pos1 = position _siren;
    diag_log format ["AIRRAID: DEBUG: SIREN: %1 | TARGET: %2 | POS_TARGET %3",_pos1,_coords,_pos];
    diag_log(format["AIRRAID: BOMBER: %1 is at %2!", _bomberName, str(getPosATL _bomber)]);
    [nil,_siren,rSAY,['eve', _sounddist]] call RE;
    sleep 2;
    [nil,_sirenB,rSAY,['puk', _sounddist]] call RE;

    _bomberDisT = _bomber distance _target;
    diag_log(format["AIRRAID: BOMBER: DISTANCE: %1 | POSITION: %2",_bomberDisT,str(getPosATL _bomber)]);
    _sirenPlayCnt = 0;
        while {(_bomberDisT < 6500) and (_bomberDisT > 1000)} do {
                diag_log(format["AIRRAID: Playing Siren at %1 | Siren Nam %2 | Loop Num: %3",str(getPosATL _siren),_sounddist,_sirenPlayCnt]);
                [nil,_siren,rSAY,['nam', _sounddist]] call RE;
                sleep 9;
                _rndSlp = floor(random 3);
                sleep _rndSlp;
                _bomberDisT = _bomber distance _pos;
                sleep 1;
                _sirenPlayCnt = _sirenPlayCnt + 1;
            };
    diag_log(format["AIRRAID: BOMBER: DISTANCE: %1 | POSITION: %2",_bomberDisT,str(getPosATL _bomber)]);
    [nil,_siren,rSAY,['eve', _sounddist]] call RE;
    sleep 4;
    [nil,_sirenB,rSAY,['puk', _sounddist]] call RE;
    sleep 7;

    _bomber flyInHeight 350;
    _bomber forceSpeed 180;
    _bomber setspeedmode "NORMAL";
    diag_log(format["AIRRAID: BOMBER: %1 is at %2!", _bomberName, str(getPosATL _bomber)]);
    [nil,_siren,rSAY,['eve', _sounddist]] call RE;
    sleep 12;
    [nil,_sirenB,rSAY,['puk', _sounddist]] call RE;
    sleep 3;

waituntil {(_bomber distance _target) <= 1500 || not alive _bomber};
    _bomber flyInHeight 360;
    _bomber forceSpeed 90;
    _bomber setspeedmode "NORMAL";
    [nil,_siren,rSAY,['nam', _sounddist]] call RE;
    _citySwing = [position _target,15,25,1,0,2000,0] call BIS_fnc_findSafePos; //set chopper cycle move back and forth over city
    _wpT = _aigroup2 addWaypoint [_citySwing, 0];
    _wpT setWaypointType "MOVE";
    [nil,_siren,rSAY,['eve', _sounddist]] call RE;
    sleep 3;
    _citySwing2 = [position _target,0,20,1,0,2000,0] call BIS_fnc_findSafePos; //set chopper cycle move back and forth over city
    _wpT2 = _aigroup2 addWaypoint [_citySwing2, 0];
    _wpT2 setWaypointType "MOVE";
    _bombardStart = true;
    diag_log(format["AIRRAID: BOMBER: %1 Bombing Initialize: arrived at %2!, ", _bomberName, str(getPosATL _bomber)]);
    [nil,_siren,rSAY,['nam', _sounddist]] call RE;

///////////////////////////////////////////////////START BOMBING////////////////////////////////////////////////////////////////////
_pos2 = getPosATL _target;
diag_log format ["AIRRAID: Bombing Area: %1 | ATL debug: %2",_posdebug,_pos2];
_debugPosEs = [getPosATL _bomber];
_debugPosEs1 = _debugPosEs select 0;
_debugPosEs1 set [2, 0.1];
sleep 0.2;
_esp3 = createVehicle ["SH_105_HE",_debugPosEs1,[], 0, "NONE"];
_posEsp3 = position _esp3;
diag_log format ["AIRRAID: DEBUG ESP3: %1 | debugPosEs: %2 | debugPosEs1: %3",_posEsp3,_debugPosEs,_debugPosEs1];
///////////////////////////debug
[nil,_sirenB,rSAY,['puk', _sounddist]] call RE;
sleep 1;
[nil,_siren,rSAY,['nam', _sounddist]] call RE;

While {_duration > 0} do {
if (not alive _bomber) exitWith{diag_log format ["AIRRAID: BOMBER DESTROYED: %1",_bomberName]};
    if (_useRandChoice) then {
        _choice = floor(random 3);
    };
    sleep 0.1;
    _sound = createVehicle ["HeliHEmpty",position _target,[], _ray, "NONE"];
    [nil,_sound,rSAY,['mortar1', _sounddist]] call RE;
    sleep 2;
        If (_choice == 0) then {
            _espl = createVehicle ["SH_105_HE",position _sound,[], 0, "NONE"];
        };
        If (_choice == 1) then {
            _espl = createVehicle ["SH_105_HE",position _sound,[], 0, "NONE"];
        };
        If (_choice == 2) then {
            _espl = createVehicle ["SH_125_HE",position _sound,[], 0, "NONE"];
        };
        If (_choice == 3) then {
            _espl = createVehicle ["BO_GBU12_LGB",position _sound,[], 0, "NONE"];
        };

    if (_duration > 57 || _duration < 3) then {
        _pos2 = getPosATL _espl;
        _poswhistl = getPosATL _sound;
        _targetpos = getPosATL _target;
        diag_log format ["AIRRAID: BOMB: %1 | TARGET: %2 | NUMBER: %3 | SOUND %4 | CHOICE %5",str(_pos2),_targetpos,_duration,_poswhistl,_choice];
    };
    _duration = _duration - 1;
    deletevehicle _sound;
    sleep (random 2);
    if (_useRandBomb) then {
        _esp2 = createVehicle ["SH_105_HE",position _sound,[], 0, "NONE"];
        };
}; // Close while loop. loop while _duration >1
_bombardDone = true; //set done bombing
///////////////////////////////////////////////////END SIRENS AND BOMBING, HELI LOWER TO GROUND, (SPAWN AIs), FLY AWAY//////////////////////////////////////////////////////////////

//waituntil {_bombardDone}; ///////////////////hover over town until town is bombed to shit
    sleep 2;
    _wpLandSpawn = [position _landingzone2,0,120,4,0,2000,0] call BIS_fnc_findSafePos;
    _wpLand = _aigroup2 addWaypoint [_wpLandSpawn, 0];
    _wpLand setWaypointType "MOVE";
    _bomber flyInHeight 100;
    _bomber forceSpeed 140;
    _bomber setspeedmode "NORMAL";
    sleep 35;
    _bomber flyInHeight 15;
    _bomber forceSpeed 0;
    _bomber setspeedmode "NORMAL";
    sleep 16;
    diag_log(format["AIRRAID: BOMBER: %1 has Completed Bombing at %2!", _bomberName, str(getPosATL _bomber)]);
    if (_spawnynAI) then {
        if (_spawnnumAI > 0) then {
            _aispawncoords = position _bomber;
            sleep 15;
            diag_log(format["AIRRAID: BOMBER: AISPAWN: %1 | NUMBER %2",_aispawncoords,_spawnnumAI]);
            _aiSpawnX = _aispawncoords select 0;
            _aiSpawnY = _aispawncoords select 1;
            _spawnnumAI = _spawnnumAI - 1;

///////////////////////////////////////////////////////////////////         //SET UP AI CODE//SET UP AI CODE//SETUP SETUP SETUP//SETUP SETUP SETUP
            _aispawn = [[_aiSpawnX,_aiSpawnY,0],5000,20,5] execVM "units\add_unit_server_band.sqf"; //whole map waypoints//SETUP AI CODE HERE SETUP AI CODE HERE SETUP AI CODE HERE
                //THIS is how I call AI spawns on my server, you will need to set it up for your own code
                //use _aiSpawnX for x coords and _aiSpawnY for y coords - copy how you call AI spawn coords
                //SARGE's AI setup example coming soon - when I got time to install it
///////////////////////////////////////////////////////////////         //SET UP AI CODE//SET UP AI CODE//SETUP SETUP SETUP//SETUP SETUP SETUP END SETUP

        };
    };
//Giving the bomber some time to leave
sleep 15;

//Adding a last Waypoint up in the North, to send bomber away after completion. Chane this location (_safetypoint) to where you want the AI to seem to originate from
_wp3 = _aigroup2 addWaypoint [_safetyPoint, 0];
_wp3 setWaypointType "MOVE";
//Get position of the helis
//_posBomb = [getpos _bomber select 0, getpos _bomber select 1,0];
sleep 2;
_bomber forceSpeed 200;
_bomber flyInHeight 300;
_bomber setspeedmode "NORMAL";
diag_log(format["AIRRAID: BOMBER: %1 Leaving Area %2", _bomberName, str(getPosATL _bomber)]);

//////////////////////////////////////////////////////////CLEAN UP//CLEAN UP//CLEAN UP//
sleep 15;
waituntil {(_bomber distance _safetyPoint) <= 1500 || not alive _bomber};
    _bomber setspeedmode "NORMAL";
    sleep 3;
    deletevehicle _bomber;
    sleep 0.1;
    deletevehicle _landingzone2;
    sleep 0.1;
    deletevehicle _helipilot2;
    _repeat = _repeat - 1;
    sleep 0.1;
    deletevehicle _siren;
    sleep 0.1;
    deletevehicle _loc;
    sleep 0.1;
    deletevehicle _target;
    diag_log format ["AIRRAID: Going down for sleep: Repeat:%1 | Sleep:%2",_repeat,_break];
    sleep _break;
}; //close while loop. loop -  while _repeat > 1
exit

///////////////////////////////////////////TO DO
//
//bombs start to drop from chopper pos as it hits city borders
///////////////////-- UP NEXT! see your rpt debug and report if it matches the bomber position message in the forum.
//////////////////////////////also report if the heli seems to be relatively overtop of the town that should be bombed.
//crash site spawn if bomber destroyed
//AI parachutes?
//
//nuke options (this is still a ways off)
//random siren sound selection per rotation (option)
//clean up extra variables and make efficient