alias iptara {
  var %f = $gettok($1-,1,46),%f2 = $gettok($1-,1-2,46),%ip = $1,%l = $gettok($1-,$numtok($1-,46),46),%:n = $2,%:ident = $3
  if $regex(%ip,/(\d+\.\d+\.\d+\.\d+)) {
    if $regex(%f,/(78|88|85|95|81)) { goto end }
    if $regex(%f2,/(84\.(154|26|13)|190\.(184|43|131|208|166|80|207)|193\.3|216\.(6|152)|62\.(120|217|248|29)|194\.(208|27|154)|217\.(17|131|64)|195\.(87|42|17(4|5))|94\.(79|54|78|96|98|99|242|100)|195\.214|213\.(236|161|211|21|14|153|194|43|204|248|14|43|38|14|248|159|153|204)|212\.(62|38|77|29|213|58|12|33|45|48|50|58|64|98|133|2|33|253|64|2|238|146|17(4|5)|33)|62\.29|144\.122|217\.164|195\.(33|142|4|74|244|17(4|5))|217\.131|195\.214|82\.(223|209|71|115)|62\.248|193\.140|94\.12(2|0|3|1|4))) { goto end }
    if $regex(%f2,/(76\.14|149\.254|92\.45|78\.27|121\.210|90\.148|41\.(208|250|233|201|209)|201\.(244|210)|91\.(191|112|177|176|180|140)|89\.(241|5|148|252|146|211)|87\.(109|101)|79\.(141|85|123|172|114))) { goto end }
    if $regex(%f2,/(82\.(145|101|211)|94\.97|64\.55|62\.74|93\.(88|91|182)|86\.(121|91|99|108)|83\.(93|228|238|149|66)|62\.(29|85|108|113|248)|139\.179|80\.(120|241|210|69|86|63|71|78)|144\.122|155\.233|160\.75|161\.9|168\.139|193\.(140|192|243|255)|194\.(27|54)|195\.(33|46|64|74|87|112|142|155|174|214|244|254)|212\.(2|12|15|29|31|33|45|48|50|57|58|64|65|79|98|101|108|109|115|125|127|133|146|154|156|174|252)|213\.(14|43|74|138|139|148|153|159|161|186|194|202|204|232|238|243|248|254|31|131|169|174|195))) { goto end }
    if (%proxy == on) { 
      swpbot gline $+(*@,%ip) - 2Sunucumuza proxy/tor/socks/wingate ile girmek yasak! | swpbot privmsg $_log :[ PROXY ] [Nick: %:n ] [Ident: %:ident ] [Ip: %ip ]
      $+(.timer,koruma,kapat) 1 50 /kapat
      goto end
    }
    if (%proxy == off) { .hinc -msu15 Kaç proxy | proipekle %ip | if $hget(Kaç,Proxy) >= 6 { proat | set %proxy on | set %random on | set %agresif on | set %clone on } }
  }
  else  { 
    if $regex(%ip,/(btc-net.bg|versatel.nl|hansenet.de|ktv.net.ua|casema.nl|unitymediagroup.de|wanadoo.fr|inode.at|surfer.at|aes.com|cust.tele2.at|bih.net.ba|scarlet.nl|superonline.com|\.gr|bethere.co.uk|mediaWays.net|ipconnect.de|tele.net|netcologne.de|cust.bluewin.ch|comhem.se|\.tr|vodafone.de|telekom.at|ziggo.nl|alicedsl.de|dnafinland.fi|telenet.be|belgacom.be|alshamil.net.ae|doo.nl|lin.net|arcor\-ip.net|backbone.de|aktuell.com|dclient.hispeed.ch)) { goto end }
    if $regex(%ip,/(hali.blueyonder.co.uk|bredband.tre.se|gon95.*.fbx.proxad.net|rev.stofanet.dk|fbx.proxad.net|lns5-c7.dsl.pol.co.uk|foebud.org|nym.se|mnet-online.de|dsl.sanet.ge|mobile.co.uk|sky.com|sol.az|fiber.unet.nl|laajakaista.fi|ggaweb.ch|pdbn.*.pool.einsundeins.de|liwest.at|alice.nl|direct-adsl.nl|kemp.*.pool.einsundeins.de|k.*.webspeed.dk|vtx.ch|heagmedianet.de|azeronline.com|acanac.net|tele2.no|zeelandnet.nl|bredband2.com|gaoland.net|icon.bg|adslplus.ch|home.nl)) { goto end }
    if (%proxy == on) { 
      swpbot gline $+(*@,%ip) - 2Sunucumuza proxy/tor/socks/wingate ile girmek yasak! | swpbot privmsg $_log :[ PROXY ] [Nick: %:n ] [Ident: %:ident ] [Ip: %ip ]
      $+(.timer,koruma,kapat) 1 40 /kapat
      goto end
    }
    if (%proxy == off) { .hinc -msu15 Kaç proxy | proipekle %ip | if $hget(Kaç,Proxy) >= 6 { proat | set %proxy on | set %random on | set %agresif on | set %clone on } }
  }
  :end
}