API tools faq
paste
Guest User

Untitled

a guest
Jul 21st, 2018
82
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 17.27 KB | None | 0 0
raw download clone embed print report
  1. alias -l getid {
  2. return $strip($remove($right($1,$calc($len($1) - $pos($1,$chr(40)))),$chr(40),$chr(41),.))))
  3. }
  4.  
  5. alias -l getname {
  6. return $strip($left($1,$calc($pos($1,$chr(40)) - 1)))
  7. }
  8.  
  9. alias vinstall {
  10. if (%vinstalled) { echo -a vStats is already installed. /vuninstall to uninstall your stats | HALT }
  11. set %vname $?="Enter your ingame name."
  12. set %varrestpm $?!="Would you like arrest count increases to be announced to you via PM?"
  13. set %vdeathspm $?!="Would you like kill/death counts to be announced via PM?"
  14. set %vcriminalpm $?!="Would you like criminal activity counts (e.g. rape) to be announced via PM?"
  15. set %vvictimpm $?!="Would you like counts to be announced via PM when you are the victim of an arrest, rape or kidnap?"
  16. set %vterrorpm $?!="Would you like counts to be announced via PM when you blow up a building?"
  17. set %vnoobpm $?!="Would you like counts to be announced via PM when you get adnoobed?"
  18. set %vbancountpm $?!="Would you like to announce ban increases(Only works if you are an admin with a high enough level)"
  19. set %vadmincountpm $?!="Would you like to announce other admin action such as mutes/jails/kicks (Only works if you are an admin with a high enough level)"
  20. if ($?!"Installation almost complete. Are you happy with your options?" == $true) {
  21. set %vinstalled 1
  22. echo -a Installation is now complete, simply connect to the server and have fun!
  23. set %varrestcount 0
  24. set %vrearrestcount 0
  25. set %vmwarrestcount 0
  26. set %vdeathcount 0
  27. set %vkillcount 0
  28. set %vbancount 0
  29. set %vmutecount 0
  30. set %vjailcount 0
  31. set %vkickcount 0
  32. set %vfreezecount 0
  33. set %vwarncount 0
  34. set %vrapecount 0
  35. set %vrapedcount 0
  36. set %vrobberycount 0
  37. set %vamountrobbed 0
  38. set %vkidnapcount 0
  39. set %vkidnappedcount 0
  40. set %varrestedcount 0
  41. set %vreportcount 0
  42. set %vreportedcount 0
  43. set %vrobcount 0
  44. set %vrobbedcount 0
  45. set %vcagecount 0
  46. set %vterrorcount 0
  47. set %vnoobcount 0
  48. }
  49. else {
  50. unset %vname
  51. unset %varrestpm
  52. unset %vdeathspm
  53. unset %vbancountpm
  54. unset %vadmincountpm
  55. unset %vcriminalpm
  56. unset %vinstalled
  57. unset %varrestcount
  58. unset %vrearrestcount
  59. unset %vmwarrestcount
  60. unset %vdeathcount
  61. unset %vkillcount
  62. unset %vbancount
  63. unset %vmutecount
  64. unset %vjailcount
  65. unset %vkickcount
  66. unset %vfreezecount
  67. unset %vwarncount
  68. unset %vrapecount
  69. unset %vrapedcount
  70. unset %vrobberycount
  71. unset %vamountrobbed
  72. unset %vkidnapcount
  73. unset %vkidnappedcount
  74. unset %varrestedcount
  75. unset %vreportcount
  76. unset %vreportedcount
  77. unset %vrobcount
  78. unset %vrobbedcount
  79. unset %vcagecount
  80. unset %vterrorcount
  81. unset %vnoobcount
  82. echo -a Installation process cancelled
  83. }
  84. }
  85.  
  86. alias vuninstall {
  87. if (!%vinstalled) {
  88. if ($?!="vStats isn't installed, would you like to install now?" == $true) { vinstall }
  89. halt
  90. }
  91. if ($?!"Are you sure you want to uninstall? You will lose all your stats." == $true) {
  92. unset %vname
  93. unset %varrestpm
  94. unset %vdeathspm
  95. unset %vbancountpm
  96. unset %vadmincountpm
  97. unset %vcriminalpm
  98. unset %vinstalled
  99. unset %varrestcount
  100. unset %vrearrestcount
  101. unset %vmwarrestcount
  102. unset %vdeathcount
  103. unset %vkillcount
  104. unset %vbancount
  105. unset %vmutecount
  106. unset %vjailcount
  107. unset %vkickcount
  108. unset %vfreezecount
  109. unset %vwarncount
  110. unset %vrapecount
  111. unset %vrapedcount
  112. unset %vrobberycount
  113. unset %vamountrobbed
  114. unset %vkidnapcount
  115. unset %vkidnappedcount
  116. unset %varrestedcount
  117. unset %vreportcount
  118. unset %vreportedcount
  119. unset %vrobcount
  120. unset %vrobbedcount
  121. unset %vcagecount
  122. unset %vterrorcount
  123. unset %vnoobcount
  124. echo -a vStats successfully uninstalled
  125. }
  126. else {
  127. echo -a Uninstall process cancelled
  128. }
  129. }
  130. alias vconfigure {
  131. if (!%vinstalled) { echo -a vStats isnt installed. Type /vinstall to install it. | HALT }
  132. set %vname $?="Enter your ingame name."
  133. set %varrestpm $?!="Would you like arrest count increases to be announced to you via PM?"
  134. set %vdeathspm $?!="Would you like kill/death counts to be announced via PM?"
  135. set %vcriminalpm $?!="Would you like criminal activity counts (e.g. rape) to be announced via PM?"
  136. set %vvictimpm $?!="Would you like counts to be announced via PM when you are the victim of an arrest, rape or kidnap?"
  137. set %vterrorpm $?!="Would you like counts to be announced via PM when you blow up a building?"
  138. set %vnoobpm $?!="Would you like counts to be announced via PM when you get adnoobed?"
  139. set %vbancountpm $?!="Would you like to announce ban increases(Only works if you are an admin with a high enough level)"
  140. set %vadmincountpm $?!="Would you like to announce other admin action such as mutes/jails/kicks (Only works if you are an admin with a high enough level)"
  141. echo -a vStats has been reconfigured. You may reconfigure at any time with /vconfigure
  142. }
  143.  
  144. alias vadstats {
  145. if (%vinstalled) {
  146. msg #vstats (6vStats) 6Bans:7 %vbancount  $+ $chr(124) 6Mutes:7 %vmutecount  $+ $chr(124) 6Jails:7 %vjailcount  $+ $chr(124) 6Kicks:7 %vkickcount  $+ $chr(124) 6Warns:7 %vwarncount  $+ $chr(124) 6Freezes:7 %vfreezecount  $+ $chr(124) 6Cages:7 %vcagecount
  147. }
  148. }
  149.  
  150. alias vstats {
  151. if (%vinstalled) {
  152. msg #vstats (6vStats) 6Police Reports:7 %vreportcount  $+ $chr(124) 6Arrests:7 %varrestcount  $+ $chr(124) 6Most wanted arrests:7 %vmwarrestcount  $+ $chr(124) 6Re-arrests:7 %vrearrestcount  $+ $chr(124) 6Total arrests:7 $calc(%varrestcount + %vmwarrestcount + %vrearrestcount)  $+ $chr(124) 6Kills:7 %vkillcount  $+ $chr(124) 6Deaths:7 %vdeathcount  $+ $chr(124) 6Ratio:7 $calc(%vkillcount / %vdeathcount)  $+ $chr(124) 6Player robs:7 %vrobcount  $+ $chr(124) 6Business robberies:7 %vrobberycount  $+ $chr(124) 6Amount robbed:7 $chr(36) $+ %vamountrobbed  $+ $chr(124) 6Rapes:7 %vrapecount  $+ $chr(124) 6Kidnaps:7 %vkidnapcount  $+ $chr(124) 6Times robbed:7 %vrobbedcount  $+ $chr(124) 6Times raped:7 %vrapedcount  $+ $chr(124) 6Times Kidnapped:7 %vkidnappedcount  $+ $chr(124) 6Times Arrested:7 %varrestedcount  $+ $chr(124) 6Times Police Reported:7 %vreportedcount  $+ $chr(124) 6Blown Buildings:7 %vterrorcount  $+ $chr(124) 6Times Adnoobed:7 %vnoobcount
  153. }
  154. }
  155.  
  156. on *:TEXT:*Most Wanted suspect*has been sent to Alcatraz by Officer*:#: {
  157. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  158. if (%vinstalled) {
  159. if (%vname == $getname($12)) {
  160. inc %vmwarrestcount
  161. if (%varrestpm) { msg #vstats !pm $getid($12) Most wanted arrest count increased! You have arrested %vmwarrestcount most wanted criminals. }
  162. }
  163. if (%vname == $getname($4)) {
  164. inc %varrestedcount
  165. if (%vvictimpm) { msg #vstats !pm $getid($4) You have been arrested %varrestedcount times! }
  166. }
  167. }
  168. }
  169. }
  170.  
  171. on *:TEXT:*Wanted suspect*has been arrested by Officer*:#: {
  172. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  173. if (%vinstalled) {
  174. if (%vname == $getname($9)) {
  175. inc %varrestcount
  176. if (%varrestpm) { msg #vstats !pm $getid($9) Arrest count increased! You have arrested %varrestcount people. }
  177. }
  178. if (%vname == $getname($3)) {
  179. inc %varrestedcount
  180. if (%vvictimpm) { msg #vstats !pm $getid($3) You have been arrested %varrestedcount times! }
  181. }
  182. }
  183. }
  184. }
  185.  
  186. on *:TEXT:*Escaped Convict*has been re-arrested and sent to Alcatraz by Officer*:#: {
  187. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  188. if (%vinstalled) {
  189. if (%vname == $getname($13)) {
  190. inc %vrearrestcount
  191. if (%varrestpm) { msg #vstats !pm $getid($13) Re-Arrest count increased! You have re-arrested %vrearrestcount people! }
  192. }
  193. if (%vname == $getname($3)) {
  194. inc %varrestedcount
  195. if (%vvictimpm) { msg #vstats !pm $getid($3) You have been re-arrested %varrestedcount times! }
  196. }
  197. }
  198. }
  199. }
  200.  
  201. on *:TEXT:2[Death]*was killed by*:#: {
  202. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  203. if (%vinstalled) {
  204. if ($getname($6) == %vname) {
  205. inc %vkillcount
  206. if (%vdeathspm) { msg #vstats !pm $getid($6) Kill count increased! You have killed %vkillcount people. }
  207. }
  208. if ($getname($2) == %vname) {
  209. inc %vdeathcount
  210. if (%vdeathspm) { msg #vstats !pm $getid($2) Death count increased! You have died %vdeathcount times. }
  211. }
  212. }
  213. }
  214. }
  215.  
  216. on *:TEXT:*Has raped*:#: {
  217. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  218. if (%vinstalled) {
  219. if ($getname($1) == %vname) {
  220. inc %vrapecount
  221. if (%vcriminalpm) { msg #vstats !pm $getid($1) Rape count increased! You have raped %vrapecount people. }
  222. }
  223. if ($getname($4) == %vname) {
  224. inc %vrapedcount
  225. if (%vcriminalpm) { msg #vstats !pm $getid($4) You have been raped %vrapedcount times! }
  226. }
  227. }
  228. }
  229. }
  230.  
  231. on *:TEXT:*, You have successfully Jailed*:#: {
  232. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  233. if (%vinstalled) {
  234. if ($strip($remove($1,$chr(44))) == $me) {
  235. if ($5 == Jailed) {
  236. inc %vjailcount
  237. if (%vadmincountpm) { msg #vstats Jail count increased! I have jailed %vjailcount people. }
  238. }
  239. }
  240. }
  241. }
  242. }
  243.  
  244. on *:TEXT:*(POLICE REPORT)*Officer*has reported suspect*Reason*:#: {
  245. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  246. if (POLICE isin $1) {
  247. if (%vinstalled) {
  248. if (%vname == $getname($4)) {
  249. inc %vreportcount
  250. if (%%varrestpm) { msg #vstats !pm $getid($4) Police Report count increased! You have Police Reported %vreportcount people. }
  251. }
  252. if (%vname == $getname($8)) {
  253. inc %vreportedcount
  254. if (%vcriminalpm) { msg #vstats !pm $getid($4) You have been Police Reported %vreportedcount times! }
  255. }
  256. }
  257. }
  258. }
  259. }
  260.  
  261. on *:TEXT:*has been*by*on IRC*:#: {
  262. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  263. if (%vinstalled) {
  264. if ($str($chr(42),3) isin $1) {
  265. if ($7 == $me) {
  266. if ($5 == banned) {
  267. inc %vbancount
  268. if (%vbancountpm) { msg #vstats Ban count increased! I have banned %vbancount people. }
  269. }
  270. if ($5 == muted) {
  271. inc %vmutecount
  272. if (%vadmincountpm) { msg #vstats Mute count increased! I have muted %vmutecount people. }
  273. }
  274. if ($5 == frozen) {
  275. inc %vfreezecount
  276. if (%vadmincountpm) { msg #vstats Freeze count increased! I have frozen %vfreezecount people. }
  277. }
  278. if ($5 == kicked) {
  279. inc %vkickcount
  280. if (%vadmincountpm) { msg #vstats Kick count increased! I have kicked %vkickcount people. }
  281. }
  282. if ($5 == warned) {
  283. inc %vwarncount
  284. if (%vadmincountpm) { msg #vstats Warn count increased! I have warned %vwarncount people. }
  285. }
  286. }
  287. }
  288. }
  289. }
  290. }
  291.  
  292. on *:TEXT:*ADMIN*PLAYER*:#: {
  293. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  294. if (%vinstalled) {
  295. if ($strip($1) == ADMIN) {
  296. if (%vname == $getname($2)) {
  297. if ($3 == BANNED) {
  298. inc %vbancount
  299. if (%vbancountpm) { msg #vstats !pm $getid($2) Ban count increased! You have banned %vbancount people. }
  300. }
  301. if ($3 == JAILED) {
  302. inc %vjailcount
  303. if (%vadmincountpm) { msg #vstats !pm $getid($2) Jail count increased! You have jailed %vjailcount people. }
  304. }
  305. if ($3 == KICKED) {
  306. inc %vkickcount
  307. if (%vadmincountpm) { msg #vstats !pm $getid($2) Kick count increased! You have kicked %vkickcount people. }
  308. }
  309. if ($4 == WARNED) {
  310. inc %vwarncount
  311. if (%vadmincountpm) { msg #vstats !pm $getid($2) Warn count increased! You have warned %vwarncount people. }
  312. }
  313. if ($3 == FROZE) {
  314. inc %vfreezecount
  315. if (%vadmincountpm) { msg #vstats !pm $getid($2) Freeze count increased! You have froze %vfreezecount people. }
  316. }
  317. if ($3 == CAGED) {
  318. inc %vcagecount
  319. if (%vadmincountpm) { msg #vstats !pm $getid($2) Cage count increased! You have caged %vcagecount people. }
  320. }
  321. }
  322. }
  323. if ($strip($2) == ADMIN) {
  324. if (%vname == $getname($3)) {
  325. if ($4 == MUTED) {
  326. inc %vmutecount
  327. if (%vadmincountpm) { msg #vstats !pm $getid($3) Mute count increased! You have muted %vmutecount people. }
  328. }
  329. }
  330. }
  331. }
  332. }
  333. }
  334.  
  335. on *:TEXT:*TRP*HAS WARNED PLAYER*:#: {
  336. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  337. if (%vinstalled) {
  338. if ($strip($1) == TRP) {
  339. if (%vname == $getname($2)) {
  340. if ($4 == WARNED) {
  341. inc %vwarncount
  342. if (%vadmincountpm) { msg #vstats !pm $getid($2) Warn count increased! You have warned %vwarncount people. }
  343. }
  344. }
  345. }
  346. }
  347. }
  348. }
  349.  
  350. on *:TEXT:**(DM WARN)**Has been warned for DMING by TRP*:#: {
  351. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  352. if (%vinstalled) {
  353. if ($strip($10) == TRP) {
  354. if (%vname == $getname($11)) {
  355. if ($6 == warned) {
  356. inc %vwarncount
  357. if (%vadmincountpm) { msg #vstats !pm $getid($11) Warn count increased! You have warned %vwarncount people. }
  358. }
  359. }
  360. }
  361. }
  362. }
  363. }
  364.  
  365.  
  366. on *:TEXT:**(ADMIN WARN)**Has been warned for DMING by server admin*:#: {
  367. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  368. if (%vinstalled) {
  369. if (ADMIN isin $1) {
  370. if (%vname == $getname($12)) {
  371. inc %vwarncount
  372. if (%vadmincountpm) { msg #vstats !pm $getid($12) Warn count increased! You have warned %vwarncount people. }
  373. }
  374. }
  375. }
  376. }
  377. }
  378.  
  379.  
  380.  
  381. on *:TEXT:*has been banned from the server:#: {
  382. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  383. if (%vinstalled) {
  384. if ($strip($remove($1,$chr(44))) == $me) {
  385. inc %vbancount
  386. if (%vbancountpm) { msg #vstats Ban count increased! I have banned %vbancount people. }
  387. }
  388. }
  389. }
  390. }
  391.  
  392.  
  393. on *:TEXT:*ROBBERY)*has robbed a total of*:#: {
  394. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  395. if (%vinstalled) {
  396. if ($chr(36) isin $9) { var %name $getname($3) | set %id $getid($3) | var %word $9 }
  397. if ($chr(36) isin $10) { var %name $getname($4) | var %id $getid($4) | var %word $10 }
  398. if (%vname == %name) {
  399. inc %vrobberycount
  400. set %vamountrobbed $calc(%vamountrobbed + $remove(%word,$chr(36)))
  401. if (%vcriminalpm) { msg #vstats !pm %id You have robbed a total of $chr(36) $+ %vamountrobbed from %vrobberycount places. }
  402. }
  403. }
  404. }
  405. }
  406.  
  407. on *:TEXT:|_-Rob-_|*Has Robbed Player*By*:#: {
  408. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  409. if (%vinstalled) {
  410. if ($getname($2) == %vname) {
  411. inc %vrobcount
  412. set %vamountrobbed $calc(%vamountrobbed + $remove($13,$chr(36),$chr(33)))
  413. if (%vcriminalpm) { msg #vstats !pm $getid($2) Rob count increased! You have robbed %vrobcount people. }
  414. }
  415. if ($getname($6) == %vname) {
  416. inc %vrobbedcount
  417. if (%vcriminalpm) { msg #vstats !pm $getid($6) You have been robbed %vrobbedcount times! }
  418. }
  419. }
  420. }
  421. }
  422.  
  423.  
  424. on *:TEXT:(Kidnapping)*has grabbed*and thrown him into his car!:#: {
  425. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  426. if (%vinstalled) {
  427. if ($getname($2) == %vname) {
  428. inc %vkidnapcount
  429. if (%vcriminalpm) { msg #vstats !pm $getid($2) Kidnap count increased! You have kidnapped %vkidnapcount people. }
  430. }
  431. if ($getname($5) == %vname) {
  432. inc %vkidnappedcount
  433. if (%vvictimpm) { msg #vstats !pm $getid($5) You have been kidnapped %vkidnappedcount times! }
  434. }
  435. }
  436. }
  437. }
  438.  
  439. on *:TEXT:Terrorist*Has blown up the*with C4 and has robbed*from it.:#: {
  440. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  441. if (%vinstalled) {
  442. if ($chr(36) isin $13) { var %name $getname($2) | set %id $getid($2) | var %word $13 }
  443. if ($chr(36) isin $14) { var %name $getname($2) | set %id $getid($2) | var %word $14 }
  444. if ($chr(36) isin $15) { var %name $getname($2) | set %id $getid($2) | var %word $15 }
  445. if ($getname($2) == %vname) {
  446. inc %vterrorcount
  447. inc %vrobberycount
  448. set %vamountrobbed $calc(%vamountrobbed + $remove(%word,$chr(36)))
  449. if (%vterrorpm) { msg #vstats !pm %id You have blown up %vterrorcount buildings! }
  450. }
  451. }
  452. }
  453. }
  454.  
  455. on *:TEXT:**(ADMIN WARN)**Has been warned by server admin for being a nooblet:#: {
  456. if ($nick == DRDCNR1) || ($nick == DRDCNR2) || ($nick == DRDCNR3) {
  457. if (%vinstalled) {
  458. if ($getname($3) == %vname) {
  459. inc %vnoobcount
  460. if (%vnoobpm) { msg #vstats !pm $getid($3) You have been warned for nooby activity %vnoobcount times! }
  461. }
  462. }
  463. }
  464. }
Add Comment
Please, Sign In to add comment
Public Pastes
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!