From 2e289589a156d67e39ed2eab931da3dde9f9c179 Mon Sep 17 00:00:00 2001 From: radical_honesty on #flashsupport Date: Sat, 7 Jan 2023 18:17:10 -0800 Subject: [PATCH] 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} --- procs/_index | 1 + procs/e81d45ec6e2f3c540f4b8df4e6177d3c6327d216 | 1 + 2 files changed, 2 insertions(+) create mode 100644 procs/e81d45ec6e2f3c540f4b8df4e6177d3c6327d216 diff --git a/procs/_index b/procs/_index index 77d3837..8e95e66 100644 --- a/procs/_index +++ b/procs/_index @@ -14,6 +14,7 @@ char 71fafc4e2fc1e47e234762a96b80512b6b5534c2 fart' f82f87b4bb1f1de348aea420ff40c4697f8cc41f gay 2871591e64f027a23fadafaa00305a8bd3484292 gay_real 7350d9495ac03aaeea097bcb716a52eacbda7ce0 +gaybowchar e81d45ec6e2f3c540f4b8df4e6177d3c6327d216 happynewyear 01bc7842cd7d641aa5c9b5328d0b36099c4c96ca isgitworkingatall 446e36f703ad4368f85a4fb396371f7e6ec4d86e lex_fridman_reading 7d1d02d6635d653a60b8681b144ef62e9dc3d21a diff --git a/procs/e81d45ec6e2f3c540f4b8df4e6177d3c6327d216 b/procs/e81d45ec6e2f3c540f4b8df4e6177d3c6327d216 new file mode 100644 index 0000000..a0addf3 --- /dev/null +++ b/procs/e81d45ec6e2f3c540f4b8df4e6177d3c6327d216 @@ -0,0 +1 @@ +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}