PIRATE GALAXY (Kill + Crio) Bot v.1.0, Hilfe gesucht

[-Jastreb--SA7-]

Hi Leute,

ich will einen PIRATE GALAXY Bot mit AutoIt machen, aber das problem ist das ich ein einsteiger in AutoIt bin.
Mit Scripten kenn ich mich schon aus, da ich .php, .js, .html, ...programmiere.

Der Bot geht aber ich habe problemen mit Check Boxen und mit url bildern, des wegen habe ich für das estes mal so gemacht das man auf STAR drück und er anfängt zu Kill und Crio einsammeln, dem Bot habe ich nur auf einen Tank (Dominator) ausgetestet.

also ich habe auch den Bot auf Molikar getestet und der hat für 6 Stunden ca.20.000 gebalert, es wäre auch mehr wenn er jedes crio einsammeln würde

wenn jemand mit wirken will dan schreibt hier ein PN oder auf E-Mail:


-----------------------SCRIPT---------------------------

denn richtigen Bot code schreibe ich aber hier nicht.!!!!

HotKeySet("{ESC}","Beenden")


#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=e:\games\koda gui\forms\form1.kxf


$Form1_1 = GUICreate("PIRATE GALAXY Bot v.1.0", 610, 514, 195, 164)
$title = GUICtrlCreateLabel("PIRATE GALAXY v.1.0", 0, 24, 115, 17)
$by = GUICtrlCreateLabel("by -Jastreb--SA7-", 88, 40, 84, 17)
$Tab1 = GUICtrlCreateTab(8, 104, 593, 265)
$TabSheet1 = GUICtrlCreateTabItem("INFO")
$Label3 = GUICtrlCreateLabel("Hallo Leute,", 16, 136, 61, 17)
$Label4 = GUICtrlCreateLabel("ich habe mir mit einen Kumpel vorgenommen einen PIRATE GALAXY Bot zu Programmieren,", 16, 168, 439, 17)
$Label5 = GUICtrlCreateLabel("das Problem ist ich bin Einsteiger in AutoIt aber da ich .php, .js, .html, … Programmire ist es für", 16, 184, 436, 17)
$Label6 = GUICtrlCreateLabel("mich nicht so schwer einen neue Programmier Sprache zu Lernen.", 16, 200, 316, 17)
$Label7 = GUICtrlCreateLabel("Jetzt suchen wir paar Leute die sich sehr Gut mit AutoIt auskennen und einen PIRATE GALAXY", 16, 224, 456, 17)
$Label8 = GUICtrlCreateLabel("Bot Programmieren wollen, wenn ihr Interessen habt mit zu Programmieren dann meldet euch bitte", 16, 240, 462, 17)
$Label9 = GUICtrlCreateLabel("unter dieser E-Mail: ", 16, 256, 192, 17)
$Label10 = GUICtrlCreateLabel("Grüße ", 16, 280, 36, 17)
$Label11 = GUICtrlCreateLabel("-Jastreb—SA7- und -elik96-", 56, 296, 125, 17)
$TabSheet3 = GUICtrlCreateTabItem("Aktiv Items")
$StandartItems = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\standart.jpg", 24, 144, 156, 39)
$Pic1 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\RackDef2.jpg", 200, 304, 156, 39)
$Pic2 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\tank.jpg", 200, 144, 156, 39)
$Pic3 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\shock.jpg", 24, 224, 156, 39)
$Pic4 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\doc.jpg", 376, 144, 156, 39)
$Pic5 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\sniper.jpg", 200, 224, 156, 39)
$Pic6 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\defender.jpg", 376, 224, 156, 39)
$Blasters = GUICtrlCreateCheckbox("", 32, 184, 17, 17)
$Collectors = GUICtrlCreateCheckbox("", 72, 184, 17, 17)
$RepairRepair = GUICtrlCreateCheckbox("", 112, 184, 17, 17)
$Afterburners = GUICtrlCreateCheckbox("", 152, 184, 17, 17)
$Rockets = GUICtrlCreateCheckbox("", 112, 344, 17, 17)
$AimComputers = GUICtrlCreateCheckbox("", 248, 344, 17, 17)
$Perforators = GUICtrlCreateCheckbox("", 288, 344, 17, 17)
$ThermoBlasts = GUICtrlCreateCheckbox("", 328, 344, 17, 17)
$Checkbox9 = GUICtrlCreateCheckbox("", 208, 184, 17, 17)
$Taunts = GUICtrlCreateCheckbox("", 248, 184, 17, 17)
$AimScramblers = GUICtrlCreateCheckbox("", 288, 184, 17, 17)
$AggroBombs = GUICtrlCreateCheckbox("", 328, 184, 17, 17)
$SpeedActuators = GUICtrlCreateCheckbox("", 32, 264, 17, 17)
$StunCharges = GUICtrlCreateCheckbox("", 72, 264, 17, 17)
$AggroBeacons = GUICtrlCreateCheckbox("", 112, 264, 17, 17)
$StunDomes = GUICtrlCreateCheckbox("", 152, 264, 17, 17)
$RepairTargets = GUICtrlCreateCheckbox("", 384, 184, 17, 17)
$Protectors = GUICtrlCreateCheckbox("", 424, 184, 17, 17)
$RepairFields = GUICtrlCreateCheckbox("", 464, 184, 17, 17)
$Materializers = GUICtrlCreateCheckbox("", 504, 184, 17, 17)
$SniperBlasters = GUICtrlCreateCheckbox("", 208, 264, 17, 17)
$AttackDroids = GUICtrlCreateCheckbox("", 248, 264, 17, 17)
$OrbitalStrikes = GUICtrlCreateCheckbox("", 288, 264, 17, 17)
$AttackBuffs = GUICtrlCreateCheckbox("", 328, 264, 17, 17)
$RepairTurrets = GUICtrlCreateCheckbox("", 384, 264, 17, 17)
$AttackTurrets = GUICtrlCreateCheckbox("", 424, 264, 17, 17)
$StickyBombs = GUICtrlCreateCheckbox("", 464, 264, 17, 17)
$Minelayer = GUICtrlCreateCheckbox("", 504, 264, 17, 17)
$Standart = GUICtrlCreateGroup("Standart", 16, 128, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Rack = GUICtrlCreateGroup("Rack", 16, 288, 345, 73)
$RackRepairRepair = GUICtrlCreateCheckbox("", 152, 344, 17, 17)
$RackCollectors = GUICtrlCreateCheckbox("", 72, 344, 17, 17)
$RackBlasters = GUICtrlCreateCheckbox("", 32, 344, 17, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Tank = GUICtrlCreateGroup("Tank", 192, 128, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Shock = GUICtrlCreateGroup("Shock", 16, 208, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Doc = GUICtrlCreateGroup("Doc", 368, 128, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Sniper = GUICtrlCreateGroup("Sniper", 192, 208, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Defender = GUICtrlCreateGroup("Defender", 368, 208, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic7 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\RackDef1.jpg", 24, 304, 156, 39)
$RackAfterburners = GUICtrlCreateCheckbox("", 208, 344, 17, 17)
$TabSheet5 = GUICtrlCreateTabItem("Collect")
$CrioPic = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\Cryonite.jpg", 16, 136, 15, 18)
$EnergyPic = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\Energy.jpg", 16, 160, 17, 17)
$BPPic = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\BP.jpg", 16, 184, 16, 16)
$rareBPPic = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\rareBP.jpg", 16, 208, 16, 16)
$CrioCheckbox = GUICtrlCreateCheckbox("Crio", 40, 136, 97, 17)
$EnergyCheckbox = GUICtrlCreateCheckbox("Energy", 40, 160, 97, 17)
$BPCheckbox = GUICtrlCreateCheckbox("BP", 40, 184, 97, 17)
$RarePBCheckbox = GUICtrlCreateCheckbox("RarePB", 40, 208, 97, 17)
$TabSheet6 = GUICtrlCreateTabItem("Mantis Kill")
$Checkbox01 = GUICtrlCreateCheckbox("PVP", 16, 128, 97, 17)
$Checkbox02 = GUICtrlCreateCheckbox("Checkbox02", 16, 152, 97, 17)
$Checkbox03 = GUICtrlCreateCheckbox("Checkbox03", 16, 176, 97, 17)
$Checkbox04 = GUICtrlCreateCheckbox("Checkbox04", 16, 200, 97, 17)
$Checkbox05 = GUICtrlCreateCheckbox("Checkbox05", 16, 224, 97, 17)
$Checkbox06 = GUICtrlCreateCheckbox("Checkbox06", 16, 248, 97, 17)
$Checkbox07 = GUICtrlCreateCheckbox("Checkbox07", 16, 272, 97, 17)
$Checkbox08 = GUICtrlCreateCheckbox("Checkbox08", 16, 296, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("Checkbox10", 16, 320, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Checkbox11", 16, 344, 97, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Checkbox12", 160, 128, 97, 17)
$Checkbox13 = GUICtrlCreateCheckbox("Checkbox13", 160, 152, 97, 17)
$Checkbox14 = GUICtrlCreateCheckbox("Checkbox14", 160, 176, 97, 17)
$Checkbox15 = GUICtrlCreateCheckbox("Checkbox15", 160, 200, 97, 17)
$Checkbox16 = GUICtrlCreateCheckbox("Checkbox16", 160, 224, 97, 17)
$Checkbox17 = GUICtrlCreateCheckbox("Checkbox17", 160, 248, 97, 17)
$Checkbox18 = GUICtrlCreateCheckbox("Checkbox18", 160, 272, 97, 17)
$Checkbox19 = GUICtrlCreateCheckbox("Checkbox19", 160, 296, 97, 17)
$Checkbox20 = GUICtrlCreateCheckbox("Checkbox20", 160, 320, 97, 17)
$Checkbox21 = GUICtrlCreateCheckbox("Checkbox21", 160, 344, 97, 17)
$Checkbox22 = GUICtrlCreateCheckbox("Checkbox22", 304, 128, 97, 17)
$Checkbox23 = GUICtrlCreateCheckbox("Checkbox23", 304, 152, 97, 17)
$Checkbox24 = GUICtrlCreateCheckbox("Checkbox24", 304, 176, 97, 17)
$Checkbox25 = GUICtrlCreateCheckbox("Checkbox25", 304, 200, 97, 17)
$Checkbox26 = GUICtrlCreateCheckbox("Checkbox26", 304, 224, 97, 17)
$Checkbox27 = GUICtrlCreateCheckbox("Checkbox27", 304, 248, 97, 17)
$Checkbox28 = GUICtrlCreateCheckbox("Checkbox28", 304, 272, 97, 17)
$Checkbox29 = GUICtrlCreateCheckbox("Checkbox29", 304, 296, 97, 17)
$Checkbox30 = GUICtrlCreateCheckbox("Checkbox30", 304, 320, 97, 17)
$Checkbox31 = GUICtrlCreateCheckbox("Checkbox31", 304, 344, 97, 17)
$Checkbox32 = GUICtrlCreateCheckbox("Checkbox32", 456, 128, 97, 17)
$Checkbox33 = GUICtrlCreateCheckbox("Checkbox33", 456, 152, 97, 17)
$Checkbox34 = GUICtrlCreateCheckbox("Checkbox34", 456, 176, 97, 17)
$Checkbox35 = GUICtrlCreateCheckbox("Checkbox35", 456, 200, 97, 17)
$Checkbox36 = GUICtrlCreateCheckbox("Checkbox36", 456, 224, 97, 17)
$Checkbox37 = GUICtrlCreateCheckbox("Checkbox37", 456, 248, 97, 17)
$Checkbox38 = GUICtrlCreateCheckbox("Checkbox38", 456, 272, 97, 17)
$Checkbox39 = GUICtrlCreateCheckbox("Checkbox39", 456, 296, 97, 17)
$Checkbox40 = GUICtrlCreateCheckbox("Checkbox40", 456, 320, 97, 17)
$Checkbox41 = GUICtrlCreateCheckbox("Checkbox41", 456, 344, 97, 17)
$MantisAllCheckbox = GUICtrlCreateCheckbox("All", 560, 344, 33, 17)
GUICtrlCreateTabItem("")
$Start = GUICtrlCreateButton("START", 416, 376, 113, 105)
$Close = GUICtrlCreateButton("CLOSE", 536, 432, 65, 49)
$Stop = GUICtrlCreateButton("STOP", 536, 376, 65, 49)
$lvlHide = GUICtrlCreateSlider(408, 40, 185, 33)
$lvlProgress = GUICtrlCreateProgress(24, 464, 169, 17)
$lvlNumbers = GUICtrlCreateLabel(" 0 10 20 30 40 50 60 70 80 90 100", 416, 72, 169, 17)
$MantisINFO = GUICtrlCreateGroup("Mantis INFO", 16, 376, 385, 113)
$MantisName = GUICtrlCreateLabel("Mantis NAME", 24, 400, 69, 17)
$Life = GUICtrlCreateLabel("Life", 24, 432, 21, 17)
$Pic10 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\Rank.jpg", 24, 416, 17, 16)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel("Life:", 416, 24, 24, 17)
$MyLevel = GUICtrlCreateLabel("Level: 75", 472, 24, 48, 17)
$Progress1 = GUICtrlCreateProgress(416, 88, 169, 17)
$Label2 = GUICtrlCreateLabel("Level: 75", 48, 416, 48, 17)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1_1)
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 17)
$MyINFO = GUICtrlCreateGroup("MyINFO", 400, 8, 201, 105)
$Pic9 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\Rank.jpg", 448, 24, 17, 16)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

Case $Close
Exit

   
Case $Start

            While 1
            sleep(1000)
            $Variable1 = PixelSearch (493, 315, 913, 601, 0x47F871, 15)
                If IsArray($Variable1) = True Then
                    MouseMove ($Variable1 [0] , $Variable1 [1], 1)
                    MouseClick("left",$Variable1 [0] , $Variable1 [1], 4,1)
                    _Collector()
                Else
                    $Variable2 = PixelSearch (258, 160,1127, 631, 0x47F871, 15)
                    If IsArray($Variable2) = True Then
                        MouseMove ($Variable2 [0] , $Variable2 [1], 1)
                        MouseClick("left",$Variable2 [0] , $Variable2 [1], 4,1)
                        _Collector()
                    Else
                        $Variable3 = PixelSearch (0, 1,1275,652, 0x47F871, 15)
                        If IsArray($Variable3) = True Then
                            MouseMove ($Variable3 [0] , $Variable3 [1], 1)
                            MouseClick("left",$Variable3 [0] , $Variable3 [1], 4,1)
                            _Collector()
                    EndIf
                EndIf
EndIf
                If not IsArray($Variable1) Then
Sleep(1000)
Send("{TAB}") 
Sleep(1000)
Send("3")
Sleep(2000)
Send("1")
Sleep(100)
Send("1")
Sleep(2000)
Send("5")
Sleep(1000)
Send("7")
Sleep(2000)
Send("1")
Sleep(1000)
Send("1") 
Sleep(2000)
Send("1")
Sleep(2000)
Send("2")
                EndIf


                If not IsArray($Variable1) Then
                    MouseClickDrag("right",85,378,1128,354,2)
                EndIf
                Wend

Case $RarePBCheckbox

            While 1
            sleep(1000)
            $Variable1 = PixelSearch (493, 315, 913, 601, 0xED9B17, 15)
                If IsArray($Variable1) = True Then
                    MouseMove ($Variable1 [0] , $Variable1 [1], 1)
                    MouseClick("left",$Variable1 [0] , $Variable1 [1], 4,1)
                    _Collector()
                Else
                    $Variable2 = PixelSearch (258, 160,1127, 631, 0xED9B17, 15)
                    If IsArray($Variable2) = True Then
                        MouseMove ($Variable2 [0] , $Variable2 [1], 1)
                        MouseClick("left",$Variable2 [0] , $Variable2 [1], 4,1)
                        _Collector()
                    Else
                        $Variable3 = PixelSearch (0, 1,1275,652, 0xED9B17, 15)
                        If IsArray($Variable3) = True Then
                            MouseMove ($Variable3 [0] , $Variable3 [1], 1)
                            MouseClick("left",$Variable3 [0] , $Variable3 [1], 4,1)
                            _Collector()
                    EndIf
                EndIf
EndIf
                If not IsArray($Variable1) Then
                    MouseClickDrag("right",85,378,1128,354,2)
                EndIf
                Wend






Func _Collector()
    send("2")
    sleep (1000)
    send("2")
    Sleep (1000)
    send("2")
    Sleep (1000)
    send("1")
    Sleep (1000)
    send("8")
    Sleep (100)
    send("2")
    Sleep (100)
send("7")
    Sleep (100)
    send("5")
    Sleep (100)
EndFunc

Func Beenden ()
    Exit
EndFunc

    EndSwitch
    WEnd

[AlphaZerο]

Weise Mal den Moderator Shadow992 auf den Thread hin, der ist Experte in Sachen AutoIt.

[-Jastreb--SA7-]

hallo alle,

habe jetzt die version einbishern verbessert.

Vorraussezungen:

Bildschirmauflösung: 1366 x 768 - Volbilld (oder im bot script anpassen)

und ich brauche immer noch hilfe, also meldet euch7

HotKeySet("{ESC}","Close")

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <Sound.au3>
#include <Memory.au3>
#Region ### START Koda GUI section ### Form=e:\games\koda gui\forms\form1.kxf


$Form1_1 = GUICreate("PIRATE GALAXY Bot v.1.0", 610, 514, 195, 164)
$bgRightPic = GUICtrlCreatePic("",8, 96, 217, 33)
$title = GUICtrlCreateLabel("PIRATE GALAXY v.1.0", 0, 24, 115, 17)
$by = GUICtrlCreateLabel("by CHEATER", 88, 40, 84, 17)
$Tab1 = GUICtrlCreateTab(8, 104, 593, 265)
$TabSheet1 = GUICtrlCreateTabItem("INFO")
$Label3 = GUICtrlCreateLabel("Hallo Leute,", 16, 136, 61, 17)
$Label4 = GUICtrlCreateLabel("ich habe mir mit einen Kumpel vorgenommen einen PIRATE GALAXY Bot zu Programmieren,", 16, 168, 439, 17)
$Label5 = GUICtrlCreateLabel("das Problem ist ich bin Einsteiger in AutoIt aber da ich .php, .js, .html, … Programmire ist es für", 16, 184, 436, 17)
$Label6 = GUICtrlCreateLabel("mich nicht so schwer einen neue Programmier Sprache zu Lernen.", 16, 200, 316, 17)
$Label7 = GUICtrlCreateLabel("Jetzt suchen wir paar Leute die sich sehr Gut mit AutoIt auskennen und einen PIRATE GALAXY", 16, 224, 456, 17)
$Label8 = GUICtrlCreateLabel("Bot Programmieren wollen, wenn ihr Interessen habt mit zu Programmieren dann meldet euch bitte", 16, 240, 462, 17)
$Label9 = GUICtrlCreateLabel("unter dieser E-Mail: ", 16, 256, 192, 17)
$Label10 = GUICtrlCreateLabel("Grüße ", 16, 280, 36, 17)
$Label11 = GUICtrlCreateLabel("CHEATER", 56, 296, 125, 17)
$TabSheet3 = GUICtrlCreateTabItem("Aktiv Items")
$StandartItems = GUICtrlCreatePic(@ScriptDir &"\items\standart.jpg", 24, 144, 156, 39)
$Pic1 = GUICtrlCreatePic(@ScriptDir &"\items\RackDef2.jpg", 200, 304, 156, 39)
$Pic2 = GUICtrlCreatePic(@ScriptDir &"\items\tank.jpg", 200, 144, 156, 39)
$Pic3 = GUICtrlCreatePic(@ScriptDir &"\items\shock.jpg", 24, 224, 156, 39)
$Pic4 = GUICtrlCreatePic(@ScriptDir &"\items\doc.jpg", 376, 144, 156, 39)
$Pic5 = GUICtrlCreatePic(@ScriptDir &"\items\sniper.jpg", 200, 224, 156, 39)
$Pic6 = GUICtrlCreatePic(@ScriptDir &"\items\defender.jpg", 376, 224, 156, 39)
$Blasters = GUICtrlCreateCheckbox("", 32, 184, 17, 17)
$Collectors = GUICtrlCreateCheckbox("", 72, 184, 17, 17)
$RepairRepair = GUICtrlCreateCheckbox("", 112, 184, 17, 17)
$Afterburners = GUICtrlCreateCheckbox("", 152, 184, 17, 17)
$Rockets = GUICtrlCreateCheckbox("", 112, 344, 17, 17)
$AimComputers = GUICtrlCreateCheckbox("", 248, 344, 17, 17)
$Perforators = GUICtrlCreateCheckbox("", 288, 344, 17, 17)
$ThermoBlasts = GUICtrlCreateCheckbox("", 328, 344, 17, 17)
$Checkbox9 = GUICtrlCreateCheckbox("", 208, 184, 17, 17)
$Taunts = GUICtrlCreateCheckbox("", 248, 184, 17, 17)
$AimScramblers = GUICtrlCreateCheckbox("", 288, 184, 17, 17)
$AggroBombs = GUICtrlCreateCheckbox("", 328, 184, 17, 17)
$SpeedActuators = GUICtrlCreateCheckbox("", 32, 264, 17, 17)
$StunCharges = GUICtrlCreateCheckbox("", 72, 264, 17, 17)
$AggroBeacons = GUICtrlCreateCheckbox("", 112, 264, 17, 17)
$StunDomes = GUICtrlCreateCheckbox("", 152, 264, 17, 17)
$RepairTargets = GUICtrlCreateCheckbox("", 384, 184, 17, 17)
$Protectors = GUICtrlCreateCheckbox("", 424, 184, 17, 17)
$RepairFields = GUICtrlCreateCheckbox("", 464, 184, 17, 17)
$Materializers = GUICtrlCreateCheckbox("", 504, 184, 17, 17)
$SniperBlasters = GUICtrlCreateCheckbox("", 208, 264, 17, 17)
$AttackDroids = GUICtrlCreateCheckbox("", 248, 264, 17, 17)
$OrbitalStrikes = GUICtrlCreateCheckbox("", 288, 264, 17, 17)
$AttackBuffs = GUICtrlCreateCheckbox("", 328, 264, 17, 17)
$RepairTurrets = GUICtrlCreateCheckbox("", 384, 264, 17, 17)
$AttackTurrets = GUICtrlCreateCheckbox("", 424, 264, 17, 17)
$StickyBombs = GUICtrlCreateCheckbox("", 464, 264, 17, 17)
$Minelayer = GUICtrlCreateCheckbox("", 504, 264, 17, 17)
$Standart = GUICtrlCreateGroup("Standart", 16, 128, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Rack = GUICtrlCreateGroup("Rack", 16, 288, 345, 73)
$RackRepairRepair = GUICtrlCreateCheckbox("", 152, 344, 17, 17)
$RackCollectors = GUICtrlCreateCheckbox("", 72, 344, 17, 17)
$RackBlasters = GUICtrlCreateCheckbox("", 32, 344, 17, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Tank = GUICtrlCreateGroup("Tank", 192, 128, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Shock = GUICtrlCreateGroup("Shock", 16, 208, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Doc = GUICtrlCreateGroup("Doc", 368, 128, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Sniper = GUICtrlCreateGroup("Sniper", 192, 208, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Defender = GUICtrlCreateGroup("Defender", 368, 208, 169, 73)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Pic7 = GUICtrlCreatePic(@ScriptDir &"\items\RackDef1.jpg", 24, 304, 156, 39)
$RackAfterburners = GUICtrlCreateCheckbox("", 208, 344, 17, 17)
$TabSheet5 = GUICtrlCreateTabItem("Collect")
$CrioPic = GUICtrlCreatePic(@ScriptDir &"\items\Cryonite.jpg", 16, 136, 15, 18)
$EnergyPic = GUICtrlCreatePic(@ScriptDir &"\items\Energy.jpg", 16, 160, 17, 17)
$BPPic = GUICtrlCreatePic(@ScriptDir &"\items\BP.jpg", 16, 184, 16, 16)
$rareBPPic = GUICtrlCreatePic(@ScriptDir &"\items\rareBP.jpg", 16, 208, 16, 16)
$CrioCheckbox = GUICtrlCreateCheckbox("Crio", 40, 136, 97, 17)
$EnergyCheckbox = GUICtrlCreateCheckbox("Energy", 40, 160, 97, 17)
$BPCheckbox = GUICtrlCreateCheckbox("BP", 40, 184, 97, 17)
$RarePBCheckbox = GUICtrlCreateCheckbox("RarePB", 40, 208, 97, 17)
$TabSheet6 = GUICtrlCreateTabItem("Mantis Kill")
$Checkbox01 = GUICtrlCreateCheckbox("PVP", 16, 128, 97, 17)
$Checkbox02 = GUICtrlCreateCheckbox("Checkbox02", 16, 152, 97, 17)
$Checkbox03 = GUICtrlCreateCheckbox("Checkbox03", 16, 176, 97, 17)
$Checkbox04 = GUICtrlCreateCheckbox("Checkbox04", 16, 200, 97, 17)
$Checkbox05 = GUICtrlCreateCheckbox("Checkbox05", 16, 224, 97, 17)
$Checkbox06 = GUICtrlCreateCheckbox("Checkbox06", 16, 248, 97, 17)
$Checkbox07 = GUICtrlCreateCheckbox("Checkbox07", 16, 272, 97, 17)
$Checkbox08 = GUICtrlCreateCheckbox("Checkbox08", 16, 296, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("Checkbox10", 16, 320, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Checkbox11", 16, 344, 97, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Checkbox12", 160, 128, 97, 17)
$Checkbox13 = GUICtrlCreateCheckbox("Checkbox13", 160, 152, 97, 17)
$Checkbox14 = GUICtrlCreateCheckbox("Checkbox14", 160, 176, 97, 17)
$Checkbox15 = GUICtrlCreateCheckbox("Checkbox15", 160, 200, 97, 17)
$Checkbox16 = GUICtrlCreateCheckbox("Checkbox16", 160, 224, 97, 17)
$Checkbox17 = GUICtrlCreateCheckbox("Checkbox17", 160, 248, 97, 17)
$Checkbox18 = GUICtrlCreateCheckbox("Checkbox18", 160, 272, 97, 17)
$Checkbox19 = GUICtrlCreateCheckbox("Checkbox19", 160, 296, 97, 17)
$Checkbox20 = GUICtrlCreateCheckbox("Checkbox20", 160, 320, 97, 17)
$Checkbox21 = GUICtrlCreateCheckbox("Checkbox21", 160, 344, 97, 17)
$Checkbox22 = GUICtrlCreateCheckbox("Checkbox22", 304, 128, 97, 17)
$Checkbox23 = GUICtrlCreateCheckbox("Checkbox23", 304, 152, 97, 17)
$Checkbox24 = GUICtrlCreateCheckbox("Checkbox24", 304, 176, 97, 17)
$Checkbox25 = GUICtrlCreateCheckbox("Checkbox25", 304, 200, 97, 17)
$Checkbox26 = GUICtrlCreateCheckbox("Checkbox26", 304, 224, 97, 17)
$Checkbox27 = GUICtrlCreateCheckbox("Checkbox27", 304, 248, 97, 17)
$Checkbox28 = GUICtrlCreateCheckbox("Checkbox28", 304, 272, 97, 17)
$Checkbox29 = GUICtrlCreateCheckbox("Checkbox29", 304, 296, 97, 17)
$Checkbox30 = GUICtrlCreateCheckbox("Checkbox30", 304, 320, 97, 17)
$Checkbox31 = GUICtrlCreateCheckbox("Checkbox31", 304, 344, 97, 17)
$Checkbox32 = GUICtrlCreateCheckbox("Checkbox32", 456, 128, 97, 17)
$Checkbox33 = GUICtrlCreateCheckbox("Checkbox33", 456, 152, 97, 17)
$Checkbox34 = GUICtrlCreateCheckbox("Checkbox34", 456, 176, 97, 17)
$Checkbox35 = GUICtrlCreateCheckbox("Checkbox35", 456, 200, 97, 17)
$Checkbox36 = GUICtrlCreateCheckbox("Checkbox36", 456, 224, 97, 17)
$Checkbox37 = GUICtrlCreateCheckbox("Checkbox37", 456, 248, 97, 17)
$Checkbox38 = GUICtrlCreateCheckbox("Checkbox38", 456, 272, 97, 17)
$Checkbox39 = GUICtrlCreateCheckbox("Checkbox39", 456, 296, 97, 17)
$Checkbox40 = GUICtrlCreateCheckbox("Checkbox40", 456, 320, 97, 17)
$Checkbox41 = GUICtrlCreateCheckbox("Checkbox41", 456, 344, 97, 17)
$MantisAllCheckbox = GUICtrlCreateCheckbox("All", 560, 344, 33, 17)
GUICtrlCreateTabItem("")
$Start = GUICtrlCreateButton("START Auto Control", 416, 376, 113, 105)
$Close = GUICtrlCreateButton("CLOSE", 536, 432, 65, 49)
$Stop = GUICtrlCreateButton("STOP", 536, 376, 65, 49)
$lvlHide = GUICtrlCreateSlider(408, 40, 185, 33)
$lvlProgress = GUICtrlCreateProgress(24, 464, 169, 17)
$lvlNumbers = GUICtrlCreateLabel(" 0 10 20 30 40 50 60 70 80 90 100", 416, 72, 169, 17)
$MantisINFO = GUICtrlCreateGroup("Mantis INFO", 16, 376, 385, 113)
$MantisName = GUICtrlCreateLabel("Mantis NAME", 24, 400, 69, 17)
$Life = GUICtrlCreateLabel("Life", 24, 432, 21, 17)
$Pic10 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\Rank.jpg", 24, 416, 17, 16)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel("Life:", 416, 24, 24, 17)
$MyLevel = GUICtrlCreateLabel("Level: 75 | Crio 999.999", 472, 24, 120, 17)
$Progress1 = GUICtrlCreateProgress(416, 88, 169, 17)
$Label2 = GUICtrlCreateLabel("Level: 75", 48, 416, 48, 17)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1_1)
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 17)
$MyINFO = GUICtrlCreateGroup("MyINFO", 400, 8, 201, 105)
$Pic9 = GUICtrlCreatePic("C:\Users\-Jastreb--SA7-\Pictures\items\Rank.jpg", 448, 24, 17, 16)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$OptionsGroup = GUICtrlCreateGroup("Options", 264, 8, 129, 105)
$AktiveSoundCheckbox = GUICtrlCreateCheckbox("Aktive Sound", 272, 32, 97, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
$bgUpPic = GUICtrlCreatePic(@ScriptDir &"\pic\bg_up.jpg", 0, 0, 609, 125)
$bgLeftPic = GUICtrlCreatePic(@ScriptDir &"\pic\bg_left.jpg", 0, 122, 9, 246)
$bgRightPic = GUICtrlCreatePic(@ScriptDir &"\pic\bg_right.jpg", 583, 122, 9, 246)
$bgDownPic = GUICtrlCreatePic(@ScriptDir &"\pic\bg_down.jpg", 0, 368, 609, 129)
#EndRegion ### END Koda GUI section ###








While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Close ()
           


              
    Case $Start
                        _StartBoting()
            While 1
                    $Variable5 = PixelSearch (524, 726, 525, 727, 0x41637F, 15) ; erkennt wenn der ServerDownt ist und brobier sich immer wieder Einzulogen, bist er Eingelogt ist.
                    If IsArray($Variable5) = True Then
                        MouseClick("left",$Variable5 [0] , $Variable5 [1], 4,1)
                        _SoundServerDown()
                        _ServerDown()
                        _StartBoting()
                   
                    Else
                    $Variable1 = PixelSearch (943, 647, 1048, 754, 0x13BED6, 15) ; die kordinaten von der untere mini Map .
                        sleep(1000)
                    If IsArray($Variable1) = True Then
                        MouseClick("left",$Variable1 [0] , $Variable1 [1], 4,1)
                        _SoundCollector()
                        _Collector()
                    Else
                    $Variable2 = PixelSearch (943, 647, 1048, 754, 0xE22C1B, 15) ; die kordinaten von der untere mini Map .
                        sleep(1000)
                    If IsArray($Variable2) = True Then
                        MouseClick("left",$Variable2 [0] , $Variable2 [1], 4,1)
                        _SoundMantisAttackYou()
                                    sleep(2000)
                        _SoundMantisAttack()
                        _Kill()
                    Else
                    $Variable3 = PixelSearch (1340, 43, 1360, 50, 0x6F757B, 15) ; Wenn die Tacktische karte offen ist kommt er immer wieder zu der vorgegebene position.
                        sleep(1000)
                    If IsArray($Variable3) = True Then
                        _SoundGoBack()
                        _MapIsAktive()
                        sleep(2000)
                    $Variable4 = PixelSearch (943, 647, 1048, 754, 0xD7CC46, 15) ; die kordinaten von der untere mini Map.
                    If IsArray($Variable4) = True Then
                        MouseClick("left",$Variable4 [0] , $Variable4 [1], 4,1)
                        _SoundMantisSearch()
                                    sleep(2000)
                        _SoundMantisAttack()
                        _Kill()
                    Else

                If not IsArray($Variable1) Then ; wenn kein Mantis auf der kleine mini Map sind, noch keine aktionen.
                        _SoundSkinningMap()
                EndIf
                EndIf                   
                EndIf   
                EndIf            
            EndIf
        EndIf
    Wend

    Case $BPCheckbox ; TEST,

            While 1
            sleep(1000)
           
            $Variable1 = PixelSearch (493, 315, 913, 601, 0x5345C8, 15)
                If IsArray($Variable1) = True Then
                    MouseMove ($Variable1 [0] , $Variable1 [1], 1)
                    MouseClick("left",$Variable1 [0] , $Variable1 [1], 4,1)
                    _Collector()
                Else
                    $Variable2 = PixelSearch (258, 160,1127, 631, 0x83b7537, 15)
                    If IsArray($Variable2) = True Then
                        MouseMove ($Variable2 [0] , $Variable2 [1], 1)
                        MouseClick("left",$Variable2 [0] , $Variable2 [1], 4,1)
                        _Collector()
                    Else
                        $Variable3 = PixelSearch (0, 1,1275,652, 0x5345C8, 15)
                        If IsArray($Variable3) = True Then
                           
                            MouseClick("left",$Variable3 [0] , $Variable3 [1], 4,1)
                            _Collector()
                   
                    EndIf
                EndIf
            EndIf
                If not IsArray($Variable1) Then
                    MouseClickDrag("right",85,378,1128,354,2)
                EndIf
                Wend

; <---Sounds--->

Func _SoundSkinningMap()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_4.mp3")
_SoundPlay($snd)
EndFunc

Func _SoundCollector()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_1.mp3")
_SoundPlay($snd)
EndFunc

Func _SoundMantisAttack()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_3.mp3")
_SoundPlay($snd)
EndFunc

Func _SoundMantisSearch()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_2.mp3")
_SoundPlay($snd)
EndFunc

Func _SoundServerDown()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_5.mp3")
_SoundPlay($snd)
EndFunc

Func _SoundGoBack()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_6.mp3")
_SoundPlay($snd)
EndFunc

Func _StartBoting()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_8.mp3")
_SoundPlay($snd)
EndFunc

Func _SoundMantisAttackYou()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_9.mp3")
_SoundPlay($snd)
EndFunc

Func _RepairDroide()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_11.mp3")
_SoundPlay($snd)
EndFunc




; <---Aktionen--->

Func _Collector()
        sleep (1000)
    send("2")
        sleep (1000)
    send("2")
        Sleep (1000)
    send("2")
        Sleep (1000)
    send("1")
        Sleep (1000)
    send("8")
        Sleep (100)
    send("2")
        Sleep (100)
    send("7")
        Sleep (100)
    send("5")
        Sleep (100)
    send("2")
        sleep (1000)
EndFunc



Func _Kill() ; die items sind für einen Tank angepasst
   
PixelSearch (595, 691, 627, 725, 0x3C8226, 15)
    Send("3")
        Sleep(600)
PixelSearch (504, 691, 535, 725, 0x400503, 15)
    Send("1")
        Sleep(500)
    Send("1")
        Sleep(1000)
PixelSearch (689, 691, 5718, 725, 0x263472, 15)
    Send("5")
        Sleep(2000)
PixelSearch (504, 691, 535, 725, 0x400503, 15)
    Send("1")
        Sleep(600)
PixelSearch (780, 691, 811, 725, 0x4598D8, 15)
    Send("7")
        Sleep(700)
PixelSearch (504, 691, 535, 725, 0x400503, 15)
    Send("1")
        Sleep(800)
PixelSearch (550, 691, 582, 725, 0x626900, 15)
    Send("2")
EndFunc

Func _MapIsAktive()
     MouseClick("left",1216, 321) ; Position wo der bot bleiben soll  | Es funktionirt nur wenn die karte geüffnet ist!
        Send("4")
        sleep(8000)
EndFunc

Func _ServerDown()
        sleep(100000)
    MouseClick("left",677, 650)
        sleep(100000)
    MouseClick("left",687, 754)
        sleep(15000)
    Send("{Space}")
EndFunc

    Case $Close
Close ()

Func Close ()
$snd = _SoundOpen(@ScriptDir &"\Sound\sound_7.mp3")
_SoundPlay($snd)
        sleep(3000)
    Exit
EndFunc

    EndSwitch
    WEnd

[ctgk69]

Können Sie bitte angeben Anweisungen, wie diese verwendet werden?

[BlackHybrid]

Wenns nicht allzuviel ist kann ich dir auch helfen, da ich momentan nichts zu tun habe.

[redpunscher]

na dann bin ich mal gespannt ob sich in richtung was tut.

[SnakeATC]

Can someone who speaks English help me with getting this script to work. I'm afraid I don't speak German. Never was able to learn other languages. =(

[kilou123]

lol die idee ist super magste mal den hack/bot reinstellen zum testen ? bitte danke?!

[jastreb]

Ich proge schon lange den bot nicht mehr, aber kann ihn rausrücken.

Voraussetzungen:
-Im Spie beim Auflösung auf 1366 x 768 + Vollbild stellen.
-Eine Mitgliedschaft am besten das was keine Energie verbraucht.
-Ein Draconis Tank schiff mit goldenen Bauplänen oder mit Besten Blauen Bauplänen.
-Sol Mond Freigeschaltet haben.


(der bot arbeitet im Vordergrund, das heißt in dem Moment wo er läuft kannst du nichts anderes machen, deswegen empfehle ich ihn nachts laufen lassen.
Wenn dein Schiff Kaput geht dann meldet der Bot es mit einem lauten Geräusch)

ich habe dafür denn besten platz auf dem Mond Gefunden, auf dem bild ist der platz markiert:



Download Link:


------------------------------------------------------------------------------------------------


ENGLISH Google version:

I have long prog to no longer offered, but can come out with him.

requirements:
-In the mirror-set resolution to 1366 x 768 + full picture.
-A membership-at best what consumes no energy.
-Draconis-A tank ship with golden blueprints or building plans with the best blue.
-Sol-moon have Unlocked.


(the works offered in the foreground, that is the moment where he runs you can do nothing else, so I recommend running it at night.
If your ship goes killed then notify the bot it with a loud noise)

best place for it because I've Found on the Moon, is the picture on the space marked:



Download Link:

------------------------------------------SCREENS-----------------------------------------------






HAVE FUN

[ZeroKara]

i get error "not a valid win32 application" !

[jastreb]

so Leute bin jetzt wieder dabei weiter zu machen,

also ich übe jetzt c++/c# und suche Leute die mit helfen könnten,

der bot wird mit einem Server von uns Verbund, der bot ist 7 tage kostenlos und dan muss man ihn kaufen.

die leute die mit machen bekommen von verdienst des botes gelt.

[fr4gz]

c++ > autoit.. aber dann schon ein packetbot, der im hintergrund laufen kann ?

[temada]

Such file does not exist or it has been removed for infringement of copyrights.

can upload other site? please!

[jastreb]

Originally Posted by temada

Such file does not exist or it has been removed for infringement of copyrights.

can upload other site? please!

sorry, i have removed the old bot, the bot have most bugs.

---------------------------------------------------------

Originally Posted by fr4gz

c++ > autoit.. aber dann schon ein packetbot, der im hintergrund laufen kann ?

so und ja der bot wird/soll im Hintergrund laufen.

[Klipso]

Ich weiss nicht ob du noch an deinem bot arbeitest, aber wenn ja, konntest du ihn vielleicht zum downloaden freigeben? Das wäre super ^^ danke