Results 1 to 13 of 13

Thread: Eating Procedure

  1. #1
    Join Date
    Dec 2007
    Posts
    2,766
    Mentioned
    2 Post(s)
    Quoted
    37 Post(s)

    Default Eating Procedure

    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) : Attachment 11893

    V1.5(pretty good i think) : Attachment 12551

  2. #2
    Join Date
    Oct 2006
    Location
    finland, helsinki
    Posts
    2,501
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Heres a bit faster, safer for sure.

    SCAR Code:
    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.

    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!

  3. #3
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by JuKKa View Post
    Heres a bit faster, safer for sure.

    SCAR Code:
    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
    ~Hermen

  4. #4
    Join Date
    Oct 2006
    Location
    finland, helsinki
    Posts
    2,501
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Hermpie View Post
    why not
    Result := Color = 'green';
    just to be sure
    yeah i thought about it when i posted then i thought ah what the hell im not gonna use it

    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!

  5. #5
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by JuKKa View Post
    yeah i thought about it when i posted then i thought ah what the hell im not gonna use it
    Hrrrm I trust you (liar-.-)
    ~Hermen

  6. #6
    Join Date
    Oct 2006
    Location
    finland, helsinki
    Posts
    2,501
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Quote Originally Posted by Hermpie View Post
    Hrrrm I trust you (liar-.-)
    not a liar.. Im talking the truth here.

    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!

  7. #7
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    o do you
    ~Hermen

  8. #8
    Join Date
    Oct 2006
    Location
    finland, helsinki
    Posts
    2,501
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

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

    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!

  9. #9
    Join Date
    Apr 2007
    Posts
    76
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

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

  10. #10
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by JuKKa View Post
    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
    Quote Originally Posted by slayerkiller13 View Post
    i would add it to my fighting script if i knew how to write one
    LOL
    ~Hermen

  11. #11
    Join Date
    Apr 2007
    Posts
    76
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Hermpie View Post
    i don't have a eating procedure i do have a heal procedure in my monk kilelr + healer script soon releasing


    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
    i cbb with chickens anymore i need better thing to train my 2 noobs with at f2p
    im try narcle auto fite

  12. #12
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

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

  13. #13
    Join Date
    Dec 2007
    Posts
    2,766
    Mentioned
    2 Post(s)
    Quoted
    37 Post(s)

    Default

    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

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Procedure TypeSendRandom & Procedure AutoResponder!
    By Ultra in forum Research & Development Lounge
    Replies: 12
    Last Post: 01-08-2008, 07:04 PM
  2. Eating food help
    By RudeBoiAlex in forum OSR Help
    Replies: 6
    Last Post: 03-08-2007, 04:52 PM
  3. Procedure that calls random procedure?
    By Secet in forum OSR Help
    Replies: 2
    Last Post: 03-03-2007, 03:56 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •