SPI bus driver (C language source program)

/*--------------------
〖Description〗The SPI bus driver source program defaults to a 11.0592Mhz crystal oscillator.
〖File〗93CXX.C ﹫2003/5/12
---------------------*/
/*General 93c06-93c86 series instructions
93c06=93c4693c56=93c6693c76=93c86*/
//dipx can be defined by yourself
＃i nclude
＃i nclude "intrins.h"
/*-----------------------------------------------------
SPI93cXX series timing function call (normal package)
Calling method: self-defined﹫2001/05/12
Function description: private function, encapsulate each interface definition
-----------------------------------------------------*/
/*#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 series timing function call (normal package)
Calling method: void high46(void) --- High 8-bit function call
void low46(void) --- Low 8-bit function call ﹫2001/05/12
Function description: Private function, SPI dedicated 93c46 normal package driver program
-----------------------------------------------------*/
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 series timing function call (special package)
Calling method: self-definition﹫2001/05/12
Function description: private function, special package interface definition
-----------------------------------------------------
#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 series timing function call (special package)
Calling method: void high46a(void) ---high 8-bit function call
void low46a(void) ---Low 8-bit function call﹫2001/05/12Function
description: Private function, SPI dedicated 93c46 special package driver
----------------------------------------------------------
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 series function call (example)
Calling method: bit write93c56_word(unsigned int address,unsigned int dat) ﹫2001/05/12
Function description: Private function, SPI dedicated
-----------------------------------------------------*/
void ewen46(void)
{
_nop_();
cs_93=1;
high46();
wd46(0x30);
cs_93=0;
}[page]

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 series function call (example)
Calling method: bit write93c57_word(unsigned int address,unsigned int dat ) ﹫2001/05/12
Function description: Private function, SPI only
----------------------------------- ------------------
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 series function call (example)
Calling method: bit write93c56_word(unsigned int address,unsigned int dat) ﹫2001/05/ 12Function
description: Private function, SPI only
----------------------------------------- ------------
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;
93c56_word(temp )
==dat) {
return( 0)
;
} e++ ; } return ( 1) ; } [page] /*----------------------------------------------------- SPI93c76 and SPI93c86 series function call ( example ) Calling method : bit write93c76_word ( unsigned int address , unsigned int dat) ﹫2001/05/12Function description: Private function, SPI dedicated ----------------------------------------------------- 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) ; 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 function call (example)
Calling method: main() ﹫2001/05/12
Function description: Private function, SPI dedicated
-----------------------------------------------------*/
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 ; 344); j[i]=read93c46_word(i); i=3; b=write93c46_word(i,0x1526); j [i]=read93c46_word(i); i= 4 ;