home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / SEND < prev    next >
Text File  |  1991-08-26  |  520b  |  20 lines
  1. > watch(on)
  2. > cd ('..\')
  3. > logfile='send.log'
  4. > delete(logfile)
  5. > log(logfile)
  6. > protocol = 'Xmodem'
  7. > pcfilename = 'osfp.dll'
  8. > hostcmd = 'xrcv -osfp.xmd' + valtochr(13) + valtochr(10)
  9. > send(protocol,pcfilename,,hostcmd,on)
  10. > protocol = 'Kermit'
  11. > pcfilename = '*.dll'
  12. > hostfilename = '*.kmt'
  13. > hostcmd = 'delete ' + hostfilename + valtochr(13) + valtochr(10)
  14. > send(protocol,pcfilename,hostfilename,hostcmd,on)
  15. > message ('Press any to terminate script')
  16. > watch(off)
  17. > timeout = 0
  18. > wait()
  19. > end
  20.