API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Sep 12th, 2014
239
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.07 KB | None | 0 0
raw download clone embed print report
  1. if (isNil 'admin_announce') then {admin_announce = true;};
  2. adminnuke = {
  3. adminServer = {
  4. deleteMarker "rspawn_east";
  5. _tmp = createMarker ["rspawn_east", [0,0,0]];
  6. _tmp setMarkerText (_this select 0);
  7. PVAH_AdminReq = [69,player];
  8. publicVariableServer "PVAH_AdminReq";
  9. };
  10.  
  11. if !(('ItemGPS' in items player) or ('ItemMap' in items player)) then {
  12. _config = ["ItemGPS"];
  13. _isOK = [player,_config] call BIS_fnc_invAdd;
  14. };
  15.  
  16. adminDrop = {
  17. adminDropPos = [_this select 0, _this select 1, _this select 2];
  18. _do = '
  19. if (isServer) then
  20. {
  21. [] spawn
  22. {
  23. call compile (''[nil, nil, rSP''+''AWN, [], {
  24. adminDropSpot = "old_bike_tk_civ_ep1" cre''+''ate''+''Vehi''+''cle adminDropPos;
  25. _uniqueid = str(round(random 999999));
  26. adminDropSpot setVariable ["ObjectID", _uniqueid, true];
  27. adminDropSpot setVariable ["ObjectUID", _uniqueid, true];
  28. adminDropSpot setVariable ["lastUpdate",time,true];
  29.  
  30. c130plane = createVehicle ["AN2_DZ", [((getpos adminDropSpot select 0)),(getpos adminDropSpot select 1),((getpos adminDropSpot select 2)+2000)], [], 0, "FLY"];
  31. c130plane engineOn true;
  32. _dir = getDir c130plane;
  33. _speed = 80;
  34. c130plane setVelocity [(sin _dir * _speed),(cos _dir * _speed), 0];
  35. _uniqueid = str(round(random 999999));
  36. c130plane setVariable ["ObjectID", _uniqueid, true];
  37. c130plane setVariable ["ObjectUID", _uniqueid, true];
  38. c130plane setVariable ["lastUpdate",time,true];
  39.  
  40. earthquake = {
  41. for "_i" from 0 to 140 do {
  42. _vx = vectorup _this select 0;
  43. _vy = vectorup _this select 1;
  44. _vz = vectorup _this select 2;
  45. _coef = 0.03 - (0.0001 * _i);
  46. _this setve''+''ctorup [
  47. _vx+(-_coef+random (2*_coef)),
  48. _vy+(-_coef+random (2*_coef)),
  49. _vz+(-_coef+random (2*_coef))
  50. ];
  51. sleep (0.01 + random 0.01);
  52. };
  53. };
  54.  
  55. playSound "nuke";
  56.  
  57. wind = {
  58. while {windv} do {
  59. _ran = ceil random 2;
  60. _pos = position player;
  61.  
  62. _velocity = [random 10,random 10,-1];
  63. _color = [1.0, 0.9, 0.8];
  64. _alpha = 0.02 + random 0.02;
  65. _ps = "#particlesource" createVe''+''hicleLocal _pos;
  66. _ps setParticleP''+''arams [["\Ca\Data\ParticleEffects\Universal\universal.p3d", 16, 12, 8], "", "Billboard", 1, 3, [0, 0, -6], _velocity, 1, 1.275, 1, 0, [9], [_color + [0], _color + [_alpha], _color + [0]], [1000], 1, 0, "", "", _pos];
  67. _ps setParticle''+''Random [3, [30, 30, 0], [0, 0, 0], 1, 0, [0, 0, 0, 0.01], 0, 0];
  68. _ps setPartic''+''leCircle [0.1, [0, 0, 0]];
  69. _ps setDropI''+''nterval 0.01;
  70.  
  71. sleep (random 1);
  72. _delay = 1 + random 5;
  73. sleep _delay;
  74. deleteve''+''hicle _ps;
  75. };
  76. };
  77.  
  78. environ = {
  79.  
  80. "colorCorrections" ppEffectA''+''djust [2, 30, 0, [0.0, 0.0, 0.0, 0.0], [0.8*2, 0.5*2, 0.0, 0.7], [0.9, 0.9, 0.9, 0.0]];
  81. "colorCorrections" ppEffectC''+''ommit 0;
  82. "colorCorrections" ppEffe''+''ctAdjust [1, 0.8, -0.001, [0.0, 0.0, 0.0, 0.0], [0.8*2, 0.5*2, 0.0, 0.7], [0.9, 0.9, 0.9, 0.0]];
  83. "colorCorrections" ppEffe''+''ctCommit 3;
  84. "colorCorrections" ppEffe''+''ctEnable true;
  85. "filmGrain" ppEffectEna''+''ble true;
  86. "filmGrain" ppEffect''+''Adjust [0.02, 1, 1, 0.1, 1, false];
  87. "filmGrain" ppEffect''+''Commit 5;
  88. };
  89.  
  90. ash = {
  91. _pos = position player;
  92. _parray = [
  93. ["\Ca\Data\ParticleEffects\Universal\Universal", 16, 12, 8, 1],
  94. "",
  95. "Billboard",
  96. 1,
  97. 4,
  98. [0,0,0],
  99. [0,0,0],
  100. 1,
  101. 0.000001,
  102. 0,
  103. 1.4,
  104. [0.05,0.05],
  105. [[0.1,0.1,0.1,1]],
  106. [0,1],
  107. 0.2,
  108. 1.2,
  109. "",
  110. "",
  111. vehicle player
  112. ];
  113. snow = "#particlesource" createV''+''ehicleLocal _pos;
  114. snow setParticleP''+''arams _parray;
  115. snow setPartic''+''leRandom [0, [10, 10, 7], [0, 0, 0], 0, 0.01, [0, 0, 0, 0.1], 0, 0];
  116. snow setPartic''+''leCircle [0.0, [0, 0, 0]];
  117. snow setDropIn''+''terval 0.003;
  118.  
  119. };
  120.  
  121. if (player distance adminDropSpot < 4000) then {
  122. "dynamicBlur" ppEffe''+''ctEnable true;
  123. "dynamicBlur" ppEffe''+''ctAdjust [0.5];
  124. "dynamicBlur" ppEffe''+''ctCommit 3;
  125. sleep 0.1;
  126. "dynamicBlur" ppEffec''+''tAdjust [2];
  127. "dynamicBlur" ppEffect''+''Commit 1;
  128. "dynamicBlur" ppEffe''+''ctAdjust [1];
  129. "dynamicBlur" ppEffec''+''tCommit 4;
  130. };
  131.  
  132. player sp''+''awn environ;
  133.  
  134. player spa''+''wn earthquake;
  135. sleep 3;
  136.  
  137. _Cone = "#particlesource" createVehi''+''cleLocal getpos adminDropSpot;
  138. _Cone setParti''+''cleParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48], "", "Billboard", 1, 10, [0, 0, 0],
  139. [0, 0, 0], 0, 1.275, 1, 0, [40,80], [[0.25, 0.25, 0.25, 0], [0.25, 0.25, 0.25, 0.5],
  140. [0.25, 0.25, 0.25, 0.5], [0.25, 0.25, 0.25, 0.05], [0.25, 0.25, 0.25, 0]], [0.25], 0.1, 1, "", "", adminDropSpot];
  141. _Cone setPartic''+''leRandom [2, [1, 1, 30], [1, 1, 30], 0, 0, [0, 0, 0, 0.1], 0, 0];
  142. _Cone setPartic''+''leCircle [10, [-10, -10, 20]];
  143. _Cone setDrop''+''Interval 0.005;
  144.  
  145. _top = "#particlesource" creat''+''eVehicleLocal getpos adminDropSpot;
  146. _top setPartic''+''leParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 3, 48, 0], "", "Billboard", 1, 21, [0, 0, 0],
  147. [0, 0, 65], 0, 1.7, 1, 0, [100,80,110], [[1, 1, 1, -10],[1, 1, 1, -7],[1, 1, 1, -4],[1, 1, 1, -0.5],[1, 1, 1, 0]], [0.05], 1, 1, "", "", adminDropSpot];
  148. _top setPartic''+''leRandom [0, [75, 75, 15], [17, 17, 10], 0, 0, [0, 0, 0, 0], 0, 0, 360];
  149. _top setDropInt''+''erval 0.002;
  150.  
  151. _top2 = "#particlesource" createVe''+''hicleLocal getpos adminDropSpot;
  152. _top2 setParticle''+''Params [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 3, 112, 0], "", "Billboard", 1, 22, [0, 0, 0],
  153. [0, 0, 60], 0, 1.7, 1, 0, [100,80,100], [[1, 1, 1, 0.5],[1, 1, 1, 0]], [0.07], 1, 1, "", "", adminDropSpot];
  154. _top2 setPartic''+''leRandom [0, [75, 75, 15], [17, 17, 10], 0, 0, [0, 0, 0, 0], 0, 0, 360];
  155. _top2 setDropIn''+''terval 0.002;
  156.  
  157. _smoke = "#particlesource" createVehic''+''leLocal getpos adminDropSpot;
  158. _smoke setParticlePa''+''rams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48, 1], "", "Billboard", 1, 25, [0, 0, 0],
  159. [0, 0, 70], 0, 1.7, 1, 0, [50,20,120],
  160. [[1, 1, 1, 0.4],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0]]
  161. , [0.5, 0.1], 1, 1, "", "", adminDropSpot];
  162. _smoke setParticleR''+''andom [0, [10, 10, 15], [15, 15, 7], 0, 0, [0, 0, 0, 0], 0, 0, 360];
  163. _smoke setDropI''+''nterval 0.002;
  164.  
  165. _Wave = "#particlesource" createVeh''+''icleLocal getpos adminDropSpot;
  166. _Wave setParti''+''cleParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48], "", "Billboard", 1, 20/2, [0, 0, 0],
  167. [0, 0, 0], 0, 1.5, 1, 0, [50, 100], [[0.1, 0.1, 0.1, 0.5],
  168. [0.5, 0.5, 0.5, 0.5], [1, 1, 1, 0.3], [1, 1, 1, 0]], [1,0.5], 0.1, 1, "", "", adminDropSpot];
  169. _Wave setPart''+''icleRandom [2, [20, 20, 20], [5, 5, 0], 0, 0, [0, 0, 0, 0.1], 0, 0];
  170. _Wave setParti''+''cleCircle [50, [-80, -80, 2.5]];
  171. _Wave setDropI''+''nterval 0.0002;
  172.  
  173. _light = "#lightpoint" createVe''+''hicleLocal [((getpos adminDropSpot select 0)),(getpos adminDropSpot select 1),((getpos adminDropSpot select 2)+800)];
  174. _light setLightAm''+''bient[1500, 1200, 1000];
  175. _light setLightC''+''olor[1500, 1200, 1000];
  176. _light setLightBrig''+''htness 1000000.0;
  177.  
  178. sleep 3;
  179.  
  180. _Wave setDrop''+''Interval 0.001;
  181. deletevehicle _top;
  182. deletevehicle _top2;
  183.  
  184. sleep 1.5;
  185.  
  186. {
  187. _isinbuilding = false;
  188. if ([_x] call fnc_isInsideBuilding) then {_isinbuilding = true;};
  189. if (!_isinbuilding) then {
  190. fnc_usec_unconscious = compile preprocessFileLineNumbers "\z\addons\dayz_code\compile\fn_unconscious.sqf";
  191. _unit = _x;
  192. if (_unit == _x) then
  193. {
  194. r_player_timeout = 30;
  195. r_player_injured = true;
  196. r_player_blood = 9000;
  197. r_player_unconscious = true;
  198. _x setVariable ["USEC_injured",true,true];
  199. _x setVariable ["medForceUpdate",true,true];
  200. _x setVariable ["unconsciousTime", r_player_timeout, true];
  201. };
  202. if (vehicle _unit != _unit) then
  203. {
  204. _unit spawn {
  205. private["_veh","_unit"];
  206. _veh = vehicle _this;
  207. _unit = _this;
  208. waitUntil{(((getPos _veh select 2 < 1) and (speed _veh < 1)) or (!r_player_unconscious))};
  209. if (r_player_unconscious) then {
  210. _unit action ["eject", _veh];
  211. waitUntil{((vehicle _this) != _this)};
  212. sleep 1;
  213. _unit setVariable ["NORRN_unconscious", true, true];
  214. _unit setVariable ["USEC_injured",true,true];
  215. _unit playActionNow "Die";
  216. };
  217. };
  218. }
  219. else
  220. {
  221. _unit setVariable ["NORRN_unconscious", true, true];
  222. _unit setVariable ["USEC_injured",true,true];
  223. _unit playActionNow "Die";
  224. };
  225. };
  226. if ((_x isKindOf "zZombie_Base") || (_x isKindOf "Animal")) then {_zAnimal = _x; _zAnimal setDamage 1;sleep .15;};
  227. } forEach (adminDropPos nearEntities [["CAManBase"],200]);
  228.  
  229. {_object = _x; _object setDamage 1;sleep .15;} forEach (nearestObjects [adminDropPos, ["house","Building","LandVehicle","Air","Ship"], 200]);
  230.  
  231. sleep 2.5;
  232. setaperture -1;
  233.  
  234. _top3 = "#particlesource" createVehi''+''cleLocal getpos adminDropSpot;
  235. _top3 setPartic''+''leParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 3, 48, 0], "", "Billboard", 1, 24, [0, 0, 450],
  236. [0, 0, 49], 0, 1.7, 1, 0, [120,130,150], [[1, 1, 1, -10],[1, 1, 1, -7],[1, 1, 1, -4],[1, 1, 1, -0.5],[1, 1, 1, 0]], [0.05], 1, 1, "", "", adminDropSpot];
  237. _top3 setParticl''+''eRandom [0, [75, 75, 15], [17, 17, 10], 0, 0, [0, 0, 0, 0], 0, 0, 360];
  238. _top3 setDropI''+''nterval 0.002;
  239. sleep 4;
  240. deleteve''+''hicle _top3;
  241.  
  242. sleep 4;
  243.  
  244. if (player distance adminDropSpot < 10000) then {
  245. "dynamicBlur" ppEff''+''ectAdjust [0];
  246. "dynamicBlur" ppEffe''+''ctCommit 1;
  247. };
  248.  
  249. _top4 = "#particlesource" create''+''VehicleLocal getpos adminDropSpot;
  250. _top4 setParti''+''cleParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 3, 48, 0], "", "Billboard", 1, 22, [0, 0, 770],
  251. [0, 0, 30], 0, 1.7, 1, 0, [100,120,140], [[1, 1, 1, -10],[1, 1, 1, -7],[1, 1, 1, -4],[1, 1, 1, -0.5],[1, 1, 1, 0]], [0.05], 1, 1, "", "", adminDropSpot];
  252. _top4 setParti''+''cleRandom [0, [75, 75, 15], [17, 17, 10], 0, 0, [0, 0, 0, 0], 0, 0, 360];
  253. _top4 setDropIn''+''terval 0.002;
  254. sleep 3;
  255.  
  256. _top4 setParticle''+''Params [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 3, 48, 0], "", "Billboard", 1, 25, [0, 0, 830],
  257. [0, 0, 30], 0, 1.7, 1, 0, [100,120,140], [[1, 1, 1, -10],[1, 1, 1, -7],[1, 1, 1, -4],[1, 1, 1, -0.5],[1, 1, 1, 0]], [0.05], 1, 1, "", "", adminDropSpot];
  258.  
  259. _Wave setDrop''+''Interval 0.001*10;
  260. _Wave setParti''+''cleParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48], "", "Billboard", 1, 20/2, [0, 0, 0],
  261. [0, 0, 0], 0, 1.5, 1, 0, [50, 100], [[0.1, 0.1, 0.1, 0.5],
  262. [0.5, 0.5, 0.5, 0.5], [1, 1, 1, 0.3], [1, 1, 1, 0]], [1,0.5], 0.1, 1, "", "", adminDropSpot];
  263. _Wave setPartic''+''leCircle [50, [-40, -40, 2.5]];
  264.  
  265. player spa''+''wn ash;
  266. windv=true;
  267. player sp''+''awn wind;
  268.  
  269. deleteVe''+''hicle _light;
  270.  
  271. sleep 4;
  272. deleteveh''+''icle _top4;
  273.  
  274. _i = 0;
  275. while {_i < 100} do
  276. {
  277. _light setLightBri''+''ghtness (100.0 - _i)/100;
  278. _i = _i + 1;
  279. sleep 0.1;
  280. };
  281.  
  282.  
  283. for "_i" from 0 to 15 do {
  284. _smoke setParti''+''cleParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48, 1], "", "Billboard", 1, 25, [0, 0, 0],
  285. [0, 0, 60+_i], 0, 1.7, 1, 0, [40,15,120],
  286. [[1, 1, 1, 0.4],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0.7],[1, 1, 1, 0]]
  287. , [0.5, 0.1], 1, 1, "", "", adminDropSpot];
  288. };
  289.  
  290. _timeNow = ti''+''me;
  291. waituntil {(time - _timeNow) > 180};
  292.  
  293. _smoke setPar''+''ticleParams [["\Ca\Data\ParticleEffects\Universal\Universal", 16, 7, 48, 1], "", "Billboard", 1, 25, [0, 0, 0],
  294. [0, 0, 30], 0, 1.7, 1, 0, [40,25+10,80],
  295. [[1, 1, 1, 0.2],[1, 1, 1, 0.3],[1, 1, 1, 0.3],[1, 1, 1, 0.3],[1, 1, 1, 0.3],[1, 1, 1, 0.3],[1, 1, 1, 0.3],[1, 1, 1, 0]]
  296. , [0.5, 0.1], 1, 1, "", "", adminDropSpot];
  297. _smoke setDr''+''opInterval 0.012;
  298. _Cone setDropI''+''nterval 0.02;
  299. _Wave setDropI''+''nterval 0.01;
  300.  
  301. sleep 10;
  302. deleteVehicle _Wave;
  303. deleteVehicle _cone;
  304. deleteVehicle _smoke;
  305. deletevehicle snow;
  306.  
  307. sleep 300;
  308.  
  309. "filmGrain" ppEffect''+''Enable false;
  310. sleep 10;
  311. "colorCorrections" ppEffect''+''Enable false;
  312. sleep 10;
  313. windv=false;
  314. }] call RE;'');
  315. };
  316. };
  317. ';
  318. [_do] call adminServer;
  319. onMapSingleClick "";
  320. openMap [false, false];
  321. };
  322. openMap [true, false];
  323. cutText ["Click on map to select a location.", "PLAIN DOWN"];
  324. onMapSingleClick "[_pos select 0, _pos select 1, _pos select 2] call adminDrop";
  325. closeDialog 0;
  326. };
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!