• Log in or sign up for an account here: https://www.sythe.org/login

auto firemaker script

Status
Not open for further replies.

cocoapuff

Forum Addict
Joined
Mar 14, 2008
Sythe Gold
0
Messages
264
hi this is my first script for runescape..well here is the script...:D

{ -----FIRE-----
------by cocoapuff-------

start in draynor village bank screen open, logs what u want to burn in banks first slot and
and tinderbox in inventorys first slot
}
begin

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);

ClickMouse(95,85,true);
wait(500);
//------------------------------------
MoveMouse(465,47);
wait(200);

ClickMouse(465,47, true);
wait(2000);
ClickMouse(596,92, true);
wait(2500);

//rivi1
MoveMouse(590,252);
wait(200);
ClickMouse(590,252, true);
wait(300);


MoveMouse(640,249);
wait(200);
ClickMouse(640,249, true);
wait(10000);

//---------------------------
MoveMouse(596,249);
wait(200);
ClickMouse(596,249, true)
wait(300);

MoveMouse(675,249);
wait(200);
ClickMouse(675,249, true);
wait(10000);

//--------------------------
MoveMouse(596,252);
wait(200);
ClickMouse(596,252, true)
wait(300);

MoveMouse(717,249);
wait(200);
ClickMouse(717,249, true);
wait(10000);

//-------------------------------

//rivi2
MoveMouse(590,288);
wait(200);
ClickMouse(590,288, true);
wait(300);

MoveMouse(590,252);
wait(200);
ClickMouse(590,252, true);
wait(10000);

//-------------------------
MoveMouse(640,288);
wait(200);
ClickMouse(640,288, true)
wait(300);

MoveMouse(596,252);
wait(200);
ClickMouse(596,252, true);
wait(10000);

//--------------------------
MoveMouse(673,288);
wait(200);
ClickMouse(673,288, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);

//-------------------
MoveMouse(717,288);
wait(200);
ClickMouse(717,288, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);



//rivi3
MoveMouse(590,252);
wait(200);
ClickMouse(590,252, true);
wait(300);

MoveMouse(585,325);
wait(200);
ClickMouse(585,325, true);
wait(10000);


MoveMouse(640,323);
wait(200);
ClickMouse(640,323, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(673,323);
wait(200);
ClickMouse(673,323, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(717,323);
wait(200);
ClickMouse(717,323, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


//rivi4
MoveMouse(590,252);
wait(200);
ClickMouse(590,252, true);
wait(300);

MoveMouse(585,365);
wait(200);
ClickMouse(585,365, true);
wait(10000);


MoveMouse(640,365);
wait(200);
ClickMouse(640,365, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(673,363);
wait(200);
ClickMouse(673,363, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(717,363);
wait(200);
ClickMouse(717,363, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);



//rivi5
MoveMouse(590,393);
wait(200);
ClickMouse(590,393, true);
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(596,252);
wait(200);
ClickMouse(596,252, true)
wait(300);

MoveMouse(640,400);
wait(200);
ClickMouse(640,400, true);
wait(10000);


MoveMouse(673,393);
wait(200);
ClickMouse(673,393, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(717,393);
wait(200);
ClickMouse(717,393, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);



//rivi6
MoveMouse(590,434);
wait(200);
ClickMouse(590,434, true);
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(640,434);
wait(200);
ClickMouse(640,434, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(673,434);
wait(200);
ClickMouse(673,434, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(717,434);
wait(200);
ClickMouse(717,434, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);



//rivi7
MoveMouse(590,469);
wait(200);
ClickMouse(590,469, true);
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(640,466);
wait(200);
ClickMouse(640,466, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(673,466);
wait(200);
ClickMouse(673,466, true)
wait(300);

MoveMouse(585,252);
wait(200);
ClickMouse(585,252, true);
wait(10000);


MoveMouse(717,466);
wait(200);
ClickMouse(717,466, true)
wait(300);

MoveMouse(585,252);
wait
 
oh yeah and heres a draynor willow woodcutting and blanking script also for got it... here it is =)
 
// Draynor Willow Cutter By ---cocoapuff---

// > Version History
// v1.0 - Initial release
// v1.1 - Added anti-randoms and fixed up a lot of stuff

// > Setup
// Start in Draynor bank or between the willows.
// Have axe equiped or in inventory, go to the setup of this
// script, fill it in and press start.

// > Known Bugs
// The axehead fixer isn't working properly
// Ent finder needs to be fixed

// > Note
// This script does NOT have anti-randoms, this version is
// only released as a foretaste of how the 'full' version will
// be. It will be buggy, and please track it when you run it.
// I am not responsible in any way.

// > Copyright
// You are allowed to copy pieces out of this script and use
// them in your own scripts. Just give me some credits.

program WillowCutter;
{.include sslibrary.txt}
{.include par.txt}
{.include boxbreaker.txt}
var mx,my,axecolor,WillowEnt1,WillowEnt2:integer;

const
// > Setup
username = '';
password = '';
EquipAxe = false; //I suggest to keep it false, but true will work
SearchHead = 5; //How many times should it look for axe head
LampSkill = 'woodcutting';
// > End Setup

TreeColor1 = 1857608;
TreeColor2 = 1978416;
BankSymbol = 3060683;

procedure ToBank;
begin
if(FindColorSpiral(mx,my,BankSymbol,606,5,725,118))then
begin
Mouse(mx,my+2,2,2,true);
Flag;
end else
begin
Logout;
Writeln('Logged out - Couldn`t find bank symbol');
end;
end;

procedure ToTrees;
var rand: integer;
begin
rand:= random(3);
if(rand=1)then
begin
Mouse(617,116,4,4,true);
Flag;
Wait(100+random(200));
end;
if(rand=2)then
begin
Mouse(638,143,4,4,true);
Flag;
Wait(100+random(100));
end else
begin
Mouse(637,119,4,4,true);
Flag;
Wait(100+random(100));
end;
end;

procedure CheckLeveled;
begin
if(GetColor(54,418)=3030098) and (GetColor(213,439)=16711680)then
begin
Writeln('Congratulations, you just advanced a woodcutting level');
Mouse(252,439,4,4,true);
end;
end;

function HeadGone:boolean;
begin
if(EquipAxe)then
begin
GameTab(5);
if(not(GetColor(597,295)=axecolor))then
begin
result:=true;
end;
end else
begin
if(not(GetColor(591,221)=axecolor))then
begin
result:=true;
end;
end;
end;

function FindEnt:boolean; //From HatlessCow's Seers Maple Cutter (Modified)
var wx,wy: integer;
begin
if(FindBitmapToleranceIn(WillowEnt1,wx,wy,5,5,514,336,10)) or (FindBitmapToleranceIn(WillowEnt2,x,y,5,5,514,336,10))then
begin
Mouse(648,84,0,0,true);
result:=true;
end;
end;

procedure GetHeadColor;
begin
if(EquipAxe)then
begin
GameTab(5);
if(not(GetColor(588,301)=942206))then
begin
GameTab(4);
Wait(100+random(50));
Mouse(582,216,11,6,true);
GameTab(5);
Wait(100+random(50));
axecolor:=GetColor(597,295);
end else
begin
axecolor:=GetColor(597,295);
end;
end else
begin
GameTab(4);
axecolor:=GetColor(591,221);
end;
end;

Procedure PickUpHead;
var hx,hy,i: integer;
begin
if(not(EquipAxe))and(GetColor(619,222)=65536)then
begin
Mouse(622,224,10,10,false);
Wait(150+random(100));
GetMousePos(hx,hy);
Mouse(hx,hy+42,0,0,true);
end;
if(EquipAxe)and(GetColor(577,222)=65536)then
begin
GameTab(4);
Mouse(579,223,10,10,false);
Wait(150);
GetMousePos(hx,hy);
Mouse(hx,hy+42,0,0,true);
Wait(150+random(100));
end;
repeat
FindColorSpiralTolerance(hx,hy,axecolor,4,4,514,337,10);
i:=i + 1;
if(IsTextAt2(9,9,'Take Axe Head',100))then
Mouse(hx,hy,0,0,true);
until(i >= SearchHead)
if(EquipAxe)and(GetColor(577,222)=65536)then
begin
Mouse(622,224,10,10,false);
Wait(150+random(100));
GetMousePos(hx,hy);
Mouse(hx,hy+42,0,0,true);
GameTab(5);
Wait(100+random(50));
Mouse(584,296,8,8,true);
Wait(100+random(50));
end;
end;

Procedure AttachHead;
var mousex,mousey: integer;
begin
Mouse(617,232,1,1,true);
Wait(100+random(100));
Mouse(580,228,1,1,true);
Wait(250);
MMouse(581,226,1,1);
Wait(150);
if(IsTextAt2(9,9,'Wield Rune axe',100))then
begin
GetMousePos(mousex,mousey);
Mouse(mousex,mousey,0,0,true);
end;
end;

Procedure AxeHead;
begin
if(HeadGone)then
begin
PickUpHead;
AttachHead;
end;
end;

function Dead:boolean; //From HatlessCow's Seers Maple Cutter
begin
if(FindColor(x,y,12657153,619,89,667,126))and(FindColor(x,y,12657153,615,31,669,63))then
begin
result:=true;
Logout;
Writeln('Lol youre @!#$ing dead bud, dunno how but better luck');
end;
end;

function Fight:boolean; //From HatlessCow's Seers Maple Cutter
begin
if(FindColorSpiral(x,y,65280,216,115,284,171))then
Result:=true;
end;

procedure Randoms;
begin
Dead;
if(Fight)then
begin
Run(true);
ToBank;
Wait(7000+random(3000));
ToTrees;
Run(false);
end;
Check4Randoms;
Check4Lamp(LampSkill);
CheckLeveled;
AxeHead;
FindBox;
FindEnt;
Login(username,password);
end;

procedure CutTrees;
var px,py: integer;
begin
repeat
if(FindColorSpiralTolerance(px,py,TreeColor1,4,4,514,337,5))then
begin
Randoms;
MMouse(px,py,1,1);
if(IsTextAt2(9,9,'Chop down',100))then
begin
if(IsTextAt2(9,9,'Chop down Tree',100))then
begin
ToBank;
ToTrees;
end else
begin
Randoms;
Mouse(px,py,0,0,true);
repeat
Randoms;
Wait(1000+random(500));
until(not(IsTextAt2(9,9,'Chop down',100)))or(InventoryCount=28)
end;
end;
end else
begin
if(FindColorSpiralTolerance(px,py,TreeColor2,4,4,514,337,5))then
begin
Randoms;
MMouse(px,py,1,1);
if(IsTextAt2(9,9,'Chop down',100))then
begin
if(IsTextAt2(9,9,'Chop down Tree',100))then
begin
ToBank;
ToTrees;
end else
begin
Randoms;
Mouse(px,py,0,0,true);
repeat
Randoms;
Wait(1000+random(500));
until(not(IsTextAt2(9,9,'Chop down',100)))or(InventoryCount=28)
end;
end;
end;
end;
until(InventoryCount=28)
end;

procedure CheckStart;
var cx,cy: integer;
begin
if(FindColorSpiral(cx,cy,3060683,637,82,653,93)=true)then
begin
ToTrees;
CutTrees;
end else
CutTrees;
end;

procedure LoadBmps;
begin
WillowEnt1 := BitmapFromString(20, 6,
'827A30606826505830505830384026384026607025505822384026' +
'20201938402650583038402670802A202019505830202819404031' +
'30301E404031827A3070802A20201970802A606826606826202019' +
'50583050583050583050583060682670802A606826606826505830' +
'3840197B742C202819384019384026384026909068505830384026' +
'606826505830606826606826788056202019181816384026606826' +
'50583070704D60682638401920281930301E384026606826606826' +
'50583038402638402620201950583050583038402640482A181816' +
'18181640482A3038221818163038227E772E202819384019202019' +
'384026606826606826384026384026505830384026505830384026' +
'20201918181630382240482A303822181816303822303822303822' +
'585841505830788056505830909068384026505830202019505830' +
'20201938402638402620201930382240482A40482A30382278785B' +
'1818163038227E772E');
WillowEnt2 := BitmapFromString(23, 7,
'78804F20200950600E707841606821505824404824586024586040' +
'40480E30401948483468704020200988905B70784F809049708024' +
'48582428300048580E48481F485824283000687034485824687040' +
'80805D68703460682150603240482460682170802478882178804F' +
'68702488984B88984B809049606821283000404824404824586024' +
'656B1C50603248503468783660703468703428300030401948481F' +
'50603278882180904968704040402660682178804F809049687034' +
'78883678884670804148503478884680805D687836687040485034' +
'50603268783650600E58604068703440402660701F505037707841' +
'40482440482460684178882178882160701F60701F304019404824' +
'78882178804F40400958602460682158602460701F606821505824' +
'78804F60603260682168703458604068704058681F485824708036' +
'88984B60701F40482448481F708024606834304019506032506032' +
'58602460682178804F28300088984B80904948481F30401960701F' +
'70783670704F88984B48582460683490A05388984B404026485034' +
'70800960703460703490A068708024485824485034485824606841' +
'68704068703450600E404009404824202009586040505037404824' +
'88905B80884A88984B68703470783628300040482468781F');
end;

begin
LoadLibrary('MSN Messenger (BETA)');
LoadBmps;
Login(username,password);
SetChat('off');
SetBrightness('vbright');
GetHeadColor;
CheckStart;
Randoms;
repeat
ToBank;
OpenBank;
Deposit(3,1,0);
CloseWindow;
Run(true);
ToTrees;
GameTab(4);
Randoms;
CutTrees;
Run(false);
until(false)
end.
 
please help me out, its not working for me.
 
can u put this in a file which is ready to use? Im a bad programmer lol
 
Status
Not open for further replies.
Runescape Gamblingrunescape gambling
Back
Top