[Release] PacketLogger

[bledior]

@ unfortunately it didn't fix it. Same problems in both packet logger and in my TCP client.

I tried different encodings to make sure, like utf8, latin1 etc...

[BladeTiger12]

Do you have any character I can test with? When I try characters like kanji's or cyrillic's directly in NosTale chat I just see "?" or what client language u're using?

[bledior]

@ ™ ę ś ć ó etc... I am using Polish client.

[BladeTiger12]

Strange, in my example AutoIt Script these characters work: (NosTale converted the middle 3 characters to the default in german client) but the ™ and ó is working

Be careful: If you log it to your console it could also be that the console cannot print these characters.

[bledior]

@ I attached screenshot. Name of the pet should be Krzakogon^Szczęścia.

[bledior]

Yeah but I am rendering these names in my Electron app (web) and they are displayed wrong too.

I will keep looking if its problem on my side.

[BladeTiger12]

Originally Posted by bledior

@ I attached screenshot. Name of the pet should be Krzakogon^Szczęścia.

The characters looks good on the PacketLogger UI?
They're wrong when you show them in your electron app?

[bledior]

@ they are wrong both in packet logger and my electron app.

[BladeTiger12]

Ok but it looks like it isn't a problem with the PacketLogger. I managed it to partially show the string in node:

You need to run "npm install iconv-lite" before.
The other packages are in node. (But I think you know that )

var net = require('net');
var fs = require('fs');
var iconv = require('iconv-lite');
iconv.skipDecodeWarning = true;

var client = new net.Socket();

client.setEncoding('binary');
client.connect(60174, '127.0.0.1', function() {
	console.log('Connected');
	client.write('Hello, server! Love, Client.');
});

client.on('data', function(data) {
    data.split('\r').forEach(packet => {
        const splittedPacket = packet.split(' ');
        if (splittedPacket.length === 1) return;

        if (splittedPacket[1][0] === '/') {
            const res = iconv.decode(data, 'ISO-8859-2');

            console.log(res);
 
            fs.writeFileSync("chat.txt", res);
        }
    });
});
/*
Krzakogon^Szczęścia ™ ę ś ć ó
*/

[bledior]

@ I hate so much encodings. I tried iconv before, yeah it fixes it partially.
@ Finally I got it. Use iconv and decode it as Windows-1250

I think 8bitlocal and Windows-1250 is solution.

At least for Polish client.

[BladeTiger12]

Originally Posted by bledior

@ I hate so much encodings. I tried iconv before, yeah it fixes it partially.
@ Finally I got it. Use iconv and decode it as Windows-1250

I think 8bitlocal and Windows-1250 is solution.

At least for Polish client.

Nice, I tried it and worked.
Then good luck with your Electron-App

Glad that it's fixed now.

[bledior]

@ Thanks And thank you for the packet logger update and your time.

[1luca1]

hello, i would like to create a betting bot, but unfortunately i can't manage that all the time the packets are intercepted and every 5,5sec the item is betted. if i include a sleep(5500) the packets are only retrieved every 5,5sec. How can I get the packets to be retrieved all the time and bet every 5.5 seconds.
I used consolewrite in the code only to check if the packets are fetched every 5,5sec or all the time.
It builds on the code from the autoit example
Here my **** code

While True
   Bet()
   EQCheck()
   PacketLogger_Handle($Socket, ProcessPackets)
 WEnd

Func ProcessPackets($Type, $PacketSplitted, $FullPacket)
   $e_info = ""
   ConsoleWrite($PacketSplitted[0] &  [MENTION=3576271]CRLF[/MENTION]@
   If $PacketSplitted[0] = "e_info" Then
	  $e_info = $FullPacket
	  ConsoleWrite($FullPacket &  [MENTION=3576271]CRLF[/MENTION]@
   EndIf
   ;If StringInStr($e_info, "1.16") or StringInStr($e_info, "1.15") Then ;Crit dmg or crit chance
   ;EndIf

EndFunc

Func Bet()
    ;PacketLogger_SendPacket($Socket,"up_gr 7 0 0") ;bet Item
	Sleep(5500)
 EndFunc

Func EQCheck()
   PacketLogger_SendPacket($Socket,"eqinfo 1 0")
EndFunc

[BladeTiger12]

Originally Posted by 1luca1

hello, i would like to create a betting bot, but unfortunately i can't manage that all the time the packets are intercepted and every 5,5sec the item is betted. if i include a sleep(5500) the packets are only retrieved every 5,5sec. How can I get the packets to be retrieved all the time and bet every 5.5 seconds.
I used consolewrite in the code only to check if the packets are fetched every 5,5sec or all the time.
It builds on the code from the autoit example
Here my crap code

While True
   Bet()
   EQCheck()
   PacketLogger_Handle($Socket, ProcessPackets)
 WEnd

Func ProcessPackets($Type, $PacketSplitted, $FullPacket)
   $e_info = ""
   ConsoleWrite($PacketSplitted[0] &  [MENTION=3576271]CRLF[/MENTION]@
   If $PacketSplitted[0] = "e_info" Then
	  $e_info = $FullPacket
	  ConsoleWrite($FullPacket &  [MENTION=3576271]CRLF[/MENTION]@
   EndIf
   ;If StringInStr($e_info, "1.16") or StringInStr($e_info, "1.15") Then ;Crit dmg or crit chance
   ;EndIf

EndFunc

Func Bet()
    ;PacketLogger_SendPacket($Socket,"up_gr 7 0 0") ;bet Item
	Sleep(5500)
 EndFunc

Func EQCheck()
   PacketLogger_SendPacket($Socket,"eqinfo 1 0")
EndFunc

Use something like a timer that runs the function later, I think with "AdlibRegister("YourFunctionName", <Milliseconds>)"

So you could to smth. like this: (Crappier solution but easier to understand I guess)

Func Bet()
    PacketLogger_SendPacket($Socket,"up_gr 7 0 0") ;bet Item
    AdlibRegister("DoSmthElseAfter5500Milliseconds", 5500) ;Start 5.5s interval
 EndFunc

Func DoSmthElseAfter5500Milliseconds()
  ; This will run after 5,5 seconds
  AdlibUnRegister("DoSmthElseAfter5500Milliseconds") ;Stop 5.5s interval, otherwise it would run this function again after 5,5 seconds
EndFunc

The better solution would be to work with a Timestamp, check in the While loop above if 5.5s passed and run the function () but in this case it should be enough for you.

[1luca1]

Originally Posted by BladeTiger12

Use something like a timer that runs the function later, I think with "AdlibRegister("YourFunctionName", <Milliseconds>)"

So you could to smth. like this: (Crappier solution but easier to understand I guess)

Func Bet()
    PacketLogger_SendPacket($Socket,"up_gr 7 0 0") ;bet Item
    AdlibRegister("DoSmthElseAfter5500Milliseconds", 5500) ;Start 5.5s interval
 EndFunc

Func DoSmthElseAfter5500Milliseconds()
  ; This will run after 5,5 seconds
  AdlibUnRegister("DoSmthElseAfter5500Milliseconds") ;Stop 5.5s interval, otherwise it would run this function again after 5,5 seconds
EndFunc

The better solution would be to work with a Timestamp, check in the While loop above if 5.5s passed and run the function () but in this case it should be enough for you.

Ive done it with the timer and it works like a charm!! Thanks!!
Thats my code now

$iMilliSec = 5500
$hTimer = TimerInit()

While True
   PacketLogger_Handle($Socket, ProcessPackets)
   If TimerDiff($hTimer) > $iMilliSec Then
        Bet()
	$hTimer = TimerInit()
	 EndIf
 WEnd