home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / 1.SCR < prev    next >
Text File  |  1991-12-06  |  551b  |  19 lines
  1. > logdir = 'c:\log\'
  2. > logfile = 'send.log'
  3. > mkdir(logdir)
  4. > log(logdir + logfile)
  5. > windowpos(0,0)
  6. > windowsize(24,80)
  7. > windowprms(OFF,200,201)
  8. > watch(ON,ON,3)
  9. > windowshow()
  10. > pcfn = 'c:\3m\exe\en\os2\ok*.dll'
  11. > send('Kermit Server',pcfn,'ok*.km1','del ok*.km1[CR]',ON,OFF)
  12. > send('Kermit Server',pcfn,'ok*.km2','del ok*.km2[CR]',ON,OFF)
  13. > send('Kermit Server',pcfn,'ok*.km3','del ok*.km3[CR]',OFF,ON)
  14. > send('Kermit Server',pcfn,'ok*.km4','del ok*.km4[CR]',ON,ON)
  15. > message('Press any key to terminate script')
  16. > wait()
  17. > end
  18.  
  19.