SRL Archive - First Scripts

Chop&Burn by Maraizzos


marpis

2008-11-09 13:00:35

Chop&Burn by Maraizzos - version 2.1

What does it do?
- Atm. Chops only regular trees, not oaks nor willows etc…
- Right after chopping it burns the logs
- No banking, this script is just for leveling :)
- Counts the number of logs burned, but its not exact (dunno how to make it exact)


SUGGESTION: HAVE MORE THAN 2 AXES WITH YOU!
MUST HAVE TINDERBOX IN THE 1ST SLOT!



Credits:
- Sand Storm
- R1ch4


Test it and tell me how it works! :)
my best prog for now is 202 logs burned in about 1 hour and 45 minutes, and i had set WoodToBurn to 200. Also 1 time i had burned 200 logs and the script had succesfully noticed 7 randoms in 1,5 hours :) So it does do the randoms too

Sandstorm

2008-11-09 13:04:01

Personally, I prefer DTM's to BMP's. Your choice.

 if FindBitmapIn(log, x, y, 546, 203, 752, 465) then


You have SRL in your script, so you can just do this:

 if FindBitmapIn(log, x, y, MIX1, MIY1, MIX2, MIY2) then


Coordinates are not suggested, because they can change for different people. What are you trying to click using this line?

Mouse(627, 85, 20, 20, true);


Instead of this:

FindObj(x, y, 'hop down Tree', TreeColor, 30)then

I suggest this:


FindObjCustom(x, y, ['hop', 'own', 'ree'], [TreeColor1, TreeColor2, TreeColor3], 10)then

So that it can use three colors(or more!) instead of one.

I just did a quick look over, there's probably more that can be improved.

~Sandstorm

marpis

2008-11-09 13:12:57

1: I'll take a look at that
if FindBitmapIn(log, x, y, MIX1, MIY1, MIX2, MIY2) then

(I tried exactly that function, but it just logs out after chopping. What are those MIX1, MIY1, MIX2, MIY2?)

2: Mouse(627, 85, 20, 20, true);
Here im trying to (propably bad idea?) walk away from the campfire, if standing on one. Didn't come up with anything better than this :S


3: I'll add more colors there :) Thanks for hint!
Colors added!

Rich

2008-11-09 13:37:50

MI : Main inventory
MS : Main screen
MC : Main chat
MM : Mini-map

So basically, if I had a script with a Yew Longbow DTM, and I wanted to find it in the inventory, I would do:

if FindDTM(YewLong, X, Y, MIX1, MIY1, MIX2, MIY2) then
DoStuff;

Get it?

marpis

2008-11-09 13:42:54

From: R1ch4
MI : Main inventory
MS : Main screen
MC : Main chat
MM : Mini-map

So basically, if I had a script with a Yew Longbow DTM, and I wanted to find it in the inventory, I would do:

if FindDTM(YewLong, X, Y, MIX1, MIY1, MIX2, MIY2) then
DoStuff;

Get it?


Thanks! Just doesn't seem to work!
What's wrong here:
 if FindBitmapIn(log, x, y, MIX1, MIY1, MIX2, MIY2) then
begin
MouseItem(1, true);
etc etc etc...
When i had there
FindBitmapIn(log, x, y, 546, 203, 752, 465)
it worked for me.

Rich

2008-11-09 13:47:11

What's the error that you're getting?

marpis

2008-11-09 13:54:14

No error, just log out
edit:
I tried with FindBitmapIn(log, x, y, 546, 203, 752, 465) again and now even that doesn't work?! woot

Rich

2008-11-09 14:04:45

I'll check back in a few minutes, I've got dinner now…:eek:

EliteHacker

2008-11-09 22:47:59

Oh, Looks like a good script, i will run it when i have time :)
I think that it will be a pretty useful script. Good Job.


\±/EliteHacker\±/

in2it

2008-11-10 01:37:40

Yeah this script is very useful and will be good for lvling skillers in 2 skills at once Good Job :D