equal
deleted
inserted
replaced
211 function LoadNextCameraPosition: LongInt; |
211 function LoadNextCameraPosition: LongInt; |
212 var frame: TFrame; |
212 var frame: TFrame; |
213 begin |
213 begin |
214 LoadNextCameraPosition:= GameTicks; |
214 LoadNextCameraPosition:= GameTicks; |
215 // we need to skip or duplicate frames to match target framerate |
215 // we need to skip or duplicate frames to match target framerate |
216 while Int64(curTime)*cVideoFramerateNum < Int64(numFrames)*cVideoFramerateDen*1000 do |
216 while Int64(curTime)*cVideoFramerateNum <= Int64(numFrames)*cVideoFramerateDen*1000 do |
217 begin |
217 begin |
218 {$IOCHECKS OFF} |
218 {$IOCHECKS OFF} |
219 if eof(cameraFile) then |
219 if eof(cameraFile) then |
220 exit(-1); |
220 exit(-1); |
221 BlockRead(cameraFile, frame, 1); |
221 BlockRead(cameraFile, frame, 1); |