perl2exe forRO
■ このスレッドは過去ログ倉庫に格納されています
0323TPascal
NGNG>>309の一部追加(かき方を変更)
-my $msg = pack("C*", 0x72,0) . $accountID . $charID . $sessionID . pack("L", time) . pack("C*",$sex);
+my $msg = pack("C*", 0x72,0) . $accountID . $charID . $sessionID . pack("L", $time) . pack("C*",$sex);
#Check Connectionにある
-sendMapLogin(\$remote_socket, $accountID, $charID, $sessionID, $accountSex2);
+sendMapLogin(\$remote_socket, $accountID, $charID, $sessionID, Win32::GetTickCount(),$accountSex2);
if (timeOut(\%{$timeout{'ai_keepAlive'}})) {
$timeout{'ai_keepAlive'}{'time'} = time;
-sendIgnore(\$remote_socket, "", 1);
+#sendIgnore(\$remote_socket, "", 1);
-#sendSync(\$remote_socket, Win32::GetTickCount());
+sendSync(\$remote_socket, Win32::GetTickCount());
■ このスレッドは過去ログ倉庫に格納されています