ce script est vraiment génial pour une traduction rapide (via http://babel.altavista.com/)
Il provient du forum http://www.autohotkey.com/forum/
Sélectionner le texte à traduire;
#T => pour Traduire directement de l'Anglais vers Français
//ou bien transiter par le menu des langues Ctrl Shift T <à adpater selon vos préférences)
. En ce qui concerne la traduction à ~'proprement parlé' c'est parfois limite~
mais enfin Vraiment c'est pratique, surtout pour moi.
je remerçi qui de droit (mais j'ai oublié son nom)
:> le code AHK:
- Code: Tout sélectionner
;-------------------------------------------------------------------------
SoundPlay, %A_WinDir%\Media\ding.wav ; Juste histoire de!)
;-------------------------------------------------------------------------
Menu, Tray, Icon, %SystemRoot%\system32\SHELL32.dll,14 ; un Ptit Plus:)
Menu, Tray, Tip, BABEL TRADUCTION `r EN-FR = Ctrl T`r Menu Langues= Ctrl Shit T`r(Sur un texte pré-Sélectionné)`r#Q=Quitter
Menu, Tray, Add, English-Français
Menu, Tray, Add,
Menu, Tray, Add, Français-English
Menu, Tray, Add,
Menu, Tray, Add, Français-Italien
Menu, Tray, Add, Français-Allemand
Menu, Tray, Add, Français-Espagnol
Menu, Tray, Add, Français-Grec
Menu, Tray, Add,
Menu, Tray, Add, Italien-Français
Menu, Tray, Add, Espagnol-Français
Menu, Tray, Add,
Menu, Tray, Add, English-Italian
Menu, Tray, Add, English-German
Menu, Tray, Add, English-Spanish
Menu, Tray, Add,
Menu, Tray, Add, German-English
Menu, Tray, Add, Italian-English
Menu, Tray, Add, Spanish-English
Menu, Tray, Add,
Menu, Tray, Default, English-Français
Menu, Tray, NoStandard
Menu, Tray, Standard
;-------------------------------------------------------------------------
Menu, Translation, Add, English-Français
Menu, Translation, Add,
Menu, Translation, Add, Français-English
Menu, Translation, Add,
Menu, Translation, Add, Français-Italien
Menu, Translation, Add, Français-Allemand
Menu, Translation, Add, Français-Espagnol
Menu, Translation, Add, Français-Grec
Menu, Translation, Add,
Menu, Translation, Add, Italien-Français
Menu, Translation, Add, Espagnol-Français
Menu, Translation, Add,
Menu, Translation, Add, English-Italian
Menu, Translation, Add, English-German
Menu, Translation, Add, English-Spanish
Menu, Translation, Add,
Menu, Translation, Add, German-English
Menu, Translation, Add, Italian-English
Menu, Translation, Add, Spanish-English
;-------------------------------------------------------------------------
TransPart1 = http://babel.altavista.com/tr?doit=done&urltext=
TransPart2 = &lp=
TransText =
TransLang =
Italien-Français:
Translang = it_fr
return
Français-Italien:
Translang = fr_it
return
Français-Allemand:
Translang = fr_de
return
Français-Espagnol:
Translang = fr_es
return
Espagnol-Français:
Translang = es_fr
return
Français-English:
Translang = fr_en
return
Français-Grec:
Translang = fr_el
return
Italian-English:
TransLang = it_en
return
German-English:
Translang = de_en
return
Spanish-English:
Translang = es_en
return
English-Italian:
TransLang = en_it
return
English-Français:
Translang = en_fr
return
English-German:
Translang = en_de
return
English-Spanish:
Translang = en_es
return
; ==================================================================
Translate:
Run, iexplore.exe %TransPart1%%TransText%%TransPart2%%TransLang%
Return
; ==================================================================
^t::
Translang = en_fr
TempString = %clipboard%
Send, ^c
Clipwait
TransText = %clipboard%
Gosub, Translate
clipboard = %tempstring%
return
; ==================================================================
^+t::
TempString = %clipboard%
Send, ^c
Clipwait
TransText = %clipboard%
Menu, Translation, Show
Gosub, Translate
clipboard = %tempstring%
return
; ==================================================================
;-------------------------------------------------------------------------
#q::ExitApp ; Assign a hotkey to terminate this script.
;-------------------------------------------------------------------------
