ROT13, AppleScript et Services

Le
derfnam
Bonjour à toutes et à tous,

Je cherche un outil simple pour encoder-décoder en ROT13 avec mon Mac.
Jusqu'à Snow Leopard, il y avait Rot13 Converter:
<https://www.dropbox.com/sh/bfrqr5k5z63ebf2/AAD4H7pDeocvsRMYzSPG0MNda?dl=0>

C'est donc une app PPC, il faut trouver autre chose. En cherchant, j'ai
trouvé ces pages, où il est question à la fois d'AppleScript et des
Services d' OS X:
<https://gist.github.com/nslater/4007384>
<http://rosettacode.org/wiki/Rot-13#AppleScript>

J'ai essayé d'installer le service décrit dans la 1ere de ces pages,
mais bien que l'anglais ne soit pas un obstacle, je cale :(
D'autre par, ne serait-il pas possible d'adapter Rot13 Converter en app
compatible Intel, et donc utilisable avec Lion et suivants?

A vot'boncoeur, M'sieursDames :)
--
Surfer sur internet c'est comme pour le sexe : tout le monde se vante de
faire plus qu'il ne fait. Mais pour le cas d'Internet, on se vante bien
plus.
Tom Fasulo, Journaliste
Vos réponses Page 10 / 12
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
derfnam
Le #26401065
Greetings,
le suavissime M.V., avec son attachement habituel à la précision et au
détail, nous a écrit :
Bonsoir,
Le durchéant Manfred La Cassagnère, au bord de la crise de nerfs, nous a
confié :
Ici, dans Word 2011, LibreOffice Writer 5.0.5.2 et OpenOffice Writer
4.1.2, le ctrl-clic sur le texte collé et sélectionné ne me permet pas
d'accéder à la ligne "Services", puis au service ROT-13.
Je n'y arrive que dans Mail, TextEdit et Pages 5.2.2... Warum?

Pour OpenOffice (et j'imagine que c'est pareil pour les autres), il
n'accepte aucun service... ni Rot-13 ni les autres... Pourquoi ? C'est
comme ça... ;-(

Cnf tybc... :-(
--
Si vous avez un peu de patience, vous découvrirez qu'on peut utiliser
les immenses ressources du Web pour perdre son temps avec une efficacité
que vous n'aviez jamais osé imaginer.
Dave Barry, Journaliste
josephb
Le #26401080
M.V. l'Héraclès de ces lieux, nous a transportés par ce treizième ouvrage :
J'ai mis à l'adresse ci-dessous un script de décodage (hyper rapide je
trouve) de "Rot-X" pour un texte codé dans un "Rot-" inconnu.

Sur la base de l'estimable travail du non moins vénéré concocteur du script ci-dessus mentionné, je me permets de
proposer celui-ci qui sera /sensiblement plus/ "hyper rapide" (essayer sur un gros texte !) :
∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞
set copyText to clipboard info for string
if copyText = {} then
display alert "Le contenu du presse-papier n'est pas reconnu comme du texte." as warning buttons "OK !"
return
end if
set decoded to {}
set myText to the clipboard
set compteur to 25
repeat 25 times
set myText to do shell script "tr a-zA-Z b-za-aB-ZA-A <<<" & quoted form of myText
copy "En Rot-" & compteur & " :" & return ¬
& myText & return & return to the end of decoded
set compteur to (compteur - 1)
end repeat
set AppleScript's text item delimiters to return
set the clipboard to decoded as text
set AppleScript's text item delimiters to ""
tell application "TextEdit"
activate
tell application "System Events"
keystroke "v" using command down
end tell
end tell
∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞
pour tester :
……………………………………
Dénwyhèo aop wxoajp za Pdèxao : zaoyajzq wqt Ajbano lkqn u ywlpqnan ha ydeaj Yanxèna ap wyykilhen wejoe ha zanjean zao
pnwrwqt knzkjjéo lwn Aqnuopdéa, eh j'aj aop lwo narajq, ap kj ha ynkep iknp. Lajzwjp okj wxoajya, ha punwj Huyko w pqé
ha nécajp Ynékj ap o'aop ailwné zq pnôja za Pdèxao. Zalqeo hkno, eh bwep nécjan hw pannaqn, ap iajwya za pqan hao
ajbwjpo z'Dénwyhèo, hao Dénwyhezao, wejoe mqa okj élkqoa Iécwnw ap okj lèna Wildepnukj. Dénwyhèo nareajp fqopa à pailo
ap pqa Huyko. Iweo wq ikiajp kù hao Pdéxwejo oa néfkqeooajp, Eneo, hw iaoowcèna zao zeaqt, reajp wjjkjyan mqa ha
ykqnnkqt z'Dénw ykjpna Dénwyhèo j'aop lwo paniejé : ahha rw ha bnwllan za bkhea ap h'wiajan à pqan oao lnklnao ajbwjpo.
Hw zéaooa za hw bkhea, Huoow, oèia ha pnkqxha zwjo h'aolnep z'Dénwyhèo, ap yahqe-ye pqa oao ajbwjpo wejoe mqa Iécwnw.
Hknomq'Dénwyhèo nalnajz oao aolnepo, eh aop wyywxhé za ydwcnej, ap oaqho hao zeoykqno za okj wie Pdéoéa ha ykjrwejmqajp
za ja lwo oa zkjjan hw iknp.
Wjwhuoa
Hw bkhea z'Dénwyhèo aop ajrkuéa lwn Dénw lwn h'ejpaniézewena z'Eneo, iaoowcèna zao zeaqt, ap za Huoow, zéaooa za hw
bkhea. Zwjo yappa pnwcézea, kj rkep qj Dénwyhèo xawqykql lhqo dqiwej ap oqnpkqp ikejo owqrwca mqa yahqe za Okldkyha.
Aqneleza wllknpa lhqoeaqno jqwjyao eilknpwjpao wq iupda :
Ha iaqnpna oqnreajp wlnèo hao zkqva pnwrwqt.
Dénw mqe épwep fwhkqoa, bep xkena qja lkpekj à Dénwyhèo mqe ha najzep bkq, ap ha bep pqan ow baiia ap oao ajbwjpo.
…………………………………
Amicalement,
--
J. B.
Alerte ! Le morpho-cybergement alvéolé paraît analyser dangereusement ! Il faut morvo-morfler l'extra-gain à grand rayon
d'action d'urgence !!!
g4fleurot
Le #26401084
Bonjour,
Le génial Joseph-B a proposé la solution suivante :
Sur la base de l'estimable travail du non moins vénéré concocteur du
script ci-dessus mentionné, je me permets de proposer celui-ci qui sera
/sensiblement plus/ "hyper rapide" (essayer sur un gros texte !) :

Instantané, Super !
Trop fort ce Joseph !
Et en mettant repeat 26 times, on a le texte d'origine en bas de la
liste ;-)
Encore bravo ;-)
Amicalement.
--
Gérard FLEUROT [ Bouffonner la nacelle à court rayon d'action est illogique, puisque le
trophoblaste mécanique va signaler le multi-cybergement à haute vitesse.
josephb
Le #26401088
L'honorable Fleuger a semblé apprécier par ces mots :
Instantané, Super !
Trop fort ce Joseph !

Merci !
C'est un métier au long cours que d'être amateur ;-)
(prenons exemple sur nos femmes et hommes politiques…)
Cordialement
--
J. B.
Si nous pouvons créer le convertisseur trigloïdal, nous devrions pouvoir
diminuer la formation localisée et déstabiliser le filtre instable !
michel.vauquois
Le #26401090
Bonjour,
Joseph-B, le Marsupilami de fcomox, s'est ébroué :
Sur la base de l'estimable travail du non moins vénéré concocteur du
script ci-dessus mentionné, je me permets de proposer celui-ci qui sera
/sensiblement plus/ "hyper rapide" (essayer sur un gros texte !) :

J'imagine que c'est le fait de mettre les textes codés les uns à la
suite des autres dans le PP et d'avoir une seule fois cmd + v qui rend
ce script aussi rapide (plus de deux fois plus vite que le mien) ?
Bien vu, camarade...
Amicalement.
--
Michel Vauquois - Que le penta-endiguement parallèle vous accompagne !
josephb
Le #26401092
M.V. a prestement analysé la situation :
J'imagine que c'est le fait de mettre les textes codés les uns à la
suite des autres dans le PP et d'avoir une seule fois cmd + v qui rend
ce script aussi rapide (plus de deux fois plus vite que le mien) ?

C'est d'abord le fait que les boucles s'effectuent directement dans
l'application AppleScript et non pas à travers le filtre de deux autres
applications,
puis que les paquets dérotés sont traités comme des items de liste ;
liste, domaine où AppleScript est /beaucoup/ plus véloce que dans le
traitement du texte pur,
enfin oui, les transferts au p-p puis à TextEdit ne se font qu'une seule
fois.
Trois optimisations qui misent ensemble accélèrent singulièrement
l'opération globale.
Amicalement,
--
J. B.
Capitaine, je ne peux pas sur-accélérer le calcifrage parce que le
filament artificiel est sur le point d'annuler la morvo-incursion
binaire !
michel.vauquois
Le #26401094
Re-bonjour,
Le magistral Joseph-B, revenu des Enfers par le train de 17 h 23, avoue :
je me permets de proposer celui-ci qui sera /sensiblement plus/ "hyper
rapide" (essayer sur un gros texte !)

Voici un script de décodage très différent qui se passe de TextEdit.
À la fin, le texte complet et décodé est envoyé dans le PP.
++++++++++
set codeText to clipboard info for string
if codeText = {} then
display alert "Le contenu du presse-papier n'est pas reconnu comme du texte." as warning buttons "OK"
return
end if
set compteur to 25
set myText to the clipboard
display alert "Cliquer sur le bouton Continuer jusqu'à obtention d'une phrase ayant du sens !" as warning buttons "OK !"
repeat
set myText to do shell script "tr a-zA-Z b-za-aB-ZA-A <<<" & quoted form of myText
set demande to {button returned} of (display dialog (paragraph 1 of myText) as text buttons {"Arrêter", "Continuer"} default button 2) as text
if demande = "Arrêter" then
exit repeat
end if
set compteur to (compteur - 1)
end repeat
set the clipboard to myText
display dialog ("C'était donc du Rot-" & compteur & " : " & myText) as text buttons {"OK"} default button 1
++++++++++
Pour tester, on peut reprendre le texte codé proposé précédemment par JB :
++++++++++
Dénwyhèo aop wxoajp za Pdèxao : zaoyajzq wqt Ajbano lkqn u ywlpqnan ha ydeaj Yanxèna ap wyykilhen wejoe ha zanjean zao
pnwrwqt knzkjjéo lwn Aqnuopdéa, eh j'aj aop lwo narajq, ap kj ha ynkep iknp. Lajzwjp okj wxoajya, ha punwj Huyko w pqé
ha nécajp Ynékj ap o'aop ailwné zq pnôja za Pdèxao. Zalqeo hkno, eh bwep nécjan hw pannaqn, ap iajwya za pqan hao
ajbwjpo z'Dénwyhèo, hao Dénwyhezao, wejoe mqa okj élkqoa Iécwnw ap okj lèna Wildepnukj. Dénwyhèo nareajp fqopa à pailo
ap pqa Huyko. Iweo wq ikiajp kù hao Pdéxwejo oa néfkqeooajp, Eneo, hw iaoowcèna zao zeaqt, reajp wjjkjyan mqa ha
ykqnnkqt z'Dénw ykjpna Dénwyhèo j'aop lwo paniejé : ahha rw ha bnwllan za bkhea ap h'wiajan à pqan oao lnklnao ajbwjpo.
Hw zéaooa za hw bkhea, Huoow, oèia ha pnkqxha zwjo h'aolnep z'Dénwyhèo, ap yahqe-ye pqa oao ajbwjpo wejoe mqa Iécwnw.
Hknomq'Dénwyhèo nalnajz oao aolnepo, eh aop wyywxhé za ydwcnej, ap oaqho hao zeoykqno za okj wie Pdéoéa ha ykjrwejmqajp
za ja lwo oa zkjjan hw iknp.
Wjwhuoa
Hw bkhea z'Dénwyhèo aop ajrkuéa lwn Dénw lwn h'ejpaniézewena z'Eneo, iaoowcèna zao zeaqt, ap za Huoow, zéaooa za hw
bkhea. Zwjo yappa pnwcézea, kj rkep qj Dénwyhèo xawqykql lhqo dqiwej ap oqnpkqp ikejo owqrwca mqa yahqe za Okldkyha.
Aqneleza wllknpa lhqoeaqno jqwjyao eilknpwjpao wq iupda :
Ha iaqnpna oqnreajp wlnèo hao zkqva pnwrwqt.
Dénw mqe épwep fwhkqoa, bep xkena qja lkpekj à Dénwyhèo mqe ha najzep bkq, ap ha bep pqan ow baiia ap oao ajbwjpo.
++++++++++
Amicalement.
--
Michel Vauquois - Soudain, j'entendis décrypter le tube : fallait-il fracasser le supra-flux ou bien moribaffer le bouclier ?
michel.vauquois
Le #26401101
Bonjour,
L'iconoclaste Manfred La Cassagnère a composé cette héroïde :
Pour OpenOffice (et j'imagine que c'est pareil pour les autres), il
n'accepte aucun service... ni Rot-13 ni les autres... Pourquoi ? C'est
comme ça... ;-(

Cnf tybc... :-(

Mais ça fonctionne dans des applis aussi variées que Calendrier,
TextWrangler, Notes, EasyFind, iTunes, Messages, Rappels, etc.
Amicalement.
--
Michel Vauquois
DV
Le #26401098
M V. a écrit ceci :
Voici un script de décodage très différent qui se passe de TextEdit.
À la fin, le texte complet et décodé est envoyé dans le PP.

Cette fois, ça commence vraiment à ressembler à ce que j'ai fait... mais
en mieux ! C'est une superbe idée que de faire défiler les textes ainsi.
J'ai mis mon propre script en ligne : aller à l'adresse incluse dans ma
signature et chercher le dossier "Scripts partagés".
--
Denis
Au bonheur des scripts
http://s173327841.onlinehome.fr/agora-project_3.1.7/
michel.vauquois
Le #26401106
Re-bonjour,
S.A.R. Joseph-B, ne se sentant plus de joie, a ouvert un large bec, a
laissé tomber son fromage et a proposé :
Trois optimisations qui misent ensemble accélèrent singulièrement
l'opération globale.

Magistral !
Je me demande si la NSA pourrait décoder ça :
++++++++++
4'dl ké1nkeé u9n mdj2n swuk 2n 8z 4ul9 à 2d rden à 6lil mkn9mn.
swuk l9xw, 1uk 2n 1lmn in1 w1mn91lw91 i'no6wumlnk1, 4'dl mkwueé çd :
il6d9r3n 8z 4ul9 :8t3 6n11n 1w2n99n22n à 2d rw22éald2n, 8f3 skwrn11lw9
in1 kn2l0un1, iéxl2é, r2ômukn à 2d rw22éald2n : r3d9m1, mncmn1, swè6n à
2d rkédmlw9 nmr... n9 1wlkén, xn1mlelmé1, d9l6dmlw91 6u1lrd2n1...
2n 8z 4ul9 rwï9rlin du11l denr 2d xêmn xwkdl9n nm denr 2'wuenkmukn in 2d
9wuen22n ncsw iu 6u1én knjnokw22n, rw91drkén à d9mw9l r2deé :
3mms://bbb.n1sdrn-knjnokw22n.rw6/6n9u.3m6
++++++++++
Sans doute que oui...
Amicalement.
--
Michel Vauquois
Publicité
Poster une réponse
Anonyme