Page 1 of 2 12 LastLast
Results 1 to 10 of 14
  1. #1
    Dwar
    Dwar is offline
    Veteran Dwar's Avatar
    Join Date
    2010 Mar
    Posts
    2,222
    Thanks Thanks Given 
    211
    Thanks Thanks Received 
    2,230
    Thanked in
    292 Posts
    Rep Power
    10

    Talking [Delphi] Aika Radar, Bot framework

    Aika Radar, Bot framework

    One year ago I wrote big project for another online game and make small framework which can be used for bots, radar creation. It’s just an example how to retrieve data from memory (dword, coordinates, read strings etc), how to organize it (records, functions, data arrays) and how to manipulate (threads).
    I made small correction for Aika: reading char data and draft function for mobs.

    Will be suitable for everyone who wants to understand basics of bot creation etc.


    Features:
    [list][*]Use methods like Client.GetNPCLocal to retrieve e.g. NPC data[*]Suitable for multi bot (classes are used) [*]Read memory:
    • function getBYTE(Hdl, aPointer: Cardinal): byte;
    • function getBYTE2(Hdl, aPointer: Cardinal): DWORD; // read 2 bytes
    • function getWORD(Hdl, aPointer: Cardinal): Word;
    • function getDWORD(Hdl, aPointer: Cardinal): DWORD;
    • function getSINGLE(Hdl, aPointer: Cardinal): single;
    • function getSTRING(Hdl, aPointer: Cardinal; length: integer): WideString;
    • function getVector3(Hdl, aPointer: Cardinal): TdLocation;
    [/list:u]

    P.S. Delphi 2009, standart components

    Please register or login to download attachments.

    Please, post your questions on forum, not by PM or mail

    I spend my time, so please pay a little bit of your time to keep world in equilibrium

  2. The Following 4 Users Say Thank You to Dwar For This Useful Post:


  3. #2
    elshabory
    elshabory is offline
    New member
    Join Date
    2011 Mar
    Posts
    7
    Thanks Thanks Given 
    0
    Thanks Thanks Received 
    2
    Thanked in
    1 Post
    Rep Power
    0
    thanks master
    but when i test the project i got an error
    "file not foune PlatformDefaultStyleActnCtrls.dcu"

  4. #3
    mikbad
    mikbad is offline
    New member
    Join Date
    2011 Aug
    Posts
    9
    Thanks Thanks Given 
    3
    Thanks Thanks Received 
    1
    Thanked in
    1 Post
    Rep Power
    0
    for troy online can work ???

  5. #4
    gm3x
    gm3x is offline
    Member-in-training gm3x's Avatar
    Join Date
    2011 Feb
    Location
    Rio Grande, RS - Brazil
    Posts
    92
    Thanks Thanks Given 
    4
    Thanks Thanks Received 
    56
    Thanked in
    16 Posts
    Rep Power
    0
    What about the speed adress, bots and CE access memory and u can change it, like yzideng bot, where did u can change the core of game speed?

    Waiting xtrap tuto

  6. #5
    karraksc
    karraksc is offline
    Guest
    Join Date
    2012 Jan
    Location
    US
    Posts
    3
    Thanks Thanks Given 
    0
    Thanks Thanks Received 
    0
    Thanked in
    0 Posts
    Rep Power
    0
    Quote Originally Posted by Dwar View Post
    Features:[list][*]Use methods like Client.GetNPCLocal to retrieve e.g. NPC data[*]Suitable for multi bot (classes are used)[*]Read memory:
    function getBYTE(Hdl, aPointer: Cardinal): byte;
    function getBYTE2(Hdl, aPointer: Cardinal): DWORD; // read 2 bytes
    function getWORD(Hdl, aPointer: Cardinal): Word;
    function getDWORD(Hdl, aPointer: Cardinal): DWORD;
    function getSINGLE(Hdl, aPointer: Cardinal): single;
    function getSTRING(Hdl, aPointer: Cardinal; length: integer): WideString;
    function getVector3(Hdl, aPointer: Cardinal): TdLocation;[/list:u]
    These routines could be very useful on a project I'm working on (Hero Online Bot) but I can't download the source yet 8^(

  7. #6
    Kn0xx
    Kn0xx is offline
    New member
    Join Date
    2012 Jul
    Posts
    6
    Thanks Thanks Given 
    0
    Thanks Thanks Received 
    0
    Thanked in
    0 Posts
    Rep Power
    0
    Can't compile in XE2

    I'm sooo lost with
    "E2033: Types of actual and formal var parameters must be identical (Delphi)" the most anoying error..

  8. #7
    Dwar
    Dwar is offline
    Veteran Dwar's Avatar
    Join Date
    2010 Mar
    Posts
    2,222
    Thanks Thanks Given 
    211
    Thanks Thanks Received 
    2,230
    Thanked in
    292 Posts
    Rep Power
    10
    Quote Originally Posted by Kn0xx View Post
    E2033: Types of actual and formal
    I can't help with this error, 'cuz I have no XE2, only Delphi2009.
    As I understand, you get problem with vars types, something like types mismatch... If you will found any solution, please post it here
    Please, post your questions on forum, not by PM or mail

    I spend my time, so please pay a little bit of your time to keep world in equilibrium

  9. #8
    Kn0xx
    Kn0xx is offline
    New member
    Join Date
    2012 Jul
    Posts
    6
    Thanks Thanks Given 
    0
    Thanks Thanks Received 
    0
    Thanked in
    0 Posts
    Rep Power
    0
    Now I'm trying to make it work with Aion F2P, and compiling in Delphi7 (removed 1 lib) until I figure out a way to fix the var problem.

    ---------- Post added 2012-07-24 at 11:55 PM ---------- Previous post was 2012-07-23 at 10:21 AM ----------

    Quote Originally Posted by Dwar View Post
    I can't help with this error, 'cuz I have no XE2, only Delphi2009.
    As I understand, you get problem with vars types, something like types mismatch... If you will found any solution, please post it here
    OK, after a lot of searching, a "fix" to compile in XE2 is to replace BytesRead: Dword, to BytesRead : SIZE_T.

    It compiles, but still have no ideia if it works, or if it needs to define size_t: dword, on TYPE.

    I'm still not sure what SIZE_T do actually, if it is someting to do with the 64bit compiler, or just a mirror of the data in var, and not just a copy of the data in var.

    I don't have aika installed, please check,
    Thanks.

  10. #9
    Dwar
    Dwar is offline
    Veteran Dwar's Avatar
    Join Date
    2010 Mar
    Posts
    2,222
    Thanks Thanks Given 
    211
    Thanks Thanks Received 
    2,230
    Thanked in
    292 Posts
    Rep Power
    10
    Quote Originally Posted by Kn0xx View Post
    I'm still not sure what SIZE_T do actually,
    Lets check function declaration in d9 and in xe2:
    Delphi9
    Code:
    function ReadProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer;
      nSize: DWORD; var lpNumberOfBytesRead: DWORD): BOOL; stdcall;
    
    function WriteProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer; lpBuffer: Pointer;
      nSize: DWORD; var lpNumberOfBytesWritten: DWORD): BOOL; stdcall;
    Delphi XE2
    Code:
    function ReadProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer;
      lpBuffer: Pointer; nSize: SIZE_T; var lpNumberOfBytesRead: SIZE_T): BOOL; stdcall;
    
    function WriteProcessMemory(hProcess: THandle; const lpBaseAddress: Pointer;
      lpBuffer: Pointer; nSize: SIZE_T; var lpNumberOfBytesWritten: SIZE_T): BOOL; stdcall;
    var lpNumberOfBytesWritten: DWORD - var lpNumberOfBytesWritten: SIZE_T
    So, replacing dwords into SIZE_T is correct
    Please, post your questions on forum, not by PM or mail

    I spend my time, so please pay a little bit of your time to keep world in equilibrium

  11. #10
    gundulapek
    gundulapek is offline
    New member
    Join Date
    2012 Feb
    Posts
    24
    Thanks Thanks Given 
    0
    Thanks Thanks Received 
    1
    Thanked in
    1 Post
    Rep Power
    0
    I've create some simple bot for Tantra Online using Delphi, thanks for this community I was able to create that. But I have a problem when the client upgrade, XTrap success to prevent my bot to run .. Is there any way to make it run but not disable or kill the xtrap?

    thx

    ---------- Post added 2012-07-30 at 03:22 AM ---------- Previous post was 2012-07-26 at 08:20 AM ----------

    can anyone help me about my case?

    thx

Page 1 of 2 12 LastLast

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •