Code: Select all
if (GetHP(Horse1) < GetMaxHP(Horse1)/2) or (GetHP(Horse2) < GetMaxHP(Horse2)/2) then
begin
.................
end;
Работает.
Code: Select all
if (GetHP(Horse1) < GetMaxHP(Horse1)/2) or (GetHP(Horse2) < GetMaxHP(Horse2)/2) then
begin
.................
end;