jbs on #computerchat 05706630ea Evaluated rename +agenda old+agenda

2020-10-07 16:21:49 +02:00

..

_index

Evaluated rename +agenda old+agenda

2020-10-07 16:21:49 +02:00

1fccf5ef813a75a09b00b9e2e2bd2a72a162fa6d

Evaluated proc NASA_GRADE_ENCRYPTION {evil_code the_key} {set ret {}; set thecharacter {}; foreach thecharacter [split $evil_code {}] thesecret [split $the_key {}] {lappend ret [expr [scan "$thecharacter" %c] ^ [scan "$thesecret" %c]]}; return $ret}

2020-09-28 22:06:29 +02:00

2d931b665420e63cb8ef8b9ce33f1e0ff66c109a

Evaluated proc test234535 {} {. testo}

2020-09-28 20:51:17 +02:00

5a40678c150205d31ffbd01d683d1508fdb8bbd5

Evaluated proc testo4444 args {. "work you piece of shit"}

2020-09-14 23:06:23 +02:00

6620f95d7dde25913cb3b010cb101bf3db16f371

Evaluated rename incogagenda:event _incogagenda:event_old

2020-10-07 16:10:13 +02:00

7606229a99684f69dfa352a0e134b43af0cc78a6

Evaluated proc NASA_GRADE_DECRYPTION {the_cipher the_key} {set ret {}; set thecharacter {}; set thesecret {}; foreach thecharacter $the_cipher thesecret [split $the_key {}] {lappend ret [format "%c" [expr $thecharacter ^ [scan $thesecret %c]]]};join $ret ""}

2020-09-28 22:16:14 +02:00

b97b92d30ce8f6c872670f177fa384e61df3b004

Evaluated proc testo444 args {join $args}

2020-09-14 22:59:31 +02:00

d4e6465d2349a1dae8720f217433fc0e71c3bd0f

Evaluated proc t+agenda {who args} { set w [string tolower $who]; if {[info exists ::agenda($w)] != 1} {set ::agenda($who) {}}; set ::agenda($who) [uniq [lappend ::agenda($who) [args]]]; . Added $args to $who}

2020-10-07 16:21:27 +02:00

d8eb095fe42bb7e4a3daa9d4831b99407a9b9664

Evaluated rename +agenda old+agenda

2020-10-07 16:21:49 +02:00

f82f87b4bb1f1de348aea420ff40c4697f8cc41f

Evaluated proc fart' {{fart random.cgi}} { get_fart $fart}

2020-09-27 21:25:37 +02:00

facc3d7d8888cd922098694ce61fda1e33c879b8

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

2020-09-28 22:05:44 +02:00