Evaluated proc WORDOFGOD {{when "8 hours ago"}} {set ret "";foreach {a b c d e} [split [n_r_r [clock scan "8 hours ago"]] {}] {lappend ret [lindex $::english_words [expr [scan "$a$b$c$d$e$f" %x] % [llength $::english_words]]]}; return $ret}
This commit is contained in:
parent
9425a8195b
commit
9f37e44428
@ -1 +1 @@
|
|||||||
{{when {8 hours ago}}} {set ret "";foreach {a b c d e} [split [n_r_r [clock scan "8 hours ago"]] {}] {lappend ret [lindex $english_words [expr [scan "$a$b$c$d$e$f" %x] % [llength $english_words]]]}; return $ret}
|
{{when {8 hours ago}}} {set ret "";foreach {a b c d e} [split [n_r_r [clock scan "8 hours ago"]] {}] {lappend ret [lindex $::english_words [expr [scan "$a$b$c$d$e$f" %x] % [llength $::english_words]]]}; return $ret}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user