void _WrL3Addr(U8 data)//通過L3總線接口寫控制數據地址(data)到1341芯片


{	
    U32 vPdata = 0x0;	//A端口數據,L3D=L	
    U32 vPdatg = 0x0;	//G端口數據L3M=L(in address mode)/L3C=L
    S32 i,j;

    rPDATG = vPdatg;	//L3M=L
    rPDATG |= L3C;	//L3C=H

    for(j=0;j<4;j++);		//tsu(L3) > 190ns;軟件延時

    //PA9:L3D PG6:L3M PG7:L3C
    for(i=0;i<8;i++)		
    {
	if(data&0x1)//if data bit is 'H'
	{
	    rPDATG = vPdatg;	//L3C=L  形成時鐘信號
	    rPDATA = L3D;	//L3D=H		    
	    for(j=0;j<4;j++);	//tcy(L3) > 500ns軟件延時
	    rPDATG = L3C;	//L3C=H 與L3C=L結合形成時鐘信號
	    rPDATA = L3D;	//L3D=H
	    for(j=0;j<4;j++);	//tcy(L3) > 500ns
	}
	else		//if data bit is 'L'
	{
	    rPDATG=vPdatg;	//L3C=L
	    rPDATA=vPdata;	//L3D=L
	    for(j=0;j<4;j++);	//tcy(L3) > 500ns
	    rPDATG=L3C;		//L3C=H
	    rPDATA=vPdata;	//L3D=L
	    for(j=0;j<4;j++);	//tcy(L3) > 500ns
	}
	data >>=1;
    }
    rPDATG=L3C|L3M;	//L3M=H,L3C=H
}


void _WrL3Data(U8 data,int halt)//通過L3總線接口寫控制數據(data和停止操作)到1341芯片
{
    U32 vPdata = 0x0;   //L3D=L
    U32 vPdatg = 0x0;	//L3M/L3C=L
    S32 i,j;
    if(halt)
    {
        rPDATG=L3C;	    //L3C=H(while tstp, L3 interface halt condition)
        for(j=0;j<4;j++);   //tstp(L3) > 190ns
    }
    rPDATG=L3C|L3M;	    //L3M=H(in data transfer mode)	
    for(j=0;j<4;j++);	    //tsu(L3)D > 190ns

    //PA9:L3DATA PG6:L3MODE PG7:L3CLOCK
    for(i=0;i<8;i++)
    {
        if(data&0x1)	//if data bit is 'H'
        {
	    rPDATG=L3M;		//L3C=L
            rPDATA=L3D;		//L3D=H
            for(j=0;j<4;j++);	//tcy(L3) > 500ns
            rPDATG=L3C|L3M;	//L3C=H
	    rPDATA=L3D;//L3D=H
            for(j=0;j<4;j++);	//tcy(L3) > 500ns
        }
        else		//if data bit is 'L'
        {
            rPDATG=L3M;		//L3C=L
	    rPDATA=vPdatg;	//L3D=L
            for(j=0;j<4;j++);	//tcy(L3) > 500ns
            rPDATG=L3C|L3M;	//L3C=H
	    rPDATA=vPdatg;	//L3D=L
            for(j=0;j<4;j++);	//tcy(L3) > 500ns
        }
        data>>=1;
    }
    rPDATG=L3C|L3M;	//L3M=H,L3C=H
  }


void __irq BDMA0_Done(void)
{
    rI_ISPC=BIT_BDMA0;	//clear pending bit
    WrUTXH0('&');
}

//for record sword
void __irq BDMA0_Rec_Done(void)
{
    rI_ISPC=BIT_BDMA0;	//clear pending bit
    WrUTXH0('#');
    Rec_Done = 1;
    
}
//sword ended


void __irq RxInt(void)
{
    rI_ISPC=BIT_URXD0 ;	//clear pending bits
    *_temp++=RdURXH0();
}

volatile int Tx_Done;
volatile int Rx_Done;

void Iis_Tx(void)
{
    unsigned int  i, save_conC, save_pupC;
    unsigned short *txdata;

    Tx_Done=0;
    Uart_TxEmpty(0);
    ChangePllValue(0x69,0x17,0x0);	//10MHz --> MCLK=45.1584MHz <-- 5.6448MHz*8
    Uart_Init(45200000,115200);
    Uart_Printf("[IIS Slave Tx test]\n");
    
    save_conC=rPCONC;
    save_pupC=rPUPC;

    rPCONC |=0xff;//IIS port	
    rPUPC |= 0xf;

    pISR_BDMA0=(unsigned)TR_Done;
    rINTMSK=~(BIT_GLOBAL|BIT_BDMA0);

    /****** Tx DATA initialize ******/
    txdata=(unsigned short *)malloc(0x10000);
    for(i=0;i<0x10000;i++)
	*(txdata+i)=i;
    
    rNCACHBE0= ((int)txdata>>12) + ( (((int)txdata>>12) +0x20)<<16 );//non-cachable 65KB*2

    /****** BDMA0 Initialize ******/
    rBDISRC0=(1<<30)+(1<<28)+(int)(txdata);	//Half word,inc,Buf
    rBDIDES0=(1<<30)+(3<<28)+((int)IISFIF);	//M2IO,fix,IISFIF
    rBDICNT0=(1<<30)+(1<<26)+(3<<22)+(0<<21)+(0<<20)+0x10000*2;
    rBDICNT0 |= (1<<20);//enable
    //iis,reserved,end_int,1_tx,DMA enable,COUNT
    rBDCON0 = 0x0<<2;
  
    /****** IIS Initialize ******/
    rIISCON=0x22;	//Tx DMA enable,Rx idle,prescaler enable
    rIISMOD=0x189;	//Master,Tx,L-ch=low,iis,16bit ch.,codeclk=256fs,lrck=32fs
    rIISPSR=0x33;	//Prescaler_A/B enable, value=3
    rIISFCON=0xa00;	//Tx/Rx DMA,Tx/Rx FIFO --> start piling....

    /****** Tx start ******/
    rIISCON |=0x1;
    
    while(!Tx_Done);

    /****** Tx Stop(Slave) ******/
    Delay(10);
    rIISCON=0x0;    //IIS stop
    rIISFCON=0x0;   //for FIFO flush
    rBDICNT0=0x0;   //BDMA stop
    Uart_Printf("\nTx End...\n");
    Uart_Printf("Last 256bytes in 65KB transferred data\n");
    for(i=0;i<0x100;i++)
	Uart_Printf("%04x,",*(txdata+0xff00+i));

    free(txdata);
    Cache_Flush();
    rNCACHBE0=0x0;

    rPCONC=save_conC;
    rPUPC=save_pupC;

    rINTMSK=BIT_GLOBAL;
    ChangePllValue(0x34,0x3,0x1);//Fin=10MHz, Fout=60MHz
    Uart_Init(0,115200);


}
  
void __irq TR_Done(void)
{
    rI_ISPC=BIT_BDMA0;	//clear pending bit
    Rx_Done=1;
    Tx_Done=1;
    //WrUTXH0('.');
}

void Iis_Rx(void)
{
    unsigned int i, j, save_conC,save_pupC;
    unsigned short *rxdata;

    Rx_Done=0;
    Uart_TxEmpty(0);
    ChangePllValue(0x69,0x17,0x0);	//10MHz --> MCLK=45.1584MHz <-- 5.6448MHz*8
    Uart_Init(45200000,115200);
    Uart_Printf("[IIS Master Rx test]\n");
    
    save_conC=rPCONC;
    save_pupC=rPUPC;
    
    rPCONC |=0xff;//IIS port	
    rPUPC |= 0xf;

    pISR_BDMA0=(unsigned)TR_Done;
    rINTMSK=~(BIT_GLOBAL|BIT_BDMA0);

    /****** Rx Buf initialize ******/
    rxdata=(unsigned short *)malloc(0x10000);
    //Uart_Printf("Receive addr=0x%x\n",rxdata);
    for(i=0;i<0x10000;i++)
	*(rxdata+i)=0;

    rNCACHBE0= ((int)rxdata>>12) + ( (((int)rxdata>>12) +0x20)<<16 );//non-cachable 65KB*2

    /****** BDMA0 Initialize ******/
    rBDISRC0=(1<<30)+(3<<28)+((int)IISFIF);	//Half word,fix,IISFIF
    rBDIDES0=(2<<30)+(1<<28)+(int)(rxdata);	//IO2M,increment,rxdata
    rBDICNT0=(1<<30)+(1<<26)+(3<<22)+(0<<21)+(0<<20)+0x10000*2;
    //iis,reserved,end_int,1_tx,DMA disable,COUNT
    rBDICNT0 |= (1<<20);//enable
    rBDCON0 = 0x0<<2;

    /****** IIS Initialize ******/
    rIISCON=0x12;	//Rx DMA enable,Tx idle,prescaler enable
    rIISMOD=0x049;	//Slave,Tx,L-ch=low,iis,16bit ch.,codeclk=256fs,lrck=32fs
    rIISPSR=0x33;	//Prescaler_A/B enable, value=3
    rIISFCON=0x500;	//Tx/Rx DMA,Tx/Rx FIFO --> start piling....

    /****** Rx start ******/
    rIISCON |=0x1;

    while(!Rx_Done);

    /****** Rx Stop(Master) ******/
    rIISCON=0x0;    //IIS stop
    rIISFCON=0x0;   //for FIFO flush
    rBDICNT0=0x0;   //BDMA stop

    /****** Check Rx data ******/
    for(i=0;i<0x10000;i++)
    {
	j=*(rxdata+i);
	if(j!=i)
	{
	    Uart_Printf("IIS Rx fail!(Rx=%04x, Tx=%04x)\n", j,i); 
	    break;
	}
    }
    if(j+1==i)
	Uart_Printf("\nIIS Rx O.K.!!!\n");

    Uart_Printf("Last 256bytes in 65KB received data\n");
    for(i=0;i<0x100;i++)
	Uart_Printf("%04x,",*(rxdata+0xff00+i));

    free(rxdata);
    Cache_Flush();
    rNCACHBE0=0x0;

    rPCONC=save_conC;
    rPUPC=save_pupC;

    rINTMSK=BIT_GLOBAL;
    ChangePllValue(0x34,0x3,0x1);//Fin=10MHz, Fout=60MHz
    Uart_Init(0,115200);
}