Pennergame Bot

[Sploxfreak]

Pennergame Bot

Mir war mal wieder langweilig also habe ich nen Pennergame.de Bot gecoded.
Der Bot sammelt geld ein was durch Musik verdient wurde und sammelt Pfandflaschen
und leert den Einkaufswagen.

Der Bot wurde gecoded in Visual Basic 2012 (vb.net) //(.NetFramework 4.5 abhänhigkeit)

Zum coding selber:
Sollte stabil laufen (in einem Thread)
"Sauber" gecoded (im vergleich zu dem was man sonst so findet)
Funktionen:
Musikgeld sammeln
Pfandflaschen sammeln
Einkaufswagen leeren
Penner Skillen (weiter bilden)
Haustier Skillen (weiter bilden)


Foto:


Downloadlink: // Oder im Anhang
PennergameBot hier Downloaden

Virustotal:

Spoiler:

https://www.virustotal.com/de/file/3...is/1400364884/

Support via Skype
skypeaddy: elbartolo21
Ich bitte um Feedback

Falls ihr weiter so einfache klick browsergames habt für die ihr einen Bot haben wollt sagt bescheid.

(Games ohne flash und java einfach nur php basierend)

[Sploxfreak]

Für die Leute die sich früher gerne wegen meinen Coding künsten über mich lustig gemacht haben.
Wir wollen ja nicht vom gewohnten abkommen "hahahahaha"

Source:
http://www.xup.to/dl,37177595/Pennergame_Bot.rar/

Werde hier dennoch weiterhin compilte updates hochladen für die User die keine Ahnung haben vom Coding

Der Bot läuft Stabil sieh Logs:
http://nopaste.info/c858f69067.html

[DMW007]

Habs mal überflogen, paar Tipps:
- Controls sinngemäß benennen. Bei zwei Textboxen ist das noch kein Thema aber sobald du mal mehr hast wirst du eine Menge Zeit damit verschwenden nachzuschauen ob die jeweilige Box nun TextBox10 oder TextBox11 heißt und wohl auch unnötig Bugs produzieren, weil zwei Controls verwechselt wurden.
- Code sinnvoll formatieren. Aus Kleinigkeiten mal einen Einzeiler machen ist eine Sache, aber so Konstrukte wie

If musikgeld1 > 0 Then : RichTextBox1.Invoke(Sub() RichTextBox1.AppendText(zeit() & " Sammel " & musikgeld & "€ ein" & vbLf)) : .GetResponse("http://www.pennergame.de/overview/music_payout/", "check=nananana...batman%21") : Else : RichTextBox1.Invoke(Sub() RichTextBox1.AppendText(zeit() & " Kein Geld durch Musik verdient" & vbLf)) : End If

sind sehr unübersichtlich und damit fehleranfällig.
- Redundanzen vermeiden: Codeteile kommen mehrfach vor, darunter auch der Einzeiler oben. Spätestens wenn man so was merkt sollte man das in eine Funktion auslagern.
- Frameworkfunktionen nutzen: Das .NET Framework ist sehr mächtig und hat für viele häufig vorkommendere Fälle entsprechende Klassen bzw. Funktionen Man sollte diese daher bevorzugt gegenüber Eigenkonstruktionen benutzen.
Anstatt

Public Function zeit()
        Dim time As String = System.DateTime.Now
        Dim Hours As String = time.Split(" ")(1).Split(":")(0)
        Dim Minutes As String = time.Split(" ")(1).Split(":")(1)
        Dim time1 As String = Hours & ":" & Minutes
        Return time1
    End Function

Kann man in .NET mit DateTime.ToString() sauberer lösen und so die vier Zeilen auf eine verkürzen:

string time = DateTime.Now.ToString("HH:mm");

- Den UserAgent in Http.vb auf curl zu setzen

request.UserAgent = "curl/7.29.0"

ist keine besonders gute Idee, da der Bot so sehr leicht erkannt werden kann. Den UserAgent eines bekannten Browsers zu nutzen wie in der Funktion getcookie() ist schon besser. Perfektionieren könnte man das, in dem man einen Pool verschiedener UserAgents von verschiedenen Browsern in verschiedenen Versionen und auf verschiedenen Plattformen nutzt, aus dem beim Start des Bots ein zufälliger ausgewählt wird.
- Einheitliche Schreibweise verwenden: Man sollte sich für eine Schreibweise von Funktionen und Variablen entscheiden. CamelCase bietet sich da an, da ebenfalls vom .NET Framework genutzt. Aber mal Funktionsnamen/Variablennamen komplett klein, mal CamelCase und mal mit Unterstrich ist nicht sinnvoll.

[Sploxfreak]

Ich werde die Projektmappe heute Abend neu hochladen.

Bisher überarbeitet:
Zeit Function
Übersichtlichkeit (Code Sauber dargestellt)
Objektnamen
Useragent
Ab Sofort kann man auch das Haustier skillen
Erweiterte GUI

Projektmappe:
http://www.file-upload.net/download-...e-Bot.rar.html

Special THX to DMW007