mIRC Home    About    Download    Register    News    Help

Print Thread
kick script #18429 07/04/03 10:16 AM
Joined: Dec 2002
Posts: 76
A
aZnLupin Offline OP
Babel fish
OP Offline
Babel fish
A
Joined: Dec 2002
Posts: 76
i need script kick all user on channel if [away] word ison user's nick (single - start - end).
can somebody help me

Re: kick script #18430 07/04/03 10:39 AM
Joined: Mar 2003
Posts: 272
C
c0ldfusi0n Offline
Fjord artisan
Offline
Fjord artisan
C
Joined: Mar 2003
Posts: 272
alias checkaway {
var %users = $nick($1,0), %e = 1
while (%users >= %e) {
if (away isin $nick) { .kick $1 $nick Being away is, for some mysterious reason(s) not tolerated in $1 | .mode $1 +b $nick $+ !*@* | inc %e 1}
else { inc %e 1 }
}
}

Menu channel {
-
Check away:/checkaway #
}


- cF
Dedicated helper for rent.
Re: kick script #18431 07/04/03 10:58 AM
Joined: Dec 2002
Posts: 3,547
S
SladeKraven Offline
Hoopy frood
Offline
Hoopy frood
S
Joined: Dec 2002
Posts: 3,547
Try

Code:

on *:NICK: { if (away isin $newnick) { kcomchans $newnick }
}

on *:JOIN:#: {
if (away isin $nick) { kcomchans $nick }
}

alias kcomchans {
var %findchans = $comchan( $1, 0 )
var %findchan = 1
while ( %findchan <= %findchans ) { //cs op $comchan( $1, %findchan ) $me
if ( $me isop $comchan( $1, %findchan )) { //kick $comchan( $1, %findchan ) $1 }
inc %findchan
}
}


Re: kick script #18432 07/04/03 12:22 PM
Joined: Dec 2002
Posts: 76
A
aZnLupin Offline OP
Babel fish
OP Offline
Babel fish
A
Joined: Dec 2002
Posts: 76
that mean i need /wkick $$1 to kick all user if all that user have $$1 ison tha nick.
ex:
  • /wkick away -=> kick all nick who have away word ison the nick
    /wkick sex -=> kick all nick who have away word ison the nick
    /wkick myword -=> kick all nick who have myword word ison the nick

all that i need wink

Re: kick script #18433 07/04/03 12:31 PM
Joined: Dec 2002
Posts: 3,138
C
Collective Offline
Hoopy frood
Offline
Hoopy frood
C
Joined: Dec 2002
Posts: 3,138
Code:
alias wkick {
  var %n = 1
  while ( $nick(#,%n) ) {
    if ( $$1 isin $nick(#,%n) ) {
      kick # $nick(#,%n)
    }
    inc %n
  }
}

Re: kick script #18434 07/04/03 12:46 PM
Joined: Dec 2002
Posts: 76
A
aZnLupin Offline OP
Babel fish
OP Offline
Babel fish
A
Joined: Dec 2002
Posts: 76
great!

Last edited by aZnLupin; 07/04/03 12:48 PM.
Re: kick script #18435 07/04/03 01:00 PM
Joined: Dec 2002
Posts: 76
A
aZnLupin Offline OP
Babel fish
OP Offline
Babel fish
A
Joined: Dec 2002
Posts: 76
how can i no kick myself if myword ison mynick ?

Last edited by aZnLupin; 07/04/03 01:02 PM.
Re: kick script #18436 07/04/03 01:35 PM
Joined: Dec 2002
Posts: 76
A
aZnLupin Offline OP
Babel fish
OP Offline
Babel fish
A
Joined: Dec 2002
Posts: 76
somebody help meeeeeeeeeeeeeee ?

Re: kick script #18437 07/04/03 01:36 PM
Joined: Dec 2002
Posts: 3,138
C
Collective Offline
Hoopy frood
Offline
Hoopy frood
C
Joined: Dec 2002
Posts: 3,138
Code:
alias wkick {
  var %n = 1
  while ( $nick(#,%n) ) {
    if ( $$1 isin $nick(#,%n) ) && ( $nick(#,%n) != $me ) {
      kick # $nick(#,%n)
    }
    inc %n
  }
}


Re: kick script #18438 07/04/03 01:47 PM
Joined: Dec 2002
Posts: 76
A
aZnLupin Offline OP
Babel fish
OP Offline
Babel fish
A
Joined: Dec 2002
Posts: 76
thankssssssssssssssssss