...

#Region
#AutoIt3Wrapper_Icon=..\..\Documents\Downloads\spring-desktop-icons-by-softicons.com\ico\network.ico
#AutoIt3Wrapper_UseUpx=n
#EndRegion

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$IP = "http:\\192.168.178.1"

#Region ### START Koda GUI section ### Form=
$FORM1 = GUICreate("Fritz.Box Passwort Finder", 348, 150, 192, 124)
GUISetFont(14, 400, 0, "Forte")
$GUI_PWHACK = GUICtrlCreateButton("Passwort hacken", 16, 88, 153, 41, $WS_GROUP)
GUICtrlSetColor(-1, 8388608)
$LABEL2 = GUICtrlCreateLabel("By TheFreakBpx3", 128, 40, 88, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Forte")
GUICtrlSetColor(-1, 128)
$GUI_PWSPEICH = GUICtrlCreateButton("Passwort speichern", 176, 88, 153, 41, $WS_GROUP)
GUICtrlSetFont(-1, 13, 400, 0, "Forte")
GUICtrlSetColor(-1, 8388608)
$LABEL1 = GUICtrlCreateLabel("Fritz.Box Passwort Finder ", 48, 16, 237, 26)
GUICtrlSetFont(-1, 16, 400, 0, "Forte")
GUICtrlSetColor(-1, 128)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

DirCreate(@DesktopDir & "\Fritz.BoxPasswortFinder")
IniWrite(@DesktopDir & "\Fritz.boxpasswortfinder\config.ini", "Einstellungen", "IP", "192.168.178.1")
IniWrite(@DesktopDir & "\Fritz.boxpasswortfinder\config.ini", "Einstellungen", "SUB", "255.255.255.0")
IniWrite(@DesktopDir & "\Fritz.boxpasswortfinder\config.ini", "Einstellungen", "IP", "192.168.178.1")
IniWrite(@DesktopDir & "\Fritz.boxpasswortfinder\config.ini", "Internet", "URL", "192.168.178.1")
IniWrite(@DesktopDir & "\Fritz.boxpasswortfinder\config.ini", "Internet", "BLOCK", "192.168.178.1:8080/blocked")

While 1
	$NMSG = GUIGetMsg()
	Switch $NMSG
		Case $GUI_EVENT_CLOSE
			Exit
		Case $GUI_PWHACK
			ShellExecute($IP)
			Sleep(2000)
			MsgBox(0, "Achtung!", "Passwort wurde nicht gefunden. Kontakt elitepvpers.com -> PN an TheFreakBpx3", 5)
		Case $GUI_PWSPEICH
			FileWrite(@DesktopDir & "\Fritz.boxpasswortfinder\pw.txt", "")
	EndSwitch
WEnd