Advertisement
Guest User

im the nigga.cobol :^)

a guest
Jan 17th, 2017
170
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
COBOL 0.56 KB | None | 0 0
  1. IDENTIFICATION DIVISION.
  2. PROGRAM-ID.     SHITTYSCRIPT.
  3. ENVIRONMENT DIVISION.
  4. CONFIGURATION SECTION.
  5. SOURCE-COMPUTER. RM-COBOL.
  6. OBJECT-COMPUTER. RM-COBOL.
  7.  
  8. DATA DIVISION.
  9. FILE SECTION.
  10.  
  11. PROCEDURE DIVISION.
  12.  
  13. MAIN-LOGIC SECTION.
  14. BEGIN.
  15.     DISPLAY NIGGA-1
  16.     DISPLAY FUNCTION UPPER-CASE(NIGGA-1)
  17.     DISPLAY FUNCTION LOWER-CASE(NIGGA-1)
  18.     MOVE FUNCTION UPPER-CASE(NIGGA-1) TO NIGGA-2
  19.     DISPLAY NIGGA-2
  20.  
  21.     DISPLAY " " LINE 1 POSITION 1 ERASE EOS.
  22.     DISPLAY "I'm the nigga. EEEEEEEEEEEEEEEEEE  " LINE 15 POSITION 10.
  23.     STOP RUN.
  24. MAIN-LOGIC-EXIT.
  25. EXIT.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement