home *** CD-ROM | disk | FTP | other *** search
- # -----------------------------------------
- # - Beispielmakro fuer den Befehl settail -
- # -----------------------------------------
-
- # Protokollfensterausgaben ermoeglichen
- set PROTWIN = "on"
- debug "Makroname: ", argv_0, "\n"
-
- set Text = " Achim Egon Fritz Hugo Karin Thomas Martin "
- debug "Text: <", Text, ">\n"
-
- # Einzelne Namen aus Text holen und ausgeben
- Loop:
- sethead First = Text
- if First == "" goto Ende
- debug "<", First, ">\n"
- settail New = Text
- set Text = New
- goto Loop
-
- Ende:
- end
-