Gu3st...
2009-04-02 18:13:57
{*******************************************************************************
function FriendTalked: Boolean;
By: Zyt3x
Description: Results true if a friend talked to you.
*******************************************************************************}
function FriendTalked: Boolean;
var
x, y, I : Integer;
begin
Result := False;
if FindColor(x, y, 4013377, 5, 271, 14, 332) then
for I := 0 to 4 do
begin
Result := ((GetColor(5, 280+(13*I)) = 16776960) and (GetColor(11, 280+(13*I)) = 16776960));
if Result then Break;
end;
end;Results true if a friend talked to you.Splitchat ON
It's good to have in antiban and autorespondering functions:
Antiban; Someone talked, set friend chat off