17/03/2011, 22:03
Enfin, pour expliquer un peu plus, il faut que tu mettes un séparateur dans ta chaine réponse. Imaginons que tu utilises le #:
tcl
set resp "Bonjour est bonjour.#Bonjour est un mot"
bind pub - "!cekoibonjour" proc cekoi:bonjour
proc cekoi:bonjour {nick uhost handle chan args} {
foreach line [split $::resp "#"] {
putserv "PRIVMSG $chan :$line"
}
}