SRL Archive - First Scripts

SUPER_HEATER - Steel Bars

This is my first script its not the best but i hope to learn form it and make it better since it is a way of getting your smelting and magic levels up as well as making money



Some things i need help with
-Keeping the script going after one load
- After Clicking the superheat spell is clicks way to fast on the iron ore
-Standards
-Benefits of changing bitmaps to dtms
-Player array how to add
-Anti Randoms
-Anti Ban



Have your nats in your 1st inventory and a fire staff wielded
also your iron ore in 1st inventory and coal in 2nd

Anyone who tests this out or gives me feedback thank you :)

I need all the help i can get

Your standards could use some work, but it looks like it's functional. Good job, keep it up ;)

EDIT: I fixed your standards, but I didn't add or take anything from the script. You need to free the bitmaps once you're done using them. But I attached the corrected one. You need to add Antiban and Antirandoms eventually and a declare players when you do. Keep it up ;)

~Camo

Looks pretty good for a first script :)

And as you said you needed a little help, here's some :

-Keeping the script going after one load

Well that's an easy one. You need to but the Super procedure in the Repeat part of the mainloop ;)
Like so:

 LoadBitMap;

 Repeat
 WithdrawOre;
 super;
 Bank;
 until false 

- After Clicking the superheat spell is clicks way to fast on the iron ore


Another easy one, you need to add a little longer wait times ;)
Like so:

FindBitmapToleranceIn(Superheat, x, y, 680, 291, 701, 312, 3);
      ClickMouseSpline(x, y, 3, 3, True);
  Wait(100 + random(75));
     FindBitmapToleranceIn(Iron, x, y, 554, 209, 730, 460, 5);
    MoveMouseSpline(x, y, 5, 5);
    wait(100 + random(75));
     IsUpText('ron')
      ClickMouseSpline(x, y, 5, 5, True);
      Wait(100 + random(75));

As for the antirandoms and Antiban, read a few tutorials, and you'll be fine ;)

~Sir

thankyou for your help i' ve made a few changes the two thing i really want help with atm is, after it clicks superheat it moves way to fast to clicking the ore even thou i set mouse speed 10?

and any good links to putting fail safes into my script thankyou

From: joshdabest01
thankyou for your help i' ve made a few changes the two thing i really want help with atm is, after it clicks superheat it moves way to fast to clicking the ore even thou i set mouse speed 10?

and any good links to putting fail safes into my script thankyou

Try this:

MouseSpeed := RandomRange(13, 16);

As for failsafes, go Here.

Hope this helps.

~Camo

for this line of code

Begin
i:= 0;
Wait(25 + random(50));
ClickMouseSpline(740, 180, 5, 5, True);
repeat
MouseSpeed := RandomRange(13, 16);
FindBitmapToleranceIn(Superheat, x, y, 680, 291, 701, 312, 3);
ClickMouseSpline(x, y, 3, 3, True);
Wait(100 + random(75));
FindBitmapToleranceIn(Iron, x, y, 554, 209, 730, 460, 5);
MoveMouseSpline(x, y, 5, 5);
Wait(100 + random(75));
IsUpText('ron')
ClickMouseSpline(x, y, 5, 5, True);
Wait(100 + random(75));
i:= i + 1;
until(i >= 9);
End;

sometimes is presses supercast b4 its back on speel page i want there to be a bit of a wait after it clicks the ore

how do i do that?

First of all use *scar* tags :) and explain exactly what you are confused about, I don't understand. But this is what it should look like.

Begin
  i:= 0;
  Wait(25 + random(50));
  ClickMouseSpline(740, 180, 5, 5, True);
  repeat
    MouseSpeed := RandomRange(13, 16);
    FindBitmapToleranceIn(Superheat, x, y, 680, 291, 701, 312, 3);
    ClickMouseSpline(x, y, 3, 3, True);
    Wait(100 + random(75));
    FindBitmapToleranceIn(Iron, x, y, 554, 209, 730, 460, 5);
    MoveMouseSpline(x, y, 5, 5);
    Wait(100 + random(75));
    IsUpText('ron')
    ClickMouseSpline(x, y, 5, 5, True);
    Wait(100 + random(75));
    i:= i + 1;
  until(i >= 9);
End;

~Camo