Register for your free account! | Forgot your password?

Go Back   elitepvpers > MMORPGs > Nostale > Nostale Hacks, Bots, Cheats & Exploits
You last visited: Today at 09:32

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Hey eine frage habe was gefunden für denn pserver

Discussion on Hey eine frage habe was gefunden für denn pserver within the Nostale Hacks, Bots, Cheats & Exploits forum part of the Nostale category.

Closed Thread
 
Old   #1
 
elite*gold: 0
Join Date: May 2010
Posts: 206
Received Thanks: 31
Question Hey eine frage habe was gefunden für denn pserver

und meine frage is wie füg ich das in die source ein? öo



Global $sTCP = False
Global $iTitle = "Sons Of Bratwurst 0.1.0", $iClient = 0

$hGui = GUICreate ($iTitle,610,370)

GUICtrlCreateLabel ("Game Server:",15,6)
$cGamePort = GUICtrlCreateInput ("2448",4,25,100,21)
$cGameList = GUICtrlCreateList ("",4, 50,200,300)
$cGameStart = GUICtrlCreateButton ("Start", 120, 25,70,20)

GUICtrlCreateLabel ("Login Server:",245,6)
$cLoginPort = GUICtrlCreateInput ("4001",230,25,100,21)
$cLoginList = GUICtrlCreateList ("",230, 50,200,300)
$cLoginStart = GUICtrlCreateButton ("Start", 340,25,70,20)

GUICtrlCreateLabel ("IPs connected:",450,50)
$cIPList = GUICtrlCreateList ("",450,75,150,278)

$cProgressLabel = GUICtrlCreateLabel ("Bla bla Wurst kp (0 / 100)", 310,350)
$cProgress = GUICtrlCreateProgress (450,348,150,15)

GUISetState (@SW_SHOWNORMAL,$hGui)

While 1
Switch GUIGetMsg ($hGui)
Case -3
Exit
Case $cLoginStart
WinSetTitle ($hGui, "", $iTitle & " - Start receiving packets")
TCPStartup ()
$tListen = TCPListen("127.0.0.1",GUICtrlRead ($cLoginPort), 100)
$sTCP = True
EndSwitch
If ($sTCP = True) Then
$tAccept = TCPAccept($tListen)
If ($tAccept >= 0) Then
GUICtrlSetData ($cLoginList, "127.0.0.1:" & $tAccept & " connected")
GUICtrlSetData ($cIPList, "127.0.0.1:" & $tAccept)
$iClient += 1
GUICtrlSetData ($cProgress, $iClient)
GUICtrlSetData ($cProgressLabel, "Bla bla Wurst kp (" & $iClient & " / 100)")
EndIf
EndIf
WEnd
---------------------------------------------------------------------




Global $sTCP = False
Global $iTitle = "Sons Of Bratwurst 0.1.0", $iClient = 0

$hGui = GUICreate ($iTitle,610,370)

GUICtrlCreateLabel ("Game Server:",15,6)
$cGamePort = GUICtrlCreateInput ("2448",4,25,100,21)
$cGameList = GUICtrlCreateList ("",4, 50,200,300)
$cGameStart = GUICtrlCreateButton ("Start", 120, 25,70,20)

GUICtrlCreateLabel ("Login Server:",245,6)
$cLoginPort = GUICtrlCreateInput ("4001",230,25,100,21)
$cLoginList = GUICtrlCreateList ("",230, 50,200,300)
$cLoginStart = GUICtrlCreateButton ("Start", 340,25,70,20)

GUICtrlCreateLabel ("IPs connected:",450,50)
$cIPList = GUICtrlCreateList ("",450,75,150,278)

$cProgressLabel = GUICtrlCreateLabel ("Bla bla Wurst kp (0 / 100)", 310,350)
$cProgress = GUICtrlCreateProgress (450,348,150,15)

GUISetState (@SW_SHOWNORMAL,$hGui)

While 1
Switch GUIGetMsg ($hGui)
Case -3
Exit
Case $cLoginStart
WinSetTitle ($hGui, "", $iTitle & " - Start receiving packets")
TCPStartup ()
$tListen = TCPListen("127.0.0.1",GUICtrlRead ($cLoginPort), 100)
$sTCP = True
EndSwitch
If ($sTCP = True) Then
$tAccept = TCPAccept($tListen)
If ($tAccept >= 0) Then
GUICtrlSetData ($cLoginList, "127.0.0.1:" & $tAccept & " connected")
GUICtrlSetData ($cIPList, "127.0.0.1:" & $tAccept)
$iClient += 1
GUICtrlSetData ($cProgress, $iClient)
GUICtrlSetData ($cProgressLabel, "Bla bla Wurst kp (" & $iClient & " / 100)")
EndIf
EndIf
WEnd


mit welchen programm? öo
Kamel1 is offline  
Old 09/24/2012, 17:17   #2

 
Mr.Tr33's Avatar
 
elite*gold: 2778
Join Date: Feb 2012
Posts: 3,527
Received Thanks: 1,044
Wie möchtest du bitte sowas in ein Programm einfügen? Also spontan würde ich jetzt sagen, das Programm mit einem Editor öffnen und unten einfach reinhauen und speichern.
Mr.Tr33 is offline  
Old 09/24/2012, 17:38   #3
 
Nestos's Avatar
 
elite*gold: 0
Join Date: Jul 2008
Posts: 288
Received Thanks: 801
Quote:
Originally Posted by Kamel1 View Post
"Sons Of Bratwurst 0.1.0"
Da hat jemand deinen Loginserver decompiliert Mr.Tr33. xD

Das ganze ist praktisch eigentlich nicht zu gebrauchen.

MfG,
Nestos.
Nestos is offline  
Old 09/24/2012, 17:41   #4
 
elite*gold: 0
Join Date: May 2010
Posts: 206
Received Thanks: 31
Quote:
Originally Posted by Mr.Tr33 View Post
Wie möchtest du bitte sowas in ein Programm einfügen? Also spontan würde ich jetzt sagen, das Programm mit einem Editor öffnen und unten einfach reinhauen und speichern.
welche resource aber? öo
Kamel1 is offline  
Old 09/24/2012, 18:09   #5

 
Mr.Tr33's Avatar
 
elite*gold: 2778
Join Date: Feb 2012
Posts: 3,527
Received Thanks: 1,044
Wie welche resource?
Mr.Tr33 is offline  
Old 09/24/2012, 18:25   #6
 
Rorc's Avatar
 
elite*gold: 113
The Black Market: 133/2/0
Join Date: Dec 2009
Posts: 16,685
Received Thanks: 4,449
"You are about to post a new thread in a release forum, if you are going to post a question, discussion, request (or something similar) you are wrong here.

I won't post a question or other non-releases in this forum."

Oke?

#closed
Rorc is offline  
Thanks
1 User
Closed Thread


Similar Threads Similar Threads
[Frage]Habe etwas gefunden
07/11/2010 - S4 League - 12 Replies
Was hat das zu bedeuten ?
ich habe eine neue Insel gefunden
07/17/2005 - World of Warcraft - 9 Replies
ich habe eine neue Insel gefunden , nähmlich die Gm-Insel/GM island x 16254,32 y 16222,05 z 12,85895 da ist es lustig auf map 1 also kalimdor



All times are GMT +2. The time now is 09:32.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.