Fase 4: Fortuna

''Lagoa, dita Stígia, deparamos,
Junto à encosta maligna produzida
Pelo tris***System Failure***

***System Failure***

***System Failure***

***Rebooting***

DEFINE DANTE PROGRAM
LD PHASE 4
PROGRAM
TRAP ON CLEANUP NOPRINT
PUSH month DECIMALS LSIZE PAGESIZE
LIMIT month TO LAST 1
   ...
POP APRIL DECIMALS LSIZE PAGESIZE
RETURN
CLEANUP:
POP APRIL DECIMALS LSIZE PAGESIZE
SIGNAL ERRORNAME ERRORTEXT

 
END

A-31      B-11     C-19     D-12     E-22     F-89     G-56     H-80     I-45     J-57     L-56     M-27    N-58      O-14     P-70     Q- 3     R-7      S-29     T-33     U-43     V-42     X-66     Z-15

***INICIATING MODULE***te ribeiro, que notamos.''

A avareza é o suplício dos ricos.