Mulberry eating made simple

[Redell]

Okay, so I have been getting frustrated with how long it takes to eat mulberries and how repetitive it gets, so I have made a script that does that for you... as long as you have mulberries in your backpack.

--Instructions
Goto http://freddy1990.com/index.php?page=products and Download "SCAR", its a free scripting program.
Install and all that jazz.
Open the App and paste the below code over the defaults.
Drag the target *crosshair* looking thing into your Haven and Hearth window.
Click inside the H&H window and press Ctrl+Alt+R to run the script.
After the mulberries have been eaten you will have to press Ctrl+Alt+S to stop the script from doing anything else.

If you have any problems just post and I'll see if i can help.

P.S. If this is not allowed sorry just delete this post.

*EDIT: I can edit this to eat anything so just ask and I'll replace mulberries with the other food. (I may need a pic of it on a default scale)
**EDIT: Updated a more efficient code.

Code: Select all

program eatingmulberries;
var
  x, y, mulberry, eat, grape:
Integer;
begin
mulberry := BitmapFromString(30, 30, 'beNrtlt1LU3EYx/0P6iLS' +
       'tXN+50z3Zml6jnqhW6Wp28xBaEWSduUYBJlgNdiLc2qhpkFgZpKlF' +
       'lKBIg7yZUtnQprFJmbMfCkky+gFof+grx4ZQkJnzosuOjwX4+zsc7' +
       '6/5/k+XxYV9f8Sc8Xv2SvUtjf//Eo8s1Kb3dtUggoRhJtbKyw4Hu6' +
       '6Vyb8sFuhnq077a0tFAgCuVWbPVVbMJ2jw4fWRF48XCBPDF4ANlDf' +
       'uGqz+xQqAb5+iqRUryp+6b7rR5Vrualooe5U6L0i4Xh+4UHNr86uI' +
       'M9PsjLAB5zGdllcH2EGWNm37oZPjWc/5+YuHjnaw8pEkvEYjul1Gj' +
       '9aLGsu13uOA/kRRQ9bdQOEGSRsD02mk7kJVoaXQvOIXb91Fn8l+xx' +
       '5Hyouf8nJeUOIm5BWqXTEqn9Mk2eE8dsMUzZ9gKIn7fpRR567tlAk' +
       'WYB3sLFT6RocFoLbpFKPVddB0Z0UDfL89cI+in7KyrrkStSw0yjSJ' +
       'CFvYO4QjzZCsNeqe7hB/umqXio+70tMBnnMme91GJoZmSsjS7xmeA' +
       'PlsesroqMt0TEgv7DqRxg2qDPMncifSUmD2jaGHXLk3ZIrzeqEsOw' +
       'B2V6OGyw1m2nWIpHcQWPV8W8ztMuXyn1ypTs27raURpUoD5nSM8Vr' +
       'RkMwl+dJyYFSM1rtlEhGMS+Veqno3DuOf8WwvSwLzWjFGYopE92NT' +
       'Us7jRM8j01ZtVjgkHmbzm83zHJ8kOOnCDNGmLs0QStOUky4O44J9i' +
       'dyIK9cuTqflASbzcFsNj2YIHtoZsyu97tN4ebSZkQo1HD1d4cDSwH' +
       'Z/VJqnGFn7Qb/xvq8dORZtcd3lnjYAigHBAVyXYzEQ5gAxy1qtDOp' +
       'aTcL0sozdkjGENfhCjXaAvi16BgPYZdvFK3V1KAhF1MVrnBmt61JP' +
       'E3FCCXTvv2QDcHYF5CrJAcaDh7eGTnU8PpEHsvupGhontdovjoq/T' +
       'z/hCatYYb/tj4JHstskStg7CGEEse95lPaGVlzQnKkZIUaUb9WXQO' +
       '4YBIEXYtCFQk2pBnpB/hKVhaMjdxDFiE6IiQL8HGnMeg2YY69hMDJ' +
       'WG3UrpCFXIVJkPYoNDly7Lb/NHYL+29dvwF9gW52');
eat := BitmapFromString(35, 24, 'beNq9lruOEzEUhul4EHKZSSbZn' +
       'Vtmkmy4rDLLZZEQr8AbUNFQUlEsPQ0vgERHhygoKGjpaCh4j91//H' +
       'vOHJ9JRAXSL8v22Ofzb584vnr26arV1w8vfnx8qeu6/PXlzc/Pr39' +
       '/e4uS0iMpdLKCTulnXXqer2//awGEcprFk9NpqzRCfZpFUR5HRRwX' +
       'M9THJ5PRYnwnGaEcLSdOY9b9LFHqJubxsJM4xGR8fkJkGSM9lDRB0' +
       'T1DcYwsxoNyR0mj7H4Bne6y9G7Guii9l6MszleQ+XRQGI84YpwgZy' +
       'fOH5RmcLmvIN1fnJcAocdVSnxlSaGuB3uW8y4gmMLIVVOXTSXyTRd' +
       'Bg0xwqRsRGmwdzr2cIezqolNT+yZYR+JoF74pi9xXskINAgWqHq4h' +
       'H9zZofxELYnWLbv3FYIg5qEB0Y7s2/X1LSPO9QvYB7vqvzbWGjPNg' +
       'wqA5uJI7GDuQV99pzIlyxiCQkd/AQWH1VTaI0wFlptASAAFmmuQRL' +
       'agzpTeJdbpSH4RASg/AKofbVpWF/bYGWkZkGWFWzevEoLWj7cGJIl' +
       'hjmlIF1Cf7YOsS+oFWLCzeXKGUjL8AKgJt07GKJBhBaD1EixQNpdn' +
       'KGlKguhj6vtVSvREt4fdHbIaghabk6RegrK93KHEBh47I9lAQVjo4' +
       'FKyjtbL7dNdK7A6Uzbl1O1n7ocDvyCd3kV/RnAkLJjy6aeuvmC6ud' +
       'ZCkM4c/ntCkt6e1WpBIT2Yja3cYIjLs8oD9SOls4hDUICYrRI2Hau' +
       '9DAWnNQTRhekHBY+Z//M4Aej9q5LiC0o3KXlT8VmFd9ef7+9Y5zuK' +
       'bzC8ytDkY4xvrT7IDQ/BqGE=');
grape := BitmapFromString(26, 29, 'beNqtls1LVFEYxtezKuIWI3I' +
       'N51ub0ZGMMMgUqyn7IBvBLLOPIfsEGZHAFPsgimwRUVmL2kRtwjYF' +
       'g9Aq6AOqRbgKCloFLVv0B/S789x5587oMngYzjn3nN993vc959zJx' +
       'Kdmp/6jopm4KdaWQNWRdFl13YpS4dUmPY1siC2nrY2uqtNyPoTSuX' +
       '0P8l0HUuGdyQYPWPfqTFxr+y63nFnon3k/cnNpDNGuAgPGQH27dgL' +
       'mijRxRAAFhK7IVWBtpKCWZkf3tro7DBiwJBSN9kNNKNYXVgMxGA25' +
       'NeGXgdDuDfUYjXE5UVCCdHYnNkaSTZsdAw5u6h1z8maVhvIPbaCt2' +
       'adlfJqArIXQHokdcfagU05eOukMnHeG5pxxvQtBO9yyjkjnh3tzqc' +
       'aDbev9ylYypgChwRl2+r8WFj/nXt5wLhxz9gP8OfHxR+HtdNfps26' +
       'eabyaKkzO9OxKNvgoq0LaBzKtMbtGKLTgzKGiM/Iid//XxBfgdIPB' +
       'ElFhtlupUCaNxiMmEMVWt+NT4TWuhELYo6sRoZQWIBcXh4/Ob6ddp' +
       'VWAqsJudwuhabloavBrGVaB9HQFWqZKU02ZBlMQMkaY2tKGGujcph' +
       'oxZ9Dt0/6pOwsKAQHRTBIITSgUdMUcno53jfIUhzgJokp/Hj/6Pem' +
       '9IuSSItIlGm25yl/vNhT6PvGOAsEk4YpXla1DERdS9kq5J0+LVyzt' +
       'DGorqu7ehPJC2faukTJNKO9GCrlKlGJBV4tjlMYyqXRRd9rP39yFp' +
       'm3D7lpujDnmzZIDX9sPqcRifvj7ioWM1NEsXXaggjTgzJFYLqaMyb' +
       '9qHQxTGbNtJpE3DgLLbaHMgMKYTdbusjBBKWOWLmXmWe4Og56fSw8' +
       'NhUBpRDWlCqqpXLFEh1GvU1eHi9/pW8eNozoiVtmNyhHzd0jIZYKd' +
       'a6MJpezRhoYsdXbHmjEvbxmfxj6UMeVfHqwc7GQkoDj6HskYN63Oi' +
       'GjaD1rCDlf21NU4v3aTJzpS8Wwy3p7UScSYwvTPaTlp1A4CmYemMn' +
       'HRse0Npc8lkEQ2hUTTmRq63VtzjYRcNhWriBcpXTqnyCu3Pr5p75u' +
       'LMdEULMZqaBWgbMhJjdL+p7y5NWr2RBNQ106VJtnyyhUKQZYkj1ax' +
       'ZzT7exD9BwuKslY=');
           begin  //rightclick on berry
           repeat
           if(FindBitmaptolerance(mulberry,x,y,100)) then
                                 begin
                                 FindBitmap(mulberry,x,y)
                                 movemousesmooth(x+10, y+10)
                                 clickmouse(x+10, y+10, false)
                                 wait(1000)
                                 FindBitmaptolerance(eat,x,y,150)
                                 movemousesmooth(x+10, y+10)
                                 clickmouse(x+10, y+10, false)
                                 wait(600)
                                 end
 ;          until false;
           end
end.

[theTrav]

YAAAAY MACROS!

Loftar, please give us a "feed" option or make fruit trees finite resources. END THE TORMENT!


Better yet, give the hearthlings a more sane metabolism

[Chakravanti]

Yeah now that we can manually kill off our hunger bar if we want to face stuff spam our FEPs this is perfectly reasonable to adjust. And a very 'newbie friendly' gesture.

[poocolator]

The file's a trojan-- don't download it!
Hurr durr

[DeadlyPencil]

... does this game allow macroing...

[kimya]

the game has no will.

[sabinati]

Joined: Thu Aug 20, 2009

if you're still eating mulberries you're doing it wrong

[Kheyre]

He just made a script to help people out and you are stuck on small details?

[Redell]

Joined: Thu Aug 20, 2009

if you're still eating mulberries you're doing it wrong

Have you taken into account that I might have died?
And yes I did make it mostly for newbs and my friends.

Anyways I haven't, I just find it easier to have mulberries with me when I'm doing yard work or building palisades. (Inexpensive and easy to get)

[DeadlyPencil]

honestly, i hope they dont allow macros and ban accounts using them. Macroing ruins games. Runescape, a java game just like this one, had rediculously suffixticated macros running for years on their game. almost 10% of their server pop probably was bots at one point until they cracked down hard and now you would be hard to find one.

How would you feel if someone created a macro and got their hero to chop down every tree he could find 24 hours a day.... there would be no trees left in public areas of the game, and it takes forever for them to grow back. you people are short sighted if you think any kind of macroing is "harmless"