From schneiderm at uni-trier.de Thu Feb 2 15:14:39 2017 From: schneiderm at uni-trier.de (Schneider, Matthias) Date: Thu, 2 Feb 2017 14:14:39 +0000 Subject: [Tustep-Liste] =?iso-8859-1?q?Einf=FCgen_in_die/aus_der_Zwischena?= =?iso-8859-1?q?blage?= Message-ID: Liebe TUSTEP-Liste, relativ häufig kopiere ich Code-/Textbestandteile mithilfe der Anweisung EZ zwischen TUSTEP-Dateien bzw. zwischen einer TUSTEP-Datei und anderen Quellen/Zielen hin und her. Nicht ganz selten würde ich mir eine Funktion wünschen, mit der man sich die letzten EZ-Anweisungen anzeigen lassen kann (äquivalent zu GZ, GGZ bzw. GA, GGA, GT,GGT...). Natürlich lässt sich mit GG/F9/F10 arbeiten, aber wenn recht viel im Editor erledigt werden muss, stößt man hiermit an die Grenzen. Wenn ich den entsprechenden Abschnitt im Handbuch ("Ausgeben und Wiederholen von Anweisungen") richtig lese, können EZ-Anweisungen nicht über die Anweisung gx[1] abgefragt werden, weil es sich um einfache und nicht um organisatorische oder erweiterte Anweisungen handelt. Vielleicht hat dennoch jemand einen Lösungsvorschlag für das Thema? Viele Grüße Matthias Schneider [1] "gx Ausgeben der letzten organisatorischen oder erweiterten Anweisung, die mit dem Buchstaben x beginnt. Für x ist der entsprechende Anfangs- buchstabe einzusetzen." (Handbuch Version 2017, S. 302) ==================================================== |           Matthias Schneider, M.A. |__Kompetenzzentrum für elektronische Erschließungs- |     und Publikationsverfahren in den |     Geisteswissenschaften |__Trier Center for Digital Humanities |__Universität Trier |__DM 341 |__Mail: schneiderm at uni-trier.de |__Homepage: |     http://www.kompetenzzentrum.uni-trier.de |     http://www.m-schneider.eu |__twitter: @ms91tru, @museumdighum |__Telephon: |     + 49 651 201 2935 ==================================================== From schaelkle at zdv.uni-tuebingen.de Fri Feb 3 06:51:33 2017 From: schaelkle at zdv.uni-tuebingen.de (=?utf-8?Q?Kuno_Sch=C3=A4lkle?=) Date: Fri, 3 Feb 2017 06:51:33 +0100 Subject: [Tustep-Liste] =?utf-8?q?Einf=C3=BCgen_in_die/aus_der_Zwischenabl?= =?utf-8?q?age?= In-Reply-To: References: Message-ID: <5F21C9B6-D8C5-45A0-97A1-B044A391F051@zdv.uni-tuebingen.de> Lieber Herr Schneider, Sie könnten die EZ-Anweisungen, die gemerkt werden sollen, vor dem abschicken markieren und ALT+X drücken. Wenn Sie später ALT+X drücken (ohne dass etwas markiert ist), werden die gemerkten Anweisungen angezeigt. Aus Ihnen können Sie dann eine auswählen. Mit ALT+X können natürliche nicht nur Anweisungen gemerkt werden, sondern beliebige Textteile. ALT+X hat folgende Wirkung: Falls Text markiert ist, wird der markierte Text in die Liste der gemerkten Textteile aufgenommen; ist kein Text markiert, so wird der Anfang aller gemerkten Textteile angezeigt. Soll einer dieser Textteile an der aktuellen Cursor-Position eingefügt werden, so muss dieser mit Pfeil nach unten/oben ausgewählt und die Auswahl mit der Return-Taste bestätigt werden, oder es muss die entsprechende Zeile mit der linken Maustaste angeklicktwerden. Die Anzeige kann durch Drücken der Leertaste oder Escape- Taste wieder gelöscht werden. Um die Liste zu reduzieren, kann mit der Delete-Taste der jeweils markierte Textteil aus der Liste entfernt werden. Mit freundlichen Grüßen Kuno Schälkle ————————————— > > Liebe TUSTEP-Liste, > > relativ häufig kopiere ich Code-/Textbestandteile mithilfe der Anweisung EZ zwischen TUSTEP-Dateien bzw. zwischen einer TUSTEP-Datei und anderen Quellen/Zielen hin und her. > Nicht ganz selten würde ich mir eine Funktion wünschen, mit der man sich die letzten EZ-Anweisungen anzeigen lassen kann (äquivalent zu GZ, GGZ bzw. GA, GGA, GT,GGT...). Natürlich lässt sich mit GG/F9/F10 arbeiten, aber wenn recht viel im Editor erledigt werden muss, stößt man hiermit an die Grenzen. > Wenn ich den entsprechenden Abschnitt im Handbuch ("Ausgeben und Wiederholen von Anweisungen") richtig lese, können EZ-Anweisungen nicht über die Anweisung gx[1] abgefragt werden, weil es sich um einfache und nicht um organisatorische oder erweiterte Anweisungen handelt. > Vielleicht hat dennoch jemand einen Lösungsvorschlag für das Thema? > > Viele Grüße > Matthias Schneider From schneiderm at uni-trier.de Sat Feb 4 20:35:35 2017 From: schneiderm at uni-trier.de (Schneider, Matthias) Date: Sat, 4 Feb 2017 19:35:35 +0000 Subject: [Tustep-Liste] =?utf-8?q?Einf=C3=BCgen_in_die/aus_der_Zwischenabl?= =?utf-8?q?age?= In-Reply-To: <5F21C9B6-D8C5-45A0-97A1-B044A391F051@zdv.uni-tuebingen.de> References: <5F21C9B6-D8C5-45A0-97A1-B044A391F051@zdv.uni-tuebingen.de> Message-ID: Lieber Herr Schälkle, haben Sie vielen Dank für Ihre Antwort. Die Funktionalität von ALT+X kann man natürlich für den skizzierten Anwendungsfall ebenso wie für viele weitere mehr gewinnbringend einsetzen... Herzliche Grüße & ein schönes Wochenende Matthias Schneider -----Ursprüngliche Nachricht----- Von: tustep-liste-bounces at lists.uni-wuerzburg.de [mailto:tustep-liste-bounces at lists.uni-wuerzburg.de] Im Auftrag von Kuno Schälkle Gesendet: Freitag, 3. Februar 2017 06:52 An: tustep-liste at itug.de Betreff: Re: [Tustep-Liste] Einfügen in die/aus der Zwischenablage Diskussionsforum Tustep-Liste Weitere Informationen: www.itug.de ------------------------------------------------------------ Lieber Herr Schneider, Sie könnten die EZ-Anweisungen, die gemerkt werden sollen, vor dem abschicken markieren und ALT+X drücken. Wenn Sie später ALT+X drücken (ohne dass etwas markiert ist), werden die gemerkten Anweisungen angezeigt. Aus Ihnen können Sie dann eine auswählen. Mit ALT+X können natürliche nicht nur Anweisungen gemerkt werden, sondern beliebige Textteile. ALT+X hat folgende Wirkung: Falls Text markiert ist, wird der markierte Text in die Liste der gemerkten Textteile aufgenommen; ist kein Text markiert, so wird der Anfang aller gemerkten Textteile angezeigt. Soll einer dieser Textteile an der aktuellen Cursor-Position eingefügt werden, so muss dieser mit Pfeil nach unten/oben ausgewählt und die Auswahl mit der Return-Taste bestätigt werden, oder es muss die entsprechende Zeile mit der linken Maustaste angeklicktwerden. Die Anzeige kann durch Drücken der Leertaste oder Escape- Taste wieder gelöscht werden. Um die Liste zu reduzieren, kann mit der Delete-Taste der jeweils markierte Textteil aus der Liste entfernt werden. Mit freundlichen Grüßen Kuno Schälkle ————————————— > > Liebe TUSTEP-Liste, > > relativ häufig kopiere ich Code-/Textbestandteile mithilfe der Anweisung EZ zwischen TUSTEP-Dateien bzw. zwischen einer TUSTEP-Datei und anderen Quellen/Zielen hin und her. > Nicht ganz selten würde ich mir eine Funktion wünschen, mit der man sich die letzten EZ-Anweisungen anzeigen lassen kann (äquivalent zu GZ, GGZ bzw. GA, GGA, GT,GGT...). Natürlich lässt sich mit GG/F9/F10 arbeiten, aber wenn recht viel im Editor erledigt werden muss, stößt man hiermit an die Grenzen. > Wenn ich den entsprechenden Abschnitt im Handbuch ("Ausgeben und Wiederholen von Anweisungen") richtig lese, können EZ-Anweisungen nicht über die Anweisung gx[1] abgefragt werden, weil es sich um einfache und nicht um organisatorische oder erweiterte Anweisungen handelt. > Vielleicht hat dennoch jemand einen Lösungsvorschlag für das Thema? > > Viele Grüße > Matthias Schneider ------------------------------------------------------------ Tustep-Liste at itug.de https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste From eva.rothenberger at uni-due.de Thu Feb 16 13:20:57 2017 From: eva.rothenberger at uni-due.de (Eva Rothenberger) Date: Thu, 16 Feb 2017 13:20:57 +0100 Subject: [Tustep-Liste] Technische Probleme mit Tustep auf Mac Message-ID: <9f7870d16aac0634f91f31ccde73878f@webmailer.uni-duisburg-essen.de> Sehr geehrte Damen und Herren, ich arbeite im DFG-Projekt "Edition der in Regenbogens Langem Ton überlieferten Lieder" und werde in diesem Zuge mit Tustep arbeiten - allerdings mit einem Mac. Leider sieht der Editor - im Vergleich zur Microsoft-Oberfläche - seltsam aus, auch die Message-/Anweisungszeile fehlt in der geöffneten Datei (ich habe zwei Screenshots zur Veranschaulichung angehängt). Ich weiß nicht, was hier möglicherweise bereits bei der Installation schiefgelaufen ist und hoffe sehr, dass mir jemand weiterhelfen kann. Mit freundlichen Grüßen Eva Rothenberger -------------- nächster Teil -------------- Ein Dateianhang mit Binärdaten wurde abgetrennt... Dateiname : Bildschirmfoto_Tustep_Mac.jpg Dateityp : image/jpeg Dateigröße : 300131 bytes Beschreibung: nicht verfügbar URL : -------------- nächster Teil -------------- Ein Dateianhang mit Binärdaten wurde abgetrennt... Dateiname : Bildschirmfoto2.jpg Dateityp : image/jpeg Dateigröße : 322548 bytes Beschreibung: nicht verfügbar URL : From schaelkle at zdv.uni-tuebingen.de Thu Feb 16 18:42:36 2017 From: schaelkle at zdv.uni-tuebingen.de (=?utf-8?Q?Kuno_Sch=C3=A4lkle?=) Date: Thu, 16 Feb 2017 18:42:36 +0100 Subject: [Tustep-Liste] Technische Probleme mit Tustep auf Mac In-Reply-To: <9f7870d16aac0634f91f31ccde73878f@webmailer.uni-duisburg-essen.de> References: <9f7870d16aac0634f91f31ccde73878f@webmailer.uni-duisburg-essen.de> Message-ID: <34C95F6A-3044-4552-82BF-A456BD17291A@zdv.uni-tuebingen.de> Sehr geehrte Frau Rothenberger, > Leider sieht der Editor - im Vergleich zur Microsoft-Oberfläche - seltsam aus, auch die Message-/Anweisungszeile fehlt in der geöffneten Datei (ich habe zwei Screenshots zur Veranschaulichung angehängt). Ich weiß nicht, was hier möglicherweise bereits bei der Installation schiefgelaufen ist und hoffe sehr, dass mir jemand weiterhelfen kann. vermutlich steht in Ihrer INI-Datei (tustep.ini) u.a. #definiere, zeilen=…, code=cp850 Dabei sind offensichtlich mehr Zeilen angegeben, als auf dem Bildschirm Platz haben. Sie müssen die Zeilenzahl verringern. Außerdem müssen Sie als Code ISO8859 angeben. Mit freundlichen Grüßen Kuno Schälkle From ChristianGriesinger at gmx.de Thu Feb 16 21:08:05 2017 From: ChristianGriesinger at gmx.de (Christian Griesinger) Date: Thu, 16 Feb 2017 21:08:05 +0100 Subject: [Tustep-Liste] Technische Probleme mit Tustep auf Mac In-Reply-To: <9f7870d16aac0634f91f31ccde73878f@webmailer.uni-duisburg-essen.de> References: <9f7870d16aac0634f91f31ccde73878f@webmailer.uni-duisburg-essen.de> Message-ID: Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: -------------- nächster Teil -------------- Ein Dateianhang mit Binärdaten wurde abgetrennt... Dateiname : nicht verfügbar Dateityp : image/jpeg Dateigröße : 151740 bytes Beschreibung: nicht verfügbar URL : From schaelkle at zdv.uni-tuebingen.de Fri Feb 17 08:25:18 2017 From: schaelkle at zdv.uni-tuebingen.de (=?utf-8?Q?Kuno_Sch=C3=A4lkle?=) Date: Fri, 17 Feb 2017 08:25:18 +0100 Subject: [Tustep-Liste] Technische Probleme mit Tustep auf Mac In-Reply-To: <34C95F6A-3044-4552-82BF-A456BD17291A@zdv.uni-tuebingen.de> References: <9f7870d16aac0634f91f31ccde73878f@webmailer.uni-duisburg-essen.de> <34C95F6A-3044-4552-82BF-A456BD17291A@zdv.uni-tuebingen.de> Message-ID: Sehr geehrte Frau Rothenberger, hier eine Ergänzung zu meiner vorigen E-Mail: um Ihre INI-Datei auf Ihrem Mac zu edieren, können Sie zuerst das Kommando #definiere,code=iso8859 eingeben und dann den Editor mit #ediere,*tustep.ini,zeilen=++ aufrufen. Fall meine Hinweise nicht zum gewünschten Erfolg führen, oder meine Hinweise zu knapp ausgefallen sind, dürfen Sie Ihre INI-Datei gerne an schaelkle at zdv.uni-tuebingen.de schicken. Ich werden Sie anpassen und Ihnen zurückschicken. Mit freundlichen Grüßen Kuno Schälkle ———————————— > Am 16.02.2017 um 18:42 schrieb Kuno Schälkle : > > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > Sehr geehrte Frau Rothenberger, > >> Leider sieht der Editor - im Vergleich zur Microsoft-Oberfläche - seltsam aus, auch die Message-/Anweisungszeile fehlt in der geöffneten Datei (ich habe zwei Screenshots zur Veranschaulichung angehängt). Ich weiß nicht, was hier möglicherweise bereits bei der Installation schiefgelaufen ist und hoffe sehr, dass mir jemand weiterhelfen kann. > > vermutlich steht in Ihrer INI-Datei (tustep.ini) u.a. > > #definiere, zeilen=…, code=cp850 > > Dabei sind offensichtlich mehr Zeilen angegeben, > als auf dem Bildschirm Platz haben. Sie müssen > die Zeilenzahl verringern. > > Außerdem müssen Sie als Code ISO8859 angeben. > > Mit freundlichen Grüßen > Kuno Schälkle > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From tho.neumann at gmx.de Mon Feb 20 22:31:22 2017 From: tho.neumann at gmx.de (Dr. Thomas Neumann) Date: Mon, 20 Feb 2017 22:31:22 +0100 Subject: [Tustep-Liste] Kopiere - Seitenzahlen im Register zusammenfassen Message-ID: Liebe Kollegen, bevor ich es endlos versuche, sicherlich hat schon jemand in der Runde für das Zusammenfassen von Seitenzahlen in einem Register eine Lösung. Register Eintrag1 _ 23 35 36 37 38 59 112 113 117 118 119 127 128 134 135 136 137 138 soll umgewandelt werden in: Register Eintrag1 _ 23 35-38 59 112f. 117ff. 127f. 134-138 Am besten wäre ein KOPIERE, das lässt sich am einfachsten in meine Routinen einbauen. Danke im voraus lg Thomas Neumann ------------------------------------- Dr. Thomas Neumann Greutweg 43 73733 Esslingen ------------------------------------- mail tho.neumann at gmx.de fax +4932121431182 ------------------------------------- www.caroline-fouque.de www.hoererlebnis.de ------------------------------------- From michael.trauth at outlook.de Tue Feb 21 02:10:52 2017 From: michael.trauth at outlook.de (Dr. Michael Trauth) Date: Tue, 21 Feb 2017 01:10:52 +0000 Subject: [Tustep-Liste] Kopiere - Seitenzahlen im Register zusammenfassen In-Reply-To: References: Message-ID: Lieber Herr Neumann, > bevor ich es endlos versuche, sicherlich > hat schon jemand in der Runde für das > Zusammenfassen von Seitenzahlen in einem > Register eine Lösung. > Register > Eintrag1 _ 23 35 36 37 38 59 112 113 117 118 119 127 128 134 135 136 137 138 > soll umgewandelt werden in: > Register > Eintrag1 _ 23 35-38 59 112f. 117ff. 127f. 134-138 > Am besten wäre ein KOPIERE, das lässt sich am > einfachsten in meine Routinen einbauen. M.E. ginge es mit #ra am einfachsten, mit Tuscript dann am elegantesten, aber wenn's ein #kopiere sein soll, vorzugsweise ein kryptisches, an dem sich die NSA die Zähne ausbeißt, dann versuchen Sie es einmal mit diesem hier: #ko,q,z,,+,* par {} els 1000 * Zuerst prüfen, ob überhaupt ein Registereintrag * (erkennbar am ' _ ' vor den Referenzen) vorliegt: * Nur diese werden verarbeitet, alle anderen Sätze * werden gleich in die Zieldatei ausgegeben: zf+ 1 | _ {#} {#}| zf+ 2 |[: !]{#} {#}| al 2 = zf+ 2 liv 2 i1 i2 rr 2 if (i1.eq.(i2-1)) goto 32; goto 42; xxb 3 |[: !]{#} {#}|{+1-2=}:{+4=}| erz 3 1 xxb 4 |[: !]{#} {#}|{+1-2=}!{+4=}| erz 4 1 xx 5 |{#}{[}:{#}{]}:|f| xx 5 |{#}{[}:{]}{#}|f| xx 5 |{#}{[}!| | xx 6 |{#}{[}f{#}|f.| xx 6 |{#}{[}ff{#}|ff.| xx 6 |{#}{[}{3-0}f{#}|-{-1=}| _1__2__3__4 spn 3 52 8 8 spj 21 22 8 8 sp2 8 8 21 21 *eof Gute Nacht wünscht Ihr Michael Trauth From tho.neumann at gmx.de Wed Feb 22 13:11:26 2017 From: tho.neumann at gmx.de (Dr. Thomas Neumann) Date: Wed, 22 Feb 2017 13:11:26 +0100 Subject: [Tustep-Liste] Seitenzahlen im Register bearbeiten | KOPIERE Message-ID: Liebe Kollegen, hier nun das Ergebnis der Registerbearbeitung und damit einhergehend mein Dank für die Unterstützung an Herrn Trauth und vor allem auch an Herrn Ott, für die elegante Ergänzung. Vielleicht fühlen sich ja einige Kollegen angesprochen ein Beispiel mit TUSCRIPT zu ergänzen... KOPIERE ist doch schon sehr mächtig ... Ausgangsdatei bzw. Daten im Register: Register Fouqué, Caroline de la Motte _ 23 34 35 45 46 47 50 51 52 53 54 63 daraus soll werden: Register Fouqué, Caroline de la Motte _ 23 34f. 45ff. 50-54 63 Ergänzen kann man noch das Einfügen von Kommata, was aber in den unteren beiden KOPIERE-Programmen nicht ergänzt wurde: Dann soll es so aussehen: Register Fouqué, Caroline de la Motte _ 23, 34f., 45ff., 50-54, 63 Dieses KOPIERE läuft noch auf dem TUSTEP 2010, ohne den Parameter PAR: #KOPIERE,q,z,lo=+,* >z1 : ! els 1000 * Zuerst prüfen, ob überhaupt ein Registereintrag * (erkennbar am ' _ ' vor den Referenzen) vorliegt: * Nur diese werden verarbeitet, alle anderen Sätze * werden gleich in die Zieldatei ausgegeben: zf+ 1 | _ <>>/ <>>/| zf+ 2 |>[z1]<>>/ <>>/| al 2 = zf+ 2 liv 2 i1 i2 rr 2 if (i1.ne.(i2-1)) goto 32; xxb 2 |>[z1]<>>/ <>>/|>=(1-2):>=04| erz 2 1 xxb 3 |>[z1]<>>/ <>>/|>=(1-2)!>=04| erz 3 1 xx 4 |>/<|:<>>/>|:|f| xx 4 |>/<|:>|<>>/|f| xx 4 |>/<|!| | xxb 4 |<>>/<|<>2f<>>/|>=02.| xxb 4 |>/<|>(3-0)f<>>/|-<=01| _1__2__3_ spn 3 42 8 spj 21 22 8 sp2 8 21 21 *eof Und die etwas "modernere" Variante, die mit dem Parameter PAR und einigen Änderungen auf den späteren TUSTEP Versionen läuft: #ko,q,z,,+,* par {} els 1000 * Zuerst prüfen, ob überhaupt ein Registereintrag * (erkennbar am ' _ ' vor den Referenzen) vorliegt: * Nur diese werden verarbeitet, alle anderen Sätze * werden gleich in die Zieldatei ausgegeben: zf+ 1 | _ {#} {#}| zf+ 2 |[: !]{#} {#}| al 2 = zf+ 2 liv 2 i1 i2 rr 2 if (i1.ne.(i2-1)) goto 32; xxb 2 |[: !]{#} {#}|{+1-2=}:{+4=}| erz 2 1 xxb 3 |[: !]{#} {#}|{+1-2=}!{+4=}| erz 3 1 xx 4 |{#}{[}:{#}{]}:|f| xx 4 |{#}{[}:{]}{#}|f| xx 4 |{#}{[}!| | xxb 4 |{#}{[}{1-2}f{#}|{+2=}.| xxb 4 |{#}{[}{3-0}f{#}|-{-1=}| _1__2__3_ spn 3 42 8 spj 21 22 8 sp2 8 21 21 *eof Lg in die Runde und vielleicht kann es ja der eine oder andere auch gebrauchen. Thomas Neumann ------------------------------------- Dr. Thomas Neumann Greutweg 43 73733 Esslingen ------------------------------------- mail tho.neumann at gmx.de fax +4932121431182 ------------------------------------- www.caroline-fouque.de www.hoererlebnis.de ------------------------------------- From zinsmeister at bbaw.de Thu Feb 23 15:57:24 2017 From: zinsmeister at bbaw.de (Dr. Elke Zinsmeister) Date: Thu, 23 Feb 2017 15:57:24 +0100 Subject: [Tustep-Liste] Satzaufteilung Message-ID: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> Liebe Liste, bei einem simplen Problem stehe ich komplett auf dem Schlauch: Ich habe einen Text, in dem die Tustep-Sätze wie folgt aufgebaut sind:
Text
Text
Text
Die Sätze sollen neu aufgeteilt werden, sodass nicht nur bei
, sondern auch bei jedem
ein neuer Tustep-Satz beginnt. Leider habe ich gerade keine Zeit zu tüfteln. Vielleicht kann jemand helfen? Schöne Grüße, Elke Zinsmeister -- Dr. Elke Zinsmeister Arbeitsstellenleiterin Der Österreichische Bibelübersetzer - Gottes Wort deutsch Berlin-Brandenburgische Akademie der Wissenschaften Jägerstraße 22/23 10117 Berlin Tel: +49 (0)30 20370 513 E-Mail: zinsmeister at bbaw.de From ChristianGriesinger at gmx.de Thu Feb 23 16:08:32 2017 From: ChristianGriesinger at gmx.de (Christian Griesinger) Date: Thu, 23 Feb 2017 16:08:32 +0100 Subject: [Tustep-Liste] Satzaufteilung In-Reply-To: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> References: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> Message-ID: Liebe Frau Zinsmeister, Sie können den Text ungefähr umkopieren, dass die Satzeinteilung modizifiziert wird (Parameter ZA, S. 954 im Handbuch): #KOPIERE, quelle = alt, ziel = neu, modus = +, loeschen = +, parameter = * ZA |
|
| *eof Viele Grüsse Christian Griesinger > Gesendet: Donnerstag, 23. Februar 2017 um 15:57 Uhr > Von: "Dr. Elke Zinsmeister" > An: tustep-liste at lists.uni-wuerzburg.de > Betreff: [Tustep-Liste] Satzaufteilung > > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > Liebe Liste, > > bei einem simplen Problem stehe ich komplett auf dem Schlauch: > > Ich habe einen Text, in dem die Tustep-Sätze wie folgt aufgebaut sind: > >
Text
Text
Text
> > Die Sätze sollen neu aufgeteilt werden, sodass nicht nur bei
, > sondern auch bei jedem
ein neuer Tustep-Satz beginnt. > > Leider habe ich gerade keine Zeit zu tüfteln. Vielleicht kann jemand helfen? > > Schöne Grüße, > Elke Zinsmeister > > > -- > > > Dr. Elke Zinsmeister > > Arbeitsstellenleiterin > Der Österreichische Bibelübersetzer - Gottes Wort deutsch > > Berlin-Brandenburgische Akademie der Wissenschaften > > Jägerstraße 22/23 > 10117 Berlin > > Tel: +49 (0)30 20370 513 > E-Mail: zinsmeister at bbaw.de > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste From zinsmeister at bbaw.de Thu Feb 23 16:11:30 2017 From: zinsmeister at bbaw.de (Dr. Elke Zinsmeister) Date: Thu, 23 Feb 2017 16:11:30 +0100 Subject: [Tustep-Liste] Satzaufteilung In-Reply-To: References: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> Message-ID: <242408a6-cfa7-7525-444f-a064bb39b136@bbaw.de> Lieber Herr Griesinger, vielen Dank, das ist die Lösung. Herzliche Grüße nach Bern, Elke Zinsmeister Am 23.02.2017 um 16:08 schrieb Christian Griesinger: > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > Liebe Frau Zinsmeister, > > Sie können den Text ungefähr umkopieren, dass die Satzeinteilung > modizifiziert wird (Parameter ZA, S. 954 im Handbuch): > > #KOPIERE, > quelle = alt, > ziel = neu, > modus = +, > loeschen = +, > parameter = * > ZA |
|
| > *eof > > Viele Grüsse > Christian Griesinger > >> Gesendet: Donnerstag, 23. Februar 2017 um 15:57 Uhr >> Von: "Dr. Elke Zinsmeister" >> An: tustep-liste at lists.uni-wuerzburg.de >> Betreff: [Tustep-Liste] Satzaufteilung >> >> Diskussionsforum Tustep-Liste >> Weitere Informationen: www.itug.de >> ------------------------------------------------------------ >> >> Liebe Liste, >> >> bei einem simplen Problem stehe ich komplett auf dem Schlauch: >> >> Ich habe einen Text, in dem die Tustep-Sätze wie folgt aufgebaut sind: >> >>
Text
Text
Text
>> >> Die Sätze sollen neu aufgeteilt werden, sodass nicht nur bei
, >> sondern auch bei jedem
ein neuer Tustep-Satz beginnt. >> >> Leider habe ich gerade keine Zeit zu tüfteln. Vielleicht kann jemand helfen? >> >> Schöne Grüße, >> Elke Zinsmeister >> >> >> -- >> >> >> Dr. Elke Zinsmeister >> >> Arbeitsstellenleiterin >> Der Österreichische Bibelübersetzer - Gottes Wort deutsch >> >> Berlin-Brandenburgische Akademie der Wissenschaften >> >> Jägerstraße 22/23 >> 10117 Berlin >> >> Tel: +49 (0)30 20370 513 >> E-Mail: zinsmeister at bbaw.de >> >> ------------------------------------------------------------ >> Tustep-Liste at itug.de >> https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste -- Dr. Elke Zinsmeister Arbeitsstellenleiterin Der Österreichische Bibelübersetzer - Gottes Wort deutsch Berlin-Brandenburgische Akademie der Wissenschaften Jägerstraße 22/23 10117 Berlin Tel: +49 (0)30 20370 513 E-Mail: zinsmeister at bbaw.de From wolfram.schneider-lastin at phil.uzh.ch Thu Feb 23 16:15:51 2017 From: wolfram.schneider-lastin at phil.uzh.ch (wolfram.schneider-lastin at phil.uzh.ch) Date: Thu, 23 Feb 2017 16:15:51 +0100 Subject: [Tustep-Liste] Antwort: Satzaufteilung In-Reply-To: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> References: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> Message-ID: Liebe Elke Ihre Aufgabe lässt sich sehr leicht mit dem Parameter "za" in #kopiere lösen, auf dem Sie die Zeichenfolgen (hier Tags) angeben, bei denen ein neuer Satz begonnen werden soll. Herzliche Grüße aus Zürich Wolfram --- Dr. Wolfram Schneider-Lastin Dozent für Computerphilologie an den Universitäten Zürich und Fribourg Cäcilienstrasse 6 CH-8032 Zürich Tel.  +41 76 567 07 67 wolfram.schneider-lastin at phil.uzh.ch -----tustep-liste-bounces at lists.uni-wuerzburg.de schrieb: ----- An: tustep-liste at lists.uni-wuerzburg.de Von: "Dr. Elke Zinsmeister" Gesendet von: tustep-liste-bounces at lists.uni-wuerzburg.de Datum: 23.02.2017 15:58 Betreff: [Tustep-Liste] Satzaufteilung Diskussionsforum Tustep-Liste Weitere Informationen: www.itug.de ------------------------------------------------------------ Liebe Liste, bei einem simplen Problem stehe ich komplett auf dem Schlauch: Ich habe einen Text, in dem die Tustep-Sätze wie folgt aufgebaut sind:
Text
Text
Text
Die Sätze sollen neu aufgeteilt werden, sodass nicht nur bei
, sondern auch bei jedem
ein neuer Tustep-Satz beginnt. Leider habe ich gerade keine Zeit zu tüfteln. Vielleicht kann jemand helfen? Schöne Grüße, Elke Zinsmeister -- Dr. Elke Zinsmeister Arbeitsstellenleiterin Der Österreichische Bibelübersetzer - Gottes Wort deutsch Berlin-Brandenburgische Akademie der Wissenschaften Jägerstraße 22/23 10117 Berlin Tel: +49 (0)30 20370 513 E-Mail: zinsmeister at bbaw.de ------------------------------------------------------------ Tustep-Liste at itug.de https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From zinsmeister at bbaw.de Thu Feb 23 16:17:57 2017 From: zinsmeister at bbaw.de (Dr. Elke Zinsmeister) Date: Thu, 23 Feb 2017 16:17:57 +0100 Subject: [Tustep-Liste] Antwort: Satzaufteilung In-Reply-To: References: <460037e3-8437-5053-4241-ba2884f0fbd2@bbaw.de> Message-ID: <4da0080c-132f-fe41-a50d-b920c44602d0@bbaw.de> Lieber Wolfram, danke, das hat geklappt. Schöne Grüße aus Berlin, Elke Am 23.02.2017 um 16:15 schrieb wolfram.schneider-lastin at phil.uzh.ch: > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > > > Liebe Elke > > Ihre Aufgabe lässt sich sehr leicht mit dem Parameter "za" in #kopiere > lösen, auf dem Sie die Zeichenfolgen (hier Tags) angeben, bei denen > ein neuer Satz begonnen werden soll. > > Herzliche Grüße aus Zürich > > Wolfram > > --- > > Dr. Wolfram Schneider-Lastin > Dozent für Computerphilologie > an den Universitäten Zürich und Fribourg > Cäcilienstrasse 6 > CH-8032 Zürich > > Tel. +41 76 567 07 67 > > wolfram.schneider-lastin at phil.uzh.ch > > > -----tustep-liste-bounces at lists.uni-wuerzburg.de schrieb: ----- > An: tustep-liste at lists.uni-wuerzburg.de > Von: "Dr. Elke Zinsmeister" > Gesendet von: tustep-liste-bounces at lists.uni-wuerzburg.de > Datum: 23.02.2017 15:58 > Betreff: [Tustep-Liste] Satzaufteilung > > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > Liebe Liste, > > bei einem simplen Problem stehe ich komplett auf dem Schlauch: > > Ich habe einen Text, in dem die Tustep-Sätze wie folgt aufgebaut sind: > >
Text
Text
Text
> > Die Sätze sollen neu aufgeteilt werden, sodass nicht nur bei
, > sondern auch bei jedem
ein neuer Tustep-Satz beginnt. > > Leider habe ich gerade keine Zeit zu tüfteln. Vielleicht kann jemand > helfen? > > Schöne Grüße, > Elke Zinsmeister > > > -- > > > Dr. Elke Zinsmeister > > Arbeitsstellenleiterin > Der Österreichische Bibelübersetzer - Gottes Wort deutsch > > Berlin-Brandenburgische Akademie der Wissenschaften > > Jägerstraße 22/23 > 10117 Berlin > > Tel: +49 (0)30 20370 513 > E-Mail: zinsmeister at bbaw.de > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste > > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste -- Dr. Elke Zinsmeister Arbeitsstellenleiterin Der Österreichische Bibelübersetzer - Gottes Wort deutsch Berlin-Brandenburgische Akademie der Wissenschaften Jägerstraße 22/23 10117 Berlin Tel: +49 (0)30 20370 513 E-Mail: zinsmeister at bbaw.de -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From schaelkle at zdv.uni-tuebingen.de Thu Feb 23 20:15:34 2017 From: schaelkle at zdv.uni-tuebingen.de (=?utf-8?Q?Kuno_Sch=C3=A4lkle?=) Date: Thu, 23 Feb 2017 20:15:34 +0100 Subject: [Tustep-Liste] Seitenzahlen im Register bearbeiten | KOPIERE In-Reply-To: References: Message-ID: <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> Sehr geehrter Herr Neumann, > Eintrag1 _ 23 35 36 37 38 59 112 113 117 118 119 127 128 134 135 136 137 138 soll umgewandelt werden in: > Eintrag1 _ 23 35-38 59 112f. 117ff. 127f. 134-138 > Vielleicht fühlen sich ja einige Kollegen angesprochen ein Beispiel mit > TUSCRIPT zu ergänzen… Nachfolgend ein Beispiel, wie die Seitenzahlen in TUSCRIPT zusammengefasst werden könnten. Mit freundlichen Grüßen Kuno Schälkle ——— ACCESS q: READ /RECORDS "{quelle}" sn.zn/un, zeile ACCESS z: WRITE/ERASE/RECORDS "{ziel}" sn.zn/un, zeile LOOP/999999 READ/NEXT/EXIT q - Zeile in Text und Referenzen aufteilen SET egal = SPLIT (zeile, ": _ :", text, referenzen) - Blanks zwischen den Zahlen durch Apostroph ersetzen SET referenzen = EXCHANGE (referenzen, ": :':") - Seitenzahlen zusammenfassen SET referenzen = COMBINE (referenzen, "f.", "ff.") - Apostrophe wieder durch Blanks ersetzen SET referenzen = EXCHANGE (referenzen, ":': :") - Zeile aus Text und Referenzen wieder zusammenhängen SET zeile = CONCAT (text, " _ ", referenzen) WRITE z ENDLOOP ENDACCESS/PRINT q ENDACCESS/PRINT z -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From sievers at uni-trier.de Thu Feb 23 20:39:21 2017 From: sievers at uni-trier.de (Martin Sievers) Date: Thu, 23 Feb 2017 20:39:21 +0100 Subject: [Tustep-Liste] Seitenzahlen im Register bearbeiten | KOPIERE In-Reply-To: <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> References: <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> Message-ID: <455fc5f8-b55a-aabc-bbd4-d83b08aebccd@uni-trier.de> Am 23.02.2017 um 20:15 schrieb Kuno Schälkle: >> Vielleicht fühlen sich ja einige Kollegen angesprochen ein Beispiel mit >> TUSCRIPT zu ergänzen… > Nachfolgend ein Beispiel, wie die Seitenzahlen in TUSCRIPT > zusammengefasst werden könnten. > [...] > > Mit freundlichen Grüßen > Kuno Schälkle Hallo zusammen, ich frage mich bei den vielen schönen Lösungen ehrlich gesagt immer, ob man diese nicht in gesammelter Form der "Allgemeinheit" zur Verfügung stellen kann (ob als "Bibliothek" oder einzeln per Website ist eine zweite Frage) und ggf. über Variablen u.ä. sogar so generisch machen kann, dass verschiedene Anforderungen damit abgedeckt werden können. Oder passiert das schon? Die Ausgangsfrage erscheint mir bspw. doch eine Standardfrage zu sein, wie sie in sehr vielen realen Projekten vorkommen wird. Oder muss/soll tatsächlich jeder Nutzer auf neue seine eigene "Registersortier- und Zusammenfassfunktion" schreiben? Just my 2 cents Beste Grüße Martin Sievers -- Diplom-Mathematiker Martin Sievers Kompetenzzentrum für elektronische Erschließungs- und Publikationsverfahren in den Geisteswissenschaften (Trier Center for Digital Humanities) Universität Trier 54286 Trier Besucheranschrift: Universität Trier Universitätsring 15 DM-Gebäude 54296 Trier Aktuelle Projekte: Fontentwicklung / XML-Druckaufbereitung / Einsatz von TeX Ehemalige Projekte: XML-Print / Workspace for Collaborative Editing Raum: DM333 (3.OG B) Telefon: 0651 201-3017 Telefax: 0651 201-3589 Skype: martinsievers E-Mail: sievers at uni-trier.de Internet: http://kompetenzzentrum.uni-trier.de/de/ueber-uns/mitarbeiter/martin-sievers/ -------------- nächster Teil -------------- Ein Dateianhang mit Binärdaten wurde abgetrennt... Dateiname : signature.asc Dateityp : application/pgp-signature Dateigröße : 836 bytes Beschreibung: OpenPGP digital signature URL : From wolfram.schneider-lastin at phil.uzh.ch Thu Feb 23 20:59:54 2017 From: wolfram.schneider-lastin at phil.uzh.ch (wolfram.schneider-lastin at phil.uzh.ch) Date: Thu, 23 Feb 2017 20:59:54 +0100 Subject: [Tustep-Liste] Antwort: Re: Seitenzahlen im Register bearbeiten | KOPIERE In-Reply-To: <455fc5f8-b55a-aabc-bbd4-d83b08aebccd@uni-trier.de> References: <455fc5f8-b55a-aabc-bbd4-d83b08aebccd@uni-trier.de>, <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> Message-ID: Lieber Herr Sievers Für das von Ihnen angesprochene Desiderat gibt es bereits das TUSTEP-Wiki (tustep.wikispaces.com) Dort finden Sie seit 15 Minuten die Lösung zum Zusammenfassen von Zahlen mit TUSCRIPT, wie Sie Herr Schälkle gemailt hat. Ich habe sie noch vor Ihrem Mail ins Wiki gestellt (die Lösung mit TUSTEP-#kopiere muss ich noch reinstellen). Sie finden die Lösung unter: http://tustep.wikispaces.com/TUSCRIPT+-+Kopieren#Zahlen%20zusammenfassen Ich will Ihre Anregung dazu benutzen, alle Listenleserinnen und -leser aufzufordern, Ihre Lösungen gleich ins Wiki zu stellen, um dem berechtigten Wunsch von Herrn Sievers nachzukommen. Mit herzlichen Grüßen aus Zürich Wolfram Schneider-Lastin --- Dr. Wolfram Schneider-Lastin Dozent für Computerphilologie an den Universitäten Zürich, Bern und Fribourg Cäcilienstrasse 6 CH-8032 Zürich Tel.  +41 76 567 07 67 wolfram.schneider-lastin at phil.uzh.ch -----tustep-liste-bounces at lists.uni-wuerzburg.de schrieb: ----- An: "tustep-liste at itug.de" Von: Martin Sievers Gesendet von: tustep-liste-bounces at lists.uni-wuerzburg.de Datum: 23.02.2017 20:40 Betreff: Re: [Tustep-Liste] Seitenzahlen im Register bearbeiten | KOPIERE Diskussionsforum Tustep-Liste Weitere Informationen: www.itug.de ------------------------------------------------------------ Am 23.02.2017 um 20:15 schrieb Kuno Schälkle: >> Vielleicht fühlen sich ja einige Kollegen angesprochen ein Beispiel mit >> TUSCRIPT zu ergänzen… > Nachfolgend ein Beispiel, wie die Seitenzahlen in TUSCRIPT > zusammengefasst werden könnten. > [...] > > Mit freundlichen Grüßen > Kuno Schälkle Hallo zusammen, ich frage mich bei den vielen schönen Lösungen ehrlich gesagt immer, ob man diese nicht in gesammelter Form der "Allgemeinheit" zur Verfügung stellen kann (ob als "Bibliothek" oder einzeln per Website ist eine zweite Frage) und ggf. über Variablen u.ä. sogar so generisch machen kann, dass verschiedene Anforderungen damit abgedeckt werden können. Oder passiert das schon? Die Ausgangsfrage erscheint mir bspw. doch eine Standardfrage zu sein, wie sie in sehr vielen realen Projekten vorkommen wird. Oder muss/soll tatsächlich jeder Nutzer auf neue seine eigene "Registersortier- und Zusammenfassfunktion" schreiben? Just my 2 cents Beste Grüße Martin Sievers -- Diplom-Mathematiker Martin Sievers Kompetenzzentrum für elektronische Erschließungs- und Publikationsverfahren in den Geisteswissenschaften (Trier Center for Digital Humanities) Universität Trier 54286 Trier Besucheranschrift: Universität Trier Universitätsring 15 DM-Gebäude 54296 Trier Aktuelle Projekte: Fontentwicklung / XML-Druckaufbereitung / Einsatz von TeX Ehemalige Projekte: XML-Print / Workspace for Collaborative Editing Raum: DM333 (3.OG B) Telefon:  0651 201-3017 Telefax:  0651 201-3589 Skype:    martinsievers E-Mail:   sievers at uni-trier.de Internet: http://kompetenzzentrum.uni-trier.de/de/ueber-uns/mitarbeiter/martin-sievers/ ------------------------------------------------------------ Tustep-Liste at itug.de https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste [Anhang 'signature.asc' entfernt von Wolfram Schneider-Lastin/at/UZH] -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From michael.trauth at outlook.de Thu Feb 23 21:10:46 2017 From: michael.trauth at outlook.de (Dr. Michael Trauth) Date: Thu, 23 Feb 2017 20:10:46 +0000 Subject: [Tustep-Liste] Seitenzahlen im Register bearbeiten | KOPIERE In-Reply-To: <455fc5f8-b55a-aabc-bbd4-d83b08aebccd@uni-trier.de> References: <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> <455fc5f8-b55a-aabc-bbd4-d83b08aebccd@uni-trier.de> Message-ID: Lieber Herr Sievers, lieber Martin, > ich frage mich bei den vielen schönen Lösungen > ehrlich gesagt immer, ob man diese nicht in > gesammelter Form der "Allgemeinheit" zur > Verfügung stellen kann (ob als "Bibliothek" > oder einzeln per Website ist eine zweite Frage) > und ggf. über Variablen u.ä. sogar so generisch > machen kann, dass verschiedene Anforderungen > damit abgedeckt werden können. > Oder passiert das schon? Ja, das passiert schon: Im Tustep-Wiki https://tustep.wikispaces.com das mit genau dieser Zielsetzung von Wolfram Schneider-Lastin ins Leben gerufen wurde. > Die Ausgangsfrage erscheint mir bspw. doch > eine Standardfrage zu sein, wie sie in sehr > vielen realen Projekten vorkommen wird. Ja, auch das ist richtig. > Oder muss/soll tatsächlich jeder Nutzer > auf neue seine eigene "Registersortier- und > Zusammenfassfunktion" schreiben? Nein, genau das kann/darf/soll natürlich keinesfalls sein. Deshalb habe ich in meinem ersten Posting auch - zugegebenermaßen arg verkürzt - erwähnt, daß diese Leistung sich mit #registeraufbereite ganz leicht realisieren läßt: Dort kann man nämlich über Parameter einfach *wählen* (ganz ohne mühselig programmieren zu müssen), ob z.B. aufeinander lückenlos aufsteigende Referenzen zu Referenzbereichen zusammengefaßt werden sollen, und was geschehen soll, wenn nach einer Referenz genau *eine* um 1 höhere Referenz folgt (also z.B. ob '101f.' oder '101sq.' ausgegeben werden soll) und auch, was geschehen soll, wenn nach einer Referenz genau *zwei* lückenlos aufsteigende Referenzen folgen (also z.B. ob '101ff.' oder '101sqq.'). u.v.a.m. Viel einfacher geht es wohl kaum. Ich habe das #kopiere-Snippet eigentlich nur als Fingerübung und mit der heimlichen Absicht realisiert, mal wieder ein bißchen Leben in die Bude zu bringen. NB: Das hat ja auch ganz gut geklappt. Das Tuscript-Schnipselchen von Herrn Schälkle, das dieser aus seinem Urlaub in Südtirol geschickt hat, ist, wie ich finde, ein Muster an Luzidität. Mit einem schwerwiegenden Nachteil jedoch: Daran wird sich die NSA wohl kaum die Zähne ausbeißen. Herzliche Grüße reihum von Michael Trauth From sievers at uni-trier.de Thu Feb 23 21:19:06 2017 From: sievers at uni-trier.de (Martin Sievers) Date: Thu, 23 Feb 2017 21:19:06 +0100 Subject: [Tustep-Liste] Antwort: Re: Seitenzahlen im Register bearbeiten | KOPIERE In-Reply-To: References: <455fc5f8-b55a-aabc-bbd4-d83b08aebccd@uni-trier.de> <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> Message-ID: <7a28dcdc-3879-e359-599f-5fc56fdb4d0c@uni-trier.de> Am 23.02.2017 um 20:59 schrieb wolfram.schneider-lastin at phil.uzh.ch: > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > > > Lieber Herr Sievers > > Für das von Ihnen angesprochene Desiderat gibt es bereits das > TUSTEP-Wiki (tustep.wikispaces.com) > > Dort finden Sie seit 15 Minuten die Lösung zum Zusammenfassen von Zahlen > mit TUSCRIPT, wie Sie Herr Schälkle gemailt hat. Ich habe sie noch vor > Ihrem Mail ins Wiki gestellt (die Lösung mit TUSTEP-#kopiere muss ich > noch reinstellen). Sie finden die Lösung unter: > > http://tustep.wikispaces.com/TUSCRIPT+-+Kopieren#Zahlen%20zusammenfassen > > Ich will Ihre Anregung dazu benutzen, alle Listenleserinnen und -leser > aufzufordern, Ihre Lösungen gleich ins Wiki zu stellen, um dem > berechtigten Wunsch von Herrn Sievers nachzukommen. > > Mit herzlichen Grüßen aus Zürich > > Wolfram Schneider-Lastin Lieber Herr Schneider-Lastin, vielen Dank Herrn Trauth und Ihnen für die rasche Klarstellung und Ergänzung. Beste Grüße Martin Sievers -- Diplom-Mathematiker Martin Sievers Kompetenzzentrum für elektronische Erschließungs- und Publikationsverfahren in den Geisteswissenschaften (Trier Center for Digital Humanities) Universität Trier 54286 Trier Besucheranschrift: Universität Trier Universitätsring 15 DM-Gebäude 54296 Trier Aktuelle Projekte: Fontentwicklung / XML-Druckaufbereitung / Einsatz von TeX Ehemalige Projekte: XML-Print / Workspace for Collaborative Editing Raum: DM333 (3.OG B) Telefon: 0651 201-3017 Telefax: 0651 201-3589 Skype: martinsievers E-Mail: sievers at uni-trier.de Internet: http://kompetenzzentrum.uni-trier.de/de/ueber-uns/mitarbeiter/martin-sievers/ -------------- nächster Teil -------------- Ein Dateianhang mit Binärdaten wurde abgetrennt... Dateiname : signature.asc Dateityp : application/pgp-signature Dateigröße : 836 bytes Beschreibung: OpenPGP digital signature URL : From carls at saw-leipzig.de Fri Feb 24 16:45:51 2017 From: carls at saw-leipzig.de (Dr. Wieland Carls) Date: Fri, 24 Feb 2017 16:45:51 +0100 (CET) Subject: [Tustep-Liste] nochmal was mit Zahlen Message-ID: Leipzig, 24. Februar 2017 ________________________________________________________________ Liebe TUSTEPianer_*_innen, ich möchte im Editor nach Zahlen suchen, die durch einen Strich verbunden sind und die zweite Zahl genau um 1 größer ist als die erste (also: 34-35 oder 9-10). Wie kann ich auf die erste Zahl verweisen und dann 1 addieren? Im Wiki habe ich keine Lösung gefunden. Mit den bestem Dank im Voraus und herzlichen Grüßen, Wieland Carls ________________________________________________________________ Dr. Wieland Carls Sächsische Akademie der Wissenschaften zu Leipzig Arbeitsstelle: „Das sächsisch-magdeburgische Recht als kulturelles Bindeglied zwischen den Rechtsordnungen Ost- und Mitteleuropas“ Postfach 100 440 – 04004 Leipzig Karl-Tauchnitz-Straße 1 04107 Leipzig T: +49 341 7 11 53 27 F: +49 341 7 11 53 99 27 carls at saw-leipzig.de www.saw-leipzig.de/smr www.magdeburger-recht.eu _________________________________________________________________ From ChristianGriesinger at gmx.de Fri Feb 24 17:24:59 2017 From: ChristianGriesinger at gmx.de (Christian Griesinger) Date: Fri, 24 Feb 2017 17:24:59 +0100 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: References: Message-ID: Lieber Herr Carls, ich glaube nicht, dass man das mit einer einfachen zeige-Anweisung allein lösen kann. Wenn es eine Suchfunktion im Editor sein soll, müsste man - vermute ich - ein Editormakro zusammenbauen, welches mit den Steuerbefehlen für Editormakros nach {#}-{#} sucht, die erste Zahl extrahiert und dann mit den Anweisungen für laufende Nummern (S. 385-386 im Handbuch): RD_NUM, INC_NUM und WR_NUM eine Suchabfrage zusammenbaut. Vielleicht hilft das weiter? Viele Grüsse Christian Griesinger > Gesendet: Freitag, 24. Februar 2017 um 16:45 Uhr > Von: "Dr. Wieland Carls" > An: tustep-liste at itug.de > Betreff: [Tustep-Liste] nochmal was mit Zahlen > > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > Leipzig, 24. Februar 2017 > ________________________________________________________________ > > > Liebe TUSTEPianer_*_innen, > > ich möchte im Editor nach Zahlen suchen, die durch einen Strich verbunden sind und die zweite Zahl genau um 1 größer ist als die erste (also: 34-35 oder 9-10). Wie kann ich auf die erste Zahl verweisen und dann 1 addieren? Im Wiki habe ich keine Lösung gefunden. > > > Mit den bestem Dank im Voraus und herzlichen Grüßen, > > Wieland Carls > ________________________________________________________________ > Dr. Wieland Carls > Sächsische Akademie der Wissenschaften zu Leipzig > > Arbeitsstelle: „Das sächsisch-magdeburgische Recht als > kulturelles Bindeglied zwischen den Rechtsordnungen Ost- und > Mitteleuropas“ > > Postfach 100 440 – 04004 Leipzig > Karl-Tauchnitz-Straße 1 > 04107 Leipzig > > T: +49 341 7 11 53 27 > F: +49 341 7 11 53 99 27 > > carls at saw-leipzig.de > www.saw-leipzig.de/smr > www.magdeburger-recht.eu > _________________________________________________________________ > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste From schneiderm at uni-trier.de Fri Feb 24 21:13:55 2017 From: schneiderm at uni-trier.de (Schneider, Matthias) Date: Fri, 24 Feb 2017 20:13:55 +0000 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: References: Message-ID: Lieber Wieland, lieber Christian, liebe Mitlesenden, ein erster - leider noch sehr eingeschränkter Versuch - könnte folgendermaßen aussehen: Y,ca_a=CLR_CMD_LINE,INS:"zn,,,|{#}-|",ENTER,JMP_DN,RD_NUM,CLR_CMD_LINE,INS:"zn,,,|",WR_NUM,"-",INC_NUM,WR_NUM,"|",ENTER Das mit STRG+ALT+A anzusteuernde Editormakro macht - ähnlich wie Christian vorgeschlagen hat - folgendes: 1) Suchen nach einer Zahl beliebigen Werts, gefolgt von "-" 2) Sprung an die betr. Fundstelle 3) Lesen der dort stehenden Zahl (RD_NUM) 4) Erstellung einer neuen Zeigeanweisung, in die die gemerkte Zahl mit WR_NUM geschrieben und dann 5) mit INC_NUM und WR_NUM die um 1 inkrementierte Zahl eingefügt wird. Das Problem ist, dass sich mit dieser Lösung nur der erste in einer Datei stehende Treffer finden lässt. Um die weiteren Treffer finden zu können, bräuchte man wohl a) entweder eine Art Schleife oder b) eine Erweiterung des Pattern Matchings, so dass man nicht nur Wertbereiche und "Ungleich-Werte" angeben kann, sondern auch in Verweisen in Suchzeichenfolge die Möglichkeit hätte, Distanzen anzugeben. Möglicherweise gibt es aber auch mit den bestehenden Möglichkeiten der Editormakros bereits eine Lösung, die ich bisher übersehen habe? Herzliche Grüße in die Runde Matthias Schneider -----Ursprüngliche Nachricht----- Von: tustep-liste-bounces at lists.uni-wuerzburg.de [mailto:tustep-liste-bounces at lists.uni-wuerzburg.de] Im Auftrag von Christian Griesinger Gesendet: Freitag, 24. Februar 2017 17:25 An: tustep-liste at itug.de Betreff: Re: [Tustep-Liste] nochmal was mit Zahlen Diskussionsforum Tustep-Liste Weitere Informationen: www.itug.de ------------------------------------------------------------ Lieber Herr Carls, ich glaube nicht, dass man das mit einer einfachen zeige-Anweisung allein lösen kann. Wenn es eine Suchfunktion im Editor sein soll, müsste man - vermute ich - ein Editormakro zusammenbauen, welches mit den Steuerbefehlen für Editormakros nach {#}-{#} sucht, die erste Zahl extrahiert und dann mit den Anweisungen für laufende Nummern (S. 385-386 im Handbuch): RD_NUM, INC_NUM und WR_NUM eine Suchabfrage zusammenbaut. Vielleicht hilft das weiter? Viele Grüsse Christian Griesinger > Gesendet: Freitag, 24. Februar 2017 um 16:45 Uhr > Von: "Dr. Wieland Carls" > An: tustep-liste at itug.de > Betreff: [Tustep-Liste] nochmal was mit Zahlen > > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > Leipzig, 24. Februar 2017 > ________________________________________________________________ > > > Liebe TUSTEPianer_*_innen, > > ich möchte im Editor nach Zahlen suchen, die durch einen Strich verbunden sind und die zweite Zahl genau um 1 größer ist als die erste (also: 34-35 oder 9-10). Wie kann ich auf die erste Zahl verweisen und dann 1 addieren? Im Wiki habe ich keine Lösung gefunden. > > > Mit den bestem Dank im Voraus und herzlichen Grüßen, > > Wieland Carls > ________________________________________________________________ > Dr. Wieland Carls > Sächsische Akademie der Wissenschaften zu Leipzig > > Arbeitsstelle: „Das sächsisch-magdeburgische Recht als kulturelles > Bindeglied zwischen den Rechtsordnungen Ost- und Mitteleuropas“ > > Postfach 100 440 – 04004 Leipzig > Karl-Tauchnitz-Straße 1 > 04107 Leipzig > > T: +49 341 7 11 53 27 > F: +49 341 7 11 53 99 27 > > carls at saw-leipzig.de > www.saw-leipzig.de/smr > www.magdeburger-recht.eu > _________________________________________________________________ > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste ------------------------------------------------------------ Tustep-Liste at itug.de https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste From michael.trauth at outlook.de Fri Feb 24 22:27:15 2017 From: michael.trauth at outlook.de (Dr. Michael Trauth) Date: Fri, 24 Feb 2017 21:27:15 +0000 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: References: Message-ID: Lieber Wieland, beim Herkules, auf der Liste ist ja richtig was los! Ob das nur mit den tollen Tagen zu tun hat? > ich möchte im Editor nach Zahlen suchen, > die durch einen Strich verbunden sind und > die zweite Zahl genau um 1 größer ist als > die erste (also: 34-35 oder 9-10). Wie kann > ich auf die erste Zahl verweisen und dann 1 > addieren? Im Wiki habe ich keine Lösung gefunden. Das ist kein Wunder, denn eine solche Funktion bietet der Editor (noch) nicht. Aber wie wär's mit einem kleinen Umweg? Du läßt einfach das folgende Progrämmle über die Datei laufen und suchst dann in der Zieldatei bloß noch nach der Zeichenfolge '::'; Vorteil: Du könntest damit - nur durch Eingriff in die Anweisung 'i1+1' - auch nach Zahlenbereichen suchen, in denen die Differenz zwischen den beiden Zahlen genau den Wert '2' (oder '3' oder '4' usw.) hat. #ko,q,z,,+,* par {} zf+ 1 |{#}-{#}| al 1 = zf+ el 1 |?| xl 1 |-| | liv 1 i1 i2 rr 1 if (i2.eq.(i1+1)) goto 22; goto 32; xxb 2 |{\0}{[}-{]}{\0}|::| erz 2 1 xxb 3 |{\0}{[}-{]}{\0}|!!| erz 3 1 spn 3 sp2 8 11 11 xxx |{\0}{[}!!{]}{\0}|-| *eof Viele Grüße reihum von Michael Trauth p.s. Damit geht's übrigens genauso: #ko,q,z,,+,* par {} zf+ 1 |{#}-{#}| al 1 = zf+ el 1 |?| xl 1 |-| | liv 1 i1 i2 rr 1 if (i2.eq.(i1+1)) goto 22; goto 32; ers 2 |{\0}{[}-{]}{\0}| ezf 2 |::|-| ers 3 = ers 2 ezf 3 |!!|-| spn 3 sp2 8 11 11 xxx |{\0}{[}!!{]}{\0}|-| *eof From michael.trauth at outlook.de Fri Feb 24 22:42:27 2017 From: michael.trauth at outlook.de (Dr. Michael Trauth) Date: Fri, 24 Feb 2017 21:42:27 +0000 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: References: Message-ID: Lieber Wieland, kaum hatte ich die Sendetaste meines letzten Postings gedrückt, da fiel mir auch schon ein, wie mein #kopiere-Snippet noch einmal um drei Zeilen verschlankt (und auch ein bißchen kryptischer gestaltet) werden kann. Bitte sehr: #ko,q,z,,+,* par {} zf+ 1 |{#}-{#}| al 1 = zf+ liv 1 i1 i2 rr 1 if ((iabs(i2)).eq.(i1+1)) goto 22; goto 32; xx 2 |{\0}{[}-{|}{#}*|::{=2=}| xx 3 |{\0}{[}-{|}{#}*|!!{=2=}| spn 3 sp2 8 11 11 xxx |{\0}{[}!!{]}{\0}|-| *eof Viele Grüße reihum von Michael Trauth From f.seck at t-online.de Fri Feb 24 22:46:24 2017 From: f.seck at t-online.de (F.Seck) Date: Fri, 24 Feb 2017 22:46:24 +0100 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: References: Message-ID: <3B0A966225CF4B38B80547EBE1D23F9C@Seck12> Lieber Herr Trauth, das Beschwören antiker Halbgötter scheint immer noch zu wirken. Jedenfalls sind Ihre Lösungen sehr elegant. Nur für den Fall, daß in einem Satz zwei Zahlenpaare stehen, wäre wohl noch ein gtu vonnöten. Herzlichst Ihr Friedrich Seck ------------------------------------------------ Dr. Friedrich Seck Erlenweg 18 72076 Tübingen Telefon: (0 70 71) 96 49 40 Telefax auf Anfrage -----Ursprüngliche Nachricht----- From: Dr. Michael Trauth Sent: Friday, February 24, 2017 10:27 PM To: tustep-liste at itug.de Subject: Re: [Tustep-Liste] nochmal was mit Zahlen Diskussionsforum Tustep-Liste Weitere Informationen: www.itug.de ------------------------------------------------------------ Lieber Wieland, beim Herkules, auf der Liste ist ja richtig was los! Ob das nur mit den tollen Tagen zu tun hat? > ich möchte im Editor nach Zahlen suchen, > die durch einen Strich verbunden sind und > die zweite Zahl genau um 1 größer ist als > die erste (also: 34-35 oder 9-10). Wie kann > ich auf die erste Zahl verweisen und dann 1 > addieren? Im Wiki habe ich keine Lösung gefunden. Das ist kein Wunder, denn eine solche Funktion bietet der Editor (noch) nicht. Aber wie wär's mit einem kleinen Umweg? Du läßt einfach das folgende Progrämmle über die Datei laufen und suchst dann in der Zieldatei bloß noch nach der Zeichenfolge '::'; Vorteil: Du könntest damit - nur durch Eingriff in die Anweisung 'i1+1' - auch nach Zahlenbereichen suchen, in denen die Differenz zwischen den beiden Zahlen genau den Wert '2' (oder '3' oder '4' usw.) hat. #ko,q,z,,+,* par {} zf+ 1 |{#}-{#}| al 1 = zf+ el 1 |?| xl 1 |-| | liv 1 i1 i2 rr 1 if (i2.eq.(i1+1)) goto 22; goto 32; xxb 2 |{\0}{[}-{]}{\0}|::| erz 2 1 xxb 3 |{\0}{[}-{]}{\0}|!!| erz 3 1 spn 3 sp2 8 11 11 xxx |{\0}{[}!!{]}{\0}|-| *eof Viele Grüße reihum von Michael Trauth p.s. Damit geht's übrigens genauso: #ko,q,z,,+,* par {} zf+ 1 |{#}-{#}| al 1 = zf+ el 1 |?| xl 1 |-| | liv 1 i1 i2 rr 1 if (i2.eq.(i1+1)) goto 22; goto 32; ers 2 |{\0}{[}-{]}{\0}| ezf 2 |::|-| ers 3 = ers 2 ezf 3 |!!|-| spn 3 sp2 8 11 11 xxx |{\0}{[}!!{]}{\0}|-| *eof ------------------------------------------------------------ Tustep-Liste at itug.de https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste From michael.trauth at outlook.de Fri Feb 24 22:52:26 2017 From: michael.trauth at outlook.de (Dr. Michael Trauth) Date: Fri, 24 Feb 2017 21:52:26 +0000 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: <3B0A966225CF4B38B80547EBE1D23F9C@Seck12> References: <3B0A966225CF4B38B80547EBE1D23F9C@Seck12> Message-ID: Lieber Herr Seck, vielen Dank für das Lob aus berufenem Munde und den Hinweis: > Nur für den Fall, daß in einem Satz zwei > Zahlenpaare stehen, wäre wohl noch ein gtu > vonnöten. Ich glaube, daß das mit der Rekursion 'goto 11' (die ich, wie ich mich zu erinnern meine, von Ihnen gelernt habe) bereits berücksichtigt ist. Wollen Sie es einmal ausprobieren? Ganz herzlich grüßt Ihr Michael Trauth From Gottfried.reeg at seegelken-reeg.de Sat Feb 25 00:39:20 2017 From: Gottfried.reeg at seegelken-reeg.de (Gottfried Reeg) Date: Sat, 25 Feb 2017 00:39:20 +0100 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: References: Message-ID: <59e50273-3ce9-1981-e3ef-07a94731b28c@seegelken-reeg.de> LIeber Wieland, ein Klecks Senf aus Berlin sollte nun doch nicht mehr fehlen. Hier eine Lösung mit TUSCRIPT. Wegen des Kommentars ist's etwas länger geworden. DATEN: Ende des 16. Jh.von 1596 1678-1679 8 4-5 17 5-6 nix nix ERGEBNIS: Ende des 16. Jh.von 1596 1678-1679 8 +++ Paare: 1678-1679 4-5 17 5-6 +++ Paare: 4-5 und 5-6 ---------------------------- $$MODE TUSCRIPT, {} ACCES RECORDS $quelle sq.zq/uq, text ACCESS z: WRITE/RECORDS $ziel sq.zq/uq, text -Differenz, die zwischen Zahl 1 und Zahl 2 bestehen soll. SET diff=1 LOOP READ/NEXT/EXIT q - Im Satz werden Zahlenpaare n-n gesucht. - Sie stehen dann in der Variablen zahlP SET zahlen = STRINGS (text,"|{#}-{#}|",zahlP,1,0,1,0,"'") - Wenn nicht gefunden wurde, wird der nächste Satz eingelesen IF (zahlen=="") CYCLE - Die Teilzeichenfolgen der Variable zahlen werden abgearbeitet LOOP/CLEAR lp = zahlen - Trennen der Zahlen nix = SPLIT (lp,":-:",n1,n2) - n1 wird um diff erhöht SET n1 = n1+diff - Auf der Variablen zahlen werden die Treffer gesammelt. IF (#n1==n2) SET zahlen = APPEND (zahlen," und ",lp) ENDLOOP IF (zahlen=="") CYCLE - Nur wenn es Treffer, werden sie an den Satz angehängt und ausgegeben SET text= CONCAT (text," +++ Paare: ",zahlen ) WRITE z ENDLOOP ENDACCESS/PRINT q ENDACCESS/PRINT z -------------------------------------------------------------- Grüße aus Berlin Gottfried Reeg Am 24.02.2017 um 22:42 schrieb Dr. Michael Trauth: > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > > Lieber Wieland, > > kaum hatte ich die Sendetaste meines letzten Postings gedrückt, da fiel mir auch schon ein, wie mein #kopiere-Snippet noch einmal um drei Zeilen verschlankt (und auch ein bißchen kryptischer gestaltet) werden kann. Bitte sehr: > > #ko,q,z,,+,* > par {} > zf+ 1 |{#}-{#}| > al 1 = zf+ > liv 1 i1 i2 > rr 1 if ((iabs(i2)).eq.(i1+1)) goto 22; goto 32; > xx 2 |{\0}{[}-{|}{#}*|::{=2=}| > xx 3 |{\0}{[}-{|}{#}*|!!{=2=}| > spn 3 > sp2 8 11 11 > xxx |{\0}{[}!!{]}{\0}|-| > *eof > > > Viele Grüße reihum von > > Michael Trauth > > > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From Gottfried.reeg at seegelken-reeg.de Mon Feb 27 11:43:48 2017 From: Gottfried.reeg at seegelken-reeg.de (Gottfried Reeg) Date: Mon, 27 Feb 2017 11:43:48 +0100 Subject: [Tustep-Liste] nochmal was mit Zahlen In-Reply-To: <59e50273-3ce9-1981-e3ef-07a94731b28c@seegelken-reeg.de> References: <59e50273-3ce9-1981-e3ef-07a94731b28c@seegelken-reeg.de> Message-ID: <81f72697-6a3b-4879-d178-8c415c30ae29@seegelken-reeg.de> LIeber Wieland, vielen Dank für Deine Antwort. Diese Fassung sollte jetzt ohne HTML-Code sein - woher der kam, weiß ich nicht. Auch der Fehler ist beseitigt. DATEN: Ende des 16. Jh.von 1596 1678-1679 8 4-5 17 5-6 nix nix ERGEBNIS: Ende des 16. Jh.von 1596 1678-1679 8 +++ Paare: 1678-1679 4-5 17 5-6 +++ Paare: 4-5 und 5-6 $$MODE TUSCRIPT, {} SET quelle = "reeg_zahl.tf" SET ziel = "reeg_zahl_.tf" ACCESS q: READ/RECORDS $quelle sq.zq/uq, text ACCESS z: WRITE/RECORDS $ziel sq.zq/uq, text - Differenz, die zwischen Zahl 1 und Zahl 2 bestehen soll. SET diff=1 LOOP/99999 READ/NEXT/EXIT q - Im Satz werden Zahlenpaare n-n gesucht. - Sie stehen dann in der Variablen zahlP SET zahlen = STRINGS (text,"|{#}-{#}|",1,0,1,0,"'") - Wenn nichts gefunden wurde, wird der nächste Satz eingelesen IF (zahlen=="") CYCLE - Die Teilzeichenfolgen der Variable zahlen werden abgearbeitet LOOP/CLEAR lp = zahlen - Trennen der Zahlen nix = SPLIT (lp,":-:",n1,n2) - n1 wird um diff erhöht SET n1 = n1+diff - Auf der Variablen zahlen werden die Treffer gesammelt. IF (#n1==n2) SET zahlen = APPEND (zahlen," und ",lp) ENDLOOP IF (zahlen=="") CYCLE - Nur Treffer werden an den Satz angehängt und ausgegeben SET text= CONCAT (text," +++ Paare: ",zahlen ) WRITE z ENDLOOP ENDACCESS/PRINT q ENDACCESS/PRINT z Grüße aus Berlin Gottfried Reeg Am 25.02.2017 um 00:39 schrieb Gottfried Reeg: > Diskussionsforum Tustep-Liste > Weitere Informationen: www.itug.de > ------------------------------------------------------------ > > > > LIeber Wieland, > > ein Klecks Senf aus Berlin sollte nun doch nicht mehr fehlen. > > Hier eine Lösung mit TUSCRIPT. Wegen des Kommentars ist's etwas länger > geworden. > > DATEN: > Ende des 16. Jh.von 1596 1678-1679 8 > 4-5 17 5-6 > nix > nix > > ERGEBNIS: > Ende des 16. Jh.von 1596 1678-1679 8 +++ Paare: 1678-1679 > 4-5 17 5-6 +++ Paare: 4-5 und 5-6 > > ---------------------------- > > > > $$MODE TUSCRIPT, {} > ACCES RECORDS $quelle sq.zq/uq, text > ACCESS z: WRITE/RECORDS $ziel sq.zq/uq, text > -Differenz, die zwischen Zahl 1 und Zahl 2 bestehen soll. > SET diff=1 > LOOP READ/NEXT/EXIT q > - Im Satz werden Zahlenpaare n-n gesucht. > - Sie stehen dann in der Variablen zahlP > SET zahlen = STRINGS (text,"|{#}-{#}|",zahlP,1,0,1,0,"'") > - Wenn nicht gefunden wurde, wird der nächste Satz eingelesen > IF (zahlen=="") CYCLE > - Die Teilzeichenfolgen der Variable zahlen werden abgearbeitet > LOOP/CLEAR lp = zahlen > - Trennen der Zahlen > nix = SPLIT (lp,":-:",n1,n2) > - n1 wird um diff erhöht > SET n1 = n1+diff > - Auf der Variablen zahlen werden die Treffer gesammelt. > IF (#n1==n2) SET zahlen = APPEND (zahlen," und ",lp) > ENDLOOP > IF (zahlen=="") CYCLE > - Nur wenn es Treffer, werden sie an den Satz angehängt und ausgegeben > SET text= CONCAT (text," +++ Paare: ",zahlen ) > WRITE z > ENDLOOP > ENDACCESS/PRINT q > ENDACCESS/PRINT z > > -------------------------------------------------------------- > > Grüße aus Berlin > Gottfried Reeg > > > > Am 24.02.2017 um 22:42 schrieb Dr. Michael Trauth: >> Diskussionsforum Tustep-Liste >> Weitere Informationen:www.itug.de >> ------------------------------------------------------------ >> >> >> Lieber Wieland, >> >> kaum hatte ich die Sendetaste meines letzten Postings gedrückt, da fiel mir auch schon ein, wie mein #kopiere-Snippet noch einmal um drei Zeilen verschlankt (und auch ein bißchen kryptischer gestaltet) werden kann. Bitte sehr: >> >> #ko,q,z,,+,* >> par {} >> zf+ 1 |{#}-{#}| >> al 1 = zf+ >> liv 1 i1 i2 >> rr 1 if ((iabs(i2)).eq.(i1+1)) goto 22; goto 32; >> xx 2 |{\0}{[}-{|}{#}*|::{=2=}| >> xx 3 |{\0}{[}-{|}{#}*|!!{=2=}| >> spn 3 >> sp2 8 11 11 >> xxx |{\0}{[}!!{]}{\0}|-| >> *eof >> >> >> Viele Grüße reihum von >> >> Michael Trauth >> >> >> >> ------------------------------------------------------------ >> Tustep-Liste at itug.de >> https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste > > > > ------------------------------------------------------------ > Tustep-Liste at itug.de > https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste -------------- nächster Teil -------------- Ein Dateianhang mit HTML-Daten wurde abgetrennt... URL: From kol at steinheim-institut.org Mon Feb 27 17:42:22 2017 From: kol at steinheim-institut.org (Thomas Kollatz) Date: Mon, 27 Feb 2017 17:42:22 +0100 Subject: [Tustep-Liste] Seitenzahlen im Register bearbeiten | KOPIERE In-Reply-To: <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> References: <25BD3AAA-AE6E-45EC-99B3-CBA91C0F73D2@zdv.uni-tuebingen.de> Message-ID: <7283CD5B-919D-452B-B86C-D6B25B75216B@steinheim-institut.org> Liebe Liste, noch ein kleiner Nachtrag zur Seitenzahlendiskussion. TUSCRIPT-Lösungen zu allgemeineren Problemen, wie im vorliegenden bspw. das Zusammenfassen von Zahlenfolgen, finden sich auch unter den Codebeispielen auf Rosetta Code ("Rosetta Code is a programming chrestomathy site.") Unter der Aufgabe „RangeExtraction" https://rosettacode.org/wiki/Range_extraction#TUSCRIPT werden dort auch zwei TUSCRIPT-Lösung vorgestellt: eine mit und eine ohne COMBINE. Insgesamt finden sich mittlerweile 150 TUSCRIPT-Lösungen auf RosettaCode: https://rosettacode.org/wiki/Category:TUSCRIPT Herzliche Grüße Thomas Kollatz > Am 23.02.2017 um 20:15 schrieb Kuno Schälkle : > Nachfolgend ein Beispiel, wie die Seitenzahlen in TUSCRIPT > zusammengefasst werden könnten.