#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <File.au3>
#Include <Misc.au3>
#include <IE.au3>

#requireadmin

$browser_x = 100
$browser_y = 100
$devmode = 0
$browser_counter = 0

_IEErrorHandlerRegister()
$IE1 = _IECreateEmbedded()
$IE2 = _IECreateEmbedded()

$main =  GUICreate("main", @DesktopWidth - 2, @DesktopHeight - 2, 1, 1)

$Browser1 = GUICtrlCreateObj($IE1, $browser_x, $browser_y, @DesktopWidth / 5 , @DesktopHeight / 3)
$Browser2 = GUICtrlCreateObj($IE2, $browser_x + 600, $browser_y, @DesktopWidth / 5 , @DesktopHeight / 3)
GUICtrlSetState(-1, $gui_hide)

$input_browser = GUICtrlCreateInput("", 30, 20, @DesktopWidth - 200, 20)
$button_nagivate = GUICtrlCreateButton("Navigate", @DesktopWidth - 140, 20, 60, 20)
$button_change1 = GUICtrlCreateButton("[X]", $browser_x + @DesktopWidth / 5, $browser_y + @DesktopHeight / 3 , 20, 20, "", $WS_EX_TOPMOST)

$button_new_window = GUICtrlCreateButton("New Tab", 30, 50, 100, 20)

GUISetState()

_IENavigate($IE1, "www.google.de")
_IENavigate($IE2, "www.google.de")

while 1
	$msg = GUIGetMsg()
	if $msg = -3 then Exit
	if $msg = $button_nagivate then _IENavigate($IE1, GUICtrlRead($input_browser))
	if $msg = $button_new_window Then $browser_counter = $browser_counter + 1
	if $msg = $button_new_window Then _new_window()
	$a = GUIGetCursorInfo($main)
	if $a[4] = $button_change1 then
		do
			if _IsPressed(01) Then
				$mousepos = MouseGetPos()
				$size_browser1 = ControlGetPos("main", "", $browser1)
				GUICtrlSetPos($browser1, $mousepos[0] - $size_browser1[2] - 13  , $mousepos[1] - $size_browser1[3] - 13)
				GUICtrlSetPos($button_change1, $mousepos[0] - 13 , $mousepos[1] - 31)
				$browser_x = $mousepos[0] - @DesktopWidth / 5 - 13
				$browser_y = $mousepos[1] - @DesktopHeight / 3 - 31
			EndIf
			if _IsPressed(02) Then
				$mousepos = MouseGetPos()
				GUICtrlSetPos($browser1, $browser_x ,$browser_y, $mousepos[0] - $browser_x, $mousepos[1] - $browser_y)
				GUICtrlSetPos($button_change1, $mousepos[0] - 13 , $mousepos[1] - 31)
			EndIf
		until not _IsPressed(02) and not _IsPressed(01)
	EndIf
	sleep (10)
WEnd

func _new_window()
	GUICtrlSetState($Browser2, $gui_show)
EndFunc