Communauté sur les Eggdrops - Community about Eggdrops
Message de kick Ban avec durée de temps - Printable Version

+- Communauté sur les Eggdrops - Community about Eggdrops (https://forum.eggdrop.fr)
+-- Forum: Eggdrop et TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum: Scripts TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Thread: Message de kick Ban avec durée de temps (/showthread.php?tid=352)



Message de kick Ban avec durée de temps - Julien23 - 04/03/2009

hello,
je revient parmi vous pour essayé de comprendre pourquoi lors du kick ban d'un user le temps reste bloqué a une seule date .
voici mon code :


tcl
#Raison du kickban
set kickban(notice) "(Anti-Notice)Veuillez ne pas faire de notice chan ! expire le [clock format [expr 3600 + [clock second]] -format "%d/%m/%Y à %H:%M (GMT+1)"]"

et à chaque fois il bloque sur un seul date (celle du lancement du eggdrop)


RE: Message de kick Ban avec durée de temps - CrazyCat - 04/03/2009

Tout simplement parce que ton expression n'est calculée que lorsque tu fais le set, et j'imagine que c'est hors de la procédure.
Il faudrait donc faire:

tcl
set kickban(notice) "(Anti-Notice)Veuillez ne pas faire de notice chan ! expire le "
 
proc ta:procedure {arguments} {
   set msg [concat $::kickban(notice) [clock format [expr 3600 + [clock second]] -format "%d/%m/%Y à %H:%M (GMT+1)"]]
   ...
}