Results 1 to 5 of 5

Thread: Can any one help me fix this up?

  1. #1
    Join Date
    Aug 2006
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Can any one help me fix this up?

    Well, this is my ess mining procedure, it isnt great, so could any one help me fix it up??

    Code:
    procedure Minethatess(Time: Integer);
    var Moving: Boolean;
      mx, my: Integer;
      x, y, xv, yv: Extended;
      gx, gy: Extended;
      T: Integer;
    begin
    
      X  := MSX1 + MSY2 * 2.5 ;
      Y  := MSY1 + MSX2 * 1.1;
        Moving := True;
      gx := 360 ;
      gy := 360 ;
      T := GetTickCount;
      repeat
        Sleep(10);
          if (gx > x) then
            xv := xv + 0.2
          else
            xv := xv - 0.2;
          if (gy > y) then
            yv := yv + 0.2
          else
            yv := yv - 0.2;
          x := x + xv * 3.9-Random(1);
          y := y + yv * 15.01+Random(0);
          MoveMouse(Round(x+Random(0)), Round(y+Random(0)));
      until (Abs(GetTickCount - T) >= Time)or(IsUpTextMulti('Mine','ine','in'))
      if(IsUpTextMulti('Mine','ine','in'))then
    begin
    GetMousePos(mx,my)
    repeat
    RandomResponder;
    Mouse(mx,my,5,5,true)
    RandomResponder;
    Wait(7000+Random(3000))
    RandomResponder;
    Wait(1000+Random(1000))
    RandomResponder;
    Mouse(mx,my,5,5,true)
    RandomResponder;
    until(invfull)
    end
    end;
    Thanks..

    ~Bigfish

  2. #2
    Join Date
    Feb 2006
    Location
    Aussie
    Posts
    937
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    so, what exactly isnt great about it?? you need to be more specific if you want help

  3. #3
    Join Date
    Aug 2006
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Lol, well..
    Say if it finds the ess it will click it, then start mining it, then after the waits, it will click where to mouse is :/ I need it to Click the ess, then sort of lock that mouse position so it dosent wonder off some place

    If you still dont understand, just say

  4. #4
    Join Date
    Sep 2006
    Posts
    5,219
    Mentioned
    4 Post(s)
    Quoted
    1 Post(s)

    Default

    Keeping the mouse in one place is suspicious. You can let it wander, as long as you remember where it was. Use one set of x and y for the position you want to keep (xa,ya for example) and another for wandering, hoverskill etc (xb,yb for example).

  5. #5
    Join Date
    Feb 2006
    Location
    Aussie
    Posts
    937
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    maybe you could makeit click on the ess.. then while it is mining.. go getmousepos(x, y) and it will lock those co-ordinates in the x and y vars. need more help? hitme up on msn

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

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