#include <c51core.h>
#include <compiler.h>
#include <intrins.h>
#include <absacc.h>
#include <lcdbase.h>

#define FILE0 XBYTE[0x0000]            //硬盤數據寄存器          
#define FILE1 XBYTE[0x0001]            //錯誤/特征寄存器
#define FILE2 XBYTE[0x0002]            //扇區數寄存器
#define FILE3 XBYTE[0x0003]            //扇區號寄存器
#define FILE4 XBYTE[0x0004]            //柱面號寄存器L
#define FILE5 XBYTE[0x0005]            //柱面號寄存器H
#define FILE6 XBYTE[0x0006]            //驅動器/磁頭寄存器
#define FILE7 XBYTE[0x0007]            //狀態/命令寄存器

uchar code MEG[]="錯誤  ";
uchar code INF[]="讀數中";

///////////////////位設置///////////////////////////
sbit BFLAG=ACC^7;
sbit BSY=ACC^7;
sbit DRDY=ACC^6;
sbit DRQ=ACC^3;
sbit ERR=ACC^0;

/************************************************************
* D7   D6   D5   D4   D3   D2    D1   D0                    *
BSY  DRDY  DWF  DSC DRQ  CORR  IDX   ERR                   *
BSY：驅動器忙；                                             *
DRDY：驅動器準備好；                                        *
DWF：驅動器寫失敗；                                         *
DSC:尋道結束；                                              *
DRQ：請求服務，驅動器希望通過數據寄存器與CPU交換一字節數據；*
CORR：當可以糾正的讀錯誤發生時，該位置1，數據傳輸將繼續進行 *
IDX：收到綜引信號；                                         *
ERR：命令執行出錯。                                         *
*************************************************************/



sbit ARST=P5^3;
sbit INTQ=P5^1;

uchar status;  //從硬盤寄存器返回的狀態數據寄存器
uchar buffer0,buffer1;//硬盤16位數據


/*******************************************************
*函數名稱:void ReadReg(uchar address)                  *
*函數用途:讀硬盤非數據寄存器內容，并將結果返回         *
********************************************************/
void ReadReg(uchar address)
{status=address;
 ACC=status;
}


/*******************************************************
*函數名稱:void WriteReg(uchar address,uchar sdata)     *
*函數用途:寫硬盤非數據寄存器內容                       *
********************************************************/
void WriteReg(uchar address,uchar sdata)
{address=sdata;
}

/*******************************************************
*函數名稱:void ReadData()                              *
*函數用途:讀硬盤數據寄存器內容                         *
********************************************************/
void ReadData(void)
{buffer0=FILE0;
 buffer1=DAT16H;
}

/*******************************************************
*函數名稱:void WriteData(uchar Data0,uchar Data1)      *
*函數用途:寫硬盤數據寄存器內容                         *
********************************************************/
void WriteData(uchar data0,uchar data1)
{DAT16H=data1;
 FILE0=data0;
 }


/*********************************************************
*函數名稱:WriteCHS(uint cylinder,uchar head,uchar sector)*
*函數用途:寫CHS信息(地址信息)                            *
**********************************************************/
WriteCHS(uchar head,uint cylinder,uchar sector)
{do{ReadReg(FILE7);}while(BSY);
WriteReg(FILE6,0xe0&head);
WriteReg(FILE5,cylinder>>8);    //high 2-bit cylinder
WriteReg(FILE4,cylinder&0x00ff);//low 8-bit cylinder
WriteReg(FILE3,sector); //start sector
WriteReg(FILE2,0x01);   //sector counter
}

/*********************************************************
*函數名稱:WriteCommand(command)                          *
*函數用途:寫命令                                         *
**********************************************************/
WriteCommand(command)
{do{ReadReg(FILE7);}while(BSY);
WriteReg(FILE7,command);
}

/**********************************************************
*函數名稱:GetData()                                       *
*用途:將硬盤的返回數據讀入BUFFER數組                      *
***********************************************************/
void GetData()
{uint i=512;
do{ReadReg(FILE7);}while(BSY|!DRQ);
if(ERR){LcdWriteCH(0xc0,MEG[0],MEG[1]);
        LcdWriteCH(0xc1,MEG[2],MEG[3]);
         }
while(i){ReadData();
         LcdWriteCH(0xc3,INF[0],INF[1]);
         LcdWriteCH(0xc4,INF[2],INF[3]);
         LcdWriteCH(0xc5,INF[4],INF[5]);
         i-=2;}

         LcdWriteCH(0xc3,MEG[4],MEG[5]);
         LcdWriteCH(0xc4,MEG[4],MEG[5]);
         LcdWriteCH(0xc5,MEG[4],MEG[5]);
}

/**********************************************************
*函數名稱:void IniHard(void)                              *
*用途:初始化硬盤                                          *
***********************************************************/
void IniHard(void)
{do{WriteReg(FILE6,0xa0);
    ReadReg(FILE7);       }while(!DRDY|BSY);
    WriteReg(FILE6,0x20);
    WriteReg(FILE2,64);
    WriteReg(FILE7,0x91);
do{ReadReg(FILE7);}while(BSY);
    WriteReg(FILE7,0x10);
do{ReadReg(FILE7);}while(BSY); 
}


void HardDiskControl(void)
{ARST=0;
 delay(1000);
 ARST=1;
 delay(2000);

 AUXR=0x4d;           //設置EXT16=1,使能16-BIT傳送模式

 IniHard();
 //DriveID();
 WriteCHS(0,0,0);
 WriteCommand(0x20);
 GetData();
 }