334 Commits

Author SHA1 Message Date
radical_honesty on #flashsupport
b7d6f3f567 Evaluated proc csplit s {split [strip_all $s] {}} 2023-01-13 11:47:28 -08:00
radical_honesty on #flashsupport
35080506cb Evaluated proc csplit s {split [strip_formatting $s] {}} 2023-01-13 11:47:15 -08:00
radical_honesty on #flashsupport
efbcdaa0cc Evaluated proc csplit s {split [strip_all $s] {}} 2023-01-13 11:46:52 -08:00
radical_honesty on #flashsupport
c43404514c Evaluated rename csplit csplit_fuckyou 2023-01-13 11:30:43 -08:00
radical_honesty on #flashsupport
3611d1ceeb Evaluated set niggermen Obama 2023-01-13 11:25:21 -08:00
radical_honesty on #flashsupport
5c7b005693 Evaluated set crw_dict trannies 2023-01-13 11:22:06 -08:00
ghost_of_Herneitha_Rochelle_Hardaway_Richardson on #flashsupport
b0748baaf4 Evaluated proc rand_onion {} {set randstr ""; for {set i 1} {$i<=56} {incr i} {append randstr [?? $::onion_chars]}; return "$randstr"} 2023-01-13 11:18:17 -08:00
ghost_of_Herneitha_Rochelle_Hardaway_Richardson on #flashsupport
971db11e8b Evaluated set ::onion_chars [list a b c d e f g h] 2023-01-13 11:16:52 -08:00
ghost_of_diamond on #flashsupport
1a238d2994 Evaluated unset ::programming_language 2023-01-10 05:44:43 -08:00
ghost_of_diamond on #flashsupport
94a814cc57 Evaluated set ::programming_language_dict $::programming_language 2023-01-10 05:44:18 -08:00
ghost_of_diamond on #flashsupport
f0b69fed27 Evaluated set ::programming_language {} 2023-01-10 05:42:42 -08:00
nigger_diffusion on #flashsupport
0c9893b914 Evaluated set ::w_topic [list "gay sex"] 2023-01-09 16:31:14 -08:00
nigger_diffusion on #flashsupport
8913e4f343 Evaluated set ::eastern_european_dict [list Transnistria Ukraine Belarus Moldova Serbia Croatia Bosnia Magyar] 2023-01-09 16:21:09 -08:00
radical_honesty on #flashsupport
322c3fc022 Evaluated eval [wget https://dpaste.com/42YDYQULE.txt] 2023-01-08 17:10:59 -08:00
radical_honesty on #flashsupport
fdf2dfff87 Evaluated set flip_pairs {\ / / \ ( ) ) ( Y Y \" \"} 2023-01-08 17:09:05 -08:00
radical_honesty on #flashsupport
7f8aedc682 Evaluated eval [wget https://dpaste.com/5FS85HBAX.txt] 2023-01-08 17:06:40 -08:00
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