LCD12864显示程序(汇编语言)

;实验目的：熟悉12864LCD的使用;12864LCD带中文字库;编程让12864LCD显示公司名称“深圳乾龙盛电子”，公司电话“075528187975”，公司传真;硬件设置：;关断所有拨码开关。#include<p16f877a.inc>;__CONFIG_DEBUG_OFF&_CP_ALL&_WRT_HALF&_CPD_ON&_LVP_OFF&_BODEN_OFF&_PWRTE_ON&_WDT_OFF&_HS_OSC;芯片配置字，看门狗关，上电延时开，掉电检测关，低压编程关，加密，4M晶体HS振荡#defineRSPORTA,5;命令/数据选择#DEFINERWPORTA,4;读/写选择#DEFINEEPORTA,3;使能信号#DEFINEPSBPORTA,2;并口/串口选择（H/L）#DEFINERSTPORTA,0;复位信号;-----------------------------------------------LCD_XEQU30H;页地址LCD_YEQU31H;Y地址COUNTEQU32H;循环计数用COUNT1EQU33H;循环计数用COUNT2EQU34H;循环计数用POINTEQU35H;查表偏移地址POINT1EQU36H;查表偏移地址POINT2EQU37H;查表偏移地址TEMPEQU38H;临时寄存器TEMP1EQU39H;临时寄存器;-----------------------------------------------ORG0000H;复位地址NOP;ICD需要的空指令GOTOMAIN;跳转到主程序;**********************主程序************************MAINBANKSELTRISACLRFTRISA;A口输出CLRFTRISD;D口输出BANKSELADCON1MOVLW06HMOVWFADCON1;A口全为数字口CLRFSTATUSBCFRST;复位LCDCALLDELAY;延时一段时间BSFRST;清除复位信号NOPBSFPSB;并口通讯;**************************初始化**********************MOVLW30H;基本指令操作CALLSEND_IMOVLW01H;清除显示CALLSEND_IMOVLW06H;指定在写入或读取时，光标的移动方向CALLSEND_IMOVLW0CH;开显示，关光标，不闪烁CALLSEND_I;***********************显示汉字************************HAN_WR2CALLCLEAR_P;清屏HAN_WR2A;“深圳乾龙盛电子”MOVLWLOW(TAB1A)MOVWFPOINTMOVLWHIGH(TAB1A)MOVWFPOINT1;获取表格的首地址MOVLW0eH;数数据字节个数（7个汉字共14字节）MOVWFCOUNTMOVLW81H;页地址CALLSEND_ICALLQUSHUHAN_WR2B;“WWW。PIC16。COM”MOVLWLOW(TAB1B)MOVWFPOINTMOVLWHIGH(TAB1B)MOVWFPOINT1MOVLW10HMOVWFCOUNTMOVLW90HCALLSEND_ICALLQUSHUHAN_WR2C;“TESEND_DMOVWFTEMP1;暂存数据CALLCHK_BUSY;判断总线是否忙BSFRSBCFRWMOVFWTEMP1MOVWFPORTD;送出数据BSFENOPNOPBCFERETURN;************************送命令到LCD***********************;写指令子程序;RS=0,RW=0,E=高脉冲,D0-D7=指令码;**********************************************************SEND_IMOVWFTEMP1;暂存命令CALLCHK_BUSY;判断总线是否忙BCFRSBCFRWMOVFWTEMP1MOVWFPORTD;送命令BSFENOPNOPBCFERETURN;************************判断总线是否忙********************;测忙碌子程序;RS=0,RW=1,E=H,D0-D7=状态字;**********************************************************CHK_BUSYBANKSELTRISDMOVLW0FFHMOVWFTRISD;D口设置为输入CLRFSTATUSMOVLW0FFHMOVWFPORTDBCFRSBSFRWCHECK_BUSY_1NOPNOPNOPBSFENOPNOPNOPBTFSSPORTD,7;D7为高表示总线忙，为低表示总线空闲GOTO$+6NOPNOPNOPBCFEGOTOCHECK_BUSY_1BCFEBANKSELTRISDCLRFTRISD;恢复D口为输出CLRFSTATUSRETURN;***************************延时程序***************************DELAYMOVLW0afHMOVWF20HMOVLW0ffhMOVWF21HDECFSZ21H,1GOTO$-1DECFSZ20H,1GOTO$-5RETURN;***************************延时程序1**************************;显示闪烁用DELAY1MOVLW05HMOVWF22HCALLDELAYDECFSZ22H,1GOTO$-2RETURN;***************************数据表格**************************TAB1MOVFWPOINT1MOVWFPCLATHMOVFWPOINT2MOVWFPCLTAB1Adt0C9,0EE;深dt0DB,0DA;圳dt0C7,0AC;乾dt0C1,0FA;龙dt0CA,0A2;盛dt0B5,0E7;电dt0D7,0D3;子TAB1B;WWW.PIC16.COMdt'','','W','W','W','.','P','I','C','1','6','.','C','O','M',''TAB1C;TEt'T','E','L','0