[GastForen Programmierung/Entwicklung AppleScript FindText_Satimage_taggedText

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Themen
Beiträge
Moderatoren
Letzter Beitrag

FindText_Satimage_taggedText

Anonym
Beiträge gesamt: 22827

23. Sep 2006, 20:01
Beitrag # 1 von 6
Bewertung:
(1213 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo liebes Forum,
hallo lieber Hans,

möchte gerne per AppleScript indizieren wobei sich natürlich die Satimage osax anbietet, was sonst. Da Indesign für alle Nicht-Ascii-Zeichen Unicode verwendet stehe ich vor dem Problem dass Zeichen wie

--ÀÁÅÈÉÔÄÖÜáàéèôñåäöü    oder Worte wie
--Öltanker  :  <0x00D6>ltanker

nicht ohne aufwendiges Tricksen gefunden werden, zu allem Übel müssen die englischen Stichworte im Index im Gegensatz zum Text mit Großbuchstaben beginnen, au Backe:

...
set aString to change " ([A-Za-z])([^\\,]+)\\," into " <Idx:=<IdxEnType:IdxPgEn><IdxEnRngType:kCurrentPage><IdxEnDispStr:\\1\\2>>\\1\\2," in aString with regexp

set aString to change "\\, ([A-Za-z ]+)\\.([
|<cnxc\\:Column>|<cnxc\\:Box>])" into ", <Idx:=<IdxEnType:IdxPgEn><IdxEnRngType:kCurrentPage><IdxEnDispStr:\\1>>\\1.\\2" in aString with regexp

--der Zeilenumbruch im Skript stellt das Return dar und wird so eingegeben: \r

repeat with i from 97 to 122
set j to i - 32
set aString to change "<IdxEnDispStr\\:" & ((ASCII character i) as text) into "<IdxEnDispStr:" & ((ASCII character j) as text) in aString with regexp
end repeat

...
das funktioniert schon ganz gut, bis auf die vielen Ausnahmen mit den Sonderzeichen.

Womöglich wäre es weniger Aufwand die Ausnahmen manuell zu ändern.

Gruß Jürgen
X

FindText_Satimage_taggedText

Hans Haesler
  
Beiträge gesamt: 5818

23. Sep 2006, 20:37
Beitrag # 2 von 6
Beitrag ID: #421171
Bewertung:
(1212 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Jürgen,

eine Alternative zur Satimage.osax könnte "TextCommands" von Hamish Sanderson sein.
Zu finden auf seiner Web-Site: freespace.virgin.net/hamish.sanderson/

Die Betonung liegt auf "könnte", weil ich mir leider noch nicht die Zeit genommen habe,
um zu prüfen, was der gute Hamish (bekannter unter dem Kürzel "has") von Zeit zu
Zeit auf der "applescript-users-list" anpreist: "TextCommands 1.0.1 -- A scriptable FBA
providing a collection of useful commands for working with Unicode text."

Gruss, Hans


als Antwort auf: [#421170]

FindText_Satimage_taggedText

Anonym
Beiträge gesamt: 22827

24. Sep 2006, 10:00
Beitrag # 3 von 6
Beitrag ID: #421172
Bewertung:
(1212 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Hans,

Zitat von author="Hans Haesler" date="1159036620" Die Betonung liegt auf "könnte", weil ich mir leider noch nicht die Zeit genommen habe,


ja Zeit is leider knapp bin heute bei dem schönen Wetter am Überlegen ob ich arbeiten oder lieber arbeiten soll. Wenn irgendwie möglich, sollte man heute mal raus.

P.S.: Hast du eigentlich schon mit Ultraedit (gibts halt nur für PC) zu tun gehabt?.

Gruß Jürgen

Nachtrag: das OSAX habe ich hier gefunden:

http://freespace.virgin.net/hamish.sanderson/index.html ODER
http://osaxen.com/files/textcommands1.0.1.html

liest sich schon mal echt gut....


als Antwort auf: [#421170]

FindText_Satimage_taggedText

Hans Haesler
  
Beiträge gesamt: 5818

24. Sep 2006, 19:05
Beitrag # 4 von 6
Beitrag ID: #421173
Bewertung:
(1212 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Jürgen,

ich habe jetzt lange mit "Satimage" und "TextCommands" allerlei
herumprobiert aber leider kann ich Dir (noch) kein brauchbares
Ergebnis anbieten.

Ja, ich benutze "UltraEdit32", um JavaScripts für InDesign unter
Windows zu entwickeln. Hat zwar ein paar Macken, aber sonst bin
ich sehr zufrieden damit.

Für den Mac soll "TextMate" etwas Ähnliches sein. Habe diesen
aber noch nicht getestet. Eine 30-Tage-Testversion gibt es hier:
http://macromates.com/

Gruss, Hans


als Antwort auf: [#421170]

FindText_Satimage_taggedText

Anonym
Beiträge gesamt: 22827

27. Sep 2006, 19:23
Beitrag # 5 von 6
Beitrag ID: #421174
Bewertung:
(1212 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Hans,

...neue Frage, alter Thread...

wieso funktioniert es denn bei mir nicht, einen bestimmten Absatz innerhalb einer Variable über einen tell-Block anzusprechen:

tell (every paragraph where it starts with "<pstyle:Literatur-z>")
set aString to change "([a-z]) ([A-Z])\\.<0x00A0>([A-Z])\\." into "<cc:Blau>\\1, \\2.<0x00A0>\\3.<cc:>" in aString with regexp

es wird auf diese Weise nämlich über das Ziel hinausgeschossen und unverschämter Weise auf alle Absätze zugegriffen - haste da noch Töne - zssississsiiss!

Gruß
Jürgen


als Antwort auf: [#421170]

FindText_Satimage_taggedText

Hans Haesler
  
Beiträge gesamt: 5818

27. Sep 2006, 20:08
Beitrag # 6 von 6
Beitrag ID: #421175
Bewertung:
(1212 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Jürgen,

die Variable aString ist doch die Textkette im Speicher.
Aber die Aufforderung 'tell every paragraph where ...' richtet
sich an nichts und wird ignoriert.

Dafür wird der befehl 'change "x" into "y" in aString' komplett
ausgeführt. In der ganzen Textkette.

Abhilfe? Eine Schleife durch die Absätze und jeden testen.
Wenn einer mit dem Zeichen (ein Tab, welcher hier verschwunden
ist?) beginnt, dann erst wird das Suchen/Ersetzen vorgenommen
und das Ergebnis an eine Liste gehängt, welche eingangs zuerst
definiert werden muss. Falls der Test des Zeichens nicht
zutrifft, dann wird der Absatz unverändert durchgereicht.
Am Schluss werden die Elemente der Liste wieder in einen String
zurückverwandelt.

Ungefähr so:
---
set aString to "hello
yellow
mellow
yellow
bellow"

set AppleScript's text item delimiters to {ASCII character 10}
set aList to (every text item of aString) as list
set AppleScript's text item delimiters to {""}
set tmpList to {}
repeat with i from 1 to count of aList
   set tmpString to item i of aList
   if tmpString starts with "y" then
      set tmpString to change "e" into "a" in tmpString
   end if
   set end of tmpList to tmpString
end repeat
set AppleScript's text item delimiters to {ASCII character 10}
set aString to [/color]([color=#0000FF]every text item of tmpList) as string
set AppleScript's text item delimiters to {""}
aString
--> "hello
yallow
mellow
yallow
bellow"

---
Gruss, Hans


als Antwort auf: [#421170]
X

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
02.02.2023

Prozesse optimieren und effizient gestalten

Zürich
Donnerstag, 02. Feb. 2023, 08.00 - 10.00 Uhr

Digitalisierung, Webauftritt

Digitalisierung mitgestalten - Worauf kommt es an? Wie wichtig ist die Webseite? Webseite mit Word Press? Interne Prozesse optimieren

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: Birol Isik, E-Mailinfo AT bkcc DOT ch

https://digitalisierung-heute.ch/digitalisierung-informationstag-schweiz/

Veranstaltungen
01.03.2023 - 09.03.2023

Online
Mittwoch, 01. März 2023, 00.00 Uhr - Donnerstag, 09. März 2023, 00.00 Uhr

Online Webinar

Wie gehen wir mit diesen Veränderungen um? Was ist notwendig, damit wir die Digitalisierung im Unternehmen klappt? Veränderungsprozesse verstehen und entsprechend handeln Mitarbeiter als Botschafter Webseite mit WordPress erstellen SEA /SEO (Ads aufschalten)

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: B. Isik, E-Mailinfo AT snfa DOT ch

https://www.fernstudiumfitness.ch/digitalisierung-schweiz/