Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- WinActivate("CROSSFIRE")
- WinWaitActive("CROSSFIRE")
- WinMove("CROSSFIRE", "", 0, 0)
- Global $___WINPOS = WinGetPos("CROSSFIRE")
- Global $___WINCLIENTSIZE = WinGetClientSize("CROSSFIRE")
- Global $___X = $___WINPOS[0] + 3
- Global $___Y = $___WINPOS[1] + 26
- ;~ Test
- While 1
- Global $___WINPOS = WinGetPos("CROSSFIRE")
- Global $___WINCLIENTSIZE = WinGetClientSize("CROSSFIRE")
- Global $___X = $___WINPOS[0] + 3
- Global $___Y = $___WINPOS[1] + 26
- ;~ If IsRound1() Then
- ;~ ToolTip("IsRound1_CacNPCConLai", 0, 0)
- ;~ ElseIf IsRound2() Then
- ;~ ToolTip("Di chuyen toi gan Can ve", 0, 0)
- ;~ ElseIf IsRound3() Then
- ;~ ToolTip("Tieu diet quai vat Gigant", 0, 0)
- ;~ Else
- ;~ ToolTip("...", 0, 0)
- ;~ EndIf
- If IsRound1_CacNPCConLai() Then
- ToolTip("IsRound1_CacNPCConLai()", 0, 0)
- ElseIf IsRound2_DiChuyenToiGanCanVe() Then
- ToolTip("IsRound2_DiChuyenToiGanCanVe()", 0, 0)
- ElseIf IsRound2_DanhBaiCanVe() Then
- ToolTip("IsRound2_DanhBaiCanVe()", 0, 0)
- ElseIf IsRound3_DiChuyenToiGanQuaiVatGigant() Then
- ToolTip("IsRound3_DiChuyenToiGanQuaiVatGigant()", 0, 0)
- ElseIf IsRound3_TieuDietQuaiVatGigant() Then
- ToolTip("IsRound3_TieuDietQuaiVatGigant()", 0, 0)
- Else
- ToolTip("...", 0, 0)
- EndIf
- Sleep(1000)
- WEnd
- ;~ ; Test
- ;~ ConsoleWrite("IsRound1() "&IsRound1()&@CRLF)
- ;~ ConsoleWrite("IsRound2() "&IsRound2()&@CRLF)
- ;~ ConsoleWrite("IsRound3() "&IsRound3()&@CRLF)
- Func IsRound1()
- Return IsRound1_CacNPCConLai()
- EndFunc
- Func IsRound2()
- If IsRound2_DiChuyenToiGanCanVe() Then Return True
- If IsRound2_DanhBaiCanVe() Then Return True
- Return False
- EndFunc
- Func IsRound3()
- If IsRound3_DiChuyenToiGanQuaiVatGigant() Then Return True
- If IsRound3_TieuDietQuaiVatGigant() Then Return True
- Return False
- EndFunc
- Func IsRound1_CacNPCConLai()
- ;~ Diem hien tai
- If _CheckColor("414 12 cae6eb") == False Then Return False
- If _CheckColor("444 12 cae6eb") == False Then Return False
- If _CheckColor("469 12 cae6eb") == False Then Return False
- ;~ Cac NPC con lai
- If _CheckColor("552 13 cae6eb") == False Then Return False
- If _CheckColor("572 13 cae6eb") == False Then Return False
- If _CheckColor("599 13 cae6eb") == False Then Return False
- If _CheckColor("614 13 cae6eb") == False Then Return False
- Return True
- EndFunc
- Func IsRound2_DiChuyenToiGanCanVe()
- ;~ Diem hien tai
- If _CheckColor("414 12 cae6eb") == False Then Return False
- If _CheckColor("444 12 cae6eb") == False Then Return False
- If _CheckColor("469 12 cae6eb") == False Then Return False
- ;~ Di chuyen toi gan Can ve
- If _CheckColor("560 13 cae6eb") == False Then Return False
- If _CheckColor("569 13 cae6eb") == False Then Return False
- If _CheckColor("607 13 cae6eb") == False Then Return False
- If _CheckColor("629 13 cae6eb") == False Then Return False
- If _CheckColor("649 13 cae6eb") == False Then Return False
- If _CheckColor("659 13 cae6eb") == False Then Return False
- Return True
- EndFunc
- Func IsRound2_DanhBaiCanVe()
- ;~ Diem hien tai
- If _CheckColor("414 12 cae6eb") == False Then Return False
- If _CheckColor("444 12 cae6eb") == False Then Return False
- If _CheckColor("469 12 cae6eb") == False Then Return False
- ;~ Danh bai Can ve
- If _CheckColor("563 10 cae6eb") == False Then Return False
- If _CheckColor("588 13 cae6eb") == False Then Return False
- If _CheckColor("605 10 cae6eb") == False Then Return False
- If _CheckColor("625 10 cae6eb") == False Then Return False
- Return True
- EndFunc
- Func IsRound3_DiChuyenToiGanQuaiVatGigant()
- ;~ Diem hien tai
- If _CheckColor("414 12 cae6eb") == False Then Return False
- If _CheckColor("444 12 cae6eb") == False Then Return False
- If _CheckColor("469 12 cae6eb") == False Then Return False
- ;~ Di chuyen toi gan quai vat Gigant
- If _CheckColor("560 14 cae6eb") == False Then Return False
- If _CheckColor("595 14 cae6eb") == False Then Return False
- If _CheckColor("608 16 cae6eb") == False Then Return False
- If _CheckColor("630 16 cae6eb") == False Then Return False
- If _CheckColor("651 17 cae6eb") == False Then Return False
- If _CheckColor("669 14 cae6eb") == False Then Return False
- If _CheckColor("701 14 cae6eb") == False Then Return False
- Return True
- EndFunc
- Func IsRound3_TieuDietQuaiVatGigant()
- ;~ Diem hien tai
- If _CheckColor("414 12 cae6eb") == False Then Return False
- If _CheckColor("444 12 cae6eb") == False Then Return False
- If _CheckColor("469 12 cae6eb") == False Then Return False
- ;~ Tieu diet quai vat Gigant
- If _CheckColor("555 14 cae6eb") == False Then Return False
- If _CheckColor("576 14 cae6eb") == False Then Return False
- If _CheckColor("598 14 cae6eb") == False Then Return False
- If _CheckColor("621 14 cae6eb") == False Then Return False
- If _CheckColor("660 14 cae6eb") == False Then Return False
- Return True
- EndFunc
- Func _CheckColor($str)
- Local $arr = StringSplit($str, " ")
- Local $x = $___X + $arr[1]
- Local $y = $___Y + $arr[2]
- Local $color1 = $arr[3]
- Local $color2 = Hex(PixelGetColor($x, $y), 6)
- ;~ ConsoleWrite("$x "&$x&",$y "&$y&",color "&$color2&@CRLF)
- ;~ ConsoleWrite("$str "&$str&",color "&$color2&@CRLF)
- Return $color1 = $color2
- EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement