Untitled

mail@pastecode.io avatar
unknown
plain_text
2 years ago
1.1 kB
0
Indexable
Never
$NOMOD51
$INCLUDE (8051.MCU)

Q_ BIT P3.7
U_ BIT 22H.5
V_ BIT P1.7
W_ BIT 26H.0
X_ BIT 28H.6
Y_ BIT P2.6
Z_ BIT P2.1
A_ BIT 28H.1
B_ BIT 20H.3
C_ BIT 21H.0
D_ BIT P3.1

      ; Reset Vector
      org   0000h
      jmp   Start

      org   0100h
Start:	
; вЫСТАВЛЕНИЕ ЗНАЧЕНИЙ БИТОВОЙ ПАМЯТИ
      ;SETB U_
      CLR U_
      
      ;SETB W_
      CLR W_
      
      SETB X_
      ;CLR X_
      
      ;SETB A_
      CLR A_
      
      ;SETB B_
      CLR B_
      
      ;SETB C_
      CLR C_
; ВЫЧИСЛЕНИЕ БУЛЕВОЙ ФУНКЦИИ
LOOP:
CHECK_Y:
      JB Y_,CHECK_Z
CHECK_V:
      JB V_,SET_Q
CHECK_Z:
      JB Z_,CHECK_B
CHECK_X:
      JB X_,SET_Q
CHECK_B:
      JB B_,SET_Q
CHECK_A:
      JB A_,CHECK_D
CHECK_U:
      JB U_,SET_Q
CHECK_D:
      JB D_,SET_Q
CLEAR_Q:
      SETB Q_
      JMP END_PROG
SET_Q: 
      CLR Q_
      JMP END_PROG
END_PROG:
	
      JMP LOOP
;====================================================================
END