PWI Elysium Changes

[ehasz]

Originally Posted by DurianMontong

hi thx for info, but can u tell me how to find my $factionid

sry, but what is the language used?
waht i need to take to use this code and do working program?

[sasukezero]

Originally Posted by DurianMontong

hi thx for info, but can u tell me how to find my $factionid

Sure, here you go:

 Spoiler

func Checkfaction()
$pid = ProcessExists("elementclient.exe")

$GAME_PROCESS = _MemoryOpen($pid)
$ADDRESS_BASE = 0xE5B2A4
$PlayerOffSet = 0x34
$FactionIDoffset = 0x694

$POINTER_BASE = _MemoryRead(_MemoryRead($ADDRESS_BASE, $GAME_PROCESS) + 0x1C, $GAME_PROCESS)
$POINTER_CHAR = _MemoryRead($POINTER_BASE + $PlayerOffSet, $GAME_PROCESS)
$FactionID = _MemoryRead($POINTER_CHAR + 0x694, $GAME_PROCESS)
_MemoryClose($pid)
MsgBox("", "", $FactionID)

endfunc

[DurianMontong]

Originally Posted by ehasz

sry, but what is the language used?
waht i need to take to use this code and do working program?

is use auto it , but i can't tell how to becouse i take code from 1 to another piece by piece becouse no basic just copy paste an learn to gather the code

[sasukezero]

You can use this function for it:

 Spoiler

Func GivePlayerID($pid)
$GAME_PROCESS = _MemoryOpen($pid)
$ADDRESS_BASE = 0xE5B2A4
$PlayerOffSet = 0x34
$PlayerIdOffset = 0x4B8

$POINTER_BASE = _MemoryRead(_MemoryRead($ADDRESS_BASE, $GAME_PROCESS) + 0x1C, $GAME_PROCESS)
$POINTER_CHAR = _MemoryRead($POINTER_BASE + $PlayerOffSet, $GAME_PROCESS)
$playerId = _MemoryRead($POINTER_CHAR + $PlayerIdOffset, $GAME_PROCESS)
_MemoryClose($pid)
Return $playerId
EndFunc ;==>GivePlayerID

[DurianMontong]

Originally Posted by sasukezero

You can use this function for it:

 Spoiler

Func GivePlayerID($pid)
$GAME_PROCESS = _MemoryOpen($pid)
$ADDRESS_BASE = 0xE5B2A4
$PlayerOffSet = 0x34
$PlayerIdOffset = 0x4B8

$POINTER_BASE = _MemoryRead(_MemoryRead($ADDRESS_BASE, $GAME_PROCESS) + 0x1C, $GAME_PROCESS)
$POINTER_CHAR = _MemoryRead($POINTER_BASE + $PlayerOffSet, $GAME_PROCESS)
$playerId = _MemoryRead($POINTER_CHAR + $PlayerIdOffset, $GAME_PROCESS)
_MemoryClose($pid)
Return $playerId
EndFunc ;==>GivePlayerID

thx now i can go to faction base with send packet, but more you gave more to ask

how to func auto get PlayerID if i change another char / multi client

[sasukezero]

This is the function i made for that:

 Spoiler

Func RefreshCharList()
_GUICtrlComboBox_ResetContent($Charlist)
$client = 0
$PlayerOffSet = 0x34
$LIST = ProcessList("elementclient.exe")
$PlayerIdOffset = 0x4B8
$ADDRESS_BASE = 0xE5B2A4
$PlayerNameOffset = 0x6FC
$ProcessCount = 0

While $ProcessCount <> $LIST[0][0]
$ProcessCount = $ProcessCount + 1

$client = $LIST[$ProcessCount][1]
$GAME_PROCESS = _MemoryOpen($client)

$Player = _MemoryRead(_MemoryRead(_MemoryRead($ADDRESS_BASE, $GAME_PROCESS) + 0x1C, $GAME_PROCESS) + $PlayerOffSet, $GAME_PROCESS)
$name = _MemoryRead(_MemoryRead($Player + $PlayerNameOffset, $GAME_PROCESS), $GAME_PROCESS, 'wchar[100]')
$POINTER_BASE = _MemoryRead(_MemoryRead($ADDRESS_BASE, $GAME_PROCESS) + 0x1C, $GAME_PROCESS)
$POINTER_CHAR = _MemoryRead($POINTER_BASE + $PlayerOffSet, $GAME_PROCESS)
$playerId = _MemoryRead($POINTER_CHAR + $PlayerIdOffset, $GAME_PROCESS)
_MemoryClose($client)
_GUICtrlComboBox_InsertString($Charlist, $name & ":" & $playerId & ":" & $client, 0)

WEnd

EndFunc

It reads out the Playername, Playerid and the pid you gotta need.
The gui you gotta have to make yourself but that's easy to do

[jasty]

For packet stuff I use this decent packet listener tool. It's in Russian but it's not hard to figure out what does what. You can also edit packets and resend them to test things quickly.

[Stark77]

Does anyone of you guys know how to interact with the Mailbox?
Like reading what item is in there?

so far i got those packets but cannot read the item ID... also the numbering seems weird.

   ;~ number of mails 
   NumberOfMessages := readOffsetChain("0x1C|0x18|0x8|0xC4|0x3DC|0x248|0x174") 
    
   ;~ open mailbox
   packet := "2500190000000C0000006A100000" . hexPlayerID . "1E40E040"
   
   ;~ open mail
   nr := 7  ;~ nr starts with 0x7 for the first mail (not sure about that)
   revhex(rev_nr,nr,2)
   packet := "2500190000000D0000006C100000" . hexPlayerID . "00E92B90" . rev_nr

   ;~ take item
   packet := "2500190000000F0000006E100000" . hexPlayerID . "0018E900" . rev_nr . "0600"

   ;~ hexPlayerID is not reversed

[louco89]

Anyone know how to start and stop the autobot from pw?
I do not find any packets to that, is it client side only?
If is client side is any "easy" way to do that?

[DurianMontong]

hi how to get auto func get NPC unique ID if i have npc ID
because some of dungeon reset NPC unique ID when i go again

now i use like this but after server reset it must find another NPC unique ID

Func OpenNPC()
$npcId = 2260730042 ; Mu Hoffen
startNpcDialogue($npcId)
EndFunc

Func startNpcDialogue($npcId)
local $packet, $packetSize

$packet = '2300'
$packet &= _hex($npcId)
$packetSize = 6

sendPacket($packet, $packetSize, $pid)
EndFunc

how i can auto get NPC unique ID, so i dont need always find NPC unique ID manual

i hope can use direct like something like "startNpcDialogue(40566)"

[louco89]

Originally Posted by DurianMontong

hi how to get auto func get NPC unique ID if i have npc ID
because some of dungeon reset NPC unique ID when i go again

now i use like this but after server reset it must find another NPC unique ID
how i can auto get NPC unique ID, so i dont need always find NPC unique ID manual

i hope can use direct like something like "startNpcDialogue(40566)"

I think you can do a search for npc close to you, and with that you can search by the name of the npc or unique id. I don't know another way to do so.

Here are a post that explaining how to do that

[DurianMontong]

Originally Posted by louco89

I think you can do a search for npc close to you, and with that you can search by the name of the npc or unique id. I don't know another way to do so.

Here are a post that explaining how to do that

yes thanks , i use that array way to search NPC unique ID but is there any funcion that can get unique ID from array ?

[Kruger2001]

can anyone share the new Skill Ids please ?

Select Target by ID (AHK):

 Spoiler

_TargetNPC(ID,p)
{
Global
createMemoryPointers(p)
getNPCList(p)
Sleep, 500
Loop % NPCList.MaxIndex()
{
if NPCList[(A_index-1),"1"] = ID
{
Target := NPCList[(A_index-1),"0"]
selectTarget(Target, p)
Return
}
}
}

getNPCList(p)
{
Global
NPCList := Object()
i = 0
COUNT := ReadMemory(NPCBase_Pointer + NpcCounterOffset, p)
Count := Count +30
Loop %COUNT%
{
UNIT := ReadMemory(NPCList_Pointer + i*0x4, p)
NPCList[i, "0"] := ReadMemory(UNIT + NpcUIDOffset, p) ;Unique ID
NPCList[i, "1"] := ReadMemory(UNIT + NpcIDOffset, p) ;pwdatabase.com ID
NPCList[i, "3"] := ReadMemory(UNIT + NpcLVLOffset, p) ;Level
NPCList[i, "4"] := Round((IntToFloat(ReadMemory(UNIT + XposOffset, p))+4000) / 10 ,2) ;X Coord
NPCList[i, "5"] := Round((IntToFloat(ReadMemory(UNIT + YposOffset, p))+5500) / 10 ,2) ;Y Coord
NPCList[i, "6"] := Round((IntToFloat(ReadMemory(UNIT + ZposOffset, p))+0) / 10 ,2) ;Z Coord
NPCList[i, "7"] := ReadMemory(UNIT + NpcMoveModeOffse, p) ;Move Mode
NPCList[i, "8"] := Round(10*sqrt((getX(p) - NPCList[i, "4"])**2+(getY(p) - NPCList[i, "5"])**2+(getZ(p)-NPCList[i, "6"])**2) ,2)
NPCList[i, "9"] := ReadMemory(UNIT + NpcHPOffset, p) ;HP
NPCList[i, "10"] := ReadMemory(UNIT + NpcHPmaxOffset, p) ;Max HP
NPCList[i, "11"] := ReadMemory(UNIT + NpcTargetModeOffse, p) ;Target
NPCList[i, "13"] := ReadMemory(UNIT + XposOffset, p) ;X Coord
NPCList[i, "14"] := ReadMemory(UNIT + YposOffset, p) ;Y Coord
NPCList[i, "15"] := ReadMemory(UNIT + ZposOffset, p) ;Z Coord
tmpName :=
tmpNameNPC :=
tmpArray := NPCList[i, "1"]
tmpName := $MONSTER_DESC_%tmpArray%
tmpNameNPC := $NPC_DESC_%tmpArray%
if StrLen(tmpName) > 0
{
NPCList[i, "2"] := tmpName
NPCList[i, "12"] := "MOB"
}
if StrLen(tmpNameNPC) > 0
{
NPCList[i, "2"] := tmpNameNPC
NPCList[i, "12"] := "NPC"
}
if (StrLen(tmpNameNPC) = 0) AND (StrLen(tmpName) = 0)
{
NPCList[i, "2"] := "N/A"
NPCList[i, "12"] := "N/A"
}
i++
}
Return
}

[louco89]

Originally Posted by Kruger2001

can anyone share the new Skill Ids please ?

I don't know if is going to help anyone, but I use this code in php for create a new file with skills ids.

PHP Code:

<?php
set_time_limit(0);
//name of the file that you want
$ini = fopen("Skill_ids.ini","a");
fwrite($ini,$i."[Skills]"."\n");
//open the skillids file
$file = fopen("skillstr.txt", "r");
    while (!feof($file)) {
        $line_of_text = fgets($file);
        //old - (\d{0,5})  "(.*)"
        //new - (\d{0,5})  "([^\^].*)"
    preg_match('/(\d{0,5})  "([^\^].*)"/',$line_of_text, $matches);
//    echo $line_of_text;
//    print_r($matches);
    $matches = array_filter($matches);
    if(!empty($matches)){}
    $i=trim($matches[1]);
    $itemname = trim($matches[2]);        
    if(!empty($itemname)){
    fwrite($ini,$i."=".$itemname."\n");
    }
    } 
fclose($file);
fclose($ini);
?>

[DurianMontong]

hi louco89 do you have function auto follow but with distance from leader i want 8 party member follow leader the formation like this

P P P
P L P
P p p

p = is party member
L = is leader

so every time leader move , 8 party member with same distance will follow leader