whats wrong with this script?
Posted: 04.04.2020 19:14
Code: Select all
Program Test;
Var
fx, fy : integer;
const
x0 = 0;
x1 = 10;
y0 = 0;
y1 = 10;
procedure Find;
begin
for fy := 0 to ((y1 - y0) / 5) do
begin
for fx := 0 to ((x1 - x0) / 5) do
begin
addtosystemjournal(fx + ' - ' + fy);
end;
end;
end;
Begin
Find;
End.
ty for att =]]]]00:00:00:000 [name]: Compiler: [Error] (C:\Stealth\Scripts\test.sc at 13:37): Type mismatch
00:00:00:000 [name]: Compiling failed