[Release]Config Source

01/19/2012 00:20 xShizoidx#1
Guten Abend,

Ich habe mal vor einiger Zeit die Config nachgeschrieben und veröffentliche nun mal das Script. Ihr könntet beispielsweise diese Config designen und sie für euren P Server benutzen. Die .kfx Datei ist auch im Anhang, damit ihr das mit dem Designen etwas besser abschätzen könnt oder die GUI bearbeiten könnt.

Script :

Es ist zwar nicht gerade brilliant geschrieben, aber es läuft einwandfrei.

Mit freundlichen Grüßen,

Netterwurm8
01/19/2012 00:49 #SoNiice#2
Du hast nicht ehrlich die Metin2 Config.exe in AutoIT nachgecodet? Du bist ehrlich der ruhigste Typ der Welt, ich kenne keinen, der sich sonst die Zeit dafür genommen hätte :-O
Gibt's nämlich schon in zig anderen größeren Sprachen.
06/23/2012 10:42 Lordechen#3
Hallo Leute,

entschuldigung wenn ich nun dieses alte Thema wieder hervorgrame aber ich benötige hilfe dazu.

Ich bekomm folgenden fehler bei diesen Script:
Config.au3 (81) : ==> Incorrect number of parameters in function call.:
$File = FileOpen("metin2.cfg")
$File = ^ ERROR
>Exit code: 1 Time: 0.309

Kann mir bitte jemand helfen.

MFG Lordechen
06/23/2012 11:04 Unpublished#4
Code:
$File = FileOpen("metin2.cfg", 0)
Aber sollte man auch mit FileClose wieder schließen
06/23/2012 11:32 Lordechen#5
Danke funktioniert soweit doch bekanntlich läst das nächste problem nicht lange auf sich warten.

Nun speichert er leider keine änderungen :(
06/23/2012 11:37 Unpublished#6
Hast du schon ein FileClose($File) am Ende der _ReadToConfig Funktion?
06/23/2012 11:42 Lordechen#7
Hab ich grade rein aber das problem ist er übrschreibt mir nun die datei so das sie lehr ist

Hier mal der code:
PHP Code:
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$GUI = GUICreate("CONFIG", 500, 309, 347, 409)
$GroupDisplay = GUICtrlCreateGroup("Display", 16, 8, 225, 121)
$LabelAuflosung = GUICtrlCreateLabel("Auflösung", 32, 36, 51, 17)
$ComboAuflosung = GUICtrlCreateCombo("800x600 32bpp", 104, 32, 105, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "1024x768 32bpp|1152x864 32bpp|1280x720 32bpp|1280x768 32bpp|1280x800 32bpp|1280x960 32bpp|1280x1024 32bpp")
GUICtrlSetData(-1, "800x600 16bpp|1024x768 16bpp|1152x864 16bpp|1280x720 16bpp|1280x768 16bpp|1280x800 16bpp|1280x960 16bpp|1280x1024 16bpp")
$LabelFrequenz = GUICtrlCreateLabel("Frequenz", 32, 68, 48, 17)
$ComboFrequenz = GUICtrlCreateCombo("", 104, 64, 105, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GuiCtrlSetData(-1,"75|60","75")
$LabelGamma = GUICtrlCreateLabel("Gamma", 32, 96, 40, 17)
$ComboGamma = GUICtrlCreateCombo("1", 104, 96, 105, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1,"2|3|4|5|6")
$GroupWindowMode = GUICtrlCreateGroup("Window Mode", 256, 8, 233, 57)
$RadioFenstermodus = GUICtrlCreateRadio("Fenstermodus", 272, 32, 89, 17)
$RadioVollbildmodus = GUICtrlCreateRadio("Vollbildmodus", 368, 32, 97, 17)
$GroupIMEMode = GUICtrlCreateGroup("IME Mode", 256, 72, 233, 57)
$RadioGAMEIME = GUICtrlCreateRadio("GAME IME", 272, 96, 81, 17)
$RadioExternalIME = GUICtrlCreateRadio("External IME", 368, 96, 89, 17)
$GroupSound = GUICtrlCreateGroup("Sound", 16, 136, 225, 81)
$LabelMusik = GUICtrlCreateLabel("Musik", 32, 160, 32, 17)
$LabelSFX = GUICtrlCreateLabel("SFX", 32, 192, 24, 17)
$EditMusik = GUICtrlCreateEdit("0", 88, 160, 17, 17, $ES_WANTRETURN)
$EditSFX = GUICtrlCreateEdit("0", 88, 192, 17, 17, $ES_WANTRETURN)
$SliderMusik = GUICtrlCreateSlider(120, 152, 102, 29, BitOR($GUI_SS_DEFAULT_SLIDER,$TBS_BOTH,$TBS_NOTICKS))
GUICtrlSetLimit(-1, 5, 0)
$SliderSFX = GUICtrlCreateSlider(121, 185, 102, 29, BitOR($GUI_SS_DEFAULT_SLIDER,$TBS_BOTH,$TBS_NOTICKS))
GUICtrlSetLimit(-1, 5, 0)
$GroupGFX = GUICtrlCreateGroup("GFX", 256, 136, 233, 129)
$LabelFOG = GUICtrlCreateLabel("FOG", 264, 160, 26, 17)
$ComboFOG = GUICtrlCreateCombo("Near", 384, 156, 89, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GuiCtrlSetData(-1,"Mid|Far")
$LabelTNL = GUICtrlCreateLabel("TNL", 264, 196, 25, 17)
$ComboTNL = GUICtrlCreateCombo("Auto", 384, 192, 89, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1,"CPU|GPU")
$LabelSchatten = GUICtrlCreateLabel("Schatten", 264, 236, 47, 17)
$ComboSchatten = GUICtrlCreateCombo("None", 384, 232, 89, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1,"Background|Background+Player|All")
$CheckUseSoftwarecursor = GUICtrlCreateCheckbox("Use Software cursor", 32, 232, 137, 17)
$ButtonUbernehmen = GUICtrlCreateButton("Ubernehmen", 152, 272, 83, 25)
$ButtonAbbrechen = GUICtrlCreateButton("Abbrechen", 256, 272, 83, 25)
_ReadToConfig()
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $SliderMusik
            GuiCtrlSetData($EditMusik,GuiCtrlRead($SliderMusik))
        Case $SliderSFX
            GuiCtrlSetData($EditSFX,GuiCtrlRead($SliderSFX))
        Case $ButtonAbbrechen
            Exit
        Case $ButtonUbernehmen
            $F = FileOpen("metin2.cfg",2)
            _SetAuflosung()
            _SetFrequenz()
            _SetCursor()
            _SetFog()
            _SetTNL()
            _SetSchatten()
            _SetMusik()
            _SetSFX()
            _SetGamma()
            _SetWindowMode()
            _SetIMEMode()
            Exit
    EndSwitch
WEnd

Func _ReadToConfig()
    $D = "metin2.cfg"
    $File = FileOpen("metin2.cfg", 0)
If FileReadLine($File,1) = "WIDTH                    800" And FileReadLine($File,2) = "HEIGHT                    600" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"800x600 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    800" And FileReadLine($File,2) = "HEIGHT                    600" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"800x600 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1024" And FileReadLine($File,2) = "HEIGHT                    768" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1024x768 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1024" And FileReadLine($File,2) = "HEIGHT                    768" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1024x768 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1152" And FileReadLine($File,2) = "HEIGHT                    864" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1152x864 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1152" And FileReadLine($File,2) = "HEIGHT                    864" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1152x864 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    720" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1280x720 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    720" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1280x720 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    768" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1280x768 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    768" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1280x768 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    800" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1280x800 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    800" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1280x800 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    960" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1280x960 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    960" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1280x960 16bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    960" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1280x960 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    1024" And FileReadLine($File,3) = "BPP                    32" Then
        GuiCtrlSetData($ComboAuflosung,"1280x1024 32bpp")
Endif
If FileReadLine($File,1) = "WIDTH                    1280" And FileReadLine($File,2) = "HEIGHT                    1024" And FileReadLine($File,3) = "BPP                    16" Then
        GuiCtrlSetData($ComboAuflosung,"1280x1024 16bpp")
Endif
If FileReadLine($File,4) = "FREQUENCY                75" Then
    GuiCtrlSetData($ComboFrequenz,"75")
EndIf
If FileReadLine($File,4) = "FREQUENCY                60" Then
    GuiCtrlSetData($ComboFrequenz,"60")
EndIf
If FileReadLine($File,5) = "SOFTWARE_CURSOR        1" Then
    GuiCtrlSetState($CheckUseSoftwarecursor,$GUI_CHECKED)
EndIf
If FileReadLine($File,6) = "VISIBILITY                1" Then
    GuiCtrlSetData($ComboFOG,"Near")
EndIf
If FileReadLine($File,6) = "VISIBILITY                2" Then
    GuiCtrlSetData($ComboFOG,"Mid")
EndIf
If FileReadLine($File,6) = "VISIBILITY                3" Then
    GuiCtrlSetData($ComboFOG,"Far")
EndIf
If FileReadLine($File,7) = "SOFTWARE_TILING        0" Then
    GuiCtrlSetData($ComboTNL,"Auto")
EndIf
If FileReadLine($File,7) = "SOFTWARE_TILING        1" Then
    GuiCtrlSetData($ComboTNL,"CPU")
EndIf
If FileReadLine($File,7) = "SOFTWARE_TILING        2" Then
    GuiCtrlSetData($ComboTNL,"GPU")
EndIf
If FileReadLine($File,8) = "SHADOW_LEVEL            0" Then
    GuiCtrlSetData($ComboSchatten,"None")
EndIf
If FileReadLine($File,8) = "SHADOW_LEVEL            1" Then
    GuiCtrlSetData($ComboSchatten,"Background")
EndIf
If FileReadLine($File,8) = "SHADOW_LEVEL            2" Then
    GuiCtrlSetData($ComboSchatten,"Background+Player")
EndIf
If FileReadLine($File,8) = "SHADOW_LEVEL            3" Then
    GuiCtrlSetData($ComboSchatten,"All")
EndIf
If FileReadLine($File,9) = "MUSIC_VOLUME            1" Then
    GuiCtrlSetData($SliderMusik,"1")
    GuiCtrlSetData($EditMusik,"1")
EndIf
If FileReadLine($File,9) = "MUSIC_VOLUME            2" Then
    GuiCtrlSetData($SliderMusik,"2")
    GuiCtrlSetData($EditMusik,"2")
EndIf
If FileReadLine($File,9) = "MUSIC_VOLUME            3" Then
    GuiCtrlSetData($SliderMusik,"3")
    GuiCtrlSetData($EditMusik,"3")
EndIf
If FileReadLine($File,9) = "MUSIC_VOLUME            4" Then
    GuiCtrlSetData($SliderMusik,"4")
    GuiCtrlSetData($EditMusik,"4")
EndIf
If FileReadLine($File,9) = "MUSIC_VOLUME            5" Then
    GuiCtrlSetData($SliderMusik,"5")
    GuiCtrlSetData($EditMusik,"5")
EndIf
If FileReadLine($File,10) = "VOICE_VOLUME            1" Then
    GuiCtrlSetData($SliderSFX,"1")
    GuiCtrlSetData($EditSFX,"1")
EndIf
If FileReadLine($File,10) = "VOICE_VOLUME            2" Then
    GuiCtrlSetData($SliderSFX,"2")
    GuiCtrlSetData($EditSFX,"2")
EndIf
If FileReadLine($File,10) = "VOICE_VOLUME            3" Then
    GuiCtrlSetData($SliderSFX,"3")
    GuiCtrlSetData($EditSFX,"3")
EndIf
If FileReadLine($File,10) = "VOICE_VOLUME            4" Then
    GuiCtrlSetData($SliderSFX,"4")
    GuiCtrlSetData($EditSFX,"4")
EndIf
If FileReadLine($File,10) = "VOICE_VOLUME            5" Then
    GuiCtrlSetData($SliderSFX,"5")
    GuiCtrlSetData($EditSFX,"5")
EndIf
If FileReadLine($File,11) = "GAMMA                    1" Then
    GuiCtrlSetData($ComboGamma,"1")
EndIf
If FileReadLine($File,11) = "GAMMA                    2" Then
    GuiCtrlSetData($ComboGamma,"2")
EndIf
If FileReadLine($File,11) = "GAMMA                    3" Then
    GuiCtrlSetData($ComboGamma,"3")
EndIf
If FileReadLine($File,11) = "GAMMA                    4" Then
    GuiCtrlSetData($ComboGamma,"4")
EndIf
If FileReadLine($File,11) = "GAMMA                    5" Then
    GuiCtrlSetData($ComboGamma,"5")
EndIf
If FileReadLine($File,11) = "GAMMA                    6" Then
    GuiCtrlSetData($ComboGamma,"6")
EndIf
If FileReadLine($File,12) = "WINDOWED                0" Then
    GuiCtrlSetState($RadioVollbildmodus,$GUI_Checked)
EndIf
If FileReadLine($File,12) = "WINDOWED                1" Then
    GuiCtrlSetState($RadioFenstermodus,$GUI_Checked)
EndIf
If FileReadLine($File,13) = "USE_DEFAULT_IME        0" Then
    GuiCtrlSetState($RadioGAMEIME,$GUI_Checked)
EndIf
If FileReadLine($File,13) = "USE_DEFAULT_IME        1" Then
    GuiCtrlSetState($RadioExternalIME,$GUI_Checked)
EndIf
FileClose($File)
EndFunc

Func _SetAuflosung()
        Switch GuiCtrlRead($ComboAuflosung)
            Case "800x600 32bpp"
                FileWrite("metin2.cfg","WIDTH                    800" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    600" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1024x768 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1024" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    768" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1152x864 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1152" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    864" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1280x720 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    720" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1280x768 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    768" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1280x800 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    800" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1280x960 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    960" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "1280x1024 32bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    1024" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
            Case "800x600 16bpp"
                FileWrite("metin2.cfg","WIDTH                    800" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    600" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1024x768 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1024" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    768" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1152x864 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1152" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    864" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1280x720 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    720" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1280x768 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    768" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1280x800 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    800" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1280x960 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    960" & @CRLF)
                FileWrite("metin2.cfg","BPP                    16" & @CRLF)
            Case "1280x1024 16bpp"
                FileWrite("metin2.cfg","WIDTH                    1280" & @CRLF)
                FileWrite("metin2.cfg","HEIGHT                    1024" & @CRLF)
                FileWrite("metin2.cfg","BPP                    32" & @CRLF)
        EndSwitch
    EndFunc

Func _SetFrequenz()
    If GuiCtrlRead($ComboFrequenz) = "75" Then
        FileWrite("metin2.cfg","FREQUENCY                75" & @CRLF)
    Elseif GuiCtrlRead($ComboFrequenz) = "60" Then
        FileWrite("metin2.cfg","FREQUENCY                60" & @CRLF)
    EndIf
EndFunc

Func _SetCursor()
    If GuiCtrlRead($CheckUseSoftwarecursor) = $GUI_Checked Then
        FileWrite("metin2.cfg","SOFTWARE_CURSOR        1" & @CRLF)
    Else
        FileWrite("metin2.cfg","SOFTWARE_CURSOR        0" & @CRLF)
    EndIf
EndFunc

Func _SetFog()
    If GuiCtrlRead($ComboFOG) = "Near"       Then
        FileWrite("metin2.cfg","VISIBILITY                1" & @CRLF)
    ElseIf GuiCtrlRead($ComboFOG) = "Mid" Then
        FileWrite("metin2.cfg","VISIBILITY                2" & @CRLF)
    ElseIf GuiCtrlRead($ComboFOG) = "Far" Then
        FileWrite("metin2.cfg","VISIBILITY                3" & @CRLF)
    EndIf
EndFunc

Func _SetTNL()
    If GuiCtrlRead($ComboTNL) = "Auto" Then
    FileWrite("metin2.cfg","SOFTWARE_TILING        0" & @CRLF)
    Elseif GuiCtrlRead($ComboTNL) = "CPU" Then
    FileWrite("metin2.cfg","SOFTWARE_TILING        1" & @CRLF)
    Elseif GuiCtrlRead($ComboTNL) = "GPU" Then
    FileWrite("metin2.cfg","SOFTWARE_TILING        2" & @CRLF)
EndIf
EndFunc

Func _SetSchatten()
    If GuiCtrlRead($ComboSchatten) = "None" Then
        FileWrite("metin2.cfg","SHADOW_LEVEL            0" & @CRLF)
    ElseIf GuiCtrlRead($ComboSchatten) = "Background" Then
        FileWrite("metin2.cfg","SHADOW_LEVEL            1" & @CRLF)
    ElseIf GuiCtrlRead($ComboSchatten) = "Background+Player" Then
        FileWrite("metin2.cfg","SHADOW_LEVEL            2" & @CRLF)
    ElseIf GuiCtrlRead($ComboSchatten) = "All" Then
        FileWrite("metin2.cfg","SHADOW_LEVEL            3" & @CRLF)
    EndIf
EndFunc

Func _SetMusik()
    FileWrite("metin2.cfg","MUSIC_VOLUME            " & GuiCtrlRead($EditMusik) & @CRLF)
EndFunc

Func _SetSFX()
    FileWrite("metin2.cfg","VOICE_VOLUME            " & GuiCtrlRead($EditSFX) & @CRLF)
EndFunc

Func _SetGamma()
    FileWrite("metin2.cfg","GAMMA                    " & GuictrlRead($ComboGamma) & @CRLF)
EndFunc

Func _SetWindowMode()
    If GuiCtrlRead($RadioVollbildmodus) = $GUI_Checked Then
    FileWrite("metin2.cfg","WINDOWED                0" & @CRLF)
    Elseif GuiCtrlRead($RadioFenstermodus) = $GUI_Checked Then
    FileWrite("metin2.cfg","WINDOWED                1" & @CRLF)
    EndIf
EndFunc

Func _SetIMEMode()
    If GuiCtrlRead($RadioGAMEIME) = $GUI_Checked Then
    FileWrite("metin2.cfg","USE_DEFAULT_IME        0" & @CRLF)
    Elseif GuiCtrlRead($RadioExternalIME) = $GUI_Checked Then
    FileWrite("metin2.cfg","USE_DEFAULT_IME        1" & @CRLF)
    EndIf
EndFunc 

Jup hab ich nur die config datei ist anschließend komplett lehr
06/23/2012 11:47 Unpublished#8
Das liegt daran
Code:
Case $ButtonUbernehmen
$F = FileOpen("metin2.cfg",2)
Einfach die 2. Zeile löschen, die Variable benutzt du eh nirgendwo.
11/12/2012 14:50 Burbank#9
Hello,I'm sorry,but I don't know which program to do it.Can you recommend anyprogram for me or how to do it,please!THx