home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / os2 / bubba.arj / BUBBADIR.ZIP / IBMMSG1.TPL < prev    next >
Encoding:
Text File  |  1992-03-08  |  328 b   |  26 lines
  1. onlinetest "on"
  2.  
  3. output @AREA
  4. if offline goto NOGO
  5.  
  6. set %prompt "execute"
  7. call PROMPT
  8. output @READIT
  9. if offline goto NOGO
  10.  
  11. set %prompt "Read"
  12. call PROMPT
  13. log session @TEMPLOG
  14.  
  15. @READMSGS
  16. close session
  17.  
  18. set %msg @HIGHMSG
  19. call MESSAGES
  20.  
  21. output "q\r"
  22. if offline goto NOGO
  23.  
  24. set %prompt "execute"
  25. call PROMPT
  26.