Post by lujanw » 15 Feb 2015, 09:25
wolf_II wrote:Gib mal bitte ein Beispiel für Inputfile (zB. Input.ini) und den von Dir gewollten OutputFile (zB. Output.ini). Vielleicht sehe ich dann wo das Problem ist? Sind da Zeilen drin, die unkonventionell sind?
SubStr(A_LoopReadLine, 1, 1) gibt Dir das erste Zeichen aus der Zeichenkette A_LoopReadLine zurück.
Also in der Ausgangs-Datein steht z.B. das hier:
Code: Select all
[Cali Kartell]
booba_Lunatic=Cali Kartell
Aber in die Gegnerliste soll nur das "booba_lunatic=Cali Kartell" stehen nicht das [Cali Kartell]
Meinste das mit Beispiel? ^^
Wenn nicht hier die ganze funktion:
SpoilerCode: Select all
:?:/CKadd::
suspend permit
SendInput /add{Space}
Input, name, V I M, {enter}
SendInput {end}+{home}{Del}{Esc}
if name is not number
{
addchatmessage("{56bfeb}INFO: {FFFFFF}Bitte gültige eine ID eingeben!")
return
}
text := getplayernamebyid(name)
myname := getusername()
if (text=myname)
{
addchatmessage("{FFFFFF}{56bfeb}INFO: {FFFFFF}Du kannst dich nicht selbst zur Gegnerliste hinzufügen!")
return
}
if (text == -1)
{
addchatmessage("{FFFFFF}{56bfeb}INFO: {FFFFFF}Dieser Spieler ist nicht online!")
return
}
umwandeln:= GetPlayerNameByID(name)
FileRead, Liste, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\CK.txt
If InStr(Liste, umwandeln)
{
Addchatmessage("{FFFFFF}{56bfeb}INFO: {FFFFFF}" umwandeln " ist bereits vorhanden!")
return
}
else
GangMafia = Cali Kartell
{
FileAppend, `n%text%, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\CK.txt
IniWrite, %GangMafia%, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\Gegner.ini, Cali Kartell, %umwandeln%
InputFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\Gegner.ini
OutputFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\Gegnerlisten.ini
Loop, Read, %InputFile%, %OutputFile%
If !SubStr(A_LoopReadLine, 1, 1) = "["
FileAppend, %A_LoopReadLine%
addChatmessage("{56bfeb}" text " {FFFFFF}erfolgreich als Cali Kartell hinzugefügt!")
}
return
[quote="wolf_II"]Gib mal bitte ein Beispiel für Inputfile (zB. Input.ini) und den von Dir gewollten OutputFile (zB. Output.ini). Vielleicht sehe ich dann wo das Problem ist? Sind da Zeilen drin, die unkonventionell sind?
[c]SubStr(A_LoopReadLine, 1, 1)[/c] gibt Dir das erste Zeichen aus der Zeichenkette [c]A_LoopReadLine[/c] zurück.[/quote]
Also in der Ausgangs-Datein steht z.B. das hier:
[code=autohotkey file=Script.ahk][Cali Kartell]
booba_Lunatic=Cali Kartell
[/code]
Aber in die Gegnerliste soll nur das "booba_lunatic=Cali Kartell" stehen nicht das [Cali Kartell]
Meinste das mit Beispiel? ^^
Wenn nicht hier die ganze funktion:
[spoiler][code=autohotkey file=Script.ahk] :?:/CKadd::
suspend permit
SendInput /add{Space}
Input, name, V I M, {enter}
SendInput {end}+{home}{Del}{Esc}
if name is not number
{
addchatmessage("{56bfeb}INFO: {FFFFFF}Bitte gültige eine ID eingeben!")
return
}
text := getplayernamebyid(name)
myname := getusername()
if (text=myname)
{
addchatmessage("{FFFFFF}{56bfeb}INFO: {FFFFFF}Du kannst dich nicht selbst zur Gegnerliste hinzufügen!")
return
}
if (text == -1)
{
addchatmessage("{FFFFFF}{56bfeb}INFO: {FFFFFF}Dieser Spieler ist nicht online!")
return
}
umwandeln:= GetPlayerNameByID(name)
FileRead, Liste, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\CK.txt
If InStr(Liste, umwandeln)
{
Addchatmessage("{FFFFFF}{56bfeb}INFO: {FFFFFF}" umwandeln " ist bereits vorhanden!")
return
}
else
GangMafia = Cali Kartell
{
FileAppend, `n%text%, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\CK.txt
IniWrite, %GangMafia%, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\Gegner.ini, Cali Kartell, %umwandeln%
InputFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\Gegner.ini
OutputFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\Cekretus Keybinder\Gegnerlisten\Gegnerlisten.ini
Loop, Read, %InputFile%, %OutputFile%
If !SubStr(A_LoopReadLine, 1, 1) = "["
FileAppend, %A_LoopReadLine%
addChatmessage("{56bfeb}" text " {FFFFFF}erfolgreich als Cali Kartell hinzugefügt!")
}
return[/code][/spoiler]