pic单片机两个IO口四线驱动LCD1602

#include
#include
#include "delay.h"
#include "delay.c"

//熔丝配置***********************************************************
__CONFIG(PROTECT & CPD & BOREN & MCLRDIS & PWRTEN & WDTDIS & INTIO);

//端口定义***********************************************************
#define Port GPIO //端口址址
#define Tris TRISIO //方向设置

//脚位定义***********************************************************
#define Dat GPIO4 //数据引脚
#define Clk GPIO5 //时钟引脚

//显示字符***********************************************************
unsigned char TopChar[] = {"www.pic16.com "}; //
unsigned char BotChar[] = {"ivws "}; //

//*******************************************************************
//函数名称：PortInit();
//输入参数：无
//输出参数：无
//功能描述：端口设置
//建造日期：2008.12.08
//********************************************************************
void PortInit(void)
{
Port = 0x00; //端口设置
Tris = 0x00;
}

//*******************************************************************
//函数名称：ConInit();
//输入参数：无
//输出参数：无
//功能描述：定时器设置
//建造日期：2008.12.08
//*******************************************************************
void ConInit(void)
{
OPTION = 0x00; //允许上拉
CMCON = 0x07; //关比较器
}

//*******************************************************************
//函数名称: TxLs164(data);
//输入参数：串行数据
//输出参数：无
//功能描述：串行发送数据
//建造日期：2008.12.08
//*******************************************************************
void TxLs164(unsigned chardata)
{
unsigned char i;

i = 6; //送出六位

do
{
Dat = 0; //数据清零
Clk = 1; //时钟置位
Clk = 0; //时钟清零
}
while (--i); //循环发送

i = 6; //送出六位

do
{
Dat = 0; //先高后低

if (data & 0x20) Dat = 1;

Clk = 1; //时钟置位
data<<= 1; //数据左移
Clk = 0; //时钟清零
}
while (--i); //循环发送
}

//*******************************************************************
//函数名称: WriteData(data, rs);
//输入参数：待写数据, 0 = 指令,1 = 数据
//输出参数：无
//功能描述：数据写入LCD
//建造日期：2008.12.08
//*******************************************************************
void WriteData(unsigned char data, unsigned char rs)
{
unsigned char temp;

temp =data>> 4; //取高四位
temp |= 1 << 5; //使用置位

if (rs & 0x01) temp |= 1 << 4; //数据选择

TxLs164(temp); //写高四位
Dat = 1; //使能下沿
Dat = 0;
DelayUs(50); //延时等待

temp =data& 0x0f; //取低四位
temp |= 1 << 5; //使用置位

if (rs & 0x01) temp |= 1 << 4; //数据选择

TxLs164(temp); //写高四位
Dat = 1; //使能下沿
Dat = 0;
DelayUs(50); //延时等待
}

//*******************************************************************
//函数名称：AddrSite(x, y);
//输入参数：坐标参数
//输出参数：无
//功能描述：设置显示地址
//建造日期：2008.12.08
//*******************************************************************
void AddrSite(unsigned char x, unsigned char y)
{
x &= 0x3f; //截取地址

if (y == 0)
{
WriteData((0x80 | x), 0); //首行地址
}

else
{
WriteData((0xc0 | x), 0); //次行地址
}
}

//*******************************************************************
//函数名称：PrintChar(*s);
//输入参数：缓冲区首址
//输出参数：无
//功能描述：字符串输出显示
//建造日期：2008.12.08
//*******************************************************************
void PrintChar(unsigned char *s)
{
while(*s)
{
WriteData(*s, 1); //字符数据
s++; //下个字符
}
}