Hallo erstmal,
ich habe ein problem mit dem tool welches ich gerade schreibe um der Führung in meiner Ally das Leben ein wenig einfacher zu machen
Spoiler anzeigen
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\..\..\MEDIA\Bilder\ICONS\Albook extended ico\Games box.ico
#AutoIt3Wrapper_outfile=C:\Users\TheBigX\Desktop\OGame Userverwaltung.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_UseX64=n
#AutoIt3Wrapper_Res_Fileversion=1.0.0.11
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_Language=1031
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;ogame
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <String.au3>
#include <GuiButton.au3>
#include <FTPEx.au3>
#include <Expand.au3>
#include <File.au3>
#include <Array.au3>
Global $username, $thisver, $socket,$Form1, $var
Global $lj, $sj, $kz, $ss, $bomb, $zerst, $sk, $rip, $kt, $gt, $recy, $watech, $schildtech, $raumpanz, $spiotech, $bemerkungen
Global $check1, $check2, $check3, $check4, $check5, $check6, $check7, $check8, $check9, $check10, $check11, $check12, $check13, $check14, $check15, $check16, $check17, $check18, $check19, $check20, $check21, $check22, $check23, $check24, $check25, $check26, $check27, $check28, $check29, $check30, $check31, $check32, $check33, $check34, $check35, $check36
Global $input1, $input2, $input3, $input4, $input5, $input6, $input7, $input8, $input9, $input10, $input11, $input12, $input13, $input14, $input15, $input16, $input17, $input18, $input19, $input20, $input21, $input22, $input23, $input24, $input25, $input26, $input27, $input28, $input29, $input30, $input31, $input32, $input33, $input34, $input35, $input36, $input37, $input38, $input39, $input40, $input41, $input42, $input43, $input44, $input45, $input46, $input47, $input48, $input49, $input50, $input51, $input52, $input53, $input54
$encrypw = "Dies ist ein sehr sicheres Passwort: na58op17ma88.-b4t6fgh64060888r32610"
$encrypw2 = "Dies ist ein extrem sicheres passwort: klsdghkdgkjhgdnkhjbgdsnkhbgds8z4wp34I&/(/%%(/%()%("
If $username = "" Then $username = "Kein User ausgewählt"
$Form1 = GUICreate("Userverwaltung OGame", 625, 826, -1,-1,$WS_BORDER)
$userliste = GUICtrlCreateList("", 440, 24, 169, 331, BitOR($LBS_SORT, $LBS_STANDARD, $WS_VSCROLL, $WS_BORDER))
GUICtrlSetData(-1, "___Sadi___|ulli43|Lordi|TheBigX|Audi|adepttin|Zildijan|DeathMan|DerSchrecken|JOker|C R A S S U S|Schaffner II|Black666sun|Rey the Dragon|DragonKing24|Slayer|Goauldking")
$Group1 = GUICtrlCreateGroup($username, 24, 24, 401, 489)
$Fleet = GUICtrlCreateLabel("Fleet", 208, 40, 27, 17)
$ListView1 = GUICtrlCreateListView("Name|Anzahl", 96, 64, 250, 150)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 135)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 70)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$ListView1_0 = GUICtrlCreateListViewItem("Leichte Jäger|" & $lj, $ListView1)
$ListView1_1 = GUICtrlCreateListViewItem("Schwere Jäger|" & $sj, $ListView1)
$ListView1_2 = GUICtrlCreateListViewItem("Kreuzer|" & $kz, $ListView1)
$ListView1_3 = GUICtrlCreateListViewItem("Schlachtschiffe|" & $ss, $ListView1)
$ListView1_4 = GUICtrlCreateListViewItem("Bomber|" & $bomb, $ListView1)
$ListView1_5 = GUICtrlCreateListViewItem("Zerstörer|" & $zerst, $ListView1)
$ListView1_6 = GUICtrlCreateListViewItem("Schlachtkreuzer|" & $sk, $ListView1)
$ListView1_7 = GUICtrlCreateListViewItem("Todessterne|" & $rip, $ListView1)
$ListView1_8 = GUICtrlCreateListViewItem("Kleine Transporter|" & $kt, $ListView1)
$ListView1_9 = GUICtrlCreateListViewItem("Große Transporter|" & $gt, $ListView1)
$ListView1_10 = GUICtrlCreateListViewItem("Recycler|" & $recy, $ListView1)
$ListView1_11 = GUICtrlCreateListViewItem("", $ListView1)
$Forschung = GUICtrlCreateLabel("Forschung", 192, 224, 54, 17)
$ListView2 = GUICtrlCreateListView("Name|Stufe", 96, 248, 250, 150)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 120)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 50)
$ListView2_0 = GUICtrlCreateListViewItem("Waffentechnik|" & $watech, $ListView2)
$ListView2_1 = GUICtrlCreateListViewItem("Schildtechnik|" & $schildtech, $ListView2)
$ListView2_2 = GUICtrlCreateListViewItem("Raumschiffpanzerung|" & $raumpanz, $ListView2)
$ListView2_3 = GUICtrlCreateListViewItem("Spionagetechnik|" & $spiotech, $ListView2)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$admin = GUICtrlCreateButton("Admin Login", 440, 368, 75, 25, $WS_GROUP)
$listall = GUICtrlCreateButton("", 120, 400, 200, 25, $WS_GROUP)
$list= GUICtrlCreateLabel ("",1,700,600,120)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Sleep(1)
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $userliste
$username = GUICtrlRead($userliste)
GUICtrlSetData($Group1, $username)
;~ GUICtrlSetData($update,"Aktualisiere: "&$username,"")
_Read()
Case $admin
_admin()
;~ Case $update
;~ userupdate()
Case $listall
$fl = _FileListToArray (@ScriptDir,"*.ini",1)
;~ _ArrayDisplay($fl, "$FileList")
For $i = 1 to $fl[0]
For $j = 1 to $var[0][0]
$var = IniReadSection($fl[$i],"Leichte Jaeger")
GUICtrlSetData ($list,$var[$j][1],"")
Next
Next
EndSwitch
WEnd
Func _admin()
Do
$pass = InputBox("", "Passwort eingeben", "", "*")
Until $pass = "crassus" Or "goauldking17"
$gui = GUICreate("Adminpanel", 820, 470, -1, -1)
$lj = GUICtrlCreateInput("", 24, 24, 121, 21)
$sj = GUICtrlCreateInput("", 24, 56, 121, 21)
$kz = GUICtrlCreateInput("", 24, 88, 121, 21)
$ss = GUICtrlCreateInput("", 24, 120, 121, 21)
$bomb = GUICtrlCreateInput("", 24, 152, 121, 21)
$zerst = GUICtrlCreateInput("", 24, 184, 121, 21)
$sk = GUICtrlCreateInput("", 24, 216, 121, 21)
$rip = GUICtrlCreateInput("", 24, 248, 121, 21)
$kt = GUICtrlCreateInput("", 24, 280, 121, 21)
$gt = GUICtrlCreateInput("", 24, 312, 121, 21)
$recy = GUICtrlCreateInput("", 24, 344, 121, 21)
GUICtrlCreateLabel("Mond", 740, 5, 35, 20)
GUICtrlCreateLabel("MAIN", 775, 5, 35, 20)
$check1 = GUICtrlCreateCheckbox("", 740, 20, 20, 20)
$check2 = GUICtrlCreateCheckbox("", 740, 45, 20, 20)
$check3 = GUICtrlCreateCheckbox("", 740, 70, 20, 20)
$check4 = GUICtrlCreateCheckbox("", 740, 95, 20, 20)
$check5 = GUICtrlCreateCheckbox("", 740, 120, 20, 20)
$check6 = GUICtrlCreateCheckbox("", 740, 145, 20, 20)
$check7 = GUICtrlCreateCheckbox("", 740, 170, 20, 20)
$check8 = GUICtrlCreateCheckbox("", 740, 195, 20, 20)
$check9 = GUICtrlCreateCheckbox("", 740, 220, 20, 20)
$check10 = GUICtrlCreateCheckbox("", 740, 245, 20, 20)
$check11 = GUICtrlCreateCheckbox("", 740, 270, 20, 20)
$check12 = GUICtrlCreateCheckbox("", 740, 295, 20, 20)
$check13 = GUICtrlCreateCheckbox("", 740, 320, 20, 20)
$check14 = GUICtrlCreateCheckbox("", 740, 345, 20, 20)
$check15 = GUICtrlCreateCheckbox("", 740, 370, 20, 20)
$check16 = GUICtrlCreateCheckbox("", 740, 395, 20, 20)
$check17 = GUICtrlCreateCheckbox("", 740, 420, 20, 20)
$check18 = GUICtrlCreateCheckbox("", 740, 445, 20, 20)
$check19 = GUICtrlCreateCheckbox("", 775, 20, 20, 20)
$check20 = GUICtrlCreateCheckbox("", 775, 45, 20, 20)
$check21 = GUICtrlCreateCheckbox("", 775, 70, 20, 20)
$check22 = GUICtrlCreateCheckbox("", 775, 95, 20, 20)
$check23 = GUICtrlCreateCheckbox("", 775, 120, 20, 20)
$check24 = GUICtrlCreateCheckbox("", 775, 145, 20, 20)
$check25 = GUICtrlCreateCheckbox("", 775, 170, 20, 20)
$check26 = GUICtrlCreateCheckbox("", 775, 195, 20, 20)
$check27 = GUICtrlCreateCheckbox("", 775, 220, 20, 20)
$check28 = GUICtrlCreateCheckbox("", 775, 245, 20, 20)
$check29 = GUICtrlCreateCheckbox("", 775, 270, 20, 20)
$check30 = GUICtrlCreateCheckbox("", 775, 295, 20, 20)
$check31 = GUICtrlCreateCheckbox("", 775, 320, 20, 20)
$check32 = GUICtrlCreateCheckbox("", 775, 345, 20, 20)
$check33 = GUICtrlCreateCheckbox("", 775, 370, 20, 20)
$check34 = GUICtrlCreateCheckbox("", 775, 395, 20, 20)
$check35 = GUICtrlCreateCheckbox("", 775, 420, 20, 20)
$check36 = GUICtrlCreateCheckbox("", 775, 445, 20, 20)
$input1 = GUICtrlCreateInput("", 650, 20, 25, 20)
$input2 = GUICtrlCreateInput("", 650, 45, 25, 20)
$input3 = GUICtrlCreateInput("", 650, 70, 25, 20)
$input4 = GUICtrlCreateInput("", 650, 95, 25, 20)
$input5 = GUICtrlCreateInput("", 650, 120, 25, 20)
$input6 = GUICtrlCreateInput("", 650, 145, 25, 20)
$input7 = GUICtrlCreateInput("", 650, 170, 25, 20)
$input8 = GUICtrlCreateInput("", 650, 195, 25, 20)
$input9 = GUICtrlCreateInput("", 650, 220, 25, 20)
$input10 = GUICtrlCreateInput("", 650, 245, 25, 20)
$input11 = GUICtrlCreateInput("", 650, 270, 25, 20)
$input12 = GUICtrlCreateInput("", 650, 295, 25, 20)
$input13 = GUICtrlCreateInput("", 650, 320, 25, 20)
$input14 = GUICtrlCreateInput("", 650, 345, 25, 20)
$input15 = GUICtrlCreateInput("", 650, 370, 25, 20)
$input16 = GUICtrlCreateInput("", 650, 395, 25, 20)
$input17 = GUICtrlCreateInput("", 650, 420, 25, 20)
$input18 = GUICtrlCreateInput("", 650, 445, 25, 20)
$input19 = GUICtrlCreateInput("", 680, 20, 25, 20)
$input20 = GUICtrlCreateInput("", 680, 45, 25, 20)
$input21 = GUICtrlCreateInput("", 680, 70, 25, 20)
$input22 = GUICtrlCreateInput("", 680, 95, 25, 20)
$input23 = GUICtrlCreateInput("", 680, 120, 25, 20)
$input24 = GUICtrlCreateInput("", 680, 145, 25, 20)
$input25 = GUICtrlCreateInput("", 680, 170, 25, 20)
$input26 = GUICtrlCreateInput("", 680, 195, 25, 20)
$input27 = GUICtrlCreateInput("", 680, 220, 25, 20)
$input28 = GUICtrlCreateInput("", 680, 245, 25, 20)
$input29 = GUICtrlCreateInput("", 680, 270, 25, 20)
$input30 = GUICtrlCreateInput("", 680, 295, 25, 20)
$input31 = GUICtrlCreateInput("", 680, 320, 25, 20)
$input32 = GUICtrlCreateInput("", 680, 345, 25, 20)
$input33 = GUICtrlCreateInput("", 680, 370, 25, 20)
$input34 = GUICtrlCreateInput("", 680, 395, 25, 20)
$input35 = GUICtrlCreateInput("", 680, 420, 25, 20)
$input36 = GUICtrlCreateInput("", 680, 445, 25, 20)
$input37 = GUICtrlCreateInput("", 710, 20, 25, 20)
$input38 = GUICtrlCreateInput("", 710, 45, 25, 20)
$input39 = GUICtrlCreateInput("", 710, 70, 25, 20)
$input40 = GUICtrlCreateInput("", 710, 95, 25, 20)
$input41 = GUICtrlCreateInput("", 710, 120, 25, 20)
$input42 = GUICtrlCreateInput("", 710, 145, 25, 20)
$input43 = GUICtrlCreateInput("", 710, 170, 25, 20)
$input44 = GUICtrlCreateInput("", 710, 195, 25, 20)
$input45 = GUICtrlCreateInput("", 710, 220, 25, 20)
$input46 = GUICtrlCreateInput("", 710, 245, 25, 20)
$input47 = GUICtrlCreateInput("", 710, 270, 25, 20)
$input48 = GUICtrlCreateInput("", 710, 295, 25, 20)
$input49 = GUICtrlCreateInput("", 710, 320, 25, 20)
$input50 = GUICtrlCreateInput("", 710, 345, 25, 20)
$input51 = GUICtrlCreateInput("", 710, 370, 25, 20)
$input52 = GUICtrlCreateInput("", 710, 395, 25, 20)
$input53 = GUICtrlCreateInput("", 710, 420, 25, 20)
$input54 = GUICtrlCreateInput("", 710, 445, 25, 20)
$Label1 = GUICtrlCreateLabel("Leichte Jäger", 152, 24, 68, 17)
$Label2 = GUICtrlCreateLabel("Schwere Jäger", 152, 56, 75, 17)
$Label3 = GUICtrlCreateLabel("Kreuzer", 152, 88, 40, 17)
$Label4 = GUICtrlCreateLabel("Schlachtschiffe", 152, 120, 77, 17)
$Label5 = GUICtrlCreateLabel("Bomber", 152, 152, 40, 17)
$Label6 = GUICtrlCreateLabel("Zerstörer", 152, 184, 46, 17)
$Label7 = GUICtrlCreateLabel("Schlachtkreuzer", 152, 216, 81, 17)
$Label8 = GUICtrlCreateLabel("Todessterne", 152, 248, 63, 17)
$Label9 = GUICtrlCreateLabel("Kleine Transporter", 152, 280, 90, 17)
$Label10 = GUICtrlCreateLabel("Große Transporter", 152, 312, 90, 17)
$Label11 = GUICtrlCreateLabel("Recycler", 152, 344, 46, 17)
$watech = GUICtrlCreateInput("", 352, 24, 121, 21)
$schildtech = GUICtrlCreateInput("", 352, 56, 121, 21)
$raumpanz = GUICtrlCreateInput("", 352, 88, 121, 21)
$spiotech = GUICtrlCreateInput("", 352, 120, 121, 21)
$Label12 = GUICtrlCreateLabel("Waffentechnik", 488, 24, 74, 17)
$Label13 = GUICtrlCreateLabel("Schildtechnik", 488, 56, 68, 17)
$Label14 = GUICtrlCreateLabel("Raumschiffpanzerung", 488, 88, 107, 17)
$Label15 = GUICtrlCreateLabel("Spionagetechnik", 488, 120, 84, 17)
$bemerkungen = GUICtrlCreateEdit("", 280, 200, 329, 217)
$Label16 = GUICtrlCreateLabel("Notizen / Bemerkungen zum Benutzer", 352, 176, 184, 17)
$save = GUICtrlCreateButton("Speichern", 10, 384, 75, 25, $WS_GROUP)
$sendto = GUICtrlCreateButton("Zum Server senden", 90, 384, 100, 25)
TrayTip("Du Editierst jetz gerade:", $username, 10)
_Read()
GUISetState(@SW_SHOW)
While 1
$nMsg2 = GUIGetMsg()
Sleep(1)
Switch $nMsg2
Case $GUI_EVENT_CLOSE
GUIDelete("Adminpanel")
ExitLoop
Case $save
save()
Case $sendto
sendto()
EndSwitch
WEnd
EndFunc ;==>_admin
Func _Read()
GUICtrlSetData($ListView1_0, "Leichte Jäger|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Leichte Jaeger", ""), $encrypw, 3))
GUICtrlSetData($ListView1_1, "Schwere Jäger|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Schwere Jaeger", ""), $encrypw, 3))
GUICtrlSetData($ListView1_2, "Kreuzer|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Kreuzer", ""), $encrypw, 3))
GUICtrlSetData($ListView1_3, "Schlachtschiffe|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Schlachtschiffe", ""), $encrypw, 3))
GUICtrlSetData($ListView1_4, "Bomber|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Bomber", ""), $encrypw, 3))
GUICtrlSetData($ListView1_5, "Zerstoerer|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Zerstoerer", ""), $encrypw, 3))
GUICtrlSetData($ListView1_6, "Schlachtkreuzer|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Schlachtkreuzer", ""), $encrypw, 3))
GUICtrlSetData($ListView1_7, "Todessterne|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Todessterne", ""), $encrypw, 3))
GUICtrlSetData($ListView1_8, "Kleine Transporter|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Kleine Transporter", ""), $encrypw, 3))
GUICtrlSetData($ListView1_9, "Grosse Transporter|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Grosse Transporter", ""), $encrypw, 3))
GUICtrlSetData($ListView1_10, "Recycler|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Recycler", ""), $encrypw, 3))
GUICtrlSetData($ListView2_0, "Waffentechnik|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Waffentechnik", ""), $encrypw, 3))
GUICtrlSetData($ListView2_1, "Schildtechnik|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Schildtechnik", ""), $encrypw, 3))
GUICtrlSetData($ListView2_2, "Raumschiffpanzerung|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Raumschiffpanzerung", ""), $encrypw, 3))
GUICtrlSetData($ListView2_3, "Spionagetechnik|" & _StringEncrypt(0, IniRead($username & ".ini", $username, "Spionagetechnik", ""), $encrypw, 3))
GUICtrlSetData($lj, _StringEncrypt(0, IniRead($username & ".ini", $username, "Leichte Jaeger", ""), $encrypw, 3))
GUICtrlSetData($sj, _StringEncrypt(0, IniRead($username & ".ini", $username, "Schwere Jaeger", ""), $encrypw, 3))
GUICtrlSetData($kz, _StringEncrypt(0, IniRead($username & ".ini", $username, "Kreuzer", ""), $encrypw, 3))
GUICtrlSetData($ss, _StringEncrypt(0, IniRead($username & ".ini", $username, "Schlachtschiffe", ""), $encrypw, 3))
GUICtrlSetData($bomb, _StringEncrypt(0, IniRead($username & ".ini", $username, "Bomber", ""), $encrypw, 3))
GUICtrlSetData($zerst, _StringEncrypt(0, IniRead($username & ".ini", $username, "Zerstoerer", ""), $encrypw, 3))
GUICtrlSetData($sk, _StringEncrypt(0, IniRead($username & ".ini", $username, "Schlachtkreuzer", ""), $encrypw, 3))
GUICtrlSetData($rip, _StringEncrypt(0, IniRead($username & ".ini", $username, "Todessterne", ""), $encrypw, 3))
GUICtrlSetData($kt, _StringEncrypt(0, IniRead($username & ".ini", $username, "Kleine Transporter", ""), $encrypw, 3))
GUICtrlSetData($gt, _StringEncrypt(0, IniRead($username & ".ini", $username, "Grosse Transporter", ""), $encrypw, 3))
GUICtrlSetData($rip, _StringEncrypt(0, IniRead($username & ".ini", $username, "Todessterne", ""), $encrypw, 3))
GUICtrlSetData($recy, _StringEncrypt(0, IniRead($username & ".ini", $username, "Recycler", ""), $encrypw, 3))
GUICtrlSetData($watech, _StringEncrypt(0, IniRead($username & ".ini", $username, "Waffentechnik", ""), $encrypw, 3))
GUICtrlSetData($schildtech, _StringEncrypt(0, IniRead($username & ".ini", $username, "Schildtechnik", ""), $encrypw, 3))
GUICtrlSetData($raumpanz, _StringEncrypt(0, IniRead($username & ".ini", $username, "Raumschiffpanzerung", ""), $encrypw, 3))
GUICtrlSetData($spiotech, _StringEncrypt(0, IniRead($username & ".ini", $username, "Spionagetechnik", ""), $encrypw, 3))
GUICtrlSetData($bemerkungen, _StringEncrypt(0, IniRead($username & ".ini", $username, "Bemerkungen", ""), $encrypw & $encrypw2, 5))
GUICtrlSetState($check1, IniRead($username & ".ini", $username, "1", ""))
GUICtrlSetState($check2, IniRead($username & ".ini", $username, "2", ""))
GUICtrlSetState($check3, IniRead($username & ".ini", $username, "3", ""))
GUICtrlSetState($check4, IniRead($username & ".ini", $username, "4", ""))
GUICtrlSetState($check5, IniRead($username & ".ini", $username, "5", ""))
GUICtrlSetState($check6, IniRead($username & ".ini", $username, "6", ""))
GUICtrlSetState($check7, IniRead($username & ".ini", $username, "7", ""))
GUICtrlSetState($check8, IniRead($username & ".ini", $username, "8", ""))
GUICtrlSetState($check9, IniRead($username & ".ini", $username, "9", ""))
GUICtrlSetState($check10, IniRead($username & ".ini", $username, "10", ""))
GUICtrlSetState($check11, IniRead($username & ".ini", $username, "11", ""))
GUICtrlSetState($check12, IniRead($username & ".ini", $username, "12", ""))
GUICtrlSetState($check13, IniRead($username & ".ini", $username, "13", ""))
GUICtrlSetState($check14, IniRead($username & ".ini", $username, "14", ""))
GUICtrlSetState($check15, IniRead($username & ".ini", $username, "15", ""))
GUICtrlSetState($check16, IniRead($username & ".ini", $username, "16", ""))
GUICtrlSetState($check17, IniRead($username & ".ini", $username, "17", ""))
GUICtrlSetState($check18, IniRead($username & ".ini", $username, "18", ""))
GUICtrlSetState($check19, IniRead($username & ".ini", $username, "19", ""))
GUICtrlSetState($check20, IniRead($username & ".ini", $username, "20", ""))
GUICtrlSetState($check21, IniRead($username & ".ini", $username, "21", ""))
GUICtrlSetState($check22, IniRead($username & ".ini", $username, "22", ""))
GUICtrlSetState($check23, IniRead($username & ".ini", $username, "23", ""))
GUICtrlSetState($check24, IniRead($username & ".ini", $username, "24", ""))
GUICtrlSetState($check25, IniRead($username & ".ini", $username, "25", ""))
GUICtrlSetState($check26, IniRead($username & ".ini", $username, "26", ""))
GUICtrlSetState($check27, IniRead($username & ".ini", $username, "27", ""))
GUICtrlSetState($check28, IniRead($username & ".ini", $username, "28", ""))
GUICtrlSetState($check29, IniRead($username & ".ini", $username, "29", ""))
GUICtrlSetState($check30, IniRead($username & ".ini", $username, "30", ""))
GUICtrlSetState($check31, IniRead($username & ".ini", $username, "31", ""))
GUICtrlSetState($check32, IniRead($username & ".ini", $username, "32", ""))
GUICtrlSetState($check33, IniRead($username & ".ini", $username, "33", ""))
GUICtrlSetState($check34, IniRead($username & ".ini", $username, "34", ""))
GUICtrlSetState($check35, IniRead($username & ".ini", $username, "35", ""))
GUICtrlSetState($check36, IniRead($username & ".ini", $username, "36", ""))
GUICtrlSetData($input1, IniRead($username & ".ini", $username, "P1", ""))
GUICtrlSetData($input2, IniRead($username & ".ini", $username, "P2", ""))
GUICtrlSetData($input3, IniRead($username & ".ini", $username, "P3", ""))
GUICtrlSetData($input4, IniRead($username & ".ini", $username, "P4", ""))
GUICtrlSetData($input5, IniRead($username & ".ini", $username, "P5", ""))
GUICtrlSetData($input6, IniRead($username & ".ini", $username, "P6", ""))
GUICtrlSetData($input7, IniRead($username & ".ini", $username, "P7", ""))
GUICtrlSetData($input8, IniRead($username & ".ini", $username, "P8", ""))
GUICtrlSetData($input9, IniRead($username & ".ini", $username, "P9", ""))
GUICtrlSetData($input10, IniRead($username & ".ini", $username, "P10", ""))
GUICtrlSetData($input11, IniRead($username & ".ini", $username, "P11", ""))
GUICtrlSetData($input12, IniRead($username & ".ini", $username, "P12", ""))
GUICtrlSetData($input13, IniRead($username & ".ini", $username, "P13", ""))
GUICtrlSetData($input14, IniRead($username & ".ini", $username, "P14", ""))
GUICtrlSetData($input15, IniRead($username & ".ini", $username, "P15", ""))
GUICtrlSetData($input16, IniRead($username & ".ini", $username, "P16", ""))
GUICtrlSetData($input17, IniRead($username & ".ini", $username, "P17", ""))
GUICtrlSetData($input18, IniRead($username & ".ini", $username, "P18", ""))
GUICtrlSetData($input19, IniRead($username & ".ini", $username, "P19", ""))
GUICtrlSetData($input20, IniRead($username & ".ini", $username, "P20", ""))
GUICtrlSetData($input21, IniRead($username & ".ini", $username, "P21", ""))
GUICtrlSetData($input22, IniRead($username & ".ini", $username, "P22", ""))
GUICtrlSetData($input23, IniRead($username & ".ini", $username, "P23", ""))
GUICtrlSetData($input24, IniRead($username & ".ini", $username, "P24", ""))
GUICtrlSetData($input25, IniRead($username & ".ini", $username, "P25", ""))
GUICtrlSetData($input26, IniRead($username & ".ini", $username, "P26", ""))
GUICtrlSetData($input27, IniRead($username & ".ini", $username, "P27", ""))
GUICtrlSetData($input28, IniRead($username & ".ini", $username, "P28", ""))
GUICtrlSetData($input29, IniRead($username & ".ini", $username, "P29", ""))
GUICtrlSetData($input30, IniRead($username & ".ini", $username, "P30", ""))
GUICtrlSetData($input31, IniRead($username & ".ini", $username, "P31", ""))
GUICtrlSetData($input32, IniRead($username & ".ini", $username, "P32", ""))
GUICtrlSetData($input33, IniRead($username & ".ini", $username, "P33", ""))
GUICtrlSetData($input34, IniRead($username & ".ini", $username, "P34", ""))
GUICtrlSetData($input35, IniRead($username & ".ini", $username, "P35", ""))
GUICtrlSetData($input36, IniRead($username & ".ini", $username, "P36", ""))
GUICtrlSetData($input37, IniRead($username & ".ini", $username, "P37", ""))
GUICtrlSetData($input38, IniRead($username & ".ini", $username, "P38", ""))
GUICtrlSetData($input39, IniRead($username & ".ini", $username, "P39", ""))
GUICtrlSetData($input40, IniRead($username & ".ini", $username, "P40", ""))
GUICtrlSetData($input41, IniRead($username & ".ini", $username, "P41", ""))
GUICtrlSetData($input42, IniRead($username & ".ini", $username, "P42", ""))
GUICtrlSetData($input43, IniRead($username & ".ini", $username, "P43", ""))
GUICtrlSetData($input44, IniRead($username & ".ini", $username, "P44", ""))
GUICtrlSetData($input45, IniRead($username & ".ini", $username, "P45", ""))
GUICtrlSetData($input46, IniRead($username & ".ini", $username, "P46", ""))
GUICtrlSetData($input47, IniRead($username & ".ini", $username, "P47", ""))
GUICtrlSetData($input48, IniRead($username & ".ini", $username, "P48", ""))
GUICtrlSetData($input49, IniRead($username & ".ini", $username, "P49", ""))
GUICtrlSetData($input50, IniRead($username & ".ini", $username, "P50", ""))
GUICtrlSetData($input51, IniRead($username & ".ini", $username, "P51", ""))
GUICtrlSetData($input52, IniRead($username & ".ini", $username, "P52", ""))
GUICtrlSetData($input53, IniRead($username & ".ini", $username, "P53", ""))
GUICtrlSetData($input54, IniRead($username & ".ini", $username, "P54", ""))
EndFunc ;==>_Read
Func UPDATE()
;~ InetGet("http://semtexunion.se.funpic.de/srostart/actualver.exe", @TempDir & "\actualver.exe",1,1)
;~ If FileGetVersion(@TempDir & "\actualver.exe", "FileVersion") < $thisver Then
;~ $size = InetGetSize("http://semtexunion.se.funpic.de/srostart/Silkroad Starter.exe")
;~ $progproz = InetGet("http://semtexunion.se.funpic.de/srostart/Silkroad Starter.exe", @ScriptDir & "\Silkroad Starter.exe", 1, 1)
;~ GUICreate(" Fortschritt", 350, 100, -1, -1)
;~ $progressbar1 = GUICtrlCreateProgress(25, 25, 300, 20)
;~ While @InetGetActive
;~ GUICtrlSetData($progressbar1, Int(@InetGetBytesRead / $size * 100))
;~ GUICtrlCreateLabel(Int(@InetGetBytesRead) & "/" & $size, 20, 60, 100, 30)
;~ GUISetState()
;~ Sleep(200)
;~ WEnd
;~ Sleep(2500)
;~ Run("verschieben.exe")
;~ Exit
;~ ElseIf FileGetVersion(@TempDir & "\actualver.exe", "FileVersion") >= $thisver Then
;~ MsgBox ("","","Du brauchst kein Update",2)
;~ EndIf
EndFunc ;==>UPDATE
Func save()
$a0 = _StringEncrypt(1, GUICtrlRead($lj), $encrypw, 3)
$a1 = _StringEncrypt(1, GUICtrlRead($sj), $encrypw, 3)
$a2 = _StringEncrypt(1, GUICtrlRead($kz), $encrypw, 3)
$a3 = _StringEncrypt(1, GUICtrlRead($ss), $encrypw, 3)
$a4 = _StringEncrypt(1, GUICtrlRead($bomb), $encrypw, 3)
$a5 = _StringEncrypt(1, GUICtrlRead($zerst), $encrypw, 3)
$a6 = _StringEncrypt(1, GUICtrlRead($sk), $encrypw, 3)
$a7 = _StringEncrypt(1, GUICtrlRead($rip), $encrypw, 3)
$a8 = _StringEncrypt(1, GUICtrlRead($kt), $encrypw, 3)
$a9 = _StringEncrypt(1, GUICtrlRead($gt), $encrypw, 3)
$a10 = _StringEncrypt(1, GUICtrlRead($recy), $encrypw, 3)
$a11 = _StringEncrypt(1, GUICtrlRead($bemerkungen), $encrypw & $encrypw2, 5)
$a12 = _StringEncrypt(1, GUICtrlRead($watech), $encrypw, 3)
$a13 = _StringEncrypt(1, GUICtrlRead($schildtech), $encrypw, 3)
$a14 = _StringEncrypt(1, GUICtrlRead($raumpanz), $encrypw, 3)
$a15 = _StringEncrypt(1, GUICtrlRead($spiotech), $encrypw, 3)
IniWrite($username & ".ini", $username, "1", _GUICtrlButton_GetCheck($check1))
IniWrite($username & ".ini", $username, "2", _GUICtrlButton_GetCheck($check2))
IniWrite($username & ".ini", $username, "3", _GUICtrlButton_GetCheck($check3))
IniWrite($username & ".ini", $username, "4", _GUICtrlButton_GetCheck($check4))
IniWrite($username & ".ini", $username, "5", _GUICtrlButton_GetCheck($check5))
IniWrite($username & ".ini", $username, "6", _GUICtrlButton_GetCheck($check6))
IniWrite($username & ".ini", $username, "7", _GUICtrlButton_GetCheck($check7))
IniWrite($username & ".ini", $username, "8", _GUICtrlButton_GetCheck($check8))
IniWrite($username & ".ini", $username, "9", _GUICtrlButton_GetCheck($check9))
IniWrite($username & ".ini", $username, "10", _GUICtrlButton_GetCheck($check10))
IniWrite($username & ".ini", $username, "11", _GUICtrlButton_GetCheck($check11))
IniWrite($username & ".ini", $username, "12", _GUICtrlButton_GetCheck($check12))
IniWrite($username & ".ini", $username, "13", _GUICtrlButton_GetCheck($check13))
IniWrite($username & ".ini", $username, "14", _GUICtrlButton_GetCheck($check14))
IniWrite($username & ".ini", $username, "15", _GUICtrlButton_GetCheck($check15))
IniWrite($username & ".ini", $username, "16", _GUICtrlButton_GetCheck($check16))
IniWrite($username & ".ini", $username, "17", _GUICtrlButton_GetCheck($check17))
IniWrite($username & ".ini", $username, "18", _GUICtrlButton_GetCheck($check18))
IniWrite($username & ".ini", $username, "19", _GUICtrlButton_GetCheck($check19))
IniWrite($username & ".ini", $username, "20", _GUICtrlButton_GetCheck($check20))
IniWrite($username & ".ini", $username, "21", _GUICtrlButton_GetCheck($check21))
IniWrite($username & ".ini", $username, "22", _GUICtrlButton_GetCheck($check22))
IniWrite($username & ".ini", $username, "23", _GUICtrlButton_GetCheck($check23))
IniWrite($username & ".ini", $username, "24", _GUICtrlButton_GetCheck($check24))
IniWrite($username & ".ini", $username, "25", _GUICtrlButton_GetCheck($check25))
IniWrite($username & ".ini", $username, "26", _GUICtrlButton_GetCheck($check26))
IniWrite($username & ".ini", $username, "27", _GUICtrlButton_GetCheck($check27))
IniWrite($username & ".ini", $username, "28", _GUICtrlButton_GetCheck($check28))
IniWrite($username & ".ini", $username, "29", _GUICtrlButton_GetCheck($check29))
IniWrite($username & ".ini", $username, "30", _GUICtrlButton_GetCheck($check30))
IniWrite($username & ".ini", $username, "31", _GUICtrlButton_GetCheck($check31))
IniWrite($username & ".ini", $username, "32", _GUICtrlButton_GetCheck($check32))
IniWrite($username & ".ini", $username, "33", _GUICtrlButton_GetCheck($check33))
IniWrite($username & ".ini", $username, "34", _GUICtrlButton_GetCheck($check34))
IniWrite($username & ".ini", $username, "35", _GUICtrlButton_GetCheck($check35))
IniWrite($username & ".ini", $username, "36", _GUICtrlButton_GetCheck($check36))
IniWrite($username & ".ini", $username, "P1", GUICtrlRead($input1))
IniWrite($username & ".ini", $username, "P2", GUICtrlRead($input2))
IniWrite($username & ".ini", $username, "P3", GUICtrlRead($input3))
IniWrite($username & ".ini", $username, "P4", GUICtrlRead($input4))
IniWrite($username & ".ini", $username, "P5", GUICtrlRead($input5))
IniWrite($username & ".ini", $username, "P6", GUICtrlRead($input6))
IniWrite($username & ".ini", $username, "P7", GUICtrlRead($input7))
IniWrite($username & ".ini", $username, "P8", GUICtrlRead($input8))
IniWrite($username & ".ini", $username, "P9", GUICtrlRead($input9))
IniWrite($username & ".ini", $username, "P10", GUICtrlRead($input10))
IniWrite($username & ".ini", $username, "P11", GUICtrlRead($input11))
IniWrite($username & ".ini", $username, "P12", GUICtrlRead($input12))
IniWrite($username & ".ini", $username, "P13", GUICtrlRead($input13))
IniWrite($username & ".ini", $username, "P14", GUICtrlRead($input14))
IniWrite($username & ".ini", $username, "P15", GUICtrlRead($input15))
IniWrite($username & ".ini", $username, "P16", GUICtrlRead($input16))
IniWrite($username & ".ini", $username, "P17", GUICtrlRead($input17))
IniWrite($username & ".ini", $username, "P18", GUICtrlRead($input18))
IniWrite($username & ".ini", $username, "P19", GUICtrlRead($input19))
IniWrite($username & ".ini", $username, "P20", GUICtrlRead($input20))
IniWrite($username & ".ini", $username, "P21", GUICtrlRead($input21))
IniWrite($username & ".ini", $username, "P22", GUICtrlRead($input22))
IniWrite($username & ".ini", $username, "P23", GUICtrlRead($input23))
IniWrite($username & ".ini", $username, "P24", GUICtrlRead($input24))
IniWrite($username & ".ini", $username, "P25", GUICtrlRead($input25))
IniWrite($username & ".ini", $username, "P26", GUICtrlRead($input26))
IniWrite($username & ".ini", $username, "P27", GUICtrlRead($input27))
IniWrite($username & ".ini", $username, "P28", GUICtrlRead($input28))
IniWrite($username & ".ini", $username, "P29", GUICtrlRead($input29))
IniWrite($username & ".ini", $username, "P30", GUICtrlRead($input30))
IniWrite($username & ".ini", $username, "P31", GUICtrlRead($input31))
IniWrite($username & ".ini", $username, "P32", GUICtrlRead($input32))
IniWrite($username & ".ini", $username, "P33", GUICtrlRead($input33))
IniWrite($username & ".ini", $username, "P34", GUICtrlRead($input34))
IniWrite($username & ".ini", $username, "P35", GUICtrlRead($input35))
IniWrite($username & ".ini", $username, "P36", GUICtrlRead($input36))
IniWrite($username & ".ini", $username, "P37", GUICtrlRead($input37))
IniWrite($username & ".ini", $username, "P38", GUICtrlRead($input38))
IniWrite($username & ".ini", $username, "P39", GUICtrlRead($input39))
IniWrite($username & ".ini", $username, "P40", GUICtrlRead($input40))
IniWrite($username & ".ini", $username, "P41", GUICtrlRead($input41))
IniWrite($username & ".ini", $username, "P42", GUICtrlRead($input42))
IniWrite($username & ".ini", $username, "P43", GUICtrlRead($input43))
IniWrite($username & ".ini", $username, "P44", GUICtrlRead($input44))
IniWrite($username & ".ini", $username, "P45", GUICtrlRead($input45))
IniWrite($username & ".ini", $username, "P46", GUICtrlRead($input46))
IniWrite($username & ".ini", $username, "P47", GUICtrlRead($input47))
IniWrite($username & ".ini", $username, "P48", GUICtrlRead($input48))
IniWrite($username & ".ini", $username, "P49", GUICtrlRead($input49))
IniWrite($username & ".ini", $username, "P50", GUICtrlRead($input50))
IniWrite($username & ".ini", $username, "P51", GUICtrlRead($input51))
IniWrite($username & ".ini", $username, "P52", GUICtrlRead($input52))
IniWrite($username & ".ini", $username, "P53", GUICtrlRead($input53))
IniWrite($username & ".ini", $username, "P54", GUICtrlRead($input54))
IniWrite($username & ".ini", $username, "Leichte Jaeger", $a0)
IniWrite($username & ".ini", $username, "Schwere Jaeger", $a1)
IniWrite($username & ".ini", $username, "Kreuzer", $a2)
IniWrite($username & ".ini", $username, "Schlachtschiffe", $a3)
IniWrite($username & ".ini", $username, "Bomber", $a4)
IniWrite($username & ".ini", $username, "Zerstoerer", $a5)
IniWrite($username & ".ini", $username, "Schlachtkreuzer", $a6)
IniWrite($username & ".ini", $username, "Todessterne", $a7)
IniWrite($username & ".ini", $username, "Kleine Transporter", $a8)
IniWrite($username & ".ini", $username, "Grosse Transporter", $a9)
IniWrite($username & ".ini", $username, "Recycler", $a10)
IniWrite($username & ".ini", $username, "Bemerkungen", $a11)
IniWrite($username & ".ini", $username, "Waffentechnik", $a12)
IniWrite($username & ".ini", $username, "Schildtechnik", $a13)
IniWrite($username & ".ini", $username, "Raumschiffpanzerung", $a14)
IniWrite($username & ".ini", $username, "Spionagetechnik", $a15)
IniWrite($username & ".ini", "Modified", "Letzte Änderung TAG", @MDAY & "." & @MON & "." & @YEAR)
IniWrite($username & ".ini", "Modified", "Letzte Änderung ZEIT", _NowTime())
EndFunc ;==>save
Func sendto()
HttpSetUserAgent('Firefox')
$session = _FTP_Open("Firefox", 0)
$conftp = _FTP_Connect($session, "112800.webhosting42.1blu.de", "ftp112800-thebigx", "thebigx")
$file = _FTP_FilePut($conftp, @ScriptDir & "\" & $username & ".ini", "/Userdata/" & $username & ".ini")
If @error Then MsgBox("", "", "Datei existiert nicht oder Verbindung fehlgeschlagen", 5)
EndFunc ;==>sendto
Func userupdate()
InetGet("ftp://ftp112800-thebigx:thebigx@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini", @TempDir & "\" & $username & ".ini",
If @error Then MsgBox("", "", "Fehler bei der Verbindung oder Datei existiert nicht", 5)
$upd1 = IniRead(@TempDir & "\" & $username & ".ini", "Modified", "Letzte Änderung TAG", "")
;~ MsgBox ("","",$upd1&@CRLF&"DATUM GERADE: "&@MDAY & "." & @MON & "." & @YEAR)
Select
Case $upd1 > IniRead(@ScriptDir & "\" & $username & ".ini", "Modified", "Letzte Änderung TAG", "")
$size = InetGetSize("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini",
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
$progproz = InetGet("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini", @ScriptDir & "\" & $username & ".ini", 1, 1)
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
GUICreate(" Fortschritt", 350, 100, -1, -1)
$progressbar1 = GUICtrlCreateProgress(25, 25, 300, 20)
While InetGetInfo($progproz, 2) = False
GUICtrlSetData($progressbar1, (InetGetInfo($progproz, 0) / $size * 100))
$xo = GUICtrlCreateLabel(InetGetInfo($progproz, 0) & "/" & $size / 1024 & "KB", 20, 60, 150, 30)
GUISetState()
If InetGetInfo($progproz, 2) = True Then
GUICtrlSetData($progressbar1, 100)
GUICtrlSetData($xo,"Du kannst dieses Fenster nun schliessen")
GUIDelete (" Fortschritt")
ExitLoop
EndIf
WEnd
Case $upd1 = IniRead(@ScriptDir & "\" & $username & ".ini", "Modified", "Letzte Änderung TAG", "")
$reply = MsgBox(36, "", "Userdateien gleich Alt"&@CRLF&"Soll das Update trotzdem geladen werden?")
Select
Case $reply = 6 ;Ja
$size = InetGetSize("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini",
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
$progproz = InetGet("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini", @ScriptDir & "\" & $username & ".ini", 1, 1)
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
GUICreate(" Fortschritt", 350, 100, -1, -1)
$progressbar1 = GUICtrlCreateProgress(25, 25, 300, 20)
While InetGetInfo($progproz, 2) = False
GUICtrlSetData($progressbar1, (InetGetInfo($progproz, 0) / $size * 100))
$xo = GUICtrlCreateLabel(InetGetInfo($progproz, 0) & "/" & $size / 1024 & "KB", 20, 60, 150, 30)
GUISetState()
If InetGetInfo($progproz, 2) = True Then
GUICtrlSetData($progressbar1, 100)
GUICtrlSetData($xo,"Du kannst dieses Fenster nun schliessen")
GUIDelete (" Fortschritt")
ExitLoop
EndIf
WEnd
Case $reply = 7 ;Nein
EndSelect
Case $upd1 < IniRead(@ScriptDir & "\" & $username & ".ini", "Modified", "Letzte Änderung TAG", "")
ToolTip ("Die Userdatei auf dem Server ist älter als deine, bitte Lade diese hoch",-1,-1,"","")
$size = InetGetSize("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini",
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
$progproz = InetGet("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini", @ScriptDir & "\" & $username & ".ini", 1, 1)
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
GUICreate(" Fortschritt", 350, 100, -1, -1)
$progressbar1 = GUICtrlCreateProgress(25, 25, 300, 20)
While InetGetInfo($progproz, 2) = False
GUICtrlSetData($progressbar1, (InetGetInfo($progproz, 0) / $size * 100))
$xo = GUICtrlCreateLabel(InetGetInfo($progproz, 0) & "/" & $size / 1024 & "KB", 20, 60, 150, 30)
GUISetState()
If InetGetInfo($progproz, 2) = True Then
GUICtrlSetData($progressbar1, 100)
GUICtrlSetData($xo,"Du kannst dieses Fenster nun schliessen")
GUIDelete (" Fortschritt")
ExitLoop
EndIf
WEnd
Case $upd1 = @error
If Not FileExists(@ScriptDir & "\" & $username & ".ini") Then
$size = InetGetSize("ftp://zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini",
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
$progproz = InetGet("ftp://Zensiert@112800.webhosting42.1blu.de/Userdata/" & $username & ".ini", @ScriptDir & "\" & $username & ".ini", 1, 1)
If @error Then ToolTip("FEHLER!" & @error, -1, -1, "", "", "")
GUICreate(" Fortschritt", 350, 100, -1, -1)
$progressbar1 = GUICtrlCreateProgress(25, 25, 300, 20)
While InetGetInfo($progproz, 2) = False
GUICtrlSetData($progressbar1, (InetGetInfo($progproz, 0) / $size * 100))
$xo = GUICtrlCreateLabel(InetGetInfo($progproz, 0) & "/" & $size / 1024 & "KB", 20, 60, 150, 30)
GUISetState()
If InetGetInfo($progproz, 2) = True Then
GUICtrlSetData($progressbar1, 100)
GUICtrlSetData($xo,"Du kannst dieses Fenster nun schliessen")
GUIDelete (" Fortschritt")
ExitLoop
EndIf
WEnd
EndIf
EndSelect
FileDelete(@TempDir & "\" & $username & ".ini")
EndFunc ;==>userupdate
EDIT: NEUES Problem