|
You last visited: Today at 01:21
Advertisement
[Suche]Seafight Tool By SeaDoc
Discussion on [Suche]Seafight Tool By SeaDoc within the Seafight forum part of the Browsergames category.
01/06/2013, 11:09
|
#16
|
elite*gold: 224 
Join Date: Dec 2010
Posts: 2,766
Received Thanks: 931
|
Wieso machst du das Kugeln kaufen nicht auch über WinHttp?
|
|
|
|
01/06/2013, 11:50
|
#17
|
elite*gold: 1
Join Date: Sep 2012
Posts: 471
Received Thanks: 118
|
Quote:
Originally Posted by Alex_II
Wieso machst du das Kugeln kaufen nicht auch über WinHttp?
|
Ich habe dies schon mehre mals "angefahren" nur bis jetzt klappt der Login zu Seafight nicht ... ich weiß zwar das ich über den Token von den Hohlkugeln gehen kann das heißt : spieler muss sich einloggen (in seafight bom bot aus) .. und dann auf " hohlkugeln " klicken der bot sendet dann den link bzw den url .. und dann kann man kaufen .. nur leider weiß ich nicht wie ich das mit dem login hinbekommen soll .. wenn du magst helf mir ..
|
|
|
|
|
01/06/2013, 12:10
|
#18
|
elite*gold: 224
Join Date: Dec 2010
Posts: 2,766
Received Thanks: 931
|
Quote:
Originally Posted by SeaDoc
Ich habe dies schon mehre mals "angefahren" nur bis jetzt klappt der Login zu Seafight nicht ... ich weiß zwar das ich über den Token von den Hohlkugeln gehen kann das heißt : spieler muss sich einloggen (in seafight bom bot aus) .. und dann auf " hohlkugeln " klicken der bot sendet dann den link bzw den url .. und dann kann man kaufen .. nur leider weiß ich nicht wie ich das mit dem login hinbekommen soll .. wenn du magst helf mir ..
|
Hier mal meine Login Funktion von meinem Bid tool . Habs nicht wirklich optimiert und funktioniert auch nur ohne Sonderzeichen:
Code:
Func _Login($user, $pass)
Local $bp, $bpl
$Connect = _WinHttpConnect($Agent, $Host)
$server_selected = _GUICtrlListView_GetSelectedIndices($listvieweurope, True)
If IsArray($server_selected) = 1 Then
If Not $server_selected[0] = 0 Then
$server_selected = _GUICtrlListView_GetItemText($listvieweurope, $server_selected[1], 1)
Switch ($server_selected)
Case "int9", "ru2", "int10"
$bp = ""
Case Else
$bp = ".bigpoint"
EndSwitch
FileWrite("Data/logs/index.html", _Easy_WinHttp("GET", "/"))
FileRead("Data/logs/index.html")
If @error Then
_WinHttpCloseHandle($Connect)
SetError(1)
Return
EndIf
_writeLog($text[30])
Sleep(Random(1000, 2300, 1))
$token = _StringBetween(FileRead("Data/logs/index.html"), "token=", '">')
If $token = 0 Or @error Then
_WinHttpCloseHandle($Connect)
SetError(2)
Return
EndIf
If UBound($token) < 2 Then
_WinHttpCloseHandle($Connect)
SetError(3)
Return
EndIf
Sleep(Random(300, 900, 1))
$Connect = _WinHttpConnect($Agent, "auth3.bpsecure.com")
$LogIn = _Easy_WinHttp("POST", "/Sas/Authentication/Bigpoint?authUser=14&token=" & $token[1], "username=" & $user & "&password=" & $pass)
FileWrite("Data/logs/login.html", $LogIn & @CRLF & @CRLF & $currentheader)
If @error Then
_WinHttpCloseHandle($Connect)
SetError(4)
Return
EndIf
_writeLog($text[31])
_WinHttpCloseHandle($Connect)
$loginserver = _StringBetween($LogIn, '"meta" href="http://', '.seafight.bigpoint.com/sharedpages/icra/labels.php"')
If IsArray($loginserver) <> 1 Then
$loginserver = _StringBetween($LogIn, '"meta" href="http://', '.seafight.com/sharedpages/icra/labels.php"')
If IsArray($loginserver) <> 1 Then
MsgBox(16, "", "Error")
Return
EndIf
EndIf
Switch ($loginserver[0])
Case "int9", "ru2", "int10"
$bpl = ""
Case Else
$bpl = ".bigpoint"
EndSwitch
$Connect = _WinHttpConnect($Agent, $loginserver[0] & ".seafight" & $bpl & ".com")
If $loginserver[0] <> $server_selected Then
FileWrite("Data/logs/serverchange.txt", _Easy_WinHttp("POST", "/ajax.es", "ajaxAction=getServerSelection"))
_WinHttpCloseHandle($Connect)
$req = _StringBetween(FileRead("Data/logs/serverchange.txt"), $server_selected & ".seafight" & $bp & ".com\/GameAPI.php?req=", "';\")
If $req = 0 Or @error Then
SetError(5)
Return
EndIf
_writeLog($text[32])
Sleep(Random(900, 2300, 1))
$Connect = _WinHttpConnect($Agent, $server_selected & ".seafight" & $bp & ".com")
FileWrite("Data/logs/serverchanged.html", _Easy_WinHttp("GET", "/GameAPI.php?req=" & $req[0]))
;~ _WinHttpCloseHandle($Connect)
_writeLog($text[33])
Else
_writeLog("We dont have to change the server , sir")
EndIf
Else
MsgBox(16, "Error", "Please select one Server to login")
EndIf
EndIf
EndFunc ;==>_Login
Dazu brauchst du noch die _Easy_WinHttp Funktion ( danke an Arcanis von autoitbot)
Code:
Func _Easy_WinHttp($sType = "GET", $sPage = "/", $sPost = "")
$HTTP_Request = _WinHttpOpenRequest($Connect, $sType, $sPage, "HTTP/1.1", $Host)
If StringLen($sPost) Then
_WinHttpSendRequest($HTTP_Request, "Content-Type: application/x-www-form-urlencoded" & @CRLF, $sPost)
Else
_WinHttpSendRequest($HTTP_Request)
EndIf
_WinHttpReceiveResponse($HTTP_Request)
$currentheader = _WinHttpQueryHeaders($HTTP_Request)
$HTML = ""
Do
$HTML &= _WinHttpReadData($HTTP_Request)
Until @error
_WinHttpCloseHandle($HTTP_Request)
Return $HTML
EndFunc ;==>_Easy_WinHttp
|
|
|
|
|
01/06/2013, 12:37
|
#19
|
elite*gold: 1
Join Date: Sep 2012
Posts: 471
Received Thanks: 118
|
Quote:
Originally Posted by Alex_II
Hier mal meine Login Funktion von meinem Bid tool . Habs nicht wirklich optimiert und funktioniert auch nur ohne Sonderzeichen:
Code:
Func _Login($user, $pass)
Local $bp, $bpl
$Connect = _WinHttpConnect($Agent, $Host)
$server_selected = _GUICtrlListView_GetSelectedIndices($listvieweurope, True)
If IsArray($server_selected) = 1 Then
If Not $server_selected[0] = 0 Then
$server_selected = _GUICtrlListView_GetItemText($listvieweurope, $server_selected[1], 1)
Switch ($server_selected)
Case "int9", "ru2", "int10"
$bp = ""
Case Else
$bp = ".bigpoint"
EndSwitch
FileWrite("Data/logs/index.html", _Easy_WinHttp("GET", "/"))
FileRead("Data/logs/index.html")
If @error Then
_WinHttpCloseHandle($Connect)
SetError(1)
Return
EndIf
_writeLog($text[30])
Sleep(Random(1000, 2300, 1))
$token = _StringBetween(FileRead("Data/logs/index.html"), "token=", '">')
If $token = 0 Or @error Then
_WinHttpCloseHandle($Connect)
SetError(2)
Return
EndIf
If UBound($token) < 2 Then
_WinHttpCloseHandle($Connect)
SetError(3)
Return
EndIf
Sleep(Random(300, 900, 1))
$Connect = _WinHttpConnect($Agent, "auth3.bpsecure.com")
$LogIn = _Easy_WinHttp("POST", "/Sas/Authentication/Bigpoint?authUser=14&token=" & $token[1], "username=" & $user & "&password=" & $pass)
FileWrite("Data/logs/login.html", $LogIn & @CRLF & @CRLF & $currentheader)
If @error Then
_WinHttpCloseHandle($Connect)
SetError(4)
Return
EndIf
_writeLog($text[31])
_WinHttpCloseHandle($Connect)
$loginserver = _StringBetween($LogIn, '"meta" href="http://', '.seafight.bigpoint.com/sharedpages/icra/labels.php"')
If IsArray($loginserver) <> 1 Then
$loginserver = _StringBetween($LogIn, '"meta" href="http://', '.seafight.com/sharedpages/icra/labels.php"')
If IsArray($loginserver) <> 1 Then
MsgBox(16, "", "Error")
Return
EndIf
EndIf
Switch ($loginserver[0])
Case "int9", "ru2", "int10"
$bpl = ""
Case Else
$bpl = ".bigpoint"
EndSwitch
$Connect = _WinHttpConnect($Agent, $loginserver[0] & ".seafight" & $bpl & ".com")
If $loginserver[0] <> $server_selected Then
FileWrite("Data/logs/serverchange.txt", _Easy_WinHttp("POST", "/ajax.es", "ajaxAction=getServerSelection"))
_WinHttpCloseHandle($Connect)
$req = _StringBetween(FileRead("Data/logs/serverchange.txt"), $server_selected & ".seafight" & $bp & ".com\/GameAPI.php?req=", "';\")
If $req = 0 Or @error Then
SetError(5)
Return
EndIf
_writeLog($text[32])
Sleep(Random(900, 2300, 1))
$Connect = _WinHttpConnect($Agent, $server_selected & ".seafight" & $bp & ".com")
FileWrite("Data/logs/serverchanged.html", _Easy_WinHttp("GET", "/GameAPI.php?req=" & $req[0]))
;~ _WinHttpCloseHandle($Connect)
_writeLog($text[33])
Else
_writeLog("We dont have to change the server , sir")
EndIf
Else
MsgBox(16, "Error", "Please select one Server to login")
EndIf
EndIf
EndFunc ;==>_Login
Dazu brauchst du noch die _Easy_WinHttp Funktion ( danke an Arcanis von autoitbot)
Code:
Func _Easy_WinHttp($sType = "GET", $sPage = "/", $sPost = "")
$HTTP_Request = _WinHttpOpenRequest($Connect, $sType, $sPage, "HTTP/1.1", $Host)
If StringLen($sPost) Then
_WinHttpSendRequest($HTTP_Request, "Content-Type: application/x-www-form-urlencoded" & @CRLF, $sPost)
Else
_WinHttpSendRequest($HTTP_Request)
EndIf
_WinHttpReceiveResponse($HTTP_Request)
$currentheader = _WinHttpQueryHeaders($HTTP_Request)
$HTML = ""
Do
$HTML &= _WinHttpReadData($HTTP_Request)
Until @error
_WinHttpCloseHandle($HTTP_Request)
Return $HTML
EndFunc ;==>_Easy_WinHttp
|
Woow danke .. und damit kann ich jetzt mit Seafight verbinden ?
|
|
|
|
|
01/06/2013, 12:44
|
#20
|
elite*gold: 224
Join Date: Dec 2010
Posts: 2,766
Received Thanks: 931
|
Quote:
Originally Posted by SeaDoc
Woow danke .. und damit kann ich jetzt mit Seafight verbinden ?
|
Du musst es halt noch an deine zwecke anpassen , aber ja , damit kannst du dich verbinden
|
|
|
|
|
01/06/2013, 13:08
|
#21
|
elite*gold: 1
Join Date: Sep 2012
Posts: 471
Received Thanks: 118
|
Quote:
Originally Posted by Alex_II
Du musst es halt noch an deine zwecke anpassen , aber ja , damit kannst du dich verbinden
|
ok danke
|
|
|
|
|
01/06/2013, 15:13
|
#22
|
elite*gold: 4
Join Date: Jul 2010
Posts: 356
Received Thanks: 973
|
<.< Leute soein Programm schreibt man in 20 Minuten...
|
|
|
|
|
01/06/2013, 18:18
|
#23
|
elite*gold: 1
Join Date: Sep 2012
Posts: 471
Received Thanks: 118
|
Quote:
Originally Posted by Sinlyu
<.< Leute soein Programm schreibt man in 20 Minuten...
|
ich habe nicht  .. ich brauche wie gesagt etwas länger .. bin noch ein " anfänger "
|
|
|
|
|
01/06/2013, 18:21
|
#24
|
elite*gold: 4
Join Date: Jul 2010
Posts: 356
Received Thanks: 973
|
Fertig  siehe SFHelper
|
|
|
|
|
01/08/2013, 06:19
|
#25
|
elite*gold: 1
Join Date: Sep 2012
Posts: 471
Received Thanks: 118
|
#Push#
-
Wir suchen immer noch Team mitglieder !!
|
|
|
|
 |
|
Similar Threads
|
[Info]Seadoc Muni Kauf bot
12/11/2012 - Seafight - 7 Replies
Hallo liebe user .. / Hello User..
German:
es hat etwas länger gedauert als geplant , aber in kürze starte ich ein kleines Projekt.
ihr wisst ja das mann nur noch über see-karte Munition kaufen kann , da dies mir aber zu blöd ist hab ich ein kleines Programm entwickelt .. ich weiß nicht ob es sowas in der art schon gibt. Aber wenn nicht dann bin ich der erste der diese Idee Hatte :)
Bis Dahin erstmal bb.
P.s.
Ich werde versuchen alle Wünsche mit einzubauen.
|
Seafight ID Tool
10/11/2012 - Seafight - 2 Replies
Hallo zusammen,
ich suche ein Tool wo man die spieler ID eintragen kann und man dann sieht welche gilde der spieler schon war und auch unter welchen namen. ich weiß das
es sowas gibt allerding dürfen die beiden die ich kenne die es auch haben nicht weiter geben. Hat jemand so ein toll oder könnte sich damit jemand befassen?
|
Suche Seafight tool
03/12/2012 - Seafight - 0 Replies
ich suche einen bot oder ein tool mit dem man bei seafight mit 2 oder mehr schiffen gleichzeitig fahren kann.
|
All times are GMT +1. The time now is 01:23.
|
|
![[Suche]Seafight Tool By SeaDoc](https://www.elitepvpers.com/forum/iconimages/seafight/suche-seafight-tool-seadoc_ltr.gif){kind=small}
