Ok I updated this..
Look at it and tell me what your advice is please. Thank you.
Ok I updated this..
Look at it and tell me what your advice is please. Thank you.
Last edited by Wanted; 01-27-2010 at 11:39 PM.
Looks good, but how about making burrybones procedure like this;Now it repeats it until it doesn't find bonecolor, and procedure is in smaller size.SCAR Code:procedure BurryBones;
begin
repeat
If(FindColorSpiral(xx,yy,GrayishBoneColor,494,185,770,507))Then
Mmouse(xx,yy,2,2);
If(IsUpText('Bone')) Then
begin
Wait(100+random(50));
Mouse(xx,yy,2,2,true);
wait(1950+random(200));
end;
until(not(FindColorSpiral(xx,yy,GrayishBoneColor,494,185,770,507)))
end;
And you didnt count your variable BoneLoadsToComplete, you would do it like this:
BoneLoadsToComplete:=BoneLoadsToComplete+1SCAR Code:repeat
FindNormalRandoms;
GetBones;
wait(1000+random(250));
BurryBones;
wait(1200+random(250));
BoneLoadsToComplete:=BoneLoadsToComplete+1
until(BoneLoadsToComplete = NumberOfBoneLoads);
But looks good script.
yea it looks good when you change like pentti says.
i also made somekinda like that, but when you make a script a lot of times people look at it but don't post anything, or less and after a time you can't see the script anymore, because it's on the second page![]()
[QUOTE=Santa_Clause;277761]I love you too TSN :p[/QUOTE]
[CENTER][URL="http://www.stats.srl-forums.com/sigs"][IMG]http://www.stats.srl-forums.com/sigs/1324.png[/IMG][/URL][/CENTER]
you could even use this for the bone burying. I personally think its more reliable.
Then use this as the maskCode:ClickAllItemsBmpMaskTolWait('Bury',bonemask,10,5,300);
Code:bonemask:= BitmapFromString(37, 36, 'z78DAED97410E80200C04BFC42BF8FF93BC9A189AAD686DEBCC89' + '1050262C55C600000000F82FF3443F2F6F4F0FBB55BB4A0E57767' + '67F3653EFAA9491918ED3C43B4B597F8C9DF72DBA759E64EA7B54' + 'B7665E73A524CD4EE63D62ECBEAD03914F7EDB2EC3F742C9D24E0' + '2739ED39D0A9CC74ED9B5BA99CCF0EF81DDB395ADD3FDAEB75DEF' + '5B39000054E400819A0FF7' );
Scripts: AIOCurser !, Tea Stall Thiever !, Flax Picker !
Other: Objective Functions, Scarduku
Tutorials: How to create a plugin for Simba, [VB.NET] Using My.Settings, [Photoshop] Basic Abstract Art
Outdated: m!ne v1.00 [STATS]
why uou don't use repeat and 1 time
?procedure BurryBones;
begin
repeat
If(FindColorSpiral(xx,yy,GrayishBoneColor,494,185, 770,507))Then
Mmouse(xx,yy,2,2);
until(IsUpText('Bone'))
Wait(100+random(50));
Mouse(xx,yy,2,2,true);
wait(1950+random(200));
[QUOTE=Santa_Clause;277761]I love you too TSN :p[/QUOTE]
[CENTER][URL="http://www.stats.srl-forums.com/sigs"][IMG]http://www.stats.srl-forums.com/sigs/1324.png[/IMG][/URL][/CENTER]
There are currently 1 users browsing this thread. (0 members and 1 guests)