Пн янв 31, 2022 21:55:12
ORG 0h
lab0: mov A, @R0
setb C
rlc A
mov @R1, A
mov @R0, A
mov @R1, A
mov C, 0E7h
rlc A
anl 3h, A
rlc A
mov @R1, A
anl C, 0F2h
rr A
mov @R1, #32h
mov R3, 77h
rlc A
xchd A, @R1
rlc A
mov R7, A
xchd A, @R1
mov R2, A
xchd A, @R1
rlc A
mov @R1, A
ljmp lab0
END
ledport equ P1
temp equ 0x20
ORG 0h
lab0: mov A, @R0
setb C
rlc A
mov @R1, A
mov @R0, A
mov @R1, A
mov C, 0E7h
rlc A
anl 3h, A
rlc A
mov @R1, A
anl C, 0F2h
rr A
mov @R1, #32h
mov R3, 77h
rlc A
xchd A, @R1
rlc A
mov R7, A
xchd A, @R1
mov R2, A
xchd A, @R1
rlc A
mov @R1, A
mov temp, A
call output
call delay
ljmp lab0
delay: mov 30h, #002h
mov 31h, #0c6h
mov 32h, #0e7h
next: djnz 32h, $
djnz 31h, next
djnz 30h, next
ret
output: push ACC
push PSW
mov A, temp
cpl A
mov ledport, A
pop PSW
pop ACC
ret
END
Вт фев 01, 2022 10:04:33
Ср фев 02, 2022 10:26:57
Пт фев 04, 2022 20:27:29
BOB51 писал(а):equ 0x20 в среде MCU 8051 IDE префикс 0х.... не допускается!
Сб фев 05, 2022 10:26:02
Вс фев 06, 2022 15:39:55