Could you explain what you are trying to do in this script, and what is going wrong when you try to run it?
Also, you can use [simba] tags to surround simba code to make it easier to read:
Simba Code:
program MonsterWarlord;
{$I SRL-6/SRL.Simba}
procedure Heal;
var
HforHealth:Integer;
begin
SetupSRL;
HforHealth := DTMFromString('mggAAAHicY2NgYGABYk4o5mBAAHYozQtl80 L5T58+ZXB0dGSIjIxk+PTpE0NtbS2Dt7c3Ay7AiANDAACyfwn+ ');
If FindDTM(HforHealth) then
begin;
WriteLN ('Yay We Found It!');
Mouse (320, 460, 7, 7, True);
FreeDTM(HforHealth);
end;
end;
begin
MoveMouse (78, 423);
Wait (600);
HoldMouse (78, 423, 1);
Wait (500);
ReleaseMouse (78, 423, 1);
Wait(4000);
MoveMouse (355, 370);
Wait (500);
HoldMouse (355, 370, 1);
Wait(500);
ReleaseMouse (355, 370, 1);
Wait(1000);
MoveMouse (372, 496);
Wait (3000);
HoldMouse (371, 496, 1);
Wait (500);
ReleaseMouse (371, 496, 1);
Wait (1500);
Heal;
end;