|
|
26b20f33b7
|
Evaluated unset ::garbage
|
2023-01-04 10:22:26 -08:00 |
|
|
|
b2d9da4118
|
Evaluated set ::garbage {}
|
2023-01-04 10:19:08 -08:00 |
|
|
|
c26894df09
|
Evaluated unset garbage
|
2023-01-04 10:14:57 -08:00 |
|
|
|
b5c727978c
|
Evaluated set garbage [list]
|
2023-01-04 10:13:55 -08:00 |
|
|
|
ba93c99557
|
Evaluated unset garbage
|
2023-01-04 10:13:50 -08:00 |
|
|
|
7df3c265bc
|
Evaluated set garbage [list]
|
2023-01-04 10:11:49 -08:00 |
|
|
|
7fb7bc78b1
|
Evaluated proc lex_fridman_reading {{N 5}} {for {set i 0} {$i < 5} {incr i} {if [expr $i % 2] {. Week $i: [lindex_random $::hard_book]} {. Week $i: [lindex_random $::easy_book]}}}
|
2023-01-04 10:08:08 -08:00 |
|
|
|
bca39b70c7
|
Evaluated set ::hard_book [list "Gravity's Rainbow" "Ulysses" "À la recherche du temps perdu" "The Voynich Manuscript" "Finnegans Wake" "The printout of the human genome project" "The Wycliffe Bible" "The Sorrows of Young Werther" "The Rohonc Codex" "War and Peace" "Swann's Way" "The Sound and the Fury" "The Tractatus Logico-Philosophicus"]
|
2023-01-04 09:58:47 -08:00 |
|
|
|
d0b4bd4b90
|
Evaluated set ::easy_book [list "The Little Engine That Could" "The Giver" "Three little pigs" "Alexander and the Terrible, Horrible, No Good, Very Bad Day" "Green Eggs and Ham" "Charlotte's Web" "The Giving Tree" "The Snowy Day" "Jet Magazine" "Where's Waldo?" "Goodnight Moon" "The Velveteen Rabbit"]
|
2023-01-04 09:54:55 -08:00 |
|
|
|
8ba91531cd
|
Evaluated proc happynewyear {{channel #gamme}} {string map "PLACEHOLDER [rainbow $channel]" $::happynewyear}
|
2022-12-31 09:24:52 -08:00 |
|
|
|
152298e891
|
Evaluated set happynewyear [wget https://dpaste.com/BRND36KP9.txt]
|
2022-12-31 09:19:59 -08:00 |
|
|
|
408910127f
|
Evaluated proc WORDOFGOD args {set ret ""; foreach {a b c d e} [split [n_r_r'] {}] {lappend ret [lindex $::english_words [expr [scan "$a$b$c$d$e" %x] % [llength $::english_words]]]}; return $ret}
|
2022-12-27 15:28:09 -08:00 |
|
|
|
97db1fe041
|
Evaluated proc n_r_r' args {join [lindex [split [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/last]]]] 6]}
|
2022-12-27 15:26:06 -08:00 |
|
|
|
4652599f7b
|
Evaluated proc n_r_r' when {join [lindex [split [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/last]]]] 6]}
|
2022-12-27 15:25:58 -08:00 |
|
|
|
3d13d6cc5c
|
Evaluated proc WORDOFGOD {{when "8 hours ago"}} {set ret ""; foreach {a b c d e} [split [n_r_r [clock scan $when]] {}] {lappend ret [lindex $::english_words [expr [scan "$a$b$c$d$e" %x] % [llength $::english_words]]]}; return $ret}
|
2022-12-27 15:18:01 -08:00 |
|
|
|
9f37e44428
|
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}
|
2022-12-27 15:17:29 -08:00 |
|
|
|
9425a8195b
|
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}
|
2022-12-27 15:16:32 -08:00 |
|
|
|
2abcf057e6
|
Evaluated set ret "";foreach {a b c d e f} [split [n_r_r [clock scan "8 hours ago"]] {}] {lappend ret [scan "$a$b$c$d$e$f" %x]}; return $ret
|
2022-12-27 15:13:24 -08:00 |
|
|
|
822d14db41
|
Evaluated set ret "";foreach {a b c d} [split [n_r_r [clock scan "8 hours ago"]]] {lappend ret "$a$b$c$d"}; return $ret
|
2022-12-27 15:11:43 -08:00 |
|
|
|
9c697eec86
|
add english words
|
2022-12-27 15:01:59 -08:00 |
|
|
|
e76f0fed4a
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};join $ret ""}
|
2022-12-26 18:31:42 -08:00 |
|
|
|
727b1fc510
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};lindex $ret 0}
|
2022-12-26 18:31:27 -08:00 |
|
|
|
a245f9351d
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};lindex $ret -}
|
2022-12-26 18:31:24 -08:00 |
|
|
|
e94de74731
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};return $ret}
|
2022-12-26 18:31:08 -08:00 |
|
|
|
8ab2ba653f
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};split $ret { }}
|
2022-12-26 18:30:57 -08:00 |
|
|
|
2d900c8b62
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};split $ret}
|
2022-12-26 18:30:49 -08:00 |
|
|
|
059ae5cdf0
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};split $ret " "}
|
2022-12-26 18:30:39 -08:00 |
|
|
|
edbbb09b30
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};join [split $ret " "]}
|
2022-12-26 18:30:16 -08:00 |
|
|
|
4c024a3bb1
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};join [split $ret]}
|
2022-12-26 18:30:01 -08:00 |
|
|
|
d34e09b599
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};join [join $ret]}
|
2022-12-26 18:29:42 -08:00 |
|
|
|
02f1b53b97
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 10 128] {lappend ret [lindex [.. a z] [expr $z % 26]]};join $ret}
|
2022-12-26 18:29:04 -08:00 |
|
|
|
2e8ed67808
|
Evaluated proc nist_rand' {{when {}} {n 1}} {if {$when eq ""} {set when [clock scan "8 hours ago"]};lrange [hex2dec [n_r_r $when]] 0 $n-1}
|
2022-12-26 18:22:50 -08:00 |
|
|
|
ede8e9cba8
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 10 128] {lappend ret [format %c [expr $z + 32]]};join $ret}
|
2022-12-26 18:20:42 -08:00 |
|
|
|
6389b57ea1
|
Evaluated proc word_of_american_god' {} {set ret [list]; foreach z [n_arsebackwards_rands' 5 128] {lappend ret [format %c [expr $z + 32]]};join $ret}
|
2022-12-26 18:19:38 -08:00 |
|
|
|
d99a5b9b93
|
Evaluated proc n_arsebackwards_rands' {n max} {set aret [list]; foreach z [nist_rand' {} $n] {lappend aret [expr $z % $max]}; return $aret}
|
2022-12-26 18:17:09 -08:00 |
|
|
|
e430ea4106
|
Evaluated proc n_arsebackwards_rands' {n max} {set aret [list]; foreach z [nist_rand {} $n] {lappend aret [expr $z % $max]}; return $aret}
|
2022-12-26 18:16:10 -08:00 |
|
|
|
664fc34caa
|
Evaluated proc nist_rand' {{when {}} {n 1}} {if {$when eq ""} {set when [clock scan "8 hours ago"]};lrange [hex2dec [n_r_r $when]] 0 4}
|
2022-12-26 18:08:30 -08:00 |
|
|
|
3e25591e6b
|
Evaluated proc nist_rand {{when {}}} {if {$when eq ""} {set when [clock scan "8 hours ago"]};set ret 0;set i 0; foreach x [lrange [hex2dec [n_r_r $when]] 0 4] {set ret [expr int($ret + ($x * pow(16,$i)))];incr i;}; return $ret}
|
2022-12-26 18:03:34 -08:00 |
|
|
|
3432e3a495
|
Evaluated proc nist_rand {{when {}}} {if {$when eq ""} {set when [clock scan "8 hours ago"]};set ret 0;set i 0; foreach x [lrange [hex2dec [last [regexp -inline {<outputValue>(.*?)</outputValue>} [n_r_r $when]]]] 0 4] {set ret [expr int($ret + ($x * pow(16,$i)))];incr i;}; return $ret}
|
2022-12-26 18:03:03 -08:00 |
|
|
|
4826a98b0f
|
Evaluated proc n_r_r when {join [lindex [split [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 6]}
|
2022-12-26 18:02:17 -08:00 |
|
|
|
515b3a22cb
|
Evaluated proc n_r_r when {lindex [split [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 6}
|
2022-12-26 18:02:00 -08:00 |
|
|
|
13d5bcd432
|
Evaluated proc n_r_r when {lrange [split [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 0 19}
|
2022-12-26 18:01:17 -08:00 |
|
|
|
6f37e039bf
|
Evaluated proc n_r_r when {lrange [join [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 0 19}
|
2022-12-26 18:00:30 -08:00 |
|
|
|
56897b40d4
|
Evaluated proc n_r_r when {lrange [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]] 0 19}
|
2022-12-26 17:59:45 -08:00 |
|
|
|
d406ea0fca
|
Evaluated proc n_r_r when {lrange [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]] end-129 end-1}
|
2022-12-26 17:59:01 -08:00 |
|
|
|
c73712081b
|
Evaluated proc n_r_r when {lindex [list [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 0}
|
2022-12-26 17:57:26 -08:00 |
|
|
|
8b695700c8
|
Evaluated proc n_r_r when {lindex [list [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 2}
|
2022-12-26 17:57:00 -08:00 |
|
|
|
414a879d79
|
Evaluated proc n_r_r when {lindex 2 [list [head 1 [tail 3 [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]]}
|
2022-12-26 17:55:24 -08:00 |
|
|
|
8fc71e9a2d
|
Evaluated proc nist_rand {{when {}}} {if {$when eq ""} {set when [clock scan "8 hours ago"]};set ret 0;set i 0; foreach x [lrange [hex2dec [last [regexp -inline {<outputValue>(.*?)</outputValue>} [wget https://beacon.nist.gov/beacon/2.0/pulse/time/$when]]]] 0 4] {set ret [expr int($ret + ($x * pow(16,$i)))];incr i;}; return $ret}
|
2022-12-26 17:39:20 -08:00 |
|
|
|
da05820b1d
|
Evaluated proc settuB args {. "I asked serious question. I will interpret any efforts of derailing it as a sign that _you_ are the man of the \"system\", thank you for understanding. Now, have you read [choose {Turner Diaries}] ?"}
|
2022-12-23 17:40:41 -08:00 |
|
