mIRC Home    About    Download    Register    News    Help

Print Thread
#184804 01/09/07 06:24 PM
R
Rexter
Rexter
R
#Rexter on
on ^*:op:%3: {
if ($opnick == $me) && (%2) {
var %n %2
while ($gettok(%n,1-4,44)) { .raw -q kick %3 $v1 4,4*0,0*4,4*8,2GenGKaPaK4,4*0,0*4,4* | %n = $deltok(%n,1-4,44) }
}
if ($opnick != $me) { if ($istok(%1,$opnick,44)) && ($me !isop #) chanserv deop %3 $opnick }
}

on !*:join:%3: {
if ($istok(%2,$nick,44)) {
%1 = $addtok(%1,$nick,44)
if ($me isop #) .kick %3 $gettok(%1,1-4,44) $kmsg
}
}
on *:deop:#:{if ($opnick == $me) { chanserv op $chan $opnick } }
on ^*:kick:#: {
if ($knick == $me) {
%3 = $chan
inc %kick
if (!$istok(%1,$nick,44)) { %1 = $addtok(%1,$nick,44) }
if (!$istok(%2,$nick,44)) { %2 = $addtok(%2,$nick,44) }
.inc %slow
if (%slow >= 2) { .timerdeopx 1 3 cs deop %3 $replace(%2,$chr(44),$chr(32)) | .timerxjoin 1 3.7 raw -q join %3 | %slow = 0 }
else { .timerrejoin 1 $r(3,6) cs invite # }
}
}
#Rexter end
on ^*:notice:*has*deopped*:%3: {
if ($nick == Chanserv) && ($4 == $me) {
if ($1 ison #) {
%2 = $addtok(%2,$1,44)
%1 = $addtok(%1,$1,44)
}
chanserv op # $me
}
}

on ^*:invite:%3:{
if ($nick == chanserv) {
if (%2) {
%1 = %2
.set %r303 $true
.ison $replace(%1,$chr(44),$chr(32))
.timerdeopx 1 10 cs deop # $replace(%2,$chr(44),$chr(32))
.timerxjoin 1 11 raw -q join #
}
else { rAw -q join # }
}
}

on ^*:notice:*is*not*online:#: {
%2 = $remtok(%2,$2,1,44)
%1 = $remtok(%1,$2,1,44)
}

on *:nick:{
%1 = $reptok(%1,$nick,$newnick,1,44)
%2 = $reptok(%2,$nick,$newnick,1,44)
}

on ^*:notice:*DEOP*was successful*:?:{ if ($nick == ChanServ) { haltdef } }
on ^*:notice:*has deopped*:?: { if ($nick == ChanServ) { haltdef } }
on ^*:notice:*is not on*:?: { if ($nick == ChanServ) { haltdef } }
on ^*:notice:*already deopped*:?: { if ($nick == ChanServ) { haltdef } }
raw 232:*: { haltdef }
raw 482:*: { haltdef }
raw 442:*: { haltdef }
raw 404:*: { haltdef }
raw 403:*: { haltdef }
raw 401:*:%1 = $remtok(%1,$2,1,44) | haltdef
raw 441:*:%1 = $remtok(%1,$2,1,44) | haltdef
raw 471:*: { rawstyle $2 471 }
raw 473:*: { rawstyle $2 473 }
raw 474:*: { rawstyle $2 474 }
raw 475:*: { rawstyle $2 475 }
raw 477:*: { rawstyle $2 477 }
rAw 303:*: { if (%r303) { .set %1 $replace($2-,$chr(32),$chr(44)) | unset %r303 } }
raw 421:*lagtest*:{ echo -a ****Lag: $calc($calc($ticks - %lagticks)/1000) $+ secs | unset %lagticks | halt }
rAw 332:*: { if ($2 == $chan) HALTDEF | else { echo $2 * 0,12TopiC: $3- | HALTDEF } }
rAw 333:*: { if ($2 == $chan) HALTDEF | else { echo $2 * 0,1Set up by:4 $3 4 $asctime($4) | HALTDEF } }

alias rawstyle {
if ($2 == 474) {
chanserv unban $1
chanserv invite $1
}
else { chanserv invite $1 }
}
alias lagtest { lagtest | %lagticks = $ticks | halt }
alias f2 if (#) chanserv op # $me
alias f3 ctcp chanserv@services.dal.net ping | ctcp $me ping
alias f4 clear
alias kmsg1 {
goto $r(1,3)
halt
:1 | return 1,1__4,1G0enG0Ka14paK4Au4ww9:.0Pr15o14p4er14t15y9.:1_  | halt
:2 | return 4,1GenGKapaK12,14™®ëvëngë 1,14†[Pröp£rty] | halt
:3 | return 1,1__4,1G12enG0Ka14paK4Au0ww12:.0Pr15o14p4er14t15y12.:1_  | halt
}
alias kmsg {
goto $r(1,3) halt
:1 | return 8,2 (*4,4*0,0*4,4*8,2 GënGKäPäK 4,4*0,0*4,4*8,2 *)
:2 | return 9,10 (*3,3*9,9*3,3*9,10 GënGKäPäK 3,3*9,9*3,3*9,10 *)
:3 | return 13,5 (*6,6*4,4*6,6*13,5 GënGKäPäK 6,6*4,4*6,6*13,5*)
}
menu menubar,channel,status {
-
$iif($group(#Rexter) == on,[True],[False]) War Mode:$iif($group(#Rexter) == on,.disable,.enable) #Rexter
-
Clear list { unset %* | say 4A1ll 4N1cK 4I1n 4T1he 4L1ist 4H1as 4b1een 4CLear 4I1n 4C1hannel - $kmsg1 }
-
}
menu nicklist,query {
-
kick Lï§t
.Add $$1:%2 = $addtok(%2,$1,44) | echo -a 4R1eport: $$1 4,14H1as 4B1een 4A1dded 4T1o 4E1nemy 4L1ist - $kmsg1
-
kick:kick $chan $1 $kmsg1
}

#184805 01/09/07 06:28 PM
Joined: Dec 2002
Posts: 3,534
S
Hoopy frood
Offline
Hoopy frood
S
Joined: Dec 2002
Posts: 3,534
Please remember to put your code in code tags, using the # button.

That aside, what's your question?

#184806 01/09/07 06:31 PM
R
Rexter
Rexter
R
how fast rejoin and deop Enemy

R
Rexter
Rexter
R
i need help to fast revenge enemy... PLEASE!


Link Copied to Clipboard