189 Commits

Author SHA1 Message Date
reggin on #flashsupport
456c763d24 Evaluated proc d2d2 {{w1 {[nick]}} {w2 {[name]}}} {ajoin "" [subst ${w1}] [ncock 14] "\n*~~~*\n\nBZZT!" [flip [ncock 14] [subst ${w2}]} 2023-03-26 16:10:58 -07:00
radical_honesty on #flashsupport
254ad2ddc5 Evaluated proc bgt args {text gaybowchar [join $args]} 2023-03-22 07:08:55 -07:00
radical_honesty on #flashsupport
abee6a2f8a Evaluated rename bgt bgt_fuckyouwinkie 2023-03-22 07:08:43 -07:00
pynchon on #flashsupport
a1659f2ef7 Evaluated proc goodmorning {} {. good morning [nicks]} 2023-03-13 01:57:48 -07:00
$tater on #flashsupport
f0aedebf98 Evaluated proc persian_rug {} {aflip [randart]} 2023-03-09 00:50:54 -08:00
radical_honesty on #flashsupport
3068b94a61 Evaluated proc goddoodle {} randart 2023-03-08 07:47:21 -08:00
lamotragine_dealer on #flashsupport
3c51fa285a Evaluated proc xmasbowchar 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 [xmas_colours]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g*"] "*\\1"]}; join $ret \n} 2023-02-16 06:29:37 -08:00
lamotragine_dealer on #flashsupport
c043e77e01 Evaluated proc xmasbowchar 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 [xmas_colours]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g,$g*"] "*\\1"]}; join $ret \n} 2023-02-16 06:29:14 -08:00
lamotragine_dealer on #flashsupport
db75ebb8ee Evaluated proc xmasbowchar 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 [xmas_colours]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g,$g*"] "*\\1"]}; join $ret \n} 2023-02-16 06:25:13 -08:00
lamotragine_dealer on #flashsupport
c13bdd454a Evaluated proc xmasbowchar 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 [xmas_colours]; lappend ret [regsub -all {\*($|\n| )} [regsub -all {(^|\n| )\*} $line "\\1$g*"] "*\\1"]}; join $ret \n} 2023-02-16 06:23:49 -08:00
tater on #flashsupport
e2dcf78a6c Evaluated proc screensaver {} {giga stampsay nigger} 2023-02-10 12:41:11 -08:00
tater on #flashsupport
636d8b52df Evaluated proc tater2 {} {return "[wget http://churchturing.org/w/randart/?w=88&h=666&a=&t=]"} 2023-02-09 13:34:41 -08:00
tater on #flashsupport
277c106d9c Evaluated proc tater2 {} {return "[wget http://churchturing.org/w/randart/?w=88&h=88&a=&t=]"} 2023-02-09 13:33:21 -08:00
radical_honesty on #flashsupport
5cb3e3ac21 Evaluated eval [wget https://dpaste.com/7VZMTHQSK.txt] 2023-01-13 16:03:20 -08:00
radical_honesty on #flashsupport
e4db2f690f Evaluated eval [wget https://dpaste.com/BFHL43A2T.txt] 2023-01-13 16:01:24 -08:00
radical_honesty on #flashsupport
63d2df2ea0 Evaluated eval [wget https://dpaste.com/9RSAV65EW.txt] 2023-01-13 15:59:47 -08:00
radical_honesty on #flashsupport
250a01b24c Evaluated eval [wget https://dpaste.com/HXY65MWT5.txt] 2023-01-13 15:59:03 -08:00
radical_honesty on #flashsupport
04d6625683 Evaluated eval [wget https://dpaste.com/6EM52ENEH.txt] 2023-01-13 15:55:40 -08:00
radical_honesty on #flashsupport
28db36d520 Evaluated eval [wget https://dpaste.com/8HLF79NYP.txt] 2023-01-13 15:50:10 -08:00
radical_honesty on #flashsupport
bd13f8bd2b Evaluated eval [wget https://dpaste.com/DN86PD2GE.txt] 2023-01-13 15:39:26 -08:00
radical_honesty on #flashsupport
4edae87313 Evaluated eval [wget https://dpaste.com/45NFJ9E7D.txt] 2023-01-13 15:37:53 -08:00
radical_honesty on #flashsupport
bf91966b98 Evaluated eval [wget https://dpaste.com/HS975PZ3C.txt] 2023-01-13 12:53:22 -08:00
radical_honesty on #flashsupport
510acda9e8 Evaluated eval [wget https://dpaste.com/CA93WW37P.txt] 2023-01-13 12:50:39 -08:00
radical_honesty on #flashsupport
bbd4982404 Evaluated eval [wget https://dpaste.com/42UT6A5K2.txt] 2023-01-13 12:27:09 -08:00
radical_honesty on #flashsupport
a47f3f88dd Evaluated eval [wget https://dpaste.com/C8U7QH44L.txt] 2023-01-13 12:23:25 -08:00
radical_honesty on #flashsupport
d65434ad64 Evaluated eval [wget https://dpaste.com/8ZSXLH4L9.txt] 2023-01-13 12:12:13 -08:00
radical_honesty on #flashsupport
0e8e0a4813 Evaluated eval [wget https://dpaste.com/EBF3RN263.txt] 2023-01-13 12:09:27 -08:00
radical_honesty on #flashsupport
d4b00068ac Evaluated eval [wget https://dpaste.com/GKWSV7XME.txt] 2023-01-13 12:08:16 -08:00
radical_honesty on #flashsupport
a168a48563 Evaluated eval [wget https://dpaste.com/CFH85HDYB.txt] 2023-01-13 12:00:55 -08:00
radical_honesty on #flashsupport
74bf0fd5e7 Evaluated eval [wget https://dpaste.com/DA9Z3FZYV.txt] 2023-01-13 11:59:46 -08:00
radical_honesty on #flashsupport
163cae0843 Evaluated eval [wget https://dpaste.com/BUDDSCQ3Y.txt] 2023-01-13 11:56:55 -08:00
radical_honesty on #flashsupport
c5b92d0a99 Evaluated rename csplit_fuckyou csplit 2023-01-13 11:50:57 -08:00
radical_honesty on #flashsupport
7803befb63 Evaluated rename csplit {} 2023-01-13 11:50:56 -08:00
radical_honesty on #flashsupport
0219d52731 Evaluated proc csplit s {split_on_formatting $s} 2023-01-13 11:48:26 -08:00
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
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
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
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
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
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
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