egghelp/eggheads community

DCC File Sends

2002-10-17T13:54:19-04:00

Want to know the stupid thing...

I only just noticed they were the wrong way round

I also removed the Second test cause i dont think i need it now that you come to think about it

Statistics: Posted by Weirdo — Thu Oct 17, 2002 1:54 pm

DCC File Sends

2002-10-17T13:19:00-04:00

Code:
bind pub - !rule_send pub:infosendproc pub:infosend { nick host hand chan text} {global runchan infofileif {$chan != $runchan || {onchan $runchan $nick} == 0 } {return 0}dccsend $infofile $nick}
And believe it or not.....
[18:03:26] [18:03] Begin DCC send info.txt to Weirdo
[18:03:29] [18:03] Finished dcc send info.txt to Weirdo
It works

So why is it that the first expression shouldnt be in brackets, yet the second one does? Not sure i quite undertsand that

1. $chan != $runchan, tcl substitutes the actual values of $chan and $runchan and then evaluates the "!="

2. {onchan $runchan $nick} == 0, is still wrong. putting it like that will make it a string with the value "onchan $runchan $nick". The variables are not substituted. And that string is tested against == 0, which will always result in 0.

You MUST remove the { } and you MUST put [ ] around it if you want to use it as a command.

And once again: you MUST SWAP $runchan and $nick in the onchan command if you really really want to use that test.

And once again: do you really NEED this test?

Statistics: Posted by egghead — Thu Oct 17, 2002 1:19 pm

DCC File Sends

2002-10-17T13:02:43-04:00

Code:

bind pub - !rule_send pub:infosendproc pub:infosend { nick host hand chan text} {global runchan infofileif {$chan != $runchan || {onchan $runchan $nick} == 0 } {return 0}dccsend $infofile $nick}

And believe it or not.....

[18:03:26] [18:03] Begin DCC send info.txt to Weirdo
[18:03:29] [18:03] Finished dcc send info.txt to Weirdo

It works

So why is it that the first expression shouldnt be in brackets, yet the second one does? Not sure i quite undertsand that

Statistics: Posted by Weirdo — Thu Oct 17, 2002 1:02 pm

DCC File Sends

2002-10-17T13:04:11-04:00

Code:
if {{$chan == $runchan} || {onchan $runchan $nick} == 0 } {return 0}
[17:53:44] [17:53] Tcl error [pub:infosend]: expected boolean value but got "$chan != $runchan"

onchan [channel]
Returns: 1 if someone by that nickname is on the specified channel (or
any channel if none is specified); 0 otherwise
Module: irc

Have i got the right usage of this, as if its 0, then the proc will stop, if its 1 then itll continue. Does the channel need to be specified in the onchan?

Cause of this boolean thingy, havent got a reading for the second run chan[/code]

Hmm, stereo was not good enough

1. ==> {$chan == $runchan}
Do not put { } around it.

2. {onchan $runchan $nick}
put [ ] around this, since [onchan] is a command that returns something (0 or 1).

3. You write:

onchan $runchan $nick

and tcl-commands.doc writes:

onchan [channel].

You see the difference in the order/location of the nickname and the channelname?

4. Even if you use the [onchan] correctly, are you sure this test is needed?

Statistics: Posted by egghead — Thu Oct 17, 2002 12:58 pm

DCC File Sends

2002-10-17T12:56:02-04:00

Code:

if {{$chan == $runchan} || {onchan $runchan $nick} == 0 } {return 0}

[17:53:44] [17:53] Tcl error [pub:infosend]: expected boolean value but got "$chan != $runchan"

onchan [channel]
Returns: 1 if someone by that nickname is on the specified channel (or
any channel if none is specified); 0 otherwise
Module: irc

Have i got the right usage of this, as if its 0, then the proc will stop, if its 1 then itll continue. Does the channel need to be specified in the onchan?

Cause of this boolean thingy, havent got a reading for the second run chan[/code]

Statistics: Posted by Weirdo — Thu Oct 17, 2002 12:56 pm

DCC File Sends

2002-10-17T12:20:30-04:00

[edit] Doh ... just too late.

He now gets the message in stereo

Statistics: Posted by egghead — Thu Oct 17, 2002 12:20 pm

DCC File Sends

2002-10-17T12:09:12-04:00

if {[$chan != $runchan]

doesnt anything in [] get executed?

surely all you need is if{$chan != $runchan} {}?

[edit] Doh ... just too late.

Statistics: Posted by Photon — Thu Oct 17, 2002 12:09 pm

DCC File Sends

2002-10-17T12:17:10-04:00

Still does this with the modules turned on (they were off before)

[17:04:29] [17:04] Tcl error [pub:infosend]: invalid command name "#weirdo"

1. ==> [$chan != $runchan]

putting a [ and a ] around it makes it a command.

2. ==> [onchan $runchan $nick]

check out doc/tcl-commands.doc

3. ==> $chan != $runchan || [onchan $nick $runchan] == 0

first you test that the channel the trigger came from is $runchan and then you test if the nick is on $runchan.
Suppose that $chan == $runchan, what does the [onchan] test then return?

Statistics: Posted by egghead — Thu Oct 17, 2002 12:06 pm

DCC File Sends

2002-10-17T12:03:04-04:00

Still does this with the modules turned on (they were off before)

[17:04:29] [17:04] Tcl error [pub:infosend]: invalid command name "#weirdo"

Statistics: Posted by Weirdo — Thu Oct 17, 2002 12:03 pm

DCC File Sends

2002-10-17T07:57:38-04:00

You will need to load the transfer and filesys modules for this to work.

Statistics: Posted by ppslim — Thu Oct 17, 2002 7:57 am

DCC File Sends

2002-10-17T07:55:43-04:00

ok, 2nd post for today, hope i aint pushing my luck. I am trying to add more onto this rule script by giving an option which will send the FAQ, Rules and Op rules, in an info.txt file. When someoe does !rule_send it should send

Code:

bind pub - !rule_send pub:infosendproc pub:infosend { nick host hand chan text} {global runchan infofileif {[$chan != $runchan] || [onchan $runchan $nick] == 0 } {return 0}dccsend $infofile $nick}

What it gives me is #weirdo - invalid command name.

$runchan = #weirdo

Any help?

Statistics: Posted by Weirdo — Thu Oct 17, 2002 7:55 am