Recent public codes are listed below. You can filter them by the following programming languages:
- view
- All
- Ada
- Assembler
- Assembler
- AWK (gawk)
- AWK (mawk)
- Bash
- bc
- Brainf**k
- C
- C#
- C++
- C++0x
- C99 strict
- CLIPS
- Clojure
- COBOL
- COBOL 85
- Common Lisp (clisp)
- D (dmd)
- Erlang
- F#
- Factor
- Falcon
- Forth
- Fortran
- Go
- Groovy
- Haskell
- Icon
- Intercal
- Java
- Java7
- JavaScript (rhino)
- JavaScript (spidermonkey)
- Lua
- Nemerle
- Nice
- Nimrod
- Objective-C
- Ocaml
- Oz
- Pascal (fpc)
- Pascal (gpc)
- Perl
- Perl 6
- PHP
- Pike
- Prolog (gnu)
- Prolog (swi)
- Python
- Python 3
- R
- Ruby
- Scala
- Scheme (guile)
- Smalltalk
- SQL
- Tcl
- Text
- Unlambda
- VB.NET
- Whitespace
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "1 + \[puts \"123\"\]"
-
1 2 3 4 5 6 7
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "1 \[puts \"123\"\]"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "1 \[puts \"123\"\]#"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "1; \[puts \"123\"\]#"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5; "\[puts \"123\"\]#"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "\[puts \"123\"\]#"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "[puts 123]"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "\[puts 123\]"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 "\[puts \"123\"\]"
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply 1 2 3 4 5 6
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr 123 - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply {1 2 3 4 5 6}
-
1 2 3 4 5 6
proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr [unixtime] - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply (1 2 3 4 5 6)
-
1 2 3 4 5 6 7
bind ctcr - PING ctcr:pingreply proc ctcr:pingreply {nick uhost hand dest key arg} { set dur [expr [unixtime] - $arg] puts "NOTICE $nick :Your ping reply took $dur seconds" } ctcr:pingreply (1 2 3 4 5 6)
-
1
Buchhalter Nötzli sass gerade wieder vor seinem Schreibtisch der SBU am Hauptsitz in Zürich, als er die Nachricht im Radio hörte: Deutsche Steuerfahnder offerieren für gestohlene Bankdaten über 1 Mio Euro! Wie ein Blitz durchfuhr es sein Gehirn..…Er der jahrelang zu einem bescheidenen Lohn bei der Bank arbeitete, derweil seine Vorgesetzten 6-stellige Boni abklassierten, obwohl es der Bank schlecht ging und soeben einen Milliardenverluste eingefahren hat! Wie wär es denn wenn er ………………!? Er ging schnell zum abgesicherten Tresor, gab das geheime Passwort ein und entnahm die geheime Bankdaten - CD um eine Kopie anzufertigen. Er wusste genau was kommen würde, wenn dies entdeckt würde….Befragungen sämtlicher Mitarbeiter mit Hausdurchsuchung nach der kopierten Bankdaten - CD und Einschaltung der Bundespolizei! Aber wo die CD verstecken? Da kam ihm ein Gedanke, schliesslich war er in seiner Freizeit Geocacher!
-
1 2 3 4 5 6 7 8 9
#define print(x) int main(){printf("%s",x);}// +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>+.
-
1 2 3 4 5 6 7 8 9
#define print(x) int main(){printf("%s",x);}// +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>+. print("CI-3641 Rocks!");
...
-
1 2 3 4 5 6 7 8 9
#define print(x) int main(){printf("%s",x);}// +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>+. print("CI-3641 Rocks!");
...
-
1 2 3 4 5 6 7 8 9
# +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>>"Hello World!"+. print "CI-3641 Rocks!";
...
-
1 2 3 4 5 6 7 8 9
#define print(x) int main(){write("CI-3641 Rocks!");}// +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>+. print("CI-3641 Rocks!");
...
-
1 2 3 4 5 6 7 8 9
#define print(x) int main(){printf("%s",x);}// +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>+. print("CI-3641 Rocks!");
...
-
1
print %"racecar" || "racecar"% tnirp
-
1
print __ver__
-
1 2 3 4 5 6 7 8 9
set nowtime [clock seconds] set happened "Fri, 06 Apr 2012 14:33:00 -0400" set newtime [clock scan $happened] set checked [expr {($nowtime-$newtime)/60}] if {$checked>60} { puts "Last checked [expr {$checked/60}] hours ago" }else{ puts "Last checked $checked minutes ago" }
-
1 2 3 4 5 6 7 8 9
set nowtime [clock seconds] set happened "Fri, 06 Apr 2012 14:33:00 -0400" set newtime [clock scan $happened] set checked [expr {($nowtime-$newtime)/60}] if {$checked>60} { puts "Last checked [expr {($checked)/60}] hours ago" }else{ puts "Last checked $checked minutes ago" }
-
1 2 3 4 5 6 7 8 9
set nowtime [clock seconds] set happened "Fri, 06 Apr 2012 14:33:00 -0400" set newtime [clock scan $happened] set checked [expr {($nowtime-$newtime}/60}] if {$checked>60} { puts "Last checked [expr {($checked)/60}] hours ago" }else{ puts "Last checked $checked minutes ago" }
-
1 2 3 4
set nowtime [clock seconds] set happened "Fri, 06 Apr 2012 14:33:00 -0400" set newtime [clock scan $happened] puts "Last checked [expr {($nowtime-$newtime)/60}] seconds ago"
-
1 2 3 4
set nowtime [clock seconds] set happened "Fri, 06 Apr 2012 14:33:00 -0400" set newtime [clock scan $happened] puts "Last checked [expr {$nowtime-$newtime}] seconds ago"
-
1 2 3
puts "clock: [clock seconds]" set happened "Fri, 06 Apr 2012 14:33:00 -0400" puts "other: [clock scan $happened]"
-
1 2 3 4 5 6 7 8 9
#define print(x) int main(){printf("%s",x);}// +++++++++++[>+++++++>++++++++++>++++>+>+++<<<<<-]>---.++++++.>>+++++.++++++.+++.--.---.>>++.<<<<+++++++++.>+++++++++++.------------.++++++++.++++++++.>>>+. print "CI-3641 Rocks!";
...
-
1
print ("Hola")


