Измерительно-вычислительные комплексы (канал общего пользования). Петросьянц В.В. - 122 стр.

     Label
       Ml,
       M2,
       M3;
Begin
   If M=0 then Exit;
      asm
             {направление передачи}
             mov dx,Port_B
mov al,Cry2
out dx,al
mov dx,Port_C
             {ожидание ДП "низкое"}
Ml: in al,dx
and al,lOh
jnz Ml
             {вывод данных}
            mov dx,Port_A
mov al,M
out dx,al
mov dx,Port_C
             {ожидание ГП "высокое"}
M2: in al,dx
and al,20h
jz M2
            {направление передачи}
            mov dx,Port_B
mov al,Cryl
out dx,al
            {установить СД в "низкое"}
            mov dx,PortC
mov al,Cry3
out dx,al
             {направление передачи}
             mov dx,Port_B
mov al,Cry3
out dx,al
mov dx,Port_C

 {           ожидание ДП "высокое"}
M3: in al,dx
and al,lOh
jz M3
            {направление передачи}

                               121