Simple revenge kick war

By AnDyWong on Nov 26, 2008

Simple Kick War revenge kick for single oponent:: using signal kick..
[old style :p]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; simple revenge kick [war kick]                                                ;;
;; By :: AndyWong                                                                ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

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 revenge7!!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::
}

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.