SRL Archive - First Scripts

Daemonheim Peninsula *WillowPowerChopper*


davx

2012-01-03 13:14:16

Taken script down for now

okokokok

2012-01-03 14:19:20

Well the script itself looks pretty nice, but it to unorganised to read properly through it.

Try to make it more like this:


Function Chopdown:Boolean;

Var
x, y, rawr, TreeCounter, TooLong:integer;
Begin
Marktime(TooLong);
x:=MSCX;
y:=MSCY;
rawr:= InvCount+7;
If FindObjTPA(x, y, 3161663, 10, 1, 15 , 60, 600, ['hop'])Then
Begin;
StatsGuise('We Found My Willow');
GetMousePos(x, y);
Case Random(2) of
0:Mouse(x, y, 7, 7, True);
1: Begin
Mouse(x, y, 5, 5, False);
WaitOption('Chop', 500);
ChooseOption('Chop');
End;
End;

It may not work out properly how i did it here, because i did it on the forum and not in simba :P

Edit: This does look strange :P At least you should get the idea of it :)

Edit2: I changed it to a small part of your function, because i don't really see the systematics atm :P

butterlyr

2012-01-03 14:21:29

looks very good

davx

2012-01-03 14:29:25

Hmmm will look into tidying up later :P adding some other feature now trying to get burning logs

okokokok

2012-01-03 14:53:59

From: davx
Hmmm will look into tidying up later :P adding some other feature now trying to get burning logs


Ok goodluck man! Anyway its good to see another scripter! :)

VillaVuFTW

2012-01-03 14:55:24

I don't really understand simba completely

But you can have it check inventory if it's full, than do a Burn Procedure, until empty.. Than reloop back to cutting

davx

2012-01-03 15:02:59

:P i get how to do it :) just adding it