Molten Miner 1.3 by denial [MODED]

Well, this is basically the same as denials script, but well, if you all noticed, it would click on the ore, and THEN drop it, which cancels out the mining....so i just thought id modify that so that it would drop the ores from your inventory, and then click on the rock.

Code:

                             // ~ bo|om ~ \\
                            //////harlz\\\\\\
                           ////moltenminer\\\\
                          /////////1.3\\\\\\\\\
                         //___________________\\

    //how to use: setup right below, that explains most of it :)\\
   // note that this power/autominer won't work well in all mines\\
 {------------------------drops every 25 ore------------------------}
{have pick equipped and inventory empty, don't wear anything you like}


program moltenminer;

const

startupwait = 1000;//how long before script starts after compiling

rockcolor1 = 2966339;// set 3 rock colors, default iron.

rockcolor2 = 6571075;// set 3 rock colors, default iron.

rockcolor3 = 2966339;// set 3 rock colors, default iron.

mininginterval = 20000;// time before mining each ore

rockstomine = 300;//how many rocks to mine

 {.include SRL/SRL.scar}



procedure moltenminer;


var
i, x, y: integer;
begin
cleardebug;
writeln('molten miner will begin soon, please post comments bugs and ')
writeln('sugestions on site you got this script from')
writeln('moltenminer 1.5 will include better progress report and form use')



 wait(startupwait+random(1000))
repeat





if (invfull = true) then
writeln('dropping')
dropall;
cleardebug;
writeln('mined: ' + inttostr(i))
writeln('dropped: ' + inttostr(i))
writeln('script has been working for ' + timerunning)
  if (FindColor(x, y, rockcolor1, 0, 0, 517, 337)) or
   (FindColor(x, y, rockcolor2, 0, 0, 517, 337)) or
    (FindColor(x, y, rockcolor3, 0, 0, 517, 337))then
    mmouse(x,y,2,2)
    mouse(x,y,1,1,true)
    i:= i + 1
 wait(mininginterval+random(1000))
until i = rockstomine


writeln('script has worked for ' + timerunning)
writeln('ores mined ' + inttostr(i))
writeln('ores dropped ' +inttostr(i))
end;


begin
setupsrl
moltenminer
end.

Note: This code right now unmodified will be good for mining in the guild for coal and mith using a bronze pickaxe. [the color setting in rs is the brightest....]


no need to thank me.

 

why do people post scripts like these, i can see they are trying but this cript is practicly useless...

 

Not to be a naysayer, but StarScreamer is right.. If people made this worthwhile, like banking the coal instead of dropping it, then I think it would be a hellofalot better.. But, good job on fixing that script up!

 

thanks, but i mean its a powerminer, its not supposed to bank right? thats why its called "power"miner...lol