TCL script Help

Ace-T · Post by **Ace-T** » Tue Aug 29, 2006 7:30 am

hey guys, looking for a bit ov support

i made a php script to retrieve data from my site and print it in irc and works brilliant, but only prob is when a user uses the command it will get the data and put it in irc but if they do it in another channel my eggdrop bot is in it prints it in the channel set in the php script....

just wondering if there is an option to add summet to the tcl script so only if you have ops on irc u can use it

here is the tcl script

Code: Select all

package require http

bind pub - !stats stats
proc stats {n u h c a} {
set nick [lindex [split $a] 0]
if {$nick!=""} {
putquick "PRIVMSG #channelname Retrieving Data.... Please Wait..."
 set data [::http::geturl http://www.sitename.net/ircstats.php?search=$nick]
 foreach line [split [::http::data $data] \n] {
putquick "PRIVMSG #channelname Data Retrieval Complete."
  putquick "PRIVMSG #channelname $line"
 }
 ::http::cleanup $data
}
}

r0t3n · Post by **r0t3n** » Tue Aug 29, 2006 9:03 am

Try:

Code: Select all

bind pub - !stats stats
proc stats {n u h c a} {
  if {![matchattr $h o|o $c] || ![isop $n $c]} { return }
  set nick [lindex [split $a] 0]
  if {$nick != ""} {
    putquick "PRIVMSG $c :Retrieving Data.... Please Wait..."
    set data [::http::data [set url [::http::geturl http://www.sitename.net/ircstats.php?search=$nick]]]
    if {$data == ""} {
      putquick "PRIVMSG $c :Data Retrieval Failed."
    } else {
      putquick "PRIVMSG $c :Data Retrieval Complete."
      foreach line [split $data \n] {
        putquick "PRIVMSG $c :$line"
      }
      ::http::cleanup $url
    }
  }
}

Also, next time please your proper indenting and incase the script within the code tags, makes it easier on the eyes to read.

Ace-T · Post by **Ace-T** » Tue Aug 29, 2006 9:44 am

seems to work only prob now is the chanel owner can only do it and not any1 with half ops or above

thanks

Alchera · Post by **Alchera** » Tue Aug 29, 2006 6:53 pm

Code: Select all

if {![matchattr $h o|o $c] || ![isop $n $c]} { return }

The above allows any bot user with +o (Global/Channel) flags or a channel Op to use the trigger it does not restict it to the bot owner.

Post by **nml375** » Wed Aug 30, 2006 4:52 am

Actually; you'd have to have +o flags and be opped in the channel.

DragnLord · Post by **DragnLord** » Wed Aug 30, 2006 3:07 pm

nml375 wrote:Actually; you'd have to have +o flags and be opped in the channel.

you need to learn operators used in if conditions
|| is "or"
&& is "and"

Alchera's snippet stops the script if the user is not recognized as an operator.

Post by **nml375** » Wed Aug 30, 2006 3:43 pm

Oh, I'm fairly well accuainted with "and" and "or" operators...
I'm also quite familiar with De Morgan's theorem... (might wanna check it up)

A detailed analysis of the speciffic if-statement:
cond1: ![matchattr $h o|o $c]
cond2: ![isop $n $c]
op1: cond1 || cond2

cond1:
This will return true if [matchattr $h o|o $c] returns false

cond2:
This will return true if [isop $n $c] returns false

op1:
This will return true if either cond1 or cond2 is true, that is; if [matchattr...], [isop...], or both are false

Next, lets examine the body of the if-block...
if op1 returns true, execute return (there is no "else" clause)

Thus... if you either lack +o|o flag or is not opped (or a combination of both), the proc will return immediately.

Using De Morgan's theorem (or common sense) makes it clear that thus, you'll need both +o|o flags, and be opped to get past that return-statement...

DragnLord · Post by **DragnLord** » Wed Aug 30, 2006 5:54 pm

granted,

Code: Select all

if {![isop $n $c]} { return }

will do what Ace-T asked for, stopping script if user is not a chanop (regardless of bot flags)

Ace-T · Post by **Ace-T** » Thu Aug 31, 2006 2:58 pm

dragonlord, ur script worked great man ty

and ty to rest

Ace-T · Post by **Ace-T** » Thu Oct 05, 2006 4:23 pm

this worked fine til i reinstalled eggdrop no it just dont work....
it will work if i remove
if {![matchattr $h o|o $c] || ![isop $n $c]} { return } or dragons one

any ideas

rosc2112 · Post by **rosc2112** » Thu Oct 05, 2006 5:16 pm

did you re-add your users with the same flags?

Ace-T · Post by **Ace-T** » Thu Oct 05, 2006 6:20 pm

yeh nothing has changed with it exepct a fresh install ov eggdrop

everything elsse works expect my announce script cause its reporting from my site sometimes it cant resolve the host name but aprt from them 2 things everything else is fine

Linux · Post by **Linux** » Fri Oct 06, 2006 12:52 am

Ace-T wrote:seems to work only prob now is the chanel owner can only do it and not any1 with half ops or above

thanks

&

Ace-T wrote:this worked fine til i reinstalled eggdrop no it just dont work....
it will work if i remove
if {![matchattr $h o|o $c] || ![isop $n $c]} { return } or dragons one

any ideas

All i observe is that you want your script can be used by Ops and Halfops, as you mention earlier that owner can do it others can't, dear friend there are 2 conditions on user status i.e OP(@), VOICE(+) & HALFOP(%) not only in Channel but in Bot aswell.
If you want to allow other users to use that script you should add them in the Bot with the particular flags.

l - halfop (user has halfop access to the channel)
m - master (user is a channel master)
n - owner (user is a channel owner)
o - op (user has op access to the channel)

For more flags info type the following command in Bot's partyline/dcc

Code: Select all

.help whois

From the following line;

Code: Select all

if {![matchattr $h o|o $c] || ![isop $n $c]} { return }

Above mentioned code stops the script if the user is not recognized as an operator or not oped on the channel.

If you want to allow others then set their flags or tell them to be Oped and use it. As for halfop matter replace above live with:

Code: Select all

if {![matchattr $h lo|lo $c] || ![isop $n $c] || ![ishalfop $n $c]} { return }

by this halfop can use it too.

REMEMBER: If you set the flags in Bot so there is no need for the users to gain OP or HALFOP for usage, Bot will recognized them as they are added and/but if you don't add them so they should be @ or % for its use.

Regards.

Post by **nml375** » Fri Oct 06, 2006 8:37 am

@Linux:
With that code, you'd have to be both opped and halfopped + have ol flags.

@Ace-T:
the piece of code in DragnLord's last post should work..
Can you check (using .channel <yourchannel>) that your bot properly recognizes the user, and sees it as being opped?

Linux · Post by **Linux** » Fri Oct 06, 2006 12:39 pm

nml375 wrote:@Linux:
With that code, you'd have to be both opped and halfopped + have ol flags.

If you read my post again i will be very thankful, one thing i would like to tell you;

Usage:
'||' = OR
'&&' = AND

If users are added in the Bot as Op/Halfop then it is NOT nesassary to be OP(@) or Halfop(%) on channel too because Bot recon them with their flags and If users are not added then they SHOULD be OP(@) or Halfop(%) on channel.

Thats the reason i apply all the conditions with the flags "lo" or "Channel Op" or "Halfop".

Regards.