diff options
-rw-r--r-- | romunit.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/romunit.pas b/romunit.pas index c3d5db7..7782814 100644 --- a/romunit.pas +++ b/romunit.pas @@ -196,7 +196,7 @@ begin blockread(f,fl,sizeof(single)); // x-Position if j=0 then begin if i=start then - cells_left:=cells_left-fl; + cells_left:=cells_left+fl; blockread(f,buff[0],sizeof(single)*steps); // fp for k:=0 to steps-1 do begin d1[k+length(d1)-steps]['x']:=(i-1+k/steps)*factor; |