ds1620.c

这是一个有关C8051F020单片机的实验教学材料,相信对于单片机的研究人员会有很大的帮助.

#include <c8051f020.h>                    // SFR declarations
#include <intrins.h>

#define  WRITE       0x00                 // WRITE direction bit
#define  READ        0x01                 // READ direction bit

#define  CHIP_B      0x70
#define  SMB_START      0x08              // (MT & MR) START transmitted
#define  SMB_MTADDACK   0x18              // (MT) Slave address + W transmitted;
                                          //  ACK received
#define  SMB_MTDBACK    0x28              // (MT) data byte transmitted; ACK rec'vd
                                          //  ACK received
#define  SMB_MRDBNACK   0x58              // (MR) data byte rec'vd; NACK transmitted

//-----------------------------------------------------------------------------------
//Global VARIABLES
//-----------------------------------------------------------------------------------
char COMMAND;                             // Holds the slave address + R/W bit for

unsigned char totalnumber,sendnumber;                               // OR data that has just been received.

unsigned char xdata SENDMODE;                                         // that has just been received.

bit SM_BUSY;                              // This bit is set when a send or receive
                                          // is started. It is cleared by the
                                          // ISR when the operation is finished.

sbit RST = P2^7;
sbit CLK = P2^6;
sbit DQ  = P2^5;

unsigned char wr_data[8];
unsigned char rd_data[8];

void Delay(unsigned int TT)
{
	unsigned int k;
	for(k=0;k<TT;k++){
		_nop_();
	}
}

/*
unsigned char Read1620(void)
{
	unsigned char j,k=0,b=1;
	k=0;
	b=1;
	for(j=0;j<10;j++)
	{
		CLK = 0;
		if(DQ) k|=b;
		CLK = 1;
		b = (b<<1);
	}
	return k;
}
*/
void Write1620(unsigned char m)
{
	unsigned char k,b=1;
	RST = 1;
	for(k=0;k<10;k++)
	{
		CLK = 0;
		DQ = (m&b);
		CLK = 1;
		b = (b<<1);
	}
	return;
}

unsigned char INDS1620(void)
{
	unsigned char j,k=0,b=1;
	k=0;
	b=1;
	for (j=0;j<8;j++)
	{
		P2 = P2|0x20;
		CLK =0;
		if(DQ) k|=b;
		CLK = 1;
		b=(b<<1);
	}	
	return k;
}

void OUTDS1620(unsigned char m)
{
	unsigned char k,b=1;
	RST =1;
	for (k=0;k<8;k++)
	{
		CLK = 0;
		DQ = (m&b);
		CLK = 1;
		b=(b<<1);
	}
	return;
}

void Init1620(void)
{
	P2 = 0x00;
	RST = 0;
	RST = 1;
	OUTDS1620(0x01);
	Write1620(0x4c);
	RST = 0;

	RST = 1;
	OUTDS1620(0x02);
	Write1620(0x18);
	RST = 0;
	_nop_();
}
unsigned int RDDS1620(void)
{
	unsigned char Temp_L,Temp_H;
	RST = 1;
	OUTDS1620(0xee);
	RST = 0;
	Delay(16);
	RST = 1;
	OUTDS1620(0xaa);
	Temp_L = INDS1620();				//低8位
	Temp_H = INDS1620();				//高8位
	RST = 0;
	return(Temp_H*0x100+Temp_L);
}

void sleep_ms(unsigned int count)
{
	unsigned char ii,jj;
	for(ii=0;ii<count;ii++)
	{
		for(jj=0;jj<250;jj++)
		_nop_();
	}
}


void SYSCLK_Init (void)
{
	int i;								// delay counter
	OSCXCN = 0x67;						// start external oscillator with
										// 18.432MHz crystal
	for (i=0; i < 256; i++);			// Wait for osc. to start up
	while (!(OSCXCN & 0x80));			// Wait for crystal osc. to settle
	OSCICN = 0x88;						// select external oscillator as SYSCLK
										// source and enable missing clock
										// detector
	//OSCICN = 0x04;					//interal 16MHZ
}

void PORT_Init (void)
{
	XBR0    = 0x07;                     // Enable SMBus, SPI0, and UART0
	XBR2	= 0x44;						// Enable crossbar and weak pull-ups
	P0MDOUT	= 0x15;
}

void SLA_SEND(char chip_select, char *wr_data, char number)
{
   SENDMODE=0x01;
   totalnumber=number;
   sendnumber=number;
   while(SM_BUSY);                        // Wait while SMBus is busy.
   SM_BUSY = 1;                           // SMBus busy flag set.
   SMB0CN = 0x44;                         // SMBus enabled, ACK low.
   COMMAND = (chip_select | WRITE);       // COMMAND = 7 address bits + WRITE.
   STO = 0;
   STA = 1;                               // Start transfer.
	while(SM_BUSY);   
}


void main (void) 
{
	unsigned char temp;
	unsigned int w;
   	unsigned char data Number[16]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
	WDTCN = 0xde;
	WDTCN = 0xad;           //关看门狗
	SYSCLK_Init ();         //初始化时钟
	PORT_Init ();           //初始化IO口
	Init1620();
	SMB0CN = 0x44;                         // Enable SMBus with acknowledge low (AA = 1)
	SMB0CR = -80;                          // SMBus clock rate = 100 kHz
	EIE1 |= 2;                             // SMBus interrupt enable
	SM_BUSY = 0;                           // Free bus for first transfer.
	SI = 0;
	EA=1;					//开中断
	for (;;)
	{
		sleep_ms(250);
		sleep_ms(250);
		sleep_ms(250);
		w = RDDS1620();
		w = w*5;
		wr_data[0] = 0x00;
		wr_data[1] = 0x17;
		wr_data[2] = 0x00;
		temp = (w%1000)/100;
		wr_data[3] = Number[temp];
		temp = (w%100)/10;
		wr_data[4] = Number[temp]|0x80;
		temp = (w%10);
		wr_data[5] = Number[temp];
		SLA_SEND(CHIP_B,wr_data,0x06);
		sleep_ms(250);
		sleep_ms(250);
		_nop_();
		sleep_ms(250);
		sleep_ms(250);
	}
}

//------------------------------------------------------------------------------------
// SMBus Interrupt Service Routine
//------------------------------------------------------------------------------------

void SMBUS_ISR (void) interrupt 7
{
   switch (SMB0STA){                    // Status code for the SMBus 
                                        // (SMB0STA register)

      // Master Transmitter/Receiver: START condition transmitted.
      // Load SMB0DAT with slave device address.  Mask out R/W bit since all transfers
      // start with an OP_CODE write.
      case SMB_START:	//0x08
         SMB0DAT = COMMAND ;			// Load address of the slave to be accessed.
                                        // Mask out R/W bit because first transfer
                                        // will always be a write of the OP_CODE.
         STA = 0;                       // Manually clear STA bit
         SI = 0;                        // Clear interrupt flag
         break;


      // Master Transmitter: Slave address + WRITE transmitted.  ACK received.
      // Load OP_CODE into SMB0DAT.
      case SMB_MTADDACK:	//0x18
         SMB0DAT = wr_data[0];
         SI = 0;                        // Clear interrupt flag
         break;

      // Master Transmitter: Data byte transmitted.  ACK received.
      // Check OP_CODE - If it is a READ code, send repeated START to begin
      // read.  If it is a WRITE code, load WORD into SMB0DAT for transfer.
      // If it is not a valid code, then either 1) data has been transmitted
      // and the transfer is finished, or 2) there is an error.  In either case,
      // send STOP and end transfer.
      case SMB_MTDBACK:		//0x28
         switch (SENDMODE){         	// Check only lower 4 bits.

            // OP_CODE is a READ.  Send repeated START.
            case 1:
			   sendnumber--;
			   if(sendnumber)
			   SMB0DAT = wr_data[totalnumber-sendnumber];
			   else{
			   		STO=1;
				   	SM_BUSY=0;
				}

               //OP_CODE = 0;               // Clear OP_CODE so transfer ends the next
               break;                     // time this state occurs 
            case 0:
			     STO = 0;
               STA = 1;
               break;                          // (after data is sent).

		
            default:                      // No valid OP_CODE.  End transfer.
               STO = 1;
               SM_BUSY = 0;
               break;
         }
         SI = 0;
         break;

      // Master Receiver: Data byte received.  NACK transmitted.
      // Read operation has completed.  Read data register and send STOP.
      case SMB_MRDBNACK:	//0x58
         rd_data[0] = SMB0DAT;
         STO = 1;
         SM_BUSY = 0;
         AA = 1;                          // Set AA for next transfer
         SI = 0;
         break;

      // All other status codes invalid.  Reset communication.
      default:
         STO = 1;
         SM_BUSY = 0;
         break;
      }
}