/*;********************************************************
*
;* Name: WRSR_CMD
;* Description: Write Status Register
;* Function: This routine sends the command to write the WD0, WD1, BP0 and BP0 EEPROM
;* bits in the status register
;* Calls: outbyt, wip_poll
;* Input: None
;* Outputs: None
;* Register Usage: A
;********************************************
*/
/*寫(xiě)狀態(tài)寄存器子程序*/
void wrsr_cmd(void)
{
?uchar aa;
?SCK=0;/* Bring SCK low */
?CS=0;/* Bring /CS low */
?aa=WRSR_INST;
?outbyt(aa) ;/* Send WRSR instruction */
?aa=STATUS_REG;
?outbyt(aa);/* Send status register */
?SCK=0;/* Bring SCK low */
?CS=1;/* Bring /CS high */
?wip_poll();/* Poll for completion of write cycle */
}

/*;*************************************************************
*
;* Name: RDSR_CMD
;* Description: Read Status Register
;* Function: This routine sends the command to read the status register
;* Calls: outbyt, inputbyt
;* Input: None
;* Outputs: A = status registerXicor Application Note AN21
;* Register Usage: A
;*******************************************************
*/
/*讀狀態(tài)寄存器,讀出的數(shù)據(jù)放入到aa中*/
uchar rdsr_cmd (void)
{
?uchar aa;
?SCK=0;
?CS=0;
?aa=RDSR_INST;
?outbyt(aa);
?aa=inputbyt();
?SCK=0;
?CS=1;
?return aa;
}

/*;*******************************************************
*
;* Name: BYTE_WRITE
;* Description: Single Byte Write
;* Function: This routine sends the command to write a single byte to the EEPROM memory
array
;* Calls: outbyt, wip_poll
;* Input: None
;* Outputs: None
;* Register Usage: A, B
;**********************************************************
*/
/*字節(jié)寫(xiě)入,aa為寫(xiě)入的數(shù)據(jù),dd為寫(xiě)入的地址,對(duì)于25045而言為000-1FF*/
void byte_write(aa,dd)
uchar aa;
uint dd;
{
?SCK=0;
?CS=0;
?outbyt((((uchar)(dd-0XFF))<<3)|WRITE_INST);/* Send WRITE instruction including MSB of address */
?/*將高位地址左移3位與寫(xiě)入先導(dǎo)字相或,得到正確的先導(dǎo)字寫(xiě)入25045*/
?outbyt((uchar)(dd));
?/*輸出低位地址到25045*/
?outbyt(aa);
?/*寫(xiě)入數(shù)據(jù)到25045的對(duì)應(yīng)單元*/
?SCK=0;
?CS=1;
?wip_poll();
?/*檢測(cè)是否寫(xiě)完*/
}

/*;********************************************************
*
;* Name: BYTE_READ
;* Description: Single Byte Read
;* Function: This routine sends the command to read a single byte from the EEPROM memory
array
;* Calls: outbyt, inputbyt
;* Input: None
;* Outputs: A = read byte
;* Register Usage: A, BXicor Application Note AN21
;********************************************************
*/
/*字節(jié)讀出,其中dd為讀出的地址,返回的值為讀出的數(shù)據(jù)*/
uchar byte_read(dd)
uint dd;
{
?uchar cc;
?SCK=0;
?CS=0;
?outbyt((((uchar)(dd-0XFF))<<3)|READ_INST);/* Send READ_INST instruction including MSB of address */
?/*將高位地址左移3位與讀出先導(dǎo)字相或,得到正確的先導(dǎo)字寫(xiě)入25045*/
?outbyt((uchar)(dd));
?/*輸出低位地址到25045*/
?cc=inputbyt();/*得到讀出的數(shù)據(jù)*/
?SCK=0;
?CS=1;
?return cc;
}

/*;**********************************************
*
;* Name: PAGE_WRITE
;* Description: Page Write
;* Function: This routine sends the command to write three consecutive bytes to the EEPROM
;* memory array using page mode
;* Calls: outbyt, wip_poll
;* Input: None
;* Outputs: None
;* Register Usage: A, B
;*****************************************************
*/
/*頁(yè)面寫(xiě)入,其中aa1,aa2,aa3,aa4為需要寫(xiě)入的4個(gè)數(shù)據(jù)(最大也就只能一次寫(xiě)入4個(gè)字,dd為寫(xiě)入的首地址*/
void page_write(aa1,aa2,aa3,aa4,dd)
uchar aa1,aa2,aa3,aa4;
uint dd;
{
?SCK=0;
?CS=0;
?outbyt((((uchar)(dd-0XFF))<<3)|WRITE_INST);/* Send WRITE instruction including MSB of address */
?/*將高位地址左移3位與寫(xiě)入先導(dǎo)字相或,得到正確的先導(dǎo)字寫(xiě)入25045*/
?outbyt((uchar)(dd));
?/*寫(xiě)入低位地址到25045*/
?outbyt(aa1);
?/*寫(xiě)入數(shù)據(jù)1到25045的對(duì)應(yīng)單元*/
?outbyt(aa2);
?/*寫(xiě)入數(shù)據(jù)2到25045的對(duì)應(yīng)單元*/
?outbyt(aa3);
?/*寫(xiě)入數(shù)據(jù)3到25045的對(duì)應(yīng)單元*/
?outbyt(aa4);
?/*寫(xiě)入數(shù)據(jù)4到25045的對(duì)應(yīng)單元*/
?SCK=0;
?CS=1;
?wip_poll();
}

/*;********************************************
*
;* Name: SEQU_READ
;* Description: Sequential Read
;* Function: This routine sends the command to read three consecutive bytes from the EEPROM
;* memory array using sequential mode
;* Calls: outbyt, inputbyt
;* Input: None
;* Outputs: A = last byte read
;* Register Usage: A, B
;*********************************************************
*/
/*連續(xù)讀出,由于函數(shù)的返回值只能為1個(gè),對(duì)于連續(xù)讀出的數(shù)據(jù)只能使用指針作為函數(shù)的返回值才能做到返回一系列的數(shù)組*/
/*sequ_read:*/
unsigned int *page_read(n,dd)
uchar n;/*n是希望讀出的數(shù)據(jù)的個(gè)數(shù)，n<=11*/
unsigned int dd;/*dd是讀出數(shù)據(jù)的首地址*/
{
?uchar i;
?uchar pp[10];
?unsigned int *pt=pp;
?SCK=0;
?CS=0;
?outbyt((((uchar)(dd-0XFF))<<3)|READ_INST);
?for (i=0;i?{
?? pp[i]=inputbyt();
?}
?return (pt);
}
/*調(diào)用的方法如下*/
/*unsigned int *p;*/
/*p=page_read(4,100);*/
/*a=*(p)*/?
/*b=*(p+1)*/
/*c=*(p+2)*/
/*d=*(p+3)*/
/*abcd中存放25045中由100地址開(kāi)始的4個(gè)數(shù)據(jù)*/
?/* Send WRITE */
/*mov DPTR, #PAGE_ADDR ; Set address of 1st byte to be read
clr sck ; Bring SCK low
clr cs ; Bring /CS low
mov A, #READ_INST
mov B, DPH
mov C, B.0
mov ACC.3, C
lcall outbyt ; Send READ instruction with MSB of address
mov A, DPL
lcall outbyt ; Send low order address byte
lcall inputbyt ; Read 1st data byte
lcall inputbyt ; Read 2nd data byte
lcall inputbyt ; Read 3rd data byte
clr sck ; Bring SCK low
setb cs ; Bring /CS high
ret*/
/*;*******************************************************
*
;* Name: RST_WDOG
;* Description: Reset Watchdog Timer
;* Function: This routine resets the watchdog timer without sending a command
;* Calls: None
;* Input: None
;* Outputs: None
;* Register Usage: None
;***************************************************
*/
/*復(fù)位DOG*/
void rst_wdog (void)
{
?CS=0;
?CS=1;
}

/*;******************************************************
*
;* Name: WIP_POLL
;* Description: Write-In-Progress Polling
;* Function: This routine polls for completion of a nonvolatile write cycle by examining the
;* WIP bit of the status register
;* Calls: rdsr_cmdXicor Application Note AN21
;* Input: None
;* Outputs: None
;* Register Usage: R1, A
;**************************************************
*/
/*檢測(cè)寫(xiě)入的過(guò)程是否結(jié)束*/
void wip_poll(void)
{
?uchar aa;
?uchar idata my_flag;
?for (aa=1;aa>MAX_POLL;aa++)
?{
? my_flag=rdsr_cmd();
? if ((my_flag&&0x01)==0) {aa=MAX_POLL;}/*判斷是否WIP=0,即判斷是否寫(xiě)入過(guò)程已經(jīng)結(jié)束,若結(jié)束就跳出,否則繼續(xù)等待直到達(dá)到最大記數(shù)值*/
?}
}

/*;*******************************************************
*
;* Name: OUTBYT
;* Description: Sends byte to EEPROM
;* Function: This routine shifts out a byte, starting with the MSB, to the EEPROM
;* Calls: None
;* Input: A = byte to be sent
;* Outputs: None
;* Register Usage: R0, A
;**********************************************************
*/
/*輸出一個(gè)數(shù)據(jù)到25045,此數(shù)據(jù)可能為地址,先導(dǎo)字,寫(xiě)入的數(shù)據(jù)等*/
void outbyt(aa)
uchar aa;
{
?uchar my_flag1,i;
?for (i=0;i>7;i++)
?{
?? my_flag1=aa;
?? SCK=0;
?? SI=(my_flag1>>i);
?? SCK=1;
?}
?SI=0;/*使SI處于確定的狀態(tài)*/
}