- Portals
- The Current Year
- ED in the News
- Admins
- Help ED Rebuild
- Archive
- ED Bookmarklet
- Donate Bitcoin
Contact an admin on Discord or EDF if you want an account. Also fuck bots.
COBOL: Difference between revisions
imported>JuniusThaddeus |
imported>Another n00b |
||
Line 5: | Line 5: | ||
= EXAMPLE CODE = | = EXAMPLE CODE = | ||
<pre> | <pre> | ||
AA-INTRODUCTION SECTION. | |||
AA-01. | |||
* A HORRIBLY VERBOSE PROGRAMMING LANGUAGE | |||
* THAT PROBABLY NEVER SHOULD HAVE BEEN | |||
* INVENTED. THERE ARE MILLIONS OF | |||
* LINES OF THIS GARBAGE STILL IN USE. | |||
* | |||
* THE ONLY GOOD THING ABOUT COBOL WAS THAT | |||
* IT STOPPED BAD PROGRAMMERS BEING REALLY | |||
* AWFUL PROGRAMMERS. | |||
* | |||
* HOWEVER, COBOL CAN BE FOUND AT THE MAINFRAME | |||
* OF YOUR FAVORITE BANK. THE 60'S STRIKE AGAIN. | |||
* | |||
* NOW, ADD 1 TO COBOL GIVING COBOL, PLEASE, . | |||
* DEAR COMPUTER, AND RETURN THE RESULT (S0C7) | |||
* AT MORNING. | |||
* | |||
* THERE IS NO CABAL. | |||
PERFORM IMMORAL-ACTS UNTIL POLICE ARRIVE. | |||
DIVIDE CAKE INTO MANY-PIECES YIELDING BIRTHDAY-PARTY. | |||
EVALUATE TRUE | |||
WHEN CAKE NOT = 1 OR 3 OR 5 OR 7 OR (MOON-PHASE NUMERIC) | |||
MOVE CORRESPONDING MANY-PIECES TO MANY-MOUTHS | |||
WHEN OTHER | |||
EXEC CICS LINK PROGRAM ('TOAST') | |||
COMMAREA (RUM-BOTTLE) | |||
LENGTH (ONE-GLASS) | |||
END-EXEC. | |||
* EAT THAT, MISERABLE MAINTENANCE PROGRAMMER!!! | |||
IF DRUNK-FLAG | |||
INSPECT STOMACH REPLACING ALL LOW-VALUES BY ZEROES | |||
IF STOMACH > ZERO | |||
NEXT SENTENCE | |||
ELSE | |||
GOTO A99. | |||
GOTO AA-Z23X. | |||
AA-Z23X. | |||
PERFORM AA-01 THRU AA-Z23X UNTIL WORLD-SPIN-SPEED > 5 | |||
GOBACK. | |||
AA-99. | |||
MOVE RANDOM TO RETURN CODE | |||
STOP RUN. | |||
*END OF PROGRAM (REST IN PIECE, PLEASE) | |||
END PROGRAM COBOL. | |||
</pre> | </pre> | ||
Line 32: | Line 65: | ||
= trolling COBOL coders = | = trolling COBOL coders = | ||
* (if their a wimminz) steal their [[ | * (if their a wimminz) steal their [[2girls1cup|depends]] | ||
* eat their prunes | * eat their prunes | ||
* steal all of the hard caramels | * steal all of the hard caramels | ||
Line 39: | Line 72: | ||
* walk all over their lawn | * walk all over their lawn | ||
* raid the dollar store | * raid the dollar store | ||
= See Also = | = See Also = |
Revision as of 18:54, 2 October 2011
COMMON BUSINESS ORIENTED LANGUAGE is the prune juice of the programming world. If you still know how to use colbol, you are a respected and valuable member of the programming community, as very few people are wizened enough to know how to program in COBOL. COBOL was invented by a woman, which is probably the main reason why it downright sucks giant cocks. We all know that wimminz never make anything worthwhile.
EXAMPLE CODE
AA-INTRODUCTION SECTION. AA-01. * A HORRIBLY VERBOSE PROGRAMMING LANGUAGE * THAT PROBABLY NEVER SHOULD HAVE BEEN * INVENTED. THERE ARE MILLIONS OF * LINES OF THIS GARBAGE STILL IN USE. * * THE ONLY GOOD THING ABOUT COBOL WAS THAT * IT STOPPED BAD PROGRAMMERS BEING REALLY * AWFUL PROGRAMMERS. * * HOWEVER, COBOL CAN BE FOUND AT THE MAINFRAME * OF YOUR FAVORITE BANK. THE 60'S STRIKE AGAIN. * * NOW, ADD 1 TO COBOL GIVING COBOL, PLEASE, . * DEAR COMPUTER, AND RETURN THE RESULT (S0C7) * AT MORNING. * * THERE IS NO CABAL. PERFORM IMMORAL-ACTS UNTIL POLICE ARRIVE. DIVIDE CAKE INTO MANY-PIECES YIELDING BIRTHDAY-PARTY. EVALUATE TRUE WHEN CAKE NOT = 1 OR 3 OR 5 OR 7 OR (MOON-PHASE NUMERIC) MOVE CORRESPONDING MANY-PIECES TO MANY-MOUTHS WHEN OTHER EXEC CICS LINK PROGRAM ('TOAST') COMMAREA (RUM-BOTTLE) LENGTH (ONE-GLASS) END-EXEC. * EAT THAT, MISERABLE MAINTENANCE PROGRAMMER!!! IF DRUNK-FLAG INSPECT STOMACH REPLACING ALL LOW-VALUES BY ZEROES IF STOMACH > ZERO NEXT SENTENCE ELSE GOTO A99. GOTO AA-Z23X. AA-Z23X. PERFORM AA-01 THRU AA-Z23X UNTIL WORLD-SPIN-SPEED > 5 GOBACK. AA-99. MOVE RANDOM TO RETURN CODE STOP RUN. *END OF PROGRAM (REST IN PIECE, PLEASE) END PROGRAM COBOL.
1. Divide envrionment
2. Comment a line of code
3. Write a shit-ton of code
4. Hello world
5. ????
6. PROFIT!!
In python, a similar program would only take about 5 lines, as opposed to over 9000, which is why COBOL sucks.
trolling COBOL coders
- (if their a wimminz) steal their depends
- eat their prunes
- steal all of the hard caramels
- destroy social security
- take a shit in the local bingo hall
- walk all over their lawn
- raid the dollar store
See Also
COBOL is part of a series on Visit the Softwarez Portal for complete coverage. |
COBOL is part of a series on Programming. [Enter the Matrix] | |
ADA • Assembly • C • C++ • COBOL • Debug • DOS • Erlang • Error • Fdisk • Fortran • Integer • Java • LOLCode • Machine Code • Matlab • MIRC Script • MUMPS • Open Source • Perl • PHP • Programming language • Python • QBASIC • Ruby on Rails • Scratch • SSH • Visual Basic
Firefox XPS IRC Attack • Safari XPS Attack • Sandworm
Bill Gates • Linus Torvalds • Weev • Goatse Security • Terry Davis • Theo de Raadt
Operating system • Warez • Notepad • Is not a bug, it's a feature • Database Error |