API tools faq
paste
SpliftOn

super consolle irccop

SpliftOn
Jan 15th, 2016
95
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.00 KB | None | 0 0
raw download clone embed print report
  1. #############################################################
  2. ## ##
  3. ## COMMANDE /super ##
  4. ## ##
  5. #############################################################
  6.  
  7.  
  8. alias super {
  9. if ( $dialog(super) == $null ) {
  10. dialog -md super super
  11. }
  12. else {
  13. did -r super 2
  14. did -ra super 29 Il y a 0 Users.
  15. did -b super 5 | did -b super 6 | did -b super 7 | did -b super 8 | did -b super 9
  16. did -b super 10 | did -b super 11 | did -b super 12 | did -b super 13 | did -b super 14
  17. did -b super 15 | did -b super 16 | did -b super 17 | did -b super 18 | did -b super 19
  18. did -b super 20 | did -b super 21 | did -b super 22 | did -b super 23 | did -b super 24
  19. did -b super 25 | did -b super 3 | did -b super 26 | did -b super 27 | did -b super 31
  20. did -b super 32 | did -b super 33 | did -b super 34 | did -b super 35 | did -b super 39
  21. did -b super 40
  22. did -ra super 42 Veuillez selectionner un ou des users
  23. }
  24. set %u 0
  25. set %admin on
  26. //who
  27. }
  28. raw 352:*:{
  29. if ( %admin == on ) {
  30. //did -a super 2 $6 ( $+ $4 $+ ) ident: $3
  31. inc %u
  32. did -ra super 29 Il y a %u Users.
  33. }
  34. haltdef
  35. }
  36. raw 315:*: {
  37. unset %admin
  38. unset %u
  39. haltdef
  40. }
  41. dialog super {
  42. title "Administration - Commande /Super"
  43. size -1 -1 450 250
  44. option dbu
  45. list 2, 8 10 239 200, size extsel vsbar
  46. button "Killer", 3, 397 38 45 10, disable flat
  47. edit "aucune raison", 4, 298 49 145 10, autohs
  48. button "Gliner sans durée", 5, 298 60 48 13, disable flat
  49. button "GLiner 1 Mois", 6, 298 74 48 13, disable flat
  50. button "GLiner 1 Semaine", 7, 298 88 48 13, disable flat
  51. button "GLiner 1 Jours", 8, 298 102 48 12, disable flat
  52. button "GLiner 1 Heure", 9, 298 115 48 13, disable flat
  53. button "GLiner 1 Minute", 10, 298 129 48 12, disable flat
  54. button "GLiner 1 Seconde", 11, 298 142 48 12, disable flat
  55. button "Shun sans durée", 12, 347 60 47 13, disable flat
  56. button "Shun 1 Mois", 13, 347 74 47 13, disable flat
  57. button "Shun 1 Semaine", 14, 347 88 47 13, disable flat
  58. button "Shun 1 Jours", 15, 347 102 47 13, disable flat
  59. button "Shun 1 Heure", 16, 347 116 47 12, disable flat
  60. button "Shun 1 Minute", 17, 347 129 47 12, disable flat
  61. button "UnShun", 18, 347 142 47 12, disable flat
  62. button "KLine sans durée", 19, 396 60 47 13, disable flat
  63. button "KLine 1 Mois", 20, 396 74 47 13, disable flat
  64. button "KLine 1 semaine", 21, 396 88 47 13, disable flat
  65. button "KLine1 Jours", 22, 396 102 47 13, disable flat
  66. button "KLine 1 Heure", 23, 396 116 47 12, disable flat
  67. button "Kline 1 Minute", 24, 396 129 47 13, disable flat
  68. button "Kline 1 Seconde", 25, 396 143 47 11, disable flat
  69. button "Whois", 26, 298 155 71 10, disable flat
  70. button "Privé", 27, 372 155 71 10, disable flat
  71. button "RAFRAICHIR", 28, 8 231 89 15, flat
  72. edit "Il y a 0 Users.", 29, 8 221 89 10
  73. edit "Arretez cette dispute ou je serais obligé de vous sanctionner tous autant que vous etes !", 30, 298 165 145 11, autohs
  74. button "MSG", 31, 299 176 72 13, disable flat
  75. button "Notice", 32, 371 176 71 13, disable flat
  76. button "CTCP TIME", 33, 299 190 47 12, disable flat
  77. button "CTCP PING", 34, 347 190 47 12, disable flat
  78. button "CTCP VERSION", 35, 395 190 48 12, disable flat
  79. button "FERMER", 37, 405 237 39 10, flat ok
  80. edit "#Cannal", 38, 299 203 144 10, autohs
  81. button "Sajoin", 39, 299 213 75 10, disable flat
  82. button "Sapart", 40, 376 213 67 10, disable flat
  83. button "Memoriser les parametres", 41, 369 226 75 10, flat
  84. edit "Veuillez selectionner un ou des users", 42, 298 38 98 10, read
  85. }
  86. on *:dialog:super:init:*: {
  87. if ( %super.save.raison != $null ) did -ra super 4 %super.save.raison
  88. if ( %super.save.msg != $null ) did -ra super 30 %super.save.msg
  89. if ( %super.save.chan != $null ) did -ra super 38 %super.save.chan
  90. }
  91. on *:dialog:super:sclick:*: {
  92. if ( $did == 2 ) {
  93. if ( $did(super,2).sel != $null ) {
  94. if ( $did(super,2,0).sel == 1 ) {
  95. did -ra super 42 Cliquez une action pour cet user
  96. }
  97. else {
  98. did -ra super 42 Cliquez une action pour ces $did(super,2,0).sel users
  99. }
  100. did -e super 5 | did -e super 6 | did -e super 7 | did -e super 8 | did -e super 9
  101. did -e super 10 | did -e super 11 | did -e super 12 | did -e super 13 | did -e super 14
  102. did -e super 15 | did -e super 16 | did -e super 17 | did -e super 18 | did -e super 19
  103. did -e super 20 | did -e super 21 | did -e super 22 | did -e super 23 | did -e super 24
  104. did -e super 25 | did -e super 3 | did -e super 26 | did -e super 27 | did -e super 31
  105. did -e super 32 | did -e super 33 | did -e super 34 | did -e super 35 | did -e super 39
  106. did -e super 40
  107. }
  108. else {
  109. did -b super 5 | did -b super 6 | did -b super 7 | did -b super 8 | did -b super 9
  110. did -b super 10 | did -b super 11 | did -b super 12 | did -b super 13 | did -b super 14
  111. did -b super 15 | did -b super 16 | did -b super 17 | did -b super 18 | did -b super 19
  112. did -b super 20 | did -b super 21 | did -b super 22 | did -b super 23 | did -b super 24
  113. did -b super 25 | did -b super 3 | did -b super 26 | did -b super 27 | did -b super 31
  114. did -b super 32 | did -b super 33 | did -b super 34 | did -b super 35 | did -b super 39
  115. did -b super 40
  116. }
  117. }
  118. if ( $did == 28 ) super
  119. if ( $did == 3 ) killalls
  120. if ( $did == 26 ) whoisalls
  121. if ( $did == 27 ) queryalls
  122. if ( $did == 11) { set %tgline 1 | /Glinealls }
  123. if ( $did == 10) { set %tgline 60 | /Glinealls }
  124. if ( $did == 9) { set %tgline 3600 | /Glinealls }
  125. if ( $did == 8) { set %tgline 86400 | /Glinealls }
  126. if ( $did == 7) { set %tgline 604800 | /Glinealls }
  127. if ( $did == 6) { set %tgline 2592000 | /Glinealls }
  128. if ( $did == 5) { set %tgline 0 | /Glinealls }
  129. if ( $did == 18) { set %tgline 1 | /unshunalls }
  130. if ( $did == 17) { set %tgline 60 | /shunalls }
  131. if ( $did == 16) { set %tgline 3600 | /shunalls }
  132. if ( $did == 15) { set %tgline 86400 | /shunalls }
  133. if ( $did == 14) { set %tgline 604800 | /shunalls }
  134. if ( $did == 13) { set %tgline 2592000 | /shunalls }
  135. if ( $did == 12) { set %tgline 0 | /shunalls }
  136. if ( $did == 25) { set %tgline 1 | /klinealls }
  137. if ( $did == 24) { set %tgline 60 | /klinealls }
  138. if ( $did == 23) { set %tgline 3600 | /klinealls }
  139. if ( $did == 22) { set %tgline 86400 | /klinealls }
  140. if ( $did == 21) { set %tgline 604800 | /klinealls }
  141. if ( $did == 20) { set %tgline 2592000 | /klinealls }
  142. if ( $did == 19) { set %tgline 0 | /klinealls }
  143. if ( $did == 31) /msgalls
  144. if ( $did == 32) /noticealls
  145. if ( $did == 33) /ctcpalls time
  146. if ( $did == 34) /ctcpalls ping
  147. if ( $did == 35) /ctcpalls version
  148. if ( $did == 39) /sajoinalls
  149. if ( $did == 40) /sapartalls
  150. if ( $did == 41) {
  151. set %super.save.raison $did(super,4)
  152. set %super.save.msg $did(super,30)
  153. set %super.save.chan $did(super,38)
  154. }
  155. }
  156. alias killalls {
  157. var %1.1 0
  158. var %2.2 $did(super,2,0).sel
  159. if ( %2.2 > 0 ) {
  160. set %3.3 on
  161. while ( %3.3 == on ) {
  162. inc %1.1
  163. /.timer 1 1 /.kill $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) Super command by $me ( $+ $did(super,4) $+ )
  164. if ( %1.1 == %2.2 ) {
  165. unset %3.3
  166. //.timer 1 2 /super
  167. }
  168. }
  169. }
  170. }
  171. alias glinealls {
  172. echo -A GLINES ALL !!!
  173. var %1.1 0
  174. var %2.2 $did(super,2,0).sel
  175. if ( %2.2 > 0 ) {
  176. set %3.3 on
  177. while ( %3.3 == on ) {
  178. inc %1.1
  179. /.timer 1 1 /.gline $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) %tgline :Super command by $me ( $+ $did(super,4) $+ )
  180. if ( %1.1 == %2.2 ) {
  181. //.timer 1 2 /super
  182. unset %3.3
  183. }
  184. }
  185. }
  186. }
  187. alias klinealls {
  188. var %1.1 0
  189. var %2.2 $did(super,2,0).sel
  190. if ( %2.2 > 0 ) {
  191. set %3.3 on
  192. while ( %3.3 == on ) {
  193. inc %1.1
  194. /.timer 1 1 /.kline $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) %tgline :Super command by $me ( $+ $did(super,4) $+ )
  195. if ( %1.1 == %2.2 ) {
  196. //.timer 1 2 /super
  197. unset %3.3
  198. /super
  199. }
  200. }
  201. }
  202. }
  203. alias shunalls {
  204. var %1.1 0
  205. var %2.2 $did(super,2,0).sel
  206. if ( %2.2 > 0 ) {
  207. set %3.3 on
  208. while ( %3.3 == on ) {
  209. inc %1.1
  210. /.timer 1 1 /.shun $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) %tgline :Super command by $me ( $+ $did(super,4) $+ )
  211. if ( %1.1 == %2.2 ) {
  212. //.timer 1 2 /super
  213. unset %3.3
  214. /super
  215. }
  216. }
  217. }
  218. }
  219. alias unshunalls {
  220. var %1.1 0
  221. var %2.2 $did(super,2,0).sel
  222. if ( %2.2 > 0 ) {
  223. set %3.3 on
  224. while ( %3.3 == on ) {
  225. inc %1.1
  226. /.timer 1 1 /.shun - $+ $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) %tgline :Super command by $me ( $+ $did(super,4) $+ )
  227. if ( %1.1 == %2.2 ) {
  228. //.timer 1 2 /super
  229. unset %3.3
  230. /super
  231. }
  232. }
  233. }
  234. }
  235. alias whoisalls {
  236. var %1.1 0
  237. var %2.2 $did(super,2,0).sel
  238. if ( %2.2 > 0 ) {
  239. set %3.3 on
  240. while ( %3.3 == on ) {
  241. inc %1.1
  242. /.timer 1 1 /whois $gettok($did(super,2,$did(super,2,%1.1).sel),1,32)
  243. if ( %1.1 == %2.2 ) {
  244. unset %3.3
  245. }
  246. }
  247. }
  248. }
  249. alias queryalls {
  250. var %1.1 0
  251. var %2.2 $did(super,2,0).sel
  252. if ( %2.2 > 0 ) {
  253. set %3.3 on
  254. while ( %3.3 == on ) {
  255. inc %1.1
  256. /.timer 1 1 /.query $gettok($did(super,2,$did(super,2,%1.1).sel),1,32)
  257. if ( %1.1 == %2.2 ) {
  258. unset %3.3
  259. }
  260. }
  261. }
  262. }
  263. alias msgalls {
  264. var %1.1 0
  265. var %2.2 $did(super,2,0).sel
  266. if ( %2.2 > 0 ) {
  267. set %3.3 on
  268. while ( %3.3 == on ) {
  269. inc %1.1
  270. /.timer 1 1 /.msg $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) $did(super,30)
  271. if ( %1.1 == %2.2 ) {
  272. unset %3.3
  273. }
  274. }
  275. }
  276. }
  277. alias noticealls {
  278. var %1.1 0
  279. var %2.2 $did(super,2,0).sel
  280. if ( %2.2 > 0 ) {
  281. set %3.3 on
  282. while ( %3.3 == on ) {
  283. inc %1.1
  284. /.timer 1 1 /.notice $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) $did(super,30)
  285. if ( %1.1 == %2.2 ) {
  286. unset %3.3
  287. }
  288. }
  289. }
  290. }
  291. alias ctcpalls {
  292. var %1.1 0
  293. var %2.2 $did(super,2,0).sel
  294. if ( %2.2 > 0 ) {
  295. set %3.3 on
  296. while ( %3.3 == on ) {
  297. inc %1.1
  298. /.timer 1 1 /.ctcp $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) $1
  299. if ( %1.1 == %2.2 ) {
  300. unset %3.3
  301. }
  302. }
  303. }
  304. }
  305. alias sajoinalls {
  306. var %1.1 0
  307. var %2.2 $did(super,2,0).sel
  308. if ( %2.2 > 0 ) {
  309. set %3.3 on
  310. while ( %3.3 == on ) {
  311. inc %1.1
  312. /.timer 1 1 /.sajoin $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) $did(super,38)
  313. if ( %1.1 == %2.2 ) {
  314. unset %3.3
  315. }
  316. }
  317. }
  318. }
  319. alias sapartalls {
  320. var %1.1 0
  321. var %2.2 $did(super,2,0).sel
  322. if ( %2.2 > 0 ) {
  323. set %3.3 on
  324. while ( %3.3 == on ) {
  325. inc %1.1
  326. /.timer 1 1 /.sapart $gettok($did(super,2,$did(super,2,%1.1).sel),1,32) $did(super,38)
  327. if ( %1.1 == %2.2 ) {
  328. unset %3.3
  329. }
  330. }
  331. }
  332. }
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!