Hello!
I working on my DungFarmer.
I have a question.
It cleans herbs correcly,
Then alch them
Repeat until no herbs found
But then!
It need clicks the high alch for the last time and then it see it dont have any herbs left, so it click the seed to use on farm.
But instead of clicking the seed and put in patch, it alch the seed!
How can i make it so it will click the seed correcly instead of alching it??
Procedure:
Simba Code:
Procedure HighAlchItem;
Begin
HighAlchDTM := DTMFromString('mggAAAHicY2NgYHBmYmDwBGJ/IA4C4lAoO4ERguOAOBGIo6H0xV0SYPzqdghDfzkrQ+Kp7wzrpvAysALNwoYZcWAIAABJeA4k');
GameTab(Tab_Magic);
wait(randomrange(400,500));
if FindDTM(HighAlchDTM, x, y, MIX1, MIY1, MIX2, MIY2) then
Begin
GameTab(Tab_Magic);
wait(randomrange(100,150));
MMouse(X, Y + 3, 0, 0);
If WaitUptextMulti(['High', 'Alchemy'], 500) Then
Begin
Writeln ('Found High Alch spell')
ClickMouse2(true);
wait(randomrange(150,200));
end;
end;
end;
The seed procedure:
Simba Code:
Procedure ClickMagebane;
Begin
MagebaneDTM := DTMFromString('mQwAAAHicY2ZgYHBnZmBwBmIXII5gZGCIBOJQIC7LqmLorZvE0FXdz8AKVAfDjEgYCAD+RgaB');
GameTab(Tab_Inv);
if FindDTM(MagebaneDTM, x, y, MIX1, MIY1, MIX2, MIY2) then
Begin
wait(randomrange(500,600));
MMouse(X, Y + 3, 0, 0);
wait(randomrange(350,400));
ClickMouse2(true);
Writeln ('Found seed, Time to farm!')
wait(randomrange(300, 350));
FreeDTM(MagebaneDTM);
end;
end;
Loop:
Simba Code:
repeat
HighAlchItem;
wait(randomrange(400,500));
AlchingTheHerbs;
GameTab(Tab_Inv);
until (not FindDTM(CleanHerbDTM, x, y, MIX1, MIY1, MIX2, MIY2));
FreeDTM(HighAlchDTM);
FreeDTM(CleanHerbDTM);
AntiBan;
GameTab(Tab_Inv);