I need good drop procedure(first script)

[wtf i sp4nk]

Problem solved thnx for helping

[Hey321]

I'm thinking it would be


if FindColourSpiralTolerance(x,y,tol,col,true) then
begin
Mouse(x,y,2,2,false)
ClickText ('Drop')

Just my two cents

[Boreas]

Nah use dtm's of logs. Make the dtm with only the black outline, and it will work for all logs. Then use find item in inventory dtm, something like that check inventory.scar and then mouse false, option drop. Basically it's all in srl. Look at a powerminer/cutter if you're still confused.

[JuKKa]

first include SRL like this in beginning of a script


{.include srl/srl.scar}


then add in ur main loop first command:



setupsrl;


now u have included srl if u have already done this then just add to the line u want to drop:



Dropall;


example:


Program powercutter;

{.include srl/srl.scar} //the include

procedure cut; //ur cutting procedure
begin
cut cut;
end;

begin //main loop

setupsrl; //to activate the include

repeat //repeating the procedure until inventory is full

cutcut; //cut trees, chop chop lol

until(invfull) //until inventory full then it drops.

Dropall; //now it will drop

nextplayer; //a little advance but it changes player remove if u want

end.


something like that

[Boreas]

Be careful with dropall, because it will drop alll. Including axe if it's not equipped, and anything good you get from randoms.

[Junior]

Theese are some good/easy procedures to use:
DropTo(1,28)//from first inven slot to last
DropTo(2,28)//from second inven slot ti last

Or you can use bitmap masks of the object.

Var
Clay, OreMask : integer;

Procedure LoadBitmaps;
Begin
Clay := BitmapFromString(4, 4, '86714C89734D8B7650907A52978' +
'1569781569A8357957E55A1895CA38B5D9F875B9C8559AC92 62A8' +
'8F60A58D5FA1895C');

OreMask := BitmapFromString(11, 11, 'z78DA73730301033070436' +
'2238B60024C35B84CC0A5923C13F0BB937813F0EB22DE04CC 5022' +
'CF04CADD404CC890EA0BFCE2F85D4E4C6A212FF470998FCC0 600F' +
'B599CC1');
End;

Procedure DropOres;
Begin
If (invfull) = True Then
DwarfItem;
ClickAllItemsBmpMaskTolWait('rop', OreMask, 20, 25, 30 + Random(30));
ClickAllItemsBmpTolWait('rop', Clay, 10, 30 + Random(30));
End;


This will also work. Im not sure if your going to need to change the bitmap masks though.

[wtf i sp4nk]

thnx for all feed back i ended up just using simple DropTO (2,28); procedure but when i put it in script i get wierd error if u wanna see script cause im not sure how to explain it ud have to see script then ill pm it to u just psot here if u wanna help and ill pm it

[Junior]

PM it to me ill be glad to fix, but it wont be fixed untill later, ill be out for a little.

[wtf i sp4nk]

oh nvm i forgot to put until false lol but ty for ofering