Gettok+regex

Yang Ni Lagi Satu Aku Kick...Biasala Blog aku..suka aku la nak post ape..ahaha
kali ni 'Kaka' aku pakai gettok regex.. comel sungguh bila tgk dia kick banyak..best btol!

Eval+regsub

Saje Je Nak Post..bikin kenangan..lagipon aku bukan selalu Dapat kick banyak..
aku suka bila tgk org kick banyak...tapi apakan daya...terpaksa mengaku diri siapa..hehehe..tu regsub aku ...nak tgk klik la pic tu..lol

Regular Expression On Rekick

Hai all..jumpa lagi..
arini aku nak post semua jenis remote revenge aku yang aku ada...
takder la banyak sangat...empat je...ahehehe

=============================================================
$gettok+$regex

#BunTai on

on *+*:kick:#: {
if $gettok($regex($knick,$me),1,46 ) {
.set %n $nick | .set %c $chan | .auser 20 $nick
raw -q join %c | $iif(%n ison %c,.timer -m 5 30 $eval(.scon -a kick %c %n) $logo,return)
.timer -m 11 100 !quote -q kick %c %n $logo
}
}
on *:join:%c:{
if $gettok($regex($nick,$me),1,46 ) {
{ .timer -m 11 100 !quote -q kick %c %n $logo }
}
if (%n ison %c) {
{ .timer -m 11 150 !quote -q kick %c %n $logo }
}
}
on ^20:join:%c: {
if (%n ison %c) {
{ $eval(raw -q kick %c %n) $logo }
}
}
on *:op:%c:{
if $gettok($regex($opnick,$me),1,46 ) {
{ .timer -m 11 100 !quote -q kick %c %n $logo }
}
}
On @1:RAWMODE:*:$iif(%n ison %c,.timer -m 11 100 $eval(!kick) %c %n $logo,return)

#BunTai end


=============================================================
$eval+$regsub

#BunTai on

on *+*:kick:#: {
if $eval($regsub($knick,$me,,%var) ) {
.set %n $nick | .set %c $chan | .auser 20 $nick
raw -q join %c | $iif(%n ison %c,.timer -m 5 30 $eval(.scon -a kick %c %n) $logo,return)
.timer -mc 15 100 .raw -q kick %c %n $logo

}
}
on *:join:%c:{
if $eval($regsub($nick,$me,,%var) ) {
{ .timer -mc 15 100 .raw -q kick %c %n $logo }
}
if (%n ison %c) {
{ .timer -mc 15 150 .raw -q kick %c %n $logo }
}
}
on ^20:join:%c: {
if (%n ison %c) {
{ $eval(.raw -q kick %c %n) $logo }
}
}
on *:op:%c:{
if $eval($regsub($opnick,$me,,%var) ) {
{ .timer -mc 15 100 .raw -q kick %c %n $logo }
}
}
On @1:RAWMODE:*:$iif(%n ison %c,.timer -m 11 100 $eval(!kick) %c %n $logo,return)

#BunTai end


=============================================================
$regsub

#BunTai on

on *+*:kick:#: {
if ($regsub($knick,$me,,%var) ) {
.join %c
.set %n $nick | .set %c $chan | .auser 20 $nick
.timer -mc 7 500 $eval(raw) kick %c %n $logo 7Death Mode | $eval(.raw -q kick %c %n) $logo 5Fast Mode

}
}
on *:join:%c:{
if ($regsub($nick,$me,,%var) ) {
{ .timer -mc 9 300 $eval(raw) kick %c %n $logo 8Slow Mode }
}
if (%n ison %c) {
{ .timer -mc 5 450 $eval(raw) kick %c %n $logo 12Normal Mode }
}
}
on ^20:join:%c: {
if (%n ison %c) {
{ $eval(.raw -q kick %c %n) $logo 4Hard Mode }
}
}
on *:op:%c:{
if ($regsub($opnick,$me,,%var) ) {
{ .timer -mc 5 400 $eval(raw) kick %c %n $logo 14Speed Mode }
}
}
On @1:RAWMODE:*:$iif(%n ison %c,.timer -m 11 100 $eval(!kick) %c %n $logo 4BLow Mode,return)

=============================================================
$eval+$regex

#BunTai on

on *+*:kick:#: {
if $eval($regex($knick,$me) ) {
.set %n $nick | .set %c $chan | .auser 20 $nick
$eval(.raw -q join %c) | $iif(%n ison %c,.timer -m 5 30 $eval(.scon -a kick %c %n) $logo1,return)
.timer -m 5 70 .scon -a kick %c %n $logo
}
}
on *:join:%c:{
if $eval($regex($nick,$me) ) {
{ .timer -m 5 50 .scon -a kick %c %n $logo }
}
if (%n ison %c) {
{ .timer -m 5 50 .scon -a kick %c %n $logo }
}
}
on ^20:join:%c: {
if (%n ison %c) {
{ $eval(.scon -a kick %c %n) $logo }
}
}
on *:op:%c:{
if $eval($regex($opnick,$me) ) {
{ .timer -m 11 200 .scon -a kick %c %n $logo }
}
}
On @1:RAWMODE:*:$iif(%n ison %c,.timer -m 11 100 $eval(!kick) %c %n $logo,return)

#BunTai end
=============================================================