历史上的今天
今天是：2025年03月08日（星期六）
2018年03月08日 | 读入独立键点亮相应的LED灯
2018-03-08 来源：eefocus
***************************************************************************
006.asm
读入独立键盘上的按键，并把相应的LED灯点亮,若一段时间无按键,刚循环点亮LED
接线：P0口接八位LED
P2口接八位独立按键
定时器T0计时，中断方式
***************************************************************************/
ORG 0000H
LJMP MAIN
ORG 000BH
LJMP INT_T0
ORG 0100H
MAIN: ;主程序入口
MOV SP,#50H ;设置堆栈
MOV TMOD,#01H ;设置定时模式
MOV TH0,#15H ;赋定时初值
MOV TL0,#9FH
CLR 20H.0 ;初始化按键标志
MOV R2,#0FFH ;初始化键值
MOV R3,#01H ;初始化循环闪铄初值
MOV R4,#00H ;初始化定时初值
SETB TR0 ;启动定时器
MOV IE,#82H ;开中断
LOOP:
LCALL KEY_READ ;扫描键盘
L1: JB 20H.0,LIGH ;有键输入，则去点亮相应LED
JBC 20H.0,LOOP
MOV A,R4
CJNE A,#0C8H,LOOP ;否则去判断定时是否到，定时到，循环点亮八位LED
LCALL LEED
LJMP L1
/*点亮相应LED*/
LIGH:
MOV A,R2 ;取键值
MOV P0,A ;输出
RET
/*循环点亮LED*/
LEED:
MOV A,R3
LOOP1:
CPL A
MOV P0,A
LCALL KEY_READ
JB 20H.0,RETUN0
MOV R0,#0FFH
LCALL DELAY
MOV A,R3
RL A
MOV R3,A
CJNE A,#80H,LOOP1
LOOP2:
CPL A
MOV P0,A
LCALL KEY_READ
JB 20H.0,RETUN0
MOV R0,#0FFH
LCALL DELAY
MOV A,R3
RR A
MOV R3,A
CJNE A,#01H,LOOP2
SJMP LOOP1
RETUN0:
RET
/*键盘扫描程序*/
KEY_READ:
CLR EA ;扫描键盘时关定时中断
MOV A,P2
CJNE A,#0FFH,DE
LJMP RETUN
DE: MOV R0,#8AH
LCALL DELAY
MOV A,P2
CJNE A,#0FFH,DE0
LJMP RETUN
DE0:MOV R2,A
SETB 20H.0
MOV R4,#00H
DE1:MOV A,P2
CJNE A,#0FFH,DE1
RETUN:
SETB EA
RET
/*中断子程序*/
INT_T0:
CLR EA
PUSH ACC
MOV TH0,#15H ;重赋定时初值
MOV TL0,#9FH
INC R4
POP ACC
SETB EA
RETI
/*延时子程序 */
DELAY:
D1: MOV R1,#0FFH
D0: DJNZ R1,D0
DJNZ R0,D1
RET
END
史海拾趣
|
我原来是建立一个连接 一直开着...现在的问题是 数据库在SD卡存着...有人要是把卡拿出来了...这样程序就出错.退出来了.. 所以.我现在想改一下..每次用的时候再建立一个连接 但是不知道为什么 下在的代码 不管是有没有插卡...就是不出 ...… 查看全部问答＞ |
|
void RFSendPacket(char *txBuffer, char size) { TI_CC_SPIWriteBurstReg(TI_CCxxx0_TXFIFO, txBuffer, size); // Write TX data TI_CC_SPIStrobe(TI_CCxxx0_STX); // Ch ...… 查看全部问答＞ |
|
我在WINCE5.0系统的PDA上运行Skype出错，我操作的过程是： 把Skype1.2.exe 和AYGSHELL.DLL，COREDLL.DLL，HTMLVIEW.DLL，IPHLPAPI.DLL 一起拷贝到PDA上，然后运行Skype1.2.exe，就出错了。 我只要求运行Skype1.2.exe ...… 查看全部问答＞ |
|
公司简介 苏州迈科网络安全技术股份有限公司（Maxnet）是一支年仅6岁的年轻团队，我们并不老道，但坚持创新；我们不是加班狂人，但一定锐意进取；我们不制定森严刻板的制度，但打造高效的管理团队。我们避开一整片的IT红海，独到地专注于提供网络 ...… 查看全部问答＞ |
|
大家好 我看了一篇matlab辅助dsp设计FIR的文章 利用matlab的FDATool可以设计滤波器，并将参数导入CCS头文件 但是附带的程序中 ...… 查看全部问答＞ |
|
上海中贸网络科技公司主要从事无线通信、视频处理类产品的研发、生产与销售，现欲在厦门成立研发中心，诚聘电子类、Firmware类、DSP类、PCB layout、QC类等相关工程师，工作形式目前主要以项目合作形式，无需到公司上班，自由灵活。有意者，请将简 ...… 查看全部问答＞ |