418 Commits

Author SHA1 Message Date
radical_honesty on #flashsupport
5c9e4f2660 Evaluated rename split_on_formatting split_on_formatting_FUCKYOU 2023-01-08 17:04:42 -08:00
radical_honesty on #flashsupport
52dca52311 Evaluated rename split_on_formatting_FUCKYOU split_on_formatting 2023-01-08 17:03:33 -08:00
radical_honesty on #flashsupport
2131e7500c Evaluated rename split_on_formatting split_on_formatting_FUCKYOU 2023-01-08 17:03:06 -08:00
radical_honesty on #flashsupport
870c1f218d Evaluated set ethnic_group_dict [list chink nigger wop spic jew englishman] 2023-01-08 16:48:52 -08:00
radical_honesty on #flashsupport
47c39db2cf Evaluated set faglame_dict [list incog] 2023-01-08 16:47:51 -08:00
radical_honesty on #flashsupport
0138f3c5f1 Evaluated set goon_dict [list mmm] 2023-01-08 16:47:33 -08:00
radical_honesty on #flashsupport
dd282e390d Evaluated set food_dict [list hamburger hotdog burrito empañadas crab pierogis pizza corndog] 2023-01-08 16:47:12 -08:00
radical_honesty on #flashsupport
504350c884 Evaluated set sex_acts [list fucking sucking licking] 2023-01-08 16:46:27 -08:00
radical_honesty on #flashsupport
cec5925ca1 Evaluated set gudrow_dict [list gudrow] 2023-01-08 16:45:17 -08:00
radical_honesty on #flashsupport
f452830b26 Evaluated set fetish_dict [list scat vore snuff rape inflation lolicon shotacon pissing voyeur hogtied forced violated crying gangraped {passed out} drunk drugged] 2023-01-08 16:45:01 -08:00
radical_honesty on #flashsupport
66827e74e1 Evaluated set celebrities [list "Ariana Grande" "Dua Lipa" "Ivanka Trump" "Jenna Ortega"] 2023-01-08 16:43:00 -08:00
radical_honesty on #flashsupport
5985eb5614 Evaluated set virusextensions [list exe lnk chm bat jpg pdf] 2023-01-08 16:40:35 -08:00
radical_honesty on #flashsupport
5638e326bc Evaluated proc random_word args {?? $::english_words} 2023-01-08 16:39:41 -08:00
radical_honesty on #flashsupport
68ec3f28e8 Evaluated proc random_word_alt args {set dict [?? $::dicts_singleword]; ?? [set ::[subst $dict]]} 2023-01-08 16:39:15 -08:00
radical_honesty on #flashsupport
dc4631735a Evaluated proc random_word args {set dict [?? $::english_word]; ?? [set ::[subst $dict]]} 2023-01-08 16:38:17 -08:00
radical_honesty on #flashsupport
d7d9e21509 Evaluated set unixprog_dict [list batcat unrar echo telnet rustc php] 2023-01-08 16:37:14 -08:00
radical_honesty on #flashsupport
950b84d78a Evaluated proc stock3 symbol {set __results [stock_yahoo_v10 $symbol]; set __columns [list previousClose open bid ask marketCap fiftyTwoWeekHigh fiftyTwoWeekLow];set __info "[list [list ticker $symbol]]"; map $__columns {c {catch {lappend __info "$c [dict get $__results $c]"}}};fuckingcolumns $__info} 2023-01-08 16:18:14 -08:00
radical_honesty on #flashsupport
1662da42d4 Evaluated set color_names [list white black blue green {light red} brown purple orange yellow {light green} cyan {light cyan} {light blue} ping grey {light grey}] 2023-01-07 19:12:33 -08:00
radical_honesty on #flashsupport
27b173bfa6 Evaluated unset color_names 2023-01-07 19:10:13 -08:00
radical_honesty on #flashsupport
fb58b25748 Evaluated array set color_names {red 4} 2023-01-07 19:10:02 -08:00
radical_honesty on #flashsupport
4f080ff70a Evaluated unset color_names 2023-01-07 19:09:39 -08:00
radical_honesty on #flashsupport
53b6a18d01 Evaluated proc color args {if ![llength $args] {return };if {[lindex $args 0] eq "default"} {return };set ret \x03[color_of [lindex $args 0]]; if {[llength $args] > 1} {if {[lindex $args 1] eq "on"} {append ret ,[color_of [lindex $args 2]]} {append ret ,[color_of [lindex $args 1]]}}; return $ret} 2023-01-07 19:08:19 -08:00
radical_honesty on #flashsupport
266f73302d Evaluated proc color args {if ![llength $args] {return };if {[lindex $args 0] eq "default"} {return };set ret \x[color_of [lindex $args 0]]; if {[llength $args] > 1} {if {[lindex $args 1] eq "on"} {append ret ,[color_of [lindex $args 2]]} {append ret ,[color_of [lindex $args 1]]}}; return $ret} 2023-01-07 19:08:01 -08:00
radical_honesty on #flashsupport
2d31debfa0 Evaluated proc color args {if ![llength $args] {return };if {[lindex $args 0] eq "default"} {return };set ret [color_of [lindex $args 0]]; if {[llength $args] > 1} {if {[lindex $args 1] eq "on"} {append ret \x03,[color_of [lindex $args 2]]} {append ret \x03,[color_of [lindex $args 1]]}}; return $ret} 2023-01-07 19:07:02 -08:00
radical_honesty on #flashsupport
933de77c3d Evaluated proc color args {if ![llength $args] {return };if {[lindex $args 0] eq "default"} {return };set ret [color_of [lindex $args 0]]; if {[llength $args] > 1} {if {[lindex $args 1] eq "on"} {append ret ,[color_of [lindex $args 2]]} {append ret \x03,[color_of [lindex $args 1]]}}; return $ret} 2023-01-07 19:06:34 -08:00
radical_honesty on #flashsupport
9d35cd48a6 Evaluated set color_names {{red 04}} 2023-01-07 18:57:40 -08:00
radical_honesty on #flashsupport
22bafc97f9 Evaluated set roulette_n_chambers 6 2023-01-07 18:54:31 -08:00
radical_honesty on #flashsupport
e3a78e7b19 Evaluated set roulette_current_chamber 0 2023-01-07 18:54:22 -08:00
radical_honesty on #flashsupport
fed02db826 Evaluated proc stock3 symbol {set __results [stock_yahoo_v10 $symbol]; set __columns [list previousClose open bid ask marketCap fiftyTwoWeekHigh fiftyTwoWeekLow];set __info "[list [list ticker $symbol]]"; map $__columns {c {lappend __info "$c [dict get $__results $c]"}};fuckingcolumns $__info} 2023-01-07 18:52:22 -08:00
radical_honesty on #flashsupport
d6451bc21b Evaluated proc stock3 symbol {set __results [stock_yahoo_v10 $symbol]; set __columns [list previousClose open bid ask];set __info "[list [list ticker $symbol]]"; map $__columns {c {lappend __info "$c [dict get $__results $c]"}};fuckingcolumns $__info} 2023-01-07 18:49:24 -08:00
radical_honesty on #flashsupport
c2ad291391 Evaluated set symbol "TSLA"; set __columns [list previousClose open bid ask];set __info "[list ticker $symbol]"; lappend __info [map $__columns {c {. "$c [dict get $::__TSLA $c]"}}];return $__info 2023-01-07 18:44:32 -08:00
radical_honesty on #flashsupport
df42a90211 Evaluated set __columns [list previousClose open bid ask];map $__columns {c {dict get $::__TSLA $c}} 2023-01-07 18:40:36 -08:00
radical_honesty on #flashsupport
b23769ec6d Evaluated proc et args {subst [string map {* {[gay]*}} [strip_all [bgbt $args]]]} 2023-01-07 18:24:27 -08:00
radical_honesty on #flashsupport
ec6474cb92 Evaluated proc gaybowchar c {set c [string toupper $c]; if ![info exists ::alphabet($c)] {return [join [string repeat "{ } " 5] \n]}; set ret [list]; foreach line [split [decode $::alphabet($c)] \n] {set g [gay]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g*"] "*\\1"]}; join $ret \n} 2023-01-07 18:23:31 -08:00
radical_honesty on #flashsupport
3b23ba283e Evaluated proc gaybowchar c {set c [string toupper $c]; if ![info exists ::alphabet($c)] {return [join [string repeat "{ } " 5] \n]}; set ret [list]; foreach line [split [decode $::alphabet($c)] \n] {set g [gay]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g,*"] "\\1"]}; join $ret \n} 2023-01-07 18:23:11 -08:00
a on #flashsupport
29e839b4d7 Evaluated rename strip_all_old strip_color 2023-01-07 18:21:55 -08:00
a on #flashsupport
c99dff299d Evaluated proc strip_all str {regsub -all {[\x0f\x02\x1f\]\[]} [strip_color $str] ""} 2023-01-07 18:21:25 -08:00
a on #flashsupport
07bcfed102 Evaluated rename strip_color strip_all_old 2023-01-07 18:20:59 -08:00
radical_honesty on #flashsupport
750b961ac6 Evaluated proc gaybowchar c {set c [string toupper $c]; if ![info exists ::alphabet($c)] {return [join [string repeat "{ } " 5] \n]}; set ret [list]; foreach line [split [decode $::alphabet($c)] \n] {set g [gay]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g,$g*"] "*\\1"]}; join $ret \n} 2023-01-07 18:20:19 -08:00
radical_honesty on #flashsupport
e476f330d0 Evaluated proc gaybowchar c {set c [string toupper $c]; if ![info exists ::alphabet($c)] {return [join [string repeat "{ } " 5] \n]}; set ret [list]; foreach line [split [decode $::alphabet($c)] \n] {set g [gay]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )*} $line "\\1$g,$g\*"] "*\\1"]}; join $ret \n} 2023-01-07 18:17:28 -08:00
radical_honesty on #flashsupport
2e289589a1 Evaluated proc gaybowchar c {set c [string toupper $c]; if ![info exists ::alphabet($c)] {return [join [string repeat "{ } " 5] \n]}; set ret [list]; foreach line [split [decode $::alphabet($c)] \n] {set g [gay]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )*} $line "\\1$g,$g*"] "*\\1"]}; join $ret \n} 2023-01-07 18:17:10 -08:00
radical_honesty on #flashsupport
00121ff96e Evaluated set pedo_dict {Greta Thumberg} 2023-01-07 18:06:46 -08:00
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
18d6107288 Evaluated set ::american_inventions {} 2023-01-06 09:17:11 -08:00
nigger_diffusion on #flashsupport
20084a3a2b Evaluated proc _lex_fridman_reading {{ll 10}} {each [zip [.. $ll] [lrange [zip [shuffle $::easy_book] [shuffle $::hard_book]] 0 $ll-1]] {{i _} {list [list "Week [format "%02d" $i]" "$_" "[expr "1 + [rand 5]"]hr@[format "%04d" [rand 2000]] WPM"]}}} 2023-01-06 08:08:18 -08:00
nigger_diffusion on #flashsupport
b99db0fdc9 Evaluated proc lex_fridman_reading args {fuckingcolumns [apply {_lex_fridman_reading} $args]} 2023-01-06 08:06:28 -08:00
nigger_diffusion on #flashsupport
6d0a0558fe Evaluated proc _lex_fridman_reading {{ll 10}} {each [zip [.. $ll] [lrange [zip [shuffle $::easy_book] [shuffle $::hard_book]] 0 $ll-1]] {{i _} {list [list "Week $i" "$_" "[expr "1 + [rand 5]"]hr@[format "%04d" [rand 2000]] WPM"]}}} 2023-01-06 08:05:03 -08:00
nigger_diffusion on #flashsupport
b3567201c5 Evaluated proc _lex_fridman_reading {{ll 10}} {each [zip [.. $ll] [lrange [zip [shuffle $::easy_book] [shuffle $::hard_book]] 0 $ll-1]] {{i _} {list [list "Week $i" "$_" "[expr "1 + [rand 5]"] hr @ [format "%04d" [rand 2000]] WPM" ]}}} 2023-01-06 08:04:12 -08:00