SRL Archive - RS3 Outdated / Broken Scripts

Okay so I've seen many on the forums that need eating procedures for their scripts…

So I decided to publish a little script that eats for your char when he needs it.

What it will do :
-Detect if the HP number (next to the heart in the upper right corner) is red
-If it is red, then it will eat random food until it is green

[NOTE1 : IF YOU HAVE STUFF IN YOUR INVENTORY THAT IS NOT FOOD : THEN YOU MUST PUT "//" IN FRONT OF THE CORRESPONDING INVENTORY SPOT !!!]

[NOTE2 : of course, if I upload this script… It is for you to use it… Credits would be appreciated]

Here it is :

V1(sux like fux) : [ATTACH]11893[/ATTACH]

V1.5(pretty good i think) : [ATTACH]12551[/ATTACH]

Heres a bit faster, safer for sure.

Function Eat: Boolean;
Var
  T, I, X, Y, Hp: Integer;
  Color: String;
Begin
  Repeat
    Hp := GetMMLevels('hp', Color);
    If(Color = 'Orange')Or(Color = 'Yellow')Or(Color = 'Red')Then
    Begin
      For I:= 1 To 28 Do
      Begin
        MMouseItem(I);
        Wait(50);
        If(IsUpText('Eat'))Then
        Begin
          Getmousepos( X, Y );
          Mouse(X, Y, 0, 0, True);
          Wait(500+Random(300));
          Break;
        End;
      End;
    End;
    If(I = 28)Then Exit; //This means .. No food..
    If(Not Loggedin)Then Exit;
  Until(Color = 'Green');
  Result := True;
End;

Returns true when it has green HP.

From: JuKKa
Heres a bit faster, safer for sure.

Function Eat: Boolean;
Var
  T, I, X, Y, Hp: Integer;
  Color: String;
Begin
  Repeat
    Hp := GetMMLevels('hp', Color);
    If(Color = 'Orange')Or(Color = 'Yellow')Or(Color = 'Red')Then
    Begin
      For I:= 1 To 28 Do
      Begin
        MMouseItem(I);
        Wait(50);
        If(IsUpText('Eat'))Then
        Begin
          Getmousepos( X, Y );
          Mouse(X, Y, 0, 0, True);
          Wait(500+Random(300));
          Break;
        End;
      End;
    End;
    If(I = 28)Then Exit; //This means .. No food..
    If(Not Loggedin)Then Exit;
  Until(Color = 'Green');
  Result := True;
End;

Returns true when it has green HP.

why not
Result := Color = 'green';
just to be sure :D

From: Hermpie
why not
Result := Color = 'green';
just to be sure :D

yeah i thought about it when i posted then i thought ah what the hell im not gonna use it ;)

From: JuKKa
yeah i thought about it when i posted then i thought ah what the hell im not gonna use it ;)

Hrrrm I trust you :D(liar-.-)

From: Hermpie
Hrrrm I trust you :D(liar-.-)

not a liar.. Im talking the truth here.

o do you :p

o actually i do. How about u show us ur eating procedure?

i would add it to my fighting script if i knew how to write one :(

From: JuKKa
o actually i do. How about u show us ur eating procedure?

i don't have a eating procedure i do have a heal procedure in my monk kilelr + healer script soon releasing :D

From: slayerkiller13
i would add it to my fighting script if i knew how to write one :(

LOL

From: Hermpie
i don't have a eating procedure i do have a heal procedure in my monk kilelr + healer script soon releasing :D


LOL

dont laugh at me i will learn how to script after exams =p

link me to your monk or send it to me please if it is good ?i get you proggys :D
i cbb with chickens anymore i need better thing to train my 2 noobs with at f2p
im try narcle auto fite

It works pretty good(sorry for thread haijcking) but it has yet to many bugs before release

OK now listen everybody, this SOCKEZ so i updated it… now it's kind of better ;)

NEW ONE IS GR8…

And ppl… plz stop EXPLODING THIS THREAD