egghelp/eggheads community

autop after voice by chanserv

2011-02-27T14:50:25-04:00

You will have to use two functions for this: one that dose the flag matching (matchattr) and the second that grabs the handle of the user based on the nickname he has (nick2hand). Replace:

Code:

if {[isbotnick $user]} continue

with:

Code:

if {[isbotnick $user] || [matchattr [nick2hand $user $chan] b|b $chan]} continue

Now your bots should have +b on the channel, or if they are known globally then remove the last '$chan' from the above code.

Statistics: Posted by caesar — Sun Feb 27, 2011 2:50 pm

new feature

2011-02-27T14:39:47-04:00

could u pls make it so it ignores other bots while checking the users?

ty in advance

Statistics: Posted by .pt — Sun Feb 27, 2011 2:39 pm

autop after voice by chanserv

2011-02-21T17:12:10-04:00

Just I thought, the mask should do the trick. If you plan on on using this only on one channel and can't be bothered with changing channel modes (the '+voiceop' flag) nor having it displayed for other channels too, use this code instead:

Code:

bind mode * "#channel +v" chanserv:voiceproc chanserv:voice {nick uhost hand chan mode target} {  if {$nick != "ChanServ"} return  set count 0  set users [chanlist $chan]  foreach user $users {    if {[isbotnick $user]} continue    if {[isop $user $chan]} {      incr count      break    }  }  if {!$count} {    pushmode $chan +o $target  }}

Anyway, your welcome. This time I did my own tests and work flawlessly.

Statistics: Posted by caesar — Mon Feb 21, 2011 5:12 pm

autop after voice by chanserv

2011-02-21T16:52:33-04:00

perfect ty u so much for the patient

Statistics: Posted by .pt — Mon Feb 21, 2011 4:52 pm

autop after voice by chanserv

2011-02-21T19:13:50-04:00

I gave you a friendly tip and you jumped on with blazing guns. Should I laugh at that, considering it some sarcastic joke, or consider your remark as an insult?

Anyway, I admit at first was sloppy and took like forever to learn stuff, guess cos I was stubborn and didn't listened the people that helped me back then. Nobody is perfect. To be honest I'm not ashamed of my past, cos if I was, then rest assure that I would have removed all the stuff that made me ashamed of myself a long time ago.

I'm not here to race against you nor anybody else, I'm here for the pure pleasure of helping out the community, like IT once did with me. I wouldn't be here if guys like user and ppslim for instance (no offense for anyone not mentioned, I could fill a paper with names ) patiently explained me stuff over and over again.

I haven't touched any TCL code for years up until recently, so my sloppiness shouldn't be a big surprise.

Sure, I had my share of mistakes, but I did had my share of glory too. Stupid, genius, dumbass... that's me.

Edit: Damn flue.. I've been so sloppy recently...

@.pt : Replace:

Code:

if {[channel get $chan voiceop]} return

with:

Code:

if {![channel get $chan voiceop]} return

and should work. I edited my previous post and fixed it there too.

Statistics: Posted by caesar — Mon Feb 21, 2011 4:40 pm

autop after voice by chanserv

2011-02-21T16:31:10-04:00

yeah i rehashed and setted +voiceop before testing it

Statistics: Posted by .pt — Mon Feb 21, 2011 4:31 pm

autop after voice by chanserv

2011-02-21T16:36:00-04:00

Code:

setudef flag voiceopset chanserv_host "services.somenetwork.net"bind mode * "% +v" chanserv:voiceproc chanserv:voice {nick uhost hand chan mode target} {   if {[channel get $chan voiceop] && [string equal -nocase "ChanServ" $nick] && ![isop $target $chan] && [botisop $chan] && [string equal -nocase $::chanserv_host [lindex [split $uhost @] 1]]} {      foreach n [chanlist $chan] {         if {![isbotnick $n] && ![string equal -nocase "ChanServ" $n] && [isop $n $chan]} { break } { continue }         pushmode $chan +o $target      }   }}

ChanServ is there because possibly one day, ChanServ might be in the channel. The script will only OP those ChanServ has voiced.. IF... only the bot or ChanServ are the only things opped.

Final Edit: I may have went over-board on security checks, but that's a good thing.. Isn't it?

Statistics: Posted by speechles — Mon Feb 21, 2011 4:26 pm

autop after voice by chanserv

2011-02-21T16:26:30-04:00

If you copied my last code you should '.chanset #channel +voiceop' to activate it. I'm getting a bot to play with the bind mode as I'm not 100% sure about the mask, I think I can drop the need of this with something simple as:

Code:

bind mode * "#channel +v" chanserv:voice

Statistics: Posted by caesar — Mon Feb 21, 2011 4:26 pm

autop after voice by chanserv

2011-02-21T16:22:54-04:00

im sry again, its not oping the user, doesnt give any errors

Statistics: Posted by .pt — Mon Feb 21, 2011 4:22 pm

autop after voice by chanserv

2011-02-21T16:14:09-04:00

Aww.. i forgot to increment the number of channel operators that have been found (the $count variable). Now it should work properly.

My apologies for the sloppy coding.

Edit: @speechles: There's no need for:

Code:

         if {(![isbotnick $n] || ![string equal -nocase "ChanServ" $n]) && [isop $n $chan]} {            break         } elseif {[isbotnick $n] || [string equal -nocase "ChanServ" $n]} {

cos ChanServ isn't sitting on his channel, also, why don't you use just one 'if' statement to exclude the bot and another to check for channel op's?

If you read again what he asked for in the first place you would notice that he wanted the bot to op the user ONLY if the bot is the only channel operator.

Statistics: Posted by caesar — Mon Feb 21, 2011 4:14 pm

autop after voice by chanserv

2011-02-21T16:07:27-04:00

didnt op the user that one

PS: btw could it be to just one #chan instead of all pls ty

Statistics: Posted by .pt — Mon Feb 21, 2011 4:07 pm

autop after voice by chanserv

2011-02-21T16:25:44-04:00

Code:

setudef flag voiceopset chanserv_host "services.somenetwork.net"bind mode * "% +v" chanserv:voiceproc chanserv:voice {nick uhost hand chan mode target} {if {[channel get $chan voiceop] && [string equal -nocase "ChanServ" $nick] && ![isop $target $chan] && [botisop $chan] && [string equal -nocase $::chanserv_host [lindex [split $uhost @] 1]]} {foreach n [chanlist $chan] {if {![isbotnick $n] && ![string equal -nocase "ChanServ" $n] && [isop $n $chan]} { break } { continue }pushmode $chan +o $target}}}

This should work

Edit: Forgot to add the exception that bot only OP the user if it is the only one opped in the channel. Also added chanset setting.. to enable.. on partyline: .chanset #yourchan +voiceop

Statistics: Posted by speechles — Mon Feb 21, 2011 4:04 pm

autop after voice by chanserv

2011-02-21T16:02:24-04:00

hehe yeah, its working now with the except that always ops the user even if there more ops besides the bot

Statistics: Posted by .pt — Mon Feb 21, 2011 4:02 pm

autop after voice by chanserv

2011-02-21T16:42:41-04:00

There's no else statement, so what the %#&$?!? Guess I'm having another bad day..

Looks like TCL is a bit anal about "if {statement} do 1 command" thing. Anyway, here's a version that should comply with it's *rules*:

Code:

setudef flag voiceopbind mode * "% +v" chanserv:voiceproc chanserv:voice {nick uhost hand chan mode target} {  if {$nick != "ChanServ"} return  if {![channel get $chan voiceop]} return  set count 0  set users [chanlist $chan]  foreach user $users {    if {[isbotnick $user]} {      continue    }    if {[isop $user $chan]} {      incr count      break    }  }  if {!$count} {    pushmode $chan +o $target  }}

I should get an eggdrop to test stuff from now on.

Edit: Added 'voiceop' flag too.

Statistics: Posted by caesar — Mon Feb 21, 2011 3:55 pm

autop after voice by chanserv

2011-02-21T15:38:05-04:00

its not sitting in channel, i get this now

Tcl error [chanserv:voice]: wrong # args: extra words after "else" clause in "if" command

Statistics: Posted by .pt — Mon Feb 21, 2011 3:38 pm