home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Aktief 1995 #3 / CDA3.iso / comm / ts3m.zip / MNUHOST.BAT < prev    next >
DOS Batch File  |  1995-03-03  |  1KB  |  74 lines
  1. @echo off
  2. rem
  3. :start
  4. rem                         1          2               3             4        5        6      7
  5. mnu menu "t:Host matters"  "Run Host" "Wait for call" "Lock Wait" "Hangup" "Unload" "Help" "Exit" nc %1
  6. if errorlevel == 7 goto :end
  7. if errorlevel == 6 goto :help
  8. if errorlevel == 5 goto :unload
  9. if errorlevel == 4 goto :hangup
  10. if errorlevel == 3 goto :waitlocked
  11. if errorlevel == 2 goto :waitcall
  12. if errorlevel == 1 goto :runhost
  13. goto :end
  14.  
  15. :runhost
  16. cls
  17. tsh
  18. pause
  19. goto :start
  20.  
  21. :waitcall
  22. cls
  23. echo ATS0=1 going to COM 2 tells a modem on com port 1 to answer on the
  24. echo first ring.  Use ATS0=2 to answer on the second ring.
  25. echo ATS0=0 tells the modem to never answer the phone.
  26. echo ...
  27. echo ATS0=1 > COM1
  28. rem  Using MNU's noburn screen saver.  Use -Ppassword for password protection
  29. mnuhost -noburn
  30. rem or use delay as follows
  31. rem DELAY -w -s -t
  32. pause
  33. goto :start
  34.  
  35. :waitlocked
  36. cls
  37. echo using the sample password REGISTER
  38. pause
  39. mnuhost -pREGISTER
  40. rem pause
  41. goto :start
  42.  
  43. :hangup
  44. echo hanging up the phone on COM port 1
  45. rem hangup
  46. rem dtr COM1: off
  47. rem echo ath0 >COM1
  48. goto :start
  49.  
  50. :unload
  51. tsh u
  52. goto :start
  53.  
  54. :reset
  55. rs232off
  56. rem   a surprising number of pcs 'go wonky' on the second and successive
  57. rem   uses per day.
  58. rem   550reset  to reset 16550x chips
  59. 550reset
  60. goto :start
  61.  
  62. :porttest
  63. portest
  64. goto :start
  65.  
  66. :help
  67. mnu -readme *.txt
  68. goto :start
  69.  
  70. :end
  71. tsmenu.bat
  72.  
  73. rem   end
  74.