I'm having trouble reading the input box for how many cycles this should run for. It is currently not returning any new values. I left all of my test msgbox in place.
AutoIt
#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= Local $EvePath, $EveCreate = 0, $EveCycle If @OSArch = "X86" Then $EvePath = "C:\Program Files\CCP\Eve" If @OSArch = "X64" Then $EvePath = "C:\Program Files(x86)\CCP\Eve" $Menu = GUICreate("Eve Online Clone Creater", 527, 125, 192, 124) $Finder = GUICtrlCreateButton("Eve Folder", 200, 24, 89, 49) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Close = GUICtrlCreateButton("Close", 424, 24, 89, 49) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Eve = GUICtrlCreateInput($EvePath, 8, 96, 513, 24) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Profile = GUICtrlCreateLabel("Clones to Create", 48, 24, 103, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Number = GUICtrlCreateInput($EveCreate, 48, 48, 97, 24) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Create = GUICtrlCreateButton("Create", 312, 24, 89, 49) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Close Exit Case $Finder Run01() Case $Create GUICtrlRead($Number, 0) GUICtrlRead($EveCreate, 0) GUICtrlSetData($EveCycle, $EveCreate) MsgBox(0, "Cycle Value", $EveCycle) MsgBox(0, "To Create", $EveCreate) MsgBox(0, "Number", $Number) Run02() EndSwitch WEnd Func Run01() Local $EvePath = FileSelectFolder("Select the Eve Folder",$EvePath) GUICtrlSetData($Eve, $EvePath) EndFunc Func Run02() While $EveCycle >= 0 MsgBox(0, "Cycle", $EveCycle) FileCreateNTFSLink ( $EvePath, $EvePath & "." & $EveCreate) MsgBox(0, "Step 2", $EvePath) MsgBox(0, "Step 3", $EvePath & "." & $EveCreate) FileCreateShortcut ( $EvePath & "." & $EveCreate & "\bin\Exefile.exe", @DesktopDir & "\Eve." & $EveCreate & ".lnk", $EvePath & "\bin") MsgBox(0, "Step 4", $EvePath & "." & $EveCreate & "\bin\Exefile.exe") MsgBox(0, "Step 5", @DesktopDir & "\Eve." & $EveCreate & ".lnk") Msgbox(0, "Step 6", $EvePath & "." & $EveCreate & "\bin") $EveCycle-=1 WEnd EndFunc