Problem solved thnx for helping
Problem solved thnx for helping
I'm thinking it would be
Just my two centsCode:if FindColourSpiralTolerance(x,y,tol,col,true) then begin Mouse(x,y,2,2,false) ClickText ('Drop')
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.
first include SRL like this in beginning of a script
then add in ur main loop first command:Code:{.include srl/srl.scar}
now u have included srl if u have already done this then just add to the line u want to drop:Code:setupsrl;
example:Code:Dropall;
SCAR Code: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
Code:
- Narcle: I recall Jukka releasing a bunch of scripts like this before... Its how he rolls I think. rofl
- Solarwind: Dude, you are like... t3h s3x.
- Hy71194: JuKKa you're a machine! You released 3 scripts in 10 minutes! :O
- benjaa: woah.... Jukka is the man Guildminer pwns all
- NaumanAkhlaQ: And JuKKa Is my Her0!
Be careful with dropall, because it will drop alll. Including axe if it's not equipped, and anything good you get from randoms.
Theese are some good/easy procedures to use:
SCAR Code:DropTo(1,28)//from first inven slot to lastSCAR Code:DropTo(2,28)//from second inven slot ti last
Or you can use bitmap masks of the object.
SCAR Code:Var
Clay, OreMask : integer;
Procedure LoadBitmaps;
Begin
Clay := BitmapFromString(4, 4, '86714C89734D8B7650907A52978' +
'1569781569A8357957E55A1895CA38B5D9F875B9C8559AC9262A8' +
'8F60A58D5FA1895C');
OreMask := BitmapFromString(11, 11, 'z78DA73730301033070436' +
'2238B60024C35B84CC0A5923C13F0BB937813F0EB22DE04CC5022' +
'CF04CADD404CC890EA0BFCE2F85D4E4C6A212FF470998FCC0600F' +
'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.
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
PM it to me ill be glad to fix, but it wont be fixed untill later, ill be out for a little.
oh nvm i forgot to put until false lol but ty for ofering
There are currently 1 users browsing this thread. (0 members and 1 guests)