Results 1 to 7 of 7

Thread: Final Edits...

  1. #1
    Join Date
    Jan 2007
    Posts
    248
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Final Edits...

    Well I've gotten somewhat far in an Alpha version of a script, but I get an error I have no Idea in how to fix.
    PHP Code:
    program PowerMiner;
    {.include 
    SRL/SRL.scar}

    //~Basic Functions of the Godfather Inc. Power Miner VERS. Alpha~
    //IMPORTANT:= low detailed 32 bit colors
    //Have mouse over rock desired to mine within 10 seconds of starting script
    //Rimmington Rocks NOT reccomended~
    //Report bugs/glitches to dub_edit@yahoo.com
    //Known Glitches: No Anti Randoms (will come in beta)
    {============Updates Expected============)
    ~Use 
    some SRL includes
    ~Anti Randoms in Beta Version
    ~A progress report
    }
    {----------
    BeginOfSetup----------}
    const
    nextrock2800//Miliseconds till begin mining next rock? (1000 = 1 second)
    // Press CTRL+ALT+S to stop script
    {----------end of setup----------}
    var 
    rockmined,xR,yR,x1,y1integer;

    procedure ClickHuman(x,yIntegerLeftBoolean);
    begin
      HoldMouse
    (x,y,left);
      
    Wait(20+random(16));
      
    ReleaseMouse(x,y,left);
    end;

    Procedure GetRockColor(rockminedinteger);
    begin
    wait
    (10000)
    rockmined:= GetColor(x1,y1);
    //Mining Routine *********************** By TheGodfather
    begin
    repeat
    FindColor
    (xR,yR,rockmined,30,20,485,315);
    MMouse(xR,yR,4,4)
    ClickHuman(xR,yR,true);
    wait(nextrock)
    until(false)
    end;
    begin
    setupsrl
    ;
    MouseSpeed:= 8;
    end;
    end
    The error calls for a semicolon to be placed, but the lines it gives are ridiculously high. help would be appreciated highly.

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

    Default

    If the line it gives is ridiculously high I'm guessing its in SRL, if your script doesn't go that high.... Please give as much info as you can the exact error if you don't mind
    SUMMER BREAK be back when I want to

  3. #3
    Join Date
    Jan 2007
    Posts
    248
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by whales View Post
    If the line it gives is ridiculously high I'm guessing its in SRL, if your script doesn't go that high.... Please give as much info as you can the exact error if you don't mind

    The error i get is....

    [Error] (17708:4): Semicolon (';') expected...
    I get a SYNTAX error when I dont add the (false) to until(false).
    I think its odd.
    {note: ill keep it at until(false) until I see the mining procedure works}

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

    Default

    SCAR Code:
    program PowerMiner;
    {.include SRL/SRL.scar}

    //~Basic Functions of the Godfather Inc. Power Miner VERS. Alpha~
    //IMPORTANT:= low detailed 32 bit colors
    //Have mouse over rock desired to mine within 10 seconds of starting script
    //Rimmington Rocks NOT reccomended~
    //Report bugs/glitches to dub_edit@yahoo.com
    //Known Glitches: No Anti Randoms (will come in beta)
    {============Updates Expected============)
    ~Use some SRL includes
    ~Anti Randoms in Beta Version
    ~A progress report
    }

    {----------BeginOfSetup----------}
    const
    nextrock= 2800; //Miliseconds till begin mining next rock? (1000 = 1 second)
    // Press CTRL+ALT+S to stop script
    {----------end of setup----------}
    var rockmined,xR,yR,x1,y1: integer;

    procedure ClickHuman(x,y: Integer; Left: Boolean);
    begin
      HoldMouse(x,y,left);
      Wait(20+random(16));
      ReleaseMouse(x,y,left);
    end;

    Procedure GetRockColor(rockmined: integer);
    begin
    wait(10000)
    rockmined:= GetColor(x1,y1);
    {End; put this here this is a procedure}

    //Mining Routine *********************** By TheGodfather
    begin
    repeat
    FindColor(xR,yR,rockmined,30,20,485,315);
    MMouse(xR,yR,4,4)
    ClickHuman(xR,yR,true);
    wait(nextrock)
    until(false)
    end;
    begin
    setupsrl;
    MouseSpeed:= 8;
    end;
    end.


    Im tired as hell but if your up I recommend going through just about every SRL function and procedure, related to your script, and memorizing them... Do that or don't try to make a script of this kind yet....

  5. #5
    Join Date
    Jan 2007
    Posts
    248
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Well, you see here is that the shit thing is that I only use the MoveMouse from SRL MMouse..... The rest is pure ol Scar. Thats why Im soo stumped xD

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

    Default

    Ok well I am about to go to bed but I am going to throw everything out there for you you decipher it as you please...

    You need to use BMPs for your rock then possibly use autocoloring.... You need anti randoms and anti ban.... You need repeating loops and so much more but try to work with what I said... And don't forget your not making the first ever miner/powerminer. Reference to more advanced scripters if there doing it right then they have what you need, so look at their work.
    SUMMER BREAK be back when I want to

  7. #7
    Join Date
    Jan 2007
    Posts
    248
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I guess Ima have to restart making a power miner from scratch.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Final Fantasy & for PS#
    By StrikerX in forum Gaming
    Replies: 10
    Last Post: 06-01-2008, 08:22 PM
  2. Final Four
    By King of the Nites in forum Discussions & Debates
    Replies: 13
    Last Post: 04-13-2008, 03:23 AM

Posting Permissions

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