egghelp/eggheads community

unban via X and banlist.

2007-12-06T11:16:27-04:00

It's simple remove $drchan and replace it with $chan

Statistics: Posted by iamdeath — Thu Dec 06, 2007 11:16 am

unban via X and banlist.

2007-12-05T16:03:37-04:00

its good, unban in the channel, chanban, and via X. but get this error.

Code:

 .set errorInfo<)Modo> Currently: invalid channel: *!*@*.ar<)Modo> Currently:     while executing<)Modo> Currently: "isban $drchan $tnick"<)Modo> Currently:     (procedure "pub:unban" line 11)<)Modo> Currently:     invoked from within<)Modo> Currently: "pub:unban $_pub1 $_pub2 $_pub3 $_pub4 $_pub5"

and how can do for run this script in all channels?

Statistics: Posted by Nor7on — Wed Dec 05, 2007 4:03 pm

Re: unban via X and banlist.

2007-12-05T00:09:07-04:00

i trying run this script, but i get error.

the script

Code:

bind pub o|o .ub pub:unbanproc pub:unban { nick uhost hand chan text } { global botnick drchan drreason opsc tnick  if {[botisop $drchan]} {    if {[string length $text] > 0} {      set tnick [lindex $text 0]      if {[ischanban $tnick $drchan]} {      killchanban $drchan $tnick      putserv "MODE $drchan -b $tnick"      putquick "privmsg X :unban $drchan $tnick"      putserv "privmsg $opsc :$hand/$nick: I removed \002$tnick\002 from $drchan" }      if {[isban $drchan $tnick]} {      killban $tnick      } else { puthelp "NOTICE $nick : I can't see that ban in the channel list" }    } else { puthelp "NOTICE $nick :SYNTAX: .ub  - unbans an address" }  } else { puthelp "NOTICE $nick :Pfff n-am op!" }}

and get this error.

<)Modo> [17:36] Tcl error [pub:unban]: can't read "drchan": no such variable

errorInfo:

Code:

 .set errorInfo<)Modo> Currently: can't read "drchan": no such variable<)Modo> Currently:     while executing<)Modo> Currently: "botisop $drchan"<)Modo> Currently:     (procedure "pub:unban" line 3)<)Modo> Currently:     invoked from within<)Modo> Currently: "pub:unban $_pub1 $_pub2 $_pub3 $_pub4 $_pub5"

try adding this line at the beginning of this code then restart.

Code:

set drchan "#mychannel"

Statistics: Posted by iamdeath — Wed Dec 05, 2007 12:09 am

unban via X and banlist.

2007-12-03T22:46:05-04:00

You're making a very lame attempt at grabbing pieces of other's code without a clue as to what you're doing and then expecting other's to assist (which won't happen).

LoL's TooLz is defunct (probably the same goes for that ripped code in your first post).

Either learn Tcl and code something yourself, search the Tcl Archive for what you need OR post an appropriate request of your needs in the Script Requests forum.

In your xbanpurge.tcl error post you were given a solution to fix that script. You (apparently) ignored that advice, hence your creation of a new thread here.

There is a certain amount of self-help required by users of these forums. Those that desire to help expect those helped to do some figuring out themselves as part of their learning curve.

If something is unclear you simply ask and all will (usually) be revealed.

Statistics: Posted by Alchera — Mon Dec 03, 2007 10:46 pm

unban via X and banlist.

2007-12-03T21:49:25-04:00

or how fix this ( lol.tcl 8.0 ) for unban with X too.

Code:

proc lol_unban { nick hand chan mask byX } {if {[isnumber $mask]} {set find 0foreach bans [banlist $chan] {incr findif {$find == $mask} { set mask [lindex $bans 0] ; break }}if {[isnumber $mask]} {puthelp "NOTICE $nick :[lang_text lol_lang_data [getlang $hand] 46 $mask]"return 0} } else {if {[string first "!" $mask] == -1 && [string first "@" $mask] == -1} {if {[isnumber [string index $mask 0]]} { set mask *!*@$mask } else { set mask $mask*!*@* }}if {[string first "!" $mask] == -1} {set mask *!*$mask}if {[string first "@" $mask] == -1} {set mask $mask*@*}}if {$byX } {if {[channel get $chan xlogin] && [channel get $chan protectX] && [isop X $chan]} {putserv "PRIVMSG X :unban $chan $mask"      puthelp "NOTICE $nick :[lang_text lol_lang_data [getlang $hand] 47 "$mask $chan"]"return 0}}if {[isban $mask $chan]} { if {![killchanban $chan $mask]} { killban $mask }      puthelp "NOTICE $nick :[lang_text lol_lang_data [getlang $hand] 47 "$mask $chan"]"return 0} if {[ischanban $mask $chan] && [botisop $chan]} {putserv "MODE $chan -b $mask"putserv "PRIVMSG X :unban $chan $mask"             puthelp "NOTICE $nick :[lang_text lol_lang_data [getlang $hand] 47 "$mask $chan"]"return 0} puthelp "NOTICE $nick :[lang_text lol_lang_data [getlang $hand] 48 $chan]"return 0}

i add this:

putserv "PRIVMSG X :unban $chan $mask"

but, unban channelban, but no unban via X.

Statistics: Posted by Nor7on — Mon Dec 03, 2007 9:49 pm

unban via X and banlist.

2007-12-03T21:44:47-04:00

ohhh ;(

i want a script for unban in the internal banlist and too via X.

Statistics: Posted by Nor7on — Mon Dec 03, 2007 9:44 pm

unban via X and banlist.

2007-12-03T20:01:30-04:00

That is not the full code.

"drchan" is not defined.

Statistics: Posted by Alchera — Mon Dec 03, 2007 8:01 pm

unban via X and banlist.

2007-12-03T19:38:30-04:00

i trying run this script, but i get error.

the script

Code:

bind pub o|o .ub pub:unbanproc pub:unban { nick uhost hand chan text } { global botnick drchan drreason opsc tnick  if {[botisop $drchan]} {    if {[string length $text] > 0} {      set tnick [lindex $text 0]      if {[ischanban $tnick $drchan]} {      killchanban $drchan $tnick      putserv "MODE $drchan -b $tnick"      putquick "privmsg X :unban $drchan $tnick"      putserv "privmsg $opsc :$hand/$nick: I removed \002$tnick\002 from $drchan" }      if {[isban $drchan $tnick]} {      killban $tnick      } else { puthelp "NOTICE $nick : I can't see that ban in the channel list" }    } else { puthelp "NOTICE $nick :SYNTAX: .ub  - unbans an address" }  } else { puthelp "NOTICE $nick :Pfff n-am op!" }}

and get this error.

<)Modo> [17:36] Tcl error [pub:unban]: can't read "drchan": no such variable

errorInfo:

Code:

 .set errorInfo<)Modo> Currently: can't read "drchan": no such variable<)Modo> Currently:     while executing<)Modo> Currently: "botisop $drchan"<)Modo> Currently:     (procedure "pub:unban" line 3)<)Modo> Currently:     invoked from within<)Modo> Currently: "pub:unban $_pub1 $_pub2 $_pub3 $_pub4 $_pub5"

Statistics: Posted by Nor7on — Mon Dec 03, 2007 7:38 pm