Register for your free account! | Forgot your password?

Go Back   elitepvpers Coders Den AutoIt
You last visited: Today at 16:02

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Millionair City Bot

Discussion on Millionair City Bot within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
.Quality's Avatar
 
elite*gold: 160
Join Date: Oct 2009
Posts: 187
Received Thanks: 30
Millionair City Bot

Hey,
ich bräuchte einen der Ahnung von AutoIT hat
Hab versucht ein MC Bot zu machen...mit ImageSearch. Allerdings sucht er nur nach dem 1. Bild und macht dann nicht weiter. Hier der Source.

PHP Code:
#include<ImageSearch.au3>
HotKeySet("{NUMPAD1}""Start")
HotKeySet("{NUMPAD2}""Stop")
$x1=0
$y1
=0
$x2
=0
$y2
=0
While 1
    sleep
(1)
WEnd

Func Start
()
    While 
1
        $result
=_ImageSearch("geld.png" ,1,$x1,$y1,0)
        If 
$result=1 then
            MouseClick
("left"$x1$y1)
            
sleep(500)
            
            
$result2=_ImageSearch("vertrag.png" ,1,$x2,$y2,0)
            If 
$result=1 then
            MouseClick
("left"$x2$y2)
            
sleep(500)
            
        EndIf
        EndIf
    
WEnd
EndFunc



Func Stop
()
    Exit 
0
EndFunc 
Danke im vorraus
Werde den Bot dann natürlich releasen
.Quality is offline  
Old   #2
 
.Quality's Avatar
 
elite*gold: 160
Join Date: Oct 2009
Posts: 187
Received Thanks: 30
Bump - Kann da keiner was zu sagen?
.Quality is offline  
Old   #3
 
Shadow992's Avatar
 
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,876
Quote:
Originally Posted by .Quality View Post
Bump - Kann da keiner was zu sagen?
Ich kann dir nichts direkt dazu sagen, sondern dir nur raten dich möglichst von
dem ganzem Pixel-Zeugs wegzubegeben und es stattdessen mit IE oder per Packets zu machen.

Außerdem gehört das wohl eher in die AutoIt-Sektion.
Shadow992 is offline  
Old   #4
 
elite*gold: 0
Join Date: Aug 2006
Posts: 409
Received Thanks: 150
Zeile 19 und 20:
Code:
            $result2=_ImageSearch("vertrag.png" ,1,$x2,$y2,0)
            If $result=1 then
In Zeile 19 deklarierst du $result2 und in Zeile 20 fragst du nach $result, das müsste aber $result2 sein.
~De@dly Silence~ is offline  
Old   #5
 
.Quality's Avatar
 
elite*gold: 160
Join Date: Oct 2009
Posts: 187
Received Thanks: 30
1x Danke für die Hilfe und einmal fürs Moven
Leider kann ich mit Packets überhaupt garnichts anfagen :<

Hab's jetzte geändert. Will aber immernoch nicht so wie ich will

PHP Code:
#include<ImageSearch.au3>
HotKeySet("{NUMPAD1}""Start")
HotKeySet("{NUMPAD2}""Stop")
$x1=0
$y1
=0
$x2
=0
$y2
=0
$x3
=0
$y3
=0
While 1
    sleep
(1)
WEnd

Func Start
()
    While 
1
        $result
=_ImageSearch("geld.png" ,1,$x1,$y1,0)
        If 
$result=1 then
            MouseClick
("left"$x1$y1)
            
sleep(500)
            
            
$result2=_ImageSearch("vertrag.png" ,1,$x2,$y2,0)
            If 
$result2=1 then
            MouseClick
("left"$x2$y2)
            
sleep(500)
            
            
$result3=_ImageSearch("familie.png" ,1,$x3,$y3,0)
            If 
$result3=1 then
            MouseClick
("left"$x3$y3)
            
sleep(500)
            
        EndIF
        EndIf
        EndIf

    
WEnd
EndFunc



Func Stop
()
    Exit 
0
EndFunc 
Es hängt weiterhin an der 2...
.Quality is offline  
Old   #6
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
PHP Code:
#include<ImageSearch.au3>
HotKeySet("{NUMPAD1}""Start")
HotKeySet("{NUMPAD2}""Stop")
$x1 0
$y1 
0
$x2 
0
$y2 
0
$x3 
0
$y3 
0
While 1
    Sleep
(1)
WEnd

Func Start
()
    While 
1
        $result 
_ImageSearch("geld.png"1$x1$y10)
        
$result2 _ImageSearch("vertrag.png"1$x2$y20)
        
$result3 _ImageSearch("familie.png"1$x3$y30)

        If 
$result 1 Then
            MouseClick
("left"$x1$y1)
            
Sleep(500)
        ElseIf 
$result2 1 Then
            MouseClick
("left"$x2$y2)
            
Sleep(500)
        ElseIf 
$result3 1 Then
            MouseClick
("left"$x3$y3)
            
Sleep(500)
        EndIf
    
WEnd
EndFunc

Func Stop
()
    Exit
EndFunc 
wenn sie hintereinander kommen sollen dann so
omer36 is offline  
Thanks
1 User
Old   #7
 
elite*gold: 0
Join Date: Aug 2006
Posts: 409
Received Thanks: 150
Vielleicht liegt es an den EndIfs.

Code:
#include<ImageSearch.au3>
HotKeySet("{NUMPAD1}", "Start")
HotKeySet("{NUMPAD2}", "Stop")
$x1=0
$y1=0
$x2=0
$y2=0
$x3=0
$y3=0
While 1
    sleep(1)
WEnd

Func Start()
    While 1
        $result=_ImageSearch("geld.png" ,1,$x1,$y1,0)
        If $result=1 then
            MouseClick("left", $x1, $y1)
            sleep(500)
        EndIf

        $result2=_ImageSearch("vertrag.png" ,1,$x2,$y2,0)
        If $result2=1 then
            MouseClick("left", $x2, $y2)
            sleep(500)
        EndIf
    
        $result3=_ImageSearch("familie.png" ,1,$x3,$y3,0)
        If $result3=1 then
            MouseClick("left", $x3, $y3)
            sleep(500)
        EndIf    
    WEnd
EndFunc



Func Stop()
    Exit 0
EndFunc
Probier es mal so.

//edit: Ach Mist, zu spät ^^
~De@dly Silence~ is offline  
Thanks
1 User
Old   #8
 
.Quality's Avatar
 
elite*gold: 160
Join Date: Oct 2009
Posts: 187
Received Thanks: 30
Danke, jetzt gehts bis zum Vertrag ...
Aber dann wählt er nicht den nächsten..ich hab das Gefühl ImageSearch mag mich nicht ~.~.
Habs mit einem neuen Screen versucht das hats aber dann auch nicht gebracht.

Danke für die schnellen Antworten!

Sry hab deinen Post überlesen Omer36..werd auch das mal testen

Soo..habs jetzte getestet aber es hängt an der selben stelle..
.Quality is offline  
Old   #9
 
elite*gold: 0
Join Date: Aug 2006
Posts: 409
Received Thanks: 150
Probier mal die Stelle, wo du hängst, als Erstes zu machen. Vielleicht ist ja auch was mit dem Bild nicht in Ordnung.
~De@dly Silence~ is offline  
Old   #10
 
.Quality's Avatar
 
elite*gold: 160
Join Date: Oct 2009
Posts: 187
Received Thanks: 30
Oh ja, es scheint was mit dem Bild was nicht in Ordnung zu sein..danke für die Hilfe
Ich geh jetzt erstmal schlafen und schauen morgen weiter
.Quality is offline  
Old   #11
 
elite*gold: 0
Join Date: Sep 2009
Posts: 3
Received Thanks: 4
Wieso geht das Thema hier nicht weiter ?
interessiert mich auch mal son mc boot
ich kann auch behilflich sein ich probier das jetz auch mal mit autoit

gruß
OnurTr is offline  
Reply


Similar Threads Similar Threads
Suche City of Heroes/City of Villains Account`s
12/13/2011 - Trading - 1 Replies
Hallo wie der titel schon sagt suche ich Accounts für COX gibt ja viele die mitlerweile aufgehört haben auf den europäische Server und Mindestens einem Rentner(lvl50) drauf
pheonix city or desert city mine?
12/07/2006 - Conquer Online 2 - 15 Replies
which mine cave is better for minning gems, since only mine in pc now i dunno which mine cave is better for getting gems so can someone tell me which mine cave is better out of them all. by the way, has anyone tried minning in jail? and do u get ores easy?ty :D



All times are GMT +2. The time now is 16:02.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.