Jump to content

Recommended Posts

Posted

Just looking at the screenshots, I'd have to say to go with pixelscans. But you'd have to keep the pixels being scanned to a minimum to keep the script from being too slow and failing to react at the correct time. Maybe I'll take a whack at it, if it's possible to do the way I'm thinking I could probably have a script in a few hours. If there's some unforseen complications (which is likely since I've only seen a screenshot) it might be a couple days instead. But nothing is impossible, you just have to try hard enough. :wacko:

Nomad :D

Posted

I got his far then went on to other things....based off the existing excellent Aimbot code found elsewhere in these forums. No, it does not work.

#include <GUIConstants.au3>
Global $Aimbot = 0, $found = "no"

Opt("MouseCoordMode", 0)
Opt("PixelCoordMode", 0)
Opt("MouseClickDelay", 0)
Opt("MouseClickDownDelay", 0)   

HotKeySet("{End}", "TurnoffAimbot")
        
Dim $ballcolor = 0xFFFFFF;White     
Dim $background = 0xCCCCCC ; Gray
Dim $bars = 0x000000    ; black
Dim $coord
Dim $coord1
Dim $hole

Func TurnoffAimbot()
    Exit
EndFunc  ;==>TurnoffAimbot
        

WinActivate("Falldown - Presented by Addicting Games")  
MouseClick("left",680,530,1,2); Clik enter
Sleep(1000)
MouseClick("left",500,600,1,2); Clik easy
Sleep(1000)
While 1
; Find ball     
        
        Do      
            If $found = "no" Then
                $coord = PixelSearch(434, 302, 950, 690, $ballcolor,2,2)
                If IsArray($coord) = 1 Then
                    $found = "yes"
                EndIf
            Else
                $pos = MouseGetPos()
                $coord = PixelSearch(($pos[0] - 10) , ($pos[1] - 10) , ($pos[0] + 10) , ($pos[1] + 10), $ballcolor) 
                If IsArray($coord) = 1 Then
                    Sleep(100)
                    Else
                    $found = "no"
                EndIf
            EndIf
        Until $found ="yes" 
; Find bar and search for gray hole 
        
            $coord1 = PixelSearch(434, 500, 930, 550, $bars, 2, 25)
            If IsArray($coord1) = 1 Then
                $hole = PixelSearch(434, $coord1[1],930, ($coord1[1] + 25), $background, 2, 10)
            EndIf

; move ball to hole with right or left arrow keys
            If $coord[0] < 562 and $hole[0] < 562 Then; move ball left toward hole
                Do
                    Send("{LEFT Down}")
                Until PixelSearch($hole[0], $hole[1], ($hole[0] + 25),($hole[1] + 25), $ballcolor, 2, 2)
            Else                                    ; move ball right toward hole
                Do
                    Send("{RIGHT Down}")
                Until PixelSearch($hole[0], $hole[1], ($hole[0] + 25),($hole[1] + 25), $ballcolor, 2, 2)
            EndIf

Wend
Exit

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...