Hallo!
Ich wollte ein AutoIt script schreiben, was auf 4 textdateien jeweils ein Wort rausnimmt, und diese in einem satz anordnet (anorden muss es nich halt nur so hintereinander in einer textbox anziegen).
Wie mach ich das?
Bitte nich so kompliziert erklären, bin neu
Hast du dir schon die aktuellen hilfen geladen? Den link dazu gibt es links in dder "Info-Links"-Box
Guck dir mal FileRead bzw. InIread an, wenn ich ein bisschen zeit hab mach ich dir mal ein beispiel
EDIT:
Könntest du diese Textdateien mal Posten?
prinzipiell:
name.txt
=> name1
=> name2
=> name3
=> ....
verb.txt
=> geht
=> schläft
=> ...
adj.txt
=> gelangweilt
=> nass
=> krank
=> ...
ort.txt
=> am Bahnhof
=> zuhause
=> ....
$1 = "Ich wollte ein AutoIt script schreiben" ;.txt Dateien können mit Fileread, Filereadline oder _Filereadtoarray eingelesen werden -> s. Hilfe
$2 = "was auf 4 textdateien jeweils ein Wort rausnimmt"
$3 = "und diese in einem satz anordnet"
$4 = "in einer textbox anziegen"
$a1 = stringsplit($1, " ")
$r1 = Random(1, ubound($a1))
$a2 = stringsplit($2, " ")
$r2 = Random(1, ubound($a2))
$a3 = stringsplit($3, " ")
$r3 = Random(1, ubound($a3))
$a4 = stringsplit($4, " ")
$r4 = Random(1, ubound($a4))
MsgBox(1, "", $a1[$r1] & " " & $a2[$r2] & " " & $a3[$r3] & " " & $a4[$r4])
[/autoit]
Hallo,
mit
_filereadtoarray()
[/autoit]liest du die einzelnen Zeilen deiner Datei in ein "Array"(Datenfeld). In diesem Array ist jede Zeile deiner Datei mit einer Indexnummer anzusprechen. Also Array[1]="Name1", Array[2]="Name2" , Array[3]="Name3"usw
Dann kannst du mit
random()
[/autoit]eine Zahl zwischen 1 und der Anzahl der Zeilen (steht in Array[0]^^) bestimmen und zum Beispiel der Variablen $randomzahl zuweisen.
[autoit]$ersteswort=$Array[$randomzahl]
[/autoit]ist das erste Wort. So machst du es mit den anderen Dateien auch.
Zum guten Schluß würde ich den "Satz" in einer
Msgbox()
[/autoit]ausgeben
Wenn du auf die AutoIt-Befehle (blaue Schrift) im Browser klickst, öffnet sich die Hilfe....
ciao
Andy
in der textbox wird jtz garnix angezeigt xD
$datei = FileOpen("nomen.txt" ,1)
$datei1 = FileOpen("verb.txt" ,1)
$datei2 = FileOpen("adj.txt" ,1)
$datei3 = FileOpen("ort.txt" ,1)
$1 = FileRead($datei)
$2 = FileRead($datei1)
$3 = FileRead($datei2)
$4 = FileRead($datei3)
$a1 = stringsplit($1, " ")
$r1 = Random(1, ubound($a1))
$a2 = stringsplit($2, " ")
$r2 = Random(1, ubound($a2))
$a3 = stringsplit($3, " ")
$r3 = Random(1, ubound($a3))
$a4 = stringsplit($4, " ")
$r4 = Random(1, ubound($a4))
MsgBox(1, "", $a1[$r1] & " " & $a2[$r2] & " " & $a3[$r3] & " " & $a4[$r4])Also ich würde das dann nicht mit vielen TXT-Dateien machen sondern mit einer INI
Ich hab dir mal ein beispiel gemacht:
$Ini = @ScriptDir & "\Dreck.ini"
$Sections = IniReadSectionNames ($Ini)
$Text = ""
For $1 = 1 To $Sections[0]
$Read = IniReadSection ($Ini,$Sections[$1])
$Text &= " " & $Read[Random (1,$Read[0][0])][1]
Next
MsgBox (0,"",$Text)
[Name]
1=Name1
2=Name2
3=Name3
[Verb]
1=geht
2=schläft
[adj]
1=gelangweilt
2=nass
3=krank
[Ort]
=am Bahnhof
=zuhauseHi,
hier mal beispiel für eine Datei
#include <File.au3> ;die Bibliothek für den _filereadtoarray()-Befehl einfügen
Dim $array ; das Array dimensionieren
_filereadtoarray("Test1.txt",$array) ; Daten aus der Textdatei in ein Array einlesen
$random=random(1,$array[0],1) ; eine Zufallszahl erzeugen
msgbox(0,0,$array[$random]); den "zufälligen" Arrayinhalt darstellen
Du musst Fileopen im Lesemodus (0) verwenden.
Geht soweit, bis auf , dass er aus der ini den 10 eintrag jeweils nicht nimmt (hab jeweils 10)
Von welchem script jetzt?
deins mit der ini
Guck dir mal mein Skript Bullshitgenerator an.
Die aktuelle Version gibts nur auf meinem Blog.
Stiimt, machs einfach so
$Ini = @ScriptDir & "\Dreck.ini"
$Sections = IniReadSectionNames ($Ini)
$Text = ""
For $1 = 1 To $Sections[0]
$Read = IniReadSection ($Ini,$Sections[$1])
$Text &= " " & $Read[Random (1,$Read[0][0] +1)][1]
Next
MsgBox (0,"",$Text)