Advertisement
Guest User

Mission

a guest
Jun 22nd, 2014
46
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 5.55 KB | None | 0 0
  1. /*
  2.     Medical C-130 Crash by lazyink (Full credit for original code to TheSzerdi & TAW_Tonic)
  3.     Modified to new format by Vampire
  4. */
  5.  
  6. private ["_missName","_coords","_wreck","_trash","_trash1","_trash2","_trash3","_trash4","_trash5","_veh1","_truck","_vehicle","_vehicle1","_crate","_crate1"];
  7.  
  8. //Name of the Mission
  9. _missName = "C130 Crash";
  10.  
  11. //DZMSFindPos loops BIS_fnc_findSafePos until it gets a valid result
  12. _coords = call DZMSFindPos;
  13.  
  14. [nil,nil,rTitleText,"A C130 Carrying Expensive Cargo has Crashed!\nBandits are Securing the Cargo!", "PLAIN",10] call RE;
  15.  
  16. //DZMSAddMajMarker is a simple script that adds a marker to the location
  17. [_coords,_missname] ExecVM DZMSAddMajMarker;
  18.  
  19. //We create the mission scenery
  20. _wreck = createVehicle ["C130J",[(_coords select 0) - 8.8681, (_coords select 1) + 15.3554,0],[], 0, "NONE"];
  21. _wreck setDir -30.165445;
  22. [_wreck] call DZMSProtectObj;
  23.  
  24. //Lets open it up
  25. _wreck animate ["ramp_top",1];
  26. _wreck animate ["ramp_bottom",1];
  27.  
  28. //And lets keep people out
  29. _wreck setHit ["motor", 1];
  30. _wreck setVariable ["R3F_LOG_disabled",true,true];
  31. _wreck setVariable ["BTC_Cannot_Lift",true,true];
  32. _wreck removeAllEventHandlers "Killed";
  33. _wreck removeAllEventHandlers "HandleDamage";
  34. _wreck setVehicleLock "LOCKED";
  35. _wreck removeAllEventHandlers "GetIn";
  36. _wreck addEventHandler ["GetIn",{
  37.     if (isPlayer (_this select 2)) then {
  38.         (_this select 2) action ["getOut",(_this select 0)];
  39.         (_this select 0) setVehicleLock "LOCKED";
  40.         (_this select 0) removeAllEventHandlers "GetIn";
  41.     };
  42. }];
  43.  
  44. _trash = createVehicle ["Barrels",[(_coords select 0) - 7.4511, (_coords select 1) + 3.8544,0],[], 0, "NONE"];
  45. _trash setDir 61.911976;
  46. [_trash] call DZMSProtectObj;
  47.  
  48. _trash1 = createVehicle ["Misc_palletsfoiled",[(_coords select 0) + 4.062, (_coords select 1) + 4.7216,0],[], 0, "NONE"];
  49. _trash1 setDir -29.273479;
  50. [_trash1] call DZMSProtectObj;
  51.  
  52. _trash2 = createVehicle ["Paleta2",[(_coords select 0) - 3.4033, (_coords select 1) - 2.2256,0],[], 0, "NONE"];
  53. [_trash2] call DZMSProtectObj;
  54.  
  55. _trash3 = createVehicle ["Land_Pneu",[(_coords select 0) + 1.17, (_coords select 1) + 1.249,0],[], 0, "NONE"];
  56. [_trash3] call DZMSProtectObj;
  57.  
  58. _trash4 = createVehicle ["Land_transport_crates_EP1",[(_coords select 0) + 3.9029, (_coords select 1) - 1.8477,0],[], 0, "NONE"];
  59. _trash4 setDir -70.372086;
  60. [_trash4] call DZMSProtectObj;
  61.  
  62. _trash5 = createVehicle ["Fort_Crate_wood",[(_coords select 0) - 2.1181, (_coords select 1) + 5.9765,0],[], 0, "NONE"];
  63. _trash5 setDir -28.122475;
  64. [_trash5] call DZMSProtectObj;
  65.  
  66. //We create the mission vehicles
  67. _veh1 = ["large"] call DZMSGetVeh;
  68. _vehicle = createVehicle [_veh1,[(_coords select 0) + 14.1426, (_coords select 1) - 0.6202,0],[], 0, "CAN_COLLIDE"];
  69. _truck = createVehicle ["HMMWV_M1151_M2_CZ_DES_EP1_DZE",[(_coords select 0) - 8.7802,(_coords select 1) + 6.874,0],[], 0, "CAN_COLLIDE"];
  70.  
  71. //DZMSSetupVehicle prevents the vehicle from disappearing and sets fuel and such
  72. [_vehicle] call DZMSSetupVehicle;
  73. [_truck] call DZMSSetupVehicle;
  74.  
  75. //DZMSBoxFill fills the box, DZMSProtectObj prevents it from disappearing
  76. _crate = createVehicle ["USVehicleBox",[(_coords select 0) - 1.5547,(_coords select 1) + 2.3486,0],[], 0, "CAN_COLLIDE"];
  77. [_crate,"supply"] ExecVM DZMSC130BoxSetup;
  78. [_crate] call DZMSProtectObj;
  79.  
  80. _crate = createVehicle ["USVehicleBox",[(_coords select 0) - 2.5547,(_coords select 1) + 3.3486,0],[], 0, "CAN_COLLIDE"];
  81. [_crate,"supply"] ExecVM DZMSC130BoxSetup;
  82. [_crate] call DZMSProtectObj;
  83.  
  84. _crate = createVehicle ["USVehicleBox",[(_coords select 0) - 3.5547,(_coords select 1) + 4.3486,0],[], 0, "CAN_COLLIDE"];
  85. [_crate,"supply"] ExecVM DZMSC130BoxSetup;
  86. [_crate] call DZMSProtectObj;
  87.  
  88. _crate1 = createVehicle ["USLaunchersBox",[(_coords select 0) + 0.3428,(_coords select 1) - 1.8985,0],[], 0, "CAN_COLLIDE"];
  89. [_crate1,"weapons"] ExecVM DZMSC130BoxSetup;
  90. [_crate1] call DZMSProtectObj;
  91.  
  92. _crate1 = createVehicle ["USLaunchersBox",[(_coords select 0) + 1.3428,(_coords select 1) - 2.8985,0],[], 0, "CAN_COLLIDE"];
  93. [_crate1,"weapons"] ExecVM DZMSC130BoxSetup;
  94. [_crate1] call DZMSProtectObj;
  95.  
  96. _crate1 = createVehicle ["USLaunchersBox",[(_coords select 0) + 2.3428,(_coords select 1) - 3.8985,0],[], 0, "CAN_COLLIDE"];
  97. [_crate1,"weapons"] ExecVM DZMSC130BoxSetup;
  98. [_crate1] call DZMSProtectObj;
  99.  
  100. _crate1 = createVehicle ["USLaunchersBox",[(_coords select 0) + 3.3428,(_coords select 1) - 4.8985,0],[], 0, "CAN_COLLIDE"];
  101. [_crate1,"weapons"] ExecVM DZMSC130BoxSetup;
  102. [_crate1] call DZMSProtectObj;
  103.  
  104. //DZMSAISpawn spawns AI to the mission.
  105. //Usage: [_coords, count, skillLevel, unitArray]
  106. [[(_coords select 0) - 10.5005,(_coords select 1) - 2.6465,0],4,3,"DZMSUnitsMajor"] call DZMSAISpawn;
  107. sleep 5;
  108. [[(_coords select 0) + 4.7027,(_coords select 1) + 12.2138,0],4,3,"DZMSUnitsMajor"] call DZMSAISpawn;
  109. sleep 5;
  110. [[(_coords select 0) + 2.918,(_coords select 1) - 9.0342,0],2,3,"DZMSUnitsMajor"] call DZMSAISpawn;
  111. sleep 5;
  112. [[(_coords select 0) + 2.918,(_coords select 1) - 9.0342,0],2,3,"DZMSUnitsMajor"] call DZMSAISpawn;
  113.  
  114. //Wait until the player is within 30 meters and also meets the kill req
  115. [_coords,"DZMSUnitsMajor"] call DZMSWaitMissionComp;
  116.  
  117. //Call DZMSSaveVeh to attempt to save the vehicles to the database
  118. //If saving is off, the script will exit.
  119. [_vehicle] ExecVM DZMSSaveVeh;
  120.  
  121. //Let everyone know the mission is over
  122. [nil,nil,rTitleText,"The Crash Site has been Secured by Survivors!", "PLAIN",6] call RE;
  123. diag_log text format["[DZMS]: Major EM1 C130 Mission has Ended."];
  124. deleteMarker "DZMSMajMarker";
  125. deleteMarker "DZMSMajDot";
  126.  
  127. //Let the timer know the mission is over
  128. DZMSMajDone = true;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement