API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jan 28th, 2013
164
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.22 KB | None | 0 0
raw download clone embed print report
  1. /*%FSM<COMPILE "scriptedFSM.cfg, DayZ Server Cleanup">*/
  2. /*%FSM<HEAD>*/
  3. /*
  4. item0[] = {"init",0,250,-75.000000,-400.000000,25.000000,-350.000000,0.000000,"init"};
  5. item1[] = {"true",8,218,-75.000000,-175.000000,25.000000,-125.000000,0.000000,"true"};
  6. item2[] = {"waiting",2,250,-75.000000,-100.000000,25.000000,-50.000000,0.000000,"waiting"};
  7. item3[] = {"too_many_dead",4,218,-150.000000,-25.000000,-50.000000,25.000000,2.000000,"too many" \n "dead"};
  8. item4[] = {"cleanup_dead",2,250,-150.000000,50.000000,-50.000000,100.000000,0.000000,"cleanup" \n "dead"};
  9. item5[] = {"too_many_objects",4,218,-25.000000,-25.000000,75.000000,25.000000,0.000000,"too many" \n "objects"};
  10. item6[] = {"cleanup_objects",2,250,-25.000000,50.000000,75.000000,100.000000,0.000000,"cleanup" \n "objects"};
  11. item7[] = {"time_sync",4,218,-275.000000,-25.000000,-175.000000,25.000000,1.000000,"time" \n "sync"};
  12. item8[] = {"sync_the_time",2,250,-275.000000,50.000000,-175.000000,100.000000,0.000000,"sync" \n "the time"};
  13. item9[] = {"true",8,218,-75.000000,125.000000,25.000000,175.000000,0.000000,"true"};
  14. item10[] = {"general_cleanup",2,250,-75.000000,200.000000,25.000000,250.000000,0.000000,"general" \n "cleanup"};
  15. item11[] = {"",7,210,-304.000000,220.999985,-296.000000,229.000015,0.000000,""};
  16. item12[] = {"",7,210,-304.000000,-154.000000,-296.000000,-146.000000,0.000000,""};
  17. item13[] = {"",7,210,221.000000,-79.000000,229.000000,-71.000000,0.000000,""};
  18. item14[] = {"",7,210,221.000000,146.000000,229.000000,154.000000,0.000000,""};
  19. item15[] = {"initialized",4,218,-75.000000,-325.000000,25.000000,-275.000000,0.000000,"initialized"};
  20. item16[] = {"prepare",2,250,-75.000000,-250.000000,25.000000,-200.000000,0.000000,"prepare"};
  21. item17[] = {"update_objects",2,4346,100.000000,50.000000,200.000000,100.000000,0.000000,"update objects"};
  22. item18[] = {"need_update",4,218,100.000000,-25.000000,200.000000,25.000000,1.000000,"need update"};
  23. item19[] = {"",7,210,221.000000,-79.000000,229.000000,-71.000000,0.000000,""};
  24. link0[] = {0,15};
  25. link1[] = {1,2};
  26. link2[] = {2,3};
  27. link3[] = {2,5};
  28. link4[] = {2,7};
  29. link5[] = {2,13};
  30. link6[] = {2,18};
  31. link7[] = {3,4};
  32. link8[] = {4,9};
  33. link9[] = {5,6};
  34. link10[] = {6,9};
  35. link11[] = {7,8};
  36. link12[] = {8,9};
  37. link13[] = {9,10};
  38. link14[] = {10,11};
  39. link15[] = {11,12};
  40. link16[] = {12,1};
  41. link17[] = {13,14};
  42. link18[] = {13,19};
  43. link19[] = {14,9};
  44. link20[] = {15,16};
  45. link21[] = {16,1};
  46. link22[] = {17,9};
  47. link23[] = {18,17};
  48. globals[] = {25.000000,1,0,0,0,640,480,1,24,6316128,1,-396.580658,354.272186,463.204498,-386.553192,911,1031,1};
  49. window[] = {2,-1,-1,-1,-1,1020,322,1651,78,3,929};
  50. *//*%FSM</HEAD>*/
  51. class FSM
  52. {
  53. fsmName = "DayZ Server Cleanup";
  54. class States
  55. {
  56. /*%FSM<STATE "init">*/
  57. class init
  58. {
  59. name = "init";
  60. init = /*%FSM<STATEINIT""">*/""/*%FSM</STATEINIT""">*/;
  61. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  62. class Links
  63. {
  64. /*%FSM<LINK "initialized">*/
  65. class initialized
  66. {
  67. priority = 0.000000;
  68. to="prepare";
  69. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  70. condition=/*%FSM<CONDITION""">*/"!isnil ""bis_fnc_init"""/*%FSM</CONDITION""">*/;
  71. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  72. };
  73. /*%FSM</LINK>*/
  74. };
  75. };
  76. /*%FSM</STATE>*/
  77. /*%FSM<STATE "waiting">*/
  78. class waiting
  79. {
  80. name = "waiting";
  81. init = /*%FSM<STATEINIT""">*/"//diag_log ""CLEANUP: Waiting for next task"";" \n
  82. "private [""_payload"", ""_interval"",""_delay""];" \n
  83. "{" \n
  84. " _payload = _x select 0;" \n
  85. " _interval = _x select 1;" \n
  86. " _delay = _x select 2;" \n
  87. " if (time - _delay > _interval && _interval != -1) then {" \n
  88. " [nil, nil, rSPAWN, [_crier, _payload], { (_this select 0) globalChat (_this select 1) }] call RE;" \n
  89. " if (_interval == 0) then {" \n
  90. " _msgList set [_forEachIndex, [_payload, -1, time]];" \n
  91. " } else {" \n
  92. " _msgList set [_forEachIndex, [_payload, _interval, time]];" \n
  93. " };" \n
  94. " };" \n
  95. "} forEach _msgList;"/*%FSM</STATEINIT""">*/;
  96. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  97. class Links
  98. {
  99. /*%FSM<LINK "too_many_dead">*/
  100. class too_many_dead
  101. {
  102. priority = 2.000000;
  103. to="cleanup_dead";
  104. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  105. condition=/*%FSM<CONDITION""">*/"((time - _lastCleanDead) > 1200)"/*%FSM</CONDITION""">*/;
  106. action=/*%FSM<ACTION""">*/"_lastCleanDead = time;"/*%FSM</ACTION""">*/;
  107. };
  108. /*%FSM</LINK>*/
  109. /*%FSM<LINK "time_sync">*/
  110. class time_sync
  111. {
  112. priority = 1.000000;
  113. to="sync_the_time";
  114. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  115. condition=/*%FSM<CONDITION""">*/"((time - _lastSyncTime) > 3600)"/*%FSM</CONDITION""">*/;
  116. action=/*%FSM<ACTION""">*/"_lastSyncTime = time;"/*%FSM</ACTION""">*/;
  117. };
  118. /*%FSM</LINK>*/
  119. /*%FSM<LINK "need_update">*/
  120. class need_update
  121. {
  122. priority = 1.000000;
  123. to="update_objects";
  124. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  125. condition=/*%FSM<CONDITION""">*/"((count needUpdate_objects) > 0 && (time - _lastUpdateVeh > 10))"/*%FSM</CONDITION""">*/;
  126. action=/*%FSM<ACTION""">*/"_lastUpdateVeh = time;"/*%FSM</ACTION""">*/;
  127. };
  128. /*%FSM</LINK>*/
  129. /*%FSM<LINK "true">*/
  130. class true
  131. {
  132. priority = 0.000000;
  133. to="general_cleanup";
  134. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  135. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  136. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  137. };
  138. /*%FSM</LINK>*/
  139. /*%FSM<LINK "too_many_objects">*/
  140. class too_many_objects
  141. {
  142. priority = 0.000000;
  143. to="cleanup_objects";
  144. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  145. condition=/*%FSM<CONDITION""">*/"(time - _lastCleanObjs) > 600"/*%FSM</CONDITION""">*/;
  146. action=/*%FSM<ACTION""">*/"_lastCleanObjs = time;"/*%FSM</ACTION""">*/;
  147. };
  148. /*%FSM</LINK>*/
  149. };
  150. };
  151. /*%FSM</STATE>*/
  152. /*%FSM<STATE "cleanup_dead">*/
  153. class cleanup_dead
  154. {
  155. name = "cleanup_dead";
  156. init = /*%FSM<STATEINIT""">*/"diag_log (""CLEANUP: PERFORMING BODY CLEANUP"");" \n
  157. "" \n
  158. "_delQtyP = 0;" \n
  159. "_delQtyZ = 0;" \n
  160. "_delQtyFL = 0;" \n
  161. "_delQtyFP = 0;" \n
  162. "" \n
  163. "{" \n
  164. " if (local _x) then {" \n
  165. " if (_x isKindOf ""zZombie_Base"") then {" \n
  166. " deleteVehicle _x;" \n
  167. " _delQtyZ = _delQtyZ + 1;" \n
  168. " } else {" \n
  169. " if (_x isKindOf ""CAManBase"") then {" \n
  170. " _deathTime = _x getVariable [""processedDeath"", time];" \n
  171. " if (time - _deathTime > 120000) then {" \n
  172. " _flies = nearestObject [_x, ""Sound_Flies""];" \n
  173. " if (!isNull _flies) then {" \n
  174. " deleteVehicle _flies;" \n
  175. " _delQtyFL = _delQtyFL + 1;" \n
  176. " };" \n
  177. " deleteVehicle _x;" \n
  178. " _delQtyP = _delQtyP + 1;" \n
  179. " };" \n
  180. " };" \n
  181. " };" \n
  182. " };" \n
  183. "} forEach allDead;" \n
  184. "" \n
  185. "{" \n
  186. " if ({!alive _x} count (nearestObjects [_x, [""CAManBase""], 10]) >= 0) then {" \n
  187. " deleteVehicle _x;" \n
  188. " _delQtyFL = _delQtyFL + 1;" \n
  189. " };" \n
  190. "} forEach allMissionObjects ""Sound_Flies"";" \n
  191. "" \n
  192. "{" \n
  193. " if (local _x) then {" \n
  194. " deleteVehicle _x;" \n
  195. " _delQtyFP = _delQtyFP + 1;" \n
  196. " };" \n
  197. "} forEach allMissionObjects ""Land_Fire_DZ"";" \n
  198. "" \n
  199. "diag_log (""CLEANUP: Deleted "" + str(_delQtyP) + "" players, "" + str(_delQtyZ) + "" zombies, "" + str(_delQtyFL) + "" flies, and "" + str(_delQtyFP) + "" fireplaces"");" \n
  200. ""/*%FSM</STATEINIT""">*/;
  201. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  202. class Links
  203. {
  204. /*%FSM<LINK "true">*/
  205. class true
  206. {
  207. priority = 0.000000;
  208. to="general_cleanup";
  209. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  210. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  211. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  212. };
  213. /*%FSM</LINK>*/
  214. };
  215. };
  216. /*%FSM</STATE>*/
  217. /*%FSM<STATE "cleanup_objects">*/
  218. class cleanup_objects
  219. {
  220. name = "cleanup_objects";
  221. init = /*%FSM<STATEINIT""">*/"_delQty = 0;" \n
  222. "//{" \n
  223. "// if (local _x) then {" \n
  224. "// _keep = _x getVariable [""permaLoot"",false];" \n
  225. "// _keep = (_keep || (({isPlayer _x} count (_x nearEntities [[""CAManBase""], 100])) > 0));" \n
  226. "// if (!_keep) then {" \n
  227. "// deleteVehicle _x;" \n
  228. "// _delQty = _delQty + 1;" \n
  229. "// };" \n
  230. "// };" \n
  231. "//} forEach allMissionObjects ""WeaponHolder"";" \n
  232. "//diag_log (""CLEANUP: Deleted "" + str(_delQty) + "" loot drops"");" \n
  233. ""/*%FSM</STATEINIT""">*/;
  234. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  235. class Links
  236. {
  237. /*%FSM<LINK "true">*/
  238. class true
  239. {
  240. priority = 0.000000;
  241. to="general_cleanup";
  242. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  243. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  244. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  245. };
  246. /*%FSM</LINK>*/
  247. };
  248. };
  249. /*%FSM</STATE>*/
  250. /*%FSM<STATE "sync_the_time">*/
  251. class sync_the_time
  252. {
  253. name = "sync_the_time";
  254. init = /*%FSM<STATEINIT""">*/"//Send request" \n
  255. "_key = ""CHILD:307:"";" \n
  256. "_result = [_key] call server_hiveReadWrite;" \n
  257. "_outcome = _result select 0;" \n
  258. "if(_outcome == ""PASS"") then {" \n
  259. " _date = [2012,8,31,(_result select 1) select 3, (_result select 1) select 4]; " \n
  260. " _dateDiff = (dateToNumber(_date) - dateToNumber(date)) * 365 * 24 * 60;" \n
  261. " if (abs(_dateDiff) > 5) then {" \n
  262. " setDate _date;" \n
  263. " dayzSetDate = _date;" \n
  264. " publicVariable ""dayzSetDate"";" \n
  265. " diag_log (""TIME SYNC: Local Time set to "" + str(_date));" \n
  266. " };" \n
  267. "};" \n
  268. ""/*%FSM</STATEINIT""">*/;
  269. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  270. class Links
  271. {
  272. /*%FSM<LINK "true">*/
  273. class true
  274. {
  275. priority = 0.000000;
  276. to="general_cleanup";
  277. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  278. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  279. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  280. };
  281. /*%FSM</LINK>*/
  282. };
  283. };
  284. /*%FSM</STATE>*/
  285. /*%FSM<STATE "general_cleanup">*/
  286. class general_cleanup
  287. {
  288. name = "general_cleanup";
  289. init = /*%FSM<STATEINIT""">*/"//Clean groups" \n
  290. "{" \n
  291. " //diag_log (""CLEANUP: CHECKING GROUP WITH "" + str(count units _x) + "" UNITS"");" \n
  292. " if (count units _x==0) then {" \n
  293. " deleteGroup _x;" \n
  294. " //diag_log (""CLEANUP: DELETING A GROUP"");" \n
  295. " };" \n
  296. "} forEach allGroups;" \n
  297. "" \n
  298. "//Check for hackers" \n
  299. " {" \n
  300. " if(vehicle _x != _x && !(vehicle _x in _safety) && (typeOf vehicle _x) != ""ParachuteWest"") then {" \n
  301. " diag_log (""CLEANUP: KILLING A HACKER "" + (name _x) + "" "" + str(_x) + "" IN "" + (typeOf vehicle _x));" \n
  302. " (vehicle _x) setDamage 1;" \n
  303. " _x setDamage 1;" \n
  304. " };" \n
  305. " } forEach allUnits;" \n
  306. "" \n
  307. "dayz_serverObjectMonitor = _safety;"/*%FSM</STATEINIT""">*/;
  308. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  309. class Links
  310. {
  311. /*%FSM<LINK "true">*/
  312. class true
  313. {
  314. priority = 0.000000;
  315. to="waiting";
  316. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  317. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  318. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  319. };
  320. /*%FSM</LINK>*/
  321. };
  322. };
  323. /*%FSM</STATE>*/
  324. /*%FSM<STATE "prepare">*/
  325. class prepare
  326. {
  327. name = "prepare";
  328. init = /*%FSM<STATEINIT""">*/"private [""_safety"", ""_msgList"", ""_crier"", ""_lastSyncTime"", ""_lastCleanDead"", ""_lastCleanObjs"", ""_lastUpdateVeh""];" \n
  329. "diag_log (""CLEANUP: INITIALIZING CLEANUP SCRIPT"");" \n
  330. "" \n
  331. "_safety = dayz_serverObjectMonitor;" \n
  332. "_msgList = msgList;" \n
  333. "_crierGrp = createGroup sideLogic;" \n
  334. "_crier = _crierGrp createUnit [""Survivor2_DZ"", [-2500, 0, 0], [], 0, ""NONE""];" \n
  335. "" \n
  336. "_lastSyncTime = time;" \n
  337. "_lastCleanDead = time;" \n
  338. "_lastCleanObjs = time;" \n
  339. "_lastUpdateVeh = time;"/*%FSM</STATEINIT""">*/;
  340. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  341. class Links
  342. {
  343. /*%FSM<LINK "true">*/
  344. class true
  345. {
  346. priority = 0.000000;
  347. to="waiting";
  348. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  349. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  350. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  351. };
  352. /*%FSM</LINK>*/
  353. };
  354. };
  355. /*%FSM</STATE>*/
  356. /*%FSM<STATE "update_objects">*/
  357. class update_objects
  358. {
  359. name = "update_objects";
  360. init = /*%FSM<STATEINIT""">*/"diag_log format[""DEBUG: needUpdate_objects=%1"",needUpdate_objects];" \n
  361. "{" \n
  362. "// _x setVariable [""needUpdate"",false,true];" \n
  363. " needUpdate_objects = needUpdate_objects - [_x];" \n
  364. " [_x,""all""] spawn server_updateObject;" \n
  365. "" \n
  366. "} forEach needUpdate_objects;" \n
  367. ""/*%FSM</STATEINIT""">*/;
  368. precondition = /*%FSM<STATEPRECONDITION""">*/""/*%FSM</STATEPRECONDITION""">*/;
  369. class Links
  370. {
  371. /*%FSM<LINK "true">*/
  372. class true
  373. {
  374. priority = 0.000000;
  375. to="general_cleanup";
  376. precondition = /*%FSM<CONDPRECONDITION""">*/""/*%FSM</CONDPRECONDITION""">*/;
  377. condition=/*%FSM<CONDITION""">*/"true"/*%FSM</CONDITION""">*/;
  378. action=/*%FSM<ACTION""">*/""/*%FSM</ACTION""">*/;
  379. };
  380. /*%FSM</LINK>*/
  381. };
  382. };
  383. /*%FSM</STATE>*/
  384. };
  385. initState="init";
  386. finalStates[] =
  387. {
  388. };
  389. };
  390. /*%FSM</COMPILE>*/
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!