home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1999 April / CD_Shareware_Magazine_31.iso / WIN95 / INTERNET / ftpctrl3b8.exe / %MAINDIR% / Scripts / Example27.ftp < prev    next >
Encoding:
Text File  |  1999-02-07  |  851 b   |  31 lines
  1. ; *****************************************************
  2. ; Example27.ftp
  3. ; =============
  4. ; This example shows how to use the "Message" command
  5. ; so that it automatically disappears after a specified
  6. ; amount of time!
  7. ; -----------------------------------------------------
  8. ; This example shows the use of this commands:
  9. ;    MESSAGE 
  10. ;    if...then...else...endif
  11. ;    GOTO <Label>
  12. ; -----------------------------------------------------
  13. ; NOTE: This example works for you!
  14. ; *****************************************************
  15.  
  16. NumVariable i
  17. Let i=1
  18.  
  19. Message "This message Stops after 5 Seconds" "5"
  20. Message "This message does not stop at all... so click the OK button" 
  21.  
  22. :Again
  23. if %%i%%=1 then
  24.    Message "I is now %%i%%"
  25.    Let i=i + 1
  26.    goto Again
  27. else 
  28.    Message "This is the last message. I is now %%i%%"
  29. endif
  30.  
  31.