Log in

View Full Version : Help me with some easy question please



Rune Hacker
03-18-2007, 09:51 PM
1. what is the command to turn auto retaliate on
2. can i make it click "Take Bone" and tell it not to click "Examine Bone"
3. it runs from random when it sees its not at full health, but when it runs back, it will bury another bone, check health, and run again since its nto at full health from the last random.
4. whats the best way to find a bone on the screen in varrok chicken pen, im using a specific color but it still goes towards white hair and stuff sometimes.

Please help if you can.

whales
03-18-2007, 10:07 PM
1. I don't think there is an SRL command for that, try making your own. It would not be to difficult you just use gametab1 then click the location of Autoretaliate until it is not red.

2. I'm actually working to make a procedure that will do that, if you think you can try to make your own other wise your going to have to wait..

3. Not sure do you have it so that it runs when health gets low? Other wise I'm not sure why it would be doing that.

4. Use a bitmap, use up text. (FindObj)

Rune Hacker
03-18-2007, 10:11 PM
this is my randoms procedureProcedure AntiRandoms;
Begin
FindNormalRandoms;
FindLamp(Skillforlamp);
FindTalk;
FindScapeRune;
if (findfight) then begin
RunAwayDirection(RunDirection);
SleepAndMoveMouse(10000+Random(2000));
RunBack;
end;
end;
Can you quickly make the auto retaliate thing for me since it sounds very easy, but ive never done anything like that so i dont know how lol
And ill learn about bitmap later since it looks really confusing lol

WT-Fakawi
03-18-2007, 10:15 PM
//----------------------------------------------------------------------------//
//-- Checks and sets Auto Retaliate. True = On, False = Off --//
//----------------------------------------------------------------------------//

procedure Retaliate(AutoRet:Boolean);
begin
GameTab(1);
if AutoRet then
begin
If not FindColor(x,y,1777020,624, 385, 719,396) then
begin
Mouse(666,381,8,8, True);
end;
end;
if not AutoRet then
begin
If FindColor(x,y,1777020,624, 385, 719,396) then
begin
Mouse(666,381,8,8, True);
end;
end;
end;


1. Retaliate.
2. ChooseOption('ke B');
3. Build in a timer that checks once every so often, or make it eat if below threshold.
4. Fastest way:
- Search the MainScreen for a bone-color
- Move the mouse over that color.
- Check the Uptext for 'Bone'
- Get the current mouse pos
- RightClick
- ChooseOption('ke B');
- Repeat with higher Tolerance.
Slow Way:
- Check MainScreen for a Deformed Bitmap (4*4)
Bone1 := BitmapFromString(4, 3, 'B6ABABB6ABAB3D3115' +
'3D3115C9C1C1C9C1C13D31153D31153D3115DBD6D6A49897A 4989' +
'7');
Bone2 := BitmapFromString(4, 2, 'D7D2D1C9C1C1A79B9B' +
'A79B9BF0EEEEB3A8A83D31153D3115');
Bone3 := BitmapFromString(3, 2, '433418BEB5B53D3115' +
'D3CDCDD3CDCDD3CDCD');
Bone4 := BitmapFromString(2, 2, '958B8A8E8484E8E5E5' +
'382B12');


This one is taken directly from Ratz!


//----------------------------------------------------------------------------//

Function PickUpBones:Boolean;
var Dx, Dy, i, Mark4, FLx, FLy:integer;
var acc:Extended;
begin
for I := 1 to 4 do
begin
case I of
1: TheBone := Bone1;
2: TheBone := Bone2;
3: TheBone := Bone3;
4: TheBone := Bone4;
end;
if (not Loggedin) then Exit;
FindDeformedBitmapToleranceIn(TheBone, Dx, Dy, MSX1 + 50, MSY1 + 50, MSX2 - 50, MSY2 - 50, 5, 1, True, acc);
begin
if (acc >= 0.3) then
begin
MMouse(Dx, Dy, 0, 0);
FindTalk;
if (IsUpText('ake Bo') or IsUpText('ke Bon')) then
begin
Mouse(Dx, Dy, 0, 0, False);
if InChatMulti('spac','pace','ful') then SOSDrop;
FindTalk;
ChooseOption(x, y, 'Take');
MarkTime(Mark4);
repeat
FTWaitAll(2);
until ( (not FindColor(FLx,FLy,255,MMCX-40,MMCY-40,MMCX+40,MMCY+40)) or (TimeFromMark(Mark4) > 6000) );
Result := True;
FlagFTWait;
Exit;
end;
end;
end;
FTWaitAll(1);
end;
end;

Rune Hacker
03-18-2007, 10:25 PM
Awsome, thanks a million for posting all that
But am i allowed to use the bone picker from ratz for a script im using to submit for members or what?

and ChooseOption(x, y, 'ke B'); didnt work, im sticking with it examining a bone every once in a while lol

whales
03-18-2007, 11:31 PM
Awsome, thanks a million for posting all that
But am i allowed to use the bone picker from ratz for a script im using to submit for members or what?

and ChooseOption(x, y, 'ke B'); didnt work, im sticking with it examining a bone every once in a while lol

It would probably decrease your chances of making it in but if Fakawi gives you permission then you could try.

Rune Hacker
03-18-2007, 11:42 PM
Im goin to keep what i have I think since i still like my way, but i would love to get a bitmap working so it would only click bones

WT-Fakawi
03-19-2007, 09:34 AM
Awsome, thanks a million for posting all that
But am i allowed to use the bone picker from ratz for a script im using to submit for members or what?

and ChooseOption(x, y, 'ke B'); didnt work, im sticking with it examining a bone every once in a while lol

Hm, you could also make a small sliced bitmap of the MenuItemtext "Take Bones" and check for that whenever you RightClick. Works 100% of the time.

Amd about using Functions. Yes ofcourse you may use them, as long as you credit properly.

whales
03-19-2007, 12:08 PM
Hm, you could also make a small sliced bitmap of the MenuItemtext "Take Bones" and check for that whenever you RightClick. Works 100% of the time.

I need to try this out, would it be better to use 'ke Bo' or someting small like that or the whole phrase?

WT-Fakawi
03-19-2007, 02:12 PM
http://www.villavu.com/Pictures/TakeBones.png


1. Press Alt-PrintScreen, copy to Photoshop
2. Select one row of pixels, between take Bones. Crop the Selection. Use this bitmap for all Take Bones finding inside ChooseOption.
3. This is what a typical "ChooseOption Bitmap" looks like enlarged 400%.


Note: under certain circumstances, Take is Yellow aot White. I usually make two bitmaps :)

whales
03-19-2007, 07:52 PM
Excellent thank you!

Rune Hacker
03-20-2007, 03:51 AM
Wow, that is really helpfull!

Thanks a load for the tips and help.