[Résolu] script love system
#4
j'ai essayer aussi celui là

TCL :
proc percenthash string {
set output 0
foreach {c1 c2} [split [md5 $string] {}] {
incr output [expr 0x$c1$c2]
}
return [expr $output %101]
}

mais j'ai toujours une erreur en pl


Tcl error [pub_couple]: invalid bareword "0x"
in expression "0xÂ";
"$0x" or "{0x}" or "0x(...)" or ...
Répondre Avertir


Messages dans ce sujet
script love system - par MisterS - 30/12/2015, 00:26
RE: script love system - par CrazyCat - 30/12/2015, 11:50
RE: script love system - par MisterS - 31/12/2015, 04:29
RE: script love system - par MisterS - 31/12/2015, 20:03
RE: script love system - par CrazyCat - 02/01/2016, 19:59
RE: script love system - par MisterS - 03/01/2016, 00:23
RE: script love system - par CrazyCat - 03/01/2016, 13:13
RE: script love system - par MisterS - 03/01/2016, 18:27
RE: script love system - par CrazyCat - 03/01/2016, 18:56
RE: script love system - par MisterS - 03/01/2016, 23:42
RE: script love system - par CrazyCat - 04/01/2016, 00:40
RE: script love system - par MisterS - 04/01/2016, 16:55
RE: script love system - par CrazyCat - 05/01/2016, 12:19
RE: script love system - par MisterS - 06/01/2016, 18:45

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté