Attempting to make Glider restarter with ReadProcessMemory menu

User Tag List

Results 1 to 4 of 4
  1. #1
    airlinedev's Avatar Member
    Reputation
    1
    Join Date
    May 2008
    Posts
    3
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Attempting to make Glider restarter with ReadProcessMemory

    Hello,

    I'm currently in need of a program that will restart Glider when it stops. In my situation, I am gliding Alterac Valley with a nice PPather task file. But as any of you Glider Eliter's out there know, Glider stops running when it changes zone. So, I thought I make a program that would click the Start Glide button everytime it enters or leave AV. I could just have it click the Start Glide button every 10 seconds but then I'd run into the problem where it will shrink the game and then enlarge it when it's not stopped. I'm trying to find out when it joins and leaves AV by reading the process memory.

    I've been using Delphi for a few years and was pleased when I found Delphi sniplets here on the forums. However, I don't like how some people use libraries in order to port their program to an OS that doesn't have Windows NT API files.

    To click the button, I'd simpy do the following:

    Code:
    SetCursorPos(X,Y); //X,Y = coordinates of the Start Glide button
    Mouse_Event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
    Sleep(150);
    Mouse_Event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
    Reading the memory is where I'm having troubles. After analyzing WoW.exe with IDA really quickly, I've gotten the following value for TlsIndex: $E8AA84

    I started off by trying to just read one chunk of memory (size 1000), but got a return read value of 0.

    Code:
    I have a standard form with a memo box renamed to "status" and a button named Button1 with the following OnClick code:
    
    procedure TForm1.Button1Click(Sender: TObject);
    var
      processid,threadid: integer;
      buf: pchar;
      hwindow, wname: integer;
      read: cardinal;
    begin
      wname := FindWindow(nil, 'World of Warcraft');
      if wname = 0 then begin
        status.Lines.Add('Failed to get window handle.');
        exit;
      end;
      status.lines.add('Window handle: ' + inttostr(wname));
      threadid := getwindowthreadprocessid(wname, @processid);
      hwindow := openprocess(PROCESS_ALL_ACCESS, false, processid);
      if processid = 0 then begin
        status.lines.Add('Failed to get process id.');
        exit;
      end;
      status.lines.add('PID: ' + inttostr(processid));
      status.lines.add('beginning to read memory...');
      getmem(buf, 1000);
      readprocessmemory(processid, Pointer($E8AA84), buf, 1000, read); //note the TLSINDEX
      status.lines.Add(inttostr(read));
      freemem(buf);
      closehandle(hwindow);
    end;
    Can anyone with experience please help me out? Also, I hope this code becomes useful for anyone else in my situation. If I get it working, given that someone provides me with help of knowing when I leave/join AV, I will make the complete source/program available to all. Thank you in advanced.

    Attempting to make Glider restarter with ReadProcessMemory
  2. #2
    =sinister='s Avatar Contributor
    Reputation
    154
    Join Date
    Jun 2006
    Posts
    277
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Glidermonkey...............

  3. #3
    airlinedev's Avatar Member
    Reputation
    1
    Join Date
    May 2008
    Posts
    3
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    no, glidermonkey crashes way too often. and, i'm making this a project of mine so i don't want to use any other premade glider restarters.

  4. #4
    laurens's Avatar Member
    Reputation
    2
    Join Date
    Nov 2006
    Posts
    28
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    kill the process?

    thatprocess.CloseMainWindow();

    this could work though

Similar Threads

  1. How to Make a Character with Cool Letters
    By Cyboi in forum World of Warcraft Guides
    Replies: 62
    Last Post: 08-21-2007, 01:52 PM
  2. How to make a trainer with CHEATENGINE
    By Midnight_killa in forum World of Warcraft Bots and Programs
    Replies: 28
    Last Post: 02-25-2007, 04:52 AM
  3. How to earn 5000g/day, to make it easier with an teleport hack
    By Blasted in forum World of Warcraft Bots and Programs
    Replies: 3
    Last Post: 11-18-2006, 12:14 PM
  4. Make Glider Profiles
    By LightWave in forum World of Warcraft Bots and Programs
    Replies: 10
    Last Post: 09-02-2006, 02:33 PM
  5. How I make Glider Profiles!!
    By italyone in forum World of Warcraft Guides
    Replies: 10
    Last Post: 08-03-2006, 11:27 PM
All times are GMT -5. The time now is 05:43 AM. Powered by vBulletin® Version 4.2.3
Copyright © 2024 vBulletin Solutions, Inc. All rights reserved. User Alert System provided by Advanced User Tagging (Pro) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
Digital Point modules: Sphinx-based search