home *** CD-ROM | disk | FTP | other *** search
/ PC World 1997 November / PCWorld_1997-11_cd.bin / software / programy / FBL / TCPBATCH / DEMO / SCRIPTS / UKAZKA12.TCP < prev    next >
Encoding:
Text File  |  1997-07-13  |  758 b   |  33 lines
  1. // ukßzka Φ.12 - script simuluje server velmi pomalΘho spojenφ (klientem bude
  2. // ------------- libovoln² program, nejspφÜ "telnet <adresa> 4444")
  3.  
  4. // Pou₧ity p°φkazy: Accept, Disconnect, Send, Wait
  5.  
  6. Accept 4444
  7. // ╚ekß na p°ipojenφ na portu 4444 (port mimo b∞₧n² rozsah, pro jednorßzovΘ
  8. // vyu₧itφ)
  9.  
  10. Send "Prvnφ °ßdka spojenφ - Φekejte 3 sekundy." cr nl
  11. // Zaslßna ·vodnφ zprßva
  12.  
  13. Wait 3000
  14. // PoΦkß 3 sekundy
  15.  
  16. Send "Druhß °ßdka spojenφ - Φekejte 5 sekund." cr nl
  17. // Zaslßna dalÜφ zprßva
  18.  
  19. Wait 5000
  20. // PoΦkß 5 sekund
  21.  
  22. Send "T°etφ °ßdka spojenφ - Φekejte 0.5 sekundy." cr nl
  23. // Zaslßna dalÜφ zprßva
  24.  
  25. Wait 500
  26. // PoΦkß p∙l sekundy
  27.  
  28. Send "OdhlaÜuji se." cr nl
  29. // Zaslßna zprßva o ukonΦenφ spojenφ
  30.  
  31. Disconnect
  32. // UkonΦeno spojenφ.
  33.