egghelp/eggheads community

Having Difficulty With This Script I Wrote.

2004-04-05T10:31:32-04:00

I still use 1.6.12 ::PPPPPPP
Go figure.

huh? strikelight was talking about the fact that in some older versions of eggdrop the changes I have suggested are not "valid" but in your case if you use an 1.6.12 then it's ok to do the changes, if you wish ofcource.

Statistics: Posted by caesar — Mon Apr 05, 2004 10:31 am

Having Difficulty With This Script I Wrote.

2004-04-05T07:44:11-04:00

I still use 1.6.12 ::PPPPPPP

Go figure.

Statistics: Posted by CoMMy — Mon Apr 05, 2004 7:44 am

Having Difficulty With This Script I Wrote.

2004-04-05T00:29:36-04:00

Liar!

Statistics: Posted by caesar — Mon Apr 05, 2004 12:29 am

Having Difficulty With This Script I Wrote.

2004-04-05T00:28:19-04:00

I wonder who still uses old versions of eggdrop and not at least an 1.6.9..

I for one... and I know many many more who still use older versions.

Statistics: Posted by strikelight — Mon Apr 05, 2004 12:28 am

Having Difficulty With This Script I Wrote.

2004-04-05T00:25:54-04:00

I wonder who still uses old versions of eggdrop and not at least an 1.6.9..

Statistics: Posted by caesar — Mon Apr 05, 2004 12:25 am

Having Difficulty With This Script I Wrote.

2004-04-04T14:26:48-04:00

Code:

if {![isop $botnick $chan]} {

should be

Code:

if {![botisop $chan]} {

"botisop" is not compatible across all eggdrop versions....
"isop" of course, is compatible... Thus.... I agree with his usage of "isop"...

Code:

channel get $chan yourflag

Again, another command which isn't even compatible throughout the entire 1.6.x eggdrop branch (go figure..)...

Checking against "channel info" would be most recommended.

Statistics: Posted by strikelight — Sun Apr 04, 2004 2:26 pm

Having Difficulty With This Script I Wrote.

2004-04-04T09:49:54-04:00

Code:

if {![isop $botnick $chan]} {

should be

Code:

if {![botisop $chan]} {

Code:

switch -- $mode {"-o" {# your stuff here}"+b" {# your stuff here}}

as for the

ischanset $chan yourflag

wich I guess is a proc that check for a channel flag use
the built in

channel get $chan yourflag

Statistics: Posted by caesar — Sun Apr 04, 2004 9:49 am

Having Difficulty With This Script I Wrote.

2004-04-04T07:35:42-04:00

I dont know how to apply switch.

Can you demonstrate for the first 2 commands please ?

Statistics: Posted by CoMMy — Sun Apr 04, 2004 7:35 am

Having Difficulty With This Script I Wrote.

2004-04-04T06:48:26-04:00

Instead of lots of if's why don't you just use "switch" ?

Statistics: Posted by caesar — Sun Apr 04, 2004 6:48 am

Having Difficulty With This Script I Wrote.

2004-04-04T04:47:45-04:00

"continue" is a command used to skip to the next iteration of a loop...
You have no loop... As such, I suspect you meant to use "return" ?

Statistics: Posted by strikelight — Sun Apr 04, 2004 4:47 am

Having Difficulty With This Script I Wrote.

2004-04-04T04:12:57-04:00

This Script, what it does basically, is check the modes of the channel and see if the change is made by unathrorized users and set them back.

Code:

#Mode Protectionbind mode - * modesproc modes {nick uhost hand chan mode victim} {global botnick ownerif {$nick == "$botnick"} { return 0 }if {![isop $botnick $chan]} {putquick "PRIVMSG X :op $chan" -nextif {[file exists netbots/getops.tcl] || [file exists scripts/getops.tcl]} {set bot [getbot $chan]putbot $bot "gop op $chan $botnick" }}if {$mode == "-o" && [isbotnick $victim]} {if {![matchattr [nick2hand $nick $chan] o]} {continue}putquick "PRIVMSG X :op $chan" -nextpushmode $chan -o-v+b $nick $nick [nick2hand $nick $chan]putquick "KICK $chan $nick Dont Ever Deop Me" -next }if {$mode == "-o" && [ischanset $chan protectops]} {if {![matchattr [nick2hand $nick $chan] o]} {continue}if {[isop $victim $chan]} {putquick "MODE $chan -o-v+o+b $nick $nick $victim [nick2hand $nick $chan]" -nextputquick "KICK $chan $nick Operators Are Protected." -next }}if {$mode == "-o" && [ischanset $chan protectusers]} {if {![matchattr [nick2hand $nick $chan] o]} {continue}if {[matchattr [nick2hand $victim $chan] &o $chan] || [matchattr [nick2hand $victim $chan] o]} {putquick "MODE $chan -o-v+o+b $nick $nick $victim [nick2hand $nick $chan]" -nextputquick "KICK $chan $nick Users Are Protected." -next }}if {$mode == "-v" && [ischanset $chan protectvoice]} {if {![matchattr [nick2hand $nick $chan] o]} {continue}if {[isvoice $victim $chan]} {putquick "MODE $chan -o-v+v $nick $nick $victim" -nextputnotc $nick "Voiced Users Are Protected In Chan." }}if {$mode == "+b" && [ischanset $chan protectusers]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}if {[matchattr $victim &o $chan] || [matchattr $victim o]} {putquick "MODE $chan -b-o-v+b $victim $nick $nick [nick2hand $nick $chan]" -nextputquick "KICK $chan $nick Users Are Protected." -next }}if {$mode == "+i" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &m $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan -i" -nextputquick "MODE $chan -o-v $nick $nick" -nextputquick "KICK $chan $nick You Have No Access To Set +i" -next }if {$mode == "-i" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &m $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan +i" -nextputquick "MODE $chan -o-v $nick $nick" -nextputquick "KICK $chan $nick You Have No Access To Set -i" -next }if {$mode == "+s" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan -s" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To +s" }if {$mode == "-s" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan +s" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To -s" }if {$mode == "+p" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan -p" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To +p" }if {$mode == "-p" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan +p" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To -p" }if {$mode == "+k *" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &n $chan] || ![matchattr [nick2hand $nick $chan] m]} {continue}set what [lindex $mode 1]putquick "MODE $chan -k $what" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To +k" }if {$mode == "+m" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan -m" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To +m" }if {$mode == "-m" && [ischanset $chan protectchan]} {if {![matchattr [nick2hand $nick $chan] &o $chan] || ![matchattr [nick2hand $nick $chan] o]} {continue}putquick "MODE $chan +m" -nextputquick "MODE $chan -o-v $nick $nick" -nextputnotc $nick "Sorry But You Dont Have Access To Set The Channel To -m" }return 1 }#Mode Protection

The Error i get is this:

Tcl error [modes]: invoked "continue" outside of a loop

Can you help me please.

Statistics: Posted by CoMMy — Sun Apr 04, 2004 4:12 am