und rausgekommen ist ein kleines Tool für das Browsergame
Was macht es?
Es erscheint eine Gui in der versch. Buttons sind mit den jeweiligen Gebäuden(nicht alle....)
Wenn man auf die Buttons von Gebäude klickt wird nach den Gebäuden auf dem Bildschirm gesucht und raufgeklickt.
Bei Symbolen sind die Symbole im Hauptgebäude gemeint..
also wenn man z.b. auf das Symbol Holzfäller klickt wird nach diesem Symbol gesucht und wenn es gefunden wurde wird der Holzfäller ausgebaut..........
Ich wollte fragen ob ihr es testen könnt
Wie oben schon gesagt es ist nur zur Übung entstanden.
Source:
PHP Code:
HotKeySet("{F4}","_Suche_beenden")
#include <ImageSearch.au3>
$x=0
$y=0
$search = 0
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Die Staemme Tool", 475, 334, 192, 124)
$Group1 = GUICtrlCreateGroup("Gebäude", 8, 8, 457, 153)
$Haupthaus = GUICtrlCreateButton("Hauptgebäude", 16, 24, 131, 25, 0)
$Versammlungsplatz = GUICtrlCreateButton("Versammlungsplatz", 16, 56, 131, 25, 0)
$Kirche = GUICtrlCreateButton("Kirche", 16, 88, 131, 25, 0)
$Versteck = GUICtrlCreateButton("Versteck", 16, 120, 131, 25, 0)
$Speicher = GUICtrlCreateButton("Speicher", 168, 24, 131, 25, 0)
$Holz = GUICtrlCreateButton("Holzfäller", 168, 56, 131, 25, 0)
$Lehm = GUICtrlCreateButton("Lehmgrube", 168, 88, 131, 25, 0)
$Eisen = GUICtrlCreateButton("Eisenmine", 168, 120, 131, 25, 0)
$Wall = GUICtrlCreateButton("Wall", 320, 56, 131, 25, 0)
$Statue = GUICtrlCreateButton("Statue", 320, 88, 131, 25, 0)
$Bauernhof = GUICtrlCreateButton("Bauernhof", 320, 120, 131, 25, 0)
$Kaserne = GUICtrlCreateButton("Kaserne", 320, 24, 131, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Symbole", 8, 176, 457, 145)
$Haupthau = GUICtrlCreateButton("Hauptgebäude", 16, 192, 131, 25, 0)
$Versammlungsplat = GUICtrlCreateButton("Versammlungsplatz", 16, 224, 131, 25, 0)
$Kirch = GUICtrlCreateButton("Kirche", 16, 256, 131, 25, 0)
$Verstec = GUICtrlCreateButton("Versteck", 16, 288, 131, 25, 0)
$Speiche = GUICtrlCreateButton("Speicher", 168, 192, 131, 25, 0)
$Hol = GUICtrlCreateButton("Holzfäller", 168, 224, 131, 25, 0)
$Leh = GUICtrlCreateButton("Lehmgrube", 168, 256, 131, 25, 0)
$Eise = GUICtrlCreateButton("Eisenmine", 168, 288, 131, 25, 0)
$Kasern = GUICtrlCreateButton("Kaserne", 320, 192, 131, 25, 0)
$Wal = GUICtrlCreateButton("Wall", 320, 224, 131, 25, 0)
$Statu = GUICtrlCreateButton("Statue", 320, 256, 131, 25, 0)
$Bauernho = GUICtrlCreateButton("Bauernhof", 320, 288, 131, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Button()
Func Button()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
case $Haupthaus
global $Bild = @scriptdir&"\Gebäude\Hauptgebäude.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Versammlungsplatz
global $Bild = @scriptdir&"\Gebäude\Versammlungsplatz.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Kirche
global $Bild = @scriptdir&"\Gebäude\Kirche.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Versteck
global $Bild = @scriptdir&"\Gebäude\Versteck.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Speicher
global $Bild = @scriptdir&"\Gebäude\Speicher.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Holz
global $Bild = @scriptdir&"\Gebäude\Holzfäller.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Lehm
global $Bild = @scriptdir&"\Gebäude\Lehmgrube.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Eisen
global $Bild = @scriptdir&"\Gebäude\Eisenmine.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Statue
global $Bild = @scriptdir&"\Gebäude\Statue.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Bauernhof
global $Bild = @scriptdir&"\Gebäude\Bauernhof.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
exitloop
case $Haupthau
global $Bild = @scriptdir&"\Symbole\Hauptgebäude.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Versammlungsplat
global $Bild = @scriptdir&"\Symbole\Versammlungsplatz.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Kirch
global $Bild = @scriptdir&"\Symbole\Kirche.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Verstec
global $Bild = @scriptdir&"\Symbole\Versteck.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Speiche
global $Bild = @scriptdir&"\Symbole\Speicher.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Hol
global $Bild = @scriptdir&"\Symbole\Holzfäller.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Leh
global $Bild = @scriptdir&"\Symbole\Lehmgrube.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Eise
global $Bild = @scriptdir&"\Symbole\Eisenmine.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Kasern
global $Bild = @scriptdir&"\Symbole\Kaserne.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Wal
global $Bild = @scriptdir&"\Symbole\Wall.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Statu
global $Bild = @scriptdir&"\Symbole\Statue.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
case $Bauernho
global $Bild = @scriptdir&"\Symbole\Bauernhof.png"
winmove("Die Staemme Tool", "", 880, 5)
winsetstate("Die Staemme Tool", "",@sw_hide)
Symbole()
EndSwitch
WEnd
endfunc
while 1
$search = _ImageSearch($Bild,1,$x,$y,1)
if $search = 1 Then
mouseclick("left",$x,$y)
winsetstate("Die Staemme Tool", "",@sw_show)
Button()
endif
wend
Func Symbole()
while 1
$search = _ImageSearch($Bild,1,$x,$y,1)
if $search = 1 Then
mouseclick("left",$x+550,$y)
winsetstate("Die Staemme Tool", "",@sw_show)
Button()
endif
wend
endfunc
func _Suche_beenden()
winsetstate("Die Staemme Tool", "", @sw_show)
endfunc
Bilder usw sind im Anhang
Hier Virusscan VT geht i. wie nich da hab ich Kaspersky genommen:
