You ignore Big Balls advice and start poking into the code. COBOL forces all lines of the code to be maximum 128 characters so sometimes there are some very strange variable names just to fit on the line. These were extremely strange, and you weren’t entirely sure what they represented at all.
IDENTIFICATION DIVISION.
PROGRAM-ID. NEB-KHET.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 DJED-MAA PIC 9(5)V99 VALUE 0. *> Djed-Maa
01 NEFER-KA PIC 9(3)V99 VALUE 0. *> Nefer-Ka
01 REN-PERET PIC 9(5)V99 VALUE 0. *> Ren-Peret
01 HENNU PIC X(30) VALUE 'Hennu…'.
01 TCHAT-NETER PIC X(30) VALUE 'Tchat-Neter: '.
PROCEDURE DIVISION.
MAIN-PROCESS.
DISPLAY HENNU.
DISPLAY 'Djed-Maa: ' WITH NO ADVANCING.
ACCEPT DJED-MAA.
DISPLAY 'Nefer-Ka: ' WITH NO ADVANCING.
ACCEPT NEFER-KA.COMPUTE REN-PERET = DJED-MAA * NEFER-KA.
DISPLAY TCHAT-NETER REN-PERET.
DISPLAY 'Heh.'.
STOP RUN.Upon reading the code you get increasingly spooked out what do you do?
Move on, this is way too creepy and there’s no way there’s fraud in this code.
Read the code out loud. Maybe the variables will make sense if you do that.