it still doesnt work....heres the updated script:
SCAR Code:
////SETUP BELOW!/////
//1.) Turn your private chat on hide.///////
//2.) Fill out lines: 17,18,19 ///////////////////
//3.) Fill out the line: 36 //////////////////
//4.) Go to an awsome Merchanting spot! /////
//5.) START! :D ///////////////////////////
program MerchantMaster;
{.include SRL/SetupSRL.scar}
{.Include SRL/SRL.scar}
{.include srl\srl\extended\xtext.scar}
{.include srl/srl/misc/trade.scar}
//PLEASE FILL OUT FIRST THREE LINES UNDER CONST//
const
howmany = 500; //How many of your item are you buying?
whatyouwannabuy='willows'; //What do you want to buy?
eaprice=40; //How much are you buying them each for?
Var
Message1:String;
Fx, Fy : integer;
//-----------------------------------------------------------------------//
/////////////////////////////////////////////////////////////////////////
//////////This will set up the right amount of money in the trade screen.
/////////////////////////////////////////////////////////////////////////
procedure BuyTrade;
begin
MoveMouse(470,292);
Wait(10000);
if Option2('Willow')then
end;
///////////////////////////////////////////////////////////////////////////
////////Will search for the color of trade chat, and open the trade screen.
///////////////////////////////////////////////////////////////////////////
procedure StartTrade;
var cx, cy, Fx, Fy : integer;
begin
If (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425))then
begin
Wait(500);
Mouse(Fx+10,Fy+3,0,0,True);
Wait(500);
BuyTrade;
end;
end;
//////////////////////////////////////////////////////////////////////////
//////////This is the statement for when you are talking.
//////////////////////////////////////////////////////////////////////////
procedure Buyingstatement;
var Fx, Fy : integer;
begin
wait(1000);
Message1:= 'buying up to '+ IntToStr(howmany) + ' ' + whatyouwannabuy +'! for ' + IntToStr(eaprice) + 'ea!';
typesend(Message1);
if (FindColor(Fx, Fy, 8388736, 21, 416, 29, 425)) then
begin
StartTrade;
end;
end;
///////////This repeats procedure BuyingStatement////////////////////
begin
repeat
buyingstatement;
until(AcceptTrade);
end. //Ends the script.
Why the hell isnt this working?! it looks fine!