home *** CD-ROM | disk | FTP | other *** search
/ com!online 2001 December / COMCD1201.iso / tonline / software / data1.cab / Software / MAKRO / BEISPIEL / GOTO.MKR < prev    next >
Encoding:
Text File  |  2001-08-13  |  496 b   |  35 lines

  1. #   --------------------------------------
  2. #   - Beispielmakro fuer den Befehl goto -
  3. #   --------------------------------------
  4.  
  5. #   Protokollfensterausgaben ermoeglichen
  6. set PROTWIN = "on"
  7. debug "Makroname: ", argv_0, "\n"
  8.  
  9. goto Beginn
  10.  
  11. Lauf1:
  12. goto Mitte
  13.  
  14. Lauf2:
  15. goto Schluss
  16.  
  17.  
  18. #   Schluss
  19. Schluss:
  20. debug "Schlussteil\n"
  21. goto Ende
  22.  
  23. #   Mitte
  24. Mitte:
  25. debug "Mittelteil\n"
  26. goto Lauf2
  27.  
  28. #   Beginn
  29. Beginn:
  30. debug "Beginn\n"
  31. goto Lauf1
  32.  
  33.  
  34. Ende:
  35. debug "Makro beendet\n"