+- Communauté Eggdrop (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)
+--- Sujet : 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)"]]
...
}