#include <IE.au3>
#include <AutoItConstants.au3>

$oIE = _IECreate("https://www.yemeksepeti.com/istanbul-uye-ol")

$Mail = _IEGetObjByName($oIE,"Email")
$Sifre = _IEGetObjByName($oIE,"Password")
$SifreT = _IEGetObjByName($oIE,"RepeatPassword")
$Ad = _IEGetObjByName($oIE,"FirstName")
$Soyad = _IEGetObjByName($oIE,"LastName")
$Dtarih = _IEGetObjByName($oIE,"BirthDate")
$Semt = _IEGetObjById($oIE,"s2id_autogen2_search")
$check= _IEGetObjById($oIE,"inputAcceptEula")

WinSetState("Üye, Kayıt Ol - Yemek Sepeti - Internet Explorer","",@SW_MAXIMIZE)

For $m = 1 to 999

Sleep(2000)

_IEPropertySet($Mail,"innerText","djnss3s10"&$m&"@gmail.com" )
_IEPropertySet($Sifre,"innerText","159357")
_IEPropertySet($SifreT,"innerText","159357")
_IEPropertySet($Ad,"innerText","Kerimo")
_IEPropertySet($Soyad,"innerText","Mezdan")
_IEPropertySet($Dtarih,"innerText","31 12 1990")

Sleep(2000)

MouseClickDrag("left",1358,346,1358,526)


Sleep(2000)


MouseClick("left",659, 437)

Sleep(2000)


MouseClick("left",410, 490)

Sleep(2000)



_IEAction($check,"click")


With $oIE

$btnEnter= .document.getElementsByTagname("button")



for $b in $btnEnter

	if $b.innerHTML = "ÜYE OL" Then
		$b.click()
		EndIf
Next


While($oIE.busy)
	WEnd

Sleep(5000)




While($oIE.busy)
	WEnd
EndWith


MouseClick("left",405, 276)

Sleep(2500)

MouseClick("left",219, 524)

Sleep(5500)

MouseClick("left",896, 509)
Sleep(5500)
Next