hey all you C-Ball Smelters here it is the beta version
i just finished the basic script last night im taking a break, also this is my first script i tested for around 5-8 hours and the only problems it currently has is the colors are manual, and it is extremely hard to find the right main screen color for the furnace
! ! ! ! P L E A S E ! ! ! ! L E A V E ! ! ! ! F E E D B A C K ! ! ! !
if you wish to assist me in my quest to perfect this then please pm me as i will be selling the finished copy and you may be entitled to sell with me
this is my beta version so it is not extremely finished this is just the basic working motor functions and if you stay near your pc when you auto you will be fine just make sure your volume is up so you can hear when a random is trying to get your attention. im sorry for this and i will be working on it agian very soon.
problems: needs autocolor sometimes you cant get the right color should probally switch worlds or reload current world, no multiplayer, no antirandoms
all these problems will be addressed in the next few updates i will update one at a time, the autocolor update will be posted free, i will not release the multiplayer and antirandom procedures at the same time but will not be free
just give it a try make sure you follow color guidelines and you should be fine accept for furnace some times its impossible to get the right color.
i just finished the basic script last night im taking a break, also this is my first script i tested for around 5-8 hours and the only problems it currently has is the colors are manual, and it is extremely hard to find the right main screen color for the furnace
! ! ! ! P L E A S E ! ! ! ! L E A V E ! ! ! ! F E E D B A C K ! ! ! !
if you wish to assist me in my quest to perfect this then please pm me as i will be selling the finished copy and you may be entitled to sell with me
this is my beta version so it is not extremely finished this is just the basic working motor functions and if you stay near your pc when you auto you will be fine just make sure your volume is up so you can hear when a random is trying to get your attention. im sorry for this and i will be working on it agian very soon.
problems: needs autocolor sometimes you cant get the right color should probally switch worlds or reload current world, no multiplayer, no antirandoms
all these problems will be addressed in the next few updates i will update one at a time, the autocolor update will be posted free, i will not release the multiplayer and antirandom procedures at the same time but will not be free
just give it a try make sure you follow color guidelines and you should be fine accept for furnace some times its impossible to get the right color.
Code:
// CannonBall Express //
// BY Burnout //
program CannonBallExpress;
{.include SRL/SRL.scar}
{.include SRL\SRL\Skill\Smithing.scar}
// CannonBall Express brought to you exclusively by Burnout //
// do not attempt to edit this script accept where told to //
// or unless you have my explisit consent //
// beta version //
// no antirandoms... //
// no multiplayer and must set own colors will update soon //
// with many thanks to Town on sythe forums //
// must have inventory window up //
// start in ak west bank (closest one to the furnace) //
// loged in //
// AND A SPECIAL THANKS GOES OUT TO "TOWN" FOR ALL HIS GUIDANCE //
//___________________________________________________________//
//___________________________________________________________//
// you need to set your colors here //
const
mmfcolor=(2123772);///put the orange mini map furnace symbol color here///
mmbcolor=(5162984);///put the yellow mini map bank symbol color here///
mmrcolor=(231440);///put the green from the tinderbox symbol here(there is a strand of green in the tinderbox:f: ///
fcolor=(1451140);//set this to the red color on the north side of the furnace
bwcolor=(8750726);//the dark grey part above window glass
// walk to furnace (sorry only one path so far) //
procedure WalkToFurnace1;
begin
makecompass('n')
if(findMMColortol(x,y,mmrcolor,8)) Then
begin
mmouse(x,y,1,1+random(15))
mouse(x,y,1,1+random(15),true)
wait(6000+random(2000));
if(findMMColortol(x,y,mmfcolor,8)) then
mmouse(x,y,1,1)
mouse(x,y,1,1,true)
wait(5000+random(2000));
MakeCompass('W')
end;
end;
// walk to bank (sorry only one path so far) //
procedure WalkTobank1;
begin
makecompass('n')
wait(1000+random(500));
mouse(647,144,2,2,true)
wait(5000+random(2000));
if(findMMColortol(x,y,mmbcolor,8)) then
mmouse(x,y,1,1)
mouse(x,y,1,1,true)
wait(6000+random(2000));
MakeCompass('W')
end;
// smelter \\
procedure SmeltCBall;
begin
highestangle;
if (FindColorSpiralTolerance(x, y, fcolor, MSX1, MSY1, MSX2, MSY2, 30))then
MMouse(x, y, 2, 2)
Mouse(x+Random(15), y, 2, 2, true)
repeat
findnormalrandoms;
wait(200+random(100));
mouseitem(28,true)
wait(500+random(500));
MMouse(272, 108, 2, 2)
Mouse(272, 108, 5, 5, true)
wait(1500+random(1000));
mmouse(256,442,1,1)
mouse(256,442,2,2,true)
wait(2000+random(1500));
until (not(existsitem(28)))
end;
// ammount to withdraw //
procedure withdrawbars;
begin
mmouse(94,77,2,2)
mouse(94,77,2,2,false)
Wait(100);
mmouse(78,145,0,10);
mouse(78,145,0,10,true);
FFlag(0);
Wait(200 + Random(500));
mmouse(485,41,2,2)
mouse(485,41,2,2,true)
end;
// opening bank //
procedure openbankfast;
begin
lowestangle;
if Findmscolortol(x,y, bwcolor,4) then
begin
MMouse(x, y, 4, 4);
if IsUpTextMulti('ank', 'booth', 'ooth') then
begin
Mouse(x, y, 0, 0, False);
Wait(100);
ChooseOption(x, y, 'uickly');
FFlag(0);
Wait(2000 + Random(500));
end;
highestangle;
end;
end;
// checking if items are in inventory //
Function CheckIfInInv: Boolean;
begin
if(not(existsitem(28))) then Result:= False
end;
//////////////// M A I N L O O P \\\\\\\\\\\\\\\\\\
begin
setupsrl;
activateclient;
wait(1000);
MakeCompass('w')
openbankfast;
withdrawbars;
repeat
CheckIfInInv;
walktofurnace1;
smeltcball;
walktobank1;
openbankfast;
fixbank;
withdrawbars;
until(false)
end.
good job
