/* REXX */                                                                      
PARSE ARG your_name                                                             
PARSE UPPER SOURCE . zorg .                                                     
                                                                                
IF zorg = 'COMMAND'                                                             
THEN DO FOREVER                                                                 
        DO WHILE your_name = ''                                                 
           SAY 'Please enter your name or Exit:'                                
           PARSE PULL your_name                                                 
        END /* WHILE */                                                         
                                                                                
        PARSE UPPER VAR your_name your_name_c                                   
                                                                                
        SELECT                                                                  
        WHEN ABBREV('EXIT',your_name_c,1)                                       
        THEN LEAVE /* FOREVER */                                                
        OTHERWISE                                                               
             SAY 'Hello' your_name'!'                                           
        END /* SELECT */                                                        
                                                                                
        your_name = ''                                                          
     END /* FOREVER */                                                          
ELSE DO                                                                         
       IF your_name = ''                                                        
       THEN RETURN 'Hello nameless one!'                                        
       ELSE RETURN 'Hello' your_name'!'                                         
     END                                                                        
                                                                                
EXIT 0