Results 1 to 15 of 15

Thread: Help?

  1. #1
    Join Date
    Dec 2011
    Posts
    88
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Help?

    Simba Code:
    program DTMTTEST;
    {$i srl/srl.scar}


    Var
     CoalBag, X, Y: Integer;




    begin
      SetupSrl;
      CoalBag := DTMFromString('mlwAAAHicY2dgYOAGYnYgFgViHgYIYAViISDmhfL5gVgCiAWhajmAeG55BJBkwopFGDDBfyhmxIOhAAAp8QQ3');
      If FindDTM(CoalBag, X, Y, MSX1, MSY1, MSX2, MSY2) then
      begin
        WriteLn('We Found it');
        MMouse(x, y, 7, 7);
        If IsUpText('oal') then
        Mouse(x, y, 0, 0, False);
        End;

      FreeDTM(CoalBag);


    end.

    Basically it 'Should' find the coalbag and click on it however it fails to.
    It runs goes to the item and well doesn't click
    Any Help?
    Last edited by davx; 01-01-2012 at 07:00 PM.

  2. #2
    Join Date
    Feb 2011
    Location
    Earth
    Posts
    1,784
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    does it say "we found it" ?

    Currently with your code it would right click on the coal bag, not left click (I'm not sure what you want)

    Currently: Working on Defending&Attacking in my Castle-Wars Script
    Project Rebuild: 90M/170M

  3. #3
    Join Date
    Dec 2011
    Posts
    484
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You are searching the Main Screen, not the inventory.

  4. #4
    Join Date
    Dec 2011
    Posts
    88
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    When i run it say ''we found it'' how it doesnt want to do anything it just stay over the item
    its an item in the bank
    I changed it to true like this
    Simba Code:
    program DTMTTEST;
    {$i srl/srl.scar}


    Var
     CoalBag, X, Y: Integer;




    begin
      SetupSrl;
      CoalBag := DTMFromString('mlwAAAHicY2dgYOAGYnYgFgViHgYIYAViISDmhfL5gVgCiAWhajmAeG55BJBkwopFGDDBfyhmxIOhAAAp8QQ3');
      If FindDTM(CoalBag, X, Y, MSX1, MSY1, MSX2, MSY2) then
      begin
        WriteLn('We Found it');
        MMouse(x, y, 7, 7);
        If IsUpText('oal') then
        Mouse(x, y, 0, 0, True);
        End;

      FreeDTM(CoalBag);


    end.
    Last edited by davx; 01-01-2012 at 07:09 PM.

  5. #5
    Join Date
    Nov 2010
    Posts
    305
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Quote Originally Posted by Grihmm View Post
    You are searching the Main Screen, not the inventory.
    You're right.

    @OP you should change the

    Simba Code:
    MSX1, MSY1, MSX2, MSY2
    MainScreen

    To

    Simba Code:
    MIX1, MIY1, MIX2, MIY2
    MainInventory

  6. #6
    Join Date
    Dec 2011
    Posts
    88
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    The Item is in the bank which is in the main screen? it finds the item fine just doesn't click it

  7. #7
    Join Date
    Nov 2010
    Posts
    305
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Quote Originally Posted by davx View Post
    The Item is in the bank which is in the main screen? it finds the item fine just doesn't click it
    Try to make a DTM, might that works...

    And maybe try
    Simba Code:
    MBX1, MBY1, MBX2, MBY2 //MainBank

    I can't make something to find the CoalBag since I don't have it

  8. #8
    Join Date
    Dec 2011
    Posts
    88
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hmmmm i tryed that
    Compiled successfully in 1391 ms.
    SRL Compiled in 15 msec
    We Found it
    Successfully executed.
    its not like its not compiling its just doesnt click the item
    :/ Feel like a noob now

  9. #9
    Join Date
    Nov 2010
    Posts
    305
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Quote Originally Posted by davx View Post
    Hmmmm i tryed that
    Compiled successfully in 1391 ms.
    SRL Compiled in 15 msec
    We Found it
    Successfully executed.
    its not like its not compiling its just doesnt click the item
    :/ Feel like a noob now
    Try to Target the screen again, else try to make a new DTM (Make sure to Target the client again, for some reason I also had trouble today with DTM's)

  10. #10
    Join Date
    Dec 2011
    Posts
    88
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hmmm targeted the screen every time ill try making new DTM
    Okay made new DTM still doesn't wanna Work :/
    Gonna try find pendrive see if it my computer
    Current Simba code
    Simba Code:
    program DTMTTEST;
    {$i srl/srl.scar}


    Var
     CoalBag, X, Y: Integer;




    begin
      SetupSrl;
      CoalBag := DTMFromString('mlwAAAHicY2dgYOAEYiEg5gNiZgYIYAdiQSQsBcV8UHkQXRZkAiSZcGDcgBEPhgIAtkUBzQ==');
      If FindDTM(CoalBag, X, Y, MBX1, MBY1, MBX2, MBY2) then
      begin
        WriteLn('We Found it');
        MMouse(x, y, 7, 7);
        If IsUpText('oal') then
        Mouse(x, y, 0, 0, True);
        End;

      FreeDTM(CoalBag);


    end.
    Last edited by davx; 01-01-2012 at 07:30 PM.

  11. #11
    Join Date
    Nov 2010
    Posts
    305
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    This should work you needed a timer! :P

    Simba Code:
    program DTMTTEST;
    {$i srl/srl.scar}


    Var
     CoalBag, X, Y: Integer;




    begin
      SetupSrl;
      CoalBag := DTMFromString('maQEAAHicrcxPCkBgEIfh4QZOg2RBUuIATuIyDsbCQhSiiBN4v5qd5edXzzR/ajwRSV2RBJEK4SNArLccBSpV6mz2GTb+dBgwY8WBCzceZfoTOxZMGNGjbWqqa8k+zg8+eQGPxRWP');
      If FindDTM(CoalBag, X, Y, MBX1, MBY1, MBX2, MBY2) then
      begin
        WriteLn('We Found it');
        MMouse(x, y, 7, 7);
        Wait(50);
        If IsUpText('oal') then
        Mouse(x, y, 0, 0, True);
        End;

      FreeDTM(CoalBag);


    end.

    Spent my 10k Tokens on your Coal Bag to help you

    6k Left though xd

    You can also use this

    Simba Code:
    program DTMTTEST;
    {$i srl/srl.scar}


    Var
     CoalBag, X, Y: Integer;




    begin
      SetupSrl;
      CoalBag := DTMFromString('maQEAAHicrcxPCkBgEIfh4QZOg2RBUuIATuIyDsbCQhSiiBN4v5qd5edXzzR/ajwRSV2RBJEK4SNArLccBSpV6mz2GTb+dBgwY8WBCzceZfoTOxZMGNGjbWqqa8k+zg8+eQGPxRWP');
      If FindDTM(CoalBag, X, Y, MBX1, MBY1, MBX2, MBY2) then
      begin
        WriteLn('We Found it');
        MMouse(x, y, 7, 7);
        WaitUptext('oal', 200); //Not really safe now but you'll have to make it safer yourself, now it waits 200 Milliseconds for the text once it moved the mouse.
        Mouse(x, y, 0, 0, True);
        End;

      FreeDTM(CoalBag);


    end.
    Last edited by Failure; 01-01-2012 at 07:49 PM.

  12. #12
    Join Date
    Dec 2011
    Posts
    484
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Lol you better +1 him. ^

  13. #13
    Join Date
    Dec 2011
    Posts
    88
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    :P Dont worry

  14. #14
    Join Date
    Nov 2010
    Posts
    305
    Mentioned
    0 Post(s)
    Quoted
    6 Post(s)

    Default

    Quote Originally Posted by davx View Post
    :P Dont worry
    Did it worked?

  15. #15
    Join Date
    Dec 2011
    Posts
    33
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    derp you could make a bitmap and do findbitmaptolerancein (bitmap, x, y, xs, ys, xe, ye, tol). i think that would be more accurate.

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
  •