Si tu veux faire le système pour plusieurs canaux, c'est un peu plus compliqué:
- Il te faut une liste de canaux (set canaux {"#accueil" "#unautre" "#dummy"}, et des binds qui ne tiennent pas compte du canal.
- Il faut donner le répertoire de base pour l'écriture et non plus le fichier de destination
- Dans les procédures join/part/quit, il faut faire un lsearch pour savoir si tu es ou pas dans un canal à enregistrer, et il faut passer le canal aux procédures list:log et list:save
- Dans les procédures list:log et list:save, il faut travailler avec des tableaux plus complexes qui tiennent compte du canal, du genre $u($canal)(op)
- La procédure list:save doit créer le fichier en fonction du canal (set fp [open $rep[string range $canal 1 end] w])
Et bien voila, tu as tout, bon courage
- Il te faut une liste de canaux (set canaux {"#accueil" "#unautre" "#dummy"}, et des binds qui ne tiennent pas compte du canal.
- Il faut donner le répertoire de base pour l'écriture et non plus le fichier de destination
- Dans les procédures join/part/quit, il faut faire un lsearch pour savoir si tu es ou pas dans un canal à enregistrer, et il faut passer le canal aux procédures list:log et list:save
- Dans les procédures list:log et list:save, il faut travailler avec des tableaux plus complexes qui tiennent compte du canal, du genre $u($canal)(op)
- La procédure list:save doit créer le fichier en fonction du canal (set fp [open $rep[string range $canal 1 end] w])
Et bien voila, tu as tout, bon courage
