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
|
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
|
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 |
|
radical_honesty on #flashsupport
|
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 |
|
radical_honesty on #flashsupport
|
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 |
|
radical_honesty on #flashsupport
|
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 |
|
General_Quadrangle on #flashsupport
|
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 |
|
General_Quadrangle on #flashsupport
|
b71c2b244a
|
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:30 -08:00 |
|
General_Quadrangle on #flashsupport
|
b3eaa5458a
|
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:39:39 -08:00 |
|
General_Quadrangle on #flashsupport
|
b5371acda2
|
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:39:25 -08:00 |
|
General_Quadrangle on #flashsupport
|
1d9fc2fb11
|
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:38:44 -08:00 |
|
General_Quadrangle on #flashsupport
|
a23b4be4a8
|
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:38:17 -08:00 |
|
General_Quadrangle on #flashsupport
|
5c00263489
|
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:38:06 -08:00 |
|
GML(gamme_markup_language) on #flashsupport
|
7d65589af1
|
Evaluated proc gay_real {} {next_in_list {04 08 09 11 10 13 06}}
|
2022-12-13 19:05:26 -08:00 |
|
GML(gamme_markup_language) on #flashsupport
|
fdbcdf3688
|
Evaluated proc gay {} {return "[next_in_list {04 08 09 11 10 13 06}]"}
|
2022-12-13 19:03:37 -08:00 |
|
GML(gamme_markup_language) on #flashsupport
|
df4376d4e5
|
Evaluated proc strip_all str {regsub -all {[\[\]]} [strip_color $str] ""}
|
2022-12-13 19:00:46 -08:00 |
|
TheGreatGammo on #flashsupport
|
ec0cb10aca
|
Evaluated proc isgitworkingatall args {}
|
2022-12-06 16:57:57 -08:00 |
|
hastur on #computerchat
|
26aecba13b
|
Evaluated proc char c {if [catch {regsub -all {\\*} [decode $::alphabet([string toupper $c])] " "} err] {return [join [string repeat "{ } " 5] \n]} {return $err}}
|
2020-10-23 15:07:35 +02:00 |
|
hastur on #computerchat
|
49d7825eb5
|
Evaluated proc char c {if [catch {regsub -all {\\*} [decode $::alphabet([string toupper $c])] " "} err] {return [join [string repeat "{ } " 5] \n]} {return $err}}
|
2020-10-23 14:59:11 +02:00 |
|
hastur on #computerchat
|
ec2b6f7167
|
Evaluated proc ricky_word {} {choose hellfire diarrhea smell fart poo piss sausage hamburger unicorn prolapse}
|
2020-10-20 21:16:06 +02:00 |
|