If Shakespeare wrote C++

int value=100;
cout<<"What is in a name?(0-100): ";
cin>>value;

if (value==0)
cout<<“A rose by any other is still as sweet.”;

smell(rose, sweet).
smell(other_name, sweet).
as(arg1, arg2) :- smell(arg1, qual), smell(arg2, qual).

%% Trial Run
as(rose, X).
X=other_name;
No.


not_equal(hawk, handsaw).
know(wind, arg1, arg2) :- wind == north_by_northwest, +not_equal(arg1, arg2).
know(wind, arg3, arg4) :- wind == north_by_northwest, not_equal(arg3, arg4).
mad(wind) :- know(wind, hawk, handsaw).

%% Trail runs
mad(north_by_northwest).
Yes.
mad(southernly).
No.

friend = MarcAntony
<not> friend = Brute

e2 = Brute ?

I know the very basics of prolog, since my prof for AI went over it in one lecture. I certainly don’t know it very well though, and from I’ve seen I don’t think I want to. LISP is bad enough. :wink:

BTW, thanks for the contribution ITR champion!
You too Daemon.

Anyone want to try some codetry (code+poetry) on some other poets?

Ah, LISP, the only language I’m currently being paid to know a little of. If only the guys who created Autocad had chosen a different language…

OTOH, it can be fairly compact (compared with C) and any language that is THAT flexible with its typing is nuts enough to be interesting.

Anybody know of a good editor that can count the Stupid Parentheses for me?

if (romeo.loyalty(juliet) > romeo.loyalty(montague) {
. . romeo.denyFather();
. . romeo.refuseName();
} else {
. . romeo.swearLove(juliet);
. . juliet.denyFather();
. . juliet.refuseName();
}

“I know not whether to depart in silence,
Or bitterly to speak in your reproof.”
–Richard III, Act 3, Scene VII

[sub]But since I don’t know shit about C++, I think I’ll choose the former[/sub]

dim arose[a@-z@] = wouldsmellassweet

You mean like:

onward = 1.5 * league;

?


import eliot.ts.*; //java's screwed up package naming convention

public class TheHollowmen implements Poem {
  private Subject we;

  public TheHollowmen(){
    we = new Subject();
  }

  public void verseI(){
    we.setAttributes(we.HOLLOW | we.STUFFED);
    we.LeanTogether();
    we.getHeadpiece().fillWith("Straw");
    we.getVoices().setDried(true);
    we.getVoices().setQuiet(DryGrass.getWind().getQuietValue());
    //get a rat
    Rat rat = new Rat();
    //get the Meaninglessness value
    rat.getFeet().RunOver(Glass.BROKEN, we.Cellar);
    we.getVoices().setMeaningless(rat.getFeet().getMeaninglessValue());
    we.getVoices().whisper();

    Shape shape = new Shape(Shape.FORMLESS);
    Shade shade = new Shade(Shade.COLOURLESS);
    Force force = new Force(Force.PARALYSED);
    Gesture gesture = new Gesture(Gesture.MOTIONLESS);

    Subject those = new Subject();
    those.setEyes(Eyes.DIRECT);
    those.crossTo(DeathsOtherKingdom);
    Memory memory = those.remember(we);
    memory.lostSoul(false);
    memory.violentSoul(false);
    memory.isHollow();
    memory.isStuffed();
  }

  public static Void main(String[] args){
    Poem p = new TheHollowmen();
    p.verseI();
  }

}

Just x = 1…


switch(song)
{
  case NIGHTINGALE:
     romeo.stay();
     romeo.die();
     break;
  case LARK:
     romeo.be(gone);
     romeo.live();
     break;
}


long MarcAntony::speech()
{
  (Friends + Romans + Countrymen).lendEars();

  Caesar.bury();
#if 0
  Caesar.praise();
#endif

  // Copied from Men.cpp
  if (Caesar.evil)
    Caesar.evil = new Evil_t(*Caesar.evil);
  if (Caesar.good)
    Caesar.bones.inter(Caesar.good);

  Fault grievous = Noble(Brutus).CheckAmbition(Caesar);
  if (grievous)
    Caesar.Answer(grievous);

  if (Brutus.getLeave() && rest.getLeave()) {
    assert(Brutus.honorable && rest.honorable);
    assert(Caesar.isFriend() && Caesar.isFaithful() && Caesar.isTrue());

    while(Captive current = Caesar.popCaptive())
      Rome.coffers += current.Ransom();

    if (Rome.poor.cry())
      Caesar.weep();

    if(GetEvent() == LUPERCAL)
      // Should we unroll this loop for a speedup?  -- Will
      for(int i = 0; i < 3 && !Caesar.isKing(); i++)
        Caesar.Present(Kingly crown);
  }

  Crowd.Castigate();

  while(heart.location == Caesar.coffin)
    Pause();

  return heart;
}

Even though I don’t get any of it (well, except Basic) I just love that people can have fun doing weird crap like this here.

Thanks for this link, I ordered myself a WTF? babydoll tee. Way cool.

Here’s a short one:

“true”

Alright, I’ll expand it:

“(2B) || !(2B)”
ba-dum-ching

Here’s a Java one…

public boolean Question(boolean be )
{

if(be)
return true;
else return false;

}
yeah, slow day at work…

Bravo, Punoqllads!

I can only do a short one now:

Rose aRose;
Rose& otherName = aRose;
assert(aRose.smell() == otherName.smell());


boolean Hamlet (int Act = 2, int scene = 2) {
  struct being Man = work.WhatAPiece();
  cout << nobility(Man.reason);
  while (true) Man.faculty++;
  if(form && moving) cout << (Man.expressiveness & Man.admirability);
  Man.action = Angel.action;
  Man.apprehension = God.apprehension;
  World.beauty = Man;
  for (int i = 0; i < NUM_ANIMALS; ++i) Man > Animal*;
  Dust.quintessence()->me = what;
  return (Me.delight(Man) == false);
}

What a flashback. I had forgotten this one.

It’s sorta eerie when one of your threads rises from the dead like this.

Well, while I’m here, how about a little Richard III Java? At the end of 5.6:



public class MyBosom {
 Heart[] great = new Heart[1000];
}

++ourStandards;
setUpon(ourFoes);

Our.courage.getAncientWord("fair Saint George").inspireUs(fieryDragons.getSpleen());

setUpon(them);

Victory.sitsOn(Our.getHelms());

System.exit();


I’m going to go bleach my eyes now.