MeMO AKill Script - Series 3

By MaSt3R on Dec 21, 2012

Attention: BEFORE USE THIS SCRIPT PLEASE SET A E-MAIL ADDRESS AND REASON FOR KILL AND SET A REPORT CHANNEL.
ENJOY ;)

@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
MeMO AKILL SCRIPT
Series 3
Server; IRC.IranServ.Org #MeMO
E-mail: MeMO@IranServ.Org
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
menu * {
  AutO Kill SCript
  .Akill For NiCk
  ..Add:/set %go.kill.nick $$?="Enter Nick:" | echo -a [2M-2e-2M-2O] This Nick "3 $+ %go.kill.nick $+ " is Now added tO akill List [4MeMO AKILL SCRIPT By 3MOhammaD]
  ..Del:/unset %go.kill.nick | echo -a  [2M-2e-2M-2O] Target Nick is Now deleted from akill List [4MeMO AKILL SCRIPT By 3MOhammaD] 
  ..Show:/echo -a  [2M-2e-2M-2O] AKilled Nick is Now Actived For 3~~~> %go.kill.nick [4MeMO AKILL SCRIPT By 3MOhammaD]
  .-
  .Akill For IDENTd
  ..Add:/set %go.kill.ident $$?="Enter IDENT:" | echo -a  [2M-2e-2M-2O] This IDENT "3 $+ %go.kill.ident $+ " is Now added to Akill List [4MeMO AKILL SCRIPT By 3MOhammaD]
  ..Del:/unset %go.kill.ident | echo -a  [2M-2e-2M-2O] Target IDENT is Now deleted from akill List [4MeMO AKILL SCRIPT By 3MOhammaD]
  ..Show:/echo -a  [2M-2e-2M-2O] AKilled IDENT is Now Actived For 3~~~> %go.kill.ident [4MeMO AKILL SCRIPT By 3MOhammaD]
  .-
  .Akill For IP
  ..Add:/set %go.kill.ip $$?="Enter IP:" | echo -a  [2M-2e-2M-2O] This IP "3 $+ %go.kill.ip $+ " is NOw added to akill List [4MeMO AKILL SCRIPT By 3MOhammaD]
  ..Del:/unset %go.kill.ip | echo -a  [2M-2e-2M-2O] Target IP is Now Deleted from akill List [4MeMO AKILL SCRIPT By 3MOhammaD]
  ..Show:/echo -a  [2M-2e-2M-2O] Akilled IP is Now Actived For 3~~~> %go.kill.ip [4MeMO AKILL SCRIPT By 3MOhammaD]
  .-
  .ReaSON For Akill(s):/set %reasons $$?="Enter ReaSON:" | echo -a  [2M-2e-2M-2O] This ReaSON " $+ %reasons $+ " Actived!
  .Show ReaSON:/echo -a  [2M-2e-2M-2O] ReaSON is: %reasons [4MeMO AKILL SCRIPT By 3MOhammaD]
  .-
  .Set a ChanNEl For Report:/set %r.chan #$$?="Enter ChanNEl NaME - WithOut '#'" | echo -a [2M-2e-2M-2O] ChanNEl Report Is Now Set tO "3 $+ %r.chan $+ "  [4MeMO AKILL SCRIPT By 3MOhammaD]
  .Show ChanNEl Report:/echo -a [2M-2e-2M-2O] ChanNEl Report Is Now:4 %r.chan  [4MeMO AKILL SCRIPT By 3MOhammaD]
  .-
  .Set a E-mail Address For More INFORMATION:/set %mail $$?="Set a E-Mail Address For Set On ReaSON KiLL:" | echo -a [2M-2e-2M-2O] E-mail Address Is Now Set tO "3 $+ %mail $+ " [4MeMO AKILL SCRIPT By 3MOhammaD]
  .Show Email Address:/echo -a [2M-2e-2M-2O] E-mail Address Is Now:4 %mail [4MeMO AKILL SCRIPT By 3MOhammaD]
}

on *:snotice:*client connecting*: {
  if ($9 == %go.kill.nick) {
    .notice $9 *** You are not welcome on this network. | notice $9 *** Autokilled for [exp/ident] Enable ident in your client. Send email to %mail with a subject of [exp/ident] for more details. [AKILL ID:96913715 $+ $r[1-9] $+ 2K-a] ( $+ $fulldate $+ ) | notice $9 Your hostmask is $9 $+ !~ $+ $remove($gettok($10,1,64),$chr(40)) $+ @ $+ $remove($gettok($10,2,64),$chr(41))   
    .kill $9 %reasons | msg %r.chan [4A1-4L1-4E1-4R1-4T]-> This NiCk "3 $+ %go.kill.nick $+ " is BlaCk Listed <-[1A4-1L4-1E4-1R4-1T] - TarGet IDENTd:2 $remove($gettok($10,1,64),$chr(40)) $+ @* / TarGet IP:4 *@ $+ $remove($gettok($10,2,64),$chr(41)) | msg %r.chan TarGet HostmaSk: $9 $+ !~ $+ $remove($gettok($10,1,64),$chr(40)) $+ @ $+ $remove($gettok($10,2,64),$chr(41))
  }
  if ($remove($gettok($10,1,64),$chr(40)) == %go.kill.ident) {
    .notice $9 *** You are not welcome on this network. | notice $9 *** Autokilled for [exp/ident] Enable ident in your client. Send email to %mail with a subject of [exp/ident] for more details. [AKILL ID:96913715 $+ $r[1-9] $+ 2K-a] ( $+ $fulldate $+ ) | notice $9 Your hostmask is $9 $+ !~ $+ $remove($gettok($10,1,64),$chr(40)) $+ @ $+ $remove($gettok($10,2,64),$chr(41))   
    .kill $9 %reasons | msg %r.chan [4A1-4L1-4E1-4R1-4T]-> This IDENTd "3 $+ %go.kill.ident $+ " is BlaCk Listed <-[1A4-1L4-1E4-1R4-1T] - TarGet Nick:2 $9 $+ !*@* / TarGet IP:4 *@ $+ $remove($gettok($10,2,64),$chr(41)) | msg %r.chan TarGet HostmaSk: $9 $+ !~ $+ $remove($gettok($10,1,64),$chr(40)) $+ @ $+ $remove($gettok($10,2,64),$chr(41))
  }

  if ($remove($gettok($10,2,64),$chr(41)) == %go.kill.ip) {
    .notice $9 *** You are not welcome on this network. | notice $9 *** Autokilled for [exp/ident] Enable ident in your client. Send email to %mail with a subject of [exp/ident] for more details. [AKILL ID:96913715 $+ $r[1-9] $+ 2K-a] ( $+ $fulldate $+ ) | notice $9 Your hostmask is $9 $+ !~ $+ $remove($gettok($10,1,64),$chr(40)) $+ @ $+ $remove($gettok($10,2,64),$chr(41))   
    .kill $9 %reasons | msg %r.chan [4A1-4L1-4E1-4R1-4T]-> This IP "3 $+ %go.kill.ip $+ " is BlaCk Listed <-[1A4-1L4-1E4-1R4-1T] - TarGet Nick:2 $9 $+ !* @* / TarGet IDENTd:2 $remove($gettok($10,1,64),$chr(40)) $+ @* | msg %r.chan TarGet HostmaSk: $9 $+ !~ $+ $remove($gettok($10,1,64),$chr(40)) $+ @ $+ $remove($gettok($10,2,64),$chr(41))
  }
}

on *:load:{
.echo -a 3ThanKs For UsinG MeMO Akill SCRipt , Loaded Successfully ... :D
}
on *:unload:{
.echo -a 4Unloaded Successfully ... :|
}

Comments

Sign in to comment.
ProIcons   -  Dec 24, 2012

Still this script is only for 1 User, 1 Identd, 1 IP
if you use hash tables you could make it more flexible
and for unlimited users. Though why not use /gline /kline /gzline command
instead of an instable mIRC Script and slow also.

 Respond  
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.