wrath/shaniqua-smeggdrop
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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 [format "%c" [expr [scan $thecharacter %c] ^ [scan $thesecret %c]]]}; join $ret}

Browse Source
This commit is contained in:
hastur on #computerchat 2020-09-28 21:42:31 +02:00 committed by FUCK YOU
parent 8a9c686d31
commit a922dedb21
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
procs/1fccf5ef813a75a09b00b9e2e2bd2a72a162fa6d
View File

@ -1 +1 @@
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}
evil_code {set ret {}; set the_key [rot13 $evil_code]; set thecharacter {}; foreach thecharacter [split $evil_code {}] thesecret [split $the_key {}] {lappend ret [format "%c" [expr [scan $thecharacter %c] ^ [scan $thesecret %c]]]}; join $ret}