is there a possibility to make a script for this?
is there a possibility to make a script for this?
Simba Code:(*
ExitSquealOfFortune
~~~~~~~~~~~~~~~~~~~
.. code-block:: pascal
function ExitSquealOfFortune(): boolean;
Finds and exits the annoying Squeal of Fortune pop up.
.. note::
Author: Coh3n & Ashaman88
Last Modified: June 9, 2012 by Ashaman88
Example:
.. code-block:: pascal
ExitSquealOfFortune();
*)
function ExitSquealOfFortune(): boolean;
var
w, h, x, y, xs, ys, xe, ye, tmpCTS,SquealDTM: integer;
begin
if (SRL_ExitedSquealOfFortune) then
exit;
SquealDTM := DTMFromString('mbQAAAHicY2VgYNjOzMCwEIirgLgSiBuB2JiRgUELiGWB2BCIrYH4/1kXhku1MQyLrxcyfPz0iSHA2Z2BH6gfHTNiwWAAAHx8DXE=');
tmpCTS := getColorToleranceSpeed();
setColorToleranceSpeed(1);
getClientDimensions(w, h);
// green color of the goblin thing
if (findColorTolerance(x, y, 7457955, 1, 1, w - 1, h - 1, 15)) then
begin
// to avoid out of bounds warnings
xs := x-70;
if (xs < 0) then
xs := 1;
ys := (y - 70);
if (ys < 0) then
ys := 1;
xe := (x + 130);
if (xe > w) then
xe := (w - 1);
ye := (y + 70);
if (ye > h) then
ye := (h - 1);
// gold color in the X
if (findDTM(SquealDTM,x,y,xs,ys,xe,ye)) then
begin
mouse(x, y, 3, 3, mouse_Move);
if (waitUptext('elect', 300)) then
begin
getMousePos(x, y);
mouse(x, y, 0, 0, mouse_Left);
result := true;
SRL_ExitedSquealOfFortune := true;
end;
end;
end;
FreeDTM(SquealDTM);
setColorToleranceSpeed(tmpCTS);
end;
Please search...
http://villavu.com/forum/showthread.php?t=84507
Could you make a script where it would always get the good rewards?
Miner & Urn Crafter & 07 Chicken Killer
SPS BlindWalk Tutorial
Working on: Nothing
teacher in every art, brought the fire that hath proved to mortals a means to mighty ends
There are currently 1 users browsing this thread. (0 members and 1 guests)