#include <reg51.h>

sbit p_a0=P3^0;
sbit p_rw=P3^1;
sbit p_e=P3^2;

//指令寫入函數(shù)
void ctrl(unsigned char c) 
{
	p_a0=1;			                    //a0為1代表寫入指令
	p_rw=0;
	p_e=1;P1=c;p_e=0;
}
//數(shù)據(jù)和指令參數(shù)寫入函數(shù)
void write(unsigned char d) 
{
	p_a0=0;			                   //a0為0代表寫入數(shù)據(jù)或指令參數(shù)
	p_rw=0;
	p_e=1;P1=d;p_e=0;
}
//數(shù)據(jù)和光標地址讀出函數(shù)
unsigned char read(void) 
{
	unsigned char rd;
	p_a0=1;			                   //a0為1代表讀數(shù)據(jù)和光標地址,a0為0代表
//讀狀態(tài)標志，由于E-1330功能很強，一般//不用讀狀態(tài)標志
	p_rw=1;
	P=0xff;			                    //把P1置為高電平，只有置為高電平才能正
//確讀入數(shù)據(jù)
	p_e=1;rd=P1;p_e=0;
	return(rd);
}

//其他函數(shù)可以根據(jù)資料自行組合，如設(shè)置
//CGROM相對地址為0000H，用以下語句即可：	
	ctrl(0x5c);		                    //寫入5C指令
	write(0);
	write(0);		                    //寫入5C指令的參數(shù)0000


//5單個漢字庫字摸提取程序
#include "stdio.h"
#include "dos.h"
#include "process.h"
#include "string.h"

void main(void) 
{
	long int num_bytes,qm,wm;
	unsigned char d,i,j,k,a[132],b[132];
	unsigned char * data;
	unsigned char * hz;
	static unsigned  char dd[103];
	FILE *fp;

	if ((fp=fopen("hzk16f","rb"))==NULL) 
{
		printf("can't open hzk16\n");
		exit(1);
	}
	clrscr();
	while (1) 
{

		data=(unsigned char *) malloc(33);
		printf("please input:\n");
		scanf("%s",dd);                      	//輸入一個漢字

		qm=* dd;		                        //通過區(qū)位碼計算其在hzk16f文件
//中的偏移地址
		qm=qm-161;
		if (qm>87) exit(0);
		wm=* (dd+1);
		wm=wm-161;
		if (wm>94) exit(0);
		num_bytes=((long)qm*94+wm)*32;
		fseek(fp,num_bytes,SEEK_SET);
		fgets(data,33,fp);
		for (i=0;i<32;i++) b[i]=* data++;
		for (i=0;i<32;i+=2) a[i/2]=b[i];
		for (i=0;i<32;i+=2) a[i/2+16]=b[i+1];
		for (i=8;i<16;i++) b[i]=a[i];
		for (i=8;i<16;i++) a[i]=a[i+8];
		for (i=8;i<16;i++) a[i+8]=b[i];

		                              //轉(zhuǎn)換，hzf16f在電腦的儲存格式是以行為字
//節(jié)計算的，一般的lcd都采用以列為字節(jié)計算
		for (k=0;k<32;k+=8) 
{
			for (j=0;j<8;j++) 
{
				d=0;
				for (i=0;i<8;i++) 
{
					if (a[i+k]>=0x80) 
{
						switch (i) 
{
						case 0:d+=1;break;
						case 1:d+=2;break;
						case 2:d+=4;break;
						case 3:d+=8;break;
						case 4:d+=0x10;break;
						case 5:d+=0x20;break;
						case 6:d+=0x40;break;
						case 7:d+=0x80;break;
						}
					}
				}
				for (i=0;i<8;i++) a[i+k]<<=1;
				b[j+k]=d;
			}
		}
		clrscr();
		printf("/*%s:*/\n",dd);		              //輸出0x00格式的16進制數(shù)
		for (k=0;k<32;k+=8) 
{
			for (j=0;j<8;j++) printf("0x%x,",b[j+k]);
			printf("\n");
		}
		getch();
	}
}

//按鍵掃描驅(qū)動程序

unsigned char key,key_h,kpush;
unsigned int key_l;

//按鍵連接到p1.0、p1.1、p1.2

void int_t0(void) interrupt 1 
{
	unsigned char dd,i;
	TL0=TL0+30;TH0=0xfb;	                     //800
	                                             //按鍵判別	
	if ((P1&0x7)==0x7) 
{
		if ((key_l>30)&&(key_l<800)&&(key_h>30)) 
{		                                            //釋放按鍵，如果之前按鍵時
//間少于1秒，讀入鍵值
			key=kpush;
		}
		if ((++key_h)>200) key_h=200;
		key_l=0;
		if (key>=0x80) key=0;						//如果之前的按鍵為長按1秒，
//清除鍵值
	} else {
		kpush=P1&0x7;
		key_l++;
		if ((key_l>800)&&(key_h>30)) 
{					                                //如果按鍵超過1秒，鍵值加
//0x80標志長按鍵
			key=kpush|0x80;
			key_h=0;
			key_l=0;
		}
	}
}
void main(void) 
{
	TMOD=0x1;TR0=1;ET0=1;EA=1;
	while (1) 
{
		while (!key) {}
		switch (key) {
		case 1:break;
		case 2:break;
		}
	}
}

//串行驅(qū)動led顯示
//一個74hc595位移寄存器驅(qū)動三極管驅(qū)動led位，
//兩個74hc595驅(qū)動led段，方式位5位x8段x2=10個數(shù)碼管
//5分頻，每次掃描時間位1.25ms
//定義特殊符號

#define nul 0xf
#define qc 0xc
#define qb 0xb
#define q_ 0xa
#define q__ 0xd
#define q___ 0xe
#define qp 0x10
#define qe 0x11
#define qj 0x12
#define qn 0x13
#define qf 0x14
#define qa 0x15
#define qr 0x16
#define qd 0x17
#define qu 0x18
#define ql 0x19
#define qh 0x1a
#define qwen 0x1b
#define qt 0x1c
#define qla 0x1d
#define qlb 0x1e
#define qlc 0x1f
#define qld 0x20
#define qle 0x21
#define qlf 0x22
#define qlg 0x23
#define qldp 0x24

//顯示段信息，不同led排列組合的段信息只需更改8個數(shù)值即可。
//因此，該定義具有通用性。

//顯示	
//-d 20
//|c 40|e 10
//- g	80		
//|b 2|f 4
//_a1.dp 8
#define pa 1
#define pb 2
#define pc 0x40
#define pd 0x20
#define pe 0x10
#define pf 4 
#define pg 0x80
#define pdp 8
#define l0 pdp+pg
#define l1 255-pf-pe
#define l2 pdp+pc+pf
#define l3 pdp+pc+pb
#define l4 pdp+pa+pb+pd
#define l5 pdp+pb+pe
#define l6 pdp+pe
#define l7 pdp+pc+pg+pb+pa
#define l8 pdp
#define l9 pdp+pb
#define la pdp+pa
#define lb pdp+pd+pe
#define lc pdp+pg+pe+pf
#define ld pdp+pc+pd
#define le pdp+pe+pf
#define lf pdp+pe+pf+pa
#define l_ 255-pg
#define lnul 255
#define ll pdp+pg+pd+pf+pe
#define lp pdp+pa+pf
#define lt pdp+pd+pe+pf
#define lr pdp+pe+pf+pg+pa
#define ln pdp+pg+pa
#define lh pdp+pd+pe+pa
#define ly pdp+pb+pd
#define lu pdp+pg+pd
#define l__ pdp+pg+pb+pc+pe+pf
#define l___ l__-pg
#define l_1 255-pa
#define l_2 255-pa-pg
#define lj 255-(pe+pf+pa)
#define lwen 255-(pd+pe+pg+pb)
#define lall 0

#define lla 255-pa
#define llb 255-pb
#define llc 255-pc
#define lld 255-pd
#define lle 255-pe
#define llf 255-pf
#define llg 255-pg
#define lldp 255-pdp

//串行送出的位信息，目前是10位led顯示。
unsigned char code un_dig[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb};
//串行送出的短信息。
Unsigned Char code 
un_disp[]={l0,l1,l2,l3,l4,l5,l6,l7,l8,l9,l_,lb,lc,l__,l___,lnul,lp,le,lj,ln,lf,la,lr,ld,lu,ll,lh,lwen,lt,lla,llb,llc,lld,lle,llf,llg,lldp,lnul};

sbit d_clk=P0^0;		                       //移位時鐘
sbit d_dat=P0^1;		                       //移位數(shù)據(jù)
sbit d_st=P0^2;			                       //移位鎖定
unsigned char dig;			                   //位掃描計數(shù)器
unsigned char d[10];						   //顯示緩沖

//送出8位串行數(shù)據(jù)
void out_disp(unsigned char dd) 
{
	unsigned char i;
	for (i=0;i<8;i++) 
{
		if (dd&1) d_dat=1; else d_dat=0;
		d_clk=0;
		dd>>=1;
		d_clk=1;
	}
}
//控制小數(shù)點和閃爍，顯示數(shù)據(jù)|0x040
//表示有小數(shù)點；顯示數(shù)據(jù)|0x80表示閃爍。
void out_displ(unsigned char dd) 
{
	if (dd>=0x80) 
{
		if (s001>flash_time) {out_disp(0xff);return;}
	}
	dd&=0x7f;
	if (dd>=0x40) 
{
		dd=un_disp[dd&0x3f]^pdp;
	} else dd=un_disp[dd];
	out_disp(dd);
}

unsigned int s001;	                   //閃爍時間參考
void int_t0(void) interrupt 1
{
	unsigned char dd;
	TL0=TL0+30;TH0=0xfb;	           //800
	time++;
	if ((++s001)>=800) s001=0;
	                                    //顯示	
	if ((++dig)>4) dig=0;
	d_st=0;
	dd=d[dig+5];
	out_displ(dd);
	dd=d[dig];
	out_displ(dd);
	out_disp(un_dig[dig]);
	d_st=1;
}
void main(void)
 {
	unsigned char i;
	TMOD=0x1;
	TR0=ET0=1;
	EA=1;
	for (i=0;i<10;i++) d[i]=i;	        //display test
	while (1) {}
}