Guten Abend,
ich sitze derzeit an einem Generator für die Konfigurationsdatei vom Spiel ARK Survival Evolved.
Dort kann man das maximale Level durch eben diese Konfigurationsdatei erhöhen.
Es bleibt jedoch die Edit Box im Bereich Player Level hängen, bei den beiden anderen funktioniert es einwandfrei.
Bei Player Level und Dino Level wurde die gleiche Funktion verwendet, lediglich die Formel etwas abgeändert.
Ich sehe jedoch den Fehler einfach nicht.
Vielleicht kann mir ja von euch einer helfen ^~^
C
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.12.0
Author: Kazuto
Script Function:
This script allows you to simply generate a level configuration
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\kazu\desktop\new folder\level adjuster.kxf
$GUI = GUICreate("ARK: Survival Evolved | Level Configuration Generator", 630, 535, 192, 154)
$Tab1 = GUICtrlCreateTab(0, 32, 635, 530)
;~ Player Level
GUICtrlCreateTabItem("Player Level")
$sPlayerOutput = GUICtrlCreateEdit("", 16, 160, 601, 361)
$lPlayerLevel = GUICtrlCreateLabel("Maximum level:", 16, 72, 76, 17)
$iPlayerLevel = GUICtrlCreateInput("", 96, 70, 121, 21)
$bPlayerGenerate = GUICtrlCreateButton("Generate", 248, 68, 81, 25)
$bPlayerClear = GUICtrlCreateButton("Clear", 248, 100, 81, 25)
$iPlayerBase = GUICtrlCreateInput("", 96, 102, 121, 21)
$lPlayerBase = GUICtrlCreateLabel("Base EXP:", 16, 104, 55, 17)
$sFormular = GUICtrlCreateLabel("Formular used: Level * Level * Base EXP", 16, 136, 196, 17)
;~ Dinosaur Level
GUICtrlCreateTabItem("Dinosaur Level")
$sDinoOutput = GUICtrlCreateEdit("", 16, 160, 601, 361)
$lDinoLevel = GUICtrlCreateLabel("Maximum level:", 16, 72, 76, 17)
$iDinoLevel = GUICtrlCreateInput("", 96, 70, 121, 21)
$bDinoGenerate = GUICtrlCreateButton("Generate", 248, 68, 81, 25)
$bDinoClear = GUICtrlCreateButton("Clear", 248, 100, 81, 25)
$iDinoBase = GUICtrlCreateInput("", 96, 102, 121, 21)
$lDinoBase = GUICtrlCreateLabel("Base EXP:", 16, 104, 55, 17)
$sFormular = GUICtrlCreateLabel("Formular used: Level * Base EXP", 16, 136, 196, 17)
;~ Engram Points
GUICtrlCreateTabItem("Engram Points")
$sEngramOutput = GUICtrlCreateEdit("", 16, 160, 601, 361)
$lEngramLines = GUICtrlCreateLabel("Lines:", 16, 72, 76, 17)
$iEngramLines = GUICtrlCreateInput("", 96, 70, 121, 21)
$bEngramGenerate = GUICtrlCreateButton("Generate", 248, 68, 81, 25)
$bEngramClear = GUICtrlCreateButton("Clear", 248, 100, 81, 25)
$sFormular = GUICtrlCreateLabel("This will just create empty lines. Points need to be adjusted by hand!", 16, 136, 330, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $bPlayerGenerate
for $i = 1 to GUICtrlRead($iPlayerBase) - 1
$iPlayerLevelEXP = $i * $i * GUICtrlRead($iPlayerBase)
GUICtrlSetData($sPlayerOutput, "ExperiencePointsForLevel[" & $i -1 & "]="& $iPlayerLevelEXP &",", ("."))
Next
Case $bDinoGenerate
for $i = 1 to GUICtrlRead($iDinoLevel) - 1
$iDinoLevelEXP = $i * GUICtrlRead($iDinoBase)
GUICtrlSetData($sDinoOutput, "ExperiencePointsForLevel[" & $i -1 & "]="& $iDinoLevelEXP &",", ("."))
Next
Case $bEngramGenerate
for $i = 1 to GUICtrlRead($iEngramLines) - 1
GUICtrlSetData($sEngramOutput, "OverridePlayerLevelEngramPoints="&@CRLF, ("."))
Next
Case $bPlayerClear
GUICtrlSetData($sPlayerOutput, "", (""))
Case $bDinoClear
GUICtrlSetData($sDinoOutput, "", (""))
Case $bEngramClear
GUICtrlSetData($sEngramOutput, "", (""))
EndSwitch
WEnd
Alles anzeigen