Newsgroup: it.comp.macintosh
Titolo: Aiutino per Script

Mi capita spesso di dover copia/incollare dei testi (in maggior parte
articoli per il mio Magazine telematico di Fotografia) che hanno righe
piccole e numerosi spazi vuoti tra una riga e l'altra sia prima che dopo
la riga scritta.
Il lavoro di eliminazione di spazi vuoti e' lungo e noioso e tempo
addietro avevo anche utilizzato una piccola applicazione shareware in
versione DEMO che lo faceva. Mi sono chiesto: non e' possibile scrivere
un piccolo script per qualsiasi applicazione scriptabile in mio possesso
(anche Text Edit Plus) che elimini tutti gli spazi vuoti superiori ad
uno?
In caso positivo, c'e' qualcuno in grado di aiutarmi magari inviandomi
lo script in questione o dicendomi come scriverlo?
Ho il sistema 8.5 in Italiano, Claris Works 5, Tex Edit Plus 2.3.4, Page
Mill 2.0.
Grazie a chiunque mi potra' aiutare ed auguro a tutti un fantastico,
iridato 1999.
Se possibile rispondetemi privatamente.
Rino Giardiello - Site Manager
Nadir, Fotografia & Contax : 
http://www.intermed.it/nadir
e-mail : 
itn...@tin.it
----------------------------
Nadir e' il sito informalternativo di fotografia e Contax, completamente
autonomo ed indipendente, privo di pubblicita' e vendite on line.
Nadir e' il sito di fotografia per tutti, perche', pur essendo
specializzato in fotocamere Contax ed obiettivi Zeiss, prova fotocamere,
obiettivi, pellicole ed accessori di interesse generale e spiega le
tecniche di ripresa.
Su Nadir anche Immagini ed Autori, idee creative, le News piu' recenti,
un concorso fotografico in rete la cui partecipazione e' gratuita e
molto altro ancora.
Nadir viene aggiornato almeno settimanalmente ed e' il sito italiano per
tutti gli appassionati di fotografia, ultimamente premiato da "il Sole
24 ore" come il miglior sito di "Arte e Cultura".

 uno?
non ti posso aiutare per lo script ma io uso TextSOAP (shareware che
vale la spesa) oppure con il cerca e sostituisci lo faccio "a mano"
prima uno spazio, poi due ecc ecc
-- 
saluti, marco.

 uno?
Lo so che sembra strano, ma fare il cerca e sostituisci, che con altri
ambienti e` una delle prime cose che si fanno, in AS e` relativamente
complicato. 
Ti presento due soluzioni: la prima richiede una scripting addition,
"Kamprath text utilities", la seconda non richiede osax di terze parti.
----
tell application "Scriptable Text Editor"
 
        set dove to the paragraph 10 of document "You.s" as text --  of
application "Scriptable Text Editor"
 
end tell
dove
replace string "      " in the text dove with string " "
replace string "     " in the text dove with string " "
replace string "    " in the text dove with string " "
replace string "   " in the text dove with string " "
replace string "  " in the text dove with string " "
set the clipboard to the result
----
---
on replAS(cosa, dove, concosa)
        set odel to AppleScript's text item delimiters
        set AppleScript's text item delimiters to cosa
        set dove to (every text item of dove) as list
        set AppleScript's text item delimiters to concosa
        set dove to dove as string
        set AppleScript's text item delimiters to odel
        return dove
end replAS
tell application "Scriptable Text Editor"
 
        set dove to paragraphs 6 thru 11 of document "You.s" --  of
application "Scriptable Text Editor"
 
 
 
        set dove to replAS("     ", dove, " ") of me
        set dove to replAS("    ", dove, " ") of me
        set dove to replAS("   ", dove, " ") of me
        set dove to replAS("  ", dove, " ") of me
 
 
 
end tell
set the clipboard to dove
---
Poi, volendo, Leonard Rosenthol ha fatto addirittura un'osax basata sul
GREP... 
-- 
Ciao,        \+----------+  "La risposta e' dentro di te...
   Vittorio --| : )    o |      ...MA E' SBAGLIATA!!!"
 [da Roma]    /+----------+
Enciclopedia d.Fantascienza: 
http://www.fantascienza.com/edf

Ringrazio tutti coloro che mi hanno dato i loro consigli: sono stati
piu' che efficaci dato che sono riuscito a scrivere lo script desiderato
(lo faccio funzionare con Text Edit Plus ma devo verificare quale altro
Editor di Testo in mio possesso mi offre la stessa opportunita').
L'unico problema che ho avuto e' stato nel trovare la giusta
terminologia per Apple Script 1.1.3 che, pur facendo parte del sistema
8.5 Italiano, e' scrivibile solo in inglese (le istruzioni sono in
italiano ma non sono riportati quali sono i comandi equivalenti in
inglese).
Comunque, tra le istruzioni di Apple Script e l'esempio inviatomi da
Vittorio sono riuscito a compilare il mio primo script e sembra
funzionare perfettamente.
Se dovesse essere utile a qualcuno saro' lieto di inviarglielo (pesa
solo 13K) ma scrivetemi privatamente perche' non scarico sempre il
newsgroup.
Rino Giardiello - Studio Nexus
e-mail :  
nex...@tin.it
homepage : 
http://space.tin.it/arte/sgiardie
-----------------------------
