MAIN DEFINE birth DATE DEFINE chkey CHAR(1) PROMPT "Please enter your birthday: " FOR birth DISPLAY "Your birthday is: " || birth PROMPT "Now press a key... " FOR CHAR chkey DISPLAY "You pressed: " || chkey END MAIN