home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 January / CHIPCD1_98.iso / software / tipsy / zoc / install.fil / SCRIPT / RXSAMPLE / MANUAL / LOGIN.ZRX < prev    next >
Text File  |  1996-09-16  |  878b  |  32 lines
  1. /* REXX-Program: LOGIN.ZRX */
  2.  
  3. CALL ZocCls                 /* clear screen */
  4.  
  5. CALL ZocTimeout 60          /* max. time to wait for something */
  6.  
  7. CALL ZocWait "Press <ESC>"
  8. CALL ZocSend "^["           /* ^[ is the code for the ESC key */
  9.  
  10. CALL ZocWait "Name?"
  11. CALL ZocSend "Joe User^M"   /* don't forget ^M after the name */
  12.  
  13. CALL ZocWait "[Yes/No]"
  14. CALL ZocSend "Yes^M"
  15.  
  16. CALL ZocWait "Password?"
  17. CALL ZocSend "secret^M"
  18.  
  19. /* the next command means that ZOC should 
  20.    automatically send a ^M (Enter) every time 
  21.    the text "Press Enter to continue" arrives.
  22.    This way all the news screens are skipped,
  23.    no matter how many of them appear */
  24. CALL ZocReply "Enter", "^M"
  25.  
  26. /* Wait for the main menu */
  27. CALL ZocWait "Main Menu"
  28.  
  29. /* Cancel the previous REPLY command so ZOC won't 
  30.    kick in if we received that text later */
  31. CALL ZocReply "Enter"
  32.