home *** CD-ROM | disk | FTP | other *** search
/ PC-Online 1997 March / PCOnline_03_1997.iso / filesbbs / os2 / zoc.arj / INSTALL.FIL / SCRIPT / CALLZOC next >
Text File  |  1994-10-05  |  386b  |  20 lines
  1. // This script tries to connect to the ZOC infobbs 
  2. // in Germany.
  3.  
  4. ask "What is your international dial prefix?" "011"
  5. compa "%lastline%" with "##CANCEL##"
  6. ifequ goto end
  7.  
  8. seta nr  "%lastline% 49 911 9933662"
  9. request "Agree to call %nr%?" "Yes" "No"
  10. compa "%lastline%" with "Yes"
  11. ifnequ goto end
  12.  
  13. timeout 90
  14. dial "%nr%"
  15. wait "Name"
  16. send "ZOC^M"
  17.  
  18. :end
  19. writeln "Done"
  20.