SRL Archive - Other Scripts

How many of a color in client.


XxKanexX

2006-04-12 01:14:36

Simple. Insert a color into the constance and press play. Tells you how many of that color are in the client. ;)


Const
Color = 0;

function HowManyColor(Color, xs, ys, xe, ye, Tol: Integer): Integer;
var Points: TPointarray;
begin
FindColorsTolerance(Points, Color, xs, ys, xe, ye, Tol);
result:= GetArrayLength(Points);
end;

function HowManyColorClient(Color, Tol: Integer): Integer;
var w, h: Integer;
begin
Getclientdimensions(w, h);
result:= HowManyColor(Color, 0, 0, w, h, Tol);
end;

begin
ClearDebug;
Writeln('Found color '+inttostr(Color)+' in client, '+inttostr(HowManyColorClient(Color, 0))+' times.');
end.

Made by XxKanexX

Sdcit

2006-04-12 01:17:01

ARrggh! More strange function o.O :P Great job kane

WhiteShadow

2006-04-12 02:16:42

:( Wishes to jack y00r skillz.

phantombmx

2006-04-12 02:54:01

cool.. now i can find out how many of the srl blue backround thing color there is.. just what i needed :rolleyes::p

XxKanexX

2006-04-12 03:00:10

From: WhiteShadow
:( Wishes to jack y00r skillz.

=O

-Hides in closet-

The Un-Named

2006-04-12 19:41:31

Found color 0 in client, 16818 times.
Found color 16777215 in client, 316285 times.

:O

Sdcit

2006-04-12 19:57:04

Found color 0 in client, 209175 times.
Successfully executed


<3 5000*5000 pixel MS paint

The Un-Named

2006-04-12 20:54:16

I think your avatar should say "Can we auto it? YES WE CAN :D!", SDcit. :)

Sdcit

2006-04-12 21:27:01

Done :p, also added someof my own touch to it


Found color 0 in client, 15916 times.
Successfully executed