Page 5 of 5 FirstFirst ... 345
Results 101 to 120 of 120

Thread: [MoneyMaking] The Mighty Al-Kharid Silk buyer!

  1. #101
    Join Date
    Feb 2012
    Posts
    70
    Mentioned
    0 Post(s)
    Quoted
    27 Post(s)

    Default

    Please make silk seller

  2. #102
    Join Date
    Apr 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    how many silks can it buy per hour?

  3. #103
    Join Date
    Apr 2013
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    How do I fix this?
    [Error] C:\Simba\Includes\P07Include.Simba(105:10): Duplicate identifier 'P07_GETUPTEXT' at line 104
    Compiling failed.
    Last edited by Zack1000; 04-11-2013 at 09:20 PM.

  4. #104
    Join Date
    Mar 2013
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    I realize this isn't the place for this, but I figure I'll post it here in hopes that it will reach the users using this script easier than the marketplace.

    I'll purchase ALL silk, feel free to pm me and we can come up with a price.

    I'll remove this post if asked my a moderator.

  5. #105
    Join Date
    Apr 2013
    Posts
    11
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    wtf is with all the "Walking to the tanner, cookery" and then he walks to the silk? And most of the time the bot glitches and he doesn't buy squat.

  6. #106
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by shwobo View Post
    wtf is with all the "Walking to the tanner, cookery" and then he walks to the silk? And most of the time the bot glitches and he doesn't buy squat.
    That would be called debug. It's helpful to post it when reporting a bug.

  7. #107
    Join Date
    Apr 2013
    Posts
    11
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    Quote Originally Posted by BMWxi View Post
    That would be called debug. It's helpful to post it when reporting a bug.
    I know, what I meant was why does the bot walk around all of Al Kharid instead of directly going to the silk-trader?...

  8. #108
    Join Date
    Jun 2012
    Posts
    4,867
    Mentioned
    74 Post(s)
    Quoted
    1663 Post(s)

    Default

    Quote Originally Posted by shwobo View Post
    I know, what I meant was why does the bot walk around all of Al Kharid instead of directly going to the silk-trader?...
    Does it just walk past them on the way to the silk trader? It probably goes straight to the trader but the debug wasn't phrased very well.

  9. #109
    Join Date
    Apr 2013
    Posts
    26
    Mentioned
    0 Post(s)
    Quoted
    11 Post(s)

    Default

    All I gatta say...

    Loading extension C:\Simba\Extensions\associate.sex
    Extension Enabled
    Loading extension C:\Simba\Extensions\extension.sex
    Extension Enabled
    Extensions Updater Enabled!
    Loading extension C:\Simba\Extensions\srl.sex
    Extension Enabled
    SRL Updater Enabled!
    Plugins Updater Enabled!
    SPS Updater Enabled!
    MSI Updater Enabled!
    Simba news:

    Simba 0.99 has been released. The release pages will be updated in a few
    days.

    The latest Simba is Simba 992. Changes from 991 are mostly just lape
    updates: http://villavu.com/forum/showthread.php?t=94351


    Thank you for using Simba,
    Hakuna Matata.

    New window: 1706164
    [Warning] C:\Users\Daniel\Downloads\silktrader - 1.2.simba(160:11): Calculation always evaluates to False at line 159
    [Warning] C:\Users\Daniel\Downloads\silktrader - 1.2.simba(250:11): Calculation always evaluates to False at line 249
    Compiled successfully in 436 ms.
    SRL Compiled in 0 msec
    Loading SMART: http://oldschool33.runescape.com/j1
    Successfully executed.
    [Warning] C:\Users\Daniel\Downloads\silktrader - 1.2.simba(160:11): Calculation always evaluates to False at line 159
    [Warning] C:\Users\Daniel\Downloads\silktrader - 1.2.simba(250:11): Calculation always evaluates to False at line 249
    Compiled successfully in 436 ms.
    SRL Compiled in 0 msec
    Loading SMART: http://oldschool33.runescape.com/j1
    Checking P07Include VersionNumber
    Local : 1.7 / Latest : 1.7
    You Have The Latest Version of P07Include
    RedButtonColor = 2369440
    Im at the bank
    Walking to first spot
    Walking to tanner
    Walking to the Cookery
    Walking to the SilkStall
    Error: Exception: Font [P07UpChars] not found. at line 108
    The following DTMs were not freed: [SRL - Lamp bitmap, 1, 2, 3, 4, 5]
    The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap, SRL - NavBar Bitmap, SRL - Options Bitmap]

  10. #110
    Join Date
    May 2013
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    13 Post(s)

    Default

    Man really wtf it loads normal runescape

  11. #111
    Join Date
    Oct 2012
    Location
    Italy
    Posts
    145
    Mentioned
    0 Post(s)
    Quoted
    44 Post(s)

    Default

    Quote Originally Posted by OriginalGM View Post
    Hey everyone, I did not take the time to read through the posts since im lazy and want to better this code lol. basically i just wanted to state out for the record that if anyone needs this working, i have recompiled a sh*t ton in this .simba since Zorgatone had many, many bugs.

    Zorgatone i give you props, you did a decent job, but its a real mess when looking at the code. i mean you have shit placed improperly and not in order lol, so i have to jump around to get to things.
    other than that, major fixes i have done are "removed excess movement to shops(going to cookery, then to furnace, etc.) so it goes from first spot cookery, to scimitar, directly to silk trader and vice-versa for walk back.
    im working on the bank bug currently, it is very unstable due to the fact that it does not check if you have money in your invo and does not withdraw money from the bank when script is initialized.
    also working on banking silks, fairly easy fix though its just off centered when picking open bank, it picks "walk here" instead and then try to bank all the silks which in some cases may drop your silks instead and then it thinks its an empty invo and walks to the silk trader and buys silk and keeps buying and waste your money when you have a full invo and all the silk goes on the ground lol.

    so those are my minor tweaks im working on, if its okay with Zorgatone ill release the "fixed" version of this, including a lot more anti-bans and anti-randoms and random event doers.
    Cheers

    *edit
    also im going to add in alot of random mouse movements since i see very vague movements, and that leads to detection by jagex and further more a ban. random mouse movements make it look more legit and more human-like
    Yeah I know this is what I was using.. this was not supposed to be released to public

    EDIT: Ok, anyone is authorized to use this script, giving proper credits to the script writer
    Check out my new script here: http://villavu.com/forum/showthread.php?p=1194418 Al-Kharid Silk buyer

  12. #112
    Join Date
    Oct 2012
    Location
    Italy
    Posts
    145
    Mentioned
    0 Post(s)
    Quoted
    44 Post(s)

    Default

    Quote Originally Posted by cotton1212 View Post
    Hey, core rewrote the script for me to use SRL-OSR instead of p07include. Hopefully this can be useful to someone:

    Simba Code:
    program silktrader;

    {$DEFINE SMART8}
    {$I SRL-OSR/SRL.simba}

    procedure MyFlag;
    begin
        wait(1250);
        Flag;
    end;

    function FindVendor(var fx, fy: Integer): Boolean;var
        arP: TPointArray;
        ararP: T2DPointArray;
        tmpCTS, i, arL: Integer;
        P: TPoint;
    begin
        tmpCTS := GetColorToleranceSpeed;
        ColorToleranceSpeed(2);
        SetColorSpeed2Modifiers(0.02, 0.44);

        if not(FindColorsTolerance(arP, 9323663, MSX1, MSY1, MSX2, MSY2, 21)) then
        begin
            Writeln('Failed to find the vendor, no object found.');
            ColorToleranceSpeed(tmpCTS);
            SetColorSpeed2Modifiers(0.2, 0.2);
            Exit;
        end;

        SortTPAFrom(arP, Point(MSCX, MSCY));
        ararP := SplitTPAEx(arP, 10, 10);
        arL := High(ararP);

        for i := 0 to arL do
        begin
            P := MiddleTPA(ararP[i]);
            MMouse(P.x, P.y, 5, 5);
            Wait(100 + Random(100));
                Result := True;
                Break;
        end;

        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);

        if (i = arL + 1) then
        begin
            Writeln('FindVendor could not find vendor.');
            Exit;
        end;

        GetMousePos(fx, fy);
    end;

    function FindVendorPants(var fx, fy: Integer): Boolean;
    var
        arP: TPointArray;
        ararP: T2DPointArray;
        tmpCTS, i, arL: Integer;
        P: TPoint;
    begin
        tmpCTS := GetColorToleranceSpeed;
        ColorToleranceSpeed(2);
        SetColorSpeed2Modifiers(0.06, 0.27);

        if not(FindColorsTolerance(arP, 10121596, MSx1, MSY1, MSx2, MSY2, 22)) then
        begin
            Writeln('Failed to find the vendor, no object found.');
            ColorToleranceSpeed(tmpCTS);
            SetColorSpeed2Modifiers(0.2, 0.2);
            Exit;
        end;

        SortTPAFrom(arP, Point(MSCX, MSCY));
        ararP := SplitTPAEx(arP, 10, 10);
        arL := High(ararP);

        for i := 0 to arL do
        begin
            P := MiddleTPA(ararP[i]);
            MMouse(P.x, P.y, 5, 5);
            Wait(100 + Random(100));
                Result := True;
                Break;
        end;

        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);

        if (i = arL + 1) then
        begin
            Writeln('FindVendorPants could not find vendor pants.');
            Exit;
        end;

        GetMousePos(fx, fy);
    end;

    Procedure Path;
    var
        x, y : Integer;
        contin : boolean;
    begin
        MakeCompass('n');

        If FindSymbol(x, y, Symbol_Bank) then
        begin
            writeln('Im at the bank');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            writeln('I cant find the bank');
        end;
       
        x := MMCX + 25;
        y := MMY1 + 23;
        MMouse(x, y, 3, 3);
        ClickMouse2(Mouse_Left);
            MyFlag;
       
        If FindSymbol(x, y, Symbol_Cookery) or FindSymbol(x, y, Symbol_KebabShop) or FindSymbol(x, y, Symbol_Furnace) then
        begin
            writeln('Walking to first spot');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            writeln('I cant find the first spot');
            x := MMCX + 15;
            y := MMY1 + 30;
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end;
       
        If FindSymbol(x, y, Symbol_Tanner) then
        begin
            writeln('Walking to tanner');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            wait(7000);
            writeln('lolol');
            x := MMCX + 30;
            y := MMY1 + 30;
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end;
       
        If false and FindSymbol(x, y, Symbol_ScimitarShop) then     //always false
        begin
            writeln('Walking to the scimitar shop');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            x := MMCX + 50;
            y := MMY1 + 70;
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end;
       
        x := MMCX + 30;
        y := MMY1 + 30;
        MMouse(x, y, 3, 3);
        ClickMouse2(Mouse_Left);
            MyFlag;
       
        If FindSymbol(x, y, Symbol_Cookery) then
        begin
            writeln('Walking to the Cookery');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            writeln('I cant find the Cookery');
        end;

        contin := false;
        Repeat
        If FindSymbol(x, y, Symbol_SilkStall) then
        begin
            writeln('Walking to the SilkStall');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
            contin := false;
        end else
        begin
            writeln('I cant find the SilkStall');
            contin := true;
        end;
        Until not contin;
       
    end;

    Procedure PathReversed;
    var
        x, y : Integer;
        contin : boolean;
    begin
        SetAngle(SRL_ANGLE_HIGH);
        MakeCompass('n');

        wait(1500);

        If FindSymbol(x, y, Symbol_SilkStall) then
        begin
            writeln('Walking to the SilkStall');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
            contin := false;
        end else
        begin
            writeln('I cant find the SilkStall');
            contin := true;
        end;
       
        If FindSymbol(x, y, Symbol_Cookery) then
        begin
            writeln('Walking to the Cookery');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            writeln('I cant find the Cookery');
        end;

        x := MMCX - 30;
        y := MMY2 - 30;
        MMouse(x, y, 3, 3);
        ClickMouse2(Mouse_Left);
        MyFlag;
       
        If false and FindSymbol(x, y, Symbol_ScimitarShop) then     //always false
        begin
            writeln('Walking to the scimitar shop');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            x := MMCX - 50;
            y := MMY2 - 70;
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end;
       
        If FindSymbol(x, y, Symbol_Tanner) then
        begin
            writeln('Walking to tanner');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            wait(7000);
            writeln('lolol');
            x := MMCX - 30;
            y := MMY2 - 30;
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end;
       
        If FindSymbol(x, y, Symbol_Cookery) or FindSymbol(x, y, Symbol_KebabShop) or FindSymbol(x, y, Symbol_Furnace) then
        begin
            writeln('Walking to first spot');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            writeln('I cant find the first spot');
            x := MMCX - 15;
            y := MMY2 - 30;
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end;
       
        x := MMCX - 25;
        y := MMY2 - 23;
        MMouse(x, y, 3, 3);
        ClickMouse2(Mouse_Left);
        MyFlag;

        If FindSymbol(x, y, Symbol_Bank) then
        begin
            writeln('Im at the bank');
            MMouse(x, y, 3, 3);
            ClickMouse2(Mouse_Left);
            MyFlag;
        end else
        begin
            writeln('I cant find the bank');
        end;
       
    end;

    function BankBoothColor: Integer;
    var
        arP: TPointArray;
        arC: TIntegerArray;
        tmpCTS, i, arL: Integer;
    begin
        tmpCTS := GetColorToleranceSpeed;
        ColorToleranceSpeed(2);
        SetColorSpeed2Modifiers(0.06, 0.41);

        if not (FindColorsTolerance(arP, 4220043, MSX1, MSY1, MSX2, MSY2, 2)) then
        begin
            Writeln('Failed to find the color, no result.');
            ColorToleranceSpeed(tmpCTS);
            SetColorSpeed2Modifiers(0.2, 0.2);
            Exit;
        end;

        arC := GetColors(arP);
        ClearSameIntegers(arC);
        arL := High(arC);

        for i := 0 to arL do
        begin
            Result := arC[i];
            Writeln('BankBoothColor = ' + IntToStr(arC[i]));
            Break;
        end;

        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);

        if (i = arL + 1) then
            Writeln('BankBoothColor failed in finding the color.');
    end;

    function FaceColor: Integer;
    var
        arP: TPointArray;
        arC: TIntegerArray;
        tmpCTS, i, arL: Integer;
    begin
        tmpCTS := GetColorToleranceSpeed;
        ColorToleranceSpeed(2);
        SetColorSpeed2Modifiers(0.04, 0.10);

        if not (FindColorsTolerance(arP, 3890561, MCx1, MCy1, MCx2, MCy2, 16)) then
        begin
            Writeln('Failed to find the face in the dialog, no result.');
            ColorToleranceSpeed(tmpCTS);
            SetColorSpeed2Modifiers(0.2, 0.2);
            Exit;
        end;

        arC := GetColors(arP);
        ClearSameIntegers(arC);
        arL := High(arC);

        for i := 0 to arL do
        begin
            Result := arC[i];
            Writeln('FaceColor = ' + IntToStr(arC[i]));
            Break;
        end;

        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);

        if (i = arL + 1) then
            Writeln('FaceColor failed in finding the face in the dialog.');
    end;

    function isopenchat : boolean;
    var
        temp : boolean;
        x, y : integer;
    begin
        temp := false;

        if (not(FaceColor = 0)) and FindColorTolerance(x, y, FaceColor, 0, 338, 519, 478, 8) then
            temp := true;

        result := temp;
    end;

    function MoneyColorInv: Integer;
    var
        arP: TPointArray;
        arC: TIntegerArray;
        tmpCTS, i, arL: Integer;
    begin
        tmpCTS := GetColorToleranceSpeed;
        ColorToleranceSpeed(2);
        SetColorSpeed2Modifiers(0.02, 0.40);

        if not (FindColorsTolerance(arP, 958665, MIX1, MIY1, MIX2, MIY2, 24)) then
        begin
            Writeln('Failed to find the color, no result.');
            ColorToleranceSpeed(tmpCTS);
            SetColorSpeed2Modifiers(0.2, 0.2);
            Exit;
        end;

        arC := GetColors(arP);
        ClearSameIntegers(arC);
        arL := High(arC);

        for i := 0 to arL do
        begin
            Result := arC[i];
            Writeln('MoneyColorInv = ' + IntToStr(arC[i]));
            Break;
        end;

        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);

        if (i = arL + 1) then
            Writeln('MoneyColorInv failed in finding the color.');
    end;

    function MoneyColorBank: Integer;
    var
      arP: TPointArray;
      arC: TIntegerArray;
      tmpCTS, i, arL: Integer;
    begin
      tmpCTS := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      SetColorSpeed2Modifiers(0.03, 0.62);

      if not (FindColorsTolerance(arP, 1294063, MSX1, MSY1, MSX2, MSY2, 15)) then
      begin
        Writeln('Failed to find the color, no result.');
        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);
        Exit;
      end;

      arC := GetColors(arP);
      ClearSameIntegers(arC);
      arL := High(arC);

      for i := 0 to arL do
      begin
        Result := arC[i];
        Writeln('MoneyColorBank = ' + IntToStr(arC[i]));
        Break;
      end;

      ColorToleranceSpeed(tmpCTS);
      SetColorSpeed2Modifiers(0.2, 0.2);

      if (i = arL + 1) then
        Writeln('MoneyColorBank failed in finding the color.');
    end;

    Procedure DeclarePlayers;
    Begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
        Players[0].Name :='Your Username';
        Players[0].Pass :='Your Password';
    End;

    function RedButtonColor: Integer;
    var
        arP: TPointArray;
        arC: TIntegerArray;
        tmpCTS, i, arL: Integer;
    begin
        tmpCTS := GetColorToleranceSpeed;
        ColorToleranceSpeed(2);
        SetColorSpeed2Modifiers(0.03, 0.11);

        if not (FindColorsTolerance(arP, 1908867, MIx1, MIY1, MIx2, MIy2, 8)) then
        begin
            Writeln('Failed to find the color, no result.');
            ColorToleranceSpeed(tmpCTS);
            SetColorSpeed2Modifiers(0.2, 0.2);
            Exit;
        end;

        arC := GetColors(arP);
        ClearSameIntegers(arC);
        arL := High(arC);

        for i := 0 to arL do
        begin
            Result := arC[i];
            Writeln('RedButtonColor = ' + IntToStr(arC[i]));
            Break;
        end;

        ColorToleranceSpeed(tmpCTS);
        SetColorSpeed2Modifiers(0.2, 0.2);

        if (i = arL + 1) then
            Writeln('RedButtonColor failed in finding the color.');
    end;

    Procedure CheckRun;
    var
        x,y : Integer;
    begin

        GameTab(12);

        if FindColorTolerance(x, y, RedButtonColor, 615,407, 670,458, 8) then
        begin
        end else
        begin
            MMouse(643, 433,3,3);
            ClickMouse2(Mouse_Left);
        end;


        GameTab(4);
    end;

    var
        x, y : Integer;
        SilkDTM : Integer;
    Begin

      SetupSRL;
        DeclarePlayers;
        ActivateClient;
        Wait(2000);
        If (Not LoggedIn) Then
            LogInPlayer;
        SetAngle(SRL_ANGLE_HIGH);
        MakeCompass('n');
        //SetupSRL;

    while(true) do
    BEGIN

        Wait(750);

        CheckRun;
        Path;
       
        wait(750);

        While not InvFull do
        Begin
        Repeat
        if FindVendor(x,y) then
        begin

            MMouse(x, y, 3, 3);
            if(pos('an',GetUpText)=0) then
                ClickMouse2(Mouse_left);
            wait(150);
            if isopenchat then
            begin
                break;
            end
            else
                continue;
      SetupSRL;
        end;
        until false;

        //Wait(400);


        // one
        x := 307;
        y := 453;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        // two
        x := 261;
        y := 403;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        // three
        x := 214;
        y := 453;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        // four
        x := 307;
        y := 453;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        // five
        x := 258;
        y := 437;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        // six
        x := 214;
        y := 453;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        // seven
        x := 307;
        y := 453;

        MMouse(x,y, 3,3);
      Wait(400);
        ClickMouse2(Mouse_left);

        End;

        SetAngle(SRL_ANGLE_HIGH);
        MakeCompass('n');

        CheckRun;
        PathReversed;

        Wait(1500);

        //x := 124;
        //y := 234+20;

        If FindColorTolerance(x, y, BankBoothColor, MSX1, MSy1, MSX2, MSY2, 3) then
        begin
            wait(750);
            MMouse(x + 35,y, 3,3);
            wait(750);
            ClickMouse2(Mouse_right);
            wait(750);
            MMouse(x, y + 40, 3, 3);
            wait(750);
            ClickMouse2(Mouse_left);
        end;

        SilkDTM := DTMFromString('mlwAAAHicY2dgYMhjYmBIBuICIC4D4gogTgfiDCB+BpR/D8XPgfguED8B4ltAvHZRJ5BkxIr5gSQrDoxdBwRDAQDymgts');

        Wait(2500);

        if FindDTM(SilkDTM, x, y, 546, 200, 736, 466) then
        begin
            MMouse(x,y, 3,3);
            ClickMouse2(Mouse_Right);
            MMouse(x, y + 67, 3, 3);
            ClickMouse2(Mouse_Left);
        end;

        FreeDTM(SilkDTM);

        If FindColorTolerance(x, y, MoneyColorInv, 546, 200, 736, 466, 3) then
        begin
            MMouse(x,y, 3,3);
            ClickMouse2(Mouse_Right);
            MMouse(x, y + 66, 3, 3);
            ClickMouse2(Mouse_Left);
        end;

        If FindColorTolerance(x, y, MoneyColorBank, 18, 27, 502, 326, 3) then
        begin
            MMouse(x,y, 3,3);
            ClickMouse2(Mouse_Right);
            MMouse(x, y + 90, 3, 3);
            ClickMouse2(Mouse_Left);
            wait(1500);
            Typesend('84');
        end;

    END; // lmao

    End.
    I had already a SRL_OSR version released on this thread
    Last edited by Zorgatone; 05-31-2013 at 12:51 PM.
    Check out my new script here: http://villavu.com/forum/showthread.php?p=1194418 Al-Kharid Silk buyer

  13. #113
    Join Date
    Oct 2012
    Location
    Italy
    Posts
    145
    Mentioned
    0 Post(s)
    Quoted
    44 Post(s)

    Default

    Quote Originally Posted by rivaldo View Post
    Man really wtf it loads normal runescape
    you need to setup it for 07, use P07include or SRL_OSR
    Check out my new script here: http://villavu.com/forum/showthread.php?p=1194418 Al-Kharid Silk buyer

  14. #114
    Join Date
    Mar 2013
    Posts
    38
    Mentioned
    0 Post(s)
    Quoted
    19 Post(s)

    Default

    No silk seller?

  15. #115
    Join Date
    Jun 2013
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    how do i long in on the script ?

  16. #116
    Join Date
    Jul 2013
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    [Error] C:\Simba\Includes\SPS/SPS.simba(357:9): Unknown identifier 'ClickNorth' at line 356

  17. #117
    Join Date
    Sep 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    I get the same error! fairly new to simba but i have SRL and as far as I know SPS configured correctly. Did you geta solution to this?

  18. #118
    Join Date
    Oct 2012
    Location
    Italy
    Posts
    145
    Mentioned
    0 Post(s)
    Quoted
    44 Post(s)

    Default

    Quote Originally Posted by kadonker View Post
    I get the same error! fairly new to simba but i have SRL and as far as I know SPS configured correctly. Did you geta solution to this?
    This script is outdated/broken, it was written for SRL-OSR (experimental) / SRL5 like a year ago, and it won't work if not updated for new SRL6/SRL-OSR(stable).. I'm not maintaining this script anymore for now. I'm still learning the new changes in simba & scripting for both RS3/OSR.

    Peace
    Check out my new script here: http://villavu.com/forum/showthread.php?p=1194418 Al-Kharid Silk buyer

  19. #119
    Join Date
    Nov 2013
    Posts
    27
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

    Default

    Unfortunatly this script no longer works

  20. #120
    Join Date
    Nov 2013
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Nice Script!

Page 5 of 5 FirstFirst ... 345

Thread Information

Users Browsing this Thread

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

Tags for this Thread

Posting Permissions

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