TITLE 'GREEN SCREEN OF DEATH'     
 ABEND    CSECT                             
          SAVE  (14,12)                     
          LR    R12,R15                     
          USING ABEND,R12                   
 LUCIFER  ABEND X'666',,,SYSTEM             
 *                                          
          DC    H'00'               LOL!!!  
 *                                          
          YREGS ,                           
          END