Results 1 to 8 of 8

Thread: its not looking for a color.....

  1. #1
    Join Date
    Mar 2007
    Posts
    80
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default its not looking for a color.....

    my script talks perfectly, but then when being traded, nothing happens, it keeps on typing....can someone help me fix that?
    SCAR Code:
    program MerchantMaster;
    {.Include SRL/SRL.scar}
    {.include srl\srl\extended\xtext.scar}
    {.include srl/srl/misc/amount.scar}

    const      //fill these out, or it won't work!!!!!
    howmany = 15; //how many of the item you want.
    whatyouwannabuy='willows'; //what IS the item you want?
    eaprice=25; //Just wondering, how much would you want to buy each?
    Var
    Message1:String;
    Fx, Fy : integer;//sets up the buying message


       {------------------------------------------------------------------------------------------}

      procedure BuyTrade;  //This starts the procedure of a Buying Trade
      begin
      MoveMouse(470,292);
      Wait(10000);
      if Option2('Willow')then //Type in the object you want to buy in the ''
    end;
      {------------------------------------------------------------------------------------------}

     procedure StartTrade;     //This moves the mouse to start the trade
    var cx, cy, Fx, Fy : integer;
    begin
    If (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425))then  //if it finds rade in the chat box...
      begin
        Wait(500);
        Mouse(cx+10,cy+3,0,0,True);   //it will move the mouse towards it.
        Wait(500);
        BuyTrade
    end;
      end;

    procedure Buyingstatement; //This starts talking using your buying statement.
    var Fx, Fy : integer;
    begin
    wait(1000); //Waits a few seconds before typing again.
    Message1:= 'buying up to '+ IntToStr(howmany) + ' ' + whatyouwannabuy +'! for ' +  IntToStr(eaprice) + 'ea!';   //this SHOULD make the typing message work....
    typesend(Message1);  //this will make it look like the line above is being typed by a human.
        if (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425)) then
        begin
        StartTrade;
    end;
    end;
    {------------------------------------------------------------------------------------------}

    begin                    ///////////////////////////////////
    repeat                   //////{  Rinse, Lather, Repeat. }//
    buyingstatement;         ///////////////////////////////////
    until(FindColor(Fx, Fy, 8388736, 21, 416, 29, 425));  //until the trade color is found in the last chat line.
                            ////////////////////////////////////
    end.
    http://www.fenjer.com/adnan/SRL/16/20/Merchampion.png
    Merchampion is going to be the ultimate autoing script! It will buy items for your set amount of price; trade people without you having to be there, and once your money is all out; guess what! It's going to sell the item for a different set amount of price! It's merchanting without you having to be there

  2. #2
    Join Date
    Jul 2006
    Location
    NY
    Posts
    371
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Change the until in your main loop.
    SCAR Code:
    until(AcceptTrade)
    That will accept the trade on the last chatline in the chatbox. That is what you want it to do, isnt it?

  3. #3
    Join Date
    Mar 2007
    Posts
    80
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    what include do i need for that?
    http://www.fenjer.com/adnan/SRL/16/20/Merchampion.png
    Merchampion is going to be the ultimate autoing script! It will buy items for your set amount of price; trade people without you having to be there, and once your money is all out; guess what! It's going to sell the item for a different set amount of price! It's merchanting without you having to be there

  4. #4
    Join Date
    Mar 2007
    Posts
    80
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    this doesnt work....i included the trade.scar, but it still doesnt work....can someone just explain why my code doesnt work?
    http://www.fenjer.com/adnan/SRL/16/20/Merchampion.png
    Merchampion is going to be the ultimate autoing script! It will buy items for your set amount of price; trade people without you having to be there, and once your money is all out; guess what! It's going to sell the item for a different set amount of price! It's merchanting without you having to be there

  5. #5
    Join Date
    Dec 2006
    Location
    Ky
    Posts
    390
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Firstly make sure to have SetUpSRL; in you main loop. I'm looking at your script now and making changes.

    Ok heres what I have so far go through and see what I wrote to the side
    SCAR Code:
    program MerchantMaster;
    {.Include SRL/SRL.scar}
    {.include srl\srl\extended\xtext.scar}
    {.include srl/srl/misc/amount.scar}

    const      //fill these out, or it won't work!!!!!
    howmany = 15; //how many of the item you want.
    whatyouwannabuy='willows'; //what IS the item you want?
    eaprice=25; //Just wondering, how much would you want to buy each?
    Var
    Message1:String;
    Fx, Fy : integer;//sets up the buying message


       {------------------------------------------------------------------------------------------}

      procedure BuyTrade;  //This starts the procedure of a Buying Trade
      begin
      MoveMouse(470,292);
      Wait(10000);
      if Option2('Willow')then // I'm not sure what this is but if you want it to work you need a begin
    end;
      {------------------------------------------------------------------------------------------}

     procedure StartTrade;     //This moves the mouse to start the trade
    var cx, cy, Fx, Fy : integer;
    begin
    If (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425))then  //if it finds rade in the chat box...
      begin
        Wait(500);
        Mouse(cx+10,cy+3,0,0,True);   //it will move the mouse towards it.
        Wait(500);
        BuyTrade;   // added semicolon
    end;
      end;

    procedure Buyingstatement; //This starts talking using your buying statement.
    var Fx, Fy : integer;
    begin
    wait(1000); //Waits a few seconds before typing again.
    Message1:= 'buying up to '+ IntToStr(howmany) + ' ' + whatyouwannabuy +'! for ' +  IntToStr(eaprice) + 'ea!';   //this SHOULD make the typing message work....
    typesend(Message1);  //this will make it look like the line above is being typed by a human.
        if (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425)) then
        begin
        StartTrade;
    end;
    end;
    {------------------------------------------------------------------------------------------}


    begin                    ///////////////////////////////////
    repeat                   //////{  Rinse, Lather, Repeat. }//
    buyingstatement;         ///////////////////////////////////
    until(FindColor(Fx, Fy, 8388736, 21, 416, 29, 425));  //until the trade color is found in the last chat line.
                            ////////////////////////////////////
    end.

    What you need : Tidey it up, just because you understand your notes doesn't mean every one else will. Try compacting your procedures into one procedure that loops. Make your final until (which is the trade screen) into a Boolean function. SRL may already have this try looking and seeing if they do.
    I.E.
    SCAR Code:
    Function TradeScreen:Boolean;
    begin
     if (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425)) then
      begin
       Result := True;
      end else
       Result := False;
    end;

    Then your final loop would be

    SCAR Code:
    begin                    ///////////////////////////////////
    repeat                   //////{  Rinse, Lather, Repeat. }//
    buyingstatement;         ///////////////////////////////////
    until(TradeScreen)
    end.

    These are tidbits but theres more to do keep reading tuts and you will have it in no time! Good luck
    SUMMER BREAK be back when I want to

  6. #6
    Join Date
    Mar 2007
    Posts
    80
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ty for helping...
    but i knew where trade screen is and i added this to the top:
    {.include srl/srl/misc/trade.scar}

    now it says theres an error with duplicate identifier in amount.scar file that i included.....im not really sure why....
    http://www.fenjer.com/adnan/SRL/16/20/Merchampion.png
    Merchampion is going to be the ultimate autoing script! It will buy items for your set amount of price; trade people without you having to be there, and once your money is all out; guess what! It's going to sell the item for a different set amount of price! It's merchanting without you having to be there

  7. #7
    Join Date
    Mar 2007
    Posts
    80
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    argh, this script is so annoying >.<
    http://www.fenjer.com/adnan/SRL/16/20/Merchampion.png
    Merchampion is going to be the ultimate autoing script! It will buy items for your set amount of price; trade people without you having to be there, and once your money is all out; guess what! It's going to sell the item for a different set amount of price! It's merchanting without you having to be there

  8. #8
    Join Date
    Feb 2007
    Location
    Alberta, Canada
    Posts
    4,615
    Mentioned
    50 Post(s)
    Quoted
    429 Post(s)

    Default

    Well,, u could just get rid of amount.scar if you dont need it,, or you have a proc in ur script and in amount scar, if that means anything, also, stop double posting to bump ur thread, find the edit button

    Scripts: Edgeville Chop & Bank, GE Merchanting Aid
    Tutorials: How to Dominate the Grand Exchange

    Quote Originally Posted by YoHoJo View Post
    I like hentai.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 5
    Last Post: 07-31-2007, 07:23 PM
  2. Useing grass color as road color??????
    By ronny.m.p in forum OSR Help
    Replies: 7
    Last Post: 04-28-2007, 09:42 PM
  3. [COLOR="Red"]UPDATE![/COLOR] [2|14|07]
    By StK Squenc in forum RS has been updated.
    Replies: 4
    Last Post: 03-05-2007, 10:34 PM

Posting Permissions

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