em đã đọc 1 bài nào đó về cách tìm idnpc va idmap, nhưng bài đó chỉ hướng dẫn cách tìm idnpc thôi , còn về map thì mù tịt ! Mong các anh chỉ giáo giúp = WPE đó ! Thank nhìu .
cách tìm thì tương tự như tìm ID của NPC áh bạn, thay vì tìm được ID của NPC thì cũng 1 cách như vậy bạn sẽ tìm được ID của warp đó còn nếu chưa có phần chuyển đổi thông số packet sang hex thì dùng cái này thử xem Mã: <HTML> <HEAD> <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"> <TITLE>Convert Pachket To Hex</TITLE> </HEAD> <SCRIPT LANGUAGE=vbscript> Sub convert() s = UCase(Replace(Text1.value, " ", "")) d = "" dstr = "" chstr = "" For i = 1 To Len(s) Step 2 h = Left(s, 2) s = Mid(s, 3) h = decodePackage(a2h(h)) hx = Hex(h) if h < 16 then d = d & " " & "0" & hx else d = d & " " & hx end if Next Text2.InnerText = Text2.InnerText & vbNewLine + d End Sub Function decodePackage(value) Dim mask mask = &HAD decodePackage = value Xor mask End Function Public Function a2h(alpha) hextemplate = "0123456789ABCDEF" If Len(alpha) = 2 Then ahindex = InStr(1, hextemplate, Left(alpha, 1)) - 1 alindex = InStr(1, hextemplate, Right(alpha, 1)) - 1 a2h = (ahindex * (16 ^ 1)) + (alindex * (16 ^ 0)) ElseIf Len(alpha) = 4 Then ahindex = InStr(1, hextemplate, Mid(alpha, 1, 1)) - 1 alindex = InStr(1, hextemplate, Mid(alpha, 2, 1)) - 1 al = (ahindex * (16 ^ 1)) + (alindex * (16 ^ 0)) ahindex = InStr(1, hextemplate, Mid(alpha, 3, 1)) - 1 alindex = InStr(1, hextemplate, Mid(alpha, 4, 1)) - 1 ah = (ahindex * (16 ^ 1)) + (alindex * (16 ^ 0)) a2h = (ah * (2 ^ 4)) + al End If End Function </SCRIPT> <BODY> <center> <table border="2" bgcolor=violet> <tr><td><h2>Chuyển Đổi Thông Số Packet Sang Dạng Hex</td> </tr> </table> <input id=Text1 style="width:400" ><br> <input type=button value="Xác Định" onclick="convert()"> <div id="Text2"></div> Edited By KennyNT </center> </BODY> </HTML> bạn copy cái script này vào notepad rồi save as thành file html là ok... :wink:
