手机蓝牙控制的计算器 -

#include <reg52.h>
#include <stdlib.h>
#include <intrins.h>
#include <stdio.h>
#define uchar unsigned char
#define uint unsigned int
sbit CS = P1^5;
sbit SCK = P1^7;
sbit SID = P1^6;
sbit Key = P1^1;
uchar code AC_TABLE[]={
0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87, //第一行汉字位置
0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97, //第二行汉字位置
0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f, //第三行汉字位置
0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f, //第四行汉字位置
};
uchar code str2[]="欢迎光临!";
uchar code str1[]="白日依山尽，黄河入海流。欲穷千里目，更上一层楼。 ";
uchar code bmp1[];
/******************************************************************************************
* 函数名称：SendByte
* 功能描述：串口发送一个字节
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void SendByte(uchar Dbyte)
{
uchar i;
for(i=0;i<8;i++)
{
SCK = 0;
Dbyte=Dbyte<<1; //左移一位
SID = CY; //移出的位给SID
SCK = 1;
SCK = 0;
}
}
/******************************************************************************************
* 函数名称：ReceiveByte
* 功能描述：串口接收一个字节
* 参数：参数名称：输入/输出？类型描述
* 仅在读取数据的时候用到
* 而读出的数据是一次只能读出4bit的
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
uchar ReceiveByte(void)
{
uchar i,temp1,temp2;
temp1 = 0;
temp2 = 0;
for(i=0;i<8;i++)
{
temp1=temp1<<1;
SCK = 0;
SCK = 1;
SCK = 0;
if(SID) temp1++;
}
for(i=0;i<8;i++)
{
temp2=temp2<<1;
SCK = 0;
SCK = 1;
SCK = 0;
if(SID) temp2++;
}
return ((0xf0&temp1)+(0x0f&temp2));
}
/******************************************************************************************
* 函数名称：CheckBusy
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void CheckBusy( void )
{
do SendByte(0xfc); //11111,RW(1),RS(0),0
while(0x80&ReceiveByte()); //BF(.7)=1 Busy
}
/******************************************************************************************
* 函数名称：WriteCommand
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void WriteCommand(uchar Cbyte )
{
CS = 1;
CheckBusy();
SendByte(0xf8); //11111,RW(0),RS(0),0
SendByte(0xf0&Cbyte); //高四位
SendByte(0xf0&Cbyte<<4);//低四位(先执行<<)
CS = 0;
}
/******************************************************************************************
* 函数名称：WriteData
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void WriteData(uchar Dbyte )
{
CS = 1;
CheckBusy();
SendByte(0xfa); //11111,RW(0),RS(1),0
SendByte(0xf0&Dbyte); //高四位
SendByte(0xf0&Dbyte<<4);//低四位(先执行<<)
CS = 0;
}
/******************************************************************************************
* 函数名称：ReadData
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************
uchar ReadData( void )
{
CheckBusy();
SendByte(0xfe); //11111,RW(1),RS(1),0
return ReceiveByte();
}
/******************************************************************************************
* 函数名称：Delay
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void Delay(uint MS)
{
uchar us,usn;
while(MS!=0) //for 12M
{
usn = 2;
while(usn!=0)
{
us = 0xf5;
while (us!=0)
{
us--;
};
usn--;
}
MS--;
}
}
/******************************************************************************************
* 函数名称：DelayKey
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void DelayKey(uint Second , uint MS100)
{ //输入精确到0.1S,是用","
uint i;
for(i=0;i<Second*100+MS100*10;i++)
{
if(Key==0)
{
Delay(20);
while(Key==0)
{
Delay(20);
}
break;
}
else Delay(10);
}
}
/******************************************************************************************
* 函数名称：LcmInit
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void LcmInit( void )
{
WriteCommand(0x30); //8BitMCU,基本指令集合
WriteCommand(0x03); //AC归0,不改变DDRAM内容
WriteCommand(0x0C); //显示ON,游标OFF,游标位反白OFF
WriteCommand(0x01); //清屏,AC归0
WriteCommand(0x06); //写入时,游标右移动
}
/******************************************************************************************
* 函数名称：LcmClearTXT
* 功能描述：文本区清RAM函数
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void LcmClearTXT( void )
{
uchar i;
WriteCommand(0x30); //8BitMCU,基本指令集合
WriteCommand(0x80); //AC归起始位
for(i=0;i<64;i++)
WriteData(0x20);
}
/******************************************************************************************
* 函数名称：LcmClearBMP
* 功能描述：图形区清RAM函数
* 参数：参数名称：输入/输出？类型描述
* 图形区和文本区显示在两个不同的RAM区
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void LcmClearBMP( void )
{
uchar i,j;
WriteCommand(0x34); //8Bit扩充指令集,即使是36H也要写两次
WriteCommand(0x36); //绘图ON,基本指令集里面36H不能开绘图
for(i=0;i<32;i++) //12864实际为256x32
{
WriteCommand(0x80|i); //行位置
WriteCommand(0x80); //列位置
for(j=0;j<32;j++) //256/8=32 byte
WriteData(0);
}
}
/******************************************************************************************
* 函数名称：PutStr
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void PutStr(uchar row,uchar col,uchar *puts)
{
WriteCommand(0x30); //8BitMCU,基本指令集合
WriteCommand(AC_TABLE[8*row+col]); //起始位置
while(*puts != '\0') //判断字符串是否显示完毕
{
if(col==8) //判断换行
{ //若不判断,则自动从第一行到第三行
col=0;
row++;
}
if(row==4) row=0; //一屏显示完,回到屏左上角
WriteCommand(AC_TABLE[8*row+col]);
WriteData(*puts); //一个汉字要写两次
puts++;
WriteData(*puts);
puts++;
col++;
}
}
/******************************************************************************************
* 函数名称：PutBMP
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void PutBMP(uchar *puts)
{
uint x=0;
uchar i,j;
WriteCommand(0x34); //8Bit扩充指令集,即使是36H也要写两次
WriteCommand(0x36); //绘图ON,基本指令集里面36H不能开绘图
for(i=0;i<32;i++) //12864实际为256x32
{
WriteCommand(0x80|i); //行位置
WriteCommand(0x80); //列位置
for(j=0;j<32;j++) //256/8=32 byte
{ //列位置每行自动增加
WriteData(puts[x]);
x++;
}
}
}
/******************************************************************************************
* 函数名称：DisplayDots
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void DisplayDots(uchar DotByte)
{
uchar i,j;
WriteCommand(0x34); //8Bit扩充指令集,即使是36H也要写两次
WriteCommand(0x36); //绘图ON,基本指令集里面36H不能开绘图
for(i=0;i<32;i++) //12864实际为256x32
{
WriteCommand(0x80|i); //行位置
WriteCommand(0x80); //列位置
for(j=0;j<32;j++) //256/8=32 byte
{ //列位置每行自动增加
WriteData(DotByte);
}
DotByte=~DotByte;
}
}
/******************************************************************************************
* 函数名称：
* 功能描述：
* 参数：参数名称：输入/输出？类型描述
*
* 返回值：
* 作者：
* 创建日期：2006-12-19
* 全局变量：
* 全局静态变量：
* 局部静态变量：
*----------------------------------------修改历史------------------------------------------
* 当前版本：修改人：修改日期：
* 修改说明：
******************************************************************************************/
void main( void )
{
Delay(100); //等待复位
LcmInit();
LcmClearTXT();
LcmClearBMP();
while(1)
{
LcmClearTXT();
PutBMP(bmp1);
DelayKey(1,5);
DisplayDots(0x55);
DelayKey(1,5);
LcmClearBMP();
PutStr(0,0,str1);
DelayKey(1,5);
LcmClearTXT();
DisplayDots(0xaa);
DelayKey(1,5);
}
}
uchar code bmp1[]={
//********************************************************//
//***** 转换的文件：E:\!Program\!BmpSample\25632.bmp
//***** 源图形宽度 * 高度：256 * 32
//***** 调整后宽度 * 高度：256 * 32
//***** 字模格式：横向取模,冗余模式,字节正序,正色取模,
//***** 点阵转换时间：2005/03/ 2 16:4:32
//***** 位图点阵占用1024字节
//********************************************************//
0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,
0x80,0x00,0x0F,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x70,0x00,0x00,0x01,
0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
0x80,0x00,0x3F,0xC0,0x00,0x07,0x07,0x00,0x04,0x01,0x00,0x00,0x38,0x60,0x00,0x01,
0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
0x80,0x00,0x78,0xE0,0x00,0x3F,0x83,0x80,0x06,0x03,0x80,0x00,0x1C,0x70,0x00,0x01,
0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
0x80,0x02,0x38,0x70,0x00,0xFF,0x07,0x80,0x06,0x39,0x80,0x00,0x1F,0x70,0x00,0x01,
0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
0x80,0x02,0x1C,0x30,0x00,0x7C,0x0E,0x00,0x06,0x19,0xC0,0x00,0x1F,0x80,0x00,0x01,
0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
……………………
…………限于本文篇幅余下代码请从51黑下载附件…………

复制代码