SRL Archive - First Scripts

[SRL4] [WC] Zeta's Maple Masher


Zeta

2007-09-22 19:57:52


Zeta's Maple Masher v0.6
-This script is still in a beta stage, I need testers!

What it does:
-Cuts maples in seers village and banks them.

Function list:
-Antiban
-Antirandoms
-Failsafes
-Multiplayer
-Entfinder (not sure if it works.)

Future Updates:
-Suggestions?

Instructions:
-Start in seers bank, axe weilded or in first slot.
-Low detail
-Highest brightness
-32-bit color mode
-Fill in DeclarePlayers and choose consts if you want.
-Press Play!

Please +rep if this script was useful to you. I know there are alot of bugs, so please post them here so I can try to fix them :). If something seems to be not working let it sit there for about 10 seconds and if it doesn't work still then stop the script.

Zeta

2007-09-24 21:27:22

40 views and no posts :( added multiplayer and made it work with official srl 4..

pkmage

2007-09-27 00:28:33

Nice I would try it on my skiller but it got banned *Not because of autoing* They fucked up on my billing and decided to ban me for their mistakes.
So, I am in the process of remaking a skiller.

-Btw
I dont know why you have Multi-player's
Most people don't even auto with members because they don't want their $5 gone

Zeta

2007-09-29 12:38:32

okay well test it out when you get a skiller going.. but i still need someone to test before i make a new version.. mostly need the multi-player tested..

HyperSecret

2007-09-29 13:33:17

you dont need to bring the openbank3 and radialwalk into the script they are included in srl…first off

you dont really need the playernext procedures…you also dont need to have the wait in between finding and clicking the tree…standards could use alittle work

Zeta

2007-09-29 18:15:50

well they took openbank3 out of srl.. i had a help thread about it.. i thought you posted it in, and its radial tolerance walk, if i get rid of it then my script doesnt work but ty for other advice

BobboHobbo

2007-09-29 18:32:08

I bet your radialwalk doesnt work because your looking for a single colour. what if that colour changes your stuffed right?

Zeta

2007-09-29 20:17:01

err, my radial walk does work, but it doesnt work if i dont have the radialtolerancewalk function in my script which hyper told me i dont need it

cwin

2007-09-29 20:50:02

looks great man, im gonna give it a go. ill let u know how it works

ojkid

2007-09-29 20:53:54

bit slow but good

matt_093

2007-09-29 21:29:03

i will have a bash and see how it works

Zeta

2007-09-29 22:40:11

thanks guys, let me know how it works!

Sk8boardinggit

2007-09-30 07:04:27

Hey. Just joined Srl-forums =] . I know a bit about scar. But I'm having a problem. I keep gettin this error '[Runtime Error] : Out Of Range in line 37 in script C:\Users\Ben\Desktop\Maplemasher.scar'. When i run the script i also get 'A script is trying to access the following file C:\Program Files\SCAR 3.12\ChatLog.txt. So i click always permit this file. but then I get the 'Runtime Error] : Out Of Range in line 37 in script C:\Users\Ben\Desktop\Maplemasher.scar' error. Any help?
Many thanks. Sk8boardinggit.

Zeta

2007-09-30 09:40:43

the chatlog.txt is messed up for some reason, it does that for everyone, and, i think you need to save the script into your scripts folder for it to work

Sk8boardinggit

2007-09-30 10:49:42

Ok. So this is what i have in the script.

const
Maple = 19058; //the colors of the maples
Maple2 = 16760;
Maple3 = 9548;
Tol = 10; //tolerance to find the maple
AntiBanAmount= 40; //Set this for the chance of Antiban to do something.
//40 is default, lower for more antiban, higher for less.

var
Loads:Integer;


procedure DeclarePlayers;
begin
HowManyPlayers := 0; //Number of players to use
NumberOfPlayers(HowManyPlayers); //Don't Touch
CurrentPlayer := 0; //Player to start with

Players[0].Name := 'Letinmax'; //Players username
Players[0].Pass := 'Fakepass'; //Players password
Players[0].Nick := 'etin'; //3-4 characters from players username(Lowercase and no spaces)
Players[0].Active := True; //Are you using this player
Players[0].Integers[0] := 100;//Loads For Player





But still i get
Runtime Error] : Out Of Range in line 30 in script C:\Program Files\SCAR 3.12\Scripts\Maple.scar
Any help?
Sk8boardinggit.

Zeta

2007-09-30 10:57:00

HowManyPlayers := 0; //Number of players to use

should be

HowManyPlayers := 1; //Number of players to use

Sk8boardinggit

2007-09-30 11:06:08

I tried that. Didn't work =[
I now get [Runtime Error] : Out Of Range in line 37 in script C:\Program Files\SCAR 3.12\Scripts\Maple.scar

Zeta

2007-09-30 11:16:05

um, try the new one i just posted, if you are only using one player, set the other players to false

Sk8boardinggit

2007-09-30 11:32:28

////////////////////\\\\\\\\\\\\\\\\\\\\\
/////////Zeta's Maple Masher v0.3\\\\\\\\\\\
//Big thanks to : Kevin Wolf, Town, and SantaClause\\
/////////////////////\\\\\\\\\\\\\\\\\\\\\\\\


program ZetasMapleMasher;

{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\Woodcutting.SCAR}

const
Maple = 19058; //the colors of the maples
Maple2 = 16760;
Maple3 = 9548;
Tol = 10; //tolerance to find the maple
AntiBanAmount= 40; //Set this for the chance of Antiban to do something.
//40 is default, lower for more antiban, higher for less.

var
Loads:Integer;


procedure DeclarePlayers;
begin
HowManyPlayers := 1; //Number of players to use
NumberOfPlayers(HowManyPlayers); //Don't Touch
CurrentPlayer := 0; //Player to start with

Players[0].Name := 'Letinmax'; //Players username
Players[0].Pass := 'Fakepass'; //Players password
Players[0].Nick := 'etin'; //3-4 characters from players username(Lowercase and no spaces)
Players[0].Active := True; //Are you using this player
Players[0].Integers[0] := 100;//Loads For Player


Players[1].Name := ''; //Players username
Players[1].Pass := ''; //Players password
Players[1].Nick := ''; //3-4 characters from players username(Lowercase and no spaces)
Players[1].Active := False; //Are you using this player?
Players[1].Integers[0] := 2;//Loads For Player

Players[2].Name := ''; //Players username
Players[2].Pass := ''; //Players password
Players[2].Nick := ''; //3-4 characters from players username(Lowercase and no spaces)
Players[2].Active := False; //Are you using this player?
Players[2].Integers[0] := 2;//Loads For Player
NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
end;

Ok this is it. Still aint working. New one? I only have access to First script and free for all script topics. =[
Anyways try and help me out =]
Ty, sk8boardinggit

Zeta

2007-09-30 11:35:43

its in my first post.. its an attachment

Sk8boardinggit

2007-09-30 11:56:35

Nope. Still don't help. I'm sorry about all this lol.
This is what i got it setup like
/////////////———————–/////////////
////////////Zeta's Maple Masher v0.3////////////
///////////————————-///////////
//////////—–Big thanks to…—–//////////
/////////—————————/////////
////////————-Town———–////////
///////—————————–///////
//////———–Santa_Clause——-//////
/////——————————-/////
////————–Kevin Wolf——–////
///———————————///
//———————————-//

{INSTRUCTIONS:
-Start in seers bank
-Fill out lines 22-56
-Low detail
-Highest brightness
-Logged in or out
-Axe weilded or not
-32-bit color mode
-Press play
-Get maples
-Post proggies!!}

program ZetasMapleMasher;
{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\Woodcutting.SCAR}

const
Maple = 19058; //the colors of the maples
Maple2 = 16760;
Maple3 = 9548;
Tol = 10; //tolerance to find the maple
AntiBanAmount= 40; //Set this for the chance of Antiban to do something.
//40 is default, lower for more antiban, higher for less.

var
Loads:Integer;


procedure DeclarePlayers;
begin
HowManyPlayers := 1; //How many players there are
NumberOfPlayers(HowManyPlayers); //Leave this alone
CurrentPlayer := 0; //The player to start with

Players[0].Name := 'Letinmax'; //Player's username
Players[0].Pass := 'Fakepass'; //Player's password
Players[0].Nick := 'etin'; //3-4 characters of player's username, no capitals or spaces
Players[0].Active := True; //Do you want to use this player?
Players[0].Integers[0] := 50; //Loads for player to do


Players[1].Name := '';
Players[1].Pass := '';
Players[1].Nick := '';
Players[1].Active := False;
Players[1].Integers[0] := 2;

Players[2].Name := '';
Players[2].Pass := '';
Players[2].Nick := '';
Players[2].Active := False;
Players[2].Integers[0] := 2;
NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
Writeln ('There are ' + Inttostr(HowManyPlayers)+ ' Players');
end;


But i'm getting this error now.
[Runtime Error] : Out Of Range in line 55 in script C:\Program Files\SCAR 3.12\Scripts\Zeta'sMapleMasher.scar

SuperScripter

2007-09-30 12:09:09

Good one try to add a procedure which cheaks if the axe is broken. SCince you have not ent functions.

#ss

HyperSecret

2007-09-30 14:16:16

From: Sk8boardinggit
////////////////////\\\\\\\\\\\\\\\\\\\\\
/////////Zeta's Maple Masher v0.3\\\\\\\\\\\
//Big thanks to : Kevin Wolf, Town, and SantaClause\\
/////////////////////\\\\\\\\\\\\\\\\\\\\\\\\


program ZetasMapleMasher;

{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\Woodcutting.SCAR}

const
Maple = 19058; //the colors of the maples
Maple2 = 16760;
Maple3 = 9548;
Tol = 10; //tolerance to find the maple
AntiBanAmount= 40; //Set this for the chance of Antiban to do something.
//40 is default, lower for more antiban, higher for less.

var
Loads:Integer;


procedure DeclarePlayers;
begin
HowManyPlayers := 1; //Number of players to use
NumberOfPlayers(HowManyPlayers); //Don't Touch
CurrentPlayer := 0; //Player to start with

Players[0].Name := 'Letinmax'; //Players username
Players[0].Pass := 'Fakepass'; //Players password
Players[0].Nick := 'etin'; //3-4 characters from players username(Lowercase and no spaces)
Players[0].Active := True; //Are you using this player
Players[0].Integers[0] := 100;//Loads For Player


Players[1].Name := ''; //Players username
Players[1].Pass := ''; //Players password
Players[1].Nick := ''; //3-4 characters from players username(Lowercase and no spaces)
Players[1].Active := False; //Are you using this player?
Players[1].Integers[0] := 2;//Loads For Player

Players[2].Name := ''; //Players username
Players[2].Pass := ''; //Players password
Players[2].Nick := ''; //3-4 characters from players username(Lowercase and no spaces)
Players[2].Active := False; //Are you using this player?
Players[2].Integers[0] := 2;//Loads For Player
NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
end;

Ok this is it. Still aint working. New one? I only have access to First script and free for all script topics. =[
Anyways try and help me out =]
Ty, sk8boardinggit


if your using one player and make the others false then your HowManyPlayers must = the number of players in your array…

so what you have there should be like this…

HowManyPlayers := 3; //Number of players to use
NumberOfPlayers(HowManyPlayers); //Don't Touch
CurrentPlayer := 0; //Player to start with

or do this…

program ZetasMapleMasher;

{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\Woodcutting.SCAR}

const
Maple = 19058; //the colors of the maples
Maple2 = 16760;
Maple3 = 9548;
Tol = 10; //tolerance to find the maple
AntiBanAmount= 40; //Set this for the chance of Antiban to do something.
//40 is default, lower for more antiban, higher for less.

var
Loads:Integer;


procedure DeclarePlayers;
begin
HowManyPlayers := 1; //Number of players to use
NumberOfPlayers(HowManyPlayers); //Don't Touch
CurrentPlayer := 0; //Player to start with

Players[0].Name := 'Letinmax'; //Players username
Players[0].Pass := 'Fakepass'; //Players password
Players[0].Nick := 'etin'; //3-4 characters from players username(Lowercase and no spaces)
Players[0].Active := True; //Are you using this player
Players[0].Integers[0] := 100;//Loads For Player

NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
end;

HowManyPlayers DOES NOT want to know how many ACTIVE players it wants to know how many players are in the ARRAY of players no matter if the active is true or false….if you want just HowManyPlayers := 1; then you need ^^ just one player in your players array…

Hope this help :D

Sk8boardinggit

2007-09-30 17:04:42

Oh i see. Its working now =D Ty very much

Zeta

2007-09-30 17:28:54

okay cool its working.. post a proggy when your done if you want :)

Sk8boardinggit

2007-10-01 11:14:23

Hey its working really well. Aint got a proggy I'll post one when i use it later again. I got an idea you could add to the script aswell. It doesn't detect the tree when it comes alive. Its broke my axe a couple of times now. Anything you could modify to help with this?

Zeta

2007-10-01 11:52:55

i could add a simple entfinder, and make it click the tree more

Zeta

2007-10-01 12:06:57

okay try it now, i tried a new main loop and hopefully it works better, if it doesnt i'm kind of screwed because i dont have my other one.. i also added a good ent finder and made it click more often..

Sk8boardinggit

2007-10-01 12:18:08

Good good. I had to modify the script to my needs. As it kept logging out my character, So i deleted the character log out/in progress, It works perfectly now. I'm testing the new ent finder as well at this current time.

Zeta

2007-10-01 13:07:57

okay, yeah its supposed to log you out after it does the number of loads you want but it logs out after one load sometimes..

Sk8boardinggit

2007-10-01 14:12:56

Yeh thats what kept happening. So i just modified it too my needs.

Sk8boardinggit

2007-10-02 03:11:39

Ok theirs a problem with the script now. I dunno whether it was because of an RS update or something but when the character is in the bank, it thinks that the closed bank booths with the wood screens are maples. It banks the maple logs and stays in the bank. In the log screen at the bottom on scar it says correctly walked to maples. Detecting maples. when obviously its hasn't. Any ideas?

7Jam

2007-10-02 18:03:31

Works fine buy will not bank. Looks like its searching for the bank but can't find it.

Sk8boardinggit

2007-10-03 03:00:45

Oh. I'll have to try it again in a sec. Btw 7Jam. It does find the bank eventually. Just give it a few mins sometimes.

Zeta

2007-10-04 19:42:35

yeah sometimes it doesn't find the bank because it looks for the symbol, and if your on a crowded world the bank symbol is covered.. the bankbooth finder isnt very good either..

Zeta

2007-10-07 04:17:56

okay guys i decided to keep working on this and theres a HUGE UPDATE!

-Better bank finding, uses radial tolerancewalk if it doesn't find symbol.
-Better bankbooth finding, modified it alot.
-Better chopping
-Antiban is improved (doesn't do after every click.)
-True/False for axe weilded or not is an actual thing now.

Sk8boardinggit

2007-10-07 05:02:20

Ok. I'll try it out when i buy membership. I'll reply with how well it works once i tested =]

(h3473r

2007-10-07 06:39:41

First off I would like to say nice script.
I have a problem though, when I run the script I get this error.

Failed when compiling
Line 377: [Error] (15259:46): Identifier expected in script C:\Program Files\SCAR 3.12\Scripts\Runescape\ZetasMapleMasher.scar

I have no idea what it means.

Naum

2007-10-07 07:15:15

Zeta good script but remember never use findnormal randoms and findfast randoms together.This is because sometimes findnormal randoms causes lag and because find fast randoms does the same as find normal randoms. I like your antiban thingy adding it to the const very clever idea.All in all good first script. Might want to think about recreating your proggie report. :)

->{Nauman}<-

(h3473r

2007-10-07 10:07:48

About the error i posted about earlier. I fixed it, it's working now.
The problem was the part where it says TimeRunning. It didn't have a ( so i added one before the R and it worked fine after that but it didn't show a Proggy Report.
(Before)
Writeln('~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!');
Writeln('~!~Zetas Maple Masher Proggy Report~!~!~');
Writeln('~!~Script has run for '+TimeRunning)+'~!~');
Writeln('~!~Did ' + IntToStr(Loads)+ ' loads.~!~~');
Writeln('~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!');

(After)
Writeln('~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!');
Writeln('~!~Zetas Maple Masher Proggy Report~!~!~');
Writeln('~!~Script has run for '+(TimeRunning)+'~!~');
Writeln('~!~Did ' + IntToStr(Loads)+ ' loads.~!~~');
Writeln('~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!');

Zeta

2007-10-07 14:10:07

yeah somehow a ( got deleted, it's fixed now

7Jam

2007-10-07 20:06:31

[Runtime Error] : Out Of Range in line 56 in script C:\Documents and Settings\Master\Local Settings\Temporary Internet Files\Content.IE5\RSXETCAA\ZetasMapleMasher[1].scar im gettingthis for some reason. The script ran fin about a week ago. Since then i updated my srl to SRL 4 Rev #5.
Could that be what is wrong with it?

Zeta

2007-10-08 00:09:13

you probably don't have your declare players set up right, post it and ill fix it for you

Positive19

2007-10-08 09:13:59

Awesome! Updated version lol.. Gonna have to try it out sometime tomorrow when I have time. The first one was great so Im really looking forward to this one. Ill be sure to give some feed back on your script after I run it =) Keep up the good work Zeta

Zeta

2007-10-08 19:41:52

thanks, i'll be releasing a slightly better version soon with a working ent finder, for now just get rid of the MyEnt procedure, it doesn't work

7Jam

2007-10-09 17:53:45

your right, i fixed the declare players and it werks great now! great script btw.

Positive19

2007-10-10 06:29:01

Well nothings perfect right? Hit and miss. First off, the banking is flawless now, no issues there, but with the new version I cant even walk to the maples. Dont know whats going wrong, but the script insists that its walked correctly to maples, when infact, its still standing in the bank not doing anything.


**Edit, I could just erase all of the above, but this might be a valid point to keep in mind.
The error I got was when I ran the script in the EliteSwitch window, when switching over to a regular browser it worked fine, GREAT Script Zeta :D

*** Second Edit, Just a note, perhaps in future versions you could look to include more anti randoms? As rare as some are, like the mime, it took me about 2 minutes to get one and from that point on the script spazzed and refused to talk to me :( Likewise with the surprise exam, ofcourse nothing has to be perfect, but when using a script revolving around maples I d think that most of us only have one account as we dont want to spend 5 dollars on each, so switching players wouldnt do much, and in this event it would just stop the auto from continuing.

Lord michie

2007-10-11 13:27:35

this is a realy good script well done :D

Mariuswbz

2007-10-11 17:06:01

Nice!
I will use soon :)

Zeta

2007-10-13 23:04:00

thanks for the feedback positive, one reason for the walking to maples problem is i heard theres problems with radial aid, but you said it was because you used it in an elite switch window but i dont see why that would matter, anyway +rep

Zeta

2007-10-14 11:40:32

v0.6 is out .. umm ent finder should work, added a ton of fail safes and writelns although i didn't really do some properly but none the less the script should still run better, oh i added a pin option..

Silent

2007-10-14 18:41:57

Ill test this for you…expecta proggy soon

Zeta

2007-10-14 18:46:03

k thanks :D

Silent

2007-10-14 19:01:53

hmm Well the script works well for the most part….I like the anti ban works very well. However i was only able to get one load and then it stopped when it opened up my bank…and it tried to switch players…the thing is it says it correctly banked when it just opened the bank and stood there. Other then that i have no complaints an excellent script good job!

My Proggy:
~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!
~!~Zetas Maple Masher Proggy Report~!~!~
~!~Script has run for 6 Minutes and 37 Seconds~!~
~!~Did 1 loads.~!~!~!~!~!
~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!~!

Viper8 3

2007-10-14 19:52:38

I"m about to try it out :D

Silent

2007-10-15 01:58:03

Ive ran the script several times now…each time the same thing happens.. It gets a load goes to the bank opens the bank and just sits there. It also says its banked correctly and tries to switch players, but im only using the one.

Zeta

2007-10-15 19:48:49

i'm not sure what the problem is, but when i tested it, it happened to me too.. umm..

Silent

2007-10-15 22:13:54

Yeah its weird…..Hmm ill give it a few more tests….

noahthepoo

2007-11-01 06:19:30

its not banking it walks away from trees and logs out any ideas

realrocker00

2007-12-02 08:44:54

is this up-to date? i need a maple masher :D

adzi

2007-12-08 20:00:37

working well?

knowmysteeez

2007-12-12 16:12:52

when i run it, it displays Compass Found in debug, and then does nothing. It just sits in the bank, never even walks out. I dont know what im doing wrong.

xxrobbiechaosxx

2007-12-12 17:49:34

^It does the same thing for me… :[^

xxrobbiechaosxx

2007-12-12 17:55:53

Anti randoms never work for me :[

^oops, I meant to edit that post^ my bad….