You last visited: Today at 16:46
Advertisement
Pennerbot NEUES Zahlen Captcha
Discussion on Pennerbot NEUES Zahlen Captcha within the Browsergames forum part of the Other Online Games category.
03/27/2009, 21:46
#1
elite*gold: 0
Join Date: Mar 2009
Posts: 4
Received Thanks: 0
Pennerbot NEUES Zahlen Captcha
HI hier is der neue Bot ich weiss jetz nich ob der schon im Forum drin is.
Also dieser Bot funktioniert mit der V3.1 mit den neuen großen Zahlen Captchas.
Passwort: penner
Viel Spaß
Attached Files
Pennerbot NEW CAPTCHA.rar
(1.12 MB, 471 views)
03/27/2009, 23:31
#2
elite*gold: 0
Join Date: Jul 2008
Posts: 53
Received Thanks: 24
welcher ist das ? micros oder der PGA ?
den PGA gibts noch nicht von micro gibt es die konsolenversion
03/28/2009, 15:23
#3
elite*gold: 0
Join Date: Mar 2009
Posts: 2
Received Thanks: 0
wenn ich die config datei anklicke öffent sich ja der browser und dachte da muss ich meine datan und pw eintragen aber da oben steht : Mit dieser XML-Datei sind anscheinend keine Style-Informationen verknüpft. Nachfolgend wird die Baum-Ansicht des Dokuments angezeigt.
was mache falsch was muss ich machen um den bot zu verwenden wo meine daten eingeben?! bitte um schnelle antwort
03/28/2009, 17:05
#4
elite*gold: 0
Join Date: Mar 2009
Posts: 1
Received Thanks: 0
schönen guten tag zusammen, wenn ich die pennerbot.exe starte, seh ich zwar kurz wie sich die konsole öffnet, aber die schließt sich direkt wieder... kann mir einer weiterhelfen?
vielen dank im voraus....
03/28/2009, 17:13
#5
elite*gold: 0
Join Date: Mar 2009
Posts: 2
Received Thanks: 0
problem hat sich erledigt habs hinbekommen...funzt einwandfrei
03/28/2009, 18:18
#6
elite*gold: 0
Join Date: Mar 2009
Posts: 1
Received Thanks: 0
Was muss ich bei useragent eintragen : (
Und bei den andern auch gleich bitte antworten also alle auser Name und PW ...
Danke schonmal
03/28/2009, 18:23
#7
elite*gold: 200
Join Date: Jul 2008
Posts: 124
Received Thanks: 70
Ich hab hier ne GUI erstellt für den neuen Pennerbot 2.1 BETA, damit man nicht immer die Einstellungen manuell in die .xml eintippen muss.
Hier gibts den Download (inklusive Pennerbot 2.1 Beta):
PennerbotGUI.exe muss im Ordner vom Pennerbot 2.1 Beta bleiben, da ansonsten die Einstellungen nicht in die config.xml geschrieben werden können und die pennerbot.exe auch nicht ausgeführt werden kann.
Virustotal:
Vom Archiv:
Von der .exe
Es gibt leider Virenmeldung weil AutoIt teilweise fäschlicherweise als böse eingestuft wird.
Deswegen auch noch der Sourcecode:
HTML Code:
#RequireAdmin
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.2.12.1
Author: Wambo
Website: *************
#ce ----------------------------------------------------------------------------
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <IE.au3>
Global $useragent[10], $username = "Username", $passwort = "Passwort", $bottlecollect = "true", $bottlesell = "true", $umts = "false", $zeit = "10 Minuten", $port = "", $proxy = "", $proxyenabled = "false", $maxgeld = "100.00", $minkurs = "0.18", $dosser = "false"
Global Const $komma=','
$useragent[0] = "Mozilla/5.0 (Windows; U; Windows NT 5.2; de; rv:1.8.1.4) Gecko/20070515 Firefox/2.0.0.4"
$useragent[1] = "Mozilla/5.0 (compatible; Konqueror/3.2; Linux 2.6.2) (KHTML, like Gecko)"
$useragent[2] = "Mozilla/4.0 (compatible; MSIE 6.0; MSIE 5.5; Windows NT 5.1) Opera 7.04 [de]"
$useragent[3] = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.9.0.7) Gecko/2009021910 Firefox/3.0.7 (.NET CLR 3.5.30729)"
$useragent[4] = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.8.1.3) Gecko/20070309 Firefox/2.0.0.3"
$useragent[5] = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.9.0.7) Gecko/2009021910 Firefox/3.0.7"
$useragent[6] = "Opera/9.64 (Windows NT 5.1; U; de) Presto/2.1.1"
$useragent[7] = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de-AT; rv:1.8.1.2) Gecko/20070222 SeaMonkey/1.1.1"
$useragent[8] = "Mozilla/5.0 (Windows; U; Windows NT 5.0; de-DE; rv:1.6) Gecko/20040206 Firefox/1.0.1"
$useragent[9] = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
Opt("TrayMenuMode",1)
Opt("TrayOnEventMode", 1)
Opt("GUIOnEventMode", 1)
load()
$maingui = GUICreate("Pennerbot OpenBeta 2.1 Interface - AutoItBot", 381, 288, 285, 287)
GUICtrlCreateGroup("Accountdaten", 4, 4, 185, 97, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$gui_username = GUICtrlCreateInput($username, 35, 36, 121, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$gui_password = GUICtrlCreateInput($passwort, 35, 72, 121, 21, BitOR($ES_CENTER,$ES_PASSWORD,$ES_AUTOHSCROLL))
GUICtrlCreateLabel("Username", 33, 21, 124, 15, $SS_CENTER)
GUICtrlCreateLabel("Passwort", 33, 57, 124, 15, $SS_CENTER)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Proxy", 4, 104, 185, 89, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$check_proxy = GUICtrlCreateCheckbox("Proxy verwenden", 12, 123, 170, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$BS_CENTER,$WS_TABSTOP))
If $proxyenabled = "true" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
GUICtrlCreateLabel("Proxy IP", 10, 146, 124, 15, $SS_CENTER)
GUICtrlCreateLabel("Port", 129, 146, 51, 15, $SS_CENTER)
$gui_port = GUICtrlCreateInput($proxy, 135, 162, 43, 21)
$gui_proxy = GUICtrlCreateInput($port, 11, 162, 121, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Andere Einstellungen", 4, 198, 185, 64, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$check_umts = GUICtrlCreateCheckbox("UMTS", 68, 219, 64, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$BS_LEFT,$WS_TABSTOP))
If $umts = "true" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
$check_dossergame = GUICtrlCreateCheckbox("Dossergame", 54, 241, 79, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$BS_LEFT,$WS_TABSTOP))
If $dosser = "true" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Flaschen sammeln", 192, 4, 185, 68, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$check_bottlecollect = GUICtrlCreateCheckbox("Flaschen sammeln aktivieren", 200, 23, 169, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$BS_CENTER,$WS_TABSTOP))
If $bottlecollect = "true" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
$combo_zeit = GUICtrlCreateCombo("10 Minuten", 213, 43, 145, 25)
If $zeit = "10" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "10 Minuten")
ElseIf $zeit = "30" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "30 Minuten")
ElseIf $zeit = "60" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "1 Stunde")
ElseIf $zeit = "180" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "3 Stunden")
ElseIf $zeit = "360" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "6 Stunden")
ElseIf $zeit = "540" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "9 Stunden")
ElseIf $zeit = "720" Then
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden", "12 Stunden")
Else
GUICtrlSetData(-1, "30 Minuten|1 Stunde|3 Stunden|6 Stunden|9 Stunden|12 Stunden")
EndIf
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Flaschen verkaufen", 192, 77, 185, 105, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$check_bottlesell = GUICtrlCreateCheckbox("Flaschen verkaufen aktivieren", 200, 96, 169, 17, BitOR($BS_CHECKBOX,$BS_AUTOCHECKBOX,$BS_CENTER,$WS_TABSTOP))
If $bottlesell = "true" Then
GUICtrlSetState(-1, $GUI_CHECKED)
EndIf
GUICtrlCreateLabel("Max. Geld", 214, 120, 52, 17)
$gui_maxgeld = GUICtrlCreateInput($maxgeld, 269, 118, 78, 21)
GUICtrlCreateLabel("Min. Kurs", 214, 145, 48, 17)
$gui_minkurs = GUICtrlCreateInput($minkurs, 269, 143, 78, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$gui_save = GUICtrlCreateButton("Speichern", 240, 189, 80, 24, 0)
GUICtrlSetOnEvent(-1, "save")
$gui_savestart = GUICtrlCreateButton("Speichern und Starten", 233, 218, 95, 38, $BS_MULTILINE)
GUICtrlSetOnEvent(-1, "saverun")
GUICtrlCreateLabel("www.*************", 198, 268, 106, 17)
GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")
GUICtrlSetColor(-1, 0x000080)
GUICtrlSetOnEvent(-1, "autoitbot")
GUICtrlCreateLabel("Graphical User Interface by:", 63, 268, 136, 17)
GUISetState(@SW_SHOW)
GUICtrlSetOnEvent($check_proxy, "checkproxy")
GUICtrlSetOnEvent($check_bottlesell, "checkbottlesell")
GUICtrlSetOnEvent($check_bottlecollect, "checkbottlecollect")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
$trayhp = TrayCreateItem("Visit *************")
$trayexit = TrayCreateItem("Exit")
TrayItemSetOnEvent($trayhp, "autoitbot")
TrayItemSetOnEvent($trayexit, "_Exit")
checkproxy()
checkbottlecollect()
checkbottlesell()
While 1
Sleep(100)
WEnd
Func _Exit()
GUISetState($maingui, @SW_HIDE)
TrayTip("*************", "GUI by *************","", 1)
Sleep(2000)
Exit
EndFunc
Func load()
$username = IniRead("settings.ini", "Settings", "Username", "")
If $username = "" Then
$username = "Username"
EndIf
$passwort = IniRead("settings.ini", "Settings", "Password", "")
If $passwort = "" Then
$passwort = "Passwort"
EndIf
$proxyenabled = IniRead("settings.ini", "Settings", "ProxyEnabled", "false")
$proxy = IniRead("settings.ini", "Settings", "Proxy", "")
If $proxy = "" Then
$proxy = ""
EndIf
$port = IniRead("settings.ini", "Settings", "ProxyPort", "")
If $port = "" Then
$port = ""
EndIf
$umts = IniRead("settings.ini", "Settings", "umts", "false")
$dosser = IniRead("settings.ini", "Settings", "dosser", "false")
$bottlecollect = IniRead("settings.ini", "Settings", "bottlecollect", "true")
$zeit = IniRead("settings.ini", "Settings", "zeit", "")
$bottlesell = IniRead("settings.ini", "Settings", "bottlesell", "true")
$maxgeld = IniRead("settings.ini", "Settings", "maxgeld", "")
$minkurs = IniRead("settings.ini", "Settings", "minkurs", "")
EndFunc
Func checkbottlesell()
If GUICtrlRead($check_bottlesell) = $GUI_CHECKED Or $bottlesell = "true" Then
GUICtrlSetState($gui_maxgeld, $GUI_ENABLE)
GUICtrlSetState($gui_minkurs, $GUI_ENABLE)
Else
GUICtrlSetState($gui_maxgeld, $GUI_DISABLE)
GUICtrlSetState($gui_minkurs, $GUI_DISABLE)
$bottlesell = "false"
EndIf
EndFunc
Func checkbottlecollect()
If GUICtrlRead($check_bottlecollect) = $GUI_CHECKED Or $bottlecollect = "true" Then
GUICtrlSetState($combo_zeit, $GUI_ENABLE)
Else
GUICtrlSetState($combo_zeit, $GUI_DISABLE)
$bottlecollect = "false"
EndIf
EndFunc
Func checkproxy()
If GUICtrlRead($check_proxy) = $GUI_CHECKED Or $proxyenabled = "true" Then
GUICtrlSetState($gui_port, $GUI_ENABLE)
GUICtrlSetState($gui_proxy, $GUI_ENABLE)
Else
GUICtrlSetState($gui_port, $GUI_DISABLE)
GUICtrlSetState($gui_proxy, $GUI_DISABLE)
$proxyenabled = "false"
EndIf
EndFunc
Func autoitbot()
_IECreate("http://www.*************",0,1,0)
EndFunc
Func save()
$username = GUICtrlRead($gui_username)
$passwort = GUICtrlRead($gui_password)
$proxyenabled = GUICtrlRead($check_proxy)
If $proxyenabled = $GUI_CHECKED Then
$proxyenabled = "true"
$proxy = GUICtrlRead($gui_proxy)
$port = GUICtrlRead($gui_port)
Else
$proxyenabled = "false"
$proxy = ""
$port = ""
EndIf
$umts = GUICtrlRead($check_umts)
If $umts = $GUI_CHECKED Then
$umts = "true"
Else
$umts = "false"
EndIf
$dosser = GUICtrlRead($check_dossergame)
If $dosser = $GUI_CHECKED Then
$dosser = "true"
Else
$dosser = "false"
EndIf
$bottlecollect = GUICtrlRead($check_bottlecollect)
If $bottlecollect = $GUI_CHECKED Then
$bottlecollect = "true"
$zeit = GUICtrlRead($combo_zeit)
If $zeit = "10 Minuten" Then
$zeit = "10"
ElseIf $zeit = "30 Minuten" Then
$zeit = "30"
ElseIf $zeit = "1 Stunde" Then
$zeit = "60"
ElseIf $zeit = "3 Stunden" Then
$zeit = "180"
ElseIf $zeit = "6 Stunden" Then
$zeit = "360"
ElseIf $zeit = "9 Stunden" Then
$zeit = "540"
ElseIf $zeit = "12 Stunden" Then
$zeit = "720"
EndIf
Else
$bottlecollect = "false"
$zeit = ""
EndIf
$bottlesell = GUICtrlRead($check_bottlesell)
If $bottlesell = $GUI_CHECKED Then
$bottlesell = "true"
$maxgeld = GUICtrlRead($gui_maxgeld)
If StringInStr($maxgeld, ",") = 0 Then
Else
$maxgeld = StringReplace($maxgeld,",",".")
GUICtrlSetData($gui_maxgeld, $maxgeld)
EndIf
$minkurs = GUICtrlRead($gui_minkurs)
If StringInStr($minkurs, ",") = 0 Then
Else
$minkurs = StringReplace($minkurs,",",".")
GUICtrlSetData($gui_minkurs, $minkurs)
EndIf
Else
$bottlesell = "false"
$maxgeld = ""
$minkurs = ""
EndIf
IniWrite("settings.ini", "Settings", "Username", $username)
IniWrite("settings.ini", "Settings", "Password", $passwort)
IniWrite("settings.ini", "Settings", "ProxyEnabled", $proxyenabled)
IniWrite("settings.ini", "Settings", "Proxy", $proxy)
IniWrite("settings.ini", "Settings", "ProxyPort", $port)
IniWrite("settings.ini", "Settings", "umts", $umts)
IniWrite("settings.ini", "Settings", "dosser", $dosser)
IniWrite("settings.ini", "Settings", "bottlecollect", $bottlecollect)
IniWrite("settings.ini", "Settings", "zeit", $zeit)
IniWrite("settings.ini", "Settings", "bottlesell", $bottlesell)
IniWrite("settings.ini", "Settings", "maxgeld", $maxgeld)
IniWrite("settings.ini", "Settings", "minkurs", $minkurs)
$rnd = Random(0,9,1)
_FileWriteToLine(@ScriptDir&"\config.xml", 2, "<username> "&$username&"</username> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 3, "<password> "&$passwort&"</password> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 4, "<useragent> "&$useragent[$rnd]&"</useragent> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 5, "<dossergame> "&$dosser&"</dossergame> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 7, "<proxy-ip> "&$proxy&"</proxy-ip> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 8, "<proxy-port> "&$port&"</proxy-port> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 10, "<umts> "&$umts&"</umts> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 13, "<enabled> "&$bottlecollect&"</enabled> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 14, "<thirtymin> "&$zeit&"</thirtymin> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 18, "<enabled> "&$bottlesell&"</enabled> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 19, "<maxmoney> "&$maxgeld&"</maxmoney> ",1)
_FileWriteToLine(@ScriptDir&"\config.xml", 20, "<minexchange> "&$minkurs&"</minexchange> ",1)
EndFunc
Func saverun()
save()
Run(@ScriptDir&"\pennerbot.exe")
EndFunc
04/06/2009, 14:01
#8
elite*gold: 0
Join Date: Nov 2008
Posts: 4
Received Thanks: 0
auf elitepvpers ist echt immer verlass thx für den wie immer einwandfrei funktionierenden bot
04/08/2009, 11:12
#9
elite*gold: 0
Join Date: Apr 2009
Posts: 6
Received Thanks: 0
Hallo bei mir öffnet sich der Bot kurz, schließt sich aber wieder
04/09/2009, 10:15
#10
elite*gold: 0
Join Date: Apr 2009
Posts: 8
Received Thanks: 0
helluuuuu,
geht der jetz auch wieder in teilweise größeren als 10 min intervallen sammeln? und wenn ja, kann ich das iwie ausschalten?
.o0 wenn schon risiko, dann bitte volles
daaaankeeeeee
04/09/2009, 10:50
#11
elite*gold: 81
Join Date: Dec 2008
Posts: 434
Received Thanks: 81
ehhhhhhmbei mir geht der gar nicht ich kan nicht mals entpacken wen ich entpacken wil steht da fehler oder so . kan mir jemand HELFEN
04/09/2009, 12:18
#12
elite*gold: 0
Join Date: Oct 2007
Posts: 1,594
Received Thanks: 119
Autoitbot?
es funktioniert alles einwandfrei, doch nach ca 20minuten oder 30 minuten weiß nicht so genau kommt "pennerbot.exe hat ein problem festgestellt und wird geschlossen" oder so ähnlich
was mach ich falsch?
04/09/2009, 12:51
#13
elite*gold: 0
Join Date: Apr 2009
Posts: 8
Received Thanks: 0
Quote:
Originally Posted by
Meisternuke
Autoitbot?
es funktioniert alles einwandfrei, doch nach ca 20minuten oder 30 minuten weiß nicht so genau kommt "pennerbot.exe hat ein problem festgestellt und wird geschlossen" oder so ähnlich
was mach ich falsch?
Jo, so schauts bei mir auch aus..... ?!?!?
04/09/2009, 16:20
#14
elite*gold: 0
Join Date: Mar 2009
Posts: 3
Received Thanks: 0
ich hab das gleiche prob.
aber merkwürdigerweise erst seit 2 tagen.
vorher gab es keine probleme.
04/10/2009, 22:19
#15
elite*gold: 0
Join Date: Apr 2009
Posts: 6
Received Thanks: 0
bei mir kommt immer eine fehlermeldung
ennerbot hat ein problem festgestellt und muss beendet werden
Similar Threads
Pennerbot 1.2.0
07/15/2010 - Browsergames - 2 Replies
#closed
PennerBot V3.1
09/15/2009 - Browsergames - 67 Replies
allso ist genau wie der alte, nur der alte geht nicht mehr wegen den neuen patch also hier ist der neue bot......
Downloade mich ich bin der Bot!!
Antivir: Nothing found
ArcaVir: Nothing found
Avast: Nothing found
AVG: Nothing found
Pennerbot V1.0
05/19/2009 - Browsergames - 5 Replies
So hier gibts jetzt die erste Version des Pennerbots die sich nicht mehr im Openbetastatus befindet.
Neuerungen:
* FS#7 gefixt: Versionscheck bei nicht erreichbarer URL läuft nicht mehr ewig
* Aufhänge-Bug gefixt
* Automatische Abschaltung bei kritischer Änderung am Pennergame
* Logs/Captchas in Unterordnern verbessern die Übersicht
* Wartezeit bis ein Kampf zu Ende ist wird jetzt ausgelesen
* Wirtschaftswunder BottleSell Bug bei Dosser- und Menelgame beseitigt
...
Pennerbot PGA 1.1.3
04/23/2009 - Browsergames - 2 Replies
Jetzt gibt es den neuen Pennerbot PGA 1.1.3. Durch eine umstellung der Loginprozedur bei pennergame funktionierten die alten Bots seit gestern Nacht nicht mehr. Diese Neue Version funktioniert wieder 1a.
Download
Hier erfährst du deinen useragent
Neues Captcha
03/18/2009 - Browsergames - 2 Replies
Pennergame will heute ein neues Captcha rausbringe...
schon gelesen?
nicht mehr mit kreis, sondern mit zahlen
All times are GMT +1. The time now is 16:53 .