READCHAR outputs the first character from the input stream. If no character is waiting to be read, READCHAR waits for input from the keyboard.
The procedure below can be used to pause between a series of procedures, such as a game, and wait for user input.
PR [PRESS Y IF YOU ARE READY TO CONTINUE]
IF READCHAR = "Y PLAYGAME