186 Commits

Author SHA1 Message Date
Alex_Fridman`s_High_School_Reading_List on #flashsupport
a3081faf17 Evaluated proc lex_fridman_reading {} {set garbage [list]; for {set i 0} {$i < 5} {incr i} {if [expr $i % 2] {lappend garbage [. Week $i: [lindex_random $::hard_book]]} {lappend ::garbage [. Week $i: [lindex_random $::easy_book]]}};. $garbage} 2023-01-04 10:24:31 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
542698e710 Evaluated unset ::garbage 2023-01-04 10:24:09 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
26049a9123 Evaluated lex 2023-01-04 10:23:32 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
2505fff158 Evaluated proc lex_fridman_reading {} {set ::garbage [list]; for {set i 0} {$i < 5} {incr i} {if [expr $i % 2] {lappend ::garbage [. Week $i: [lindex_random $::hard_book]]} {lappend ::garbage [. Week $i: [lindex_random $::easy_book]]}};. $::garbage} 2023-01-04 10:23:28 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
26b20f33b7 Evaluated unset ::garbage 2023-01-04 10:22:26 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
b2d9da4118 Evaluated set ::garbage {} 2023-01-04 10:19:08 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
c26894df09 Evaluated unset garbage 2023-01-04 10:14:57 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
b5c727978c Evaluated set garbage [list] 2023-01-04 10:13:55 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
ba93c99557 Evaluated unset garbage 2023-01-04 10:13:50 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
7df3c265bc Evaluated set garbage [list] 2023-01-04 10:11:49 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
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
Alex_Fridman`s_High_School_Reading_List on #flashsupport
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
Alex_Fridman`s_High_School_Reading_List on #flashsupport
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
radical_honesty on #flashsupport
8ba91531cd Evaluated proc happynewyear {{channel #gamme}} {string map "PLACEHOLDER [rainbow $channel]" $::happynewyear} 2022-12-31 09:24:52 -08:00
radical_honesty on #flashsupport
152298e891 Evaluated set happynewyear [wget https://dpaste.com/BRND36KP9.txt] 2022-12-31 09:19:59 -08:00
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
Boris Jerkson
9c697eec86 add english words 2022-12-27 15:01:59 -08:00
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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
radical_honesty on #flashsupport
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