SRL Archive - Outdated / Broken

————————————————————————————-
Feather Buyer Deluxe
————————————————————————————-

This script buys feathers in Port Sarim
fishing shop at 2gp each.

————————————————————————————-
Known bugs:
Absolutely none…
————————————————————————————-
Future Updates:
Buy if above 1000
————————————————————————————-
————————————————————————————-
INSTRUCTIONS

• ScuneRape Low Detail–V Bright
• Make Sure Character Is Somewhere In Fishing Shop
• Have Plenty of GP in 1st Inv. Slot
• Setup Lines 28-30

————————————————————————————-
Verion History
Version 1.0 - Initial release
Version 1.1 - Fixed a few bugs
Version 2.0 - More accurate average per hour.
Added a failsafe to avoid getting stuck with a cancel screen.
Random chat and offscreen movement for antiban.
Version 2.1 - Gerrant finding(almost flawless).
Auto-login if not logged in.
Randomly Close Window for antiban.
————————————————————————————-

• SRL rev #317
• Name: Feather Buyer Deluxe
• Scripter: phantombmx
• Category: Fletching/Fishing supplies
• Description: Buys Feathers at 2gp ea
• Autocolor: No need to pick
• Comments: Enjoy!

————————————————————————————-
Use this script at your own risk. I'm NOT responsible
for any Ban or Loss you might encounter using this script.

Reserved for Progress Reports

<<—————-Progress-Report—————->>
Worked For 0 Hours, 0 Minutes, and 14 Seconds.
Bought 30 Feathers So Far.
Averaging About 7714 Feathers Per Hour.
<<———————————————–>>

<<—————-Progress-Report—————->>
Worked For 0 Hours, 5 Minutes, and 52 Seconds.
Bought 460 Feathers So Far.
Averaging About 4704 Feathers Per Hour.
<<———————————————–>>

<<—————-Progress-Report—————->>
Worked For 2 Hours, 6 Minutes, and 46 Seconds.
Bought 7220 Feathers So Far.
Averaging About 3417 Feathers Per Hour.
<<———————————————–>>

<<—————-Progress-Report—————->>
Worked For 10 Hours, 38 Minutes, and 12 Seconds.
Bought 52190 Feathers So Far.
Averaging About 4907 Feathers Per Hour.
<<———————————————–>>

<<—————-Progress-Report—————->>
Worked For 0 Hours, 30 Minutes, and 18 Seconds.
Bought 1980 Feathers So Far.
Averaging About 3921 Feathers Per Hour.
<<———————————————–>>

function ItemAmountCoords(i : Integer) : TPoint;
var
  row, col : Integer;
begin
  row := i div 4;
  col := i - (row * 4) - 1;
  if (col < 0) then
  begin
    col := 3;
    row := row - 1;
  end;
  Result.x := 568 + ((col) * 42);
  Result.y := 212 + ((row) * 36);
end;
  
function amount(itemx,itemy:integer):integer;
//doesnt work with 'K' or 'M' yet
//as if you have that much
var
  amountstr:string;
begin
  amountstr:=trim(GetTextAtEx(itemx, itemy, 0, StatChars, true, true, 0, 2, 65535, 5, true, tr_Digits));
  if(length(amountstr)>0)then
    result:=strtoint(amountstr);
end;

function itemamount(i:integer):integer;
var
  coords:tpoint;
begin
  coords:=itemamountcoords(i);
  result:=amount(coords.x,coords.y);
end;

just a little code i wrote earlier today
might be useful to count the number of feathers/ money in your inventory, or how many feathers are at the store if you pick the coords right
i havent put it in the include yet, but it might go somewhere…

thanks for the snippet of code

ill see if i can incorporate it later..

besides that, hows my code and all that jazz..

Well at the end,

Until(false)

Didn't Fakawi say something about breaking all infa-loops? Great script btw :D

From: I
Well at the end,

Until(false)

Didn't Fakawi say something about breaking all infa-loops? Great script btw :D

Just change to this or something:

Until(false)Or(LoggedIn = False);

ok lied about last update.. my account got banned cuz it got stuck somehow..

i removed the chat cuz that had a lot to do with the ban..

i added an auto-login so that you can just start the script and leave it to go.. just make sure that your character is in the port sarim fishing shop..

gerrant find procedure is almost flawless.. still go a few bugs but it should do

random close window.. for antiban

umm thats about it for now.. there will probably be more as i want this script to be absolutely PERFECT..

besides.. its my way of profit..

Coding is great. Also, it WORKS after Rs update !

Bug: it will buy at over 2 gp each. I think it buys when there is an 8 or a 9 in the number of feathers, right? Well, whatever it does, it often buys them when they are in low stock. Test it out on a more full world.

it should buy when the amount gets above 960-975 i believe.. if you buy at 950 feathers.. you will pay 3 gp each.. it shouldnt AT ALL buy below 960.. try again, and if it still does it, tell me on msn okay?

also, no it doesnt just buy when theres an 8 or 9.. it looks for the entire amount at the feathers based on the numbers it finds.. if it finds 588, it wont buy.. if it finds 1189, it will buy..

EDIT::
oh wait, this is a quite old version.. use my newest here and you should have NO PROBLEMS AT ALL! http://82.92.130.193/forums/showthread.php?t=977