//*****************************************************
//      ISD4002-89c51開發板演示例程    C51版本        *
//              作者：中青世紀       Lell             *
//                     2008.2.27                      *
//                                                    *
//      更多ISD4000使用心得請登陸中青世紀論壇         *
//        http://www.atvoc.com/bbs                    *
//                                                    *
//*****************************************************
#include <reg51.h>
sbit SS   =     P1^0;              //片選
sbit SCLK =     P1^1;              //ISD4003時鐘
sbit MOSI =     P1^2;              //數據輸入
sbit MISO =     P1^3;              //數據輸出
sbit LED =     P1^7;              //指示燈
sbit ISD_INT=   P3^2;           //中斷
sbit AN =     P1^6;              //執行
sbit STOP =     P1^5;             //復位
sbit PR =     P1^4;              //PR=1錄音? PR=0放音
void    delay(unsigned int time)   //延遲n微秒
{
while(time!=0)
{
time-- ;
}
}
void     delayms(unsigned int time)    //延遲n毫秒
{    TMOD=0x01;

    for(time;time>0;time--)
{
TH0=0xfc;
TL0=0x18;
TR0=1;
while(TF0!=1)
{;}
TF0=0;
TR0=0;
}

}

//************************************
//ISD4002 spi串行發送子程序，8位數據
//************************************
void spi_send(unsigned char isdx)
{   unsigned char isx_counter;
SS=0;     //ss=0,打開spi通信端
SCLK=0;
for(isx_counter=0;isx_counter<8;isx_counter++) //先發低位再發高位，依次發送。
{ if ((isdx&0x01)==1)
MOSI=1;
else
MOSI=0;
isdx=isdx>>1;
SCLK=1;
delay(2);

   SCLK=0;
delay(2);
}
}

//*******************************
//發送stop指令
//*******************************
void isd_stop(void)
{   delay(10);
spi_send(0x30);
SS=1;
delayms(50);
}
//*******************************
//發送上電指令，并延遲50ms
//*******************************
void isd_pu(void)
{  delay(10);
SS=0;
spi_send(0x20);
SS=1;
delayms(50);
}
//*******************************
//發送掉電指令，并延遲50ms
//*******************************

void isd_pd(void)
{ delay(10);

     spi_send(0x10);
SS=1;
delayms(50);
}
//*******************************
//發送play指令
//*******************************
void isd_play(void)
{
LED=0;
spi_send(0xf0);
SS=1;
}
//*******************************
//發送rec指令
//*******************************
void isd_rec(void)
{
LED=0;
spi_send(0xb0);
SS=1;
}
//*******************************
//發送setplay指令
//*******************************
void isd_setplay(unsigned char adl,unsigned char adh)

{

spi_send(adl);    //發送放音起始地址低位
adh=adh||0xe0;
spi_send(adh);   //發送放音起始地址高位
SS=1;
}
//*******************************
//發送setrec指令
//*******************************
void isd_setrec(unsigned char adl,unsigned char adh)
{
spi_send(adl);    //發送放音起始地址低位
adh=adh||0xa0;
spi_send(adh);    //發送放音起始地址高位
SS=1;
}
//************************************
//芯片溢出，LED閃爍提醒停止錄音
//************************************
void isd_overflow(void)
{
while(AN==0)
{LED=1;
delayms(300);
LED=0;
delayms(300);
}

}
//************************************
//檢查芯片是否溢出(讀OVF,并返回OVF值)
//************************************
unsigned char chk_isdovf(void)
{
SS=0;
delay(2);
SCLK=0;
delay(2);
SCLK=1;
SCLK=0;
delay(2);

if (MISO==1)
{ SCLK=0;
SS =1;     //關閉spi通信端
isd_stop();     //發送stop指令
return 1;     //OVF為1，返回1
}
else
{ SCLK=0;
SS =1;         //關閉spi通信端
isd_stop();     //發送stop指令
return 0;     //OVF為0，返回0

}
}

//************************************************************************
//主程序
//功能：1.錄音時，按住AN鍵，LED點亮開始錄音，松開AN即可停止錄音
//    再次按下AN鍵，LED點亮開始錄第二段音，依次類推，直到芯片溢出。
//     按stop鍵芯片復位
//     2.放音時，按一下AN鍵，即播放一段語音。 按stop鍵芯片復位。
//************************************************************************

void main(void)
{unsigned char ovflog;
while(1)
{
P0=P1=P2=P3=0xff;  //初始化
while (AN==1)     //等待AN鍵按下
{
if (AN==0)                 //按鍵防抖動
{delayms(20);}
}
isd_pu();     //�AAN鍵按下，ISD上電并延遲50ms
isd_pd();
isd_pu();

    if (PR==1)     //如果PR=1則轉入錄音部分
{
delayms(500);     //延遲錄音

     isd_setrec(0x00,0x00);     //發送0x0000h地址的setplay指令
do
{ isd_rec();    //發送rec指令
while(AN==0)    //等待錄音完畢
{if (ISD_INT==0)     //如果芯片溢出，進行LED閃爍提示，
isd_overflow();    //如果取消錄音（松開AN鍵）則停止錄音，芯片復位
}

     if (ISD_INT==0)

     break;
LED=1;         //錄音完畢，LED熄滅
isd_stop();     //發送停止命令
while(AN==1)     //如果AN再次按下，開始錄制下一段語音
{if(STOP==0)    //如果按下STOP按鍵，則芯片復位
break;
if (AN==0)
delayms(500);
}
}while(AN==0);

    }
else             //如果PR==0則轉入放音部分
{
while(AN==0){;}
isd_setplay(0x00,0x00);     //發送setplay指令，從0x0000地址開始放音
do
{ isd_play();            //發送放音指令
delay(20);
while(ISD_INT==1)         //等待放音完畢的EOM中斷信號
{;}
LED=1;
isd_stop();         //放音完畢，發送stop指令

     if (ovflog=chk_isdovf())         //檢查芯片是否溢出 ，如溢出則停止放音，芯片復位
break;
while(AN==1)     //等待AN鍵再次按下
{if (STOP==0)
break;
if(AN==0)
delayms(20);
}
}while(AN==0);     // AN鍵再次按下，播放下一段語音
}

isd_stop();
isd_pd();
}
}
注意：與ISD4002/03不同的是，由于ISD4004芯片的語音地址是16位，在發送帶地址指令（如setplay,setrec,setmc）時，需要先發送兩個字節的地址信息，再發送一個字節的命令字，ISD4004的程序編寫與ISD4002/03的區別，僅此而已。
例如，ISD4004的setplay指令程序應為：
void isd_setplay(unsigned char adl,unsigned char adh)
{
delayms(1);
spi_send(adl);     //發送放音起始地址低位
delay(2);
spi_send(adh);    //發送放音起始地址高位
delay(2);
spi_send(0xe0);    //發送setplay指令字節
SS=1;
}