SRL Archive - RS Scripts

super miner! mines and dropps my 1st 1!


s3rgio2

2007-07-11 23:04:30

//////////////// power miner mines and drops //////////////
////////////////////////////by s3rgio2//////////////////////
///////////////////// special thanks to whocares357/////////
/////////////////////this is my first script!///////////
///////warning:might not work for higher lvls than 2.0 i am sorry i did the best i could////////
////if any1 knows how to fix please tell me as soon as possible //////////
program s3rgio2_ore_miner_and_dropper;
{ . include SRL/SRL.scar.}

Const
orecolour = 1449520 // fill in ore color using color picker ctrl+P
begin
repeat
findcolorspiral(x,y,orecolor,MSX1,MSY1,MSX2,MSY2)


DisguiseScar ('Internetextplorer7')


findcolorspiral (x,y,orecolour,MSX1,MSY1,MSX2,MSY2,);

mmouse (x,y,2,2)
wait (300+random(800))
mouse(x,y,1,1,true)



Mouse (x,y,1,1,true)
wait (3000+random(800))
mouse(x,y,1,1,true)









Mouse(x,y,1,1,true)
wait (3000+random(5000))

writeln ('now dropping ore…')
///////////////////////////////dropping ore
mmouse (627,265,2,2)
wait (500+random(1000))
mouse (627,265,1,1,false)
mmouse (606,307,2,2)
wait (500+random(1000))
mouse(x,y,1,1,true



until (false)



end.


:sasmokin: :spot: my first 1 !!!!!! w00t

s3rgio2

2007-07-11 23:06:13

if any1 has any comments plz post! :):D :) and if any1 know how to fix the over lvl 2.0 error plz messege me!

dstone09

2007-07-12 02:12:19

When you post use scar tags (
) to make the post look better and I think this goes in the Free Scrips -> First Script Section. Also look up scripting standards on the forums to make the script look better.

Santa_Clause

2007-07-12 03:24:29

This isn't an SRL Script so it stays here.

Edit: My bad, yes it is.

sheetomg

2007-07-12 07:08:13

This isn't an SRL Script so it stays here.


rofl

sheetomg

2007-07-12 07:15:22

This isn't an SRL Script so it stays here.


rofl

Santa_Clause

2007-07-12 10:08:29

No offence but this is a very scary script.

Skalla

2007-08-08 17:14:10

um… do i see spelling problems in that script?
or do i suck at english?

orecolour

Isnt it supposed to be like "Orecolor" :bart:

warrockownz

2007-08-10 17:15:19

no thats the american spelling

uk is colour

u.s. is color

lazy u.s..

lordsaturn

2007-08-10 18:36:26

Standards please?

Tim0suprem0

2007-08-10 23:48:59

I love my Internet Extplorer too ;)

~alex~

2007-08-11 08:43:16

Saturn those standards are no way near right..

n3ss3s

2007-08-11 08:45:52

Wrong forum. This is for non-srl scripts and I can see SRL included there.

born to macro

2007-08-11 10:18:50

its a nice try but its sorta of a bad script but ull hit a lota bumps in ur time scripting but cintuing and make beter scripts and please read tuts that is why there there

born to macro

2007-08-11 10:22:04

this is a verry dirty script im gona cleane up for u

born to macro

2007-08-11 10:26:37

ok here is the fix
//////////////// power miner mines and drops //////////////
////////////////////////////by s3rgio2//////////////////////
///////////////////// special thanks to whocares357/////////
/////////////////////this is my first script!///////////
///////warning:might not work for higher lvls than 2.0 i am sorry i did the best i could////////
////if any1 knows how to fix please tell me as soon as possible //////////
program s3rgio2_ore_miner_and_dropper;
{ . include SRL/SRL.scar.}
const
orecolour = 1449520 // fill in ore color using color picker ctrl+P
program MineOre;
begin
repeat
findcolorspiral(x, y, orecolor, MSX1, MSY1, MSX2, MSY2)
DisguiseScar('Internetextplorer7')
findcolorspiral(x, y, orecolour, MSX1, MSY1, MSX2, MSY2, );
mmouse(x, y, 2, 2)
wait(300 + random(800))
mouse(x, y, 1, 1, true)
Mouse(x, y, 1, 1, true)
wait(3000 + random(800))
mouse(x, y, 1, 1, true)
Mouse(x, y, 1, 1, true)
wait(3000 + random(5000))
writeln('now dropping ore...')

program Drop;

mmouse(627, 265, 2, 2)
wait(500 + random(1000))
mouse(627, 265, 1, 1, false)
mmouse(606, 307, 2, 2)
wait(500 + random(1000))
mouse(x, y, 1, 1, true)
until (false)
end.