[uroksan]

примерно вот таким кодом

Код:

If (fsmport.Port [STATUS_PORT_ADR] And 64) = 0 Then
  MainForm.LogError ('Предупреждение: Int активен перед записью');
 If (fsmport.Port [STATUS_PORT_ADR] And 128) = 0 Then
  MainForm.LogError ('Предупреждение: Wait в состоянии высокого уровня перед записью');
 fsmport.Port [STATUS_PORT_ADR]:=fsmport.Port [STATUS_PORT_ADR] And $0FE; // Сбросить флаг тайм-аута
 fsmport.Port[EPP_DATA_PORT_ADR] := b; вот тут как раз можеш устроить проверку переменной b                            // Write data
 if (fsmport.Port [STATUS_PORT_ADR] And 1) = 1 Then
  Begin