My script says it finds a bitmap, but on the screen, there is none.
Heres a picture of the website I'm using my script on:

and my script:
SCAR Code:
program New;
var
D, P: integer; //P is also a variable
procedure LoadBitmap;
begin
P := BitmapFromString(15, 19, 'z78DA33301805F4006E780125' +
'7A474D1E3579D4E451934782C900DDC78E08');
D := BitmapFromString(17, 19, 'z78DA3330A02670C3010C6800' +
'E8630BA65DB40E014A6CA16E680C1E5B28B7CB8D44306ACB60B36' +
'578A4315AE7176A9530F4292D0767C93FB0291000E322A29C');
end;
procedure FBitmap;
var
x, y :integer;
begin
if FindBitmapToleranceIn(P, x, y, 1, 1, 614, 328, 25) then
begin
WriteLn('Found the letter P');
end else
WriteLn('Color Not Found. :/ Sorry');
if FindBitmapToleranceIn(D, x, y, 1, 1, 614, 328, 30) then
begin
WriteLn('Found the letter D');
end else
WriteLn('Color Not Found. :/ Sorry');
end;
Begin // this is main loop
LoadBitmap;
FBitmap;
end.
Thanks in advance for all your help!