Results 1 to 3 of 3

Thread: Assignment expected in script [Error]

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

    Default Assignment expected in script [Error]

    Line 53: [Error] (17714:16): Assignment expected in script

    Heres My Unfinished Code To Make A Varrock Yew Chopper + Banker
    [And If You See Anything Else, That Wont Work, Please Let Me Know, Thanks In Advance]

    SCAR Code:
    //This Script Made By Marneus901
    //First Script Made By Me, And Tanks To Communities
    //Such As Sythe.org And SRL-forums.com For Tutorials
    //And Inspiration


    //NOTE:: Does Not Do Randoms Yet

    //(FOR PROGRAMMING PURPOSES) Then Make -Y CORD Directly Abouve Shope Inside Castle Garden
    //Then More Up But To The Left (-X)
    //Then Directly Abouve Again (-Y)
    //If Cannot Find Tree, Then Head East (X)
    //If Already Moved East, And Cannot Find Tree, Move West (-X)
    //If West, Full Load, Head To Bank
    //If East, Full Load, Head West, Then Move To Bank
    //Use Shotcut Symbol
    //Then Directly South
    //Repeat
    //Repeat (Should Be Out Of Varrock Gardens After This)
    //Click On BankSymbol

    program AutoYewCutter;
    {.include SRL/SRL.scar}
    var
    myx,myy:Integer;
    InfoManSymbol:Integer;
    AbleToFindBmps:Integer;
    const
    Username='username';
    Password='password';
    BankIconColor= 4048866; //Get The Yellow Part Of Symbol In Mini-Map
    //InfoGuySymbol= 7755818; //The Blue Color Of Information Guide Below Bank (On Mini-Map)
    StaffShopIcon= 1200010; //Brown Color Of Staff Shop Symbol In MiniMap
    ShortcutSymbol= 2395905; //On MiniMap
    YewTreeSymbol= 95746;//WellGee?
    YewTreeColor= 3168336;

    procedure WalkToTrees;
    begin
    HighestAngle;
    Wait(2000);
    MakeCompass('S');
    MakeCompass('N');
       Wait(1500);
       //Well, Your Character Is Always At The Cordinate 268, 170
       //North Square Is 270, 150 = y cord - 20
       //West 230, 185
       //South 265, 225 = y cord + 40
       //East 305, 185

    if(FindBitmap(InfoManSymbol,myx, myy)) then
    begin
    AbleToFindBmps = 1;
    end; else
    AbleToFindBmps = 0;
    end;
    if(FindBitmap(SmithSymbol, myx, myy)) then
    begin
    AbleToFindBmps = 1;
    end; else
    AbleToFindBmps = 0;
    end;
    Mouse(myx, myy+5,0,0,true);

    end;

    procedure LetsLogin;
    begin
    Mouse(457, 290, 0, 0, true);
    Wait(2000);
    SendKeys(Username+chr(13));
    SendKeys(Password);
    Wait(2000);
    Mouse(304,325,0,0,true);
    Wait(6000);
    Mouse(392, 338, 0, 0, true);
    Wait(3000);
    end;

    procedure LetsLogout;
    begin
    Wait(1000);
    Mouse(645, 485, 0, 0, true);
    Wait(3000);
    Mouse(629, 377, 0 ,0 ,true);
    end;

    procedure GetAllBmps;
    begin
    InfoManSymbol := BitmapFromString(7, 10, 'z78DA333040006347' +
           '33370B3364D2000310238E4B8D010EBB885149891AEADA45AA4AE' +
           '2012E330185155263');
    SmithSymbol := BitmapFromString(9, 7, 'z78DA33300001130B132' +
           '76337032436B548030C80DF2E03A201A9EAC9D345AA0B890F0D00' +
           '16CA4D55');
    end;



    begin
    GetAllBmps;
    LetsLogin;
    Wait(4000);
    WalkToTrees;
    Wait(1000);
    LetsLogout;
    FreeBitmap(InfoManSymbol);
    end.


    The Line(s) of Error Are As Following
    AbleToFindBmps = 1; --- Line 53
    AbleToFindBmps = 0; --- Line 55
    AbleToFindBmps = 1; --- Line 59
    AbleToFindBmps = 0; --- Line 61

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

    Default

    SCAR Code:
    procedure WalkToTrees;
    begin
      HighestAngle;
      Wait(2000);
      MakeCompass('S');
      MakeCompass('N');
      Wait(1500);
      //Well, Your Character Is Always At The Cordinate 268, 170
      //North Square Is 270, 150 = y cord - 20
      //West 230, 185
      //South 265, 225 = y cord + 40
      //East 305, 185
      if (FindBitmap(InfoManSymbol, myx, myy)) then
      begin
        AbleToFindBmps := 1;
      end else
        AbleToFindBmps := 0;
      if (FindBitmap(SmithSymbol, myx, myy)) then
      begin
        AbleToFindBmps := 1;
      end else
        AbleToFindBmps := 0;
      Mouse(myx, myy + 5, 0, 0, True);
    end;

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

    Default

    Thank You
    That Did It

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Assignment expected in script
    By Rich in forum OSR Help
    Replies: 2
    Last Post: 07-26-2008, 05:03 PM
  2. Assignment expected in script
    By [S]paz in forum OSR Help
    Replies: 2
    Last Post: 01-06-2008, 12:51 PM
  3. Replies: 4
    Last Post: 11-16-2007, 03:13 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
  •