API tools faq
paste
Advertisement
Guest User

ocn-report-tool

a guest
Sep 2nd, 2015
297
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.27 KB | None | 0 0
raw download clone embed print report
  1. UNSET(overcast);
  2. UNSET(run);
  3. DO;
  4. IFCONTAINS(%SERVER%,oc.tc);
  5. SET(overcast);
  6. SET(run);
  7. ENDIF;
  8. IFMATCHES(%SERVER%,"(tm\.|event\.|dev\.)");
  9. UNSET(overcast);
  10. UNSET(run);
  11. ENDIF;
  12. IF(run);
  13. IF(MODE = 1);
  14. IF(HEALTH = 0);
  15. SET(active);
  16. SET(respawn);
  17. ELSE;
  18. IF(respawn);
  19. UNSET(active);
  20. UNSET(respawn);
  21. ENDIF;
  22. ENDIF;
  23. IF(active);
  24. ELSE;
  25. IF(MODE = 0);
  26. STOP(reportloader);
  27. ENDIF;
  28. SETSLOTITEM(tripwire_hook,1,1);
  29. SETSLOTITEM(stick,3,1);
  30. SETSLOTITEM(book,4,1);
  31. SETSLOTITEM(redstone_torch,5,1);
  32. SETSLOTITEM(tnt,9,1);
  33. SLOT(1);
  34. UNSET(run);
  35. STOP(report);
  36. SET(active);
  37. ENDIF;
  38. SET(active);
  39. ELSEIF(MODE = 0);
  40. IF(active);
  41. UNSET(active);
  42. ELSE;
  43. ENDIF;
  44. STOP(reportloader);
  45. ENDIF;
  46. ENDIF;
  47. WHILE(run);
  48. IF(overcast);
  49. ELSE;
  50. STOP(reportloader);
  51. ENDIF;
  52. UNSET(lock);
  53. UNSET(&lockname);
  54. DO;
  55. IF(MODE = 1);
  56. SET(run);
  57. IF(LMOUSE);
  58. IF(holdingclick);
  59. ELSE;
  60. IF(GUI = "NONE");
  61. SET(holdingclick);
  62. SET(click);
  63. ENDIF;
  64. ENDIF;
  65. IF(click);
  66. IF(ITEM = "air");
  67. IF(CTRL);
  68. WAIT(50ms);
  69. SETSLOTITEM(compass,0,1);
  70. SETSLOTITEM(tripwire_hook,1,1);
  71. SETSLOTITEM(stick,3,1);
  72. SETSLOTITEM(book,4,1);
  73. SETSLOTITEM(redstone_torch,5,1);
  74. SETSLOTITEM(tnt,9,1);
  75. SLOT(1);
  76. LOG("&7Refreshed hotbar");
  77. ENDIF;
  78. ENDIF;
  79. IF(ITEM = "tripwire_hook");
  80. IF(HIT = "PLAYER");
  81. IF(lock);
  82. IF(CTRL);
  83. LOG("&4[&6R&4]&aThrasillias&6 | Unlocked From | &a%&lockname%");
  84. UNSET(lock);
  85. UNSET(&lockname);
  86. STRIP(&hitname,%HITNAME%);
  87. SET(&lockname,%&hitname%);
  88. LOG("&4[&6R&4]&aThrasillias&6 | Locked onto | &a%&lockname%");
  89. SET(lock);
  90. ELSE;
  91. ECHO("/tp %&lockname%");
  92. LOG("&4[&6R&4]&aThrasillias&6 | Teleported To | &a%&lockname%");
  93. ENDIF;
  94. ELSEIF(CTRL);
  95. PROMPT(&tpto,"$$u","Select a user to teleport to","","DummyTeleport");
  96. IFMATCHES(%&tpto%,"DummyTeleport");
  97. LOG("&7No player selected");
  98. ELSE;
  99. SET(&lockname,%&tpto%);
  100. LOG("&4[&6R&4]&aThrasillias&6 | Locked onto | &a%&lockname%");
  101. SET(lock);
  102. ECHO("/tp %&tpto%");
  103. LOG("&4[&6R&4]&aThrasillias&6 | Teleported To | &a%&lockname%");
  104. ENDIF;
  105. ELSEIF;
  106. STRIP(&hitname,%HITNAME%);
  107. SET(&lockname,%&hitname%);
  108. LOG("&4[&6R&4]&aThrasillias&6 | Locked onto | &a%&lockname%");
  109. SET(lock);
  110. ENDIF;
  111. ELSE;
  112. IF(lock);
  113. IF(CTRL);
  114. LOG("&4[&6R&4]&aThrasillias&6 | Unlocked From | &a%&lockname%:");
  115. UNSET(lock);
  116. UNSET(&lockname);
  117. ELSE;
  118. ECHO("/tp %&lockname%");
  119. LOG("&4[&6R&4]&aThrasillias&6 | Teleported To | &a%&lockname%");
  120. ENDIF;
  121. ELSEIF(CTRL);
  122. PROMPT(&tpto,"$$u","Select a user to teleport to","","DummyTeleport");
  123. IFMATCHES(%&tpto%,"DummyTeleport");
  124. LOG("&7No player selected");
  125. ELSE;
  126. SET(&lockname,%&tpto%);
  127. LOG("&4[&6R&4]&aThrasillias&6 | Locked onto | &a%&lockname%");
  128. SET(lock);
  129. ECHO("/tp %&tpto%");
  130. LOG("&4[&6R&4]&aThrasillias&6 | Teleported To | &a%&lockname%");
  131. ENDIF;
  132. ENDIF;
  133. ENDIF;
  134. ENDIF;
  135. IF(ITEM = "stick");
  136. IF(HIT = "PLAYER");
  137. STRIP(&hitname,%HITNAME%);
  138. PROMPT(&reason,"$$[[Type here]]", "Report %&hitname% for what?", true, "DummyReason");
  139. IFMATCHES(%&reason%,"DummyReason");
  140. LOG("&4[&6R&4]&aThrasillias&6 | No Reason Given For | &a%&hitname%");
  141. ELSE;
  142. PROMPT(&confirm,"$$[[Yes,No]]", "Confirm and report %&hitname% for %&reason%?", true, "DummyConfirm");
  143. IFMATCHES(%&confirm,"DummyConfirm");
  144. LOG("&4[&6R&4]&aThrasillias&6 | Not Confirmed");
  145. ELSEIF(&confirm = "No");
  146. LOG&4[&6R&4]&aThrasillias&6 | Cancelled");
  147. ELSEIF(&confirm = "Yes");
  148. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&hitname% &6| &3Reason &3%&hitname%&e: &f%&reason%");
  149. ECHO("/report %&hitname% %&reason%");
  150. ELSE;
  151. LOG("&4[&6R&4]&aThrasillias&6 | Aborted");
  152. ENDIF;
  153. ENDIF;
  154. ELSE;
  155. IF(CTRL);
  156. PROMPT(&player,"$$u","Select a user to report",true,"DummyPlayer");
  157. IFCONTAINS(%&player%,"DummyPlayer");
  158. LOG("&4[&6R&4]&aThrasillias&6 | No Player Selected");
  159. ELSE;
  160. PROMPT(&reason,"$$[[Type here]]", "Report %&player% for what?", true, "DummyReason");
  161. IFMATCHES(%&reason%,"DummyReason");
  162. LOG("&4[&6R&4]&aThrasillias&6 | No Reason Given");
  163. ELSE;
  164. PROMPT(&confirm,"$$[[Yes,No]]", "Confirm and report %&player% for %&reason%?", true, "DummyConfirm");
  165. IFMATCHES(%&confirm%,"DummyConfirm");
  166. LOG("&4[&6R&4]&aThrasillias&6 | Not Confirmed");
  167. ELSEIF(&confirm = "No");
  168. LOG("&4[&6R&4]&aThrasillias&6 | Cancelled");
  169. ELSEIF(&confirm = "Yes");
  170. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player% &6| &3%&reason%");
  171. ECHO("/report %&player% %&reason%");
  172. ELSE;
  173. LOG("&4[&6R&4]&aThrasillias&6 | Aborted");
  174. ENDIF;
  175. ENDIF;
  176. ENDIF;
  177. ELSEIF(lock)
  178. PROMPT(&reason,"$$[[Type here]]", "Report %&lockname% for what?", true, "DummyReason");
  179. IFMATCHES(%&reason%,"DummyReason");
  180. LOG("&4[&6R&4]&aThrasillias&6 | No Reason Given");
  181. ELSE;
  182. PROMPT(&confirm,"$$[[Yes,No]]", "Confirm and report %&lockname% for %&reason%?", true, "DummyConfirm");
  183. IFMATCHES(%&confirm%,"DummyConfirm");
  184. LOG("&4[&6R&4]&aThrasillias&6 | Not Confirmed");
  185. ELSEIF(&confirm = "No");
  186. LOG("&4[&6R&4]&aThrasillias&6 | Cancelled");
  187. ELSEIF(&confirm = "Yes");
  188. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&lockname% &6| &3%&reason%");
  189. ECHO("/report %&lockname% %&reason%");
  190. //UNSET(lock);
  191. //UNSET(&lockname);
  192. ELSE;
  193. LOG("&4[&6R&4]&aThrasillias&6 | Aborted");
  194. ENDIF;
  195. ENDIF;
  196. ENDIF;
  197. ENDIF;
  198. ENDIF;
  199. IF(ITEM = "book");
  200. IF(HIT = "PLAYER");
  201. STRIP(&hitname,%HITNAME%);
  202. ECHO("/lookup %&hitname%");
  203. LOG("&4[&6R&4]&aThrasillias&6 | lookup | &a%&hitname%");
  204. ELSE;
  205. IF(lock);
  206. IF(CTRL);
  207. ECHO("/seen %&lockname%");
  208. ELSE;
  209. ECHO("/lookup @%&lockname%");
  210. ENDIF;
  211. ELSE;
  212. ENDIF;
  213. ENDIF;
  214. ENDIF;
  215. IF(ITEM = "redstone_torch");
  216. LOG("&4[&6R&4]&aThrasillias&6 | On");
  217. GAMMA(200);
  218. SETSLOTITEM(torch,5,1);
  219. ELSEIF(ITEM = "torch");
  220. LOG("&4[&6R&4]&aThrasillias&6 | Off");
  221. GAMMA(0);
  222. SETSLOTITEM(redstone_torch,5,1);
  223. ENDIF;
  224. IF(ITEM = "tnt");
  225. IF(HIT = "PLAYER");
  226. STRIP(&hitname,%HITNAME%);
  227. SET(&player,%&hitname%);
  228. LOG("&4[&6R&4]&aThrasillias&6 | is reporting | &a%&player%");
  229. PROMPT(&reportConfirm,"$$[[Exit,Blowing up own side with TNT,Blowing up own team supplies with TNT,Attempting to kill team mates with TNT,Breaking team supply chests,Blocking own spawn,Carpet bombing own side,Spawnkilling - Camping next to enemy spawn,Still Teamgriefing with TNT on different game]]", "Report %&player%?", true, " ");
  230. IF(%&reportconfirm% == "Blowing up own side with TNT");
  231. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  232. IF(%&reportfinalconfirm% == "Yes");
  233. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Blowing up own side with TNT");
  234. ECHO("/report %&player% Blowing up own side with TNT");
  235. ENDIF;
  236. ELSEIF(%&reportconfirm% == "Blowing up own team supplies with TNT");
  237. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  238. IF(%&reportfinalconfirm% == "Yes");
  239. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Blowing up own team supplies with TNT");
  240. ECHO("/report %&player% Blowing up own team supplies with TNT");
  241. ENDIF;
  242. ELSEIF(%&reportconfirm% == "Possible Hacked Client");
  243. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  244. IF(%&reportfinalconfirm% == "Yes");
  245. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Possible Hacked Client");
  246. ECHO("/report %&player% Possible Hacked Client");
  247. ENDIF;
  248. ELSEIF(%&reportconfirm% == "Attempting to kill team mates with TNT");
  249. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  250. IF(%&reportfinalconfirm% == "Yes");
  251. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Attempting to kill team mates");
  252. ECHO("/report %&player% Attempting to kill team mates with TNT");
  253. ENDIF;
  254. ELSEIF(%&reportconfirm% == "Breaking team supply chests");
  255. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  256. IF(%&reportfinalconfirm% == "Yes");
  257. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Breaking team supply chests");
  258. ECHO("/report %&player% Breaking team supply chests");
  259. ENDIF;
  260. ELSEIF(%&reportconfirm% == "Blocking own spawn");
  261. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  262. IF(%&reportfinalconfirm% == "Yes");
  263. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Blocking own spawn");
  264. ECHO("/report %&player% Blocking own spawn");
  265. ENDIF;
  266. ELSEIF(%&reportconfirm% == "Carpet bombing own side");
  267. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  268. IF(%&reportfinalconfirm% == "Yes");
  269. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Carpet bombing own side");
  270. ECHO("/report %&player% Carpet bombing own side");
  271. ENDIF;
  272. ELSEIF(%&reportconfirm% == "Spawnkilling - Camping next to enemy spawn");
  273. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  274. IF(%&reportfinalconfirm% == "Yes");
  275. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Spawnkilling - Camping next to enemy spawn");
  276. ECHO("/report %&player% Spawnkilling - Camping next to enemy spawn");
  277. ENDIF;
  278. ELSEIF(%&reportconfirm% == "Still Teamgriefing with TNT on different game");
  279. PROMPT(&reportFinalConfirm,"$$[[Yes,No]]", "Confirm and report %&player%?", true, " ");
  280. IF(%&reportfinalconfirm% == "Yes");
  281. LOG("&4[&6R&4]&aThrasillias&6 | Reported | &a%&player%&3: Still Teamgriefing with TNT on different game");
  282. ECHO("/report %&player% Still Teamgriefing with TNT on different game)");
  283. ENDIF;
  284. ENDIF;
  285. ENDIF;
  286. ENDIF;
  287. UNSET(click);
  288. ENDIF;
  289. ELSE;
  290. UNSET(holdingclick);
  291. ENDIF;
  292. IF(RMOUSE);
  293. IF(rholdingclick);
  294. ELSE;
  295. IF(GUI = "NONE");
  296. SET(rholdingclick);
  297. SET(rclick);
  298. ENDIF;
  299. ENDIF;
  300. IF(rclick);
  301. UNSET(rclick);
  302. ENDIF;
  303. ELSE;
  304. UNSET(rholdingclick);
  305. ENDIF;
  306. ELSEIF;
  307. UNSET(run);
  308. ENDIF;
  309. IF(MODE = 0);
  310. STOP(reportloader)
  311. ENDIF;
  312. WHILE(overcast);
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!