基于单片机的红外门控系统源程序
程序的具体内容如下：
$mod52
org 0000h
ljmp main
org 0003h
ljmp 0100h
org 0013h
ljmp 0150h
org 0050h
main: clr a
mov 30h , a ;初始化缓存区
mov 31h , a
mov 32h , a
mov 33h , a
mov r6 , a
mov r7 , a
setb ea
setb ex0
setb ex1
setb it0
setb it1
setb px1
next1: acall hextobcdd ;调用数制转换子程序
acall display ;调用显示子程序
ljmp next1
org 0100h ;中断0服务程序
lcall dely
mov 70h,#2
djnz 70h,next
jbc f0,next
setb f0
clr p0.0
lcall dely0
setb p0.0
mov a , r7
add a , #1
mov r7, a
mov a , r6
addc a , #0
mov r6 , a
cjne r6 , #07h , next
clr a
mov r6 , a
mov r7 , a
next: reti
org 0150h ;中断1服务程序
lcall dely
mov 70h,#2
djnz 70h,next2
jbc f0,next2
setb f0
clr p0.0
lcall dely0
setb p0.0
clr c
mov a , r7
subb a , #1
mov r7, a
mov a , r6
subb a , #0
mov r6 , a
cjne r6 , #07h , next2
clr a
mov r6 , a
mov r7 , a
next2: reti
org 0200h
hextobcdd:mov a , r6 ;由十六进制转化为十进制
push acc
mov a , r7
push acc
mov a , r2
push acc
clr a
mov r3 , a
mov r4 , a
mov r5 , a
mov r2 , #10h
hb3: mov a , r7 ;将十六进制中最高位移入进位位中
rlc a
mov r7 , a
mov a , r6
rlc a
mov r6 , a
mov a , r5 ;每位数加上本身相当于将这个数乘以2
addc a , r5
da a
mov r5 , a
mov a , r4
addc a , r4
da a ;十进制调整
mov r4 , a
mov a , r3
addc a , r3
djnz r2 , hb3
pop acc
mov r2 , a
pop acc
mov r7 , a
pop acc
mov r6 , a
ret
org 0250h
display:
mov r0 , #30h
mov a , r5
anl a , #0fh
mov @r0 , a
mov a , r5
swap a
anl a , #0fh
inc r0
mov @r0 , a
mov a , r4
anl a , #0fh
inc r0
mov @r0 , a
mov a , r4
swap a
anl a , #0fh
inc r0
mov @r0 , a
mov r0 , #30h
mov r2 , #11111110b
again: mov a , r2
mov p2 , a
mov a , @r0
mov dptr , #tab
movc a , @a+dptr
mov p1 , a
acall delay
inc r0
mov a , r2
rl a
mov r2 , a
jb acc.4 , again
ret
tab: db 03fh , 06h , 5bh , 4fh , 66h , 6dh , 7dh , 07h , 7fh , 6fh ;七段码表
dely: mov r1,#80
d1: mov r2,#100
djnz r2,$
djnz r1,d1
ret
delay: mov tmod , #01h ;延时子程序
mov tl0 , #0feh
mov th0 , #0feh
setb tr0
wait: jnb tf0 , wait
clr tf0
clr tr0
ret
dely0: mov r1, #200
d3: mov r2,#250
djnz r2,$
djnz r1,d3
ret
end
运算放大器的基本应用盘点
DC电源模块的主要作用与应用
BA系统中有那些传感器
映泰推出X370GTN/B350GTN主板：AMD Ryzen终迎ITX平台
vivo宣布延长产品保修期限，众多贴心服务齐上线
基于单片机的红外门控系统源程序
比亚迪获国外全电动卡车订单
基于RTL8019AS以太网控制器实现以太网通讯的应用方案
中国通信企业协会副会长武锁宁对部署5G新基建提出了三大建议
最实用的GPS接收器测试详解
研究人员已经研发出一种可以自学走路的机器腿
2020新增芯片企业超6万家，但芯片人才缺口大
Galaxy A72是三星最雄心勃勃的中端机型之一
配电变压器接线方式
ADS1212和SST单片机实现高精度数据采集设计
上海久滨 JB-117A油瓶提环拉伸试验机
威马打通充电基础设施建设，为用户提供更高效智能的用车体验
小型医疗电子设备植入式心律转复除颤器：能持续地监控患者的心脏节律
数控机床机器人是工业自动化的一份子
激光淬火技术在表面处理中的应用
$mod52
org 0000h
ljmp main
org 0003h
ljmp 0100h
org 0013h
ljmp 0150h
org 0050h
main: clr a
mov 30h , a ;初始化缓存区
mov 31h , a
mov 32h , a
mov 33h , a
mov r6 , a
mov r7 , a
setb ea
setb ex0
setb ex1
setb it0
setb it1
setb px1
next1: acall hextobcdd ;调用数制转换子程序
acall display ;调用显示子程序
ljmp next1
org 0100h ;中断0服务程序
lcall dely
mov 70h,#2
djnz 70h,next
jbc f0,next
setb f0
clr p0.0
lcall dely0
setb p0.0
mov a , r7
add a , #1
mov r7, a
mov a , r6
addc a , #0
mov r6 , a
cjne r6 , #07h , next
clr a
mov r6 , a
mov r7 , a
next: reti
org 0150h ;中断1服务程序
lcall dely
mov 70h,#2
djnz 70h,next2
jbc f0,next2
setb f0
clr p0.0
lcall dely0
setb p0.0
clr c
mov a , r7
subb a , #1
mov r7, a
mov a , r6
subb a , #0
mov r6 , a
cjne r6 , #07h , next2
clr a
mov r6 , a
mov r7 , a
next2: reti
org 0200h
hextobcdd:mov a , r6 ;由十六进制转化为十进制
push acc
mov a , r7
push acc
mov a , r2
push acc
clr a
mov r3 , a
mov r4 , a
mov r5 , a
mov r2 , #10h
hb3: mov a , r7 ;将十六进制中最高位移入进位位中
rlc a
mov r7 , a
mov a , r6
rlc a
mov r6 , a
mov a , r5 ;每位数加上本身相当于将这个数乘以2
addc a , r5
da a
mov r5 , a
mov a , r4
addc a , r4
da a ;十进制调整
mov r4 , a
mov a , r3
addc a , r3
djnz r2 , hb3
pop acc
mov r2 , a
pop acc
mov r7 , a
pop acc
mov r6 , a
ret
org 0250h
display:
mov r0 , #30h
mov a , r5
anl a , #0fh
mov @r0 , a
mov a , r5
swap a
anl a , #0fh
inc r0
mov @r0 , a
mov a , r4
anl a , #0fh
inc r0
mov @r0 , a
mov a , r4
swap a
anl a , #0fh
inc r0
mov @r0 , a
mov r0 , #30h
mov r2 , #11111110b
again: mov a , r2
mov p2 , a
mov a , @r0
mov dptr , #tab
movc a , @a+dptr
mov p1 , a
acall delay
inc r0
mov a , r2
rl a
mov r2 , a
jb acc.4 , again
ret
tab: db 03fh , 06h , 5bh , 4fh , 66h , 6dh , 7dh , 07h , 7fh , 6fh ;七段码表
dely: mov r1,#80
d1: mov r2,#100
djnz r2,$
djnz r1,d1
ret
delay: mov tmod , #01h ;延时子程序
mov tl0 , #0feh
mov th0 , #0feh
setb tr0
wait: jnb tf0 , wait
clr tf0
clr tr0
ret
dely0: mov r1, #200
d3: mov r2,#250
djnz r2,$
djnz r1,d3
ret
end
运算放大器的基本应用盘点
DC电源模块的主要作用与应用
BA系统中有那些传感器
映泰推出X370GTN/B350GTN主板：AMD Ryzen终迎ITX平台
vivo宣布延长产品保修期限，众多贴心服务齐上线
基于单片机的红外门控系统源程序
比亚迪获国外全电动卡车订单
基于RTL8019AS以太网控制器实现以太网通讯的应用方案
中国通信企业协会副会长武锁宁对部署5G新基建提出了三大建议
最实用的GPS接收器测试详解
研究人员已经研发出一种可以自学走路的机器腿
2020新增芯片企业超6万家，但芯片人才缺口大
Galaxy A72是三星最雄心勃勃的中端机型之一
配电变压器接线方式
ADS1212和SST单片机实现高精度数据采集设计
上海久滨 JB-117A油瓶提环拉伸试验机
威马打通充电基础设施建设，为用户提供更高效智能的用车体验
小型医疗电子设备植入式心律转复除颤器：能持续地监控患者的心脏节律
数控机床机器人是工业自动化的一份子
激光淬火技术在表面处理中的应用