delay.h

LGM12864液晶显示的proteus仿真 包括温度显示,日历调整显示

#ifndef _Delay
#define _Delay

/*****************************预定义**************************************/
#define uchar unsigned char
#define uint unsigned int
/********************************************************************************************
* 函数名称：Delay()
* 功    能：延迟时间=a*1ms
* 入口参数：
* 出口参数：无
*********************************************************************************************/
void Delay(uint a)
{
   uchar  i;
   while(a--)
   for(i=0;i<125;i++);
}
/********************************************************************************************
* 函数名称：Delay_510us(void)	//)
* 功    能：延时510微秒
* 入口参数：
* 出口参数：无
*********************************************************************************************/
void Delay_510us(void)	//延时510微秒
{
#pragma asm
	MOV R0,#7DH
	MOV R1,#02H
	TSR1:
	DJNZ R0,TSR1
	MOV R0,#7DH
	DJNZ R1,TSR1
#pragma endasm
}
/********************************************************************************************
* 函数名称：Delay_110us(void)
* 功    能：延时110微秒
* 入口参数：
* 出口参数：无
*********************************************************************************************/
void Delay_110us(void)	//延时110微秒
{
#pragma asm
	MOV R0,#19H
	MOV R1,#02H
	TSR2:
	DJNZ R0,TSR2
	MOV R0,#19H
	DJNZ R1,TSR2
#pragma endasm
}
/********************************************************************************************
* 函数名称：Delay_10ms(void)
* 功    能：延时10ms
* 入口参数：
* 出口参数：无
*********************************************************************************************/
void   Delay_10ms(void) 	
{
#pragma asm
	MOV R0,#19H
	MOV R1,#0C8H
	TSR3:
	DJNZ R0,TSR3
	MOV R0,#19H
	DJNZ R1,TSR3
#pragma endasm
}
/********************************************************************************************
* 函数名称：Delay_4s(void)
* 功    能：延时4s
* 入口参数：
* 出口参数：无
*********************************************************************************************/
void Delay_4s(void)	
{
#pragma asm
  MOV R2,#28H
  TSR5:
	MOV R0,#0FAH
	MOV R1,#0C8H
	TSR4:
	DJNZ R0,TSR4
	MOV R0,#0FAH
	DJNZ R1,TSR4
  DJNZ R2,TSR5
#pragma endasm
}/********************************************************************************/
#endif