Lencana Facebook

5 Feb 2011

revengkick gengtegar


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; simple revenge kick [war kick]                                                ;;
;; By :: gengtegar@mayat^hidup^                                                               ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

on *:load:{
  SET %warchanx
  set %warnick
  set %warip
  set %kicked 0
  set %kicking 0
  set %kcnt
  set %nick $$?="Nick for war"
  set %pass $$?="NIck Password"
}
#mhkick off
raw 001:*:{ ns sidentify %nick %pass | $iif(%warchan != $null, invite %warchan) }
raw 474:%warchan:{ cs invite %warchan | halt }
raw 473:%warchan:{ cs invite %warchan | halt }
raw 477:%warchan:{ cs invite %warchan | halt }

on *:signal:kickx:{
  kick $1-
}

on *:kick:#: {
if ($me !isop #) { return }
  if (($nick == $me) && ($knick == $me)) { return }
  if ($nick != $me) && ($me == $knick) {
    set %warnick $nick
    set %warip $address($nick,4)
    if ($chan != $null) && (%warchanx != $chan)  set %warchanx  $chan
    cs deop # $nick
    .timeri -m 1 800 invite #
    .timerk -m 1 1200 .signal -nt kickx # %warnick
4You Kick Me first!! This is my revenge
7!!StaRt
    inc %kicked
    inc %kcnt
    if (%kcnt >= 6) { set %kcnt | $recon }
    halt
  }
  if ($nick == $me) && ($me != $knick) {
    inc %kicking
    inc %kcnt
    if (%kcnt >= 6) { set %kcnt | $recon }
    halt
  }
}

alias recon {
  /server
}
on *:invite:%warchan:{ echo -s $1- }
on *:connect:{
  /.autojoin -s
set %mst 0
;  .timerz  1 3 /ns sidentify %nick %pass
;  .timerc  1 5 /invite %warchanx
;  .timerv  1 8 /.signal -nt kickx %warchanx %warnick revange kick - %kicking
}

on *:join:%warchanx:{
if ($me !isop #) { return }
  if ($nick == $me) && (%mst == 0) ( set %mst 1 | signal -n kickx # %warip revange kick - %kicking | halt }
  if (%warnick == $nick) { .signal -n kickx # %warnick revange kick - %kicking | halt }
  if (($address($nick,4) == %warip) && ($nick != $me))  { set %warnick $nick | .signal -nt kickx # %warip revange kick - %kicking | halt }
}

on *:deop:%warchanx:{
  if ($nick == $me) { halt }
  if ($opnick == $me) {
    cs op # $me
    if (%warnick ison #) { .signal -nt kickx # %warnick revange kick - %kicking | halt }
  }
}

on *:op:%warchanx:{
  if ($opnick == $me) {
    if (%warnick ison #) { .signal -nt kickx # %warnick revange kick - %kicking | halt }
  }
}

on *:part:%warchanx:{
if ($nick == $me) { set %mst 0 }
}

on *:Nick:{
if ($nick = %warnick) set %warnick $newnick
}

#mhkick end

menu channel {
  MH Revange Kick
  .Mode- $+ $group(#mhkick):/$iif($group(#mhkick) == on,.disable,.enable) #mhkick
  .Resault:/echo -a Resault::[[ $me Vs %warnick ]]:: Kicking %kicking :: Kicked %kicked ::
  .Clear:/set %warchanx | set %warnick | set %warip | set %kcnt 0 | set %kicking 0 | set %kicked 0
  .Nick:/set %nick $$?="you nick" | /set %pass $$?="nick password"
}
menu nicklist {
  MH Revange Kick
  .Add Kick:/.enable #mhkick | set %warnick $$1 | set %warchanx $chan | set %warip $address($1,4) | .timerkjh 1 2 .signal -n kickx $chan %warnick
4!!Kicked You!!
12Added To List::
}