Еще по дисплею вопрос, если постоянно на экран в монопольном режиме выводить одну и туже информацию( не стирая его), иногда начинает промаргивать нижняя строка или часть?
Код:
line0 := '$A2 $A2 --% $A2 --%';
line1 := '0 0 C 0 C';
IF( NOT O_FILL_TANK1)THEN line0 := REPLACE( line0, ' ', 1, 1); END_IF
IF( NOT O_FILL_TANK2)THEN line0 := REPLACE( line0, ' ', 1, 5); END_IF
IF( NOT O_FILL_TANK3)THEN line0 := REPLACE( line0, ' ', 1, 12); END_IF
line1 := REPLACE( line1, BYTE_TO_STRING( tank1.Level), 1, 1);
line1 := REPLACE( line1, BYTE_TO_STRING( tank2.Level), 1, 5);
line1 := REPLACE( line1, BYTE_TO_STRING( tank3.Level), 1, 12);
line1 := REPLACE( line1, INT_TO_STRING( TEMPERATURE_TANK2), 2, 7);
line1 := REPLACE( line1, INT_TO_STRING( TEMPERATURE_TANK3), 2, 14);
(*IF( flash_gen.OUT) THEN line1 := CONCAT( line1, INT_TO_STRING( TEMPERATURE_TANK2)); ELSE line1 := CONCAT( line1, ' '); END_IF;*)
(*рисуем на кинескопе*)
Write_Display( SINGLE_MODE, 0, 0, line0 );
Write_Display( SINGLE_MODE, 0, 1, line1 );