iar14-4.c

手把手教你学AVR单片机C程序设计实验程序

#include <iom16.h>
#include<intrinsics.h>
#define uchar  unsigned char
#define uint  unsigned int
#define xtal 8  
uchar __flash SEG7[17]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
		0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x80};
uchar __flash ACT[8]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
//********************
#define CS     4
#define DI     5
#define DO     6
#define SK     7
#define ORG    0      //0=接地(8位模式);1=接VCC(16位模式)
#define DI_1   PORTB|= (1<<DI)
#define DI_0   PORTB&= ~(1<<DI)
#define CS_1   PORTB|= (1<<CS)
#define CS_0   PORTB&= ~(1<<CS)
#define SK_1   PORTB|= (1<<SK)
#define SK_0   PORTB&= ~(1<<SK)
/******************************/
int SENDCMD_LEN = 10;
#define WRITE_TIMEOUT 15
#define SET_BIT(x,y) (x|=(1<<y))
#define CLR_BIT(x,y) (x&=~(1<<y))
#define GET_BIT(x,y) (x&(1<<y))
/********************************/
void Start(void);
uchar ReadOneByte(uchar Address);
uchar WriteOneByte(uchar Address, uchar data);
void WriteEnable(void);
uchar EraseOneByte(uchar Address);
uchar EraseAll(void);
uchar WriteAll(uchar data);
void WriteDisable(void);
void SendData(uint data, uchar len);
/*******************************/
void Delay_1ms(void)		//1mS延时子函数
{ uint i;
 for(i=1;i<(uint)(xtal*143-2);i++)
;
}
//====================================
void Delay_nms(uint n)		//n*1mS延时子函数
{
 uint i=0;
   while(i<n)
   {Delay_1ms();
    i++;
   }
}
/********************************************/
void port_init(void)
{
 PORTA = 0x00;
 DDRA  = 0xFF;
 PORTC = 0xFF; 
 DDRC  = 0xFF;
 DDRB  = 0xFF;
 PORTB = 0xFF;
 DDRB  = 0xB1;
}
/*********************************************/
void main(void)
{
  uchar set_val=108,rd_val;
  uchar temp=0;
  port_init();
  WriteEnable();   //写使能
  temp=WriteOneByte(50, set_val);
  if(temp==1)CLR_BIT(PORTB,0);//temp=1 write ok
  else SET_BIT(PORTB,0);      //temp=0 write failed
  rd_val= ReadOneByte(50);
  WriteDisable();
  while(1)
  {
  PORTA=SEG7[rd_val%10];PORTC=ACT[0];Delay_1ms();
  PORTA=SEG7[(rd_val/10)%10];PORTC=ACT[1];Delay_1ms();
  PORTA=SEG7[rd_val/100];PORTC=ACT[2];Delay_1ms();
 
  PORTA=SEG7[set_val%10];PORTC=ACT[5];Delay_1ms();
  PORTA=SEG7[(set_val/10)%10];PORTC=ACT[6];Delay_1ms();
  PORTA=SEG7[set_val/100];PORTC=ACT[7];Delay_1ms();
  }
}
/*********************************************/
void delay_us(void)
{
  __no_operation();
  __no_operation();
  __no_operation();
 __no_operation();
}
/*********************************************/
void Start(void)
{
	CS_0;delay_us();
	SK_0;delay_us();
	DI_0;delay_us();
	CS_1;delay_us();
}
/*********************************************/
uchar EraseWriteEnd(void)
{
	uchar write_Wait_Time = 0;
	CS_0;
	delay_us();
	CS_1;
        delay_us();
	while (GET_BIT(PINB,DO)==0)
	{
		if (++write_Wait_Time > WRITE_TIMEOUT)
		{
			CS_0;
			return 0; //write failed
		}
		SK_1;
                delay_us();
		SK_0;
		Delay_nms(1);
	}
	CS_0;
	return 1; //write successful
}
/********************************************/
uchar ReadOneByte(uchar Address)
{
	uint mdata;
	uchar inData = 0;
	int i;
	Start();
	mdata = 0x0300|(Address & 0x7f);//0000'0011'0xxx'xxxx
	SendData(mdata, SENDCMD_LEN);
	DI_0;
        delay_us();
	SK_0;
        delay_us();
	for (i = 7; i >=0; i--)
	{
		SK_1;
                delay_us();
		if(GET_BIT(PINB,DO)) inData |= 1 << i;
		else inData &= ~(1 <<i);
		SK_0;
                delay_us();
	}
	CS_0;
	return inData;
}
/********************************************/
uchar WriteOneByte(uchar Address, uchar data)
{
	uint mdata;
	Start();
	mdata = 0x0280|(Address & 0x7f);
	SendData(mdata, SENDCMD_LEN);
	SendData(data, 8);
	return EraseWriteEnd();
}
/***************************/
void WriteEnable(void)
{
	uint mdata;
	Start();
	mdata = 0x0260;//0000'0010'0110'0000
	SendData(mdata, SENDCMD_LEN);
	CS_0;
}
/*******************************************/
uchar EraseOneByte(uchar Address)
{
	uint mdata;
	Start();
	//_delay_us(DELAY_US);
	mdata = 0x0380|(Address & 0x7f);
	SendData(mdata, SENDCMD_LEN);
	return EraseWriteEnd();
}
/*******************************/
uchar EraseAll(void)
{
	uint mdata;
	Start();
	mdata = 0x0240;
	SendData(mdata, SENDCMD_LEN);
	return EraseWriteEnd();
}
/***************************************/
uchar WriteAll(uchar data)
{
	uint mdata;
	Start();
	mdata = 0x0220;
	SendData(mdata, SENDCMD_LEN);
	SendData(data, 8);
	return EraseWriteEnd();
}
/******************************/
void WriteDisable(void)
{
	uint mdata;
	Start();
	mdata = 0x0200;
	SendData(mdata, SENDCMD_LEN);
	CS_0;
}
/**********************************/
void SendData(uint data, uchar len)
{
	int i;
	for (i = len -1; i >=0; i--)
	{
		if (data & (1<<i)) DI_1;
		else DI_0;
                SK_1;
                delay_us();
		SK_0;
                delay_us();
	}
}