/*******************************************************************************
*  標題:  ME300系列單片機開發系統演示程序 -  AT93C46讀寫演示程序               *
*  硬件： ME300A+,ME300B                                                       *
*  文件:  wl006.C                                                              *
*  日期:  2004-1-5                                                             *
*  版本:  1.0                                                                  *
*  作者:  偉納電子 - Freeman                                                   *
*  郵箱:  freeman@willar.com                                                   *
*  網站： http://www.willar.com                                                *
********************************************************************************
*  描述:                                                                       *
*         AT93C46讀寫演示程序                                                  *
*         從地址0x00開始寫入數據“www.willar.com”， 然后再讀出                  *
*                                                                              *
*         注意：在擦除或寫入數據之前，必須先寫入EWEN指令，93C46右邊的JP7跳線   *
*               用于8位和16位模式選擇，默認為8位模式                           *
********************************************************************************
*  跳線設置：                                                                  *
*     ME300A+    JP1 全部短接，JP2短接3-4端                                    *
*     ME300B     JP1 短接，JP2短接3-4端，JP3短接93端                           *
*                                                                              *
********************************************************************************
* 【版權】 Copyright(C)偉納電子 www.willar.com  All Rights Reserved            *
* 【聲明】 此程序僅用于學習與參考，引用請注明版權和作者信息！                  *
*******************************************************************************/


#include <reg51.h>
#include <intrins.h>

//define OP code
#define OP_EWEN_H		0x00	// 00					write enable
#define OP_EWEN_L		0x60	// 11X XXXX				write enable
#define OP_EWDS_H		0x00	// 00					disable
#define OP_EWDS_L		0x00	// 00X XXXX				disable

#define OP_WRITE_H		0x40	// 01 A6-A0				write data
#define OP_READ_H		0x80	// 10 A6-A0				read data

#define OP_ERASE_H		0xc0	// 11 A6-A0				erase a word

#define OP_ERAL_H		0x00	// 00					erase all
#define OP_ERAL_L		0x40	// 10X XXXX				erase all
#define OP_WRAL_H		0x00	// 00  					write all	
#define OP_WRAL_L		0x20	// 01X XXXX		 		write all	


//define pin
sbit CS = P3^4;
sbit SK = P3^3;
sbit DI	= P3^5;
sbit DO = P3^6;

unsigned char code dis_code[] = {0x7e,0xbd,0xdb,0xe7,0xdb,0xbd,0x7e,0xff};

void start();
void ewen();
void ewds();
void erase();
void write(unsigned char addr, unsigned char indata);
unsigned char read(unsigned char addr);
void inop(unsigned char op_h, unsigned char op_l);
void shin(unsigned char indata);
unsigned char shout();
void delayms(unsigned char ms);

main()
{
	unsigned char i;
	CS = 0;				//初始化端口
	SK = 0;
	DI = 1;
	DO = 1;

	ewen();				// 使能寫入操作
	erase();			// 擦除全部內容
		
	for(i = 0 ; i < 8; i++)		//寫入顯示代碼到AT93C46
	{
		write(i, dis_code[i]);
	}
	
	ewds();				// 禁止寫入操作	
	
	i = 0;
	while(1)
	{
		P0 = read(i);	// 循環讀取AT93C46內容，并輸出到P0口
		i++;
		i &= 0x07;		// 循環讀取地址為0x00～0x07
		delayms(250);		
	}
}


void write(unsigned char addr, unsigned char indata)
// 寫入數據indata到addr
{
	inop(OP_WRITE_H, addr);	// 寫入指令和地址
		shin(indata);
		CS = 0;
	delayms(10);			// Twp
}

unsigned char read(unsigned char addr)
// 讀取addr處的數據
{
	unsigned char out_data;
	inop(OP_READ_H, addr);	// 寫入指令和地址
	out_data = shout();
	CS = 0;	
	return out_data;
}

void ewen()
{
	inop(OP_EWEN_H, OP_EWEN_L);
	CS= 0;
}

void ewds()
{
	inop(OP_EWDS_H, OP_EWDS_L);
	CS= 0;	
}

void erase()
{
	inop(OP_ERAL_H, OP_ERAL_L);
	delayms(30);
	CS = 0;
}


void inop(unsigned char op_h, unsigned char op_l)
//移入op_h的高兩位和op_l的低7位
//op_h為指令碼的高兩位
//op_l為指令碼的低7位或7位地址
{	

	unsigned char i;
	
	SK = 0;		// 開始位
	DI = 1;
	CS = 1;
	_nop_();
	_nop_(); 
	SK = 1;
	_nop_();
	_nop_();
	SK = 0;		// 開始位結束

	DI = (bit)(op_h & 0x80);	// 先移入指令碼高位
	SK = 1;
	op_h <<= 1;
	SK = 0;		

	DI = (bit)(op_h & 0x80);	// 移入指令碼次高位
	SK = 1;
	_nop_();
	_nop_();	
	SK = 0;
	
	// 移入余下的指令碼或地址數據
	op_l <<= 1;	
	for(i = 0; i < 7; i++)		
	{
		DI = (bit)(op_l & 0x80);	// 先移入高位
		SK = 1;
		op_l <<= 1;
		SK = 0;		
	}
	DI = 1;		
}


void shin(unsigned char indata)		
//移入數據
{
	unsigned char i;
	for(i = 0; i < 8; i++)
	{
		DI = (bit)(indata & 0x80);	// 先移入高位
		SK = 1;
		indata <<= 1;
		SK = 0;		
	}
	DI = 1;
}

unsigned char shout(void)			
// 移出數據
{
	unsigned char i, out_data;
	for(i = 0; i < 8; i++)
	{
		SK = 1;
		out_data <<= 1;
		SK = 0;
		out_data |= (unsigned char)DO;
	}
	return(out_data);
}

void delayms(unsigned char ms)	
// 延時子程序
{						
	unsigned char i;
	while(ms--)
	{
		for(i = 0; i < 120; i++);
	}
}