-User Kick Protection-

By Fossa on Feb 27, 2005

This will kick users who kicked
added nicks in your list .
Its possible to add/remove a nick
thats on query.
To load : type in mirc :
/load- rs path/to/kickprotected.mrc
and check
menu/channel/query popup .

;---------------------------------------------------------- -
;          Kick protection by Fossa          -_
;                    ( A.k.A. c-- )                    _-_
;     This will kick users who kicked     _
;           added nicks in your list            __-_
;    its possible to add/remove a nick   __
;                thats on query :)                 _-    -
;            to load : type in mirc :             ___ -  -
; /load- rs path/to/kickprotected.mrc  _-    -- 
;                   and check                       ___-_
;       menu/channel/query popup       ___ _---_
;                     Have fun                       _-
;                                                       -___-_---_--
;------------------------------------------------------------------ -    -     - -

menu menubar,channel { 
  Kickprotect  
  .add:dialog -m kickprot kickprot
  .show:dialog -m kickprot kickprot
} 
menu nicklist { 
  Kickprotect  
  .add:write kickprotected.txt $$1
  .del:write -d kickprotected.txt $$1
  .show:dialog -m kickprot kickprot
} 
menu query {
  Kickprotect
  .add:write kickprotected.txt $$1
  .del:write -d kickprotected.txt $$1
  .show:dialog -m kickprot kickprot
}
dialog kickprot { 
  title "Kick Protection by Fossa" 
  size -1 -1 160 120
  option dbu 
  text "Protected Nicks", 1, 10 7 50 8 
  edit "Enter Nick", 2, 10 16 96 10 
  button "Add", 3, 114 15 37 12 
  list 4, 10 30 96 75, size 
  button "Remove", 5, 114 29 37 12 
  button "Done", 6, 114 43 37 12, ok 
} 
on *:dialog:kickprot:init:0:{
  loadbuf -o kickprot 4 kickprotected.txt 
}
on *:dialog:kickprot:sclick:3:{ 
  did -r $dname 4 
  write kickprotected.txt $did(2) 
  did -r $dname 4 
  loadbuf -o kickprot 4 kickprotected.txt 
} 
on *:dialog:kickprot:sclick:5:{ 
  write $+(-,ds,$did(4).seltext) kickprotected.txt 
  did -r $dname 4 
  loadbuf -o kickprot 4 kickprotected.txt 
}
on @*:KICK:#:{
  if ($nick = $me) { halt }
  if ($read(kickprotected.txt, w, $knick)) {
    kick $chan $nick 4:: don't ::
  }
}

Comments

Sign in to comment.
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.