HT1621B通用程序集锦_第1页
HT1621B通用程序集锦_第2页
HT1621B通用程序集锦_第3页
HT1621B通用程序集锦_第4页
HT1621B通用程序集锦_第5页
已阅读5页,还剩7页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、*AT89C51单片机控制 HT1621B 驱动 LCD*(全显示程序)*#include <reg51.h>#include <intrins.h>#define BIAS 0X50/1/2偏压,4背极/#define RC256 0X30/系统时钟选择为片内RC振荡器#define RC256 0X38#define WDTDIS1 0X0A/禁止WDT溢出标志输出#define TIMERDIS 0X08/时基输出禁能#define SYSEN 0X02/打开系统时钟#define LCDON 0X06/打开偏压发生器#define SYSDIS 0X00/关闭系

2、统时钟和偏压发生命#define _NOP() _nop_() sbit LED=P2A0;sbit CS=P2A7;sbit WRD=P2A6;sbit DATA=P2A5;#define uchar unsigned char #define uint unsigned intbitcnt);void SENDBYTE (uchar dat);/*void SENDBIT (uchar dat,uchar延时子函数 */延时1Svoid delay1s() uchar i;uint j;for(i=0;i<10;i+)/*七口62侣初始化 */void START_HT1621()初

3、始化HT1621for(j=0;j<1300;j+);CS=1;WRD=1;DATA=1;/delay();_NOP();CS=0;CS=0;WRD=0;/*WRD=0;发送命令子函数a*/void SENDCOMA(ucharcom)发送命令 A, ID=100+0START_HT1621();SENDBIT(0X80,4);/*SENDBYTE(com);发送命令子函数b*/void SENDCOMB(ucharadr)发送命令B,发送显示数据START_HT1621();SENDBIT(0XA0,4);SENDBIT(adr,5);/HT1621 初始化发送写数据ID: 101+6

4、位LCD之RAM地址第1位/然后发送地址后 5位/*发送命令子函数 C*void SENDCOMC(ucharcom)发送命令 C, ID=100+1START_HT1621();SENDBIT(0X90,4);SENDBYTE(com);/*按位发送数据子函数*/void SENDBIT (uchar dat,uchar bitcnt)/ 按位发送数据uchar i;for(i=0;i<bitcnt;i+)if(dat&0x80)=0X00)/从最高位发送DATA=0;elseDATA=1;/delay();_NOP();WRD=1;/在 WRD的上升沿,数据写入 HT1621

5、B/delay();_NOP();WRD=0;dat=dat<<1;/*发送字节数据子函数*/发送字节数据void SENDBYTE (uchar dat)SENDBIT(dat,8);/*LCD显示子函数 */void display(uchar dat)/LCD显示uchar i;SENDCOMB(0X00);/从RAM的0X00地址开始放入数据SENDBYTE(dat);SENDBYTE(dat);for (i=0;i<2;i+)SENDBYTE(dat);/从SEG0开始显示数据/*Hti621B初始化设置 */void SETUP_HT1621()/HT1621偏压

6、、背极、工作方式设置SENDCOMA(BIAS);SENDCOMA(RC256);SENDCOMA(SYSEN);delay1s();SENDCOMA(LCDON);SENDCOMA(WDTDIS1);SENDCOMA(TIMERDIS);/*主函数 */main()/主函数LED=1;SETUP_HT1621();while(1)(display(0XFF);/全显示各位大牛下午好,我用STC12C520辱片机控制1621驱动液晶程序调了几天都没进展,显示的不知道什么乱七八糟的东西,好像命令根本写不 进去,COM03 coml是个1v不到的电平,com3为3点几V的电平,com4有时有 波形

7、刷我自己写的程序就是这个样子,SEGMENT部分有波形,其余就是一个电平打电话咨询合泰技术,让我搞他们的范例,于是我修改了下,还是老样子大家帮我看看是什么问题,谢谢了下面的就是从合泰网上下的范例,我稍微修改了下,基本是原封不动的/STC12C5204A卵片机控制 HT1621EB动 LCD#include <STC12C52XXAD.h>#include <stdio.h>#include <intrins.h>#define BIAS 0X52/1/3偏压,4背极#define RC256K 0X30/系统时钟选择为片内RC振荡器#define WDTDI

8、S1 0X0A/禁止 WD椭出标志输出#define TIMERDIS 0X08/时基输出禁止#define SYSEN 0X02/打开系统时钟#define SYSDIS 0X00/关闭系统时钟和偏压发生器#define LCDON 0X06/打开LCDS压发生器#define LCDOFF 0X04/关闭LCDS压发生器#define TONEON 0X12/打开音频输出#define TONEOFF 0X10/关闭首频车刖出#define CS P3_2#define WR P3_4#define DATA P3_5 #define uchar unsigned char#define

9、uint unsigned int延时子函数 */j=12延时约 4.3us/*void delay(uchar i)while(i-)uchar j=0;while(j<8)j+;void SendBit_1621(uchar dat ,uchar cnt)(uchar i;for(i =0; i <cnt; i +)(if(dat&0x80)=0)DATA=0;else DATA=1;WR=0;delay(2);WR=1;dat=dat<<1;void SendDataBit_1621(uchar dat,uchar cnt)(uchar i;for(i =

10、0; i <cnt; i +)(if(dat&0x01)=0) DATA=0;else DATA=1;WR=0;delay(2);WR=1;dat=dat>>1;void SendCmd(uchar command)(CS=0;_nop_();_nop_();SendBit_1621(0x80,4);SendBit_1621(command,8);CS=1;void Write_1621(uchar addr,uchar dat)(CS=0;_nop_();_nop_();SendBit_1621(0xa0,3);SendBit_1621(addr,6);SendDa

11、taBit_1621(dat,4);CS=1;void WriteAll_1621(uchar addr,uchar *p,uchar cnt)uchar i;CS=0;_nop_();_nop_();SendBit_1621(0xa0,3);SendBit_1621(addr,6);for(i =0; i <cnt; i +,p+)SendDataBit_1621(*p,8);CS=1;/*主函数 *.main()uchar a10;a0=0xFF;a1=0xFF;a2=0xFF;a3=0xFF;a4=0xFF;a5=0xFF;a6=0xFF;a7=0xFF;a8=0xFF;a9=0x

12、FF;a10=0xFF;a11=0xFF;a12=0xFF;a13=0xFF;a14=0xFF;a15=0xFF;SendCmd(BIAS);SendCmd(SYSEN);SendCmd(LCDON);/ SendCmd(RC256K);WriteAll_1621(0,a,16);/ SendCmd(LCDOFF);LCD驱动程序 适用于HT1621/=#define Lcd_Delay _nop_();_nop_();_nop_();_nop_();_nop_();_nop_()void Lcd_Data(uchar Start,uchar cData)/将数据当中的字节与LCD上的进行同步

13、/ Start - 要开始同页面地址,每个页面为4个有效位,总其为32X4字节/ Length - 要同步的页面数量(uchar i;LCD_CS=0;Lcd_Delay;Lcd_Delay;Lcd_Delay;/Send ID 101BLCD_CLK=0;Lcd_Delay;LCD_IO=1;Lcd_Delay;LCD_CLK=1;Lcd_Delay;LCD_CLK=0;Lcd_Delay;LCD_IO=0;Lcd_Delay;LCD_CLK=1;Lcd_Delay;LCD_CLK=0;Lcd_Delay;LCD_IO=1;Lcd_Delay;LCD_CLK=1;Lcd_Delay;/Sen

14、d Address 6bitStart=Start*2;for(i=0;i<6;i+)(if(Start&0x20) LCD_IO=1;else LCD_IO=0;Lcd_Delay;LCD_CLK=0;Lcd_Delay;Start=Start<<1;LCD_CLK=1;Lcd_Delay;/Send data 8bitfor(i=0;i<8;i+)(if(cData&0x01) LCD_IO=1;else LCD_IO=0;Lcd_Delay;LCD_CLK=0;Lcd_Delay;cData=cData>>1;LCD_CLK=1;Lcd

15、_Delay;LCD_CS=1;Lcd_Delay;/= void Lcd_Command(uchar Command)/向指定的LCD当中写入一个命令每个命令应以100三个位为起始,命令长度为9位,实际有效位为8位,因此在 最后补一个0/ LcdSelect-LCD的片选确定,取值为0,1,2/ Command-要写入的8位命令(uchar i;LCD_CS=0;Lcd_Delay;Lcd_Delay;Lcd_Delay;/Send ID 100BLCD_CLK=0;Lcd_Delay;LCD_IO=1;Lcd_Delay;LCD_CLK=1;Lcd_Delay;LCD_CLK=0;Lcd_

16、Delay;LCD_IO=0;Lcd_Delay;LCD_CLK=1;Lcd_Delay;LCD_CLK=0;Lcd_Delay;LCD_IO=0;Lcd_Delay;LCD_CLK=1;Lcd_Delay;for(i=0;i<8;i+)(LCD_CLK=0;Lcd_Delay;if(Command&0x80) LCD_IO=1;else LCD_IO=0;Command=Command<<1;Lcd_Delay;LCD_CLK=1;Lcd_Delay;/最后补一个0LCD_CLK=0;Lcd_Delay;LCD_IO=0;Lcd_Delay;LCD_CLK=1;Lc

17、d_Delay;LCD_CS=1;Lcd_Delay;/=void Lcd_Refresh(void) /重新对 LCD®行刷屏(uchar i;for(i=0;i<LCD_BUFF_MAX;i+)Lcd_Data(i,lcd.buffi); /= void Lcd_Cls(void) / 活空 LCD显示区 (功能:活空LCD显示区/返值:无/ 入口 : cSelectIc LCD 的片选,取值为 0,1,2 uchar i;for(i=0;i<LCD_BUFF_MAX;i+)lcd.buffi=0;Lcd_Refresh(); /=void Lcd_Init(void

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论