Hi guys , i need some help.
i was trying to make a tool for get the event items from Carnival event in the server that i'm playing, because is a pain in the *** ask for reward 1 by 1 :S i was searching in the forum and found this code in auto it.
i just succes to the part when you ask for the reward by sending the packed.
this is the code.
Code:
#include <string.au3>
Global $sBuffer, $rBuffer
Global $iSize, $iIndex
$IP = "127.0.0.1"
TCPStartUp()
$socket = TCPConnect( $IP, 9000)
If $socket = -1 Then MsgBox (0,"TCP","Can't make a connection")
NewPacket(0x30D4,2)
AppendByte(5)
TCPSend($socket,GetPacket())
Func NewPacket($sValue, $iValue)
Local $sTemp = Hex($sValue)
$sBuffer = ""
$iSize = 0
$sBuffer &= StringLeft(ReverseHex(Hex($sValue)), 4)
$sBuffer &= StringLeft(ReverseHex(Hex($iValue)), 4)
EndFunc ;==>NewPacket
Func ReverseHex($sString)
Local $sTemp, $len
For $i = StringLen($sString) + 1 To 1 Step -2
$sTemp &= StringMid($sString, $i, 2)
Next
Return $sTemp
EndFunc ;==>ReverseHex
Func AppendByte($sValue)
$sBuffer &= StringRight(Hex($sValue), 2)
$iSize += 1
EndFunc ;==>AppendByte
Func GetPacket()
Local $sTemp = "0x"
$sTemp &= StringLeft(ReverseHex(Hex($iSize)), 4)
$sTemp &= $sBuffer
Return $sTemp
EndFunc ;==>GetPacket
but it need to do some things before ask for the reward, like select the npc, select Talk to this person and select the event option, then you can askfor the reward.
i was trying alot and didnt success.
those are the opcodes and packets.
Select NPC
[C -> S][7045]
D5 03 00 00
Select option Talk to this person
[C -> S][7046]
D5 03 00 00
02
Select event type (carnival)
[C -> S][30D4]
06
Select reward
[C -> S][30D4]
05
I'm using srproxy and edxloader6
Thanks in advanced.
