wrath/shaniqua-smeggdrop
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
226 Commits 1 Branch 0 Tags
Commit Graph

54 Commits

Author SHA1 Message Date
radical_honesty on #flashsupport
7b93451897 Evaluated proc strip_color str {regsub -all {\x03\d{1,2}(,\d{1,2})?} $str {}} 2023-01-07 18:03:45 -08:00
radical_honesty on #flashsupport
96d784017d Evaluated rename strip_color strip_color_broken 2023-01-07 18:03:30 -08:00
radical_honesty on #flashsupport
cdf3c4edee Evaluated proc strip_colour str {regsub -all {\d{1,2}(,\d{1,2})?} $str {}} 2023-01-07 18:00:20 -08:00
nigger_diffusion on #flashsupport
0b14cdbb62 Evaluated proc _lex_fridman_reading {{ll 10}} {each [zip [.. $ll] [lrange [zip [shuffle $::easy_book] [shuffle $::hard_book]] 0 $ll-1]] {{i _} {. {Week $i} {$_} {[expr "1 + [rand 5]"] hr @ [rand 2000] WPM"}}}} 2023-01-06 07:58:37 -08:00
nigger_diffusion on #flashsupport
48087cc6df Evaluated proc stock_yahoo_v10 {symbol} {dict get [lindex [dict get [dict get [json2dict [wget https://query2.finance.yahoo.com/v10/finance/quoteSummary/$symbol?formatted=false&modules=price%2CsummaryDetail%2CpageViews%2CfinancialsTemplate]] quoteSummary] result] 0] summaryDetail} 2023-01-06 07:41:01 -08:00
nigger_diffusion on #flashsupport
6d1978742b Evaluated rename 1lex_fridman_reading lex_fridman_reading 2023-01-05 13:29:32 -08:00
nigger_diffusion on #flashsupport
8420b7851f Evaluated rename lex_fridman_reading {} 2023-01-05 13:29:24 -08:00
nigger_diffusion on #flashsupport
98dae29744 Evaluated proc 1lex_fridman_reading {{ll 10}} {each [zip [.. $ll] [lrange [zip [shuffle $::easy_book] [shuffle $::hard_book]] 0 $ll-1]] {{i _} {. "Week $i: $_. Reading Time @ 500 WPM [expr "1 + [rand 120]"]"}}} 2023-01-05 13:26:05 -08:00
nigger_diffusion on #flashsupport
eaeb00091f Evaluated proc alex_fridman_reading args {apply {nextproc} $args} 2023-01-05 07:54:21 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
1ec0907473 Evaluated rename lfl lex_fridman_reading 2023-01-04 13:55:44 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
d78e308f63 Evaluated rename lex_fridman_reading {} 2023-01-04 13:55:40 -08:00
radical_honesty on #flashsupport
8c23cfd41f Evaluated proc lfl {{ll 10}} {each [zip [.. $ll] [lrange [zip [shuffle $::easy_book] [shuffle $::hard_book]] 0 $ll-1]] {{i _} {. "Week $i: $_"}}} 2023-01-04 13:45:02 -08:00
radical_honesty on #flashsupport
2fa81c94cf Evaluated proc n_r_r args n_r_r' 2023-01-04 11:10:31 -08:00
radical_honesty on #flashsupport
877b9097ef Evaluated rename n_r_r _n_r_r 2023-01-04 11:10:07 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
e70ccc9ddf Evaluated proc lex_fridman_reading args {string map -nocase -inline {"'" ""} [join [lex_fridman_reading $args] '\n']} 2023-01-04 11:03:02 -08:00
Alex_Fridman`s_High_School_Reading_List on #flashsupport
f78b2dc073 Evaluated rename lex_fridman_reading _lex_fridman_reading_inner 2023-01-04 11:02:15 -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
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
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
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
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
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
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
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
ec2b6f7167 Evaluated proc ricky_word {} {choose hellfire diarrhea smell fart poo piss sausage hamburger unicorn prolapse} 2020-10-20 21:16:06 +02:00
hastur on #computerchat
e2865dfb61 Evaluated rename ricky_word ricky_word_ 2020-10-20 21:14:46 +02:00
jbs on #computerchat
a578077bc2 Evaluated proc NumberOfGod {} {dict get [dict get [json2dict [ wget https://beacon.nist.gov/beacon/2.0/pulse/last ]] pulse ] localRandomValue } 2020-10-14 00:54:03 +02:00
hastur on #computerchat
c4b863e13c Evaluated rename niggerdeath_RIP RIP_niggerdeath 2020-10-12 16:53:51 +02:00
hastur on #computerchat
f03cfd9ef6 Evaluated rename niggerdeath niggerdeath_RIP 2020-10-12 16:52:40 +02:00
jbs on #computerchat
74dea89cb1 Evaluated proc {unknown:2:cmd/^(.+?)agenda$/} {match args} { agenda__ [last $match] [bif [second $args] [second $args] 5] } 2020-10-07 16:25:05 +02:00
jbs on #computerchat
462ec4b39e Evaluated rename {unknown:2:cmd/^(.+?)agenda$/} temp_off 2020-10-07 16:22:29 +02:00
jbs on #computerchat
728fc59ac2 Evaluated rename t+agenda +agenda 2020-10-07 16:21:51 +02:00
jbs on #computerchat
05706630ea Evaluated rename +agenda old+agenda 2020-10-07 16:21:49 +02:00
jbs on #computerchat
b955c7a57d Evaluated proc t+agenda {who args} { set w [string tolower $who]; if {[info exists ::agenda($w)] != 1} {set ::agenda($who) {}}; set ::agenda($who) [uniq [lappend ::agenda($who) [args]]]; . Added $args to $who} 2020-10-07 16:21:27 +02:00
hastur on #computerchat
c24be8321e Evaluated rename incogagenda:event _incogagenda:event_old 2020-10-07 16:10:13 +02:00
hastur on #computerchat
b8504fef08 Evaluated proc NASA_GRADE_ENCRYPTION' evil_code {set ret {}; set the_key [rot13 $evil_code]; set thecharacter {}; foreach thecharacter [split $evil_code {}] thesecret [split $the_key {}] {lappend ret [expr [scan "$thecharacter" %c] ^ [scan "$thesecret" %c]]}; return $ret} 2020-09-28 22:05:44 +02:00
hastur on #computerchat
d22c67a7c1 Evaluated proc NASA_GRADE_DECRYPTION {the_cipher the_key} {set ret {}; set thecharacter {}; foreach thecharacter [split $the_cipher {}] thesecret [split $the_key {}] {lappend ret [format "%c" [expr [scan $thecharacter %c] ^ [scan $thesecret %c]]]}; join $ret} 2020-09-28 21:45:48 +02:00
hastur on #computerchat
8a9c686d31 Evaluated proc NASA_GRADE_ENCRYPTION evil_code {set ret {}; set the_key [rot13 $evil_code]; set thecharacter {}; foreach thecharacter [split $evil_code {}] thesecret [split $the_key {}] {lappend ret [expr [scan $thecharacter %c] ^ [scan $thesecret %c]]}; join $ret} 2020-09-28 21:40:23 +02:00
hastur on #computerchat
eb45df0125 Evaluated proc test234535 {} {} 2020-09-28 20:51:09 +02:00
IRC-Simple on #computerchat
d9dce9c601 Evaluated proc fart' {{fart random.cgi}} { get_fart $fart} 2020-09-27 21:25:37 +02:00
Jon Doe
e9f5f14d0b try chanlist this way 2020-09-27 16:29:08 +02:00
STDIO haskeline on local
51fcccf35d Evaluated proc chanlist args {. {#nnnnnn}} 2020-09-25 21:30:24 +02:00
root on #test
4a70c00991 Evaluated proc testo4444 args {. "work you piece of shit"} 2020-09-14 23:06:23 +02:00