1:
2:
3:

$result = socket_connect ($socket, $address, $service_port);
$out = socket_read ($socket, 2048)
Echo $out                    

1:
2:
3:
4:
5:

TCP/IP Verbindung 
SOCKET >> Resource id #2 >> OK. 
Versuche, eine Verbindung zu 'chat.dt.funcom.com' auf Port '7013' aufzubauen >> OK. 
Receive >> " f1d52ec909af0c55739af5e823b5ccc8 
Socket schliessen >> OK.                    

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

procedure TForm1.btnClick(Sender: TObject); 
begin 
CSocket.Port := 7013; 
CSocket.Host := 'chat.dt.funcom.com'; 
CSocket.Open; 
end; 

procedure TForm1.CSocketConnect(Sender: TObject; Socket: TCustomWinSocket); 
begin 
Log.Items.Add('[' + TimetoStr(now) + '] --> Connection established'); 
end; 

procedure TForm1.CSocketConnection(Sender: TObject; Socket: TCustomWinSocket); 
begin 
Log.Items.Add('[' + TimetoStr(now) + '] --> Connection to ' + CSocket.Port); 
end; 

procedure TForm1.CSocketRead(Sender: TObject; Socket: TCustomWinSocket); 
begin 
Log.Items.Add('[' + TimetoStr(now) + '] --> Receive --> ' + CSocket.ReceieText'); 
end;                    

1:
2:
3:
4:
5:
6:
7:

procedure TForm1.CSocketRead(Sender: TObject; Socket: TCustomWinSocket);
  var
    Msg: String;
begin
  Msg := Socket.ReceiveText;
  Log.Items.Add('[' + TimetoStr(now) + '] --> Receive[' + IntToStr(Lenght(Msg)) + '] --> ' + Msg);
end;                    

1:
2:
3:

[13:45:59] --> Connecting to chat.dt.funcom.com
[13:45:59] --> Connection established
[13:45:59] --> Receive[38] -->                    

1:

Log.lines.Add('[' + TimetoStr(now) + '] --> Receive[' + IntToStr(Length(Msg)) + '] --> ' + Msg + '!!');                    

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

$socket = socket_create(AF_INET, SOCK_STREAM, 0);
$result = socket_connect ($socket, $address, $service_port);
if ($result < 0) {
    echo "socket_connect() fehlgeschlagen.\nGrund: ($result) " . socket_strerror($result) . "\n";
} else {
    echo ">> OK.<br>";
}
echo "Recive >> ";
while ($out = socket_read ($socket, 2048)) {
    echo $out;
}                    

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure TForm1.CSocketRead(Sender: TObject; Socket: TCustomWinSocket);
  var
    Msg,MsgHex: String;
begin
  Msg := Socket.ReceiveText;
  SetLength(MsgHex,2*Length(Msg));
  BinToHex(@Msg[1],PChar(MsgHex),Length(MsgHex));
  Log.Items.Add('[' + TimetoStr(now) + '] --> Receive[' + IntToStr(Length(Msg)) + '] --> ' + MsgHex);
end;                    

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

procedure TForm1.CSocketRead(Sender: TObject; Socket: TCustomWinSocket);  
  var  
    Msg,MsgHex: String;  
begin  
  Msg := Socket.ReceiveText;  
  SetLength(MsgHex,2*Length(Msg)+1);
  BinToHex(@Msg[1],@MsgHex[1],Length(Msg));
  SetLength(MsgHex,2*Length(Msg));
  Log.Items.Add('[' + TimetoStr(now) + '] --> Receive[' + IntToStr(Length(Msg)) + '] --> ' + MsgHex);  
end;                    

1:
2:
3:

[14:43:20] --> Connecting to chat.dt.funcom.com
[14:43:20] --> Connection established
[14:43:20] --> Receive[38] --> 0000002200206164303432613066656266326630313234376465616238343161616331616235                    

1:

SOCKET --> Resource id #3[0][Received login seed, "c349cf6c25d7712ead46292144cd16ab"]                    

1:
2:
3:
4:
5:
6:

1c4776451e4abcb931068bfe988f0865ff10532cf669cc0483b65525404dfda24da814f42
59a1fc12e1843c94d32331a0fdb5b2fc785fee22417ec394f5211f0gbeff9605ee24a7e16
19a9cfb7a0e931ce2ca06ace7310fe17b0d00fd81e24bc67abf95a11cbcbc9da747dca2g1
d9125a2d5bad572a62e058639abe10a8817ffad053d7b90b40ac105d3ac63386f2e802c6d
e85c74f83091815589997a442db15f1d8cdf3d567881f28cf902724258623279890b0cfbe
cbfcaa2ac49efecb1dc                    

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

[7][List of characters on this account available:] online? Level Name CharNum 0 1 Area11 364536435 
[5][You are logged in as Area11] [20][name lookup: 364536435 is "Area11"] 
[20][name lookup: 168362542 is "Irker"] 
[40][Buddy Status: Irker (is offline) (is on your friends list) ] 
[20][name lookup: 251765192 is "Pontox"] 
[40][Buddy Status: Pontox (is offline) (is on your friends list) ] 
[20][name lookup: 260793043 is "Lusie"] 
[40][Buddy Status: Lusie (is offline) (is on your friends list) ] 
[20][name lookup: 285234324 is "Kaheraathan"] 
[40][Buddy Status: Kaheraathan (is online) (is on your friends list) ]