Newsgroup: it.comp.macintosh
Titolo: [AS] Firme random in Zuppa

Ho finalmente "perfezionato" (...nzomma) un mio vecchio script, basato
su quello di qualcun altro (non ricordo chi), per avere un'insieme di
firme a rotazione su Zuppa.
Nel caso remoto interessasse a qualcuno...
Istruzioni:
1) mettere 5 file chiamati rispettivamente 1.txt ... 5.txt in una
cartella ~/Documents/Zuppafirme
2) mettete una sign vuota nelle imp di zuppa
3) quando dovete replicare a un messaggio, anzichè premere F, lanciate
lo script (si può fare dal menu in alto se lo si mette in
~Library/Scripts, oppure dal dock, oppure con un programma tipo iKey
utilizzando una combinazione di tasti - io ho scelto mela+1)
Pro:
1) Avrete delle firme a rotazione casuale
2) Potrete personalizzare la prima riga delle vostre risposte
Contro:
1) E' molto più lento che non premere F: dovete aspettare che si carichi
lo script (e già qui ci vuole un po') e che modifichi il testo senza
premere nulla nel frattempo, altrimenti sputtana tutto. Avrei voluto
utilizzare la clipboard anziché il keystroke per la riga di intestazione
(per velocizzare un po' il tutto), ma purtroppo il funzionamento della
clipboard, quando la si usa due volte, è diverso se lo script viene
eseguito in Script Editor o come applicazione a se stante... e in questo
caso è inutilizzabile.
2) Perché sia utilizzabile da tastiera (senza toccare il mouse) è
necessario appunto installare un launcher veloce tipo iKey, DragThing o
similare (forse Quicksilver?)
3) Non è esente da bug (d'altronde ho appena iniziato con lo scripting)
:-D
4) Se volete inserire la firma in un nuovo messaggio, dovete aprire il
messaggio, lanciare lo script e quindi cancellare a manina la prima riga
(oppure preparare una personality alternativa con la sua firma) :-D
5) se dovete usare la clipboard per altri motivi, fatelo il "copia" solo
dopo avere lanciato lo script, altrimenti perderete tutto. (Tutto col
keystroke sarebbe stato trooooppo lento) 
Probabilmente io stesso me ne stuferò in fretta, ma nel caso interessi a
qualcuno ecco la sorgente (ovviamente: miglioramenti, integrazioni ed
altro sono ben accetti :-D):
---- inizio 
on run
        set the clipboard to ""
        set firma to ""
        tell application "MacSOUP" to activate
        tell application "System Events"
                tell process "MacSOUP"
                        set chi to title of window 1
                        set chi to my buildTemplate(chi)
                        set the clipboard to chi
                        keystroke "f"
                        key code 124 using {shift down, command down}
                        -- keystroke "v" using {command down}
                        keystroke chi
                        key code 125 using {shift down, command down}
                        key code 125
                        key code 36
                        keystroke "-- "
                        key code 36
                        set firma to my lamiaFirma(firma)
                        set the clipboard to firma
                        keystroke "v" using {command down}
                        key code 126 using {shift down, command down}
                        key code 126
                end tell
        end tell
end run
on buildTemplate(n)
        set x to the offset of ":" in n
        set x to (characters 1 thru (x - 1) of n) as text
        set x to "Il buon " & x & ¬
                " ando' farneticando le seguenti parole:"
        -- quella qui sopra e' la stringa da editare
        return x
end buildTemplate
on lamiaFirma(n)
        tell application "Finder"
                set wpath to the path to documents folder as string
                set workingpath to wpath & "Zuppafirme:"
        end tell
 
        set y to n
        set dausare to ""
        set acaso to (random number from 1 to 5)
        set dausare to workingpath & acaso & ".txt" as alias
        set y to (read dausare)
        return y
end lamiaFirma
---- fine
Daniele
-- 
"I'm just a Soldier of Fortune,
 Must be the Gypsy in me!" (Coverdale)
STARGAZER: 
www.stargazer.it
 - Le stelle della scena Hard & Heavy!

 firme a rotazione su Zuppa.
Fai prima con CocoaFortune...
-- 
Ve lo meritate Gil Amelio!

 Fai prima con CocoaFortune...
Spiega :-)
Daniele
-- 
"Like lovers and heroes, and the restless part of everyone
 We're only at home when we're on the run" (Peart)


 Spiega :-)
Una volta che hai installato CocoaFortune, ti ritrovi "Insert quote" tra
i servizi: mela+shift+i e ti incolla una frase a caso tra quelle del tuo
database.
-- 
"I have a very simple life, I have my family and I have Apple and Pixar.
And I don't do much else." S. J.