| View previous topic :: View next topic |
| Author |
Message |
juanamores
Master
Joined: 15 Mar 2015
Posts: 317
|
 Posted: Sat Apr 25, 2015 8:24 pm Post subject: BIND join and BIND part what is wrong?? |
 |
|
BIND join works perfect, but NOT BIND part.
| Code: | bind join - * join_join
bind part - * part_part
set chan1 "#chan1"
set chan2 "#chan2"
proc join_join {nick uhost hand chan} {
global chan1 chan2
if {$chan == "$chan1"} {
putmsg $chan2 "$nick has joined $chan1"
} else {
return
}}
proc part_part {nick uhost hand chan} {
global chan1 chan2
if {$chan == "$chan1"} {
putmsg $chan2 "$nick has left $chan1"
} else {
return
}}
|
Tcl error [part_part]: wrong # args: should be "part_part nick uhost hand chan"
I tried renamed procedures by others, but always gives me error BIND part.
_________________
If you do not understand my ideas is because I can not think in English, I help me with Google Translate. I only speak Spanish. Bear with me. Thanks  |
|
| Back to top |
|
 |
willyw
Revered One
Joined: 15 Jan 2009
Posts: 1175
|
| Posted: Sat Apr 25, 2015 8:59 pm Post subject: Re: BIND join and BIND part what is wrong?? |
|
|
| juanamores wrote: |
| Code: |
...
proc part_part {nick uhost hand chan} {
...
|
Tcl error [part_part]: wrong # args: should be "part_part nick uhost hand chan"
...
|
Go here:
http://www.eggheads.org/support/egghtml/1.6.21/tcl-commands.html
and text search to find
bind part
to locate the section about that bind.
Read that section, and then compare to your line quoted above.
_________________
For a fun (and popular) Trivia game, visit us at: irc.librairc.net #science-fiction . Over 300K Q & A to play in BogusTrivia ! |
|
| Back to top |
|
|
juanamores
Master
Joined: 15 Mar 2015
Posts: 317
|
| Posted: Sat Apr 25, 2015 9:14 pm Post subject: Re: BIND join and BIND part what is wrong?? |
|
|
willyw thank you I already fixed. 
_________________
If you do not understand my ideas is because I can not think in English, I help me with Google Translate. I only speak Spanish. Bear with me. Thanks |
|
| Back to top |
|
|
Arnold_X-P
Master
Joined: 30 Oct 2006
Posts: 221
Location: DALnet - Trinidad - Beni - Bolivia
|
| Posted: Sat May 02, 2015 12:45 pm Post subject: |
|
|
to me I me work quite so :
| Quote: |
[12:41] <@JulieTh> Arnold_X-P has joined #tcls
[12:43] <@JulieTh> Arnold_X-P has left #tcls
|
| Code: |
bind join - * join_join
bind part - * part_part
set chan1 "#tcls"
set chan2 "#bom"
proc join_join {nick uhost hand chan} {
global chan1 chan2
if {$chan == "$chan1"} {
putmsg $chan2 "$nick has joined $chan1"
} else {
return
}}
proc part_part {nick uhost hand chan {msg ""}} {
global chan1 chan2
if {$chan == "$chan1"} {
putmsg $chan2 "$nick has left $chan1"
} else {
return
}}
|
_________________
thanks to that they help, that others learn |
|
| Back to top |
|
|
juanamores
Master
Joined: 15 Mar 2015
Posts: 317
|
| Posted: Sun May 03, 2015 12:53 pm Post subject: |
|
|
| Arnold_X-P wrote: | to me I me work quite so :
|
Yes, Arnold_X-P, to give more compatibility to the process, there was a syntax that did not know, until willyw taught me.
| Quote: | New Tcl procs should be declared as
proc partproc {nick uhost hand chan {msg ""}} { ... }
for compatibility. |
_________________
If you do not understand my ideas is because I can not think in English, I help me with Google Translate. I only speak Spanish. Bear with me. Thanks |
|
| Back to top |
|
|
Arnold_X-P
Master
Joined: 30 Oct 2006
Posts: 221
Location: DALnet - Trinidad - Beni - Bolivia
|
| Posted: Thu May 07, 2015 7:35 pm Post subject: |
|
|
when you give or solve please juanamores snag in the web the solution do not say that it solves
so we all learn, and see that of that the forum talks each other to learn
ok juanamores !!!!!
no seas un lamer pega la solucion y no esperes a que otro lo solucione 
_________________
thanks to that they help, that others learn |
|
| Back to top |
|
|
juanamores
Master
Joined: 15 Mar 2015
Posts: 317
|
| Posted: Thu May 07, 2015 8:18 pm Post subject: |
|
|
| Arnold_X-P wrote: |
no seas un lamer pega la solucion y no esperes a que otro lo solucione |
Siempre pego mis soluciones, aun cuando no me lo solicitan, en este caso la solución la encontró willyw y el puso el enlace a la misma.
Todos los créditos son de willyw, por eso no me pareció necesario volver a pegar el contenido del enlace que está en este post.
Me parece algo ofensivo y exagerado tu comentario llamandome lamer.
Every time I've solved a question, I shared all my solutions, without I asked. In this case, the solution was found by willyw, and put a link to it.
All credits are willyw, so it did not seem necessary to paste the contents of the link found in this post.
I find something offensive and exaggerated your comment calling me lamer.
_________________
If you do not understand my ideas is because I can not think in English, I help me with Google Translate. I only speak Spanish. Bear with me. Thanks |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
