home *** CD-ROM | disk | FTP | other *** search
/ Online Praxis 1998 March / Image.iso / CD-ROM / ZUGANG / TONLINE / V20 / T-ONLINE.Z / QUIT.MKR < prev    next >
Encoding:
Text File  |  1997-06-06  |  452 b   |  20 lines

  1. #   --------------------------------------
  2. #   - Beispielmakro fuer den Befehl quit -
  3. #   --------------------------------------
  4.  
  5. #   Protokollfensterausgaben ermoeglichen
  6. set PROTWIN = "on"
  7. debug "Makroname: ", argv_0, "\n"
  8.  
  9. #   Sicherheitsabfrage
  10. messagebox Antwort: "Frage", "Soll der Decoder wirklich beendet werden ?", "YESNO"
  11.  
  12. if Antwort == "NO" goto Ende
  13.  
  14. #   Decoder beenden
  15. debug "Decoder wird beendet...\n"
  16. quit
  17.  
  18. Ende:
  19. end
  20.