home *** CD-ROM | disk | FTP | other *** search
/ Inside Multimedia 1995 May / IMM0595.ISO / share / os2 / zoc / installd.fil / SCRIPT / CALLZOC next >
Encoding:
Text File  |  1994-10-04  |  386 b   |  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.