home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / protocol / resend.unix < prev    next >
Text File  |  2020-01-01  |  622b  |  41 lines
  1. ask \%u { username: }
  2. askq \%p { \%u's password: }
  3. set window 2
  4. set retry 3
  5. set line /dev/ttyh6
  6. set speed 9600
  7. set input time quit
  8. set input echo on
  9. set file type binary
  10. set count 5
  11. goto nomsg
  12. :LOOP
  13. echo Connection broken.
  14. echo Reestablishing connection, wait...
  15. :NOMSG
  16. hangup
  17. output \13
  18. input 8 login:
  19. output \%u\13
  20. input 8 Password:
  21. output \%p\13
  22. input 60 {$ }
  23. cd ~/new
  24. output cd temp\13
  25. input 8 {$ }
  26. out ww -r\13
  27. input 10 KERMIT READY
  28. pause 1
  29. resend msvibm.zip
  30. if success goto done
  31. if count goto loop
  32. echo Too many tries, giving up.
  33. stop 1
  34. :DONE
  35. echo File transferred successfully
  36. output exit\13
  37. pause 5
  38. hangup
  39. stop 0
  40.  
  41.