SRL Archive - First Scripts

STORMLIGHTERv1,3 BY PUFFO
This script will light all you fires up
Just make sure that you have a Tinderbox in you first inv.
And any logs in any other invs
Note: Stay At Falladors East Bank
__________________________
New Update
Fixet:
A few bug
And Some Other Detales
—————————————-
Pleace Report Bugs
And tell me what i could do better
And remember this is one of my first scripts

—PUFFO—
:garfield:

Try this..

//////////////////////////////////////////////////////////////////////////////////////////////
  // STORMLIGHTER BY PUFFO                                                                    //
  // This script will light all you fires up                                                  //
  // Just make sure that you have a Tinderbox in you first inv.                               //
  // And any logs in any other invs                                                           //
  // ***You will have to edit line 38 to set the time its take for you to make a fire***      //
  // I made this script for my own use but desidet to upload it                               //
  // ....Dont know whay i just did....Ill update this script if its get downloaded and used   //
  // And im thing about making a "HotKey" so you dont have to hit "Run" every time            //
  // Enjoy                              ---PUFFO---                                           //
  //////////////////////////////////////////////////////////////////////////////////////////////

program Lighter;
{.include SRL\SRL.scar}
var
  LightingTime: Integer;

procedure StormLighter;
begin
  ClearDebug
  ClearReport
  Writeln('               STORMLIGHTER BY PUFFO')
  Writeln('StormLighter - A simpel way to light your logs')
  Writeln('StormLighter - It will light up all your logs in you inv.')
  Writeln('StormLighter - It will NOT go bank')
  Writeln('StormLighter - It will NOT run away or talk whit Randoms')
  Writeln('StormLighter - You cannot be AFK then useing StormLighter')
  Writeln('StormLighter - I only made this script because i hate to light my logs by my self')
  Writeln('StormLighter - Enjoy')
  AddToReport('STORMLIGHTER BY PUFFO')
  AddToReport('StormLighter v.1')
  AddToReport('Pleace Do NOT upload this at any sites')
  AddToReport('You can take what ever you wont from this script..I dont care')
  AddToReport('This scripts its what i need so ill only update it')
  AddToReport('If its gets downloaded and used')
  AddToReport('I have thinking of making a "Hotkey" so you have to')
  AddToReport('So you dont will need to hit "Run" every time you will light your fires')
  AddToReport('    ')
  AddToReport('Enjoy')
end;

procedure LightUp;
var
  I: Integer;
begin
  LightingTime := 2000;
  PerfectNorth
  HighestAngle
  GameTab(4)
  for i := 2 to 28 do
  begin
    MouseItem(1, true);
    MouseItem(i, true);
    wait(LightingTime + Random(200))
  end;
end;

begin
  wait(1000)
  SetupSRL;
  StormLighter;
  LightUp;
end.

Also with fixed standards.

Okay Thanks alot i was loking for somway to do somthing like what…What dos "i" means?
MouseItem(i, true);

Puffo well done on that maybe you could add so t get logs out of your bank.

nice

Thanks…DankaTa and Fireiznoob
I have been thinking of maybe making it get the logs so mabye ill do that soon :)

From: Puffo
Okay Thanks alot i was loking for somway to do somthing like what…What dos "i" means?
MouseItem(i, true);

I is an integer, which gets increased by one each loop.

it sais some strange error to me….
something like that error in player setup or something

nice script… youest what i nead

Hey Puffo, good script. I'm working on a script that could benefit from some of this, send me a PM if you want to try and collaborate. :)

cool i wana try and get high firemaking wid this

Wow thanks all of you…Nerver thod anybody wold like it becus it was so simpel :)

its simpel but its nice script i used it to get from fm 70 to 80 but mabye you can add that i walks to faly bank get the logs then burns then and take end logs im sure some poeple wanna help you

Updatet to StormLighter V1,2 >>> Added a form

I like the script. Laged for me

From: Puffo
Okay Thanks alot i was loking for somway to do somthing like what…What dos "i" means?
MouseItem(i, true);

Like Rogeruk said, I is an integer. It doesn't have to be I, but that is the standard name for variables for a loop.

Thanks BallonCool17 Im working on getting its full auto**** Atm.

Thanks ElPollo

one thing i would do, is first add anti ban and anti randoms. Then make it so it can go to bank, But very nice script :cool:

Lazermazer..Im working at adding a anti randoms
I have all ready made it go to the east bank at Falador and added a form
Now i just need to figer out how to set in a Anti Random and how to edit
how many loads it shall make from the form

The new version will be uploadet then i have addad that…

gj if u continue with other scripts like this you be a SRL member in no time =]

SRL Member? I dont know what it is but its sound hard….
But thanks :)

Updatet
comment pleace ;)
Thanks

first of all tell us where to start the script =] , im guessing its Flador.

Yes it is at Falador…You can read that in the script:
/==================================================\
| /================================================\ |
| | StormLighter Version 1.3 BETA | |
| | Made By Puffo | |
| | —————————————— | |
| | How To: | |
| | StorLighter Has A Form | |
| | That Make It Easyer For You | |
| | To Use StormLighter | |
| | All You Will Have To Do Is Hit "Run" | |
| | Insert How Many Loads You Wanna Use | |
| | Place All Your Logs In The Top To The Right | |
| | Place Your Player In Any Bank Slot | |
| | At Falladors East Bank | |
| | And Have A Tinderbox In Your First Inv Slot | |
| \===============================================/ |
\ ==================================================/

its works really well, tried it with different logs and in different locations, nice and smooth, congrats.

Lol..Its not made for use at differnts Locations…..But its nice to hear that its work all around… :)
Thanks

nice

Thanks ssaccount….

i will try it laters and see if its that good

Thanks for this, it's a pain to light the logs yourself.

Np Fav Mage:)

ok do you have msn add me ? i can help you out alot . =]

Yes SubiN i have MSN and Aim.. :) But before i give it to you ill like to know what it is you wanna help me whit? :)

Umm like whats the point if it hasent got antirandoms or goes to the bank?

Strikex25 There is AntiRandom and it is going back to the bank

Deleted

Scotas - What happend?

it wont work at all for my, it finds the compass angle then does nothing

Hmm….Im sorry i cant help you i relly dont know why..

nvm fixed it

Okay :)

im very exicted, ive been trying to find a script for this for like 2 weeks, but there was nothing good. I will try once i get home, i will try to post a 5 - 10 hr report on it…:]

I hope this works. I need a firemaker =S Ill post feedback too >_>

Downloading in a bit hope it works. got so many logs to burn, would be great if this worked so i can burn all these logs in my bank that i dont need

i coundnt get it to work… maybe you could answer a few quick questions..
1. Which bank (if a specific one) is this bot made for?
2. Should i start off with a full invy of logs?
3. Where in the bank should my logs be located?
4. Why does it make me exit out of the stormlighter pop-up (with how many trips you want) befre it will log me in. ty

would be probably easier to pm me i you would.. thanx

I tried a few more times last night and still couldnt get it to work. ty

lvl3 Prod1gy

You will have to stay at fallador east bank at any bank slot
Your logs will have to be in the top right conore..
and you will have to start whit 27 logs in you inv and the tinderbox in the first slot…Stormlighter will stop working if it cant find logs in you inv to start whit…. :) tell me if you still have problems

Thanks Jamesrex100 ill :)
Lol Thanks Ravle

thanks for script works great

Yw Louisiana

It's just not doing anyting.. what's wrong :(?

edit: first it only found compass and after that did nothing… a few trys after it told me i had no logs in inventory and logged out… i tried with oak and maple… do i need normal logs -_-
edit2: and sometimes it just says it logs out but really doesnt lol…

EDIT3: ok i found out what the problem was

Problem: Script says you don't have any logs in your inventory
What to do: Make sure scar isn't on the top of the inventory, if you cant see the logs, neither can scar :P

Hehe banaaniz:) good thet you found out that bvy your self :)

From: Puffo
Hehe banaaniz:) good thet you found out that bvy your self :)

already got like 500k fm xp, thanks a lot :p

EDIT:

didn't want to spam your topic with a new post… but could u make it burn the logs a bit faster, it burns 2 in row but then waits a bit and starts again..

*oops rofl removed the pic cos it had my username on it :D:D*

hope u know what i mean

It has been working on my computer for some time now…with no problems.

i like this script, it has helped me alot, thanks

Np its good to hear you all like it…:)
Banaaniz i wont make any more updates at this script so you will have to make it by your self :) GL

From: Puffo
Np its good to hear you all like it…:)
Banaaniz i wont make any more updates at this script so you will have to make it by your self :) GL

yeah it's good practise for me :p already managed to make it bit faster :D

Runtime error in line 84 for me, other than that good work. :)

Yep its it's verry good practise

hey it logs me on and does nothing..
you know whats up?

Edit: is says found compass then nothing..

86-90 firemaking with your great script



:D

Wow im glad to hear that! Im going for 99 atm my self :)

:eek: Works Like A Charm All post Proggy later On

Im having problem with this script and i can't seem to get it working..anyone help? ps first time i use Scar and im using SCAR Divi CDE

Errors:

Failed when compiling
Line 432: [Hint] (10398:1): Variable 'OLDMS' never used in script C:\Program Files\SCAR 3.14\includes\SRL/SRL/Core/AntiRandoms/AntiRandoms.scar
Line 63: [Error] (12355:1): Semicolon (';') expected in script C:\Program Files\SCAR 3.14\includes\SRL/SRL/Misc/FaladorColorFinder.scar

Pretty good…
But one thing : Half script is for form >.<

can you tell me how to get it working lol? thanks in advance

A good suggestion from me would
make it to were your in varrock
and in a very populated world
where there is like 3000 willow logs
in the gerneral store and you buy
them and then it lights them


(just a sugegstion good luck)

cool script, i hope to get 1-60 fm with it =D

Hi, it keeps telling me:

Failed when compiling
Line 66: [Error] (16229:4): Unknown identifier 'AlmostLogOut' in script C:\Program Files\StormLighterv1,3.scar

Anything I can do to fix that?
Thanx in advance

Hmm, worked for few hours and then got stuck in the bank.

I guess it is not updated and doesnt work with SCAR 3.15 and svn 1.4.5
I couldnt fix and compile it.

yea please do that! id love a auto fm! :D

yh how do you fix scripts to make them work with new scar?

nice one lighted quite a number of logs for me:d:bart: :bart: :bart:

Hope it will work, once I learned the basics..

Was searching for a FMer

i got the same problem as Moebius :confused:
Failed when compiling
Line 66: [Error] (16229:4): Unknown identifier 'AlmostLogOut' in script C:\Program Files\StormLighterv1,3.scar

no you leechers, this is outdated.
stop posting here. next 1 who posts if this works, gets loser of day :)

From: ~~Joker~~
no you leechers, this is outdated.
stop posting here. next 1 who posts if this works, gets loser of day :)

Hehe, too bad. Did figure it out by myself lol..

Fayasmm

If anyone wants a partial script that lights logs for them, use this:

Program New;
{.include srl/srl.scar}

Function IsLog(InvSpot : integer) : Boolean;
Var
 P : Tbox;
Begin
      GetInvItemBounds(InvSpot, p);
      Result := CountColor(65536, p.x1, p.y1, p.x1+34, p.y1+27) = 85;
End;

Procedure BurnLog(InvSpot : Integer);
Begin
  If Not IsLog(InvSpot) Then
    Exit
  Else
    Begin
      MouseItem(1, true);
      Wait(500 + random(500));
      MouseItem(InvSpot, True);
      Wait(500 + random(500));
      While Not InChat('atches and the') Do
        Wait(500 + random(500));
    End;
End;

Procedure Mainloop; //For locals.
Var
  I : Integer;
Begin
  SetupSrl;
  Gametab(4);
  For I := 2 to 28 Do
    Begin
      If IsLog(I) Then
        BurnLog(I);
    End;
End;

Begin
  SetupSRL;
  Repeat
    If IsFkeyDown(9) Then
      Mainloop;
  Until(IsFkeyDown(10))
End.

Every time you want it to light a load, hit f9. To stop, hit f10.

can any1 update this please so it can support the new scar version, i really need a script like this and cant find a good 1 anywhere…please update it thx

Wow, i tested it and worked very good :)

From: JanCees
Wow, i tested it and worked very good :)

you really tested it? wow thats just amazing! i wish i was as leech as you, and could spam like you did!!!
THIS IS OUTDATED

From: mormonman
you really tested it? wow thats just amazing! i wish i was as leech as you, and could spam like you did!!!
THIS IS OUTDATED

If anyone wants a partial script that lights logs for them, use this:

ScarScript: By Drunkenoldma

Program New;
{.include srl/srl.scar}

Function IsLog(InvSpot : integer) : Boolean;
Var
P : Tbox;
Begin
GetInvItemBounds(InvSpot, p);
Result := CountColor(65536, p.x1, p.y1, p.x1+34, p.y1+27) = 85;
End;

Procedure BurnLog(InvSpot : Integer);
Begin
If Not IsLog(InvSpot) Then
Exit
Else
Begin
MouseItem(1, true);
Wait(500 + random(500));
MouseItem(InvSpot, True);
Wait(500 + random(500));
While Not InChat('atches and the') Do
Wait(500 + random(500));
End;
End;

Procedure Mainloop; //For locals.
Var
I : Integer;
Begin
SetupSrl;
Gametab(4);
For I := 2 to 28 Do
Begin
If IsLog(I) Then
BurnLog(I);
End;
End;

Begin
SetupSRL;
Repeat
If IsFkeyDown(9) Then
Mainloop;
Until(IsFkeyDown(10))
End.


Every time you want it to light a load, hit f9. To stop, hit f10.

Tested that -.-

kewl script
it worked… kinda..
lol
goodpeople

From: Goodpeople
kewl script
it worked… kinda..
lol
goodpeople

No it didn't. It's outdated. STOP SPAMMING! You didn't try it, you just want 10 posts.

-Griff

Dosent work for me, it cant get the logs out of my bank:/ i've put them so that they are visible when the bank is opened. help?

Line 66: [Error] (16412:4): Unknown identifier 'AlmostLogOut' in script C:\Users\User\AppData\Local\Microsoft\Windows\Temporary Internet Files\Low\Content.IE5\SLIHAV09\StormLighterv1%2C3[1].scar
Failed when compiling

I get this when I start the script… something to look at!

Definately have to give this script a try…. Ill post proggy later

Read the previous posts, ITS OUTDATED!!!

If you want a working script, use the partial fire making script by Drunkenoldma posted few posts before.

Lol @ it being by Drunkenoldma ^.^.

It was written by me, Drunkenoldma wrote the script that puts the scar tags, bolds the words, etc.

If Then And Do While

See?

~Sandstorm

Lol @ it being by Drunkenoldma ^.^.

It was written by me, Drunkenoldma wrote the script that puts the scar tags, bolds the words, etc.

Sorry then, was looking at previous posts and saw one post, saying Drunkenoldma wrote it. My apologies:P

Thank you vary much im going to try it out in a few mins :)

i have this error:
Line 47: [Error] (16253:1): Unknown identifier 'PerfectNorth' in script

Is this still being updated? because i wouldnt mind helping out by posting a proggie and reaping the benefits on an auto fmaker.