tack <[EMAIL PROTECTED]>:
:
:I think that once you read mona lisa overdrive, and grasp the mystery of
:the boxes, OOK is a hoot!  Don't know if I'd code in it, but if you dig
:the cyberspace and sprawl trilogies, it's beautiful on so many levels.
:
:It even sounds like the psychotic rantings of corto.  Well done.

It's supposed to sound like a monkey:

Ook. Ook? Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook! Ook? Ook?  Ook.  Ook.  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
Ook. Ook?  Ook! Ook! Ook? Ook! Ook? Ook. Ook! Ook. Ook. Ook?  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook!
Ook? Ook? Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook? Ook!
Ook! Ook? Ook! Ook? Ook. Ook. Ook. Ook!  Ook.  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook!
Ook. Ook! Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook! Ook. Ook! Ook? Ook!
Ook! Ook? Ook! Ook. Ook?  Ook.  Ook.  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook!
Ook? Ook? Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook? Ook!
Ook! Ook? Ook! Ook? Ook. Ook! Ook. Ook. Ook?  Ook.  Ook.  Ook.  Ook.
Ook.  Ook.  Ook.  Ook.  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook!
Ook? Ook?  Ook.  Ook.  Ook.  Ook.  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook?
Ook! Ook! Ook? Ook! Ook? Ook. Ook! Ook! Ook! Ook. Ook! Ook! Ook! Ook!
Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook!
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook! Ook. Ook! Ook! Ook! Ook! Ook!
Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook. Ook! Ook! Ook! Ook! Ook!
Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook! Ook. Ook!
Ook? Ook! Ook! Ook? Ook! Ook. Ook?  Ook.  Ook.  Ook.
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook!
Ook? Ook? Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook? Ook!
Ook! Ook? Ook! Ook? Ook. Ook. Ook. Ook! Ook. Ook! Ook? Ook! Ook! Ook?
Ook!  Ook.  Ook.  Ook.  Ook.  Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. 
Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook! Ook.

Which, under my interpreter[1], evaluates the following Perl code:

$mp++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;while($cell[$mp]){
$mp--;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$mp++;$cell[$mp]--;}$mp--;print
chr($cell[$mp]);$mp++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;while($cell[$mp]){$mp--;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$mp++;$cell[$mp]--;}$mp--;
$cell[$mp]++;print chr($cell[$mp]);$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;print chr($cell[$mp]);
print chr($cell[$mp]);$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;print
chr($cell[$mp]);while($cell[$mp]){$cell[$mp]--;}$mp++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;while($cell[$mp]){$mp--;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$mp++;$cell[$mp]--;}$mp--;print
chr($cell[$mp]);$mp++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;while($cell[$mp]){$mp--;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$mp++;$cell[$mp]--;}$mp--;$cell[$mp]--;print
chr($cell[$mp]);$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;
$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;print chr($cell[$mp]);
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;print chr($cell[$mp]);
$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;
$cell[$mp]--;print chr($cell[$mp]);$cell[$mp]--;$cell[$mp]--;
$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;$cell[$mp]--;
$cell[$mp]--;print chr($cell[$mp]);while($cell[$mp]){$cell[$mp]--;}
$mp++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;while($cell[$mp]){$mp--;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$mp++;$cell[$mp]--;}
$mp--;$cell[$mp]++;print chr($cell[$mp]);while($cell[$mp]){$cell[$mp]--;}
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;
$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;$cell[$mp]++;print
chr($cell[$mp]);

Both of which are derived from the original, more concise, BrainFuck code:

>+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]>++++++++
[<++++>-]<.>+++++++++++[<++++++++>-]<-.--------.+++.------.--------.[-]
>++++++++[<++++>-]<+.[-]++++++++++.

But yeah.  Crazy.

:> OK, I'm not even gonna BOTHER with that ook crap.  Jeez-zuz.  You hafta
:> write a fucking novel to say "Hello, world"?

You can boil it down to the periods, question marks, and exclamation
points, but the (meaningless) text helps to hide the fact that what
appears to be a whole lot of gibberish is actually executable code.
Mostly academic and dabblish right now, but who knows - it might come
in handy to have a "novel in progress" sitting on your hard drive that
contains a strong crypto engine when the pigs start knocking down doors.

:> But the ebonics code intrigues me.  I think I know what the statement
:> "putou x bitch" does in the language, but I cannot grasp it's etymology,
:> so to speak.  Everything else I think I got both the function of and the
:> etymology.  Am I just bein' stooopid?  Is it blindingly obvious?  Anyone?

The best I can come up with is a ebonification of the phrase "put out",
but that sounds pretty weak to me, so your guess is as good as mine...


DVS


[1] http://www.majcher.com/ook/ook.pl.txt

Reply via email to