Evaluated proc NASA_GRADE_DECRYPTION {the_cipher the_key} {set ret {}; set thecharacter {}; foreach thecharacter [split $the_cipher {}] thesecret [split $the_key {}] {lappend ret [format "%c" [expr [scan $thecharacter %c] ^ [scan $thesecret %c]]]}; join $ret}
This commit is contained in:
parent
a922dedb21
commit
d22c67a7c1
1
procs/7606229a99684f69dfa352a0e134b43af0cc78a6
Normal file
1
procs/7606229a99684f69dfa352a0e134b43af0cc78a6
Normal file
@ -0,0 +1 @@
|
|||||||
|
{the_cipher the_key} {set ret {}; set thecharacter {}; foreach thecharacter [split $the_cipher {}] thesecret [split $the_key {}] {lappend ret [format "%c" [expr [scan $thecharacter %c] ^ [scan $thesecret %c]]]}; join $ret}
|
@ -1,3 +1,4 @@
|
|||||||
|
NASA_GRADE_DECRYPTION 7606229a99684f69dfa352a0e134b43af0cc78a6
|
||||||
NASA_GRADE_ENCRYPTION 1fccf5ef813a75a09b00b9e2e2bd2a72a162fa6d
|
NASA_GRADE_ENCRYPTION 1fccf5ef813a75a09b00b9e2e2bd2a72a162fa6d
|
||||||
fart' f82f87b4bb1f1de348aea420ff40c4697f8cc41f
|
fart' f82f87b4bb1f1de348aea420ff40c4697f8cc41f
|
||||||
test234535 2d931b665420e63cb8ef8b9ce33f1e0ff66c109a
|
test234535 2d931b665420e63cb8ef8b9ce33f1e0ff66c109a
|
||||||
|
Loading…
x
Reference in New Issue
Block a user