Code poetry

B2004 · 08-12-2004, 01:48 PM

So does anyone know what code poetry is or got any opinons on "how technologists, creativity and abstract thought go together??"

got it as a topic to discuss so i said i throw it out there and get ppls views!!!

bcarl314 · 08-12-2004, 03:05 PM

PERL is famous for poems...

http://iis1.cps.unizar.es/Oreilly/perl/prog/ch08_06.htm

shmoove · 08-12-2004, 03:39 PM

I don't know if this qualifies, but it's interesting nonetheless:
Coding Famous Quotes

shmoove

liorean · 08-24-2004, 10:14 PM

Anyone here heard of a language called INTERCAL? That's poetry!

gsnedders · 08-24-2004, 11:28 PM

Quote:

Originally Posted by liorean

Anyone here heard of a language called INTERCAL? That's poetry!

Heard of it... but got no idea what it's like...

liorean · 08-24-2004, 11:57 PM

It's basically BASIC with inverted causality. Look at <http://www.catb.org/~esr/intercal/> and <http://www.muppetlabs.com/~breadbox/intercal-man/>

One have to love constructs such as COME FROM, ABSTAIN, FORGET, GIVE UP, DON'T, that you can specify a qualifier for how likely a statement is to actually be executed, the requirement from many compilers that you are polite (use PLEASE sufficiently often, but not TOO often)

Look at this sample stolen from the C-Intercal manual, for instance:

Code:

        DO (5) NEXT
    (5) DO FORGET #1
        PLEASE WRITE IN :1
        DO .1 <- '?":1~'#32768$#0'"$#1'~#3
        DO (1) NEXT
        DO :1 <- "'?":1~'#65535$#0'"$#65535'
                ~'#0$#65535'"$"'?":1~'#0$#65535'"
                $#65535'~'#0$#65535'"
        DO :2 <- #1
        PLEASE DO (4) NEXT
    (4) DO FORGET #1
        DO .1 <- "?':1~:2'$#1"~#3
        DO :1 <- "'?":1~'#65535$#0'"$":2~'#65535
                $#0'"'~'#0$#65535'"$"'?":1~'#0
                $#65535'"$":2~'#0$#65535'"'~'#0$#65535'"
        DO (1) NEXT
        DO :2 <- ":2~'#0$#65535'"
                $"'":2~'#65535$#0'"$#0'~'#32767$#1'"
        DO (4) NEXT
    (2) DO RESUME .1
    (1) PLEASE DO (2) NEXT
        PLEASE FORGET #1
        DO READ OUT :1
        PLEASE DO .1 <- '?"':1~:1'~#1"$#1'~#3
        DO (3) NEXT
        PLEASE DO (5) NEXT
    (3) DO (2) NEXT
        PLEASE GIVE UP

gsnedders · 08-24-2004, 11:59 PM

You just have to love that...

enumerator · 05-29-2005, 06:46 AM

Code:

function kiss(her){
	try{
		throw her();}
	catch(her){
		return her instanceof Error ? false : true;}}

a dysfunctional relationship...

shmoove · 05-29-2005, 11:27 AM

On the topic of code poetry, the famous quotes in VB riddle thread.

shmoove

dannyhayes · 05-29-2005, 11:34 AM

Loving that.

JamieR · 05-29-2005, 11:44 AM

.....or you could throw her into an infiniate loop

enumerator · 05-29-2005, 10:37 PM

Oh yeah...

Code:

	finally{
		kiss(her);}}

Beshops · 07-11-2009, 05:16 PM

Beautiful !

RabidMango · 07-22-2009, 02:09 PM

heart.pl...

Code:

open (hers,"<first");
bind myheartto,hers;
while (my $oul=<hers>){
  if ($oul eq true){
  close (hers); last;
  }
}

(i've never used bind before, i just know that whatever it does there doesn't throw up an error... although i know a lot of people who would throw up at my poetry)

08-12-2004, 01:48 PM	PM User \| #1
B2004 New to the CF scene Join Date: May 2004 Posts: 7 Thanks: 0 Thanked 0 Times in 0 Posts	Code poetry So does anyone know what code poetry is or got any opinons on "how technologists, creativity and abstract thought go together??" got it as a topic to discuss so i said i throw it out there and get ppls views!!!

08-12-2004, 03:05 PM	PM User \| #2
bcarl314 Mega-ultimate member Join Date: Jun 2002 Location: Winona, MN - The land of 10,000 lakes Posts: 1,632 Thanks: 1 Thanked 20 Times in 19 Posts	PERL is famous for poems... http://iis1.cps.unizar.es/Oreilly/perl/prog/ch08_06.htm __________________ Drop shippers directory -::- Create a free online birthday or Christmas wish list -::- Create accessible online surveys -::- accessible drop down menu -::- Golf Birthday Gifts, golf accessories, and more -::- Learn to flip web sites Zend Certified Engineer

08-24-2004, 10:14 PM	PM User \| #4
liorean The thread killer Join Date: Feb 2003 Location: Umeå, Sweden Posts: 5,575 Thanks: 0 Thanked 84 Times in 75 Posts	Anyone here heard of a language called INTERCAL? That's poetry! __________________ liorean <[lio@wg]> Articles: RegEx evolt wsabstract , Named Arguments Useful Threads: JavaScript Docs & Refs, FAQ - HTML & CSS Docs, FAQ - XML Doc & Refs Moz: JavaScript DOM Interfaces MSDN: JScript DHTML KDE: KJS KHTML Opera: Standards

08-24-2004, 11:57 PM	PM User \| #6
liorean The thread killer Join Date: Feb 2003 Location: Umeå, Sweden Posts: 5,575 Thanks: 0 Thanked 84 Times in 75 Posts	It's basically BASIC with inverted causality. Look at <http://www.catb.org/~esr/intercal/> and <http://www.muppetlabs.com/~breadbox/intercal-man/> One have to love constructs such as COME FROM, ABSTAIN, FORGET, GIVE UP, DON'T, that you can specify a qualifier for how likely a statement is to actually be executed, the requirement from many compilers that you are polite (use PLEASE sufficiently often, but not TOO often) Look at this sample stolen from the C-Intercal manual, for instance: Code: DO (5) NEXT (5) DO FORGET #1 PLEASE WRITE IN :1 DO .1 <- '?":1~'#32768$#0'"$#1'~#3 DO (1) NEXT DO :1 <- "'?":1~'#65535$#0'"$#65535' ~'#0$#65535'"$"'?":1~'#0$#65535'" $#65535'~'#0$#65535'" DO :2 <- #1 PLEASE DO (4) NEXT (4) DO FORGET #1 DO .1 <- "?':1~:2'$#1"~#3 DO :1 <- "'?":1~'#65535$#0'"$":2~'#65535 $#0'"'~'#0$#65535'"$"'?":1~'#0 $#65535'"$":2~'#0$#65535'"'~'#0$#65535'" DO (1) NEXT DO :2 <- ":2~'#0$#65535'" $"'":2~'#65535$#0'"$#0'~'#32767$#1'" DO (4) NEXT (2) DO RESUME .1 (1) PLEASE DO (2) NEXT PLEASE FORGET #1 DO READ OUT :1 PLEASE DO .1 <- '?"':1~:1'~#1"$#1'~#3 DO (3) NEXT PLEASE DO (5) NEXT (3) DO (2) NEXT PLEASE GIVE UP __________________ liorean <[lio@wg]> Articles: RegEx evolt wsabstract , Named Arguments Useful Threads: JavaScript Docs & Refs, FAQ - HTML & CSS Docs, FAQ - XML Doc & Refs Moz: JavaScript DOM Interfaces MSDN: JScript DHTML KDE: KJS KHTML Opera: Standards Last edited by liorean; 08-24-2004 at 11:59 PM..

08-24-2004, 11:59 PM	PM User \| #7
gsnedders Senior Coder Join Date: Jan 2004 Posts: 2,321 Thanks: 1 Thanked 4 Times in 4 Posts	You just have to love that... __________________ Geoffrey Sneddon

08-12-2004, 03:39 PM	PM User \| #3
shmoove Regular Coder Join Date: Dec 2003 Posts: 367 Thanks: 0 Thanked 0 Times in 0 Posts	I don't know if this qualifies, but it's interesting nonetheless: Coding Famous Quotes shmoove

05-29-2005, 06:46 AM	PM User \| #8
enumerator Regular Coder Join Date: May 2005 Posts: 313 Thanks: 0 Thanked 0 Times in 0 Posts	Code: function kiss(her){ try{ throw her();} catch(her){ return her instanceof Error ? false : true;}} a dysfunctional relationship... __________________ Thanks in advance! Last edited by enumerator; 05-29-2005 at 09:13 AM.. Reason: version 1.0

05-29-2005, 11:27 AM	PM User \| #9
shmoove Regular Coder Join Date: Dec 2003 Posts: 367 Thanks: 0 Thanked 0 Times in 0 Posts	On the topic of code poetry, the famous quotes in VB riddle thread. shmoove

05-29-2005, 11:34 AM	PM User \| #10
dannyhayes Regular Coder Join Date: Jan 2005 Location: Essex Posts: 146 Thanks: 0 Thanked 0 Times in 0 Posts	Loving that. __________________ Danny Hayes Under Construction www.hayes-design.co.uk

05-29-2005, 11:44 AM	PM User \| #11
JamieR Senior Coder Join Date: Oct 2004 Location: United Kingdom Posts: 3,162 Thanks: 0 Thanked 5 Times in 5 Posts	.....or you could throw her into an infiniate loop __________________ -Jamie www.jamierees.co.uk JamieBlog

05-29-2005, 10:37 PM	PM User \| #12
enumerator Regular Coder Join Date: May 2005 Posts: 313 Thanks: 0 Thanked 0 Times in 0 Posts	Oh yeah... Code: finally{ kiss(her);}} __________________ Thanks in advance! Last edited by enumerator; 05-30-2005 at 12:55 AM.. Reason: if(her.propertyIsEnumerable("input")) createPopup(ActiveXObject) else new Date;

07-11-2009, 05:16 PM	PM User \| #13
Beshops New to the CF scene Join Date: Jul 2009 Posts: 0 Thanks: 0 Thanked 0 Times in 0 Posts	Beautiful !

07-22-2009, 02:09 PM	PM User \| #14
RabidMango Banned Join Date: Jul 2009 Posts: 52 Thanks: 10 Thanked 4 Times in 4 Posts	heart.pl... Code: open (hers,"<first"); bind myheartto,hers; while (my $oul=<hers>){ if ($oul eq true){ close (hers); last; } } (i've never used bind before, i just know that whatever it does there doesn't throw up an error... although i know a lot of people who would throw up at my poetry)

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread: