Multigamebot --> Monstersgame

02/11/2010 10:48 Multi-Gaming-Bot#1
[Only registered and activated users can see links. Click Here To Register...]

Erste erscheinung monstersgame eingebaut

[Only registered and activated users can see links. Click Here To Register...]

[Only registered and activated users can see links. Click Here To Register...]
02/11/2010 18:42 Multi-Gaming-Bot#2
Fehlerhaddt

ich arbeite am problem, irgendwie hat sich da ein Bug eingeschlichen dasb der derzeit garnicht funktioniert, ich kanns mir noch nicht erklären da ich den vor dem compilieren einige stunden getestet habe

vielleicht lag es am compilieren oder an sonnst irgendwelche flüchticheitsfehler



Der fehler liegt irgendwo vor den trainingsstart und nach der emailüberprüfung aber er zeigt es mir leider schlecht an nur das e meint eine Variabel die meines erachtens nach Deklariert ist nicht deklariert zu sein scheint
02/11/2010 19:24 THEGO90#3
und das jetz bitte nochma in deutsch und nicht in skriptersprache -_-
02/11/2010 21:38 Shadow992#4
Quote:
Originally Posted by THEGO90 View Post
und das jetz bitte nochma in deutsch und nicht in skriptersprache -_-
Auf deutsch :
Es gibt einen Bug , der das richtige Funktionieren des Botes verhindert .
Er ist aber schon am Suchen und weiß auch so ungefähr wo der Fehler liegt , aber er findet ihn anscheinend nicht .

@Multi-Gaming-Bot
Probiers mal ohne Obfuscator , vielleciht läuft es dann besser .
02/25/2011 12:34 Beppo78#5
Gibts den noch ???
02/25/2011 12:39 *Anima*#6
Wieso pusht du alte Themen?
Der TE hat sich schon lang nicht mehr gemeldet,da danke ich ist das Thema auch schon zu.
closerrrequest#
02/25/2011 12:43 Beppo78#7
weil ich einen Benötige und mal nachgefragt habe , ist das ein Verbrechen ???
02/25/2011 12:50 *Anima*#8
Nein aber ,aber denn such dir liebers ein Thema aus das erst vorkurzen erstellt wurde oder frag in Shaddow992 sein thread.
Quote:
Doppelposten oder das Pushen von wirklich veralteten Threads nur zum Spaß wird mit einer Infraction geahndet (einer Warning beim ersten Mal)
Ich weis das war nicht zum Spaß,aber sollte es liebers lassen & die neuen Themen benutzen & da nachfragen.
02/25/2011 12:55 Beppo78#9
ich habe Shadow schon gefragt , er baut keinen mehr

und es konnte ja sein das evtl , jemand anders noch einen hat der jetzt nach dem update funktioniert ...

ich habe mich schon damit beschäftigt , bekomme es aber nicht hin ...
irgenwo ist hier noch der Wurm drinne aber wo ???

PHP Code:
        Dim Link As String
        Dim Zahl As Integer
        Dim MenschenJagt As Integer
        Link = ("spielwelt" & ComboBox1.Text & ".monstersgame.net/")
        Zahl = "0"
        MenschenJagt = "0"

        ListBox1.Items.Add("[" & System.DateTime.Now & "]:" & " Die Seite wird Angepeilt..")
        Button2.Enabled = False

        ListBox1.Items.Add("[" & System.DateTime.Now & "]:" & " Einloggen..")
        WebBrowser1.Navigate("spielwelt" & ComboBox1.Text & ".monstersgame.net")

        Application.DoEvents()

        Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
            Application.DoEvents()
        Loop

        WebBrowser1.Refresh()

        WebBrowser1.Document.GetElementById("user").InnerText = (TextBox1.Text)
        WebBrowser1.Document.GetElementById("password").InnerText = (TextBox2.Text)
        WebBrowser1.Document.Forms(0).InvokeMember("submit")

        Application.DoEvents()

        Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
            Application.DoEvents()
        Loop

        ListBox1.Items.Add("[" & System.DateTime.Now & "]:" & " Eingeloggt!")

        Do Until Zahl = "6"

            WebBrowser1.Navigate("spielwelt" & ComboBox1.Text & ".monstersgame.net/index.php?ac=raubzug")

            Application.DoEvents()

            Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
                Application.DoEvents()
            Loop

            Dim httpRequest As HttpWebRequest = HttpWebRequest.Create("http://spielwelt22.monstersgame.net/index.php?ac=raubzug")
            Dim httpResponse As HttpWebResponse = httpRequest.GetResponse()
            Dim reader As StreamReader = New StreamReader(httpResponse.GetResponseStream)
            Dim httpContent As String = reader.ReadToEnd


            Dim aGold As New Regex("Dein Goldbestand\: (?<string>(.*))")
            Dim Gold As String = aGold.Match(httpContent).Groups("string").ToString()

            ListBox1.Items.Add("[" & System.DateTime.Now & "]:" & " 10 min MenschenJagt")
            TextBox3.Text = Gold


            WebBrowser1.Document.Forms(0).InvokeMember("submit")

            System.Threading.Thread.Sleep(601000)

            WebBrowser1.Navigate("spielwelt" & ComboBox1.Text & ".monstersgame.net/index.php?ac=raubzug")

            Application.DoEvents()

            Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
                Application.DoEvents()
            Loop

            ListBox1.Items.Add("[" & System.DateTime.Now & "]:" & " Du warst nun schon" & MenschenJagt + 10 & " min auf der Jagt")
            Zahl = Zahl + 1
        Loop 
02/26/2011 22:04 Beppo78#10
suche immernoch