/*--------------------
〖說明〗SPI總線驅動程序 包括的普通封裝標準模式,特殊封裝標準模式 
默認11.0592Mhz的晶振。
〖文件〗93CXX.C ﹫2003/5/12
〖作者〗董石權（司馬東飛） dongshiquan@163.com QQ:52455690 
http://www.mcuzb.com/
〖修改〗修改建議請到論壇公布http://www.mcuzb.com
〖版本〗V3.00A Build 0803
〖公告〗請各位同僚尊重使用權！！！！！！！！！！！ 
---------------------*/ 
/*通用93c06-93c86系列使用說明
93c06=93c4693c56=93c6693c76=93c86*/
//dipx 可以自行定義
#include <AT89X52.H>
#include "intrins.h"
/*-----------------------------------------------------
SPI93cXX系列時序函數調用（普通封裝）
調用方式：自行定義﹫2001/05/12 
函數說明：私有函數，封裝各接口定義
-----------------------------------------------------*/ 
/*#define di_93 dip3
#define sk_93 dip2
#define cs_93 dip1
#define do_93 dip4
#define gnd_93 dip5
#define org_93 dip6*/
sbit cs_93=0xA3;
sbit sk_93=0xA4;
sbit di_93=0xA5;
sbit do_93=0xA6;
sbit org_93=0xA7;
/*
sbit spi_cs  = 0xA3;
sbit spi_sk  = 0xA4;
sbit spi_di  = 0xA5;
sbit spi_do  = 0xA6;
sbit spi_org = 0xA7;*/


/*-----------------------------------------------------
SPI93cXX系列時序函數調用（普通封裝）
調用方式：void high46(void) ---高8位函數調用 
void low46(void) ---低8位函數調用﹫2001/05/12 
函數說明：私有函數，SPI專用93c46普通封裝驅動程序
-----------------------------------------------------*/ 
void high46(void)
{ 
di_93=1; 
sk_93=1; 
_nop_(); 
sk_93=0;
_nop_();
}
void low46(void)
{ 
di_93=0; 
sk_93=1;
_nop_();
sk_93=0;
_nop_();
}
void wd46(unsigned char dd)
{ 
unsigned char i; 
for (i=0;i<8;i++) 
{ 
if (dd>=0x80)
high46(); 
else 
low46(); 
dd=dd<<1; 
}
}
unsigned char rd46(void)
{ 
unsigned char i,dd; 
do_93=1; 
for (i=0;i<8;i++) 
{ 
dd<<=1; 
sk_93=1;
_nop_();
sk_93=0;
_nop_(); 
if (do_93)
dd|=1; 
} 
return(dd);
}

/*-----------------------------------------------------
SPI93cXX系列時序函數調用（特殊封裝）
調用方式：自行定義﹫2001/05/12 
函數說明：私有函數，特殊封裝各接口定義
----------------------------------------------------- 
#define di_93a dip5
#define sk_93a dip4
#define cs_93a dip3
#define do_93a dip6
#define gnd_93a dip7
#define vcc_93a out_vcc(2)
sbit cs_93a=P1^0;
sbit sk_93a=P1^1;
sbit di_93a=P1^2;
sbit do_93a=P1^3;
/*-----------------------------------------------------
SPI93cXX系列時序函數調用（特殊封裝）
調用方式：void high46a(void) ---高8位函數調用 
void low46a(void) ---低8位函數調用﹫2001/05/12 
函數說明：私有函數，SPI專用93c46特殊封裝驅動程序
-----------------------------------------------------
void high46a(void)
{ 
di_93a=1; 
sk_93a=1;_nop_();
sk_93a=0;_nop_();
}
void low46a(void)
{ 
di_93a=0; 
sk_93a=1;_nop_();
sk_93a=0;
_nop_();
}
void wd46a(unsigned char dd)
{ 
unsigned char i; 
for (i=0;i<8;i++) 
{ 
if (dd>=0x80) high46a(); 
else low46a();
dd=dd<<1; 
}
}
unsigned char rd46a(void)
{ 
unsigned char i,dd; 
do_93a=1; 
for (i=0;i<8;i++) 
{ 
dd<<=1; 
sk_93a=1;_nop_();
sk_93a=0;_nop_(); 
if (do_93a) dd|=1;
} 
return(dd);
}
/*-----------------------------------------------------
SPI93c46系列函數調用（舉例）
調用方式：bit write93c56_word(unsigned int address,unsigned int dat) ﹫2001/05/12
函數說明：私有函數，SPI專用
-----------------------------------------------------*/ 
void ewen46(void)
{ 
_nop_(); 
cs_93=1; 
high46(); 
wd46(0x30); 
cs_93=0;
}

unsigned char eral_46() 
{
   data unsigned char temp1; 
   data unsigned int temp2; 
   cs_93=0;
   sk_93=0; 
//spi_org=1; 
   cs_93=1;
   ewen46();
   _nop_();
   cs_93=1;
   _nop_();
   high46();
   wd46(0x20);
   wd46(0x20);
   cs_93=0;
   _nop_();
   cs_93=1; 
   temp1=1; 
   temp2=50000; 
   while(!do_93) 
   {
     temp2=temp2-1; 
	 if(temp2==0) 
	 {
	   temp1=0; 
	   break; 
	 } 
   } 
   cs_93=0;
   return temp1; 
}


unsigned int read93c46_word(unsigned char address)
{ 
unsigned int dat; 
unsigned char dat0,dat1; 
//gnd_93a=0; 
//gnd_93=0; 
cs_93=sk_93=0;
//org_93=1;
cs_93=1;_nop_(); 
//address=address<<1;
//address=address>>1;
address=address|0x80;
address=address|0x80; 
high46();
wd46(address);
dat1=rd46();
dat0=rd46(); 
cs_93=0;
dat=dat1*256+dat0; 
return(dat);
}
bit write93c46_word(unsigned char address,unsigned int dat)
{
unsigned char e,time,temp=address; 
e=0; 
while (e<3) 
{
//gnd_93a=0; 
//gnd_93=0; 
cs_93=sk_93=0; 
org_93=1; 
cs_93=1;
ewen46();
_nop_();
cs_93=1;
_nop_();
high46();
address<<=1;//??
address|=0x80;
address>>=1;//??
address|=0x40;
wd46(address); 
wd46(dat/256); 
wd46(dat%256);
cs_93=0;
_nop_();
cs_93=1;
time=0;
do_93=1;
while (1) 
{
if (do_93==1) 
break;
if (time>20) 
break;
time++;
} 
cs_93=0; 
if (read93c46_word(temp)==dat) 
{
return(0);
}
e++;
} 
return(1);
}
/*-----------------------------------------------------
SPI93c57系列函數調用（舉例）
調用方式：bit write93c57_word(unsigned int address,unsigned int dat) ﹫2001/05/12
函數說明：私有函數，SPI專用
----------------------------------------------------- 
void ewen57(void)
{
_nop_(); 
cs_93=1;
dip7=0;
high46();
low46();
wd46(0x60);
cs_93=0;
}
unsigned int read93c57_word(unsigned int address)
{ 
unsigned int dat; 
unsigned char dat0,dat1; 
gnd_93=0; 
cs_93=sk_93=0; 
org_93=1; 
cs_93=1; 
address=address>>1; 
high46(); 
high46(); 
wd46(address);
dat1=rd46();
dat0=rd46(); 
cs_93=0;
dat=dat1*256+dat0; 
return(dat);
}
bit write93c57_word(unsigned int address,unsigned int dat)
{ 
unsigned char e; 
unsigned int temp=address; 
e=0; 
while (e<3) 
{
gnd_93=0;
cs_93=sk_93=0;
org_93=1;
cs_93=1;
ewen57();
cs_93=1;
_nop_();
high46();
low46();
address>>=1;
address|=0x80;
wd46(address);
wd46(dat/256);
wd46(dat%256);
cs_93=0;
_nop_();
cs_93=1;
time=0;
do_93=1;
while (1) 
{
if (do_93==1) break;
if (time>20) break;
}
cs_93=0;
if (read93c57_word(temp)==dat) 
{
return(0);
}
e++;
}
return(1);
}
/*-----------------------------------------------------
SPI93c56系列函數調用（舉例）
調用方式：bit write93c56_word(unsigned int address,unsigned int dat) ﹫2001/05/12
函數說明：私有函數，SPI專用
----------------------------------------------------- 
void ewen56(void)
{ 
_nop_();
cs_93=1;
high46();
low46();
low46();
wd46(0xc0);
cs_93=0;
}
unsigned int read93c56_word(unsigned char address) 
{
unsigned int dat;
unsigned char dat0,dat1;
gnd_93=0;
cs_93=sk_93=0;
org_93=1;
cs_93=1;
address=address>>1;
high46();
high46();
low46();
wd46(address);
dat1=rd46();
dat0=rd46();
cs_93=0;
dat=dat1*256+dat0;
return(dat);
}
bit write93c56_word(unsigned char address,unsigned int dat)
{
unsigned char e;
unsigned int temp=address;
e=0; 
while (e<3) 
{
gnd_93=0;
cs_93=sk_93=0;
org_93=1;
cs_93=1;
ewen56();
_nop_();
cs_93=1;
_nop_();
high46();
low46();
high46();
address>>=1;
wd46(address);
wd46(dat/256);
wd46(dat%256);
cs_93=0;
_nop_();
cs_93=1;
TH0=0;
time=0;
do_93=1;
while (1) 
{
if (do_93==1) break;
if (time) break;
}
cs_93=0;
if (read93c56_word(temp)==dat) 
{
return(0);
}
e++;
}
return(1);
}
/*-----------------------------------------------------
SPI93c76與SPI93c86系列函數調用（舉例）
調用方式：bit write93c76_word(unsigned int address,unsigned int dat) ﹫2001/05/12
函數說明：私有函數，SPI專用
-----------------------------------------------------
void ewen76(void)
{
_nop_();
cs_93=1;
dip7=1;
high46();
low46();
low46();
high46();
high46();
wd46(0xff);
cs_93=0;
}
unsigned int read93c76_word(unsigned int address)
{
unsigned char dat0,dat1;
gnd_93=0;
cs_93=sk_93=0;
org_93=1;
cs_93=1;
address>>=1;
high46();
high46();
low46();
if((address&0x200)==0x200) high46(); 
else low46(); 
if ((address&0x100)==0x100) high46(); 
else low46();
wd46(address);
dat1=rd46();
dat0=rd46();
cs_93=0;
return(dat1*256|dat0);
}
bit write93c76_word(unsigned int address,unsigned int dat)
{
unsigned char e;
unsigned int temp=address;
e=0;
address>>=1;
while (e<3) 
{
gnd_93=0;
cs_93=sk_93=0;
org_93=1;
cs_93=1;
ewen76();
_nop_();
cs_93=1;
high46();
low46();
high46();
if((address&0x200)==0x200) high46(); 
else low46();
if ((address&0x100)==0x100) high46(); 
else low46();
wd46(address);
wd46(dat/256);
wd46(dat%256);
cs_93=0;_nop_();cs_93=1;
time=0;do_93=1; 
while (1) 
{
if (do_93==1) break;
if (time>10) break;
}
cs_93=0;
e++;
}
return(1);
}
/*-----------------------------------------------------
主函數調用（舉例）
調用方式：main() ﹫2001/05/12
函數說明：私有函數，SPI專用
-----------------------------------------------------*/
main()
{ 
  bit b;
  unsigned int i;
  unsigned int j[32];
  eral_46();
  for(i=0;i<32;i++)
  j[i]=read93c46_word(i);
  for(i=0;i<32;i++)
    write93c46_word(i,0x0910);
  i=0; 
  b=write93c46_word(i,0x1213);
  j[i]=read93c46_word(i);
  i=1; 
  b=write93c46_word(i,0x1122);
  j[i]=read93c46_word(i);
  i=2;
  b=write93c46_word(i,0x1344);
  j[i]=read93c46_word(i);
  i=3; 
  b=write93c46_word(i,0x1526);
  j[i]=read93c46_word(i);
  i=4;
  b=write93c46_word(i,0xccde);
  j[i]=read93c46_word(i);
  P2_7=0;
}