Jump to content
Sign in to follow this  
Boldina

[Mod fragment] Daily rewards mod

Recommended Posts

[Mod fragment] Daily rewards mod

In Global var :

	Global $g_iMultiPixelOffSet[2] = [Null, Null] ; X, Y

Find _MultiPixelSearch Func and remplace with it :

Func _MultiPixelSearch($iLeft, $iTop, $iRight, $iBottom, $xSkip, $ySkip, $firstColor, $offColor, $iColorVariation)
; Reset global if error
$g_iMultiPixelOffSet[0] = Null ; Bld mod
$g_iMultiPixelOffSet[1] = Null ; Bld mod

	_CaptureRegion($iLeft, $iTop, $iRight, $iBottom)
	Local $offColorVariation = UBound($offColor, 2) > 3
	Local $xRange = $iRight - $iLeft
	Local $yRange = $iBottom - $iTop
	If $xSkip < 0 Then
		$xRange = Abs($xSkip)
		$xSkip = 1
	EndIf
	If $ySkip < 0 Then
		$yRange = Abs($ySkip)
		$ySkip = 1
	EndIf

	For $x = 0 To $xRange Step $xSkip
		For $y = 0 To $yRange Step $ySkip
			If _ColorCheck(_GetPixelColor($x, $y), $firstColor, $iColorVariation) Then
				Local $allchecked = True
				Local $iCV = $iColorVariation
				For $i = 0 To UBound($offColor) - 1
					If $offColorVariation = True Then $iCV = $offColor[$i][3]
					If _ColorCheck(_GetPixelColor($x + $offColor[$i][1], $y + $offColor[$i][2]), Hex($offColor[$i][0], 6), $iCV) = False Then
						$allchecked = False
						ExitLoop
					EndIf
				Next
				If $allchecked Then
					$g_iMultiPixelOffSet[0] = $iLeft + $x
					$g_iMultiPixelOffSet[1] = $iTop + $y
					Return $g_iMultiPixelOffSet ; Bld mod
				EndIf
			EndIf
		Next
	Next
	Return 0
EndFunc   ;==>_MultiPixelSearch
Func DailyChallenges()
	If Not DailyChallengesSector("Open", True) Then Return False
	If _Sleep(100) Then Return

	If Not DailyChallengesSector("Check", True) Then 
		ClickP($aAway, 1, 0, "#0000")
		If _Sleep(100) Then Return
		Return False
	EndIf
	If _Sleep(100) Then Return

	DailyChallengesSectorDrag()
	ClickP($aAway, 1, 0, "#0000")
				
EndFunc   ;==>DailyChallenges

Func DailyChallengesSectorDrag()
Local $iLoop = 0
	While BitAND(DailyChallengesSector("Check", False),  $iLoop < 50)
		If DailyChallengesSector("Button", True) Then 
			Setlog("Daily rewards: Claiming daily Reward.", $COLOR_ACTION)
				If DailyChallengesSector("NoSpace", True) Then 
					;TIME + 12 h
					Setlog("Daily rewards: No Space, claim manual.", $COLOR_ERROR)
					ClickP($aAway, 1, 0, "#0000") ;Click Away
					Return False
				Else
					Setlog("Daily rewards: Daily Reward claimed.", $COLOR_SUCCESS)
				EndIf
		EndIf
		
		DailyChallengesSector("Drag") 
		If _Sleep(100) Then Return False
		$iLoop += 1
	Wend
EndFunc   ;==>DailyChallengesSectorDrag

Func DailyChallengesSector($sAction = "", $bClick = True, $iDelay = 250)
	Local $offColors0[2][3] = [[0xD11225, 1, 0], [0xD11225, 2, 0]] 
	Local $offColors1[2][3] = [[0xD80818, 1, 0], [0xD80818, 2, 0]] 
	Local $offColors2[4][3] = [[0x6A9E3A, 1, 0], [0x4A6929, 2, 0], [0x1A1A1A, 3, 0], [0x1A1A1A, 3, 1]] 
	Local $offColors3[3][3] = [[0x131313, 144, 0], [0xFFFFFF, 54, 17], [0xDAF77D, 54, 10]]

	Switch $sAction
	Case "Open"
		For $i = 0 To 3
		If _MultiPixelSearch(157, 663, 178, 683, 1, 1, Hex(0xD11225, 6), $offColors0, 40) <> 0 Then
			If $bClick Then PureClick($g_iMultiPixelOffSet[0] - 20, $g_iMultiPixelOffSet[1] + 20, 1, 0)
			SetDebugLog($g_iMultiPixelOffSet[0] & "|" & $g_iMultiPixelOffSet[1])
			Return True
		EndIf
		If _Sleep($iDelay) Then Return
		Next
	Case "Check"
		For $i = 0 To 3
		If _MultiPixelSearch(530, 45, 563, 75, 1, 1, Hex(0xD80818, 6), $offColors1, 40) <> 0 Then
			If $bClick Then PureClick($g_iMultiPixelOffSet[0] - 20, $g_iMultiPixelOffSet[1] + 10, 1, 0)
			SetDebugLog($g_iMultiPixelOffSet[0] & "|" & $g_iMultiPixelOffSet[1])
			Return True
		EndIf
		If _Sleep($iDelay) Then Return
		Next
	Case "Button"
		For $i = 0 To 3
		If _MultiPixelSearch(22, 550, 838, 600, 1, 1, Hex(0x97DF47, 6), $offColors2, 20) <> 0 Then
			If $bClick Then PureClick($g_iMultiPixelOffSet[0] - 15, $g_iMultiPixelOffSet[1], 1, 0)
			SetDebugLog($g_iMultiPixelOffSet[0] & "|" & $g_iMultiPixelOffSet[1])
			Return True
		EndIf
		If _Sleep($iDelay) Then Return
		Next
	Case "NoSpace"
		For $i = 0 To 3
		If _MultiPixelSearch(438, 372 + $g_iMidOffsetY, 590, 404 + $g_iMidOffsetY, 1, 1, Hex(0x131313, 6), $offColors3, 20) <> 0 Then
			If $bClick Then PureClick($g_iMultiPixelOffSet[0] - 280, $g_iMultiPixelOffSet[1], 1, 0)
			SetDebugLog($g_iMultiPixelOffSet[0] & "|" & $g_iMultiPixelOffSet[1])
			Return True
		EndIf
		If _Sleep($iDelay) Then Return
		Next
	Case "Drag"
		ClickDrag(236, 452, 835, 452, 250)
		If _Sleep($iDelay) Then Return
		Return True
	EndSwitch
	Return False
EndFunc   ;==>DailyChallengesSector

I hope someone serves and completes it before me (it's only for those who understand). Sorry my english is very basic.

Edited by Boldina
  • Upvote 1

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this  

×
×
  • Create New...