PDA

View Full Version : 2 In one



daddyproboot
01-09-2010, 02:15 PM
With scripting people concertrate on one skill at a time, for some time now i have been wondering what would happen to this community if we implemmented two scripts in one for example.

Woodcutting for one hour (Random times included)

Then suddenly change between areas for example

doing fishing in a different part of the map and actually walking there, or it could be fighting as well as doing banking procedures.

Would there be less bans seeming as less of us would be in the same spot at one time? It would also be beneficial to get more than one skill up.

Who would like to forward this idea and do something about it with me?

Frement
01-09-2010, 02:20 PM
Yeah, would be cool. I thought there were discussion about this like 2 years ago? I dunno... I think i could implement some mining + banking script to my wc + banking script..

daddyproboot
01-09-2010, 02:28 PM
2 years ago :P i havnt been on in a long time ha, not ina year infact. I mean making an entire new script from scratch with both of them implemented. Would confuse Jagex if it works that way anyhow im sure they have more awkward ways of catching us tbf. We would also get allot less randoms by multi tasking. It would seem more human like, we get bored of doing the same thing over and over am i correct well scripts dont why dont we make them like us ;)

Frement
01-09-2010, 02:44 PM
Yeah im currently making a script that cuts trees and if high level enough, oaks and then banks them. I thought it would make it more human like if it wouldnt ignore the oaks...i dunno.

daddyproboot
01-09-2010, 03:09 PM
Ill start on a fishing script for Karamja to bank at draynor this way the radial walking wouldnt be much. and it can switch between cutting trees and fishing every noew and again :D

Frement
01-09-2010, 03:20 PM
Would be cool. I allways thought fishing scripts are hard to make :P

daddyproboot
01-09-2010, 03:26 PM
// Scar 2.23 Divi
// Woodcutting and Fishing Script
// Created by (Daddyproboot)(Frement) Others
// Forms Included
// Radial Walking
// Banking
// Smart Included (true or false)
//
//
//
//
//


(Inlcudes here)


program Cutfish;

(Var's here )
(const's here)

Procedure Intro;
begin
end;

Procedure Progressreport;
begin
end;

Procedure Walkingfishthere;
Begin
end;

Procedure Walkingfishback;
begin
end;

Procedure Walkingtreethere;
begin
end;

Procedure Walkingtreeback;
begin
end;

Procedure Banking;
begin
end;

Procedure Findfish;
Begin
end;

Procedure Fishing;
begin
end;

Procedure Switch;
begin
end;

Procedure Findtree;
begin
end;

Procedure Cuttree;
begin
end;



Procedure Loops;
Begin
end;


begin
end.

Obviously with antiban/Anti randoms aswell. There will be a lot more procedures my guess is. There will also be forms what you think of that laylout any good? will make some code soon tho.

Frement
01-09-2010, 03:34 PM
Yeah i can design great graphics for the forms etc...you have msn? maybe you could pm it to me. Also dont start with banking procedure. if we gonna bank in draynor i have one almost finished.

0wn 4 skill
01-09-2010, 04:04 PM
I don't wish to get involved in this much but i'm loving how this idea is coming together! Its great to see a thread with people working together to achieve an ultimate goal. Keep at it guys.. :thumbsup:

daddyproboot
01-09-2010, 04:05 PM
Yes its luke_mcdonald@hotmail.co.uk, thats my coding msn lol not pesonal :p.
my personal is greeb_macca@hotmail.co.uk Im usually on either if you ned me and banking procedure ok then let me know when you have done it i need to start on the walking procedures now.

EDIT: Anybody is welcome to help by the way its a community which helps each other no need in taking glory. We are all good at different things thats why they should come together and create a good script yes?

0wn 4 skill
01-09-2010, 04:14 PM
Definitely! I encourage more people to join in on this and learn what you can. Its easier learning together :)

Tree Finder? :)

Function FindTree(var x,y: Integer): Boolean;
Var
TreeP: TPointArray;
TP: Tpoint;
Tree: T2DPointArray;
I, Times: Integer;
Begin

Times:=0;

If Not LoggedIn then Exit;

Case Random(4) of
0: MakeCompass('N');
1: MakeCompass('S');
2: MakeCompass('E');
3: MakeCompass('W');
end;

SetAngle(True);

ColorToleranceSpeed(2);
FindColorsSpiralTolerance(MSCX, MSCY, TreeP, {Tree Color}, MSX1, MSY1, MSX2, MSY2, 10);
Tree:= TPAtoATPAEx(TreeP, 10, 10);
for i := 0 to Length(Tree)-1 do

begin
TP := MiddleTPA(Tree[i]);
MMouse (TP.x, TP.y, 3, 3);
Inc(Times);
Wait(200+Random(100));
If IsUpText('Chop') then
begin
GetMousePos(x, y);
Result:= True;
Writeln('Tree found at X: '+inttostr(x)+' Y: '+inttostr(y));
ColorToleranceSpeed(1);
Exit;
end;
If Times = 8 then
Begin
Writeln('Not Found Tree, Exiting');
Exit;
end;

Wait(800+random(500));
end;
end;

Frement
01-09-2010, 04:26 PM
Is that your code?

0wn 4 skill
01-09-2010, 04:30 PM
Yeah, its old but still works I think :) try it for me please

Frement
01-09-2010, 04:32 PM
Yeah..will do.

Mr. Doctor
01-09-2010, 04:44 PM
I was was currently making one in private for a big surprise (See Signature). :(

daddyproboot
01-09-2010, 06:23 PM
Awhhhh Well maybe you should contribute or release it when we do :P, would give jagex something they havnt seen before ;)

daddyproboot
01-10-2010, 01:10 AM
Procedure Walkingfishthere;
Var
Draynorcolour, Portcolour:integer;
Begin
Draynorcolour := 2253931 or 6579561
Portcolour := 6780027 or 1850709
begin
MakeCompass('N');
if RadialWalkTolerance(Draynorcolour, 38, 50, 70, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
if RadialWalkTolerance(Draynorcolour, 320, 337, 70, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
if RadialWalkTolerance(Draynorcolour, 340, 360, 80, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
if RadialWalkTolerance(Draynorcolour, 266, 230, 74, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
if RadialWalkTolerance(Draynorcolour, 229, 235, 65, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
if RadialWalkTolerance(Draynorcolour, 260, 270, 72, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
if RadialWalkTolerance(Draynorcolour, 190, 285, 70, 1, 1, 7) then
Wait((400)+Random(300));
Flag;

if RadialWalkTolerance(Draynorcolour, 146, 150, 69, 1, 1, 7) then
Wait((400)+Random(300));
flag
if RadialWalkTolerance(Portcolour, 160, 170, 65, 1, 1, 7) then
Wait((400)+Random(300));
Flag;
Wait ((4000)+Random(300))
end;
end;
Can somebody test that Walking? its from First Bankslot closest to entrance in draynor to the brown docks on minimap at Sarim just wanna make sure theres no bugs or messups with this :) Ive tested it a few times now. Just wanna make sure veryone else is ok with it, I know its a long way round butahh well it was easier than gettin grass colours right 0_o. If anybody else has a better procedure let me know please