oh man, i feel like a stupid here, there is nothing wrong with that function, and all the ids sre correct,
i just "FORGET TO MOVE TO TARGET" b4 i call "useSkill". omg lol
public void moveTo(float X, float Y, float Z, float height)
{
int actionStruct = values.actionStructPointer;
int actionList = MemFunctions.MemReadInt(pr_processHandle, actionStruct + 0x30);
int moveAction = MemFunctions.MemReadInt(pr_processHandle, actionList + 0x4);
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x8, 0); //action finished = 0
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x14, 1); //Action start = 1
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x20, X); // Set X coord
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x24, Y); // Set Y coord
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x28, Z); // Set Z coord
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x68, height); // Set height
if (height >= 0.0)
{
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x64, 26625); //Set 1st var for flying up
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x6C, 256); // Set 2nd var for flying up
}
else
{
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x64, 26624); //Set 1st var for not flying up
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x6C, 65536); // Set 2nd var for not flying up
}
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x2C, 0); // Set moveType
MemFunctions.MemWriteInt(pr_processHandle, actionStruct + 0xC, moveAction); // Set new moveAction
MemFunctions.MemWriteInt(pr_processHandle, actionStruct + 0x18, 1); // Set next action position to 1
MemFunctions.MemWriteInt(pr_processHandle, actionStruct + 0x14, moveAction); // Set new moveAction
}
PHP Code:
Imports pwi_lib
Public Class movement
Public Sub moveTo(ByVal targetID As Integer)
Dim targetX, targetY, targetZ As Single
Dim mob As New monsters
For i As Integer = 0 To mob.count - 1
If targetID = mob.getMonsterID(i) Then
targetX = mob.getX(i)
targetY = mob.getY(i)
targetZ = mob.getZ(i)
moveTo(targetX + 1, targetY + 1, targetZ, 0)
End If
Next
End Sub
Public Sub moveTo(ByVal X As Single, ByVal Y As Single, ByVal Z As Single, ByVal height As Single)
Dim client As New e_client
Dim pr_handle As Integer = e_client.PROCESS_INFORMATION
Dim ofs as New offsets
Dim actionStruct As Integer = MemFunctions.MemReadInt(pr_handle, e_client.CHAR_DATA_BASE + ofs.ACTIONSTRCT2_Offset)
Dim actionList As Integer = MemFunctions.MemReadInt(pr_handle, actionStruct + 48)
Dim moveAction As Integer = MemFunctions.MemReadInt(pr_handle, actionList + 4)
Dim flag As Integer = MemFunctions.MemReadInt(pr_handle, moveAction + 100)
MemFunctions.MemWriteInt(pr_handle, moveAction + 8, 0)
MemFunctions.MemWriteInt(pr_handle, moveAction + 24, 1)
MemFunctions.MemWriteFloat(pr_handle, moveAction + ofs.ActionMoveX_Offset, X)
MemFunctions.MemWriteFloat(pr_handle, moveAction + ofs.ActionMoveY_Offset, Y)
MemFunctions.MemWriteFloat(pr_handle, moveAction + ofs.ActionMoveZ_Offset, Z)
MemFunctions.MemWriteFloat(pr_handle, moveAction + ofs.ActionHeight_OffSet, height)
MemFunctions.MemWriteInt(pr_handle, moveAction + 100, flag + 1)
MemFunctions.MemWriteInt(pr_handle, moveAction + 108, 0)
MemFunctions.MemWriteInt(pr_handle, moveAction + &H2C, 0)
MemFunctions.MemWriteInt(pr_handle, actionStruct + &HC, moveAction)
MemFunctions.MemWriteInt(pr_handle, actionStruct + &H18, 1)
MemFunctions.MemWriteInt(pr_handle, actionStruct + &H14, moveAction)
End Sub
End Class
Is it safe if I do this?, I mean what if i ignore the parameter "height", can make me banned?
I mean what if i ignore the parameter "height", can make me banned?
hm banned i dont know...while testing stuff i made so much critical or invalid actions and none of my accounts got banned.
but if you dont use height on moving, your bot never work for flying or swimming mobs.
like using range chars and try then to move to mob for looting...
so what is the point on dont use height
Server doesn't log faulty packets or setbacks based on geo calculation. Wrong height doesn't get you banned. When setback happens, players don't even get your wrong position - server only broadcasts new movement vector if it is legal. So, GMs don't notice your heightmap error either.
bcos i dont know what is "height" on that function,
is that the Z cordinat that count from sea level (like geologist count the height of a mountain),
or its a number count from ground level (like arcitech count the height of a building)?, idk,...
i also need to know how to stop movement after we reach the requirmnt skill range,
so far to stop movement i do move to my current coordinat after reach the requird range for skill.
You should be able to find pretty much everything you need via the Edit: Whoops, I somehow posted this in the wrong thread lol. I posted the current list offsets the other day...
You should be able to find pretty much everything you need via the Edit: Whoops, I somehow posted this in the wrong thread lol. I posted the current list offsets the other day...
My pw is pwbr, so i think it have different offsets.
but gonna try, thanks!
public void moveTo(float X, float Y, float Z, float height)
{
int actionStruct = values.actionStructPointer;
int actionList = MemFunctions.MemReadInt(pr_processHandle, actionStruct + 0x30);
int moveAction = MemFunctions.MemReadInt(pr_processHandle, actionList + 0x4);
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x8, 0); //action finished = 0
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x14, 1); //Action start = 1
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x20, X); // Set X coord
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x24, Y); // Set Y coord
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x28, Z); // Set Z coord
MemFunctions.MemWriteFloat(pr_processHandle, moveAction + 0x68, height); // Set height
if (height >= 0.0)
{
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x64, 26625); //Set 1st var for flying up
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x6C, 256); // Set 2nd var for flying up
}
else
{
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x64, 26624); //Set 1st var for not flying up
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x6C, 65536); // Set 2nd var for not flying up
}
MemFunctions.MemWriteInt(pr_processHandle, moveAction + 0x2C, 0); // Set moveType
MemFunctions.MemWriteInt(pr_processHandle, actionStruct + 0xC, moveAction); // Set new moveAction
MemFunctions.MemWriteInt(pr_processHandle, actionStruct + 0x18, 1); // Set next action position to 1
MemFunctions.MemWriteInt(pr_processHandle, actionStruct + 0x14, moveAction); // Set new moveAction
}
Im trying to useskill with the code on my bot, I have to convert it into vb language and this is my code.
Dim skillListPointer() As Integer = {&H00B9029C, &H34, &H1154}
Dim skillListAddress As Integer = MemoryReadWrite.GetAddressFromPointer(skillListPointer)
Dim SkillPointer As Integer = 0
Dim SkillId As Integer = 0
For i As Integer = 0 To 100
SkillPointer = MemoryReadWrite.GetAddressFromPointer(skillListAddress + i*&H4)
SkillId = MemoryReadWrite.GetAddressFromPointer(SkillPointer + &H8)
If SkillId = 441 Then '441 (skill id of ○Pyrogram, a MG skill)'
interactWith(MonsterId, 3, SkillPointer)
Exit For
End If
Next
Public Sub interactWith(objectId As Integer, interactionType As Integer, skillPointer As Integer)
Dim actionPointer() As Integer = {&HB9029C, &H34, &H1128}
Dim actionStruct As Integer = MemoryReadWrite.GetAddressFromPointer(hProcess, actionPointer)
Dim actionList As Integer = MemoryReadWrite.ReadInteger(hProcess, actionStruct + &H30)
Dim interactWithAction As Integer = MemoryReadWrite.ReadInteger(hProcess, actionList + &H8)
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H8, 0) ' action finished = 0'
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H14, 1) ' Action start = 1'
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H24, 0) ' Action not start = 0'
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H20, objectId) ' Set object id to interact with'
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H38, interactionType) ' Set the type of interaction, 0 = regAtk, 1 = pick item, 2 = talk to NPC,3 = useSkill, 4 = gatherResources'
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H34, 0) ' Set error = 0'
MemoryReadWrite.WriteInteger(hProcess, interactWithAction + &H50, skillPointer) ' Set skillPointer'
MemoryReadWrite.WriteInteger(hProcess, actionStruct + &HC, interactWithAction) ' Set new actionType'
MemoryReadWrite.WriteInteger(hProcess, actionStruct + &H18, 1) ' Set next action position to 1'
MemoryReadWrite.WriteInteger(hProcess, actionStruct + &H14, interactWithAction) ' Set new actionType'
End Sub
I've tried it in PW-ID and just got a report bug
anybody can explain it?
I had opened process elementclient.exe in mhs, open disassambler in it, then went to sendpacketaddress (0x6F55E0 for indo) , opened script editor, saved it to On_BP_1.lss (it's On_BP_1 , one, right ?) in mhs folder, but nothing happened.
when should I start seeing packets coming ? or maybe I missed something , also, the add breakpoint menu setting only has script function and parm, there is no setting to point it to the script file, how mhs knows where to run the script.
here is the screenshot, please check what's missing to be done
Help with sending packets in autoit 08/16/2010 - AutoIt - 1 Replies ive been lookin around different sites for ways to send packets to the game server. the only examples i see is to create a server and a client which i dont need, i think. well to the point now, can someone lead me in a direction or tell me how to send packets to a game? also if i send packets then that means i dont need the game to be active, correct? Because in autoit when u use keys u need to have the game active, and control send does not work. ty
Sending Packets !!! 09/07/2008 - Kal Online - 14 Replies now i know how to sniff / analyse packets ... but what then ? :)
how can i send packets ?? to pimp or mix weapon for example
i just need the way to send , and then i can depend on myself :D
Sending Packets (need advice) 03/20/2008 - Conquer Online 2 - 7 Replies OK well im finaly trying to stop leaching off of everybodys work its been great n all download n play :D But im tired of being a begger n the past couple months ive been learning as much as i can about macros memery add blah blah you know ...
After playing around with ce and ahk the past couple months i stumbled across wpe pro, theres not alot of tuturals and its hard to find good help.
Well heres what ive been doing so far, open my CO then i attach it to my sniffer.
I change my...
Scamming by sending packets??? 04/15/2006 - Conquer Online 2 - 1 Replies Well my friend and i came up with the idea to send packets to the server to show a certain item in the trade window. We want to use this as a type of scam. I didnt see this in any other threads and was wondering if anyone knew if this is possible and if they could point use in the right direction. My friend was pretty good with packets in CO 1.0 but we arent really sure to go about doing it. If anyone one could please lend a helping hand?
P.S.- Before I get flamed for this because i know i...
Sending packets 10/12/2005 - Conquer Online 2 - 10 Replies I've a question. Is it possible to send 1 packet multiple times at the exact same time?