Jump to content

Spanish Translation Testers


JustinReno
 Share

Recommended Posts

I'm translating Simple Notepad into spanish, I know there are easier ways, but this is the why I did it. I translated it into Spanish, If anyone has fluent Spanish, can you please tell me if the spanish version of Simple Notepad makes sense, and is usable?

Link: http://h1.ripway.com/mrreno/SimpleNotepadSpanish.exe

I'de be very happy to see any comments on it! Thank you!!!!!!!!!!!!!!!!!!!!!!!

Link to comment
Share on other sites

Ahhhhhhh, well if you want to run it from the source, here it is:

CODE

#include <GUIConstants.au3>

#include <String.au3>

#include <Misc.au3>

#include <File.au3>

Global $oSpeech = ObjCreate("SAPI.SpVoice")

$Form1 = GUICreate("", 627, 447, -1, -1, $WS_OVERLAPPEDWINDOW, $WS_MAXIMIZEBOX);, 193, 115)

$Edit = GUICtrlCreateEdit("", 0, 0, 625, 425)

;File Menu

$File_Menu = GUICtrlCreateMenu("Archivo")

$OpenItem = GUICtrlCreateMenuItem("Abra", $File_Menu)

$NewItem = GUICtrlCreateMenuItem("Nuevo", $File_Menu)

$SaveItem = GUICtrlCreateMenuItem("Salve", $File_Menu)

$PrintItem = GUICtrlCreateMenuItem("Impresión", $File_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $File_Menu)

$RunScriptItem = GUICtrlCreateMenuItem("Corra Escritura AU3", $File_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $File_Menu)

$ExitItem = GUICtrlCreateMenuItem("Salida", $File_Menu)

;Edit Menu

$Edit_Menu = GUICtrlCreateMenu("Redacte")

$ICTItem = GUICtrlCreateMenuItem("Meta Tiempo Actual", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$RTItem = GUICtrlCreateMenuItem("Texto inverso", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$WordCountItem = GUICtrlCreateMenuItem("Redacte a Conde", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$CopyItem = GUICtrlCreateMenuItem("Copia", $Edit_Menu)

$PasteItem = GUICtrlCreateMenuItem("Pasado", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$UndoItem = GUICtrlCreateMenuItem("Deshaga", $Edit_Menu)

$RedoItem = GUICtrlCreateMenuItem("Vuelva a hacer", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$FontItem = GUICtrlCreateMenuItem("Tipo de letra", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$ScramblerItem = GUICtrlCreateMenuItem("Trepe Documento", $Edit_Menu)

$MenuSep1 = GUICtrlCreateMenuItem("", $Edit_Menu)

$SpellCheckItem = GUICtrlCreateMenuItem("Deletree Cheque", $Edit_Menu)

;Speak Menu

$Speak_Menu = GUICtrlCreateMenu("Hable")

$StartSpeakItem = GUICtrlCreateMenuItem("Hable Texto", $Speak_Menu)

$StopSpeakItem = GUICtrlCreateMenuItem("Pare Hablar", $Speak_Menu)

;About Menu

$MenuItem13 = GUICtrlCreateMenu("Acerca de")

$AboutItem = GUICtrlCreateMenuItem("Acerca de", $MenuItem13)

GUICtrlSetFont($Edit, "16", "", "", "Times New Roman")

GUISetState()

AnimateTitle($Form1, "Bloc sencillo 1,0", 100)

While 1

$Time = "" & @HOUR & ":" & @MIN & ":" & @SEC & ""

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $OpenItem

$msg = MsgBox(20, "Bloc sencillo", "¿Quiere usted salvar el documento actual?")

If $msg = 7 Then

$FileOpen = FileOpenDialog("Abra el Archivo de SNF", "", "El Bloc sencillo Archiva (*.SNF)")

WinSetTitle("Bloc sencillo", "", "Bloc sencillo - " & $FileOpen & "")

GUICtrlSetData($Edit, "Por favor espera mientras el archivo es unencrypted... ")

$DeFile = FileRead($FileOpen)

$Docde = "blah"

$Decrypt = _StringEncrypt(0, $DeFile, $Docde, 3)

GUICtrlSetData($Edit, $Decrypt)

EndIf

If $msg = 6 Then

$Readedit1 = GUICtrlRead($Edit)

$FileSaveDialog = FileSaveDialog("Salve el Archivo de SNF", "", "El Bloc sencillo Archiva (*.SNF)")

GUICtrlSetData($Edit, "Por favor espera mientras el archivo es cifrado y es salvado...")

FileDelete($FileSaveDialog)

$docen = "blah"

$Encrypt = _StringEncrypt(1, $Readedit1, $docen, 3)

$FileSaveDialog &= ".SNF"

$FileSaveDialog = StringReplace($FileSaveDialog, ".SNF.SNF", ".SNF")

FileWrite($FileSaveDialog, $Encrypt)

WinSetTitle("Bloc sencillo", "", "Bloc sencillo - " & $FileSaveDialog & "")

GUICtrlSetData($Edit, $Readedit1)

MsgBox(0, "Bloc sencillo", "El archivo Salvó.")

$FileOpen = FileOpenDialog("Abra el Archivo de SNF", "", "El Bloc sencillo Archiva (*.SNF)")

WinSetTitle("Bloc sencillo", "", "SBloc sencillo - " & $FileOpen & "")

GUICtrlSetData($Edit, "Por favor espera mientras el archivo es unencrypted... ")

$DeFile = FileRead($FileOpen)

$Docde = "blah"

$Decrypt = _StringEncrypt(0, $DeFile, $Docde, 3)

GUICtrlSetData($Edit, $Decrypt)

EndIf

Case $NewItem

$msg = MsgBox(20, "Bloc sencillo", "¿Quiere usted salvar el documento actual? ")

If $msg = 7 Then

WinSetTitle("Bloc sencillo", "", "Bloc sencillo")

GUICtrlSetData($Edit, "")

EndIf

If $msg = 6 Then

$Readedit1 = GUICtrlRead($Edit)

$FileSaveDialog = FileSaveDialog("Salve el Archivo de SNF", "", "El Bloc sencillo Archiva (*.SNF)")

GUICtrlSetData($Edit, "Por favor espera mientras el archivo es cifrado y es salvado...")

FileDelete($FileSaveDialog)

$docen = "blah"

$Encrypt = _StringEncrypt(1, $Readedit1, $docen, 3)

$FileSaveDialog &= ".SNF"

$FileSaveDialog = StringReplace($FileSaveDialog, ".SNF.SNF", ".SNF")

FileWrite($FileSaveDialog, $Encrypt)

WinSetTitle("Bloc sencillo", "", "Bloc sencillo")

GUICtrlSetData($Edit, $Readedit1)

MsgBox(0, "Bloc sencillo", "El archivo Salvó.")

GUICtrlSetData($Edit, "")

EndIf

Case $SaveItem

$Readedit1 = GUICtrlRead($Edit)

$FileSaveDialog = FileSaveDialog("Salve el Archivo de SNF", "", "El Bloc sencillo Archiva (*.SNF)")

GUICtrlSetData($Edit, "Por favor espera mientras el archivo es cifrado y es salvado...")

FileDelete($FileSaveDialog)

$docen = "blah"

$Encrypt = _StringEncrypt(1, $Readedit1, $docen, 3)

$FileSaveDialog &= ".SNF"

$FileSaveDialog = StringReplace($FileSaveDialog, ".SNF.SNF", ".SNF")

FileWrite($FileSaveDialog, $Encrypt)

WinSetTitle("Bloc sencillo", "", "Bloc sencillo - " & $FileSaveDialog & "")

GUICtrlSetData($Edit, $Readedit1)

Case $PrintItem

$Readeditprint = GUICtrlRead($Edit)

$Filewriteprint = FileWrite(@TempDir & "\printtest.txt", $Readeditprint)

$File = @TempDir & "\printtest.txt"

_FilePrint($File)

Sleep(500)

FileDelete(@TempDir & "\printtest.txt")

Case $RunScriptItem

$Readau3 = GUICtrlRead($Edit)

FileWrite(@ScriptDir & "\script.au3", $Readau3)

Run('"' & @AutoItExe & '" /AutoIt3ExecuteScript "' & @ScriptDir & '\script.au3"')

Sleep(500)

FileDelete(@ScriptDir & "\script.au3")

Case $ExitItem

Exit

Case $ICTItem

ControlSend($Form1, "", $Edit, $Time)

Case $RTItem

$ReverseRead = GUICtrlRead($Edit)

$Reverse = _StringReverse($ReverseRead)

GUICtrlSetData($Edit, $Reverse)

Case $WordCountItem

$Wordcount = GUICtrlRead($Edit)

$wordsplit = StringSplit($Wordcount, " ")

$words = $wordsplit[0]

$finwords = $words

MsgBox(0, "Bloc sencillo", "Las palabras: " & $finwords & "")

Case $CopyItem

Send("^C")

Case $PasteItem

Send("^V")

Case $UndoItem

Send("^z")

Case $RedoItem

Send("^y")

Case $FontItem

$cfont = _ChooseFont()

$Font = GUICtrlSetFont($Edit, $cfont[3], $cfont[4], $cfont[1], $cfont[2])

$Color = GUICtrlSetColor($Edit, $cfont[7])

Case $ScramblerItem

$sentence = GUICtrlRead($Edit)

If $sentence <> "" Then

GUICtrlSetData($Edit, "")

GUICtrlSetData($Edit, _Sentence_Scramble($sentence))

EndIf

Case $SpellCheckItem

;Not Implemented yet.

Case $StartSpeakItem

$texttoread = GUICtrlRead($Edit)

_Talk($oSpeech, $texttoread, 3)

Case $StopSpeakItem

$oSpeech = ObjCreate("SAPI.SpVoice")

Case $AboutItem

MsgBox(0, "Bloc sencillo", "El Bloc sencillo 1,0 Registran en el registro de la propiedad literaria Justin Reno 2007. Documente Desmodulador por Pelotillero.")

EndSwitch

WEnd

Func _Talk(ByRef $o_Speech, $s_text, $s_voice = 3)

Local Const $SVSFlagsAsync = 1

Select

Case $s_voice == 1

$o_Speech.Voice = $o_Speech.GetVoices ("Name=Microsoft Mary", "Language=409").Item (0)

Case $s_voice == 2

$o_Speech.Voice = $o_Speech.GetVoices ("Name=Microsoft Mike", "Language=409").Item (0)

Case $s_voice == 3

$o_Speech.Voice = $o_Speech.GetVoices ("Name=Microsoft Sam", "Language=409").Item (0)

EndSelect

$o_Speech.Speak ($s_text, $SVSFlagsAsync)

EndFunc ;==>_Talk

Func AnimateTitle($hGUI, $sTitle, $iBuf)

$sTitle = StringSplit($sTitle, "")

For $i = $iBuf To 0 Step - 1

WinSetTitle($hGUI, "", _StringRepeat(" ", $i) & $sTitle[1])

Next

Local $s

For $i = 1 To $sTitle[0]

$s &= $sTitle[$i]

WinSetTitle($hGUI, "", $s)

Sleep(5)

Next

EndFunc ;==>AnimateTitle

Func _Sentence_Scramble($sentence)

Local $randomList

Local $scrambled_Sentence

$randomList = StringSplit($sentence, " ")

For $i = 1 To $randomList[0]

$scrambled_Sentence &= _Word_Randomize($randomList[$i]) & " "

Next

Return StringTrimRight($scrambled_Sentence, 1)

EndFunc ;==>_Sentence_Scramble

Func _Word_Randomize($word)

If StringLen($word) < 4 Then Return $word

Local $literal

For $i = 2 To Int(StringLen($word) / 2)

$literal = $literal & StringMid($word, StringLen($word) - _

$i + 1, 1) & StringMid($word, $i, 1)

Next

If Mod(StringLen($word), 2) Then

$literal = $literal & StringMid($word, $i, 1)

EndIf

Return StringLeft($word, 1) & $literal & StringRight($word, 1)

EndFunc ;==>_Word_Randomize

Link to comment
Share on other sites

Suggestions:

Bloc sencillo sounds... well, not good. You can keep the name in English. Or use the word 'Simple', which also means simple :)

Don't use verbs in imperative tense (ie, 'hable', 'redacte', etc). Use infinitive (Hablar, redactar, etc.). It's really confusing like that and hard to understand.

So, do the following replacements:Abra: Abrir

Salve:Guardar (Salvar means 'to save' as in 'save a life' :P )

Impresión: Imprimir

Corra Escritura AU3: Correr Como Script .au3 (loving that option)

Salida: Salir

Redacte: Not sure what you mean by this.. Maybe 'Edición' or 'Redactar' (Edición sounds better IMO)

Meta Tiempo Actual: This one made me laugh, sounds so argentian.. Use: Introducir Hora

Texto Inverso: Invertir Texto

Redacte a Conde: I have absolutely no idea what this means or does. The sentense makes no sense.

Copia: Copiar

Pasado: Pegar (aparently you translated 'past' instead of 'paste')

Deshaga: Deshacer

Vuelva a hacer: Rehacer

Tipo de letra: Fuente. (tipo de letra is not that bad, but all the programs use fuente)

Trepe documento: Not sure what this does.. it mixes the words? I can't think of a spanish expression. Tell me the one in english.

Deletree Cheque: This means 'Spell the check' haha, use: Revisar Ortografía

Hable: Hablar

Hable texto: Hablar texto

Pare Hablar: Parar de hablar

The about window makes no sense at all. I will translate for you if you tell me what the original one says. :)

-edit-

typo

There's an error iin your script. When I go to choose the font type and press cancel, I get the Subscript used with non-array variable.

Edited by Nahuel
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...