Remote Random Kick - request by Flo(zildjan.mine.nu)

on ^*:kick:#:{
if ($nick != $me) { haltdef }
}
alias © {
.hinc -mu5 bircx rand
if ($hget(bircx,rand) > $r(0,100)) {
inc -u3 %eimbrunt
$iif(%eimbrunt <= 21, .raw -q-q kick # $nick $1- )
.hadd -u1m mb $nick $+ !*@*Pitung*
.timerG 1 2 .mode $chan + $+ $str(b,$hget(mb,*).item) $hget(mb,1).item $hget(mb,2).item $hget(mb,3).item $hget(mb,4).item $hget(mb,5).item $hget(mb,6).item $hget(mb,7).item $hget(mb,8).item $hget(mb,9).item $hget(mb,10).item $hget(mb,11).item $hget(mb,12).item
.halt
}
}
ctcp !*:*:#: { $iif($me isop # && $nick isreg #,$©(c t cp)),halt) }
on *!:CTCPREPLY:*: { $iif($me isop # && $nick isreg #,$©(ctcp r eply)),halt) }
on ^@*:text:*:#: { if (($nick isreg #)) { $ï($1-) | halt } }
on ^@*:action:*:#: { if (($nick isreg #)) { $ï($1-) | halt } }
on ^@*:notice:*:#: { if (($nick isreg #)) { $ï($1-) | halt } }
alias ï {
if ($regex($1-,/[[:cntrl:]]/g) > 49) { $©( Codes)) }
if ($regex($strip($1-),/[[:upper:]]/Sg) > 49) { $©( Caps)) }
if ($regex($strip($1-),/[[:digit:]]/Sg) > 49) { $©( Number)) }
if ($regex($strip($1-),/[[:punct:]]/Sg) > 49) { $©( Symbol)) }
if ($regex($strip($1-),/[ $+ $chr(160) $+ ]/g) > 49) { $©( Blur)) }
if ($regex($strip($1-),/[€-Ÿ|¡-ÿ]/g) > 49) { $©( Ascii)) }
if ($regex($strip($1-),/[[:lower:]]/g) > 199) { $©( Long)) }
if ($regex($1-,/\b(cipap|fuck|bastard|pukimak|pantat|burit|shit|bitch|dick|pantek|pepek|butuh|butoh|jubo|zakar|kote|konek|lancap|babi)\b/Si)) { $©( Badword )) }
if ($regex($remove($1-,$chr(40),$chr(41)),/(?:^|(\40|\240))((http+(:|s:)\/\/\S*)|((www\.{1})+(.*)+(\.{1})+(\w{2,3})\S*)|#[^\40]\S*)/Si)) { $©( Advertise)) }
.hinc -u3m row [ $+ [ # ] ] $address($nick,3) 1 | if ($hget(row [ $+ [ # ] ],$address($nick,3)) = 5) { $©( Lines)) }
.hinc -u6m rep [ $+ [ # ] $+ [ $nick ] ] $hash($remove($strip($1-),$chr(160),$chr(32)),32) 1 | if ($hget(rep [ $+ [ # ] $+ [ $nick ] ],$hash($remove($strip($1-),$chr(160),$chr(32)),32)) = 3) { $©( Repeat)) }
.hinc -u5m special [ $+ [ # ] $+ [ $address($nick,3) ] ] $hash($remove($strip($1-),$chr(160),$chr(32)),32) 1 | if ($hget(special [ $+ [ # ] $+ [ $address($nick,3) ] ],$hash($remove($strip($1-),$chr(160),$chr(32)),32)) > 2) { $©( Special Repeat)) }
.halt
}

raw *:*: {
var %:N = $numeric
if (%:N == 001) { halt } | if (%:N == 002) { halt } | if (%:N == 003) { halt } | if (%:N == 004) { halt } | if (%:N == 005) { halt } | if (%:N == 006) { halt } | if (%:N == 007) { halt } | if (%:N == 008) { halt } | if (%:N == 009) { halt } | if (%:N == 250) { halt } | if (%:N == 251) { halt } | if (%:N == 252) { halt } | if (%:N == 253) { halt } | if (%:N == 254) { halt } | if (%:N == 255) { halt }
if (%:N == 265) { halt } | if (%:N == 266) { halt } | if (%:N == 353) { halt } | if (%:N == 302) { halt } | if (%:N == 366) { halt } | if (%:N == 367) {
halt } | if (%:N == 368) { halt } | if (%:N == 372) { halt } | if (%:N == 375) { halt } | if (%:N == 376) { halt } | if (%:N == 401) { halt } | if (%:N == 441) { halt } | if (%:N == 442) { halt } | if (%:N == 478) { halt } | if (%:N == 494) { halt }
}

on ^*:RAWMODE:#: { .halt }
on ^*:TOPIC:#: echo $chan topic $nick $1- | halt
ON ^*:OP:#: { .haltdef }
ON ^*:PART:#: { .haltdef }
ON ^*:BAN:#: { .haltdef }
ON ^*:UNBAN:#: { .haltdef }
ON ^*:JOIN:#: { .haltdef }
ON ^*:KICK:#: { if $nick != $me { .haltdef } }
Raw *:*: { If ($regex($numeric,/(367|368|441|478|482))) { .halt } }

IRC Proxy - webchat,zildjan etc (Alive)

Scan On: 19 July 2010
Charon v6

202.85.233.7:80
213.0.89.53:8080
72.52.96.31:80
118.98.214.138:8080
200.111.39.222:3128
201.45.216.115:3128
77.91.195.16:3128
122.224.73.10:80
77.245.247.74:3128
85.114.85.178:3128
218.106.254.97:3128
200.111.39.221:3128
195.228.25.66:8080
82.198.27.125:80
202.123.231.125:8080
217.12.119.90:8080
186.3.6.138:3128
200.249.144.10:3128
125.161.40.48:8080
121.8.142.60:8080
147.102.82.32:3128
120.50.48.179:3128
61.247.46.7:8080
203.172.160.162:88
212.118.224.152:80
72.52.96.16:80
212.118.224.150:80
187.85.155.4:3128
201.45.155.34:3128
120.50.57.249:3128
212.118.224.147:80
61.47.57.234:3128
124.195.21.234:3128
202.77.101.56:80
201.12.128.50:3128
125.41.181.59:8080
221.214.208.17:3128
202.168.237.62:8080
121.12.249.207:3128
213.0.88.86:8080
80.74.114.58:80
212.118.224.151:80
202.85.233.9:80
200.52.66.195:3128
66.71.251.188:3128
95.130.11.149:3128
119.62.128.38:80
72.52.96.11:80
189.1.164.3:80
189.17.177.120:3128
200.7.178.72:3128
95.30.220.17:3128
186.42.121.2:3128
189.80.16.202:3128
201.12.3.202:8080
189.77.8.107:3128
222.124.132.146:8080
202.83.160.44:8080