Simba Code:
program testP07;
{$DEFINE SMART}
{$I SRL/SRL.Simba}
{$I P07Include.Simba}
{$i SRL/SRL/Misc/SmartGraphics.simba}
var
x, y, water: integer;
//LOGIN INFO STUFF
procedure P07_DeclarePlayer;
begin
P07_PlayerName:='Name';
P07_PlayerPass:='Pass';
end;
procedure loadDTM;
begin
water := DTMFromString('mQwAAAHicY2ZgYBBgZGAQB2IxIL7LAMGPgLhn422G5nX3GUqW3WDgB/JhmAUJAwEAXdwJMw==');
end;
procedure paintScreen;
begin
if (findDTM(water,x,y,11,12,508,327)) then
begin
//SMART_ClearCanvas;
SMART_DrawBoxEx(true, true, intToBox(x-10,x+10,x-10,x+10), clRed);
end;
end;
begin
clearDebug;
SetupSRL;
P07_DeclarePlayer;
SetupP07Include;
ActivateClient;
loadDTM;
wait(2000);
if (not P07_LoggedIn) then
begin
P07_LogInPlayer;
P07_MakeCameraAngleHigh;
P07_MakeCompassNorth;
end
else
begin
paintScreen;
//checkFishingSpot;
end;
end.