message on all channel

[ultralord]

one of my scripts when i set channel its ok .. but i have another script and i want to spam message on that channel g_spamchannel1 g_spamchannel2.. i pub on one variable the "set spam "#channel,#channel2.." but i want the channel=g_spamchannel1 channel2=g_spamchannel2 and when i remove or add new channel on g_spamchannel2 or g_spamchannel3 i want to edit the previous set with new channel.. like set spam "#$g_spammchannel,$g_spamchannel2.." etc can someone help me?

this is the code when i add new channel and i have another to remove.. but i want to change the spam with variable channels

Code: Select all

proc g_spamjoin { nick uhost handle arg } {
global g_spamchannel g_spamchannel2 g_spamchannel3 g_spamchannel4 g_spamchannel5 g_spamchannel6 g_spamchannel7 g_spamchannel8 g_spamchannel9 g_spamnum
set g_spamnum [lindex $arg 0]
if { $g_spamnum == 1 } {
set g_spamchannel [lindex $arg 1]
channel add $g_spamchannel
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 2 } {
set g_spamchannel2 [lindex $arg 1]
channel add $g_spamchannel2
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 3 } {
set g_spamchannel3 [lindex $arg 1]
channel add $g_spamchannel3

[ultralord]

or if i can set spam with something and that command will "return" the channels and if i use that $spam on some proc then the spam msg will be announced ok..

[ultralord]

solved

easy answer

Code: Select all

set g_spam"$g_spamchannel,$g_spamchannel2,$g_spamchannel3,$g_spamchannel4,$g_spamchannel5,$g_spamchannel6,$g_spamchannel7,$g_spamchannel8,$g_spamchannel9"

[ultralord]

on my tcl i have this set's

set g_spamchannel ""
set g_spamchannel2 ""
set g_spamchannel3 ""
set g_spamchannel4 ""
set g_spamchannel5 ""
set g_spamchannel6 ""
set g_spamchannel7 ""
set g_spamchannel8 ""
set g_spamchannel9 ""

and when i restart my bot
set g_spaming "$g_spamchannel,$g_spamchannel2,$g_spamchannel3,$g_spamchannel4,$g_spamchannel5,$g_spamchannel6"

the g_spamchannel etc is clear without channel.. how i can save if add it with that script?

Code: Select all

proc g_spamjoin { nick uhost handle arg } {
global g_spamchannel g_spamchannel2 g_spamchannel3 g_spamchannel4 g_spamchannel5 g_spamchannel6 g_spamchannel7 g_spamchannel8 g_spamchannel9 g_spamnum
set g_spamnum [lindex $arg 0]
if { $g_spamnum == 1 } {
set g_spamchannel [lindex $arg 1]
channel add $g_spamchannel
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 2 } {
set g_spamchannel2 [lindex $arg 1]
channel add $g_spamchannel2
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 3 } {
set g_spamchannel3 [lindex $arg 1]
channel add $g_spamchannel3
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 4 } {
set g_spamchannel4 [lindex $arg 1]
channel add $g_spamchannel4
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 5 } {
set g_spamchannel5 [lindex $arg 1]
channel add $g_spamchannel5
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 6 } {
set g_spamchannel6 [lindex $arg 1]
channel add $g_spamchannel6
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 7 } {
set g_spamchannel7 [lindex $arg 1]
channel add $g_spamchannel7
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 8 } {
set g_spamchannel8 [lindex $arg 1]
channel add $g_spamchannel8
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
} else {
if { $g_spamnum == 9 } {
set g_spamchannel9 [lindex $arg 1]
channel add $g_spamchannel9
putquick "PRIVMSG $nick :14,1\[7«0 Bot's spamlist 1: $g_spamchannel 2: $g_spamchannel2 3: $g_spamchannel3 4: $g_spamchannel4 5: $g_spamchannel5 6: $g_spamchannel6 7: $g_spamchannel7 8: $g_spamchannel8 9: $g_spamchannel9 7»14]"
}
}
}
}
}
}
}
}
}
}

[ultralord]

any help ?

[ultralord]

someone know how i can do that?
is it possible?

[nml375]

1st, please refrain from bumping over and over...

2nd, try cleaning up all your posts. Right now, any reader have to scroll through 4-5 posts with various pieces of code just to find what you are asking for help 'bout.

3rd, try to structure your layout of your code. Proper indenting and line spacing can make miracles out of a heap of code when it comes to readability.

4th, patience patience patience...