home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 April / PCWorld_2001-04_cd.bin / Software / Vyzkuste / autoit / AutoIt.exe / AutoIt.msi / Cabs.w1.cab / Gosub.aut < prev    next >
Text File  |  1999-09-14  |  571b  |  27 lines
  1. ; Example Script
  2. ; ==============
  3. ;
  4. ; OS:     Windows 9x/NT
  5. ; Author: Jonathan Bennett (jbennett@hidden.demon.co.uk)
  6. ;
  7. ; Script to show how the Gosub and Return commands work
  8. ;
  9.  
  10. MsgBox, 4, AutoIt Example, Script to demonstrate subroutines. Run?
  11. IfMsgBox, NO, Goto, denied
  12.  
  13. SetEnv, MyMessage, This is the first message!
  14. Gosub, mysubroutine
  15. SetEnv, MyMessage, This is the second message!
  16. Gosub, mysubroutine
  17. SetEnv, MyMessage, This is the third message!
  18. Gosub, mysubroutine
  19. Exit
  20.  
  21. mysubroutine:
  22. MsgBox, 0, Example, %MyMessage%
  23. Return
  24.  
  25. denied:
  26. Exit
  27.