历史上的今天
今天是：2025年01月09日（星期四）
2020年01月09日 | PIC单片机实现LCD1602显示字母A
2020-01-09 来源：elecfans
PIC单片机LCD1602显示单个A字程序
STATUS EQU 3H ;定义状态寄存器地址
PORTA EQU 5H ;定义RA口数据寄存器地址
PORTC EQU 7H ;定义RC口数据寄存器地
PORTD EQU 8H ;定义RD口数据寄存器地址
TRISA EQU 85H ;定义RA口方向控制寄存器地址
TRISC EQU 87H ;定义RC口方向控制寄存器地址
TRISD EQU 88H ;定义RD口方向控制寄存器地址
ADCON1 EQU 9FH ;定义ADC模块控制寄存器1的地址
;********************
Z EQU 2 ;定义0状态位的位地址
RP0 EQU 5 ;定义页选位RP0的位地址
;*********************
RS EQU 2 ;LCD寄存器选择信号脚定义在RD.2脚
RW EQU 1 ;LCD读/写信号脚定义在RD.1脚
E EQU 0 ;LCD片选信号脚定义在RD.0脚
;**********************
ORG 000H
NOP ;放置一条ICD必需的空操作指令
GOTO MAIN
ORG 0008H
MAIN
BSF STATUS，RP0
MOV LW 07H
MOV WF ADCON1 ;设置RA口全部为普通数字IO口
MOV LW 00H ;定义RA口，RC，RD口全部为输出
MOV WF TRISC
MOV WF TRISD
BCF STATUS，RP0
CALL DELAY ;调用廷时，刚上电LCD复位不一定有PIC快
MOV LW 01H
MOV WF PORTC ;清屏
CALL ENABLE
MOV LW 38H
MOV WF PORTC ;8位2行5x7点阵
CALL ENABLE
MOV LW 0FH
MOV WF PORTC ;显示器开、光标开、闪烁开
CALL ENABLE
MOV LW 06H
MOV WF PORTC ;文字不动，光标自动右移
CALL ENABLE
MOV LW 0C0H
MOV WF PORTC ;写入显示起始地址（第一行第一个位置）
CALL ENABLE
MOV LW 41H
MOV WF PORTC ;字母“A”的代码
BSF PORTD，RS
BCF PORTD，RW
BCF PORTD，E
CALL DELAY
BSF PORTD，E
GOTO $
ENABLE
BCF PORTD，RS ;写入控制命令的子程序
BCF PORTD，RW
BCF PORTD，E
CALL DELAY
BSF PORTD，E
RETLW 0
;********************************************
DELAY
;子程序名，也是子程序入口地址
MOV lw 0ffh ;将外层循环参数值FFH经过W
MOV wf 20h ;送入用作外循环变量的20H单元
lp0 MOV lw 0ffh ;将内层循环参数值FFH经过W
MOV wf 21h ;送入用作内循环变量的21H单元
lp1 nop
decfsz 21h，1 ;变量21H内容递减，若为0跳跃
goto lp1 ;跳转到LP1处
decfsz 20h，1 ;变量20H内容递减，若为0跳跃
goto lp0 ;跳跃到LP0处
return ;返回主程序
end ;源程序结束
上一篇:PIC单片机定时器1的实际应用
下一篇:PIC单片机ADC的编程设计
史海拾趣
|
摘要：对比分析了逆变器控制中的电容电流反馈和电感电流反馈两种控制方式。推导了控制器的控制模型，分析了控制器的设计方法，给出了各种突加负载及恒定负载状态下的实验结果，指出了两种控制方法的特点以及优缺点。实验在800VA的逆变器中进行,逆变 ...… 查看全部问答＞ |
|
在电信和其它使用高电压负电源轨的场合，可将一个仪表放大器与独立元件简单结合，实现大电流检测以保护电路。高端大电流检测放大器（CSA）主要用于正电源轨电流监测。然而，诸如ISDN和电信电源类应用需要采用工作在负电源轨的CSA。设计负电源轨CSA ...… 查看全部问答＞ |
|
大家可以关注下这款器件，Vishay在无源器件方面世界领先 日前，Vishay Intertechnology, Inc.宣布，推出通过了DSCC Drawing 10004认证的超高容值液钽电容器——DSCC 10004。Vishay的新款DSCC 10004器件具有业内最高的容值，采用轴向T1、T2、T3和 ...… 查看全部问答＞ |
|
我们的开发板上的wifi模块突然就搜索不到网络 不知道是什么原因 是模块坏了吗 但是开发板是可以发现硬件 就是搜索不到网络啊 搜不到AP 我将wifi上PDn管脚置低了 想让他休眠 就进行了这个操作，没改其他的。刚刚还可以搜索 ，突然就 ...… 查看全部问答＞ |
|
我在一幅图上写字时，发现ExtTextOutW可以写出字，而DrawText不能写出，我试过不是rect的问题，但是现在问题已解决，而我还没弄懂，请高手来讲讲。 //this is ok m_stpic.GetDC()->ExtTextOutW(m_rect.left,m_rect.top,ETO_OPAQUE | ETO_CLIPPED, ...… 查看全部问答＞ |
|
问题描述: 一个串口类,采用线程,然后定义两个类对象,分别用于两个通信协议, RS485的MODBUS通信协议(假设为A协议)和用于GPRS上的通信协议(假设为B协议), 那么我原本是在串口类中采用回调函数来处理接收到的数据, 但是由于,底层的驱动是是每接收 ...… 查看全部问答＞ |