Page 1 of 1

Cobol for Spot

Posted: Wed Feb 06, 2008 9:07 am
by Pheasy
TALK-DIRTY SECTION.

A100-FIND-OUT-WHAT-SPOT-LIKES.

IF SPOT = KINKY-LOVER

GO TO A200-DRESS-UP

ELSE

IF SPOT = FIVE-MINUTE-WONDER

GO TO A400-ABANDON-LOVER

ELSE

GO TO A300-GET-DOWN-TO-IT.

A200-DRESS-UP.

MOVE CAPTAIN-JACK-OUTFIT TO SPOT.

COMPUTE SPOT = SPOT + ALCOHOL.

A300-GET-DOWN-TO-IT.

COMPUTE BED = SPOT + PHEASY.

PERFORM WAY-HAY PROCESS.

A400-ABANDON-LOVER.

MOVE ZERO TO SPOT.

A999-EXIT.

EXIT.



:D I'm a little rusty :D

Cobol for Spot

Posted: Wed Feb 06, 2008 9:11 am
by YZGI
Is this in code? Um Spot, I think Pheasy has learned some Alpha Centauri code. Have fun kids..:cool:

Cobol for Spot

Posted: Wed Feb 06, 2008 9:13 am
by spot
That's so disgusting. I've spent years and years trying to forget that existed!

Some of us pretended to be modular. That syntax, though.

PERFORM B120-LOCATE-PYJAMAS THRU B240-CLEAN-TEETH.

and not a hint in the B-PROCESSES area where the call might start or terminate.



"Hey what happened to my indenting!"? You used indenting?? Space on that coding pad's at a premium, you can only go to column 72.

Cobol for Spot

Posted: Wed Feb 06, 2008 9:16 am
by Pheasy
:wah: hey I had to dig deep amongst the cobwebs in my brain for that - you could of at least assigned some files and carried out a test run :D

Cobol for Spot

Posted: Wed Feb 06, 2008 9:21 am
by Chezzie
pheasy I followed your instruction and the website that popped up would be banned in soho, thailand and all knocking shops...dirty bird!!!:wah:

Cobol for Spot

Posted: Wed Feb 06, 2008 9:37 am
by Pheasy
Chezzie;772112 wrote: pheasy I followed your instruction and the website that popped up would be banned in soho, thailand and all knocking shops...dirty bird!!!:wah:


:o Oh! if only I had known ..... my bad :D

Cobol for Spot

Posted: Wed Feb 06, 2008 9:39 am
by sunny104
:yh_hypno :-3