Brushing up on some fundamentals and I can't figure out how to get DTMs working again. Digging into the includes, my understanding is that TInterfaceBase.getBounds() is the SRL-OSR version of mainscreen.getBounds() in SRL-6. To test, I'm trying to find the DTM of a bankbooth and click on it. If I'm reading this right, TInterfaceBase.GetBounds() returns the entire gamescreen as TBox which is then used as the search area for FindDTM.
Code:
program test;
{$define SMART}
{$i srl/osr.simba}
var
testDTM, x, y: Integer;
procedure run();
begin
FindDTM(testDTM,x,y,TInterfaceBase.GetBounds());
mouse.Click(x,y,mouse_left);
end
begin
srl.Setup([]);
testDTM := DTMFromString('mwQAAAHic42RgYNjEyMDQB8TXGBHsfiDeChW7AsRFTAwMvlAcCMTlQDwPiOcyQeRAdGyoG0NBpAZDTqgag6elEEOCBydDVpQ9Q5Y/N0Owpz5DmAMnA9UBAFvdEc0=');
run();
FreeDTM(testDTM);
end.
When trying to compile, Simba is throwing up a variable expected error on row 11 (FindDTM) message but I can't figure out where I'm missing a variable.
Code:
function FindDTM(const DTM: Integer; var x, y: Integer; const SearchBox: TBox): Boolean; overload;
Code:
function TInterfaceBase.GetBounds(): TBox
Is there something I'm missing here?