⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hldkzqv11.c

📁 LED照明行业地砖及护栏控制器程序 从现况来看
💻 C
字号:
/*############################################################################
鼎立照明	16级灰度护栏灯控制器程序						
创建时间:2004-07-01
硬件资源:
		RAM ADDRESS :0000H---7FFFH
		FLASH	ADDRESS:8000H---8FFFH
		CPLD	ADDRESS:9000H---FFFFH
		RAM	SIZE	:32K	FLASH SIZE:8MBYTE = 4K*512PAGE*4PCS
2004-07-09	:测试程序
*/
#include <reg52.h>
#include <intrins.h>
//#include <ctype.h>//字符函数
#include <string.h>//字符串函数
#include <stdio.h>//一般I/O函数
#include <stdlib.h>//标准函数
//#include <math.h>//数学函数
#include <absacc.h>//绝对地址
#include <intrins.h>//内部函数	
#include	<setjmp.h>
#define uchar unsigned char
#define uint unsigned int
#define byte unsigned char
#define word unsigned  
#define bool bit
#define TRUE 1
#define FALSE 0
#define V_TH0   0xff  /* 时间常数高8位 (65536-500)/256			*/
#define V_TL0   0xff  /* 时间常数低8位 (65536-500)%256   11.0592*/
#define V_TMOD  0x01                     /* 定时器T0方式控制字 */

/* 定义定时器T0的时间常数值和方式控制字 */                

#define  REGL XBYTE[0x9003] //控制寄存器护栏管的长度
#define  FPGH XBYTE[0x9001] //闪存页高位
#define  FPGL XBYTE[0x9002] //闪存页低位
//**********************************************
sbit	senden=P3^2;

sbit	wdgclr=P1^7;
//*************************************************
uchar 	zhepe;					//帧频
uint   ms;						//毫秒定时
uchar	ADD;					//地址
uchar 	idata send_buf[72];		//接收缓冲区
uchar 	pointer,subchk;			//接收指针 和校验
uchar 	paklen;					//包长
uint	page_sta,page_end;		//显示的开始帧和结束帧
uint	dis_page;				//当前显示的帧号
uint	page;					//扇区号
uchar	bdata flag;
sbit 	frameok=flag^0;		 	//rece ok
sbit	color=flag^1;			//0 sing red color 1 red green color
sbit	rec_sta=flag^2;			//1 进入接状态,不显示
sbit	rec_end=flag^3;
sbit	timout=flag^4;
//jmp_buf env;
//int retval;

//******************************************* 
//从FLASH加载数据到RAM, flash -> ram 000
//入口参数:帧号 取值范围:0--8095
//******************************************
//#pragma NOMODDP2
void load_data(uint page)
{
uchar xdata *s;
uchar xdata *sp;
uchar xdata *rp;
sp=((page<<10)&0x0fff)|0x8000;
FPGH=(page>>2)/256;FPGL=(page>>2)%256;
s=0x000;
//for(i=0;i<1024;i++)*s++=*sp++;
rp=memcpy(s,sp,1024);
}
/*************************************************

************************************************/
void delayms( uchar ticks )
{
	uint	Count;
	uchar	Tick;
	for (Tick=ticks;Tick>0;Tick--)
	{
		for (Count=0;Count<=500;Count++);
	}
}
/************************************************************************/
/* PROCEDURE:   Erase_One_Sector                                        */
/*                                                                      */
/* This procedure can be used to erase a total of 4096 bytes.           */
/*                                                                      */
/* Input:                                                               */
/*      Dst     DESTINATION address where the erase operation starts    */
/*                                                                      */
/* Output:                                                              */
/*      NONE                                                            */
/************************************************************************/

void Erase_One_Sector (uint  Sec)
{
   // uchar xdata *Temp;
	//Temp=0x0000;
	FPGH=0;FPGL=5;
	XBYTE[0x8555]=0Xaa;
	FPGL=2;
	XBYTE[0x8aaa]=0x55;
	FPGL=5;
	XBYTE[0x8555]=0X80;
	FPGL=5;
	XBYTE[0x8555]=0Xaa;
	FPGL=2;
	XBYTE[0x8aaa]=0X55;
	FPGH=Sec/256;FPGL=Sec%256;
	XBYTE[0x8000]=0x30;
    delayms(25);       /* Delay time = Tse                 */
}

/************************************************************************/
/* PROCEDURE:    Check_Toggle_Ready                                     */
/*                                                                      */
/* During the internal program cycle, any consecutive read operation    */
/* on DQ6 will produce alternating 0's and 1's (i.e. toggling between   */
/* 0 and 1). When the program cycle is completed, DQ6 of the data will  */
/* stop toggling. After the DQ6 data bit stops toggling, the device is  */
/* ready for next operation.                                            */
/*                                                                      */
/* Input:                                                               */
/*           Dst        Must already be set-up by the caller            */
/*                                                                      */
/* Output:                                                              */
/*           None                                                       */
/************************************************************************/

void Check_Toggle_Ready (uchar xdata  *Dst)
{
        uchar Loop = TRUE;
        uchar  PreData;
        uchar  CurrData;
        unsigned int TimeOut = 0;

        PreData = *Dst;
        PreData = PreData & 0x40;
        while ((TimeOut< 0xFFFF) && (Loop))
        {
            CurrData = *Dst;
            CurrData = CurrData & 0x40;
            if (PreData == CurrData)
                    Loop = FALSE;   /* ready to exit the while loop */
            PreData = CurrData;
            TimeOut++;
        }
}
/************************************************************************/
/* PROCEDURE:   Program_One_Byte                                        */
/*                                                                      */
/* This procedure can be used to program ONE byte of data to the        */
/* 39VF016.                                                             */
/*                                                                      */
/* NOTE:  It is necessary to first erase the sector containing the      */
/*        byte to be programmed.                                	*/
/*                                                                      */
/* Input:                                                               */
/*           Src     The BYTE which will be written to the 39VF016      */
/*           Dst     DESTINATION address which will be written with the */
/*                   data passed in from Src                            */
/*                                                                      */
/* Output:                                                              */
/*           None                                                       */
/************************************************************************/

void Program_One_Byte (uchar Src, uchar xdata *Dst)
{
//	uchar xdata *Temp;
    uchar xdata *DestBuf;
    DestBuf = Dst;
	FPGH=0;FPGL=5;
	XBYTE[0x8555]=0Xaa;
	FPGL=2;
	XBYTE[0x8aaa]=0x55;
	FPGL=5;
	XBYTE[0x8555]=0Xa0;
	FPGH=page/256;FPGL=page%256;
	*DestBuf=Src;
    Check_Toggle_Ready(DestBuf);    /* wait for TOGGLE bit to get ready */
}


/************************************************************************/
/* PROCEDURE:   Program_One_Sector                                      */
/*                                                                      */
/* This procedure can be used to program a total of 4096 bytes of data  */
/* to the SST39VF016.                                                   */
/*                                                                      */
/* NOTES: 1. It is necessary to first erase the sector before the	*/
/*        programming.                                			*/
/*        2. This sample code assumes the destination address passed	*/
/*        from the calling function is the starting address of the	*/
/*        sector.							*/
/*                                                                      */
/* Input:                                                               */
/*           Src     SOURCE address containing the data which will be   */
/*                   written to the 39VF016                             */
/*           Dst     DESTINATION address which will be written with the */
/*                   data passed in from Src                            */
/*                                                                      */
/* Output:                                                              */
/*           None                                                       */
/************************************************************************/

void Program_One_Sector (uint Dst)
{
        uchar xdata *SourceBuf;
        uchar xdata *DestBuf;

        uint Index;
		page=Dst;
        SourceBuf = 0x1000;
        DestBuf = 0x8000;

        Erase_One_Sector(Dst);          /* erase the sector first */

        for (Index = 0; Index < 4096; Index++)
	        {
			Program_One_Byte( *SourceBuf, DestBuf);
			DestBuf++;
			SourceBuf++;
        	}
}

//***********************************************
//			接收数据
//************************************************
void rece_picture(bit type)
{
uchar i;
uchar xdata *op;
uchar idata *sp;	//0x1000 test 0x1000
//FPGH=send_buf[4];
//FPGL=send_buf[3];
if(type)
	op=(send_buf[5]*64);
else
	op=(send_buf[5]*64)|0x1000;

sp=&send_buf[8];
for(i=0;i<64;i++)*op++=*sp++;	//写入RAM 1000H 单元 位图数据
}
//********************************************
void	delay1s()
{
uint i,j;
for(i=0;i<0xfff;i++)
	{for(j=0;j<0x50;j++);
	wdgclr=!wdgclr;
	}
}
//***********************************************
void test()
{
//uchar xdata *rp;
uchar xdata *p;
//uchar xdata *sp;
p=0x0000;
memset(p,0x00,1024);
delay1s();//1	
p=0x0000;
memset(p,255,255);
delay1s();  //4

p=0x0100;
memset(p,255,255);
delay1s();  //4

p=0x0200;
memset(p,255,255);
delay1s();//8

p=0x0300;
memset(p,255,255);
delay1s();//15
/*
p=0x0000;
memset(p,0x00,1024);
p=0x1000;
memset(p,0x80,4096);
Program_One_Sector(0);
delay1s();//1	

FPGH=0;FPGL=0;
p=0x0000;
sp=0x8000;
rp=memcpy(p,sp,255);
delay1s();//1	
p=0x0100;
sp=0x8100;
rp=memcpy(p,sp,255);
delay1s();//1
p=0x0200;
sp=0x8200;
rp=memcpy(p,sp,255);
delay1s();//1
p=0x0300;
sp=0x8300;
rp=memcpy(p,sp,255);
delay1s();//1XS
*/
}

/*
************************************
	通讯协议解析			接收数据
*******************************************8
*/
void receive(void)
{
/*
uchar xdata *p;
uchar xdata *rp;
uchar xdata *sp;*/
switch(send_buf[2])//命令标志
	{
	case 1:rec_sta=1;TR0=0;//进入接收状态
		break;	
	case 2:			//接收数据
		rece_picture(0);
		break;	
	case 0:			//加载某一帧数据到显存
		dis_page=send_buf[4]*256+send_buf[3];
		load_data(dis_page);
		break;	
	case	3:		//将一扇区数据写闪存
		Program_One_Sector(send_buf[4]*256+send_buf[3]);
		break;
	case	4:		//测试
		test();
		break;
	case 5:		//接收到显存
		rece_picture(1);
	case 6:		//同步信号
		dis_page=send_buf[4]*256+send_buf[3];
		ms=0;
	break;
	case 7:			//进入自动播放
		page_sta=send_buf[4]*256+send_buf[3];
		dis_page=page_sta;
		page_end=send_buf[6]*256+send_buf[5];
		zhepe=100/send_buf[8];
//		FPGH=0;FPGL=0;
/*		p=0x1000;
		sp=0x8000;
		rp=memcpy(p,sp,4096);

		XBYTE[0x10ff]=0xaa;
		XBYTE[0x11ff]=send_buf[4];
		XBYTE[0x12ff]=send_buf[3];
		XBYTE[0x13ff]=send_buf[6];
		XBYTE[0x14ff]=send_buf[5];
		XBYTE[0x15ff]=zhepe;
		Program_One_Sector(0);
*/
		ms=0;
		TR0=1;
	break;
	default:break;
	}
}



//********************************************
//					 主程序
//********************************************
void main()
{
//uchar xdata *p;
PS=1;
ES=0;
SM0=1;
SM1=1;
T2CON=0X30;
RCAP2H=0XFF;
TH2=0XFF;
RCAP2L=0Xfb;	//9600bps= c4  115200bps =fb 57600= f6 19200 = e2
TL2=0Xfb;
TR2=1;

REN=1;
TMOD=0x05;	//定时器0 模式1 外部时钟
TL0=V_TL0;
TH0=V_TH0;
//TR0=1;
ET0=1;
ES=1;
EA=1;
SM2=1;
ADD=(~P1)&0x1f;
//ADD=1;
frameok=0;
	test();
while(1)
	{
//	

	wdgclr=!wdgclr;
	if(timout)
		{load_data(dis_page);dis_page++;timout=0;
		if(dis_page>page_end)dis_page=page_sta;
		}

	if(frameok)
		{receive();frameok=0;}
	}//while(1)
}
/************************************************/
void send_delay( void)
{
uint	Count;
for (Count=0;Count<=200;Count++);

}
//*****************************************
//			串口中断服务程序
//*****************************************
void send(void) interrupt  4 
{
uchar d;
if(!TI && RI && !frameok)
 {RI=0;
  d=SBUF;
	if(pointer==0)
    	{if(d==ADD)
			{subchk=d;send_buf[0]=d;TB8=1;senden=1;
			send_delay();SBUF=d;while(!TI);TI=0;send_delay();
			senden=0;SM2=0;TB8=0;pointer++;}//71
		else if(d==0xff)
			{subchk=d;SM2=0;pointer++;}
			
     	}
  else 
		{if(pointer==71)
       	{send_buf[pointer]=d;
			if(d==subchk)
				{senden=1;send_delay();SBUF=subchk;while(!TI);send_delay();senden=0;TI=0;frameok=1;}
			else
				{senden=1;send_delay();SBUF=~subchk;while(!TI);send_delay();TI=0;senden=0;}
			SM2=1;pointer=0;
			}
     	else
          {send_buf[pointer]=d;subchk+=d;pointer++;}
		}        
  }//end if
}
//*************************************
void timer1() interrupt  1  
{TL0=V_TL0;
TH0=V_TH0;
ms++;
if(ms>zhepe)
	{timout=1;
	ms=0;
	}
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -