egghelp/eggheads community

scan and op

2004-10-01T13:03:36-04:00

thanks

Statistics: Posted by avilon — Fri Oct 01, 2004 1:03 pm

scan and op

2004-10-01T09:37:34-04:00

Code:

if {(![string equal -nocase $chan $chan1]) || (![string equal -nocase $chan $chan2])} { return 0 }

replace "||" with "&&"?

Thank you! It's working perfectly alright now...

Statistics: Posted by Stealthx — Fri Oct 01, 2004 9:37 am

scan and op

2004-10-01T08:41:52-04:00

Code:

if {(![string equal -nocase $chan $chan1]) || (![string equal -nocase $chan $chan2])} { return 0 }

replace "||" with "&&"?

Statistics: Posted by user — Fri Oct 01, 2004 8:41 am

scan and op

2004-10-01T03:52:11-04:00

Hmm, hi, i try this tcl in my bot and sad to say, i found that it doesn't work although it doesn't display any error message... anyone got any similar script like this?

Statistics: Posted by Stealthx — Fri Oct 01, 2004 3:52 am

scan and op

2004-07-18T14:10:03-04:00

I'll try it out when I am free.
Which is not the case these days

Statistics: Posted by awyeah — Sun Jul 18, 2004 2:10 pm

scan and op

2004-07-16T18:03:57-04:00

I guess I would have to test/execute it out to find the problem.

Thanks for your help. It would be nice if you found out the bug in this script.

Statistics: Posted by avilon — Fri Jul 16, 2004 6:03 pm

scan and op

2004-07-15T07:45:46-04:00

Maybe any of the detected conditions is false, not true, so it might return 0, or halt. Would have to check that using putlogs... then it will be easy to check whats halting it.

Looking at it logically it seems, correct hmm.
I guess I would have to test/execute it out to find the problem.

Statistics: Posted by awyeah — Thu Jul 15, 2004 7:45 am

check

2004-07-15T05:43:01-04:00

i have ckeck the script and
1. you forght a " at

Code:

  putserv "PRIVMSG $chan1 :Nick(s) [join $oplist {, }] has/have been successfully opped on $chan2.

2. don't work (don't work means no error message on dcc but if you do !opscan even no message/error on dcc and the bot don't do nothing)
here is the script with the missing "

Code:

### Settings ### #This will be the channel where the opped users will be detected on. set chan1 "#sibiu" #This will be the channel to op the people on. set chan2 "#talmaciu" ### Don't edit anything below this! ### bind pub n !opscan scan:ops proc scan:ops {nick uhost hand chan text} {  global botnick chan1 chan2   if {(![validchan $chan1]) || (![validchan $chan2])} { return 0 }   if {(![string equal -nocase $chan $chan1]) || (![string equal -nocase $chan $chan2])} { return 0 }   putserv "PRIVMSG $chan1 :Scanning..."; set oplist [list]   foreach user [chanlist $chan1] {    if {([onchan $user $chan1]) && ([onchan $user $chan2])} {     lappend oplist $user     }    }    putserv "PRIVMSG $chan1 :Scanning completed."    if {([llength $oplist] >= 1) && ([botisop $chan2])} {    putserv "PRIVMSG $chan1 :Opping all users on $chan1 to $chan2."     foreach person $oplist {      pushmode $chan2 +o $person     }     flushmode $chan2     putserv "PRIVMSG $chan1 :Nick(s) [join $oplist {, }] has/have been successfully opped on $chan2."   }  return 0 }

Statistics: Posted by K — Thu Jul 15, 2004 5:43 am

scan and op

2004-07-13T22:06:54-04:00

Well this is not a hard thing to do.

What you can do is make a script, to first check users on your opped channel, match them with users on the other chan, then add them to a list, and using pushmode or putserv whatever you can op them.

Now the thing is you might want to trigger this with a pub bind, as there is not other manual way to do it. Or you can trigger it on +o of #channel1 if you like as well.

*** For *** this to work, the bot MUST be on both channels, and it must be opped on #channel2, so it can retrieve the user lists of both channels, compare them and make a seperate list to op the users.

I am not sure, but something like this should definately work:

Code:

### Settings ####This will be the channel where the opped users will be detected on.set chan1 "#opchannel"#This will be the channel to op the people on.set chan2 "#chanforop"### Don't edit anything below this! ###bind pub n !opscan scan:ops proc scan:ops {nick uhost hand chan text} {  global botnick chan1 chan2  if {(![validchan $chan1]) || (![validchan $chan2])} { return 0 }  if {(![string equal -nocase $chan $chan1]) || (![string equal -nocase $chan $chan2])} { return 0 }  putserv "PRIVMSG $chan1 :Scanning..."; set oplist [list]  foreach user [chanlist $chan1] {   if {([onchan $user $chan1]) && ([onchan $user $chan2])} {     lappend oplist $user    }   }   putserv "PRIVMSG $chan1 :Scanning completed."   if {([llength $oplist] >= 1) && ([botisop $chan2])} {   putserv "PRIVMSG $chan1 :Opping all users on $chan1 to $chan2."    foreach person $oplist {     pushmode $chan2 +o $person    }    flushmode $chan2    putserv "PRIVMSG $chan1 :Nick(s) [join $oplist {, }] has/have been successfully opped on $chan2.  } return 0}

So this will work with anyone (mainly the bot owner) with flag "n", types !opscan on any one of the two channels. Then the bot will detect opped users from channel1 and op those users on channel2.

I haven't tested it though, but I think it will work no doubt!
Give this script a try and let me know

Statistics: Posted by awyeah — Tue Jul 13, 2004 10:06 pm

scan and op

2004-07-13T07:49:00-04:00

Hey guys,

i´m looking for a .tcl-script.

Let me explain the situation first:

I have 2 channels, eg. #chan1 & #chan2.
#chan1 is the public channel and #chan2 the closed(k) one.
So I need a script that makes the bot op all users in #chan1 that are in the closed #chan2.

The bot has op in both channels and he should react on the command: !opscan

At the end it should look like this:

In #chan2:
Users: @avilon,@mybot,@userxy
(12:50:14) (@avilon) !opscan
(12:50:14) (@mybot) Scanning...
(12:50:14) (@mybot) Scanning completed.

In #chan1:
Users: @avilon,@mybot,+userxy
(12:50:14) • mybot sets mode (+o userxy)

Please don´t reply like "Take a look at the script archive"... I haven´t found anything comparable.

Thanks

Statistics: Posted by avilon — Tue Jul 13, 2004 7:49 am