How do i make this script ADV in all channels !?

[JingYou]

# Channel
set channel "#JingYou"

# Time
set time 1

# AD-Text 1
set text "TESTIN"

set a "$botnick"
set a [string tolower ${nick}]
if {![info exists {ald}]} {
global a chan time text
set ald 1
timer ${time} go
}
proc go {} {
global a channel time text
foreach chan $channel {
putserv "PRIVMSG $chan :$text"
timer ${time} go

}
}

--- End ---
I had tried many ways, and it juz ends up not saying anything in background..
Peeps, how do ya make this script advertise on all channels that it is on?

[jedis]

You should just be able to do:

set channel "#channel1 #channel 2" etc.

[jedis]

Or try

foreach chan [channels]

[JingYou]

Guyz.. ain't working! The bot doesn't say anything. Theres a command that i once remembered but not for now, which is to make the bot do global advertise instead of manually edit and add channel in TCL.

Pals, out there, any idea?

[Petersen]

set channel [channels]

[JingYou]

Try 1:

# Channel
set channel [channels]

# Time
set time 1

# AD-Text 1
set text "TESTIN"

set a "$botnick"
set a [string tolower ${nick}]
if {![info exists {ald}]} {
global a chan time text
set ald 1
timer ${time} go
}
proc go {} {
global a channel time text
foreach chan $channel {
putserv "PRIVMSG $chan :$text"
timer ${time} go

}
}

Try 2:

# Channel
set channel [channels]

# Time
set time 1

# AD-Text 1
set text "TESTIN"

set a "$botnick"
set a [string tolower ${nick}]
if {![info exists {ald}]} {
global a chan time text
set ald 1
timer ${time} go
}
proc go {} {
global a channel time text
foreach chan [channels] {
putserv "PRIVMSG $chan :$text"
timer ${time} go

}
}

Ain't working pals.. anyone here wanna take up a challenge ?

[JingYou]

Guyz.. PLZ HELP OUT IM DEAD WANTIN TO KNOW HOW TO FIX HELP OUT MAN!

[Mordred]

The only thing that troubles me with your example is all the braces around variables.
I don't understand the significance of the braces, but I dont see why they need to be there. Otherwise the proc should work. So have you tried like so?:

# Channel
set channel "#chan1 #chan2"

# Time
set time 1

# AD-Text 1
set text "TESTIN"

set a "$botnick"
set a [string tolower "$nick"]

if {![info exists ald]} {
set ald 1
timer $time go
}

proc go {} {
global a channel time text
foreach chan $channel {
putserv "PRIVMSG $chan :$text"
timer $time go

}
}

[slennox]

This is not directed specifically at JingYou, but I've noticed a number of old threads are being brought back to the top by their authors with "hello? anyone?" type posts after a week or two of inactivity. I'm not sure if this practice (hogging exposure) is fair. I'm only slightly bothered, but if anyone is really annoyed by it, please let me know.

<font size=-1>[ This Message was edited by: slennox on 2002-04-11 13:17 ]</font>

[JingYou]

Mordred, great job, and now its finally working! woohoo~ thanks lot pal~