Neobux Autoclick 1.0.0.2

;@Ahk2Exe-SetCompanyName VANHEARTNET LTD. INC.
;@Ahk2Exe-SetCopyright All rights reserved  © VANHEARTNET
;@Ahk2Exe-Set FileDescription, Neobux
;@Ahk2Exe-Set FileVersion, 1.0.0.2
;@Ahk2Exe-SetInternalName Neobux
;@Ahk2Exe-SetName Neobux
;@Ahk2Exe-SetOrigFileName Neobux
;@Ahk2Exe-Set ProductName, Neobux
;@Ahk2Exe-Set ProductVersion, 1.0.0.2
;@Ahk2Exe-Set Description, Neobux
;@Ahk2Exe-Set Comments, Software Created by : VANHEARTNET


#SingleInstance, Force
Menu,Tray,Nostandard
SetWorkingDir %A_ScriptDir%
SetBatchLines, 20ms
DetectHiddenText, On
SetTitleMatchMode, 2
CoordMode,Mouse,screen
CoordMode,Pixel,screen


global Num

IfNotExist,%A_Temp%\Neobux
	FileCreateDir,%A_Temp%\Neobux
else
{
	FileRemoveDir,%A_Temp%\Neobux,1
	FileCreateDir,%A_Temp%\Neobux
}
;~ #####################	Files	############################################

FileInstall,bar.png,%A_Temp%\Neobux\bar.png,1
FileInstall,bar2.png,%A_Temp%\Neobux\bar2.png,1
FileInstall,bar3.png,%A_Temp%\Neobux\bar3.png,1
FileInstall,bar4.png,%A_Temp%\Neobux\bar4.png,1
FileInstall,dot2.png,%A_Temp%\Neobux\dot2.png,1
FileInstall,close.png,%A_Temp%\Neobux\close.png,1
FileInstall,adprize.png,%A_Temp%\Neobux\adprize.png,1
FileInstall,SameIP.png,%A_Temp%\Neobux\SameIP.png,1
FileInstall,leave.png,%A_Temp%\Neobux\leave.png,1
FileInstall,Links.txt,%A_Temp%\Neobux\Links.txt,1
FileInstall,cc.png,%A_Temp%\Neobux\cc.png,1
FileInstall,logo.png,%A_Temp%\Neobux\logo.png,1

;~ #####################################################################################
Gui,1:+Alwaysontop -Caption
Gui,1:Color,222222
Gui,1:Add,Picture,x50 y50 w500 h120,%A_Temp%\Neobux\logo.png

Gui,1:Show,w600 h200,Neobox
Gui,1:+Lastfound
winset,Transcolor,222222
;~ ################################################################

IfwinNotExist, NeoBux - View Advertisements - Google Chrome ahk_class Chrome_WidgetWin_1 ahk_exe chrome.exe
	Run, https://www.neobux.com/m/v/?vl=9D9D7679FF9DFEE6
else
	WinActivate
sleep, 5000
Gui,1:hide
Num = %A_Min%

starts:

if (Num>19)
{
	Num := Num-19
	if (Num>19)
		gosub,starts
	else
		goto, Linking
}
else if (Num==00)
{
	Num:=1
	goto, Linking
}

Linking:
FileReadLine,Line,%A_Temp%\Neobux\Links.txt,%Num%

Loop
{
;~ ########################################################################################################################
	IfWinExist,NeoBux - Login - Google Chrome ahk_class Chrome_WidgetWin_1 ahk_exe chrome.exe
	{
		WinMaximize,NeoBux - Login - Google Chrome
		Send, vanheartnet
		Sleep,1000
		Send, {Tab}
		Sleep,1000
		Send, Js011288098
		Sleep,1000
		Send, {enter}
		sleep,10000
		process,close,chrome.exe
		Reload
	}
;~ #########################################################################################################################
	ImageSearch, BX,BY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\bar.png
	if Errorlevel=0
	{
		BX:=BX+2
		BY:=BY+10
		MouseMove, %BX%,%BY%,1
		Mouseclick,Left
		sleep,1000
		Gosub, Bar2
	}
	else
	{
		ImageSearch, B2X,B2Y,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\bar2.png
		if Errorlevel=0
		{
			B2X:=B2X+2
			B2Y:=B2Y+2
			MouseMove, %B2X%,%B2Y%,1
			Mouseclick,Left
			sleep,1000
			Gosub, Bar2
		}
		else
		{
			ImageSearch, B2X,B2Y,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\bar3.png
			if Errorlevel=0
			{
				B2X:=B2X+2
				B2Y:=B2Y+2
				MouseMove, %B2X%,%B2Y%,1
				Mouseclick,Left
				sleep,1000
				Gosub, Bar2
			}
			else
			{
				ImageSearch, B2X,B2Y,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\bar4.png
				if Errorlevel=0
				{
					B2X:=B2X+2
					B2Y:=B2Y+2
					MouseMove, %B2X%,%B2Y%,1
					Mouseclick,Left
					sleep,1000
					Gosub, Bar2
				}
				else
				{
						ImageSearch, APX,APY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\adprize.png
						If Errorlevel=0
						{
							APX:=APX+40
							APY:=APY+50
							MouseMove,%APX%,%APY%,1
							Mouseclick,Left
							sleep,8000
							Gosub, Adprize
						}
						else
						{
							WinActivate,NeoBux - View Advertisements - Google Chrome
							ImageSearch, NX,NY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\adprize.png
							if Errorlevel=1
							{
								TrayTip,,5 secs before Exit...
								sleep,1000
								TrayTip,,4 secs before Exit...
								sleep,1000
								TrayTip,,3 secs before Exit...
								sleep,1000
								TrayTip,,2 secs before Exit...
								sleep,1000
								TrayTip,,1 secs before Exit...
								sleep,1000
								TrayTip,,0 secs... Goodbye...
								Gosub, CloseB
								;~ sleep,1000
								;~ Run, %Line%
								;~ sleep, 5000
								;~ Send {space}
								;~ sleep,3600000
								;~ gosub, CloseB
								ExitApp
							}
							else
							{
								ToolTip, Scanning....
								sleep,1000
								ToolTip,
							}

						}



				}
			}
		}
	}

}
return

Bar2:
ImageSearch, DX,DY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\dot2.png
		if Errorlevel=0
		{
			DX:=DX+2
			DY:=DY+2
			MouseMove, %DX%,%DY%,1
			Mouseclick,Left
			sleep,8000
			Loop
			{
				ImageSearch, CX,CY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\close.png
				if Errorlevel=0
				{
					Gosub, CloseB
					break
				}
				else
				{
					Sleep,2000
					ImageSearch, CX,CY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\SameIP.png
					if Errorlevel=0
					{
						Gosub,CloseB
						break
					}
				}
			}
		}
	return

Subs()
	{
		Num := Num-19
	}


Adprize:
	Loop
			{
				ImageSearch, CX,CY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\close.png
				if Errorlevel=0
				{
					Gosub, CloseB
					break
				}
				else
				{
					Sleep,2000
					ImageSearch, CX,CY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\SameIP.png
					if Errorlevel=0
					{
						Gosub,CloseB
						break
					}
				}
			}
	return

CloseB:
	Send {LCtrl down} {w}
	sleep,1000
	Send {LCtrl up}
	ImageSearch, CX,CY,0,0,A_Screenwidth, A_ScreenHeight,%A_Temp%\Neobux\leave.png
	if Errorlevel=0
	{
		MouseMove, %CX%,%CY%,1
		Mouseclick,Left
	}
	return

Esc::
ExitApp