1m pounds to who ever can get a decent color of this wall safe
![]()
1m pounds to who ever can get a decent color of this wall safe
![]()
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
Simba Code:procedure FindColorz;
var
TPA:TPointArray;
ATPA:T2DPointArray;
bmp:String;
i,p:integer;
begin
SetColorToleranceSpeed(3);
SetToleranceSpeed3Modifier(0.01);
if(FindColorsSpiralTolerance(MSCX,MSCY,TPA,726038,80,256,334,343,529)) then
begin
SplitTPAWrap(TPA,1,ATPA);
p := length(ATPA);
for i := 0 to p-1 do
begin
writeln(p);
if(length(ATPA[i])<25) then
begin
DeleteValueInATPA(ATPA,i);
i := i-1;
p := p -1;
end;
end;
SortATPASize(ATPA,true);
Mouse(MiddleTPA(ATPA[0]).x,MiddleTPA(ATPA[0]).y,4,4,3);
end;
end;
All I could do with that screen shot and my limited time.
Try it out for me pls.
I was using dtms but they kept playing up..
Simba Code:procedure CrackSafe;
var
Safe, x, y: Integer;
begin
Safe:= DTMFromString('mggAAAHicY2NgYGBnZGDgAWJGIOYGYhYoOwkoFwXEWVAMYicCsaWuNIOoqBCDqBAUA9nSopwMuAAjDgwBAFtlBCY=');
if FindDTM(Safe, x, y, MSX1, MSY1, MSX2, MSY2) then
begin
Writeln('Found safe!');
MMouse(x,y,2,2);
If IsUpText('safe') then
ClickMouse(x, y, 1);
end;
FreeDTM(Safe);
end;
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
nope dint work maybe im doing something wrong
I need a smoke but I quit![]()
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
Could you post your code?
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
Oh my bad 2am ...
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
I changed it to this:
Simba Code:if(FindColorsSpiralTolerance(MSX1,MSY1,MSX2,MSY2(80,256,334,343)) then
but then I get this
[Error] C:\Simba\Scripts\crack2.simba(68:51): Type mismatch at line 67 which is on that line
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
not just yet!
Wait do u mean I should put my own cords ie a rough box shape round safe?
because ,I changed it to this:
Simba Code:
if(FindColorsSpiralTolerance(MSX1,MSY1,MSX2,MSY2(8 0,256,334,343)) then
but then I get this
[Error] C:\Simba\Scripts\crack2.simba(68:51): Type mismatch at line 67 which is on that line
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
Simba Code:if(FindColorsSpiralTolerance(MSX1,MSY1,MSX2,MSY2)) then
changed it to that, I now get this:
[Error] C:\Simba\Scripts\crack2.simba(66:46): Variable Expected at line 65
(which is on that line)
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
learn to parameters
Creds to DannyRS for this wonderful sig!
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
#NKNSimba Code:procedure FindColorz;
var
TPA:TPointArray;
ATPA:T2DPointArray;
bmp:String;
i,p:integer;
begin
SetColorToleranceSpeed(3);
SetToleranceSpeed3Modifier(0.01);
if(FindColorsSpiralTolerance(MSCX,MSCY,TPA,726038,80,256,334,343,529)) then
begin
SplitTPAWrap(TPA,1,ATPA);
p := length(ATPA);
for i := 0 to p-1 do
begin
writeln(p);
if(length(ATPA[i])<25) then
begin
DeleteValueInATPA(ATPA,i);
i := i-1;
p := p -1;
end;
end;
SortATPASize(ATPA,true);
Mouse(MiddleTPA(ATPA[0]).x,MiddleTPA(ATPA[0]).y,4,4,3);
end;
end;
http://www.youtube.com/user/YoHoJoSRL
Good scripting guides on youtube
Formerly known as (djcheater)
There are currently 1 users browsing this thread. (0 members and 1 guests)