#Include Chrome.ahk
Gogogo = 1
Added = 0

^F1::
{
PageInst := Chrome.GetPage(1)
	;ToolTip, F
	Sleep 100
	A := Chrome.GetPageList()
	Sleep 200
	;ToolTip, G
	for vKey, oPage in A
	{
		vUrl := oPage.url
		bmCheck := InStr(vUrl, "https://www.deviantart.com",,, 1)
		if (bmCheck = 1)
		{
			id := oPage.id
			;PageInst.Call("Target.activateTarget", {targetId: id})
			Fl = 1
			Break
		}
	}
	Try
		PageInst.Disconnect()
	;ToolTip, H
	Sleep 100
	if (Fl = 0)
	{
		Sleep 100
		SoundPlay, da/finish.wav, Wait
		ToolTip, %Added%
		Return
	}

	Try
		PageInst := Chrome.GetPageBy("id", id)

	Catch, e
	{
		A := e.Message
		MsgBox, %A%
		Return
	}
	;ToolTip, G

	Sleep 100
	While (Gogogo = 1)
	{
		MouseGetPos, A, B
		MouseMove, A+10, B+10
		Sleep 200
		MouseMove, A, B
		Sleep 50 ;Дергаем мышкой чтобы комп не заснул и монитор не погас.
		Try
			numEl := PageInst.Evaluate("document.getElementsByClassName('torpedo-thumb-link').length;").Value
		Catch e
		{
			A := e.Message
			Try
				PageInst.Disconnect()
			Sleep 1000
			Gosub, ^F1
			Return
		}
		Sleep 100

		Loop %numEl%
		{
			if (nume <> 0)
			{
				Tooltip, %curP% / %alP% - %A_Index% / %numEl% / %Added%
			} Else {
				Tooltip, Last - %A_Index% / %numEl% / %Added%
			}
			Sleep 50
			lnk := "document.getElementsByClassName('torpedo-thumb-link')[" . A_Index - 1 . "].href;"
			Try
				El := PageInst.Evaluate(lnk).Value
			Catch e
			{
				A := e.Message
				Sleep 100
				Try
					PageInst.Disconnect()
				Sleep 1000
				Gosub, ^F1
				Return
			}
			Sleep 50
			NewStr := SubStr(El, 1 , InStr(El, "/",,, 4))
			NewStr2 = %NewStr%gallery/
			MyFile = da\daList.txt
			FileRead, filetext, %MyFile%
			res := RegExMatch(filetext, "m`a)^\Q" . NewStr2 . "\E$")
			If (res = 0)
			{
				FileAppend, % (filetext="" ? "" : "`n") . NewStr2, %MyFile%
				Sleep, 50
			}
		}
		Sleep 100
	    nxtIs := PageInst.Evaluate("document.getElementsByClassName('next')[0].children[0].className;").Value
	    if (nxtIs <> "disabled")
	    {
	    	Sleep 100
			nxt := PageInst.Evaluate("document.getElementsByClassName('next')[0].children[0].href;").Value
			Sleep 100
			PageInst.Call("Page.navigate", {"url": nxt})
			Sleep 100
			Try
				PageInst.WaitForLoad()
			Catch, e
			{
				A:=e.Message
				Sleep 5000
			}
		}
		Fl = 0
		if (nxtIs = "disabled")
    	{
    		ToolTip A
    		Sleep 3000
    		Try
    			PageInst.Call("Target.closeTarget", {targetId: id}, "False")
    		Catch, e
    		{
    			A := e.Message
    			MsgBox, %A%
    			Return
    		}
    		;A
			Sleep 3000
    		ToolTip, B
			;Try
			;	PageInst.Disconnect()
    		Sleep 1000
    		;ToolTip, C
			if (Gogogo = 0)
			{
				SoundPlay, da/finish.wav, Wait
				Reload
				Return
			}
			;ToolTip, D
			Gosub, ^F1
			Return
    	}
		If (Gogogo = 0)
		{
			Sleep 100
			Menu, Tray, Icon, da/da_faviconFav.ico
			Sleep 500
			Gogogo = 1

			SoundPlay, da/finish.wav, Wait
			Reload
			Return
		}
	}
	

Return
}

Call(DomainAndMethod, Params:="", WaitForResponse:=True)
		{
			if !this.Connected
				throw Exception("Not connected to tab")
			
			; Use a temporary variable for ID in case more calls are made
			; before we receive a response.
			ID := this.ID += 1
			
			; Wait for the response
			this.responses[ID] := False
			
			this.ws.Send(Chrome.Jxon_Dump({"id": ID
			, "params": Params ? Params : {}
			, "method": DomainAndMethod}))
			
			if !WaitForResponse
				return

			FlipFlapper := 0
			while !this.responses[ID]
			{
				FlipFlapper += 1
				Sleep, 50
				If (FlipFlapper > 400)
				{
					throw Exception("CaptainResponses")
					return
				}
			}
			
			; Get the response, check if it's an error
			response := this.responses.Delete(ID)
			if (response.error)
				throw Exception("Chrome indicated error in response",, Chrome.Jxon_Dump(response.error))
			
			return response.result
		}
		
		/*
			Run some JavaScript on the page. For example:
			
			PageInst.Evaluate("alert(""I can't believe it's not IE!"");")
			PageInst.Evaluate("document.getElementsByTagName('button')[0].click();")
		*/
		Evaluate(JS)
		{
			Try
				response := this.Call("Runtime.evaluate",
				( LTrim Join
				{
					"expression": JS,
					"objectGroup": "console",
					"includeCommandLineAPI": Chrome.Jxon_True(),
					"silent": Chrome.Jxon_False(),
					"returnByValue": Chrome.Jxon_False(),
					"userGesture": Chrome.Jxon_True(),
					"awaitPromise": Chrome.Jxon_False()
				}
				))
			Catch e
			{
				throw Exception(e.Message)
				Return
			}
			
			if (response.exceptionDetails)
				throw Exception(response.result.description,, Chrome.Jxon_Dump(response.exceptionDetails))
			
			return response.result
		}
		
		/*
			Waits for the page's readyState to match the DesiredState.
			
			DesiredState - The state to wait for the page's ReadyState to match
			Interval     - How often it should check whether the state matches
		*/
		WaitForLoad(DesiredState:="complete", Interval:=100)
		{
			FlipFlapper := 0
			while this.Evaluate("document.readyState").value != DesiredState
			{
				FlipFlapper += 1
				Sleep, Interval
				If (FlipFlapper > 400)
				{
					throw Exception("CaptainWaitForLoad")
					return
				}
			}
		}

Call(DomainAndMethod, Params:="", WaitForResponse:=True)
{
	if !this.Connected
		throw Exception("Not connected to tab")
	
	; Use a temporary variable for ID in case more calls are made
	; before we receive a response.
	ID := this.ID += 1
	this.responses[ID] := False
	this.ws.Send(Chrome.Jxon_Dump({"id": ID
	, "params": Params ? Params : {}
	, "method": DomainAndMethod}))
	
	if !WaitForResponse
		return
	
	; Wait for the response
	while !this.responses[ID]
		Sleep, 50
	
	; Get the response, check if it's an error
	response := this.responses.Delete(ID)
	if (response.error)
		throw Exception("Chrome indicated error in response",, Chrome.Jxon_Dump(response.error))
	
	return response.result
}