This time I've made a Type Test!
With not only english sentence's.
The test includes:
- English
- Nederlands
- Deutsch
- Français
- Spanisch (Still needs to be translated!)
- Roumain (Is able when Spanish is translated!)
- Random
AutoIt
#include <GUIConstantsEx.au3> $SelectLanguage = _SelectLanguage() $Random = _RandomSentence($SelectLanguage) $GUI = GUICreate("Type test", 400, 130) GUICtrlCreateLabel("Type the following sentence:" & @CRLF & $Random, 10, 10) $Start = GUICtrlCreateButton("Start", 10, 45, 50) $Input = GUICtrlCreateInput("", 10, 80, 380, 20) $Label = GUICtrlCreateLabel("", 10, 110, 300) GUISetState() While 1 $nMsg = GUIGetMsg() Select Case $nMsg = -3 Exit Case $nMsg = $Start GUICtrlSetData($Input, "") GUICtrlSetState($Input, $GUI_FOCUS) $x = TimerInit() Do $xx = TimerDiff($x) Until GUICtrlRead($Input) == $Random $xxx = Round($xx / 1000, 1) GUICtrlSetData($Label, $xxx & " seconds.") EndSelect WEnd Func _SelectLanguage() $L_GUI = GUICreate("Select Language", 120, 210, -1, -1) GUICtrlCreateLabel("Select your language", 10, 10) $r_English = GUICtrlCreateRadio("English", 10, 30) $r_Nederlands = GUICtrlCreateRadio("Nederlands", 10, 50) $r_Deutsch = GUICtrlCreateRadio("Deutsch", 10, 70) $r_Francais = GUICtrlCreateRadio("Français", 10, 90) $r_Spanisch = GUICtrlCreateRadio("Spanisch", 10, 110) $r_Roumain = GUICtrlCreateRadio("Roumain", 10, 130) $r_Random = GUICtrlCreateRadio("Random", 10, 150) GUICtrlSetState($r_English, 1) $Select = GUICtrlCreateButton("Select", 10, 175, 70) GUISetState() While 2 $nMsg2 = GUIGetMsg() Select Case $nMsg2 = -3 Exit Case $nMsg2 = $Select If GUICtrlRead($r_English) = 1 Then $r_Language = "ENGLISH" ElseIf GUICtrlRead($r_Nederlands) = 1 Then $r_Language = "NEDERLANDS" ElseIf GUICtrlRead($r_Deutsch) = 1 Then $r_Language = "DEUTSCH" ElseIf GUICtrlRead($r_Francais) = 1 Then $r_Language = "FRANCAIS" ElseIf GUICtrlRead($r_Spanisch) = 1 Then $r_Language = "SPANISCH" ElseIf GUICtrlRead($r_Roumain) = 1 Then $r_Language = "ROUMAIN" Else $r_Language = "RANDOM" EndIf GUIDelete($L_GUI) ExitLoop EndSelect WEnd Return $r_Language EndFunc Func _RandomSentence($Language) Local $Sentence[80] $Sentence[0] = "I want to stay, but I must go home now." $Sentence[1] = "I'll be home within an hour. Please wait." $Sentence[2] = "The war is over. Now we have peace." $Sentence[3] = "Open the window. I need some fresh air." $Sentence[4] = "Too many people died in the war. It's time for peace now." $Sentence[5] = "He was born in New York, but he grew up in Chicago." $Sentence[6] = "My hair isn't wet anymore. It's dry." $Sentence[7] = "Are you calling from your home?" $Sentence[8] = "You must repair that bike now." $Sentence[9] = "They should have brought an umbrella." $Sentence[10] = "You should pay attention to his words." $Sentence[11] = "You should not have listened to that bad advice." $Sentence[12] = "Could you tell me a bit more about yourself?" $Sentence[13] = "When we go to England we always visit our friends there." $Sentence[14] = "What kind of people do things like this?" $Sentence[15] = "He bought two pairs of shorts on holiday." $Sentence[16] = "If I were you I would have learned my lesson." $Sentence[17] = "When I go shopping I always buy some food." $Sentence[18] = "What kind of fairy tales do you believe in?" $Sentence[19] = "He had to work hard to get the job finished in time." $Sentence[20] = "Ik wil graag blijven, maar ik moet nu naar huis." $Sentence[21] = "Ik ben in een uur thuis. Wacht alsjeblieft." $Sentence[22] = "De oorlog is over. Nu hebben nu vrede." $Sentence[23] = "Open het raam. Ik heb frise lucht nodig." $Sentence[24] = "Te veel mensen zijn gestorven in de oorlog. Het is tijd voor vrede." $Sentence[25] = "Hij is geboren in New York, maar hij is opgegroeit in Chicago." $Sentence[26] = "Mijn haar is niet meer nat. Het is droog." $Sentence[27] = "Bel jij vanaf je eigen huis?" $Sentence[28] = "Je moet die fiest nu repareren." $Sentence[29] = "Ze hadden een paraplu mee moeten nemen." $Sentence[30] = "Je zou meer aandacht moeten geven aan wat hij zegt." $Sentence[31] = "Je zou niet moeten luisteren naar dat slechte advies." $Sentence[32] = "Kan je iets meer vertellen over jezelf?" $Sentence[33] = "Als we naar Engeland gaan, bezoeken we altijd onze vrienden." $Sentence[34] = "Wat voor soort persoon doet nou zoiets." $Sentence[35] = "Hij heeft twee paar korte broekken gekocht op vakantie." $Sentence[36] = "Als ik jou was had ik mij lesje wel geleerd." $Sentence[37] = "Als ik ga winkelen koop ik altijd wat te eten." $Sentence[38] = "In wat voor soort sprookjes geloof jij?" $Sentence[39] = "Hij moest heel hard werken om het op tijd af te krijgen." $Sentence[40] = "Ich würde gerne bleiben, aber ich muss jetzt nach hause." $Sentence[41] = "Ich bin vor einer Stunde wieder zurück, bitte warte." $Sentence[42] = "Der Krieg ist vorbei. Jetzt haben wir Frieden." $Sentence[43] = "Öffne das Fenster. Ich brauche etwas frische Luft." $Sentence[44] = "Zu viele Menschen starben im Krieg. Es ist zeit für Frieden." $Sentence[45] = "Er wurde in New York geboren, aber er ist in Chicago aufgewachsen." $Sentence[46] = "Mein Haar ist nicht mehr nass, es ist trocken." $Sentence[47] = "Rufst du von zuhause an?" $Sentence[48] = "Du musst das Fahrrad jetzt repariren." $Sentence[49] = "Sie sollten einen Regenschirm mitbringen." $Sentence[50] = "Du solltest seinen worten aufmerksamkeit schenken." $Sentence[51] = "Du solltest diesem schlechtem Rat nicht folgen." $Sentence[52] = "Könntest du mir etwas mehr über dich erzählen." $Sentence[53] = "Wann gehen wir nach England, wir besuchen immer unsere Freunde dort." $Sentence[54] = "Welche Menschen denken so etwas." $Sentence[55] = "Er hat im Urlaub zwei paar Hosen gekauft." $Sentence[56] = "Wenn ich du wäre, hätte ich meine Aufgaben gelernt." $Sentence[57] = "Wenn ich einkaufen gehe, kaufe ich immer etwas zu essen." $Sentence[58] = "An welches Märchen glaubst du?" $Sentence[59] = "Er musste hart arbeiten um es in dieser zeit zu schaffen." $Sentence[60] = "Je veux rester, mais je dois rentrer maintenant." $Sentence[61] = "La guerre est terminé. Maintenant nous avons la paix." $Sentence[62] = "Je serai à la maison dans une heure. Attendez s'il vous plaît." $Sentence[63] = "Ouvrez la fenêtre. J'ai besoin d'un peu d'air frais." $Sentence[64] = "Trop de personnes sont mortes dans la guerre. C'est le temps pour la paix maintenant." $Sentence[65] = "Il est né à New York, mais il a grandi à Chicago." $Sentence[66] = "Mes cheveux ne sont pas humides désormais. C'est sec." $Sentence[67] = "Appelez-vous de votre maison?" $Sentence[68] = "Tu dois réparer ce vélo maintenant." $Sentence[69] = "Ils devraient avoir apporté un parapluie." $Sentence[70] = "Vous devriez prêter l'attention à ses mots." $Sentence[71] = "Vous ne devriez pas avoir écouté ce mauvais conseil." $Sentence[72] = "Pourriez-vous me dire un peu plus de vous?" $Sentence[73] = "Quand nous allons en Angleterre nous visitons toujours nos amis là." $Sentence[74] = "Quel genre de gens font des choses comme ça?" $Sentence[75] = "Il a acheté 2 paires de shorts en vacances." $Sentence[76] = "Si j'étais toi j'aurais appris ma leçon." $Sentence[77] = "Quand je vais faire les courses j'achète toujours de la nourriture." $Sentence[78] = "En quel sorte de conte de fée vous croyez?" $Sentence[79] = "Il doit travailler dur pour avoir son travail terminé a temps." #cs $Sentence[100] = "Vreau sa ramân, dar trebuie sa merg acasa acum." $Sentence[101] = "Voi fi acasa într-o ora. Te rog asteapta-ma." $Sentence[102] = "Razboiul s-a terminat. Acum avem pace." $Sentence[103] = "Deschide fereastra. Am nevoie de putin aer curat." $Sentence[104] = "Prea multi oameni au murit în acest razboi. E timpul pentru pace acum." $Sentence[105] = "S-a nascut în New York, dar a crescut în Chicago." $Sentence[106] = "Parul meu nu este mai umed. Este uscat." $Sentence[107] = "Suni de la tine de acasa?" $Sentence[108] = "Trebuie sa repari aceasta bicicleta acum." $Sentence[109] = "Ei ar fi trebuit sa îsi aduca o umbrela" $Sentence[110] = "Ar trebui sa acorzi atentie cuvintelor mele." $Sentence[111] = "Nu ar fi trebuit sa asculti sfatul rau." $Sentence[112] = "Poti sa-mi spui un pic mai multe despre tine?" $Sentence[113] = "Cand merg în Anglia întotdeauna am prieteni de vizitat acolo." $Sentence[114] = "Ce fel de oameni fac lucruri de genul asta?" $Sentence[115] = "El a cumparat doua perechi de pantaloni scurti în vacanta." $Sentence[116] = "Daca as fi în locul tau mi-as fi învatat lectia." $Sentence[117] = "Când ma duc la cumparaturi întotdeauna cumpar ceva de mancare." $Sentence[118] = "În ce fel de basme crezi?" $Sentence[119] = "El a trebuit sa munceasca din greu pentru a termina munca la timp." #ce If $Language = "ENGLISH" Then Return $Sentence[Random(0, 19, 1)] ElseIf $Language = "NEDERLANDS" Then Return $Sentence[Random(20, 39)] ElseIf $Language = "DEUTSCH" Then Return $Sentence[Random(40, 59, 1)] ElseIf $Language = "FRANCAIS" Then Return $Sentence[Random(60, 79, 1)] ; ElseIf $Language = "SPANISCH" Then ; Return $Sentence[Random(80, 99)] ;ElseIf $Language = "ROUMAIN" Then ; Return $Sentence[Random(100, 119)] Else Return $Sentence[Random(0, 79, 1)] EndIf EndFunc
Credits for Translating!
"$uiCide!?" for Nederlands (Almar Mulder)
"DeviL" for Deutsch (Andreas Untch)
"» 'Błɑck.Bird « " for Francais (Benoit)
"Andreik" for Roumain
AlmarM
Edited by AlmarM, 04 October 2008 - 04:09 PM.
