SHARE
TWEET

AME Channel Exempt

Seb May 20th, 2010 (edited) 300 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #copy paste this code into your remotes (new file) and in mIRC type /noame or click the option in the menu bar on top of your client
  2. #for help on how to use or install this snippet, see #mircscripting @ undernet
  3. alias ame {
  4.   var %i = 1
  5.   while ($chan(%i)) {
  6.     if (!$istok(%exclude,$chan(%i),44)) {
  7.       describe $chan(%i) $1-
  8.     }
  9.     inc %i
  10.   }
  11. }
  12. alias addchan {
  13.   set %exclude $addtok(%exclude,$1,44)
  14. }
  15. alias delchan {
  16.   set %exclude $remtok(%exclude,$1,1,44)
  17. }
  18. alias noame { $dialog(ame_dialog,ame_dialog) }
  19. dialog ame_dialog {
  20.   title "Anti /ame script"
  21.   size -1 -1 167 69
  22.   option dbu
  23.   list 1, 2 13 69 53, sort size vsbar
  24.   text "Channels currently added:", 3, 2 4 68 8, center
  25.   button "Exit", 2, 125 53 37 12, ok
  26.   button "Add", 4, 125 10 37 12
  27.   text "Add a channel to the current list", 5, 77 8 46 15, center
  28.   button "Remove", 6, 125 30 37 12
  29.   text "Remove a channel from the current list", 7, 77 26 46 21, center
  30.   box "Channels", 8, 74 1 90 48
  31. }
  32. on 1:DIALOG:ame_dialog:init:0:{
  33.   didtok ame_dialog 1 44 %exclude
  34. }
  35. on 1:DIALOG:ame_dialog:sclick:4:{
  36.   addchan $?="Insert a channel"
  37.   did -r ame_dialog 1
  38.   didtok ame_dialog 1 44 %exclude
  39. }
  40. on 1:DIALOG:ame_dialog:sclick:6:{
  41.   delchan $did(1).seltext
  42.   did -r ame_dialog 1
  43.   didtok ame_dialog 1 44 %exclude
  44. }
  45.  
  46. menu menubar {
  47.   Channel Restricted /ame:/noame
  48. }
RAW Paste Data
Top