View Full Version : [SRL]Ultimate Longbow Stringer, Strings All Longbow
Rubycore
02-05-2008, 11:20 PM
Hey football,
I'm so eager to use your script, it looks sweet.
Atm I'm having troubles though... I've tried different versions of your script and the best I can manage is for it to log in, then sit there and do nothing.
I've also tried changing my scar revs to like all the last five versions, and tried using scar 3.12, 3.13 and 3.14. I can't get it to go.
I tried the smart version and that works well - except...
It logs in, goes into the bank, withdraws the stuff, then just goes back and deposits it all again. It just keeps repeating that.
I've got 18k yew longs to string before my mem runs out :eek: lol.
Any ideas would be appreciated.
Thanks!
KoKouKo
02-05-2008, 11:33 PM
it all compiles with scar 3.14 and srl 4 rev 12 (most likely 13 too unless they did something that they didnt tell people about).
Dangerous Garden Tools
02-05-2008, 11:35 PM
add pc bank =(
footballjds
02-05-2008, 11:41 PM
Hey football,
I'm so eager to use your script, it looks sweet.
Atm I'm having troubles though... I've tried different versions of your script and the best I can manage is for it to log in, then sit there and do nothing.
I've also tried changing my scar revs to like all the last five versions, and tried using scar 3.12, 3.13 and 3.14. I can't get it to go.
I tried the smart version and that works well - except...
It logs in, goes into the bank, withdraws the stuff, then just goes back and deposits it all again. It just keeps repeating that.
I've got 18k yew longs to string before my mem runs out :eek: lol.
Any ideas would be appreciated.
Thanks!
OK il add pc bank :D
what errors does it report? run the script and let it loop for like 2 times, then stop it, look in the debug box and tell me what you see :D
radragon16
02-05-2008, 11:44 PM
It got stuck in a loop while banking. :/ I think it happened when it tried to sleep. It was set to sleep at 11 loads and when I came back it said 17 loads done and it was opening the bank and depositing then withdrawing, closing bank, and repeating. I just changed sleep to 999999 and I will let you know if it does it again. :)
And now after like 25 loads it just withdraws the materials and then doesn't string them. It just performs anti-ban. If I intercede and manually click string it will then bank it afterwards and withdraw materials, but it won't string them :/ The log just says Stringing... 14 left to string/ then time running here.
KoKouKo
02-05-2008, 11:50 PM
i probably get the same problems as radragon16 because sometimes i log onto some pretty weird things in terms of what i have in my inventory (when i came back today i had 14 strung yew longs and 14 bowstrings also sometimes i get cant find unstrungs error when their in my inventory
edit
@ dgt my bff... jk
the smart version i uploaded has pc bank
footballjds
02-05-2008, 11:50 PM
press the red button to stop it :D, then look in the debug box, and it will tell you what errors occured...
PS let it get stuck first, and then after it moves on...
radragon16
02-05-2008, 11:57 PM
It didn't show anything o.O Just pasted it like it does when you stop it normally. Im restarting SCAR and running it again to see if I can get it to do it.
footballjds
02-06-2008, 12:00 AM
i meant the report box sorry :D
radragon16
02-06-2008, 12:47 AM
Thats where I was looking but yeah it said nothing abnormal. And sometimes when it banks it will bank the (u) too by doing all and then withdrawing materials needed then bank without stringing and click each bow string one at a time banking them then withdraw them and string o.O
And here's a prog, just stopped it cause time to play halo :D
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
53 Minutes and 45 Seconds
Gained 65100 Exp
Strung 868 Yew Longbows
Did 62 Loads
Gained 1 Levels
Performed 52 AntiBans
==========================================
KoKouKo
02-06-2008, 12:50 AM
i dont know how relavent this is but i got it using this script so close enough
got this while IN pc bank
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Fights : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
i dont think its true because i dont get my random every 15 minutes there but if football said he saw one then i believe him
footballjds
02-06-2008, 01:07 AM
i dont know how relavent this is but i got it using this script so close enough
got this while IN pc bank
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Fights : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
thank you! this just goes to displace the idea of no randoms in pc bank.
ive gotten randoms inside it so i didn't need convincing, but i s'pose others do :)
KoKouKo
02-06-2008, 01:12 AM
first and foremost that can be an error, there should be randoms in pc bank (why shouldnt there be), thirdly i think it just logged in banked then sat there (got this error)
Error 0Error WHile Waiting For Unstrungs| Fatel = False
footballjds
02-06-2008, 01:29 AM
yes, it should have continued after that though?
KoKouKo
02-06-2008, 01:36 AM
it stood there for a while before i finally stopped it
edit
i had half in inventory of unstrungs and another half of bs
edit
the script just freezes once in a while, might be because im using smart
Error 0Error With, Logged Out While Fletching| Fatel = True
footballjds
02-06-2008, 03:44 AM
yeah, smart is really laggy and slow :(, so it says its logged out when its not...
NOTHING i can do about that. :(
KoKouKo
02-06-2008, 03:47 AM
its not that its lagging on my computer though it runs fine the script just stops like abruptly the smart game client is still running smoothly but the script just stops, I think updating to rev 13 might help so i just did it
just got that logged out while fletching error again
if anybody reads this updating to rev 13 fixes all this because its doing alot better now
i got the script to run using smart and rev 13 and it did 1.6k but i closed it without getting the proggie but it didnt get errors so really no harm done
VivaLaRofl
02-06-2008, 08:52 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
19 Minutes and 35 Seconds
Gained 34650 Exp
Strung 462 Yew Longbows
Did 33 Loads
Gained 1 Levels
Performed 23 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
19 Minutes and 35 Seconds
Gained 34650 Exp
Strung 462 Yew Longbows
Did 33 Loads
Gained 1 Levels
Performed 23 AntiBans
==========================================
footballjds
02-06-2008, 09:30 PM
its not that its lagging on my computer though it runs fine the script just stops like abruptly the smart game client is still running smoothly but the script just stops, I think updating to rev 13 might help so i just did it
just got that logged out while fletching error again
if anybody reads this updating to rev 13 fixes all this because its doing alot better now
i got the script to run using smart and rev 13 and it did 1.6k but i closed it without getting the proggie but it didnt get errors so really no harm done
no idea :(
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
19 Minutes and 35 Seconds
Gained 34650 Exp
Strung 462 Yew Longbows
Did 33 Loads
Gained 1 Levels
Performed 23 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
19 Minutes and 35 Seconds
Gained 34650 Exp
Strung 462 Yew Longbows
Did 33 Loads
Gained 1 Levels
Performed 23 AntiBans
==========================================
i presume it finished?
KoKouKo
02-07-2008, 05:25 AM
it withdrew everything sat there then gave me this, its one long proggie (when i glanced at it i saw it do that)
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
10 Minutes and 52 Seconds
Gained 13650 Exp
Strung 182 Yew Longbows
Did 13 Loads
Performed 7 AntiBans
==========================================
PROBLEM: Inv interface not open //i get this error even when the interface is
Error, please report this! Error With, Logged Out While Fletching there
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
18 Minutes and 0 Seconds
Gained 14700 Exp
Strung 196 Yew Longbows
Did 14 Loads
Performed 13 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
18 Minutes and 1 Seconds
Gained 14700 Exp
Strung 196 Yew Longbows
Did 14 Loads
Performed 13 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatal = True
Please Report The Above ERrors :D
Successfully executed
the clear debugs do help to reduce clutter but they do stop people from seeing somewhat useful errors like the cant find anything in inventory i wouldnt of seen that if i didnt remove the clear debugs
footballjds
02-07-2008, 07:20 AM
use it without smart please, tell me the 100% less errors :D
VivaLaRofl
02-07-2008, 08:41 AM
no idea :(
i presume it finished?
No, I manually stopped it.
ConneX
02-07-2008, 01:54 PM
I downloadet that.
Prog:
footballjds
02-07-2008, 04:45 PM
:D, thanks everyone, your so helpful :D
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 43 Minutes and 57 Seconds
Gained 220500 Exp
Strung 2940 Yew Longbows
Did 210 Loads
Performed 115 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 43 Minutes and 59 Seconds
Gained 220500 Exp
Strung 2940 Yew Longbows
Did 210 Loads
Performed 115 AntiBans
==========================================
Error 0Error With, Withdrawing Unstrungs| Fatel = False
Error 1Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
and it wielded a bow as well
footballjds
02-07-2008, 10:52 PM
the bow weilding will be an easy fix, i just have like 0% time to script atm, sorry :(, laterz though :xD
KoKouKo
02-07-2008, 11:28 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
11 Minutes and 1 Seconds
Gained 15750 Exp
Strung 210 Yew Longbows
Did 15 Loads
Performed 3 AntiBans
==========================================
PROBLEM: Inv interface not open
Successfully compiled
Successfully compiled
SRL Compiled in 15 msec
SCR NPCName = How many would you like to make?
SCR Event = unknown
SCR NPCName = How many would you like to make?
SCR Event = unknown
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
29 Seconds
Gained 1050 Exp
Strung 14 Yew Longbows
Did 1 Loads
==========================================
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Minutes and 9 Seconds
Gained 2100 Exp
Strung 28 Yew Longbows
Did 2 Loads
==========================================
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Minutes and 49 Seconds
Gained 3150 Exp
Strung 42 Yew Longbows
Did 3 Loads
==========================================
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Minutes and 28 Seconds
Gained 4200 Exp
Strung 56 Yew Longbows
Did 4 Loads
==========================================
SCR NPCName = How many would you like to make?
SCR Event = unknown
SCR NPCName = How many would you like to make?
SCR Event = unknown
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
3 Minutes and 10 Seconds
Gained 5250 Exp
Strung 70 Yew Longbows
Did 5 Loads
Performed 1 AntiBans
==========================================
SCR NPCName = How many would you like to make?
SCR Event = unknown
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
3 Minutes and 54 Seconds
Gained 6300 Exp
Strung 84 Yew Longbows
Did 6 Loads
Performed 2 AntiBans
==========================================
SCR NPCName = How many would you like to make?
SCR Event = unknown
SCR NPCName = How many would you like to make?
SCR Event = unknown
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
4 Minutes and 35 Seconds
Gained 7350 Exp
Strung 98 Yew Longbows
Did 7 Loads
Performed 2 AntiBans
==========================================
SCR NPCName = How many would you like to make?
SCR Event = unknown
SCR NPCName = How many would you like to make?
SCR Event = unknown
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
5 Minutes and 20 Seconds
Gained 8400 Exp
Strung 112 Yew Longbows
Did 8 Loads
Performed 4 AntiBans
==========================================
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
6 Minutes and 3 Seconds
Gained 9450 Exp
Strung 126 Yew Longbows
Did 9 Loads
Performed 4 AntiBans
==========================================
SCR NPCName = How many would you like to make?
SCR Event = unknown
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
6 Minutes and 44 Seconds
Gained 10500 Exp
Strung 140 Yew Longbows
Did 10 Loads
Performed 4 AntiBans
==========================================
Error, There is nothing in inventory slot 28
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
7 Minutes and 56 Seconds
Gained 11550 Exp
Strung 154 Yew Longbows
Did 11 Loads
Performed 4 AntiBans
==========================================
Error, please report this! Opening Bank Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
8 Minutes and 47 Seconds
Gained 11550 Exp
Strung 154 Yew Longbows
Did 11 Loads
Performed 4 AntiBans
==========================================
Error 0Opening Bank Error| Fatal = True
Please Report The Above ERrors :D
Successfully executed
radragon16
02-08-2008, 07:01 PM
It did this while I was at work and I checked and my char did NOT die for some reason he teled to lumby and logged with a full invent of yew longs LOL.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
39 Minutes and 12 Seconds
Gained 61950 Exp
Strung 826 Yew Longbows
Did 59 Loads
Performed 38 AntiBans
==========================================
0
blah
13307
0
blah
13665
0
blah
13666
16
blah
14181
16
blah
13119
Bank Not Found, Using Walkback.
We Found The FountainColor: 10507097
With A Tolerance Lvl Of: 4
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
40 Minutes and 55 Seconds
Gained 61950 Exp
Strung 826 Yew Longbows
Did 59 Loads
Performed 38 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
EDIT: just restarted and I think when it tried to take a break it messed up. Not sure though heres the error:
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
19 Minutes and 7 Seconds
Gained 18900 Exp
Strung 252 Yew Longbows
Did 18 Loads
Performed 15 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
19 Minutes and 8 Seconds
Gained 18900 Exp
Strung 252 Yew Longbows
Did 18 Loads
Performed 15 AntiBans
==========================================
Error 0Error WHile Waiting For Unstrungs| Fatel = False
Error 1Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
footballjds
02-08-2008, 07:52 PM
radragon, the first is because it couldn't find the bank so it home teled to use the lumby one :D, and i have very little time, if you could do me a favour and compile all into one a list of the errors people have experianced il fix em. thanks :D
radragon16
02-08-2008, 11:14 PM
Error 0Error WHile Waiting For Unstrungs| Fatel = False
Error 1Error With, Logged Out While Fletching| Fatel = True
Error 0WalkBack Failed Error| Fatel = True
Error 0Opening Bank Error| Fatal = True
Error, please report this! Opening Bank Error
Error, There is nothing in inventory slot 28
Error 0Error With, Withdrawing Unstrungs| Fatel = False
Error 1Error With, Logged Out While Fletching| Fatel = True
Error 0Error WHile Waiting For Unstrungs| Fatel = False
Bow wielding
PROBLEM: Inv interface not open //i get this error even when the interface is
Error, please report this! Error With, Logged Out While Fletching there
Add fixed pc bank to this one too??
Smart enabled(not sure if you added yet)
Check bank method for looping issues?
I think thats all. anybody got anything else to add?
footballjds
02-09-2008, 03:01 AM
damn thats a lot :(
KoKouKo
02-09-2008, 05:11 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
46 Minutes and 23 Seconds
Gained 44100 Exp
Strung 588 Yew Longbows
Did 42 Loads
Performed 27 AntiBans
==========================================
Error, please report this! Opening Bank Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
47 Minutes and 14 Seconds
Gained 44100 Exp
Strung 588 Yew Longbows
Did 42 Loads
Performed 27 AntiBans
==========================================
Error 0Opening Bank Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
got a talk at pc bank pwnt you anti pc random people
to add in fixed pc bank first put that include thing in then add the functions then convert the script to openbankglass veb false false or what ever then change the openbank glass thing to openpcbank
radragon16
02-09-2008, 05:59 AM
I can add its just that it DOES NOT USE ONE BOOTH. lol. thats in the list hehe.
KoKouKo
02-09-2008, 08:40 AM
if it doesnt use one booth doesnt that just defeat the whole purpose of that procedure?
it was going good
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 59 Minutes and 17 Seconds
Gained 225750 Exp
Strung 3010 Yew Longbows
Did 215 Loads
Performed 112 AntiBans
==========================================
Error, please report this! Opening Bank Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
3 Hours, 0 Minutes and 10 Seconds
Gained 225750 Exp
Strung 3010 Yew Longbows
Did 215 Loads
Performed 112 AntiBans
==========================================
Error 0Error While Waiting For String Bows Option| Fatel = False
Error 1Error While Waiting For String Bows Option| Fatel = False
Error 2Error While Waiting For String Bows Option| Fatel = False
Error 3Error While Waiting For String Bows Option| Fatel = False
Error 4Opening Bank Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
radragon16
02-09-2008, 09:20 AM
He didn't test it dur. With some tweaking it should work right I think. He just made it in a hurry. Heres a prog before it screwed up:
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 58 Minutes and 58 Seconds
Gained 275100 Exp
Strung 3668 Yew Longbows
Did 262 Loads
Gained 1 Levels
Performed 191 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 58 Minutes and 59 Seconds
Gained 275100 Exp
Strung 3668 Yew Longbows
Did 262 Loads
Gained 1 Levels
Performed 191 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
ConneX
02-09-2008, 03:09 PM
==========================================
Been Making Bows For You For
3 Hours, 12 Minutes and 55 Seconds
Gained 306600 Exp
Strung 4088 Yew Longbows
Did 292 Loads
Level Responded 2 Times
Performed 182 AntiBans
==========================================
KoKouKo
02-09-2008, 04:39 PM
how come everybody gets such good proggies ==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 7 Minutes and 16 Seconds
Gained 80850 Exp
Strung 1078 Yew Longbows
Did 77 Loads
Performed 45 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 7 Minutes and 16 Seconds
Gained 80850 Exp
Strung 1078 Yew Longbows
Did 77 Loads
Performed 45 AntiBans
==========================================
Error 0Error With, Withdrawing Unstrungs| Fatel = False
Error 1Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
radragon16
02-09-2008, 10:31 PM
*hint* don't use sleep function. It fucks the script up for some reason. :D
KoKouKo
02-10-2008, 12:35 AM
i dont at all i set it to sleep every 999999999 minutes but i can never get the script to go for as long as everybody else
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
29 Minutes and 15 Seconds
Gained 26250 Exp
Strung 350 Yew Longbows
Did 25 Loads
Performed 16 AntiBans
==========================================
Error, please report this! Opening Bank Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
29 Minutes and 32 Seconds
Gained 26250 Exp
Strung 350 Yew Longbows
Did 25 Loads
Performed 16 AntiBans
==========================================
Error 0Opening Bank Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
it stood there and well let it log itself off
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
26 Minutes and 45 Seconds
Gained 30450 Exp
Strung 406 Yew Longbows
Did 29 Loads
Performed 11 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
26 Minutes and 45 Seconds
Gained 30450 Exp
Strung 406 Yew Longbows
Did 29 Loads
Performed 11 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executedit finished the error means it ran out of bs
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
32 Minutes and 5 Seconds
Gained 45150 Exp
Strung 602 Yew Longbows
Did 43 Loads
Performed 18 AntiBans
==========================================
Error, please report this! Error With Bank, no Bs or no LBU
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
32 Minutes and 16 Seconds
Gained 45150 Exp
Strung 602 Yew Longbows
Did 43 Loads
Performed 18 AntiBans
==========================================
Error 0Error With Bank, no Bs or no LBU| Fatel = True
Please Report The Above ERrors :D
Successfully executed
ConneX
02-10-2008, 09:02 AM
==========================================
Been Making Bows For You For
4 Hours, 11 Minutes and 2 Seconds
Gained 386400 Exp
Strung 5152 Yew Longbows
Did 368 Loads
Gained 1 Levels
Performed 230 AntiBans
==========================================
KoKouKo
02-10-2008, 05:47 PM
oh my god i llove you
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
5 Hours, 59 Minutes and 0 Seconds
Gained 570150 Exp
Strung 7602 Yew Longbows
Did 543 Loads
Gained 1 Levels
Performed 205 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
5 Hours, 59 Minutes and 0 Seconds
Gained 570150 Exp
Strung 7602 Yew Longbows
Did 543 Loads
Gained 1 Levels
Performed 205 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
footballjds
02-10-2008, 09:10 PM
New Update :D
it now has PC bank(even though 3 people have reported getting randoms there while using my script :D)
If you want smart use markuses easy way of adding.
much better overall :D
KoKouKo
02-11-2008, 12:47 AM
isnt pc bank just 2 lines of code? wouldnt simple instructions suffice
footballjds
02-11-2008, 01:34 AM
a better pc banking was sugested because the previus used SRLS OpenBankGlass, which moved around a lot.
KoKouKo
02-11-2008, 06:38 AM
i tried the new version, the pc bank thing tries to find the bank but fails and to make it worse it only deos one load then logs out, YES I SET IT UP CORRETLY
footballjds
02-11-2008, 05:34 PM
show me what prints out? also, if a whole bunch of numbers like, 209, 304 ect... print then find line 549 and change it to: if not findDTMRotated(DTM, x, y, 224, 162, 452, 278, radians(30), Radians(30), 0.05, angle)then
tell me if it helps?
KoKouKo
02-11-2008, 11:39 PM
i look foward to it in 10 days when i get unbanned :(
footballjds
02-12-2008, 03:19 AM
can't compile line 29
? post error?
[Runtime Error] : Out Of Range in line 1027 in script J:\b1\scar\Scripts\fletch\Ultimate Longbow Stringer[.3].scar
ShowerThoughts
02-12-2008, 09:41 PM
want a good bsank opener pick a bank and make a dtm ;)
footballjds
02-12-2008, 09:55 PM
i did that for pc bank, but the DTM was WAY to dynamic ;)
Crunk_Muffin
02-12-2008, 09:58 PM
Been Making Bows For You For
37 Seconds
Gained 0 Exp
Strung 0 Yew Longbows
Did 0 Loads
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
im at varrock east :(
KoKouKo
02-12-2008, 11:56 PM
no dtms found in bank means the script didnt find any dtms of the items you string in your bank
Crunk_Muffin
02-13-2008, 02:16 AM
Got banned using this script. Might be detectable.
radragon16
02-13-2008, 03:29 AM
Dude lol Ive used this for hours and hours. now 90+ fletch and no ban. :/ without sleeping too. AND without auto responder. So idk. You were probaly just in the wrong place at the wrong time. And for records I believe they are just giving out temp bans and .5 blackmarks now for botting :/
footballjds
02-13-2008, 03:19 PM
Been Making Bows For You For
37 Seconds
Gained 0 Exp
Strung 0 Yew Longbows
Did 0 Loads
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
im at varrock east :(
then no items were at the top, if they were then please tell me ;)
no dtms found in bank means the script didnt find any dtms of the items you string in your bank
:duh:
Got banned using this script. Might be detectable.
its not! infact antiban is my #1 priority ;)
you might have been banned from another script. but it wasn't from mine :duh:
ConneX
02-13-2008, 06:30 PM
My favorite script is broken!:confused:
Inv interface not open:D
footballjds
02-13-2008, 07:08 PM
dude is the inv open when it says that?
markel
02-13-2008, 07:10 PM
dude, after todays update in game your script makes about 150 bows and then it clicks on bs and yew longs(u) but does not make yew longs.
ConneX
02-13-2008, 07:16 PM
dude is the inv open when it says that?
When its open bank and got inventory full strings and bows.... click X on upright and close bank and then its got error.
My english xD:duh:
footballjds
02-13-2008, 07:38 PM
Runescape got updated.
all scripts won't work until a new srl rev is released
ConneX
02-14-2008, 02:10 PM
Hey its working on me!
{************************************************* ******************************
function TabExists(TabNumber: Integer): Boolean;
By: Flyboy
Description: Returns true if tab exists.
Very useful for tutorial Is. as well as a simple double check to make sure
your fully logged in.
************************************************** *****************************}
function TabExists(TabNumber: Integer): Boolean;
begin
case TabNumber of
1: Result := (GetColor(542, 185) = 13816532);
2: Result := (GetColor(576, 188) = 3831858);
3: Result := (GetColor(609, 185) = 14872817);
4: Result := (GetColor(644, 180) = 1854335);
5: Result := (GetColor(675, 183) = 9870237);
6: Result := (GetColor(708, 184) = 13822416);
7: Result := (GetColor(741, 187) = 5598593);
8: Result := (GetColor(575, 483) = 3720957);
9: Result := (GetColor(607, 485) = 993018);
10: Result := (GetColor(639, 490) = 1103866);
11: Result := (GetColor(674, 484) = 5331808);
12: Result := (GetColor(711, 481) = 3105656);
13: Result := (GetColor(742, 482) = 2401713);
14: Result := (GetColor(753, 4) = 3985241) Or (GetColor(753, 6) = 658751);
15: Result := (GetColor(537, 481) =4938339);
end;
end;
footballjds
02-14-2008, 05:32 PM
go ahead and try coneX's idea :D, maybe it'll work. btw who gave you that code con?
ConneX
02-14-2008, 08:14 PM
go ahead and try coneX's idea :D, maybe it'll work. btw who gave you that code con?
http://www.villavu.com/forum/showthread.php?t=25836
OpenHearts
02-15-2008, 09:55 PM
can i have a copy of [2] please?
EDIT: sry not needed now. found the error.
footballjds
02-16-2008, 02:53 AM
can i have a copy of [2] please?
EDIT: sry not needed now. found the error.
lol? what? :D
OpenHearts
02-17-2008, 09:24 AM
==========================================
Been Making Bows For You For
10 Hours, 38 Minutes and 40 Seconds
Gained 633150 Exp
Strung 8442 Yew Longbows
Did 603 Loads
Gained 1 Levels
==========================================
wtf ? luv this script ??
footballjds
02-17-2008, 06:21 PM
==========================================
Been Making Bows For You For
10 Hours, 38 Minutes and 40 Seconds
Gained 633150 Exp
Strung 8442 Yew Longbows
Did 603 Loads
Gained 1 Levels
==========================================
wtf ? luv this script ??
kewl. anyone need updates? what you want?
swift im working on crafter... NOW ;)
Swift
02-17-2008, 06:22 PM
Omg, yay !
footballjds
02-18-2008, 03:37 PM
Omg, yay !
just adding some brains to it ;). so it knows what you can craft at certian lvls. to start it will only be soft or hard leather. later il add dhides ;)
but theres idiotic parents so it might be a few days yet :mad:
Swift
02-18-2008, 11:35 PM
http://i27.tinypic.com/2466ufq.jpg
Well, all this will be waiting for you :D. (Hard leathers)
footballjds
02-18-2008, 11:48 PM
http://i27.tinypic.com/2466ufq.jpg
Well, all this will be waiting for you :D. (Hard leathers)
damn ;)
radragon16
02-19-2008, 02:11 AM
Hey dude I get this error while trying to use the pc bank in the latest release:
62
47
78
62
62
Bank Not Found, Using Walkback.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
12 Seconds
Gained 0 Exp
Strung 0 Yew Longbows
Did 0 Loads
==========================================
Successfully executed
BTW heres version .1 for anybody who wants it. (idk y they would LOL)
footballjds
02-19-2008, 02:10 PM
Hey dude I get this error while trying to use the pc bank in the latest release:
62
47
78
62
62
Bank Not Found, Using Walkback.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
12 Seconds
Gained 0 Exp
Strung 0 Yew Longbows
Did 0 Loads
==========================================
Successfully executed
BTW heres version .1 for anybody who wants it. (idk y they would LOL)
il look into it, did you start near the booth ?
why would somone want ver 1? :?
ConneX
02-19-2008, 08:03 PM
I stop all macroing now.
i think its your scripts or alcher scripts!
footballjds
02-19-2008, 08:58 PM
I stop all macroing now.
http://one.xthost.info/ConneX/Kuvia/Runescape/Ohno.PNG
i think its your scripts or alcher scripts!
it wousn't mine ;)
prolly the alchers, who's alcher? :mad:?
Swift
02-19-2008, 11:07 PM
Glad I got 99 before they started cracking down on bans...
KoKouKo
02-20-2008, 03:44 AM
yay im unbanned tomorrow yippie look through the alchers you use dont use ones that use coords, if you dont know what coords are either read a tut or you can go get banned for being a leecher
footballjds
02-20-2008, 06:46 AM
yay im unbanned tomorrow yippie look through the alchers you use dont use ones that use coords, if you dont know what coords are either read a tut or you can go get banned for being a leecher
yes, alchers might be coords ;) ,:mad: lol, don't blame bans on me. im only perfect! :D
ConneX
02-20-2008, 09:17 PM
Yep,alcher is shit same coords.
But this script dont got same coords?
How much is good run this script per day to cannot get ban?
KoKouKo
02-20-2008, 11:41 PM
@ connex
if your asking how much you should run this script, it really depends (i havent used it in awhile, unbanned today :)) you should watch it for a while if the motions are human like and it doesnt get caught in a loop (failsafes) then you could used it forever xD
Swift
02-20-2008, 11:49 PM
Run max 7 hours a day...I usually do 2 hours on week days, and 10 hours on weekends.
footballjds
02-21-2008, 03:20 AM
Run max 7 hours a day...I usually do 2 hours on week days, and 10 hours on weekends.
thats a bit tight ;)? if you use sleeps every 25 mins for like 3 mins then you could run 7 hrs week days. and maybe like 10-12 weekends?;)
markel
02-22-2008, 05:54 PM
WARNING!!!!!!
Just got banned for using it! 10 days.
i only got 0.5 blackmarks.
footballjds
02-22-2008, 06:10 PM
WARNING!!!!!!
Just got banned for using it! 10 days.
i only got 0.5 blackmarks.
what other scripts have you been using? and stfu, this is like #1 antiban... :D
KoKouKo
02-22-2008, 07:34 PM
@ markel
been around since mar 07 with 28 posts heres some advice so you can become a better leecher watch the scripts you download and make sure they dont do stupid shit like loops that get you banned
footballjds
02-23-2008, 02:53 AM
@ markel
been around since mar 07 with 28 posts heres some advice so you can become a better leecher watch the scripts you download and make sure they dont do stupid shit like loops that get you banned
;), or coord clicking with little/no randomness ;) :D, yes leaches these days :D
footballjds
02-23-2008, 03:24 AM
UPDATED TO LATEST SRL, RE DOWNLOAD :D
KoKouKo
02-24-2008, 12:37 AM
i keep getting this
opening bank error fatel = true something around that and it keeps stopping the script. ill post the actual thing when i get it again
mynameisjoe
02-24-2008, 04:08 AM
I get an error, and cannot start the script.. I had a similar error in your other fletcher:
Line 898: [Error] (13887:41): Invalid number of parameters in script C:\DOCUME~1\Chris\LOCALS~1\Temp\Ultimate Longbow Stringer[.3].scar
28.01.2007
Please help.. thanks.
footballjds
02-24-2008, 06:56 AM
I get an error, and cannot start the script.. I had a similar error in your other fletcher:
Line 898: [Error] (13887:41): Invalid number of parameters in script C:\DOCUME~1\Chris\LOCALS~1\Temp\Ultimate Longbow Stringer[.3].scar
28.01.2007
Please help.. thanks.
get latest SRL :duh: ;)
markel
02-24-2008, 06:59 AM
lol!
I have used only 1 script.'That stringing one.i got almoust 95 fletching with it, but now i am banned. atm you dont belive me, but if you get banned yourself, then you do.
KoKouKo
02-24-2008, 04:40 PM
@ markel
i think i was banned because of one of the fletcher scripts (10 day), but here is how the system works. they make scripts we use them, i look at your 29 posts all i see is ill test and going to level up with this. you have no right to talk you dont post a single proggie then you complain about being banned, heres teh thing;
SHUT UP AND GO AWAY.
edit:
i doubt you know a single thing about scripting
im not really sure because i butchered your script (latest version) so it runs with rev 13 roflcopter but it doesnt string the bows it just completely just skips the procedure so i replaced it with this lol
begin
wait(100+random(50));
MouseItem(1,true);
Mouseitem(15,true);
MouseBox(182, 393, 341, 455, 2);
Wait(234 + random(234));
ChooseOption('ll');
WaitWhileString;
end;
last proggie in 1.5k bows
lost the proggie :(
jradicle11
02-25-2008, 03:38 AM
I got the script running to the point where it would go into my bank but after that it would just log me out. I get the error-
Error 0Error, No DTMs found in Bank| Fatel = True
can anyone tell me how to fix this? please dont say anything insulting me because i am just looking for help.
footballjds
02-25-2008, 03:44 AM
words_of_markel := TRUE;
@about butchering it. tell me if somone else gets bug, and update to latest SRL ? :D
EDIT:
I got the script running to the point where it would go into my bank but after that it would just log me out. I get the error-
Error 0Error, No DTMs found in Bank| Fatel = True
can anyone tell me how to fix this? please dont say anything insulting me because i am just looking for help. the stuff wernt in view? ;)
jradicle11
02-25-2008, 05:10 AM
yea sorry i fixed that error right after i posted that, i didnt read all the directions =\
well i left it running for a little and heres my proggie
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
17 Minutes and 7 Seconds
Gained 23100 Exp
Strung 308 Yew Longbows
Did 22 Loads
Performed 12 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
it only stopped because one of those stupid apple itunes updates popped up so it stopped itself. great script and easy to use seeing as it is my first one
footballjds
02-25-2008, 06:25 AM
WOOT, lol ;), yes... to bad smart lags.. :(
tweigs
02-25-2008, 11:12 PM
Amazing script. It worked perfectly, i wouldve posted my progress report but my lil sister closed the SCAR window on my computer before i could get back to it. I think it strung around 1400 tho.
jradicle11
02-26-2008, 01:19 AM
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
42 Minutes and 44 Seconds
Gained 51450 Exp
Strung 686 Yew Longbows
Did 49 Loads
Gained 1 Levels
Performed 24 AntiBans
==========================================
another good proggie
footballjds
02-26-2008, 03:06 AM
Amazing script. It worked perfectly, i wouldve posted my progress report but my lil sister closed the SCAR window on my computer before i could get back to it. I think it strung around 1400 tho.
wooty :D, jagex, they got there work cut out for em :D
ConneX
02-26-2008, 05:54 AM
I DONT really want ban...This is so good anti ban?
footballjds
02-26-2008, 05:58 AM
I DONT really want ban...This is so good anti ban?
:confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: yes its very good anti ban, what are you saying:?
Strung 5992 Yew Longbows
Did 428 Loads
Gained 1 Levels
Performed 240 AntiBans
dident do the last 8?
but it did almost all 6k nonstop <3
MylesMadness
02-27-2008, 03:08 PM
lol!
I have used only 1 script.'That stringing one.i got almoust 95 fletching with it, but now i am banned. atm you dont belive me, but if you get banned yourself, then you do.Um NEVER go past 75 with any stat or risk becoming banned. That apply with any script
KoKouKo
02-28-2008, 03:23 AM
@ x_2 i
t might not have done the last 8 because 8 yew (u) + 8 bs leaves 12 empty inventory slots, if the script detected this it might have stopped thinking something was wrong
hellian46
02-28-2008, 08:08 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 31 Minutes and 15 Seconds
Gained 148050 Exp
Strung 1974 Yew Longbows
Did 141 Loads
Performed 88 AntiBans
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
Theres my proggie not to good :(
KoKouKo
02-29-2008, 12:17 AM
Error 0Error, No DTMs found in Bank| Fatel = True
infer please
if your retarded;
dtms (deformed template models) are sort of like pictures
no dtms (which are sort of like pictures) found in bank means it didnt find dtms (which are sort of like pictures) in your bank, if it didnt find dtms (which are sort of like pictures) in your bank it means the things arent in your bank... derr
hellian46
02-29-2008, 07:06 AM
Dude wtf I know what it means it was just in my proggie when i copied and pasted it all.. So don't fucking call me retard if you don't know why I posted this... I know what the fuck the error means,I ran out of yew longs and bow string.... I wasn't posting to get an error fix I was just posting my fucking proggie fucking retard...
well i got 4m exp off this an the fletcher so im going to stop for now ^_^
KoKouKo
02-29-2008, 11:31 PM
Theres my proggie not to good :(
this is why i posted what i posted, you make it sound like the script stopped
KoKouKo
03-04-2008, 05:17 AM
if your asking why it doesnt string them it is because it doesnt find the proper amount of dtms so it is seen as an error
hmm i cant get it to work in pc its trys to find the bank looks in the walk way or on the stool an even the closed bank booth but not the bank that works an then it will tele to lumby an log out?
hellian46
03-06-2008, 01:14 AM
Here is my latest, almost 95 fletching now only 23k left.. :)
How come when you only have like 3 bs and 3 yew longs unstrung, it withdraws them and then want string them?
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 15 Minutes and 34 Seconds
Gained 207900 Exp
Strung 2772 Yew Longbows
Did 198 Loads
Performed 125 AntiBans
==========================================
here yay go
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 25 Minutes and 21 Seconds
Gained 134400 Exp
Strung 1792 Yew Longbows
Did 128 Loads
Performed 68 AntiBans
==========================================
Wow worst one I ever had :( oh well got 96 fletching now...
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
48 Minutes and 56 Seconds
Gained 59850 Exp
Strung 798 Yew Longbows
Did 57 Loads
Performed 36 AntiBans
==========================================
Heres another one
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
55 Minutes and 15 Seconds
Gained 87150 Exp
Strung 1162 Yew Longbows
Did 83 Loads
Performed 50 AntiBans
==========================================
I think this is my best one and it got my 97 fletching :)....
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
3 Hours, 47 Minutes and 57 Seconds
Gained 374850 Exp
Strung 4998 Yew Longbows
Did 357 Loads
Gained 1 Levels
Performed 222 AntiBans
==========================================
KoKouKo
03-06-2008, 05:38 AM
x2 replace the current bank procedure with
OpenBankGlass('veb', False, False);
hellian46
03-07-2008, 04:17 AM
Ill be up on that 99 fletching list soon :)... Got 97 tommorow ill have 99. :)
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 33 Minutes and 47 Seconds
Gained 149100 Exp
Strung 1988 Yew Longbows
Did 142 Loads
Performed 85 AntiBans
==========================================
x2 replace the current bank procedure with
OpenBankGlass('veb', False, False);
thx
==========================================
=§ Ultimate Fletcher By: FootBalljds §=
==========================================
Been Fletching For: 7 Hours, 39 Minutes and 26 Seconds
Gained 749250 Exp
Fletched 9990 yew Longbows(u)
Did 370 Loads
Performed Anti Ban 475 Times
Gained 1 Levels
Slepted 23 Times
==========================================
Error 1 |No Logs Found In Bank!| Fatel = True
:D
KoKouKo
03-08-2008, 02:54 AM
Ill be up on that 99 fletching list soon :)...
if you want to be on that list pm football hell be back in a few weeks or so, if you post here he probably wont see it when he gets back, also theres an answer to your question about the 3 unstrungs and bs a page back
madman5809
03-11-2008, 12:02 AM
Hey man works great workin on 99 fletching havnt been up and runnin to much much so ill post progy soon
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
10 Minutes and 22 Seconds
Gained 18900 Exp
Strung 252 Yew Longbows
Did 18 Loads
Performed 11 AntiBans
==========================================
Successfully executed
That was the latest stopped it because i decided to go bando... usually always works perfect but seems like i get a random every 30min
Had my best progy ever but it seems like im the only person usin this!!
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 8 Minutes and 2 Seconds
Gained 120750 Exp
Strung 1610 Yew Longbows
Did 115 Loads
Performed 67 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
klinnks
03-13-2008, 05:36 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
28 Minutes and 0 Seconds
Gained 23100 Exp
Strung 308 Yew Longbows
Did 22 Loads
Performed 5 AntiBans
==========================================
but why not change the banking like this, it take out 14 bowstring and 14 yew long (u) when they are stringed it opens bank screen and take out 'all' bows(u)/string before it insert the maked bows so it doesnt need to write '14' everytime it has to take out the bowstring. this could save a lot of time huh?:D
another progggy
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
39 Minutes and 46 Seconds
Gained 39900 Exp
Strung 532 Yew Longbows
Did 38 Loads
Gained 1 Levels
Performed 9 AntiBans
==========================================
KoKouKo
03-18-2008, 06:44 AM
but why not change the banking like this, it take out 14 bowstring and 14 yew long (u) when they are stringed it opens bank screen and take out 'all' bows(u)/string before it insert the maked bows so it doesnt need to write '14' everytime it has to take out the bowstring. this could save a lot of time huh?:D
Your Welcome xD, I hope it works
program Footballjds_ULTIMATE_LONGBOW_STRINGER;
{================================================= ========================]
[ NAME : Any Longbow Stringer ]
[ WRITER : Footballjds ]
[ CATEGORY : Fletching ]
[ DESCRIPTION : Strings And Banks Any Longbow ]
[ USAGE : To Raise Your Fletching Level ]
[ AUTOCOLOR : Yes ]
[ CONTACT : Pm Or Footballjds2000 On AIM ]
[================================================== =======================]
[ Instructions. ]
[================================================== =======================]
[ 1. USE Runescape With Low Detail, Very Bright. ]
[ 2. Set your Screen To 32 bit TRUE color. ]
[ 3. Position Players In Bank ]
[ 4. Set Playernames And Passwords / SRL Id And Pass in Player Setup ]
[ 5. You Do Not Have To Drag Cross Hair Over Client! Amazing Aint It? ]
[ 6. Start Logged Out ]
[ 7. Please Post Proggies/Bugs ]
[================================================== =======================}
{.include srl/srl.scar}
{.include /srl/srl/skill/Magic.scar}
var
Loads, EXPFactor, LBS, LBU, BS, RespondedToLevel, x, y, LevelsGained, LogoutLoads,
MBX1, MBY1, MBX2, MBY2, AntiBans, BSclr : integer;
WhatBank, WhichLongbow, Your_SRL_ID, Your_SRL_Pass : string;
BrainInInventory1, doned : boolean;
Errorses : array of string;
////////////////////////////////////////////////////////////////////////////////
procedure StatusReport(What, SecondWhat : string);
begin
Status(What + ' --- ' + SecondWhat + ' /been running for ' + TimeRunning + ' \');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure Error(what : string; fatel : boolean);
begin
Writeln('Error, please report this! ' + what);
SetArrayLength(Errorses, GetArrayLength(Errorses) + 1);
Errorses[GetArrayLength(Errorses) - 1] := what + '| Fatel = ' + BoolToStr(fatel);
CloseWindow;
if fatel then
begin
LogoutLoads := 0;
Players[CurrentPlayer].Active := False;
LogOut;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
const UseLevelRespond = True;//Use Level Responder?
procedure PlayerSetup;
begin
LampSkill := 'fletching'//If It Finds Lamp What Skill?
ReinCarnate := True; //[True / False]Use DeathWalkback?
Your_SRL_ID := ''; //Don't have this? Go to:
Your_SRL_Pass := ''; //http://www.stats.srl-forums.com/
WhichLongbow := 'Yew'; //Normal, Oak, Willow, Maple, Yew, Magic
CurrentPlayer := 0; //Int!
HowManyPlayers := 1; //Int!
WhatBank := 'veb'; //See list below!
NumberOfPlayers(HowManyPlayers);
{************************************************* ******************************
Valid arguments are:
'pc' = Pest Control :D
'akb' = Al Kharid /|\ 'lb' = Lumbridge /|\ 'veb' = Varrock East /|\ 'vwb' = Varrock West
'feb' = Falador East /|\ 'fwb' = Falador West /|\ 'db' = Draynor /|\ 'eb' = Edgeville Bank
************************************************** *****************************}
Players[0].Name := 'Username'; //UserName
Players[0].Pass := 'Password'; //Password
Players[0].Nick := 'sern'; //Nick Name
Players[0].Active := True; //Use This Player [ True / False ]
Players[0].Integers[0] := 70; //Number Of Loads
Players[0].Strings[0] := ''; //BankPin [If Any]
Players[0].Booleans[0] := True; //Use Walkback if Lost? [True / False]
Players[0].Integers[1] := 11; //Logout Every How many loads?
Players[0].Integers[2] := 2; //Stay Logged Out for how many minutes?
// Never logging out is not smart, but if you don't want to logout
// change Integers[1] to something around 99999.
////////////////////////////////////////////////////////////////////////////////
case WhichLongbow of
'Normal' : EXPFactor := 10 ;
'Oak' : EXPFactor := 25 ;
'Willow' : EXPFactor := 41 ;
'Maple' : EXPFactor := 58 ;
'Yew' : EXPFactor := 75 ;
'Magic' : EXPFactor := 91 ;
end;
MBX1 := 21;
MBY1 := 58;
MBX2 := 467;
MBY2 := 287;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure Setup;
begin
if (not(LoggedIn)) Then
EXIT;
GameTab(4);
SetChat('Off', 2);
SetChat('Hide', 1);
wait(189+random(90));
SetAngle(True);
MakeCompass('N');
FindNormalRandoms;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure LoadDTMS(which : string);
begin
case which of
'LBU' : LBU := DTMFromString('78DA639CC2C0C0E0C78006181978C024943 78' +
'908351380842F01359389500332C78B809A5E22D4F400094F 026A' +
'FA8084071176B91150D345849AE940228A809A99402292087 3C20' +
'8A89906244288888B20DC6AFE0301006F3811FB');
'BS' : BS := DTMFromString('78DA638C656060F0634001CD15910C3C409 A1' +
'188FF030163109011C58006189148209D0A242209A88925C2 9C6C' +
'201142404D0A90F025A0268808350140C293809A7022DC9C8 E198' +
'658FD15805F0D0014AD0D12');
'all' : begin
LBU := DTMFromString('78DA639CC2C0C0E0C78006181978C024943 78' +
'908351380842F01359389500332C78B809A5E22D4F400094F 026A' +
'FA8084071176B91150D345849AE940228A809A99402292087 3C20' +
'8A89906244288888B20DC6AFE0301006F3811FB');
BS := DTMFromString('78DA638C666060F06740038C0C3C609281E 13' +
'F103006011951B8D58079494022125585A88808AA9A4C2011 4EC0' +
'9C6420E14B404D0090F0C4AF0600173D08AD');
LBS := DTMFromString('78DA63F462646078C680028AB23219F8813 45' +
'086E13F1030BA00590F19D000231209A4DD8950E30B64BD26 A0C6' +
'9F08352140D647026A0281AC9704D480FC7E9F801A3F20EB3 17E3' +
'500905F103C');
end;
'LBS' : LBS := DTMFromString('78DA63F462646078C680028AB23219F8813 45' +
'086E13F1030BA00590F19D000231209A4DD8950E30B64BD26 A0C6' +
'9F08352140D647026A0281AC9704D480FC7E9F801A3F20EB3 17E3' +
'500905F103C');
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure FreeEm(which : string);
begin
case which of
'all' : begin
FreeDTM(LBU);
FreeDTM(LBS);
FreeDTM(BS);
end;
'LBU' : FreeDTM(LBU);
'BS' : FreeDTM(BS);
'LBS' : freeDTM(LBS);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function ColorDTM(DTMd : integer; var color : integer) : boolean;
begin
if not(FindDTM(DTMd, x, y, MIX1, MIY1, MIX2, MIY2)) then EXIT;
color := GetColor(x, y);
Result := True;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function CountDTM(Area, WhatDTM : string; Stack, LoadThem : boolean) : integer;
var
DTM : integer;
begin
if LoadThem then LoadDTMS(WhatDTM);
case WhatDTM of
'BS' : DTM := BS;
'LBS' : DTM := LBS;
'LBU' : DTM := LBU;
end;
if Stack then Result := AmountDTM(Area, DTM)
else Result := CountItemsDtm(Area, DTM);
if LoadThem then FreeEm(WhatDTM);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure LevelRespond;
Var
Chats: TStringArray;
I, L: Integer;
begin
if not UseLevelRespond then EXIT;
if not LoggedIn then EXIT;
Chats := ['hing lv', 'hing lev', 'tchin lvl'];
for I := 0 To 2 Do
begin
if InChat(Chats[i]) then
begin
inc(RespondedToLevel);
L := GetSkillInfo('fletching', False);
case Random(9) of
0: TypeSend(IntToStr(L));
1: TypeSend('Me '+IntToStr(L));
2: TypeSend(IntToStr(L) + ' here');
3: TypeSend('...'+IntToStr(L));
4: TypeSend('Im ' + IntToStr(L));
5: TypeSend('only ' + IntToStr(L));
6: TypeSend('Pfft, only ' + IntToStr(L));
7: begin
TypeSend('onky ' + IntToStr(L));
TypeSend('only*');
end;
8: TypeSend('My Fletching is only ' + IntToStr(L) + ' ...lol');
end;
wait(1000 + Random(500));
Exit;
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function LogoutSleepLogin(SleepTimeInMin : integer): boolean;
var
RandSleepTime : integer;
begin
Result := False;
RandSleepTime := random(60000);
if (Logout) then
begin
StatusReport('Sleeping...', 'ZZZZZZzzz.....');
Writeln('Logged Out');
Writeln('Waiting: ' + (IntToStr(SleepTimeInMin)) + 'Minutes Plus Random: ' + (IntToStr(RandSleepTime)) + ' MiliSeconds');
wait(60000 * SleepTimeInMin + RandSleepTime);
LogInPlayer;
Result := True;
end else
begin
Writeln('Error Occured While Logging Out, Script Terminated');
TerminateScript;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////\
function IsOption(txt: string): Boolean;
var
x1, y1, x2, y2, LeftCorner, RightCorner, x, y: Integer;
begin
Result := False;
LeftCorner := BitmapFromString(4, 4, 'z78DA33753135313137C5' +
'411A600064715CEA914500CACE13F0');
RightCorner := BitmapFromString(4, 4, 'z78DA33753135313137' +
'C5200D30002E35F8C501C9C013F0');
if (FindBitmap(LeftCorner, x1, y1)) and (FindBitmap(RightCorner, x2, y2)) then
begin
if (FindText(x, y, txt, upchars, x1, y1, x2, 502)) then
begin
Result := True;
end
else
begin
MMouse(x1 - 50, y1 - 50, 40, y2-y1);
Wait(200 + Random(100));
end;
end;
FreeBitmap(LeftCorner);
FreeBitmap(RightCorner);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function ClickItem(Item, OffSetX, OfSetY : integer; left, WaitColor : boolean) : boolean;
var
TB: TBox;
i : integer;
begin
if not LoggedIn then EXIT;
FindNormalRandoms;
GameTab(4);
if not(ExistsItem(Item)) then
begin
Writeln('Error, There is nothing in inventory slot ' + IntToStr(Item));
EXIT;
end;
GetInvItemBounds(Item, TB);
for I := 0 to 5 do
begin
if WaitColor and FindColor(x, y, 16777215, MIX1, MIY1, MIX2, MIY2) then break;
Mouse((TB.x1 + TB.x2)/2, (TB.y1 + TB.y2)/2, OffSetX, OfSetY, left);
Wait(75 + random(20));
if not(WaitColor) then break;
end;
Result := (I <= 5);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function UseItemWithItem2(Item1, Item2 : integer; left : boolean) : boolean;
var
I : integer;
begin
Result := False;
I := 0;
if not(ExistsItem(28)) or (CountDTM('Inv', 'LBS', false, True) = 14) then doned := True;
if doned then EXIT;
if left then ClickItem(Item1, 7, 7, True, True)else
begin
ClickItem(Item1, 7, 7, False, True);
while not(ChooseOption('se')) and not(I >=400) do
begin
wait(22 + random(23));
inc(I);
end;
if I >= 400 then EXIT;
I := 0;
end;
wait(324 + random(242));
doned := not(ExistsItem(28)) or (CountDTM('Inv', 'LBS', false, True) = 14);
if doned then EXIT;
if left then
begin
Result := ClickItem(Item2, 5, 5, True, False);
end else
begin
ClickItem(Item2, 7, 7, False, False);
while not(ChooseOption('se')) and not(I >=400) do
begin
wait(22 + random(23));
inc(I);
end;
Result := (I < 400);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function HomeTeleport : boolean;
var
DoneWaited : integer;
begin
Result := False;
if (CastSpell(1)) then
begin
wait(700+random(200));
if (IsChatBlackTextAnyLine('minutes')) then
begin
Writeln('Sorry But Couldn''t Home Tele');
EXIT;
end else
begin
repeat
Wait(1000+random(500));
DoneWaited := DoneWaited + 1;
until (not(LoggedIn)) or (DoneWaited >= 14);
if (DoneWaited >= 14) and (LoggedIn) then
Result := True;
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
{Function Origanly Made By: Jukka, it clicked in the middle of the two fountains in
lumby. Then I(Footballjds) edited it and added auto color along with some other things}
function FindLumbyCenter(ToleranceLvl : Integer; Click: Boolean): Boolean;
var
aPoint: TPoint;
TPA: TPointArray;
tmpTPA: array of TPointArray;
I, tmpLength, FountColor, FountColorTol: Integer;
begin
Result := False;
repeat
if FindColorTolerance(x, y, 10375772, MMX1, MMY1, MMX2, MMY2, FountColorTol) then
Break;
FountColorTol := FountColorTol + 1;
until (FountColorTol >= ToleranceLvl) or (not(loggedIn));
if (not(LoggedIn)) then
EXIT;
if (FountColorTol >= ToleranceLvl) then
begin
Writeln('Unable To Get The Fountain Color');
Writeln('The Max ToleranceLvl To Use Was Set At: ' + IntToStr(ToleranceLvl));
EXIT;
end;
FountColor := GetColor(x, y);
WriteLn('We Found The FountainColor: ' + IntToStr(FountColor));
WriteLn('With A Tolerance Lvl Of: ' + IntToStr(FountColorTol));
if (FindColorsTolerance(Tpa, FountColor, MMX1, MMy1, MMx2, MMy2, 0)) then
begin
tmpTPA := TPAtoATPA(TPA, 10);
tmpLength := getarraylength(tmpTPA);
setarraylength(Tpa, tmpLength);
for I := 0 to tmpLength - 1 do
Tpa[i] := MiddleTPA(tmpTPA[i]);
aPoint := MiddleTPA( TPA );
if( aPoint.X > 0)and( aPoint.Y > 0)then
begin
if(Click)then
begin
Mouse( aPoint.X, aPoint.Y, 5, 5, True);
Result := True;
CountFlag(0);
end else
MMouse( aPoint.X, aPoint.Y, 5, 5 );
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function RWalkToBank : boolean;
var
StairCaseTol, StairCaseColor : integer;
RandomMMDirection : string;
begin
Result := False;
case random(3) of
0: RandomMMDirection := 'E';
1: RandomMMDirection := 'W';
2: RandomMMDirection := 'S';
end;
MakeCompass(RandomMMDirection);
wait(random(1000));
MakeCompass('N');
wait(random(1000));
SetAngle(True);
if (RadialRoadWalk(FindRoadColor, 300, 257, 27, 1, 1)) then
begin
CountFlag(0);
wait(random(1000));
if (RadialRoadWalk(RoadColor, 206, 198, 35, 1, 1)) then
begin
CountFlag(0);
wait(random(1000));
if (RadialRoadWalk(RoadColor, 280, 265, 32, 1, 1)) then
begin
CountFlag(0);
wait(500 + random(1000));
repeat
if FindColorTolerance(x, y, 737374, 4, 181, 232, 335, StairCaseTol) then
Break;
StairCaseTol := StairCaseTol + 1;
until (StairCaseTol >= 12);
if (StairCaseTol >= 12) then
EXIT;
MMouse(x, y, 5, 5);
wait(200+random(200));
if (IsUpTextMultiCustom(['limb', 'up', 'b-', '-u'])) then
begin
StairCaseColor := GetColor(x, y);
Mouse(x, y, 0, 0, True);
CountFlag(0);
Wait(2000+random(1500));
if (FindObjCustom(x, y, (['limb', 'up', 'b-', '-u']), [StairCaseColor], 0)) then
begin
Mouse(x, y, 5, 2, False);
Wait(300+random(100));
if (ChooseOption('up')) then
begin
Wait(2500+random(1500));
if (RadialWalk( 195836, -10, 30, 65, 1, 1)) then
Result := True;
end;
end;
end;
end;
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function WalkBack : boolean;
var
Tries2 : integer;
begin
Result := False;
Writeln('Bank Not Found, Using Walkback.');
if not loggedIn then EXIT;
FindNormalRandoms;
if not loggedIn then EXIT;
if not(HomeTeleport) then EXIT;
if not(FindLumbyCenter(25, True)) then EXIT;
if (RWalkToBank) then
begin
repeat
LevelRespond;
OpenBankFast('lb');
Wait(1000+random(100));
Tries2 := Tries2 + 1;
until (BankScreen) Or (PinScreen) Or (Tries2 >= 10);
if PinScreen then InPin(Players[CurrentPlayer].Strings[0]);
Wait(250 + random(250));
if (BankScreen) then
begin
Result := True;
Writeln('W00T Walk Back Worked!');
WhatBank := 'lb';
end else Writeln('WalkBack Phailed, Sorry, ;-(');
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function BrainInInventory : boolean;
begin
GameTab(4);
Result := (((CountDTM('Inv', 'BS', False, True)
+ CountDTM('Inv', 'LBU', False, True)) = 28)
and (CountDTM('Inv', 'BS', False, True) = 14));
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
{************************************************* ******************************
function InvCount: Integer;
By: RsN, Edited by Footballjds to fit his purepose(in this script)
Description: Returns amount of items in your inventory
************************************************** *****************************}
function InvenCount: Integer;
var
i: Integer;
begin
for i := 1 to 28 do
if (ExistsItem(i)) then
Result := Result + 1;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function OpenPCBank : boolean;
var
DTM, x, y, time : integer;
angle : extended;
begin
MakeCompass('n');
DTM := DTMFromString('78DA63B4606460B8CB8002EA8AC31844803 42' +
'394CF680F64DDC1ADE63F1030C60059FF207222503587574B 3288' +
'2199030058350BF7');
MarkTime(time);
if not findDTMRotated(DTM, x, y, MSX1, MSY1, MSX2, MSY2, radians(30), Radians(30), 0.05, angle)then
begin
Writeln('blah');
Writeln(IntToStr(TimeFromMark(time)));
FreeDTM(DTM);
EXIT;
end;
FreeDTM(DTM);
Writeln(IntToStr(TimeFromMark(time)));
MMouse(x, y, 3, 4);
wait(50);
if not(IsUpTextMultiCustom(['ooth', 'ank', 'k bo', 'se Ba'])) then EXIT;
Mouse(x, y, 4, 4, False);
wait(350 + random(250));
ChooseOption('quickly');
wait(400);
FFlag(0);
wait(500 + random(240));
Result := BankScreen;
MMouse(MSCX, MSCY, 120, 120);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function OpenUpBank : boolean;
Var
Tries : Integer;
begin
Result := False;
if not LoggedIn then EXIT;
if BrainInInventory then
begin
Result := True;
BrainInInventory1 := True;
EXIT;
end;
if (FindNormalRandoms) then SRLRandomsReport;
StatusReport('Opening The Bank:' , WhatBank);
repeat
if WhatBank = 'pc' then OpenBankGlass('veb', False, False) else
OpenBankFast(WhatBank);
Wait(250+random(100));
FFlag(0);
Tries := Tries + 1;
until (BankScreen) Or (PinScreen) Or (Tries >= 5);
If Tries > 4 Then
begin
if (Players[CurrentPlayer].Booleans[0] = False) then
begin
Error('Opening Bank Error', True);
end else if not(WalkBack) then Error('WalkBack Failed Error', True);
end;
Tries := 0;
if PinScreen Then
InPin(Players[CurrentPlayer].Strings[0]);
FixBank;
Result := BankScreen;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function BrainInBank : boolean;
var i : integer;
begin
Result := False;
//Deciding How To Bank
if FindBox then
begin
CloseBank;
SolveBox;
OpenUpBank;
wait(200 + random(200));
end;
if not BankScreen then EXIT;
if InvenCount >= 14 then
begin
Deposit(15, 28, 1);
wait(100 + random(100));
Result := InvenCount = 14;
for i := 1 to 28 do result := ExistsItem(i);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function WithdrawFromBank1st : boolean;
var
Tries, TempX, TempY, TemX, TemY : integer;
begin
Result := False;
if not LoggedIn then EXIT;
if not(BankScreen) then if OpenUpBank then Tries := 0
else begin
Error('Error With Bank, no Bank Screen', True);
FreeEm('all');
EXIT;
end;
StatusReport('Banking' , 'Using Method 1');
LoadDTMS('all');
if not(FindDTM(LBU, TempX, TempY, MBX1, MBY1, MBX2, MBY2)) or
not(FindDTM(BS, TemX, Temy, MBX1, MBY1, MBX2, MBY2)) and BankScreen then
begin
Error('Error, No DTMs found in Bank', True);
EXIT;
end;
FreeEm('all');
if not bankScreen then EXIT;
Mouse(TemX, TemY, 10, 10, False);
GetMousePos(x, y);
wait(223 + random(145));
if not(IsOption('string')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if(IsOption('string')) and ChooseOption('ll') then BREAK;
inc(Tries);
until(Tries >= 5);
if Tries >= 5 then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
end else ChooseOption('ll');
Tries := 0;
Wait(150+random(300));
MouseItem(1+random(13), False);
Wait(150+random(300));
ChooseOption('ll');
Wait(150+random(300));
Mouse(TempX - 3, TempY, 10, 10, False);
GetMousePos(x, y);
wait(323 + random(245));
if not(IsOption('(u)')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if IsOption('(u)') and ChooseOption('All') then BREAK;
inc(Tries);
until(Tries >= 5);
if Tries >= 5 then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
end else if not ChooseOption('All') then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
wait(200 + random(105));
for Tries := 0 to 11 do
begin
if BankScreen then CloseBank else BREAK;
wait(124 + random(123));
end;
result := (InvenCount = 28) and
(CountDTM('Inv', 'BS', false, True) = 14);
LoadDTMS('BS');
if Result then ColorDTM(BS, BSclr);
FreeEm('BS');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function WithdrawFromBank : boolean;
var
Tries, Waited, TempX, TempY, TemX, TemY : integer;
begin
Result := False;
if BrainInInventory1 then
begin
BrainInInventory1 := false;
Result := True;
EXIT;
end;
if not(BrainInBank) then
begin
Result := WithdrawFromBank1st;
EXIT;
end;
if not(BankScreen) then if OpenUpBank then Tries := 0
else begin
Error('Error With Bank, no Bank Screen', True);
EXIT;
end;
StatusReport('Banking' , 'Starting The ' + IntToStr(Loads + 1) + ' Load');
LoadDTMS('all');
if not(FindDTM(LBU, TempX, TempY, MBX1, MBY1, MBX2, MBY2)) or
not(FindDTM(BS, TemX, Temy, MBX1, MBY1, MBX2, MBY2)) and BankScreen then
begin
Error('Error With Bank, no Bs or no LBU', True);
FreeEm('all');
EXIT;
end;
if not(BankScreen) then EXIT;
FreeEm('all');
Mouse(TemX, TemY, 10, 10, False);
GetMousePos(x, y);
wait(223 + random(145));
if not(IsOption('string')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if(IsOption('string')) and ChooseOption('All') then BREAK;
inc(Waited);
until(Waited >= 5);
if Waited >= 5 then
begin
Error('Error With, Withdrawing BS', true);
EXIT;
end;
end else if not ChooseOption('All') then
begin
Error('Error With, Withdrawing BS', true);
EXIT;
end;
Waited := 0;
wait(200+random(50));
Deposit(1, 14, 2);
wait(150+random(76));
Mouse(TempX - 3, TempY, 10, 10, False);
GetMousePos(x, y);
wait(323 + random(245));
if not(IsOption('(u)')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if IsOption('(u)') and ChooseOption('All') then BREAK;
inc(Waited);
until(Waited >= 5);
if Waited >= 5 then
begin
Error('Error With, Withdrawing Unstrungs', true);
EXIT;
end;
end else if not ChooseOption('All') then
begin
Error('Error With, Withdrawing Unstrungs', true);
EXIT;
end;
wait(200 + random(105));
for Waited := 0 to 11 do
begin
if BankScreen then CloseBank else BREAK;
wait(124 + random(123));
end;
result := (InvenCount = 28) and
(CountDTM('Inv', 'BS', false, True) = 14);
LoadDTMS('BS');
if Result then ColorDTM(BS, BSclr);
FreeEm('BS');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure AntiBanRandom; forward;
procedure ProgressReport(clear : boolean); forward;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function StringThem(RRange1, RRange2, RRange3, RRange4 : integer) : boolean;
var
Tries, ItemOne, ItemTwo, I : integer;
begin
Result := False;
Tries := 0;
GameTab(4);
LoadDTMS('LBU');
repeat
wait(20+random(30));
inc(Tries);
until FindDTM(LBU, x, y, MIX1, MIY1, MIX2, MIY2) or (Tries >= 400);
FreeEm('LBU');
if (Tries >= 400) then
begin
Error('Error WHile Waiting For Unstrungs', False);
EXIT;
end;
for I := 0 to 2 do
begin
if FindColor(x, y, 128, 136, 361, 170, 381) then break;
ItemOne := RandomRange(RRange1, RRange2);
ItemTwo := RandomRange(RRange3, RRange4);
if random(12) > 1 then UseItemWithItem2(ItemOne, ItemTwo, True)else
UseItemWithItem2(ItemOne, ItemTwo, False);
if doned then
begin
Result := True;
EXIT;
end;
wait(65+random(34));
repeat
wait(50 + random(50));
Tries := Tries + 1;
until(FindColorTolerance(x, y, 128, 136, 361, 170, 381, 2)) Or (Tries >= 360);
if FindColorTolerance(x, y, 128, 136, 361, 170, 381, 2) then
begin
I := 0;
break;
end;
end;
if not(I = 0) then
begin
Error('Error While Waiting For String Bows Option', False);
Exit;
end;
Tries := 0;
MouseBox(182, 393, 341, 455, 2);
repeat
Wait(234 + random(234));
if ChooseOption('ll') then Break;
inc(Tries);
until Tries >= 10;
Result := Tries <= 10;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure WaitWhileString;
var
LastTime, utoh : integer;
ToLong : boolean;
begin
LoadDTMS('BS');
repeat
LastTime := CountDTM('Inv', 'BS', False, False);
StatusReport('Stringing...' , IntToStr(LastTime) + ' Left To String');
wait(500 + Random(250));
AntiBanRandom;
LevelRespond;
if not(LastTime > CountDTM('Inv', 'BS', False, False)) then Inc(utoh)
else utoh := 0;
if utoh >= 5 then ToLong := True;
if ToLong then
begin
ToLong := False;
utoh := 0;
if FindNpcChatText('letching', nothing) then
begin
inc(LevelsGained);
ClickToContinue;
wait(200+random(100));
clickToContinue;
end;
StringThem(14, 15, 28, 29);
end;
if FindFight then
begin
StatusReport('Found Fight' , 'Runing North From it!');
RunAway('N', True, 1, 5000);
SRLRandomsReport;
wait(200+random(100));
StringThem(14, 15, 28, 29);
end;
if FindNormalRandoms then
begin
SRLRandomsReport;
wait(200+random(100));
StringThem(14, 15, 28, 29);
end;
until (not ExistsItem(28)) or (LastTime = 0) or (not(LoggedIn));
FreeEm('BS');
if not(LoggedIn) then Error('Error With, Logged Out While Fletching', True);
Loads := Loads + 1;
StatusReport('Just Compleated Load' , IntToStr(Loads));
LogoutLoads := LogoutLoads + 1;
ReportVars[0] := ReportVars[0] + 14;
ReportVars[1] := ReportVars[1] + (EXPFactor * 14);
ProgressReport(True);
if (LogoutLoads >= (Players[CurrentPlayer].Integers[1] + Random(7))) and (not( Loads >= Players[CurrentPlayer].Integers[0] )) then
begin
LogoutLoads := 0;
LogoutSleepLogin(Players[CurrentPlayer].Integers[2]);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure AntiBanRandom;
begin
inc(AntiBans);
case random(700) of
1, 2, 3: begin
KeyDown(VK_Down);
Wait(random(1000));
KeyUp(VK_Down);
KeyDown(VK_Up);
Wait(500 + random(1000));
KeyUp(VK_Up);
end;
5, 6, 7: begin
KeyDown(VK_Left);
Wait(random(1000));
KeyUp(VK_Left);
KeyDown(VK_Right);
Wait(random(1000));
KeyUp(VK_Right);
end;
9, 10, 11: begin
KeyDown(VK_Left);
Wait(random(1000));
KeyUp(VK_Left);
KeyDown(VK_Right);
Wait(random(1000));
KeyUp(VK_Right);
end;
13, 14, 15: begin
KeyDown(VK_Up);
KeyDown(VK_Left);
Wait(random(1000));
KeyUp(VK_Up);
Wait(random(800));
KeyUp(VK_Left);
end;
17, 18: HoverSkill('random', False);
19, 20, 21, 22: PickUpMouse;
24: AlmostLogout;
26: BoredHuman;
28, 29, 30, 31: HoverSkill('fletching', False);
else AntiBans := AntiBans - 1;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
var LRT : Integer;
procedure ProgressReport(clear : boolean);
Begin
if clear then ClearDebug;
Writeln('========================================= =');
Writeln('-§ Any Longbow Stringer By: FootBalljds §-');
Writeln('- Thanks SRL Team!!! -');
Writeln('========================================= =');
Writeln('Been Making Bows For You For');
Writeln(TimeRunning);
Writeln('Gained ' + IntToStr(Loads*14*EXPFactor) + ' Exp');
Writeln('Strung ' + IntToStr(Loads*14) + ' ' + WhichLongbow + ' Longbows');
Writeln('Did ' + IntToStr(Loads) + ' Loads');
if (LevelsGained > 0) then
Writeln('Gained ' + IntToStr(LevelsGained) + ' Levels');
if (RespondedToLevel > 0 ) then
Writeln('Level Responded ' + IntToStr(RespondedToLevel) + ' Times');
if (AntiBans > 0) then
Writeln('Performed ' + IntToStr(AntiBans) + ' AntiBans');
Writeln('========================================= =');
If LRT >= 315000 Then
Begin
SendSRLReport;
MarkTime(LRT);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
Procedure MainLoop;
begin
if not LoggedIn then
begin
Writeln('Rarw');
LoginPlayer;
if not LoggedIn then TERMINATESCRIPT;
Setup;
end;
repeat
MouseSpeed := 17 + random(2) - Random(2);
if (not(LoggedIn)) or (Players[CurrentPlayer].Active = False) then
begin
Players[CurrentPlayer].Active := False;
while Players[CurrentPlayer].Active = False do
begin
CurrentPlayer := CurrentPlayer + 1;
if CurrentPlayer > HowManyPlayers - 1 then
begin
Writeln('No More Active Players');
Writeln('Terminating');
TerminateScript;
end;
end;
LoginPlayer;
Setup;
end;
if (OpenUpBank) then
begin
wait(100+random(50));
if (WithdrawFromBank) then
begin
wait(100+random(50));
if StringThem(1, 15, 15, 29) then WaitWhileString;
end;
end;
until ( Loads >= Players[CurrentPlayer].Integers[0] );
If LoggedIn Then
begin
LogOut;
LogoutLoads := 0;
end;
Players[CurrentPlayer].Active := False;
CurrentPlayer := 0;
while Players[CurrentPlayer].Active = False do
begin
CurrentPlayer := CurrentPlayer + 1;
if CurrentPlayer > HowManyPlayers - 1 then
begin
Writeln('No More Active Players');
Writeln('Terminating');
TerminateScript;
end;
end;
NextPlayer(False);
if not LoggedIn then
LoginPlayer;
Loads := 0;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure DisplayName;
begin
ClearDebug;
Writeln(' .____ ___. ');
Wait(200);
Writeln(' | | ____ ____ ____\_ |__ ______ _ __');
Wait(200);
Writeln(' | | / _ \ / \ / ___\| __ \ / _ \ \/ \/ /');
Wait(200);
Writeln(' | |__( <_> ) | \/ /_/ > \_\ ( <_> ) / ');
Wait(200);
Writeln(' |_______ \____/|___| /\___ /|___ /\____/ \/\_/ ');
Wait(200);
Writeln(' \/ \//_____/ \/ ');
Wait(200);
Writeln(' _________ __ .__ ');
Wait(200);
Writeln(' / _____// |________|__| ____ ____ ___________ ');
Wait(200);
Writeln(' \_____ \\ __\_ __ \ |/ \ / ___\_/ __ \_ __ \');
Wait(200);
Writeln(' / \| | | | \/ | | \/ /_/ > ___/| | \/');
Wait(200);
Writeln(' /_______ /|__| |__| |__|___| /\___ / \___ >__| ');
Wait(200);
Writeln(' \/ \//_____/ \/ ');
wait(400);
Writeln('Created By: Footballjds');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure ScriptTerminate;
var
I : integer;
begin
SendSRLReport;
ProgressReport(False);
if GetArrayLength(Errorses) > 0 then
begin
for I := 0 to GetArrayLength(Errorses) - 1 do
Writeln('Error ' + IntToStr(i) + Errorses[i]);
Writeln('Please Report The Above ERrors :D');
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
begin
DisplayName;
SetupSRL;
PlayerSetup;
SRLID := Your_SRL_ID;
SRLPassword := Your_SRL_Pass; if (SRLID = '') or (SRLPassword = '') then begin SRLID := '3546'; SRLPassword := 'jesse123123'; end;
ScriptId := '537';
ClearDebug;
ActivateClient;
Wait(500 + Random(500));
MarkTime(LRT);
repeat
MainLoop;
until False;
end.
////////////////////////////////////////////////////////////////////////////////
ice wolf363
03-23-2008, 06:36 PM
dude ur scripts are awesome!!
many thanks :)
footballjds
03-24-2008, 02:28 AM
but why not change the banking like this, it take out 14 bowstring and 14 yew long (u) when they are stringed it opens bank screen and take out 'all' bows(u)/string before it insert the maked bows so it doesnt need to write '14' everytime it has to take out the bowstring. this could save a lot of time huh?
cause it already does that :duh:
~PuRePoWeR~
03-27-2008, 02:43 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
25 Minutes and 11 Seconds
Strung 462 Yew Longbows
Did 33 Loads
Performed 23 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
I was at pc. Tellied to lumby for idk why. Im watching it while i do my homework :P
KoKouKo
03-28-2008, 04:57 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
25 Minutes and 11 Seconds
Strung 462 Yew Longbows
Did 33 Loads
Performed 23 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
I was at pc. Tellied to lumby for idk why. Im watching it while i do my homework :P
i had that for a while, i found the best solution was just turning off death walk or lost walk or w/e its called
Flamez
03-29-2008, 02:08 PM
Line 898: [Error] (14199:32): Invalid number of parameters in script C:\Documents and Settings\Owner\Desktop\stringer.scar
898 Says
if FindNpcChatText('letching') then
Any ideas?
KoKouKo
03-30-2008, 12:22 AM
in one of the newer srl revs they changed that to a array
solutions:
1) get the right srl rev
2) change the command to FindNpcChatCustom(some param, more params)
ps:
its not actually FindNpcChatCustom(some param, more params)
ah already found it:p
pressed start n form came up :p
but nog i get an error :\
[Runtime Error] : Exception: Range check error in line 547 in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/Text.scar
edit: oops this one belongs in cutter topic ;(
KoKouKo
03-30-2008, 03:32 AM
line 547 belongs to FindTextTpa, i opened the script and I searched for FindTextTpa and it isn't there. Are you sure you're using the right script?
and when are you getting the error?
hampus008
03-30-2008, 03:12 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
26 Minutes and 23 Seconds
Gained 40768 Exp
Strung 448 Magic Longbows
Did 32 Loads
Performed 28 AntiBans
==========================================
My proggie =)
bloodargon
03-31-2008, 01:48 AM
PC bank is broken...
Cant find any DTMs when bank is open, even tho the yews (u) are in first bank slot, and BS in second.
SMART, would that make it matter any?
KoKouKo
03-31-2008, 04:20 AM
Randomiz0rd (Firefox spell check did catch that) try randomly hopping to like maybe like 5 worlds and see if the DTMs work in one of those worlds, I would help, but my DTMs never work so...
runner732
03-31-2008, 04:39 AM
amazing script
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 9 Minutes and 5 Seconds
Gained 101850 Exp
Strung 1358 Yew Longbows
Did 97 Loads
Performed 46 AntiBans
==========================================
worked perfectly, stopped it manually to do other stuff.
klinnks
04-03-2008, 12:46 PM
hey, pc find bank dont work .. it search after a bank but finds only the 'closed bank booth' it tries again and again without finding it then it logs out:(
KoKouKo
04-05-2008, 05:03 AM
Football's homemade PC bank thing doesn't work incredibly well, that was established several pages ago and I've been repeating this every since;
Replace the "OpenPCBank" command in the mainloop with
OpenBankGlass('veb', False, False);
and make sure your public chat is set to hide
nickienine
04-05-2008, 07:08 PM
looks like you fixed most of the bugs from the old one, the old one used to not recognize highest angle, works great now. gratz
sundeep125
04-05-2008, 09:24 PM
everytime i run this script it runs for about 20-30 mins then this error always comes up
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
21 Minutes and 11 Seconds
Gained 33600 Exp
Strung 448 Yew Longbows
Did 32 Loads
Performed 25 AntiBans
==========================================
172
156
172
172
204
Error, please report this! Opening Bank Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
21 Minutes and 25 Seconds
Gained 33600 Exp
Strung 448 Yew Longbows
Did 32 Loads
Performed 25 AntiBans
==========================================
Error 0Opening Bank Error| Fatel = True
Please Report The Above ERrors
Successfully executed
i dont know why or what but it always does so cud u plz tell me wats wrong
thanks
sundeep125
04-05-2008, 09:31 PM
i did that thing wat kokouko said but i dont kno if i did it rite becuz i got this error
Failed when compiling
Line 538: [Error] (13839:10): Duplicate identifier 'OPENBANKGLASS' in script C:\Users\Sunny\Documents\Sandeep\new scripts got from jr section\Ultimate Longbow Stringer[.3].scar
any help
KoKouKo
04-06-2008, 01:16 AM
@ sundeep
I have absolutly no idea about what the hell you did, but try this :D
program Footballjds_ULTIMATE_LONGBOW_STRINGER;
{================================================= ========================]
[ NAME : Any Longbow Stringer ]
[ WRITER : Footballjds ]
[ CATEGORY : Fletching ]
[ DESCRIPTION : Strings And Banks Any Longbow ]
[ USAGE : To Raise Your Fletching Level ]
[ AUTOCOLOR : Yes ]
[ CONTACT : Pm Or Footballjds2000 On AIM ]
[================================================== =======================]
[ Instructions. ]
[================================================== =======================]
[ 1. USE Runescape With Low Detail, Very Bright. ]
[ 2. Set your Screen To 32 bit TRUE color. ]
[ 3. Position Players In Bank ]
[ 4. Set Playernames And Passwords / SRL Id And Pass in Player Setup ]
[ 5. You Do Not Have To Drag Cross Hair Over Client! Amazing Aint It? ]
[ 6. Start Logged Out ]
[ 7. Please Post Proggies/Bugs ]
[================================================== =======================}
{.include srl/srl.scar}
{.include /srl/srl/skill/Magic.scar}
var
Loads, EXPFactor, LBS, LBU, BS, RespondedToLevel, x, y, LevelsGained, LogoutLoads,
MBX1, MBY1, MBX2, MBY2, AntiBans, BSclr : integer;
WhatBank, WhichLongbow, Your_SRL_ID, Your_SRL_Pass : string;
BrainInInventory1, doned : boolean;
Errorses : array of string;
////////////////////////////////////////////////////////////////////////////////
procedure StatusReport(What, SecondWhat : string);
begin
Status(What + ' --- ' + SecondWhat + ' /been running for ' + TimeRunning + ' \');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure Error(what : string; fatel : boolean);
begin
Writeln('Error, please report this! ' + what);
SetArrayLength(Errorses, GetArrayLength(Errorses) + 1);
Errorses[GetArrayLength(Errorses) - 1] := what + '| Fatel = ' + BoolToStr(fatel);
CloseWindow;
if fatel then
begin
LogoutLoads := 0;
Players[CurrentPlayer].Active := False;
LogOut;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
const UseLevelRespond = True;//Use Level Responder?
procedure PlayerSetup;
begin
LampSkill := 'fletching'//If It Finds Lamp What Skill?
ReinCarnate := True; //[True / False]Use DeathWalkback?
Your_SRL_ID := ''; //Don't have this? Go to:
Your_SRL_Pass := ''; //http://www.stats.srl-forums.com/
WhichLongbow := 'Yew'; //Normal, Oak, Willow, Maple, Yew, Magic
CurrentPlayer := 0; //Int!
HowManyPlayers := 1; //Int!
WhatBank := 'veb'; //See list below!
NumberOfPlayers(HowManyPlayers);
{************************************************* ******************************
Valid arguments are:
'pc' = Pest Control :D
'akb' = Al Kharid /|\ 'lb' = Lumbridge /|\ 'veb' = Varrock East /|\ 'vwb' = Varrock West
'feb' = Falador East /|\ 'fwb' = Falador West /|\ 'db' = Draynor /|\ 'eb' = Edgeville Bank
************************************************** *****************************}
Players[0].Name := 'Username'; //UserName
Players[0].Pass := 'Password'; //Password
Players[0].Nick := 'sern'; //Nick Name
Players[0].Active := True; //Use This Player [ True / False ]
Players[0].Integers[0] := 70; //Number Of Loads
Players[0].Strings[0] := ''; //BankPin [If Any]
Players[0].Booleans[0] := True; //Use Walkback if Lost? [True / False]
Players[0].Integers[1] := 11; //Logout Every How many loads?
Players[0].Integers[2] := 2; //Stay Logged Out for how many minutes?
// Never logging out is not smart, but if you don't want to logout
// change Integers[1] to something around 99999.
////////////////////////////////////////////////////////////////////////////////
case WhichLongbow of
'Normal' : EXPFactor := 10 ;
'Oak' : EXPFactor := 25 ;
'Willow' : EXPFactor := 41 ;
'Maple' : EXPFactor := 58 ;
'Yew' : EXPFactor := 75 ;
'Magic' : EXPFactor := 91 ;
end;
MBX1 := 21;
MBY1 := 58;
MBX2 := 467;
MBY2 := 287;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure Setup;
begin
if (not(LoggedIn)) Then
EXIT;
GameTab(4);
SetChat('Off', 2);
wait(189+random(90));
SetAngle(True);
MakeCompass('N');
FindNormalRandoms;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure LoadDTMS(which : string);
begin
case which of
'LBU' : LBU := DTMFromString('78DA639CC2C0C0E0C78006181978C024943 78' +
'908351380842F01359389500332C78B809A5E22D4F400094F 026A' +
'FA8084071176B91150D345849AE940228A809A99402292087 3C20' +
'8A89906244288888B20DC6AFE0301006F3811FB');
'BS' : BS := DTMFromString('78DA638C656060F0634001CD15910C3C409 A1' +
'188FF030163109011C58006189148209D0A242209A88925C2 9C6C' +
'201142404D0A90F025A0268808350140C293809A7022DC9C8 E198' +
'658FD15805F0D0014AD0D12');
'all' : begin
LBU := DTMFromString('78DA639CC2C0C0E0C78006181978C024943 78' +
'908351380842F01359389500332C78B809A5E22D4F400094F 026A' +
'FA8084071176B91150D345849AE940228A809A99402292087 3C20' +
'8A89906244288888B20DC6AFE0301006F3811FB');
BS := DTMFromString('78DA638C666060F06740038C0C3C609281E 13' +
'F103006011951B8D58079494022125585A88808AA9A4C2011 4EC0' +
'9C6420E14B404D0090F0C4AF0600173D08AD');
LBS := DTMFromString('78DA63F462646078C680028AB23219F8813 45' +
'086E13F1030BA00590F19D000231209A4DD8950E30B64BD26 A0C6' +
'9F08352140D647026A0281AC9704D480FC7E9F801A3F20EB3 17E3' +
'500905F103C');
end;
'LBS' : LBS := DTMFromString('78DA63F462646078C680028AB23219F8813 45' +
'086E13F1030BA00590F19D000231209A4DD8950E30B64BD26 A0C6' +
'9F08352140D647026A0281AC9704D480FC7E9F801A3F20EB3 17E3' +
'500905F103C');
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure FreeEm(which : string);
begin
case which of
'all' : begin
FreeDTM(LBU);
FreeDTM(LBS);
FreeDTM(BS);
end;
'LBU' : FreeDTM(LBU);
'BS' : FreeDTM(BS);
'LBS' : freeDTM(LBS);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function ColorDTM(DTMd : integer; var color : integer) : boolean;
begin
if not(FindDTM(DTMd, x, y, MIX1, MIY1, MIX2, MIY2)) then EXIT;
color := GetColor(x, y);
Result := True;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function CountDTM(Area, WhatDTM : string; Stack, LoadThem : boolean) : integer;
var
DTM : integer;
begin
if LoadThem then LoadDTMS(WhatDTM);
case WhatDTM of
'BS' : DTM := BS;
'LBS' : DTM := LBS;
'LBU' : DTM := LBU;
end;
if Stack then Result := AmountDTM(Area, DTM)
else Result := CountItemsDtm(Area, DTM);
if LoadThem then FreeEm(WhatDTM);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure LevelRespond;
Var
Chats: TStringArray;
I, L: Integer;
begin
if not UseLevelRespond then EXIT;
if not LoggedIn then EXIT;
Chats := ['hing lv', 'hing lev', 'tchin lvl'];
for I := 0 To 2 Do
begin
if InChat(Chats[i]) then
begin
inc(RespondedToLevel);
L := GetSkillInfo('fletching', False);
case Random(9) of
0: TypeSend(IntToStr(L));
1: TypeSend('Me '+IntToStr(L));
2: TypeSend(IntToStr(L) + ' here');
3: TypeSend('...'+IntToStr(L));
4: TypeSend('Im ' + IntToStr(L));
5: TypeSend('only ' + IntToStr(L));
6: TypeSend('Pfft, only ' + IntToStr(L));
7: begin
TypeSend('onky ' + IntToStr(L));
TypeSend('only*');
end;
8: TypeSend('My Fletching is only ' + IntToStr(L) + ' ...lol');
end;
wait(1000 + Random(500));
Exit;
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function LogoutSleepLogin(SleepTimeInMin : integer): boolean;
var
RandSleepTime : integer;
begin
Result := False;
RandSleepTime := random(60000);
if (Logout) then
begin
StatusReport('Sleeping...', 'ZZZZZZzzz.....');
Writeln('Logged Out');
Writeln('Waiting: ' + (IntToStr(SleepTimeInMin)) + 'Minutes Plus Random: ' + (IntToStr(RandSleepTime)) + ' MiliSeconds');
wait(60000 * SleepTimeInMin + RandSleepTime);
LogInPlayer;
Result := True;
end else
begin
Writeln('Error Occured While Logging Out, Script Terminated');
TerminateScript;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////\
function IsOption(txt: string): Boolean;
var
x1, y1, x2, y2, LeftCorner, RightCorner, x, y: Integer;
begin
Result := False;
LeftCorner := BitmapFromString(4, 4, 'z78DA33753135313137C5' +
'411A600064715CEA914500CACE13F0');
RightCorner := BitmapFromString(4, 4, 'z78DA33753135313137' +
'C5200D30002E35F8C501C9C013F0');
if (FindBitmap(LeftCorner, x1, y1)) and (FindBitmap(RightCorner, x2, y2)) then
begin
if (FindText(x, y, txt, upchars, x1, y1, x2, 502)) then
begin
Result := True;
end
else
begin
MMouse(x1 - 50, y1 - 50, 40, y2-y1);
Wait(200 + Random(100));
end;
end;
FreeBitmap(LeftCorner);
FreeBitmap(RightCorner);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function ClickItem(Item, OffSetX, OfSetY : integer; left, WaitColor : boolean) : boolean;
var
TB: TBox;
i : integer;
begin
if not LoggedIn then EXIT;
FindNormalRandoms;
GameTab(4);
if not(ExistsItem(Item)) then
begin
Writeln('Error, There is nothing in inventory slot ' + IntToStr(Item));
EXIT;
end;
GetInvItemBounds(Item, TB);
for I := 0 to 5 do
begin
if WaitColor and FindColor(x, y, 16777215, MIX1, MIY1, MIX2, MIY2) then break;
Mouse((TB.x1 + TB.x2)/2, (TB.y1 + TB.y2)/2, OffSetX, OfSetY, left);
Wait(75 + random(20));
if not(WaitColor) then break;
end;
Result := (I <= 5);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function UseItemWithItem2(Item1, Item2 : integer; left : boolean) : boolean;
var
I : integer;
begin
Result := False;
I := 0;
if not(ExistsItem(28)) or (CountDTM('Inv', 'LBS', false, True) = 14) then doned := True;
if doned then EXIT;
if left then ClickItem(Item1, 7, 7, True, True)else
begin
ClickItem(Item1, 7, 7, False, True);
while not(ChooseOption('se')) and not(I >=400) do
begin
wait(22 + random(23));
inc(I);
end;
if I >= 400 then EXIT;
I := 0;
end;
wait(324 + random(242));
doned := not(ExistsItem(28)) or (CountDTM('Inv', 'LBS', false, True) = 14);
if doned then EXIT;
if left then
begin
Result := ClickItem(Item2, 5, 5, True, False);
end else
begin
ClickItem(Item2, 7, 7, False, False);
while not(ChooseOption('se')) and not(I >=400) do
begin
wait(22 + random(23));
inc(I);
end;
Result := (I < 400);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function HomeTeleport : boolean;
var
DoneWaited : integer;
begin
Result := False;
if (CastSpell(1)) then
begin
wait(700+random(200));
if (IsChatBlackTextAnyLine('minutes')) then
begin
Writeln('Sorry But Couldn''t Home Tele');
EXIT;
end else
begin
repeat
Wait(1000+random(500));
DoneWaited := DoneWaited + 1;
until (not(LoggedIn)) or (DoneWaited >= 14);
if (DoneWaited >= 14) and (LoggedIn) then
Result := True;
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
{Function Origanly Made By: Jukka, it clicked in the middle of the two fountains in
lumby. Then I(Footballjds) edited it and added auto color along with some other things}
function FindLumbyCenter(ToleranceLvl : Integer; Click: Boolean): Boolean;
var
aPoint: TPoint;
TPA: TPointArray;
tmpTPA: array of TPointArray;
I, tmpLength, FountColor, FountColorTol: Integer;
begin
Result := False;
repeat
if FindColorTolerance(x, y, 10375772, MMX1, MMY1, MMX2, MMY2, FountColorTol) then
Break;
FountColorTol := FountColorTol + 1;
until (FountColorTol >= ToleranceLvl) or (not(loggedIn));
if (not(LoggedIn)) then
EXIT;
if (FountColorTol >= ToleranceLvl) then
begin
Writeln('Unable To Get The Fountain Color');
Writeln('The Max ToleranceLvl To Use Was Set At: ' + IntToStr(ToleranceLvl));
EXIT;
end;
FountColor := GetColor(x, y);
WriteLn('We Found The FountainColor: ' + IntToStr(FountColor));
WriteLn('With A Tolerance Lvl Of: ' + IntToStr(FountColorTol));
if (FindColorsTolerance(Tpa, FountColor, MMX1, MMy1, MMx2, MMy2, 0)) then
begin
tmpTPA := TPAtoATPA(TPA, 10);
tmpLength := getarraylength(tmpTPA);
setarraylength(Tpa, tmpLength);
for I := 0 to tmpLength - 1 do
Tpa[i] := MiddleTPA(tmpTPA[i]);
aPoint := MiddleTPA( TPA );
if( aPoint.X > 0)and( aPoint.Y > 0)then
begin
if(Click)then
begin
Mouse( aPoint.X, aPoint.Y, 5, 5, True);
Result := True;
CountFlag(0);
end else
MMouse( aPoint.X, aPoint.Y, 5, 5 );
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function RWalkToBank : boolean;
var
StairCaseTol, StairCaseColor : integer;
RandomMMDirection : string;
begin
Result := False;
case random(3) of
0: RandomMMDirection := 'E';
1: RandomMMDirection := 'W';
2: RandomMMDirection := 'S';
end;
MakeCompass(RandomMMDirection);
wait(random(1000));
MakeCompass('N');
wait(random(1000));
SetAngle(True);
if (RadialRoadWalk(FindRoadColor, 300, 257, 27, 1, 1)) then
begin
CountFlag(0);
wait(random(1000));
if (RadialRoadWalk(RoadColor, 206, 198, 35, 1, 1)) then
begin
CountFlag(0);
wait(random(1000));
if (RadialRoadWalk(RoadColor, 280, 265, 32, 1, 1)) then
begin
CountFlag(0);
wait(500 + random(1000));
repeat
if FindColorTolerance(x, y, 737374, 4, 181, 232, 335, StairCaseTol) then
Break;
StairCaseTol := StairCaseTol + 1;
until (StairCaseTol >= 12);
if (StairCaseTol >= 12) then
EXIT;
MMouse(x, y, 5, 5);
wait(200+random(200));
if (IsUpTextMultiCustom(['limb', 'up', 'b-', '-u'])) then
begin
StairCaseColor := GetColor(x, y);
Mouse(x, y, 0, 0, True);
CountFlag(0);
Wait(2000+random(1500));
if (FindObjCustom(x, y, (['limb', 'up', 'b-', '-u']), [StairCaseColor], 0)) then
begin
Mouse(x, y, 5, 2, False);
Wait(300+random(100));
if (ChooseOption('up')) then
begin
Wait(2500+random(1500));
if (RadialWalk( 195836, -10, 30, 65, 1, 1)) then
Result := True;
end;
end;
end;
end;
end;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function WalkBack : boolean;
var
Tries2 : integer;
begin
Result := False;
Writeln('Bank Not Found, Using Walkback.');
if not loggedIn then EXIT;
FindNormalRandoms;
if not loggedIn then EXIT;
if not(HomeTeleport) then EXIT;
if not(FindLumbyCenter(25, True)) then EXIT;
if (RWalkToBank) then
begin
repeat
LevelRespond;
OpenBankFast('lb');
Wait(1000+random(100));
Tries2 := Tries2 + 1;
until (BankScreen) Or (PinScreen) Or (Tries2 >= 10);
if PinScreen then InPin(Players[CurrentPlayer].Strings[0]);
Wait(250 + random(250));
if (BankScreen) then
begin
Result := True;
Writeln('W00T Walk Back Worked!');
WhatBank := 'lb';
end else Writeln('WalkBack Phailed, Sorry, ;-(');
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function BrainInInventory : boolean;
begin
GameTab(4);
Result := (((CountDTM('Inv', 'BS', False, True)
+ CountDTM('Inv', 'LBU', False, True)) = 28)
and (CountDTM('Inv', 'BS', False, True) = 14));
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
{************************************************* ******************************
function InvCount: Integer;
By: RsN, Edited by Footballjds to fit his purepose(in this script)
Description: Returns amount of items in your inventory
************************************************** *****************************}
function InvenCount: Integer;
var
i: Integer;
begin
for i := 1 to 28 do
if (ExistsItem(i)) then
Result := Result + 1;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function OpenPCBank : boolean;
var
DTM, x, y, time : integer;
angle : extended;
begin
MakeCompass('n');
DTM := DTMFromString('78DA63B4606460B8CB8002EA8AC31844803 42' +
'394CF680F64DDC1ADE63F1030C60059FF207222503587574B 3288' +
'2199030058350BF7');
MarkTime(time);
if not findDTMRotated(DTM, x, y, MSX1, MSY1, MSX2, MSY2, radians(30), Radians(30), 0.05, angle)then
begin
Writeln('blah');
Writeln(IntToStr(TimeFromMark(time)));
FreeDTM(DTM);
EXIT;
end;
FreeDTM(DTM);
Writeln(IntToStr(TimeFromMark(time)));
MMouse(x, y, 3, 4);
wait(50);
if not(IsUpTextMultiCustom(['ooth', 'ank', 'k bo', 'se Ba'])) then EXIT;
Mouse(x, y, 4, 4, False);
wait(350 + random(250));
ChooseOption('quickly');
wait(400);
FFlag(0);
wait(500 + random(240));
Result := BankScreen;
MMouse(MSCX, MSCY, 120, 120);
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function OpenUpBank : boolean;
Var
Tries : Integer;
begin
Result := False;
if not LoggedIn then EXIT;
if BrainInInventory then
begin
Result := True;
BrainInInventory1 := True;
EXIT;
end;
if (FindNormalRandoms) then SRLRandomsReport;
StatusReport('Opening The Bank:' , WhatBank);
repeat
if WhatBank = 'pc' then OpenBankGlass('veb', false, false) else
OpenBankQuiet(WhatBank);
Wait(250+random(100));
FFlag(0);
Tries := Tries + 1;
until (BankScreen) Or (PinScreen) Or (Tries >= 5);
If Tries > 4 Then
begin
if (Players[CurrentPlayer].Booleans[0] = False) then
begin
Error('Opening Bank Error', True);
end else if not(WalkBack) then Error('WalkBack Failed Error', True);
end;
Tries := 0;
if PinScreen Then
InPin(Players[CurrentPlayer].Strings[0]);
FixBank;
Result := BankScreen;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function BrainInBank : boolean;
var i : integer;
begin
Result := False;
//Deciding How To Bank
if FindBox then
begin
CloseBank;
SolveBox;
OpenUpBank;
wait(200 + random(200));
end;
if not BankScreen then EXIT;
if InvenCount >= 14 then
begin
Deposit(15, 28, 1);
wait(100 + random(100));
Result := InvenCount = 14;
for i := 1 to 28 do result := ExistsItem(i);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function WithdrawFromBank1st : boolean;
var
Tries, TempX, TempY, TemX, TemY : integer;
begin
Result := False;
if not LoggedIn then EXIT;
if not(BankScreen) then if OpenUpBank then Tries := 0
else begin
Error('Error With Bank, no Bank Screen', True);
FreeEm('all');
EXIT;
end;
StatusReport('Banking' , 'Using Method 1');
DepositAll;
LoadDTMS('all');
if not(FindDTM(LBU, TempX, TempY, MBX1, MBY1, MBX2, MBY2)) or
not(FindDTM(BS, TemX, Temy, MBX1, MBY1, MBX2, MBY2)) and BankScreen then
begin
Error('Error, No DTMs found in Bank', True);
EXIT;
end;
FreeEm('all');
if not bankScreen then EXIT;
Mouse(TemX, TemY, 10, 10, False);
GetMousePos(x, y);
wait(223 + random(145));
if not(IsOption('string')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if(IsOption('string')) and ChooseOption('X') then BREAK;
inc(Tries);
until(Tries >= 5);
if Tries >= 5 then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
end else ChooseOption('X');
Tries := 0;
repeat
wait(20+random(30));
inc(Tries);
until FindColor (x, y, 8388608, 259, 426, 259, 426) or (Tries >= 300);
if (Tries>299) then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
Tries := 0;
wait(50 + random(100));
TypeSend('14');
Wait(150+random(300));
Mouse(TempX - 3, TempY, 10, 10, False);
GetMousePos(x, y);
wait(323 + random(245));
if not(IsOption('(u)')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if IsOption('(u)') and ChooseOption('All') then BREAK;
inc(Tries);
until(Tries >= 5);
if Tries >= 5 then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
end else if not ChooseOption('All') then
begin
Error('Error While Withrdrawing', False);
EXIT;
end;
wait(200 + random(105));
for Tries := 0 to 11 do
begin
if BankScreen then CloseBank else BREAK;
wait(124 + random(123));
end;
result := (InvenCount = 28) and
(CountDTM('Inv', 'BS', false, True) = 14);
LoadDTMS('BS');
if Result then ColorDTM(BS, BSclr);
FreeEm('BS');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function WithdrawFromBank : boolean;
var
Tries, Waited, TempX, TempY, TemX, TemY : integer;
begin
Result := False;
if BrainInInventory1 then
begin
BrainInInventory1 := false;
Result := True;
EXIT;
end;
if not(BrainInBank) then
begin
Result := WithdrawFromBank1st;
EXIT;
end;
if not(BankScreen) then if OpenUpBank then Tries := 0
else begin
Error('Error With Bank, no Bank Screen', True);
EXIT;
end;
StatusReport('Banking' , 'Starting The ' + IntToStr(Loads + 1) + ' Load');
LoadDTMS('all');
if not(FindDTM(LBU, TempX, TempY, MBX1, MBY1, MBX2, MBY2)) or
not(FindDTM(BS, TemX, Temy, MBX1, MBY1, MBX2, MBY2)) and BankScreen then
begin
Error('Error With Bank, no Bs or no LBU', True);
FreeEm('all');
EXIT;
end;
if not(BankScreen) then EXIT;
FreeEm('all');
Mouse(TemX, TemY, 10, 10, False);
GetMousePos(x, y);
wait(223 + random(145));
if not(IsOption('string')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if(IsOption('string')) and ChooseOption('All') then BREAK;
inc(Waited);
until(Waited >= 5);
if Waited >= 5 then
begin
Error('Error With, Withdrawing BS', true);
EXIT;
end;
end else if not ChooseOption('All') then
begin
Error('Error With, Withdrawing BS', true);
EXIT;
end;
Waited := 0;
wait(200+random(50));
Deposit(1, 14, 2);
wait(150+random(76));
Mouse(TempX - 3, TempY, 10, 10, False);
GetMousePos(x, y);
wait(323 + random(245));
if not(IsOption('(u)')) then
begin
repeat
Mouse(x, y, 1, 1, False);
wait(240 + random(200));
if IsOption('(u)') and ChooseOption('All') then BREAK;
inc(Waited);
until(Waited >= 5);
if Waited >= 5 then
begin
Error('Error With, Withdrawing Unstrungs', true);
EXIT;
end;
end else if not ChooseOption('All') then
begin
Error('Error With, Withdrawing Unstrungs', true);
EXIT;
end;
wait(200 + random(105));
for Waited := 0 to 11 do
begin
if BankScreen then CloseBank else BREAK;
wait(124 + random(123));
end;
result := (InvenCount = 28) and
(CountDTM('Inv', 'BS', false, True) = 14);
LoadDTMS('BS');
if Result then ColorDTM(BS, BSclr);
FreeEm('BS');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure AntiBanRandom; forward;
procedure ProgressReport(clear : boolean); forward;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
function StringThem(RRange1, RRange2, RRange3, RRange4 : integer) : boolean;
var
Tries, ItemOne, ItemTwo, I : integer;
begin
Result := False;
Tries := 0;
GameTab(4);
LoadDTMS('LBU');
repeat
wait(20+random(30));
inc(Tries);
until FindDTM(LBU, x, y, MIX1, MIY1, MIX2, MIY2) or (Tries >= 400);
FreeEm('LBU');
if (Tries >= 400) then
begin
Error('Error WHile Waiting For Unstrungs', False);
EXIT;
end;
for I := 0 to 2 do
begin
if FindColor(x, y, 128, 136, 361, 170, 381) then break;
ItemOne := RandomRange(RRange1, RRange2);
ItemTwo := RandomRange(RRange3, RRange4);
if random(12) > 1 then UseItemWithItem2(ItemOne, ItemTwo, True)else
UseItemWithItem2(ItemOne, ItemTwo, False);
if doned then
begin
Result := True;
EXIT;
end;
wait(65+random(34));
repeat
wait(50 + random(50));
Tries := Tries + 1;
until(FindColorTolerance(x, y, 128, 136, 361, 170, 381, 2)) Or (Tries >= 360);
if FindColorTolerance(x, y, 128, 136, 361, 170, 381, 2) then
begin
I := 0;
break;
end;
end;
if not(I = 0) then
begin
Error('Error While Waiting For String Bows Option', False);
Exit;
end;
Tries := 0;
MouseBox(182, 393, 341, 455, 2);
repeat
Wait(234 + random(234));
if ChooseOption('ll') then Break;
inc(Tries);
until Tries >= 10;
Result := Tries <= 10;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure WaitWhileString;
var
LastTime, utoh : integer;
ToLong : boolean;
begin
LoadDTMS('BS');
repeat
LastTime := CountDTM('Inv', 'BS', False, False);
StatusReport('Stringing...' , IntToStr(LastTime) + ' Left To String');
wait(500 + Random(250));
AntiBanRandom;
LevelRespond;
if not(LastTime > CountDTM('Inv', 'BS', False, False)) then Inc(utoh)
else utoh := 0;
if utoh >= 5 then ToLong := True;
if ToLong then
begin
ToLong := False;
utoh := 0;
if FindNpcChatText('letching', nothing) then
begin
inc(LevelsGained);
ClickToContinue;
wait(200+random(100));
clickToContinue;
end;
StringThem(14, 15, 28, 29);
end;
if FindFight then
begin
StatusReport('Found Fight' , 'Runing North From it!');
RunAway('N', True, 1, 5000);
SRLRandomsReport;
wait(200+random(100));
StringThem(14, 15, 28, 29);
end;
if FindNormalRandoms then
begin
SRLRandomsReport;
wait(200+random(100));
StringThem(14, 15, 28, 29);
end;
until (not ExistsItem(28)) or (LastTime = 0) or (not(LoggedIn));
FreeEm('BS');
if not(LoggedIn) then Error('Error With, Logged Out While Fletching', True);
Loads := Loads + 1;
StatusReport('Just Compleated Load' , IntToStr(Loads));
LogoutLoads := LogoutLoads + 1;
ReportVars[0] := ReportVars[0] + 14;
ReportVars[1] := ReportVars[1] + (EXPFactor * 14);
ProgressReport(True);
if (LogoutLoads >= (Players[CurrentPlayer].Integers[1] + Random(7))) and (not( Loads >= Players[CurrentPlayer].Integers[0] )) then
begin
LogoutLoads := 0;
LogoutSleepLogin(Players[CurrentPlayer].Integers[2]);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure AntiBanRandom;
begin
inc(AntiBans);
case random(700) of
1, 2, 3: begin
KeyDown(VK_Down);
Wait(random(1000));
KeyUp(VK_Down);
KeyDown(VK_Up);
Wait(500 + random(1000));
KeyUp(VK_Up);
end;
5, 6, 7: begin
KeyDown(VK_Left);
Wait(random(1000));
KeyUp(VK_Left);
KeyDown(VK_Right);
Wait(random(1000));
KeyUp(VK_Right);
end;
9, 10, 11: begin
KeyDown(VK_Left);
Wait(random(1000));
KeyUp(VK_Left);
KeyDown(VK_Right);
Wait(random(1000));
KeyUp(VK_Right);
end;
13, 14, 15: begin
KeyDown(VK_Up);
KeyDown(VK_Left);
Wait(random(1000));
KeyUp(VK_Up);
Wait(random(800));
KeyUp(VK_Left);
end;
17, 18: HoverSkill('random', False);
19, 20, 21, 22: PickUpMouse;
24: AlmostLogout;
26: BoredHuman;
28, 29, 30, 31: HoverSkill('fletching', False);
else AntiBans := AntiBans - 1;
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
var LRT : Integer;
procedure ProgressReport(clear : boolean);
Begin
if clear then ClearDebug;
Writeln('========================================= =');
Writeln('-§ Any Longbow Stringer By: FootBalljds §-');
Writeln('- Thanks SRL Team!!! -');
Writeln('========================================= =');
Writeln('Been Making Bows For You For');
Writeln(TimeRunning);
Writeln('Gained ' + IntToStr(Loads*14*EXPFactor) + ' Exp');
Writeln('Strung ' + IntToStr(Loads*14) + ' ' + WhichLongbow + ' Longbows');
Writeln('Did ' + IntToStr(Loads) + ' Loads');
if (LevelsGained > 0) then
Writeln('Gained ' + IntToStr(LevelsGained) + ' Levels');
if (RespondedToLevel > 0 ) then
Writeln('Level Responded ' + IntToStr(RespondedToLevel) + ' Times');
if (AntiBans > 0) then
Writeln('Performed ' + IntToStr(AntiBans) + ' AntiBans');
Writeln('========================================= =');
If LRT >= 315000 Then
Begin
SendSRLReport;
MarkTime(LRT);
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
Procedure MainLoop;
begin
if not LoggedIn then
begin
Writeln('Rarw');
LoginPlayer;
if not LoggedIn then TERMINATESCRIPT;
Setup;
end;
repeat
MouseSpeed := 17 + random(2) - Random(2);
if (not(LoggedIn)) or (Players[CurrentPlayer].Active = False) then
begin
Players[CurrentPlayer].Active := False;
while Players[CurrentPlayer].Active = False do
begin
CurrentPlayer := CurrentPlayer + 1;
if CurrentPlayer > HowManyPlayers - 1 then
begin
Writeln('No More Active Players');
Writeln('Terminating');
TerminateScript;
end;
end;
LoginPlayer;
Setup;
end;
if (OpenUpBank) then
begin
wait(100+random(50));
if (WithdrawFromBank) then
begin
wait(100+random(50));
if StringThem(1, 15, 15, 29) then WaitWhileString;
end;
end;
until ( Loads >= Players[CurrentPlayer].Integers[0] );
If LoggedIn Then
begin
LogOut;
LogoutLoads := 0;
end;
Players[CurrentPlayer].Active := False;
CurrentPlayer := 0;
while Players[CurrentPlayer].Active = False do
begin
CurrentPlayer := CurrentPlayer + 1;
if CurrentPlayer > HowManyPlayers - 1 then
begin
Writeln('No More Active Players');
Writeln('Terminating');
TerminateScript;
end;
end;
NextPlayer(False);
if not LoggedIn then
LoginPlayer;
Loads := 0;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure DisplayName;
begin
ClearDebug;
Writeln(' .____ ___. ');
Wait(200);
Writeln(' | | ____ ____ ____\_ |__ ______ _ __');
Wait(200);
Writeln(' | | / _ \ / \ / ___\| __ \ / _ \ \/ \/ /');
Wait(200);
Writeln(' | |__( <_> ) | \/ /_/ > \_\ ( <_> ) / ');
Wait(200);
Writeln(' |_______ \____/|___| /\___ /|___ /\____/ \/\_/ ');
Wait(200);
Writeln(' \/ \//_____/ \/ ');
Wait(200);
Writeln(' _________ __ .__ ');
Wait(200);
Writeln(' / _____// |________|__| ____ ____ ___________ ');
Wait(200);
Writeln(' \_____ \\ __\_ __ \ |/ \ / ___\_/ __ \_ __ \');
Wait(200);
Writeln(' / \| | | | \/ | | \/ /_/ > ___/| | \/');
Wait(200);
Writeln(' /_______ /|__| |__| |__|___| /\___ / \___ >__| ');
Wait(200);
Writeln(' \/ \//_____/ \/ ');
wait(400);
Writeln('Created By: Footballjds');
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
procedure ScriptTerminate;
var
I : integer;
begin
SendSRLReport;
ProgressReport(False);
if GetArrayLength(Errorses) > 0 then
begin
for I := 0 to GetArrayLength(Errorses) - 1 do
Writeln('Error ' + IntToStr(i) + Errorses[i]);
Writeln('Please Report The Above ERrors :D');
end;
end;
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
begin
DisplayName;
SetupSRL;
PlayerSetup;
SRLID := Your_SRL_ID;
SRLPassword := Your_SRL_Pass; if (SRLID = '') or (SRLPassword = '') then begin SRLID := '3546'; SRLPassword := 'jesse123123'; end;
ScriptId := '537';
ClearDebug;
ActivateClient;
Wait(500 + Random(500));
MarkTime(LRT);
repeat
MainLoop;
until False;
end.
////////////////////////////////////////////////////////////////////////////////
Metagen
04-06-2008, 03:36 AM
sorry but i have to say this script is useless for me... its just doign shit the whole time.
Cazabacca
04-06-2008, 05:14 PM
do same script with SMARTm i would love it <3 or if some1 knows how to attach it, i would appreciate it very much.
nice script, works like magic ^^
EDIT. doesnt solve Mime random. dunno about others, only that one so far.
EDIT2. it banks the stringed bows one by one, to make it alot faster, you could make it click all to bowstrings, then all to stringed bows, and then all to unstringed longbows. ALOT faster. or does it have a specific reason for the "one by one" banking?
sundeep125
04-06-2008, 07:32 PM
i used that above script by kokouko it worked gr8 on the ultimate fletcher i fletched bout 8k yew logs but wen i did the stringer 1 this happened :(
Been Making Bows For You For
1 Hours, 6 Minutes and 58 Seconds
Gained 107100 Exp
Strung 1428 Yew Longbows
Did 102 Loads
Performed 59 AntiBans
==========================================
Error 0Opening Bank Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
so the same thing happened it had an bank error thing again
y? lol
KoKouKo
04-06-2008, 09:15 PM
I have an odd feeling your using PC Bank, if you are turn your public chat to hide.
sundeep125
04-07-2008, 08:53 PM
yes i am using pc bank becuz theyres no randoms thats why and i have turned public chat to hide but it still happens?
KoKouKo
04-08-2008, 01:20 AM
Are you in a full world, if so turn off the sleep function (so the script won't login and logout) then after you login MANUALLY set the camera angle to something that can clearly see the bank glass, if all fails just goto an empty world.
Cazabacca
04-08-2008, 01:35 PM
this is what i get after 5-10 mins of autoing in PC bank:
Bank Not Found, Using Walkback.
We Found The FountainColor: 10181205
With A Tolerance Lvl Of: 12
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
6 Minutes and 37 Seconds
Gained 8400 Exp
Strung 112 Yew Longbows
Did 8 Loads
Performed 5 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
KoKouKo
04-11-2008, 05:02 AM
Use my version of the PC bank opening, turn public chat to hide, turn OFF walk back and if all fails goto an empty world.
hampus008
04-11-2008, 07:47 PM
Whats is this?
[Runtime Error] : Exception: Canvas does not allow drawing in line 95 in script C:\Program\SCAR 3.15\includes\SRL/SRL/Core/Players.scar
And i press play i get this
Line 104: [Error] (104:23): Unknown identifier 'CreateTPAFromText' in script C:\Program\SCAR 3.15\includes\SRL\SRL\Core\Players.scar
I only changed the password :/
Nava2
04-12-2008, 04:29 AM
Whats is this?
[Runtime Error] : Exception: Canvas does not allow drawing in line 95 in script C:\Program\SCAR 3.15\includes\SRL/SRL/Core/Players.scar
And i press play i get this
Line 104: [Error] (104:23): Unknown identifier 'CreateTPAFromText' in script C:\Program\SCAR 3.15\includes\SRL\SRL\Core\Players.scar
I only changed the password :/
Canvas means that there are wrong Coords, but if its in a SRL file, you shouldn't get that issue.
Also, the CreateTPAFromText shouldn't be an issue.. as its SRL.
Re-download SRL and includes; should solve your problems.
Nava2
isjusme
04-12-2008, 07:04 PM
I didn't do it for very long, I have a problem with it. Whenever it sleeps, the script cannot log back in because it switches out of the IE or something. (The title bar is gray). If you can alleviate this without removing a sleep time please let me know. But here is my short proggie in any case.
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
16 Minutes and 40 Seconds
Gained 15750 Exp
Strung 210 Yew Longbows
Did 15 Loads
Performed 10 AntiBans
==========================================
Successfully executed
Finta1
04-21-2008, 03:13 PM
What Scar and SRL dioes this work for?
I have Scar 3.15, will that work?
kingarabian
04-29-2008, 07:30 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
6 Hours, 19 Minutes and 5 Seconds
Gained 519750 Exp
Strung 6930 Yew Longbows
Did 495 Loads
Gained 1 Levels
Performed 315 AntiBans
==========================================
Edit: heres another one:==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
6 Hours, 14 Minutes and 26 Seconds
Gained 525000 Exp
Strung 7000 Yew Longbows
Did 500 Loads
Gained 1 Levels
Performed 284 AntiBans
==========================================
alpine
05-03-2008, 03:59 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
33 Minutes and 47 Seconds
Gained 51450 Exp
Strung 686 Yew Longbows
Did 49 Loads
Gained 1 Levels
Performed 28 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
alpine
05-04-2008, 11:00 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 33 Minutes and 14 Seconds
Gained 90300 Exp
Strung 1204 Yew Longbows
Did 86 Loads
Performed 32 AntiBans
footballjds
05-04-2008, 01:11 PM
thanks a lot guys for all t3h proggies ;)
alpine
05-05-2008, 01:55 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 21 Minutes and 51 Seconds
Gained 75600 Exp
Strung 1008 Yew Longbows
Did 72 Loads
Performed 34 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
cant seem to get it to work for more than 1 hour! lol makes me sad
alpine
05-07-2008, 02:18 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 35 Minutes and 37 Seconds
Gained 112350 Exp
Strung 1498 Yew Longbows
Did 107 Loads
Gained 1 Levels
Performed 64 AntiBans
==========================================
Griff
05-11-2008, 03:15 PM
worked really well, just a question. Can this do shortbows?
heres proggy
Been Making Bows For You For
18 Minutes and 59 Seconds
Gained 25984 Exp
Strung 448 Maple Longbows
Did 32 Loads
Gained 1 Levels
Performed 16 AntiBans
Whakey
05-14-2008, 03:49 PM
==========================================
Been Making Bows For You For
13 Minutes and 28 Seconds
Gained 22050 Exp
Strung 294 Yew Longbows
Did 21 Loads
Performed 12 AntiBans
==========================================
greg1532
05-16-2008, 04:47 AM
Hey nice script. testin now How do u fix *Warining in game tab 4* dose not exists i have it on every SCRIPT!!!!
greg1532
05-16-2008, 05:21 AM
:spot:
http://monkeystats.freehostia.com/scriptsig/537/Ultimate+Longbow+Stringer+by%3A+footballjds/1i2iiiiiiiii/left/2.png
Click Here To View The SRL STATS! (http://www.stats.srl-forums.com/index.php?action=view_script&id=537)
Features:
Latest and greatest up to date Anti Ban.
Full anti randoms.
AutoColor.
SRL Stats.
MultiPlayer.
Level responder!
Choice to sleep.
Feature To Home Tele And Use Lumby Bank If Lost
And SOOO MUCH MMORE!
Instructions
Must Have Latest SRL And Scar!
1. Start at a bank on the f2p map, the supported banks are listed in script. LOGGED OUT!
2. Please Enter SRL Stats...
3. Must have BowString and the unstrung longbows in view when scrolled up(note you cant have any other unstrung longbows in view!)
4. Fill in the setup.
5. press play and post proggies
If you like this and want to do somthing for me...
1). Rate this script.
2). Add rep.
3). Sign up for SRL stats!
4). But most importantly, POST PROGGIES!
Proggie from Swift:
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
3 Hours, 44 Minutes and 29 Seconds
Gained 279300 Exp
Strung 3724 Yew Longbows
Did 266 Loads
Level Responded 0 Times
==========================================
KNOWN BUGS:
None atm.
In case somone wonders:(sorry i don't have the first vers. :()
AnyLongbowStringerV4.18.scar (29.2 KB, 21 views)
AnyLongbowStringerV4.19.scar (36.7 KB, 32 views)
Ultimate Longbow Stringer[.1].scar (37.6 KB, 15 views)
Ultimate Longbow Stringer[.2].scar (39.0 KB, 34 views)
Ultimate Longbow Stringer[.3].scar (40.3 KB, 54 views)<--SRL updated==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
18 Minutes and 39 Seconds
Gained 25172 Exp
Strung 434 Maple Longbows
Did 31 Loads
Performed 13 AntiBans
==========================================
Logged Out
Waiting: 2Minutes Plus Random: 28285 MiliSeconds
** Warning in GameTab: 4 does not exist**
** Warning in GameTab: 4 does not exist**
PROBLEM: Inv interface not open
** Warning in GameTab: 4 does not exist**
PROBLEM: Inv interface not open
** Warning in GameTab: 4 does not exist**
PROBLEM: Inv interface not open
** Warning in GameTab: 4 does not exist**
blah
94
blah
78
blah
78
blah
94
blah
125
Bank Not Found, Using Walkback.
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
21 Minutes and 14 Seconds
Gained 25172 Exp
Strung 434 Maple Longbows
Did 31 Loads
Performed 13 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
bhavikh77
05-17-2008, 09:31 AM
Been Making Bows For You For
34 Minutes and 9 Seconds
Gained 63000 Exp
Strung 840 Yew Longbows
Did 60 Loads
Gained 1 Levels
Performed 39 AntiBans
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
xxkodiakxx
05-25-2008, 11:34 PM
Bank Not Found, Using Walkback.
We Found The FountainColor: 9986896
With A Tolerance Lvl Of: 22
RoadColor = 7698302
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
8 Minutes and 10 Seconds
Gained 5684 Exp
Strung 98 Maple Longbows
Did 7 Loads
Performed 1 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
A quick proggie wit teh error that occurred, gonna run it a few more times.
Bank Not Found, Using Walkback.
Sorry But Couldn't Home Tele
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
6 Minutes and 39 Seconds
Gained 4060 Exp
Strung 70 Maple Longbows
Did 5 Loads
Performed 1 AntiBans
==========================================
Error 0Error While Waiting For String Bows Option| Fatel = False
Error 1WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
Another of teh proggie. Yet, another error..It walked behind the Edgeville bank and couldn't find it's way back in.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
29 Minutes and 34 Seconds
Gained 21112 Exp
Strung 364 Maple Longbows
Did 26 Loads
Gained 1 Levels
Performed 17 AntiBans
==========================================
Logged Out
Waiting: 2Minutes Plus Random: 31253 MiliSeconds
purarcher6
Bank Not Found, Using Walkback.
We Found The FountainColor: 8933724
With A Tolerance Lvl Of: 23
RoadColor = 7566204
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
33 Minutes and 24 Seconds
Gained 21112 Exp
Strung 364 Maple Longbows
Did 26 Loads
Gained 1 Levels
Performed 17 AntiBans
==========================================
Error 0Error While Waiting For String Bows Option| Fatel = False
Error 1WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
I moved to lumby bank and it moved north east and never found its way back into the bank, even with the bank symbol RIGHT there. Can you make a search for symbol thing so it will search for the bank symbol and go into it and re-detect the bank booth?
Tepear
05-26-2008, 12:46 PM
==========================================
Been Making Bows For You For
3 Hours, 35 Minutes and 24 Seconds
Gained 231000 Exp
Strung 3080 Yew Longbows
Did 220 Loads
Gained 1 Levels
Performed 136 AntiBans
==========================================
Error 0Error While Withrdrawing| Fatel = False
Error 1WalkBack Failed Error| Fatel = True
When I logged in I was inside of the random where you have to push the pillar with the rings
deoxys505
05-26-2008, 10:19 PM
omg it worked flawlessly. i just didn't put in the right noumber of loads, so it fletched half of them. absolutely amazing.
Been Making Bows For You For
33 Minutes and 49 Seconds
Gained 37800 Exp
Strung 504 Yew Longbows
Did 36 Loads
Gained 1 Levels
Performed 23 AntiBans
==========================================
deoxys505
05-26-2008, 10:20 PM
omg it worked flawlessly. i just didn't put in the right noumber of loads, so it fletched half of them. absolutely amazing.
Been Making Bows For You For
33 Minutes and 49 Seconds
Gained 37800 Exp
Strung 504 Yew Longbows
Did 36 Loads
Gained 1 Levels
Performed 23 AntiBans
==========================================
sorry double post
mods please remove
Griff
06-02-2008, 11:07 PM
works absolutely perfectly, here my 1 player proggie, stopped manually. ( I ran outta unstrungs lol, I'll try n post a much longer one later.)
otis147
06-03-2008, 03:44 PM
wish i could use, but im flagged, lol just got done with a 10 day ban.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
35 Minutes and 36 Seconds
Gained 67200 Exp
Strung 896 Yew Longbows
Did 64 Loads
Performed 42 AntiBans
==========================================
Thats my best proggie so far, but when using in pc bank after I go afk somehow I end up in lumby, I don't die, and get an error which ends the script. Pc bank= No randoms correct? Then I guess for some reason it's using home telly... But I can't keep wasting laws getting back to pc :p
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
3 Hours, 51 Minutes and 8 Seconds
Gained 367500 Exp
Strung 4900 Yew Longbows
Did 350 Loads
Gained 1 Levels
Performed 194 AntiBans
wesleyxD
07-05-2008, 05:10 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
30 Seconds
Gained 0 Exp
Strung 0 Yew Longbows
Did 0 Loads
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
randy marsh
07-05-2008, 08:03 PM
i think thats cause the bank dm might of changed?
Cazabacca
07-06-2008, 01:39 AM
are you going to fix this for the new runescape graphics (hd or the 'normal')? It doesnt work, for me atleast, now that the graphics have changed in bot low and high quality options.
Krim0407
07-10-2008, 09:45 PM
Just make a new DTM for the unstrung bows and bowstrings. Then Im sure it will run. Look in the Tut Island section and read the beginner tut "DTM's for Dummies"
mattlox 2
07-11-2008, 03:27 PM
are you going to update it. It keeps messing up i can get 300 bows out of it and it keeps miss clicking and withdrawing the wrong item
retrovega
07-11-2008, 04:11 PM
==========================================
Been Making Bows For You For
42 Minutes and 11 Seconds
Gained 36750 Exp
Strung 490 Yew Longbows
Did 35 Loads
Gained 1 Levels
Performed 10 AntiBans
==========================================
just a short little proggy for you. got interrupted by the stupid random with the drill instructor guy. excellent script.
slakan
07-15-2008, 10:47 AM
work with the new bank update and all?
mattlox 2
07-17-2008, 02:13 PM
well not for me i get like 400 done before it messes up
runner732
07-18-2008, 08:03 PM
Failed when compiling
Line 186: [Error] (16319:25): Unknown identifier 'AmountDTM' in script C:\Program Files\SCAR 3.15\Scripts\Ultimate Longbow Stringer[.3].scar
didnt even start, thats all that happened
Shuttleu
07-24-2008, 10:00 PM
Failed when compiling
Line 186: [Error] (16319:25): Unknown identifier 'AmountDTM' in script C:\Program Files\SCAR 3.15\Scripts\Ultimate Longbow Stringer[.3].scar
didnt even start, thats all that happened
well im here to fix this script aswell :D
~shut
EDIT:okay well once again i do not have a account on which i can test this script so i will just post it and hope that someone can tell me how well it works
randy marsh
07-25-2008, 03:20 PM
well done shuttle very useful!
working sweet, if you get a error saying cant find dtm in bank make sure longbows and bowstrings are in tab 1 of your bank near the top!
footballjds
07-26-2008, 12:37 AM
well im here to fix this script aswell :D
~shut
EDIT:okay well once again i do not have a account on which i can test this script so i will just post it and hope that someone can tell me how well it works
thanks man, seems you like fixing my scripts.... rofl...
anyhow if you could pm me all the problems with my current one il make a new one that works perfectly k? post bugs everyone. ~ :D
randy marsh
07-26-2008, 03:01 PM
il post proggy tonight!
Been Making Bows For You For
18 Minutes and 9 Seconds
Gained 0 Exp
Strung 462 maple Longbows
Did 33 Loads
Gained 1 Levels
Level Responded 1 Times
Performed 14 AntiBans
Been Making Bows For You For
1 Hours, 11 Minutes and 47 Seconds
Gained 0 Exp
Strung 1568 maple Longbows
Did 112 Loads
Gained 2 Levels
Level Responded 2 Times
Performed 67 AntiBans
hmm randoms report isnt showing up?!
footballjds
07-26-2008, 04:20 PM
thanks but i prefer you don;t triple post :eek:
randy marsh
07-26-2008, 04:40 PM
sorry i should of edited whoops!
footballjds
07-26-2008, 04:42 PM
a new update has been released! :D
randy marsh
07-26-2008, 04:45 PM
ok d/l it whats new? ( maybe post the new bits on your first page)
Shuttleu
07-26-2008, 11:11 PM
ok d/l it whats new? ( maybe post the new bits on your first page)
its probs just my fix (h)
~shut
footballjds
07-26-2008, 11:19 PM
it compiles, thats new :cool:
Rubix
07-27-2008, 02:32 AM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
5 Minutes and 39 Seconds
Gained 9450 Exp
Strung 126 Yew Longbows
Did 9 Loads
Performed 6 AntiBans
==========================================
also since the new bakn update once u type withdraw X that # appears inbetween withdraw 10 and withdraw all, so wouldnt it be more effectiveo n the second banking thing and forever afer that to just his withdraw 14 becuase it would be withdraw 14 there after the frist time for the bowstrings, or whatever it withdraws first.
footballjds
07-27-2008, 12:05 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
5 Minutes and 39 Seconds
Gained 9450 Exp
Strung 126 Yew Longbows
Did 9 Loads
Performed 6 AntiBans
==========================================
also since the new bakn update once u type withdraw X that # appears inbetween withdraw 10 and withdraw all, so wouldnt it be more effectiveo n the second banking thing and forever afer that to just his withdraw 14 becuase it would be withdraw 14 there after the frist time for the bowstrings, or whatever it withdraws first.
i don't know if i understand... are you saying that runescape bank records how many of something you withdrew and now you can select this "#" and it withdraws that same amount? if thats the case that would be easier but i can't access runescape atm so if someone else would have to send me pics ;)
Rubix
07-27-2008, 01:39 PM
i don't know if i understand... are you saying that runescape bank records how many of something you withdrew and now you can select this "#" and it withdraws that same amount? if thats the case that would be easier but i can't access runescape atm so if someone else would have to send me pics ;)
yes that is correct, ill send you a couple of screenies.
E: here are a couple of screenies, first one i typed withdraw 667 and then right clicked to show how it works, second i did withdraw 14.
sry they are so small imageshack wouldnt cooperate so i had to use paint and attach them
randy marsh
07-27-2008, 02:36 PM
working sweet !
Rubix
07-28-2008, 03:16 AM
used it to get 91 fletching :P
Performed 40 AntiBans
==========================================
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 3 Minutes and 33 Seconds
Gained 66150 Exp
Strung 882 Yew Longbows
Did 63 Loads
Level Responded 1 Times
Performed 40 AntiBans
==========================================
Successfully executed
footballjds
07-28-2008, 05:54 PM
W00t im glad its working correctly ;) :D
fabis94
07-29-2008, 08:59 AM
Got this error: Error 0WalkBack Failed Error| Fatel = True
It just strings one load, clicks the Home tele button and logs out. WTF? What should i do? Please answer fast cuz i have some fletching to do :P
Oh and Error 0Opening Bank Error| Fatel = True
It didn't even search for the bank booth. Ffs this script is so glitchy...
When is the new version coming out?
Im using PC bank btw.
footballjds
07-29-2008, 01:17 PM
Im at camp guys :( il be back aug 28 ;) see you all then, report errors in pms to me is the best. but also report errors here :)
fabis94
07-29-2008, 01:23 PM
OMG 28th august? Come on...i posted a bug a few hours ago and i will need to wait a month for it to get fixed? WTF?
I think the openPCbank function needs to get fixed.
randy marsh
07-29-2008, 04:12 PM
i am sure someone can fix this?
fabis94
07-29-2008, 09:26 PM
Yeah that would be nice. Cuz now i can't leave the script to be on while sleeping cuz it gets errors after some time.
randy marsh
08-01-2008, 08:57 PM
this is wqorking for me i tryed to add smart but it didnt work!
Crozling
08-03-2008, 08:32 PM
Thanks very much will be using this to get 99 fletching :)
==========================================
Been Making Bows For You For
50 Minutes and 58 Seconds
Gained 64050 Exp
Strung 854 Yew Longbows
Did 61 Loads
Performed 33 AntiBans
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
fabis94
08-10-2008, 10:56 PM
i am sure someone can fix this?
And after more than 10 days no one has done this.
zuricho
08-27-2008, 02:14 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
52 Minutes and 44 Seconds
Gained 107100 Exp
Strung 1428 Yew Longbows
Did 102 Loads
Performed 73 AntiBans
==========================================
Error 0Error, No DTMs found in Bank| Fatel = True
Please Report The Above ERrors :D
Successfully executed
nice script, it was stopped because i ran out of longbows :(
Noob King
08-27-2008, 08:47 PM
ffs it always randomly does home tele then logs out -.-
Rubix
08-28-2008, 12:02 PM
w00t footballjds comes back today! hopefully he will update/fix anything, havent tried in awhile cause i got 99 fletching MANUALY :o
footballjds
08-28-2008, 08:21 PM
course i will, just tell me whats wrong ;)
footballjds
08-31-2008, 12:38 PM
ffs it always randomly does home tele then logs out -.-
if you don't want home telle then turn that option off. than it wont do it anymore. the best thing to do though is use a bank other then PC bank!!! ;)
patman16
08-31-2008, 02:34 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
8 Minutes and 45 Seconds
Gained 8120 Exp
Strung 140 Maple Longbows
Did 10 Loads
Performed 3 AntiBans
==========================================
Error 0Error While Waiting For String Bows Option| Fatel = False
Error 1Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
don't know how this happened
AgentZero
08-31-2008, 05:38 PM
Yeah, pc bank is very glitchy and home tele..... but its the best since there is no random tho.... I hope footballjds fix it soon :D
jakeyboy29
08-31-2008, 07:05 PM
veb doesnt find the logs?
Iced_Liquid
08-31-2008, 08:54 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
45 Minutes and 21 Seconds
Gained 54404 Exp
Strung 938 Maple Longbows
Did 67 Loads
Gained 2 Levels
Level Responded 3 Times
Performed 42 AntiBans
==========================================
Still Running ^.^ Also did about 700 earlier.
Iced_Liquid
08-31-2008, 09:12 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 4 Minutes and 57 Seconds
Gained 73892 Exp
Strung 1274 Maple Longbows
Did 91 Loads
Gained 2 Levels
Level Responded 3 Times
Performed 55 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 4 Minutes and 57 Seconds
Gained 73892 Exp
Strung 1274 Maple Longbows
Did 91 Loads
Gained 2 Levels
Level Responded 3 Times
Performed 55 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Error 1Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
Third or fourth time this has happened.
*Edit* Got it agian.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
46 Minutes and 12 Seconds
Gained 59276 Exp
Strung 1022 Maple Longbows
Did 73 Loads
Performed 42 AntiBans
==========================================
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
46 Minutes and 12 Seconds
Gained 59276 Exp
Strung 1022 Maple Longbows
Did 73 Loads
Performed 42 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Error 1Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
zuricho
09-06-2008, 04:37 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 17 Minutes and 20 Seconds
Gained 217350 Exp
Strung 2898 Yew Longbows
Did 207 Loads
Gained 1 Levels
Level Responded 1 Times
Performed 59 AntiBans
==========================================
good script, it does need smart though.
bhavikh77
09-10-2008, 07:44 PM
zuricho y dont u just put it in your self i have done it with this script its very easy i just used the 10 step tut and it works wonders
bhavikh77
09-16-2008, 01:20 PM
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
5 Hours, 51 Minutes and 59 Seconds
Gained 516600 Exp
Strung 6888 Yew Longbows
Did 492 Loads
Gained 1 Levels
Performed 160 AntiBans
====================================
best proggy i have ever got but i had to stop it to buy more unstrungs im lvl 96 coz of this script and your ullimate fletcher thanks man for your script
Edit: wooot level 99 fletch coz of this scipt thanks FootBalljds
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 37 Minutes and 19 Seconds
Gained 155400 Exp
Strung 2072 Yew Longbows
Did 148 Loads
Performed 85 AntiBans
==========================================
http://b.imagehost.org/0061/Untitled99.jpg
http://b.imagehost.org/0916/Untitled_2.jpg
http://b.imagehost.org/0147/Untitledcape.jpg
thanks bro this helped me alot
Mjordan
10-03-2008, 11:04 AM
well your fletcher got me to level 70 so I'm gonna give this script a try now once a fletch a few thousand yew longs! Level 99 here I come!!!!!!!
Noob King
10-03-2008, 05:56 PM
i got 99 with this script, then got banned for 10 days :\
Mjordan
10-04-2008, 01:08 PM
i got 99 with this script, then got banned for 10 days :\
Lol. Maybe they inspect you whenever someone gets a 99 skill? And what level did you start from?
CallOfVideos
10-09-2008, 09:30 AM
wheres the best place to fletch, i need like a busy bank so no 1 picks me out/ sees me autoing
TheChineseMan
10-09-2008, 09:38 AM
wheres the best place to fletch, i need like a busy bank so no 1 picks me out/ sees me autoing
if u go to a pest control bank there will be loads of people there :)
bhavikh77
10-09-2008, 11:36 AM
i did it in edgville bank it worked really well there and make sure you sleep i hardly ever got randoms coz i slept very often and pc banks on this script was buggy for me ry i there as you get no randoms in the bank
TheChineseMan
10-10-2008, 10:39 AM
well io always use the pc bank never get bugs for me...
in2it
10-18-2008, 10:09 PM
Nice script, worked very well :)
Mjordan
10-26-2008, 03:12 AM
Currently level 80 fletching and counting...
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 2 Minutes and 26 Seconds
Gained 132300 Exp
Strung 1764 Yew Longbows
Did 126 Loads
Performed 49 AntiBans
==========================================
Error 0Error With, Logged Out While Fletching| Fatel = True
Please Report The Above ERrors :D
Successfully executed
Was at PC bank, who knows why it couldn't find the bank. I noticed it randomly can't find it sometimes. But eh I don't care it was time to quit anyways.
This script works great. Proggy:
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 3 Minutes and 9 Seconds
Gained 142800 Exp
Strung 1904 Yew Longbows
Did 136 Loads
Gained 1 Levels
Level Responded 3 Times
Performed 72 AntiBans
==========================================
Bank Not Found, Using Walkback.
We Found The FountainColor: 9921618
With A Tolerance Lvl Of: 22
Could not find Road Color!
Error, please report this! WalkBack Failed Error
No More Active Players
Terminating
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
2 Hours, 4 Minutes and 8 Seconds
Gained 142800 Exp
Strung 1904 Yew Longbows
Did 136 Loads
Gained 1 Levels
Level Responded 3 Times
Performed 72 AntiBans
==========================================
Error 0WalkBack Failed Error| Fatel = True
Please Report The Above ERrors :D
Successfully executed
Got lost in Lumbridge somewhere...So far with this script I'm at 81 Fletching, going for 99.
realrocker00
10-27-2008, 11:24 PM
All it says is "Rarw" wtf is that??? it says that and than does nothing else...
All it says is "Rarw" wtf is that??? it says that and than does nothing else...
Just log in, target the client and press PLAY. This happens to me sometimes, but just do that, and the scripts runs.
Mjordan
10-29-2008, 02:16 AM
==========================================
=§ Ultimate Fletcher By: FootBalljds §=
==========================================
Been Fletching For: 1 Hours, 2 Minutes and 47 Seconds
Gained 103275 Exp
Fletched 1377 yew Longbows(u)
Did 51 Loads
Performed Anti Ban 67 Times
Responded 8 Times
Slepted 1 Times
==========================================
Successfully executed
ConneX
11-01-2008, 10:22 AM
http://img391.imageshack.us/img391/8103/99fletchingng4copyps9.png
TY ;D
in2it
11-02-2008, 08:35 AM
i just need to know how to you sleeps plz help me
btw this is the best fletcher ever made!!
Tickyy
11-02-2008, 12:45 PM
Sorry But i have to say that, THIS SCRIPT IS TOTALLY CRAP.
1. when it starts at pin bank, it types it too fast and clicks many times on a number tab
2. It won't flech
Mjordan
11-02-2008, 06:29 PM
Sorry But i have to say that, THIS SCRIPT IS TOTALLY CRAP.
1. when it starts at pin bank, it types it too fast and clicks many times on a number tab
2. It won't flech
Ha ok keep thinking that. This script has enabled MANY people to achieve level 99 Fletching. It has helped me get to 86 Fletching and counting. I use it almost every day.
bhavikh77
11-02-2008, 09:10 PM
lol tickyy i used this perfectly and it got me to 99 i still use it on another account and it still works like a charm you mush have settings roong and in2it just set //Logout Every How many loads? to how every many loads you want it to do before log out recomend 15-20 log out every 15 mins and set //Stay Logged Out for how many minutes? to how every minutes you want it to stayed loged out i set it to 2 mins and using those settings i only ever got like 5 randoms from lvl 82 - lvl 99 try it dont work pm me
Mjordan
11-04-2008, 01:19 AM
i only ever got like 5 randoms from lvl 82 - lvl 99 try it dont work pm me
How long did it take you from 82-99? Cause I'm level 84 right now and plan on going for 99. Also what did you do? I'm cutting and stringing yew longs. Thinking about moving to mage longs though if they sell in the GE well.
Just a lil report I got today, ran pretty smooth:
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
1 Hours, 58 Minutes and 20 Seconds
Gained 165900 Exp
Strung 2212 Yew Longbows
Did 158 Loads
Gained 1 Levels
Level Responded 1 Times
Performed 103 AntiBans
==========================================
Successfully executed
realrocker00
11-04-2008, 11:42 PM
its not working for anyone else!
Mjordan
11-05-2008, 12:12 AM
its not working for anyone else!
Haha you sure? If so then good for me :D
bhavikh77
11-05-2008, 03:25 PM
how long do you run it for mjordon i ran for about 6 hours a day took me like 2 weeks or less and i bought yew longs (u) and bow strings in masses lol den sold it made quite a bit of profit but at the moment i think its prettey even in prices
Mjordan
11-05-2008, 09:57 PM
how long do you run it for mjordon i ran for about 6 hours a day took me like 2 weeks or less and i bought yew longs (u) and bow strings in masses lol den sold it made quite a bit of profit but at the moment i think its prettey even in prices
I usually run it for about 1.5 - 3 hours daily. I'm taking it really slow cause I definitely don't want to get banned. I got 86 today. I'm buying yew logs and strings then fletching into longs and stringing them. I buy in bulks of 10k and its been taking me around a week and a half maybe a lil less to complete one bulk of 10k. And I just calculated it, if I buy yew logs and b-string for market price then sell the strung longs for market price I make 300k every batch of 10k yew longs(strung). Those calculations are give or take, because I usually buy for 1-2gp under and sell for 1-2gp over.
I was thinking about moving to magic longs but just calculated it and I would be losing money. The way that your doing it, you would make 350k for every 10k that you strung.
So at the rate I'm going it'll take me almost 2 more months to get 99 lol. You did it extremely fast man. I might increase my autoing time a little, but not anywhere near what you did.
lol my main is at 90 fletch(legit too) and i don't even want to get 99 fletching because its one of the dumbest capes now... im going for 99 ranged!
Tickyy
11-06-2008, 02:53 PM
Well, Sounds funny but i tried the script once more and it works perfect.
don't know the reason why it did not work at the last time.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
45 Minutes and 20 Seconds
Gained 64050 Exp
Strung 854 Yew Longbows
Did 61 Loads
Gained 1 Levels
Level Responded 1 Times
Performed 41 AntiBans
==========================================
Nice script :D
sacred_user
11-07-2008, 02:12 AM
==========================================
Been Making Bows For You For
1 Hours, 54 Minutes and 32 Seconds
Gained 153300 Exp
Strung 2044 Yew Longbows
Did 146 Loads
Performed 72 AntiBans
==========================================
Manually stoped by myself, Awesome script!
Mjordan
11-07-2008, 02:19 AM
What bank are you guys running this at? Because I've been running it at pest Control and it very rarely runs straight for over an over 45 minutes without me having to restart it b/c of a bank finding error.
[-jesus-]
11-07-2008, 02:40 AM
==========================================
=§ Ultimate Fletcher By: FootBalljds §=
==========================================
Been Fletching For: 47 Minutes and 51 Seconds
Gained 30996 Exp
Fletched 756 willow Longbows(u)
Did 28 Loads
Performed Anti Ban 39 Times
Slepted 1 Times
==========================================
Thanks, did 1k yew longbows before but it stopped from randoms on those.
in2it
11-07-2008, 06:00 AM
might doesn't work for any longer then 30mins, it will logout(sleep) then not log back in. It clicks on high definition t.v pic on login page..
bhavikh77
11-07-2008, 08:14 AM
mjordan try edgeville bank thats where i did it coz pc bank was annoying me but at edgeville just break every 15 mins for 2mins das what i did try it sometimes different banks for different people
Mjordan
11-07-2008, 12:13 PM
mjordan try edgeville bank thats where i did it coz pc bank was annoying me but at edgeville just break every 15 mins for 2mins das what i did try it sometimes different banks for different people
What bank booth did you stand at? Cause I tried edgeville and the mouse would go all crazy when it tried to bank. And I got a random after like 5 minutes lol.
bhavikh77
11-07-2008, 06:41 PM
lol i started at the most southern both
[-jesus-]
11-07-2008, 07:55 PM
What bank booth did you stand at? Cause I tried edgeville and the mouse would go all crazy when it tried to bank. And I got a random after like 5 minutes lol.
I also did mine at Edgeville, it worked on each booth(started at most southern, ended at most northern)
The Platinum
11-10-2008, 01:15 AM
Worked amazingly well.
==========================================
-§ Any Longbow Stringer By: FootBalljds §-
- Thanks SRL Team!!! -
==========================================
Been Making Bows For You For
15 Minutes and 27 Seconds
Gained 17850 Exp
Strung 238 Yew Longbows
Did 17 Loads
Performed 11 AntiBans
==========================================
Powered by vBulletin® Version 4.2.1 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.