Results 1 to 14 of 14

Thread: Help with superheater script plz

  1. #1
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Help with superheater script plz

    Im new to scripting and i decided to make a superheater. so far i got it to click on the spell book but for some reason it wont go down and click the superheat icon...here is what the script looks like so far. i know it is like the worst script ever so far but im gonna work on it

    program SuperHeater;
    {.include SRL\SRL.scar}

    begin
    Movemouse(741,187)
    wait(1000+random(300))
    clickmouse(741,187,true)


    begin
    Movemouse(673, 314)
    clickmouse(741,187,true)
    end;

    end.

  2. #2
    Join Date
    Apr 2007
    Posts
    220
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    NEVER use movemouse and clickmouse. They cant you banned in no time. In SRL there is a function to open the spell book and also to cast a spell so you just need to put the funtions into your script and your almost done

  3. #3
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Fearlesssss View Post
    NEVER use movemouse and clickmouse. They cant you banned in no time. In SRL there is a function to open the spell book and also to cast a spell so you just need to put the funtions into your script and your almost done
    and how would i put the functions in...

  4. #4
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    You need to put:
    SCAR Code:
    {.include SRL\SRL.scar}
    at top of script
    then use things like
    SCAR Code:
    MMouse(x,y,rx,ry)
    and
    SCAR Code:
    Mouse(x,y,rx,,ry,true)

    They are safe to use and dont get tou banned.
    x,y, are cords to click
    rx,ry is a randomness
    Like for your first click do:
    SCAR Code:
    MMouse(741,187,5,5)

  5. #5
    Join Date
    Apr 2007
    Posts
    220
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You can do
    SCAR Code:
    GameTab(7)
    (I think its the 7th from the upperleft.) to open the spell book.
    Put this under "program new(or whatever is your name);":
    SCAR Code:
    {.include SRL/SRL/Skill/Magic.scar}
    But you need to have SRL installed for this ofcourse otherwise what are you waiting for??
    Then you can do this funtion. Example:
    SCAR Code:
    Cast('Lumbridge Teleport');
    This will cast lummy tele.. This rest of the teleports you can see by opening the Magic.scar include and scroll down to the funtion Cast(spell: string);

    EDIT: And you will probarly need this include too. You need it for everything btw
    SCAR Code:
    {.include SLR/SRL.scar}

  6. #6
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default think im still doing something wrong lol

    here is what i changed it to....




    program SuperHeater;
    {.include SRL\SRL.scar}

    begin
    MMouse(741,187,5,5)
    wait(1000+random(300))
    Mouse(741,187,5,5)
    end;


    begin
    MMouse(672,312,5,5)
    wait(1000+random(300))
    Mouse(672,312,5,5)
    end;


    begin
    Movemouse(584,228)
    wait(1000+random(300))
    clickmouse(584,228,true)

    end.

    and i get this error
    Line 8: [Error] (17675:1): Invalid number of parameters in script

  7. #7
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default k tried what fearlessss said

    program SuperHeater;
    {.include SRL\SRL.scar}
    {.include SRL/SRL/Skill/Magic.scar}

    begin
    GameTab (7)

    end;


    begin
    Superheat Item

    end.


    and i get
    line 8: [Error] (18383:4): period ('.') expected in script

  8. #8
    Join Date
    Apr 2007
    Posts
    220
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    program SuperHeater;
    {.include SRL\SRL.scar}

    Procedure one; //You must split your script up in procedures..
    begin
    MMouse(741,187,5,5) // Here you let it randomly move a few pixels away
    wait(1000+random(300))//from the real point so.
    Mouse(741,187,0,0) //This shouldn't be another5 pixels away but on the same
    end;                    //point.

    Procedure two;//same
    begin
    MMouse(672,312,5,5)
    wait(1000+random(300))
    Mouse(672,312, 0, 0) //Here the same.. not 5,5 cuz it alreaddy move a bit
    //                           random. So 0, 0
    end;
     
    Procedure three;//same
    begin
    MMouse(584,228, 3, 3) //Make this MMouse
    wait(1000+random(300))
    Mouse(584,228, 0, 0, true)
    end; //You forgot this end.

    begin //And you forgot the begin of the mainloop..
    one; // So here you say which procedures you want to run
    two;// and you run this one
    three; //and after two you run three;
    end.

  9. #9
    Join Date
    Apr 2007
    Posts
    220
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    program SuperHeater;
    {.include SRL\SRL.scar}
    {.include SRL/SRL/Skill/Magic.scar}

    procedure spellbook;//split prgram up into procedures.
    begin
    GameTab (7) //<< this is right
    end;

    procedure CastTheSpell;
    begin
    Cast('Superheat Item'); //it must be like this like i said..
    end.

    //You forgot your mainloop. Here you say which procedures you wanna run
    begin
    SpellBook;
    CastTheSpell;
    end.

  10. #10
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default AWESOME 1 more thing

    heres what it looks..i would like to make it do a whole inv instead of just the first inv slot...and i would like it to go back to the bank slot insert that load and withdraw another load. i no i am asking for a lot of help....fearlesssss you are awesome if this is ever good enough to release im going to credit you.tyvm.


    program SuperHeater;
    {.include SRL\SRL.scar}
    {.include SRL/SRL/Skill/Magic.scar}


    procedure spellbook;//split prgram up into procedures.
    begin
    GameTab (7) //<< this is right
    end;

    procedure CastTheSpell;
    begin
    Cast('Superheat Item'); //it must be like this like i said..
    end;

    Procedure three;//same
    begin
    MMouse(584,228, 3, 3) //Make this MMouse
    wait(1000+random(300))
    Mouse(584,228, 0, 0, true)
    end; //You forgot this end.

    //You forgot your mainloop. Here you say which procedures you wanna run
    begin
    SetUpSRL;
    SpellBook;
    CastTheSpell;
    three;
    NEWLINE:='';
    end.

  11. #11
    Join Date
    Apr 2007
    Posts
    220
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Here I updated your script.. I dunno if it works I haven't tried it out. Here it is:
    SCAR Code:
    program SuperHeater;
    {.include SRL\SRL.scar}
    {.include SRL/SRL/Skill/Magic.scar}

    const
    ItemName= 'ore'; //This is the name of the thing you want to superheat

    //This is a funtion to find a item in a inventory..
    {*******************************************************************************
    function FindItemName(Name: String): Boolean;
    By: based off PPLSUQBAWLZ's InventoryCount
    Description: Finds first item with  name in inventory.
    *******************************************************************************}


    function FindItemName(Name: string): Boolean;
    var
      i, e: Integer;
    begin
      GameTab(4);
      while (i < 6) do
      begin
        if (i = 5) and (e < 8) then
        begin
          i := 0;
          e := e + 1;
        end;
        if (FindColor(x, y, 65536, (571 + 47 * i), (215 + 36 * e), (601 + 47 * i),
          (245 + 36 * e))) then
        begin
          MMouse(x, y, 0, 0)
            if (IsUpText(Name)) then
          begin
            Result := True;
            break;
          end;
        end;
        i := i + 1;
      end;
    end;

    procedure spellbook;
    begin
    GameTab (7)
    end;

    procedure CastTheSpell;
    begin
    Cast('Superheat Item');
    end;

    Procedure ClickTheItem;
    begin
      if(FindItemName(ItemName))then //This searches for the item to superheat
      begin
        MMouse(x, y, 3, 3);            //This moves the mouse
      end;
      if(IsUpText('uperheat'))then   //This checks if the text on the upper left corner says superheat
      begin
        Mouse(x, y, 0, 0, true);              //if its says superheat it clicks.
      end;
    end;

    begin
    SetUpSRL;
    SpellBook;
    repeat    //This lets the script repeat
    CastTheSpell;  //Clicks superheat ore
    ClickTheItem;  //Clicks on the item
    until(not(FindItemName(ItemName))) //until SCAR doesnt finds the item you want to superheat
    //NEWLINE:='';    //This is not filled in so I let SCAR ignore it cuz else you get an error.
    end.
    Hope it works

  12. #12
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    fearlesssss when i tried your try out it went clicked the book, then the spell,...but then it would just hover over the iron ore then repeat...this one i messed around with works when it feels like it lol.. it will sometimes just go to the top left corner and sometimes it will actually click the ore then some..when it does that it most of the time repeats.. well here is what i did idk if i did it right lol


    SCAR Code:
    program SuperHeater;
    {.include SRL\SRL.scar}
    {.include SRL/SRL/Skill/Magic.scar}

    const
    LoadsToDo= 1; //This is the name of the thing you want to superheat

    var
    LoadsDone :integer;

    procedure spellbook;
    begin
    GameTab (7)
    end;

    procedure CastTheSpell;
    begin
    Cast('Superheat Item');
    end;

    procedure ClickItem;
    begin
    if(FindColor(x,y,5074569,556,213,734,460))then
    MMouse(x,y,0,0);
    Mouse(x,y,0,0,true);
    end;

    begin
    SetUpSRL;   //This lets the script repeat
    SpellBook;
    Repeat
    CastTheSpell;  //Clicks superheat ore
    ClickItem;
    until (not(FindColor(x,y,2174282,556,213,734,460)))
    LoadsDone := 0
    {NEWLINE:='';}
    end.

  13. #13
    Join Date
    Jun 2006
    Location
    New Zealand
    Posts
    285
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    The one Fearlesssss posted should work. Maybe just remove the IsUpText('uperheat').
    Also: did you drag cross-hair?
    Huehuehuehuehue

  14. #14
    Join Date
    Dec 2006
    Posts
    51
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    yea i dragged crosshair....ill try again in lil

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Help Superheater?
    By joshdabest01 in forum OSR Help
    Replies: 10
    Last Post: 11-29-2008, 11:22 PM
  2. Superheater
    By G-man in forum RS3 Outdated / Broken Scripts
    Replies: 0
    Last Post: 10-04-2008, 06:11 PM
  3. Ore Superheater
    By Parkey in forum RS3 Outdated / Broken Scripts
    Replies: 3
    Last Post: 05-22-2007, 07:11 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
  •