/*来源：晓奇工作室*/
/*写汉字液晶子程 液晶屏分为4行*12列汉字，全部使用模拟接口方式。
/* CKW19264A接口程序（模拟方式）
;************************************************************************
;连线图:
;*LCM----S8515* *LCM----S8515* *LCM-----S8515* *LCM-----S8515* *
;*DB0-----PA0* *DB4-----PA4* *D/I------PC6* *CS1------PC4* *
;*DB1-----PA1* *DB5-----PA5* *R/W------PC7* *CS2------PC5* *
;*DB2-----PA2* *DB6-----PA6* *RST------VCC* *CS3------PD2* *
;*DB3-----PA3* *DB7-----PA7* *E--------PC3* *
;注:S8515的晶振频率为4MHz *
;************************************************************************/
#include <io8515.h>
#include <macros.h>
#include <worddot.h> /* 自定义字符点阵码文件，存于include目录下 */
//#include <math.h> /* 数学运算定义，没有使用 */
#pragma interrupt_handler timer:7 /*TC1溢出中断 */
#define Uchar unsigned char
/***********液晶显示器接口引脚定义***************/
#define LCD_E (1 << 3) // PC3----E
#define LCD_DI (1 << 6) // PC6----D/I
#define LCD_RW (1 << 7) // PC7----R/W
#define LCD_CS1 (1 << 4) // PC4----CS1
#define LCD_CS2 (1 << 5) // PC5----CS2
#define LCD_CS3 (1 << 2) // PD2----CS3
#define lcd_set_e() (PORTC |= LCD_E) // 位置位，输出1
#define lcd_set_di() (PORTC |= LCD_DI)
#define lcd_set_rw() (PORTC |= LCD_RW)
#define lcd_clear_e() (PORTC &= ~LCD_E) // 位清零，输出0
#define lcd_clear_di() (PORTC &= ~LCD_DI)
#define lcd_clear_rw() (PORTC &= ~LCD_RW)
#define lcd_set_cs1() (PORTC |= LCD_CS1) // 片选
#define lcd_set_cs2() (PORTC |= LCD_CS2)
#define lcd_set_cs3() (PORTD |= LCD_CS3)
#define lcd_clear_cs1() (PORTC &= ~LCD_CS1)
#define lcd_clear_cs2() (PORTC &= ~LCD_CS2)
#define lcd_clear_cs3() (PORTD &= ~LCD_CS3)
#define LCD_BUSY 0x80 //LCM忙判断位
#define lcd_read_status() (PINA & LCD_BUSY) //LCM忙判断
#define Datalcm PORTA //数据口
/***********常用操作命令和参数定义***************/
#define DISPON 0x3f /*显示on */
#define DISPOFF 0x3e /*显示off */
#define DISPFIRST 0xc0 /*显示起始行定义 */
#define SETX 0x40 /*X定位设定指令（页） */
#define SETY 0xb8 /*Y定位设定指令（列） */
/**************显示分区边界位置*****************/
#define MODL 0x00 /*左区 */
#define MODM 0x40 /*左区和中区分界 */
#define MODR 0x80 /*中区和右区分界 */
#define LCMLIMIT 0xC0 /*显示区的右边界 */
/****************全局变量定义*******************/
Uchar col,row,cbyte,timer1,timer2,statusm; /*列x,行(页)y,输出数据 */
unsigned int speed=0x7fff;
/*****************函数列表**********************/
void Lcminit(void); /*液晶模块初始化 */
void Delay(Uchar); /*延时，入口数为Ms */
void lcdbusyL(void); /*busy判断、等待(左区) */
void lcdbusyM(void); /*busy判断、等待(中区) */
void lcdbusyR(void); /*busy判断、等待(右区) */
void Putedot(Uchar x,Uchar y,Uchar flash *Lib,Uchar Order,Uchar widthw);
void Wrdata(Uchar); /*数据输出给LCM */
void Lcmcls( void ); /*LCM全屏幕清零(填充0) */
void wtcom(void); /*公用busy等待 */
void Locatexy(void); /*光标定位 */
void WrcmdL(Uchar); /*左区命令输出 */
void WrcmdM(Uchar); /*中区命令输出 */
void WrcmdR(Uchar); /*右区命令输出 */
void Putstr(Uchar x,Uchar y,Uchar flash *puts,Uchar i);/*字符串输出*/
void Rollscreen(Uchar x); /*屏幕向上滚动演示 */
void Rddata(void); /* 从液晶片上读数据 */
void point(void); /*打点 */
void Linexy(Uchar x0,Uchar y0,Uchar xt,Uchar yt);
void main_init(void);
void timer(void);
void circle(Uchar Ox,Uchar Oy,Uchar Rx);
/******************数组列表*********************/
Uchar flash Ezk[]; /*ASCII常规字符点阵码表 */
Uchar flash Hzk[]; /*自用汉字点阵码表 */
Uchar flash STR1[]; /*自定义字符串 */
Uchar flash STR2[]; //flash "=" code(keil c51)
Uchar flash STR3[]; //
Uchar flash STR4[]; //
/********************************/
/* 演示主程序 */
/********************************/
void main(void)
{
Uchar x=0;
DDRD = 0xFF; /*|= LCD_CS3; /*定义输出位 */
DDRC = 0xFF; /*定义为输出口 */
statusm&=~(1<<7);
main_init();
Delay(5); /*延时,等待外设准备好 */
Lcminit(); /*液晶模块初始化，包括全屏幕清屏*/
Putstr(0,0,STR3,24); /*第一行字符输出，24字节 */
Putstr(0,2,STR1,12); /*第二行字符输出，12字节（汉字）*/
// Putstr(0,4,STR3,24); /*第三行字符输出，24字节 */
// Putstr(0,6,STR4,24); /*第四行字符输出，12字节 */
Linexy(0,0,191,0); /*line (0,0)-(191,0) */
Linexy(191,0,191,32); /*line (191,0)-(191,32) */
Linexy(191,32,0,32); /*line (191,32)-(0,32) */
Linexy(0,32,0,0); /*line (0,32)-(0,0) */
Linexy(1,15,191,15); /*line (1,15)-(191,15) */
Linexy(0,63,44,33); /*line (0,63)-(44,33) */
Linexy(44,33,191,63); /*line (44,33)-(191,63) */
circle(46,49,12); //画一个圆
circle(46,49,11);
while(1){
// Rollscreen(x); /*定位新的显示起始行 */
x++;
Delay(20); /*延时，控制滚动速度 */
};
}
/***************************
初始化8515定时寄存器
***************************/
void main_init(void)
{
TCCR1A = 0x00;
TCCR1B = 0x00; /* 停止定时器1 */
TCNT1H = 0x00; /* 清除定时器1 */
TCNT1L = 0x00;
TIMSK = 0x80; /* 开放定时器1溢出中断 */
SREG |= 0x80;
TCCR1B = 0x01; /* 启动定时器1,预分频比例1 */
}
/*************************************
在定时器中断中做多个分级定时
*************************************/
void timer()
{
timer1--;
if (timer2<0x80) speed+=0x100;
else speed-=0x200;
if (statusm&0x80){
timer2++;
col = (speed>>8)|timer1;
row = (timer2&0x1f)+32;
point();}
}
/************************************************/
/*画圆。数学方程(X-Ox)^2+(Y-Oy)^2=Rx^2 */
/************************************************/
void circle(Uchar Ox,Uchar Oy,Uchar Rx)
{
unsigned int xx,rr,xt,yt,rs;
yt=Rx;
rr=Rx*Rx+1; //补偿 1 修正方形
rs=(yt+(yt>>1))>>1; //(*0.75)分开1/8圆弧来画
for (xt=0;xt<=rs;xt++)
{
xx=xt*xt;
while ((yt*yt)>(rr-xx))yt--;
col=Ox+xt; //第一象限
row=Oy-yt;
point();
col=Ox-xt; //第二象限
point();
row=Oy+yt; //第三象限
point();
col=Ox+xt; //第四象限
point();
/***************45度镜象画另一半***************/
col=Ox+yt; //第一象限
row=Oy-xt;
point();
col=Ox-yt; //第二象限
point();
row=Oy+xt; //第三象限
point();
col=Ox+yt; //第四象限
point();
}
}
/************************************************/
/*画线。任意方向的斜线,直线数学方程 aX+bY=1 */
/************************************************/
void Linexy(Uchar x0,Uchar y0,Uchar xt,Uchar yt)
{
register Uchar t;
int xerr=0,yerr=0,delta_x,delta_y,distance;
int incx,incy;
delta_x=xt-x0; /*计算坐标增量 */
delta_y=yt-y0;
col = x0;
row = y0;
if(delta_x>0) incx=1; /*设置单步方向 */
else if( delta_x==0 ) incx=0; /*垂直线 */
else {incx=-1;delta_x=-delta_x;}
if(delta_y>0) incy=1;
else if( delta_y==0 ) incy=0; /*水平线 */
else {incy=-1;delta_y=-delta_y;}
if( delta_x > delta_y ) distance=delta_x; /*选取基本增量坐标轴*/
else distance=delta_y;
for( t=0;t <= distance+1; t++ ) { /*画线输出 */
point(); /*画点 */
xerr += delta_x ;
yerr += delta_y ;
if( xerr > distance ) {
xerr-=distance;
col+=incx;
}
if( yerr > distance ) {
yerr-=distance;
row+=incy;
}
}
}
/****************************************/
/* 画点 */
/****************************************/
void point(void)
{
Uchar x1,y1,x,y;
x1=col;
y1=row;
row=y1>>3; /*取Y方向分页地址 */
Rddata();
y=y1&0x07; /*字节内位置计算 */
Wrdata(cbyte|(1<<y)); /*画上屏幕 */
col=x1; /*恢复xy坐标 */
row=y1;
}
/****************************************/
/* 屏幕滚动定位 */
/****************************************/
void Rollscreen(Uchar x)
{
cbyte = DISPFIRST|x; /*定义显示起始行为x?*/
WrcmdL(cbyte);
WrcmdM(cbyte);
WrcmdR(cbyte);
}
/****************************************/
/* 一个字串的输出 */
/****************************************/
void Putstr(Uchar x,Uchar y,Uchar flash *puts,Uchar i)
{
Uchar j,W,wordx;
for (j=0;j<i;j++)
{
wordx = puts[j];Delay(2);
if (wordx&0x80)
{
Putedot(x,y,Hzk,wordx&0x7f,16); /*只保留低7位 */
}
else Putedot(x,y,Ezk,wordx-0x20,8); /*ascii码表从0x20开始*/
x=col;
y=row;
}
}