/*************************************/
/*直接訪問方式的驅動函數(MGLS12864)  */
/*************************************/
/* 直接驅動子程序由6個函數組成：
   占用系統(tǒng)接口資源:
  CWADD1,CRADD1,DWADD1,DRADD1
  CWADD2,CRADD2,DWADD2,DRADD2
   程序輸入變量：COM 或 DAT1         */
/*------ 判“忙”函數 (左)---------*/
BUSY1()
        {
           do
              {
                 ACC=cradd1;                 /*  讀狀態(tài)字  */
              }
           while (ACC_7==1);                 /*  判“忙”標志  */
        }
/*------  寫指令函數(左)  ---------*/
PR1()
        {
           busy1();                          /*  判忙  */
           cwadd1=com;                       /*  寫指令(左)  */
        }
/*------  寫數據函數(左)  ----------*/
PR2()
        {
           busy1();
           dwadd1=dat1;                       /*  寫顯示數據(左)  */
        }
/*------ 讀數據函數（左） ----------*/
PR3()
        {
          busy1();
          dat1=dradd1;
        }
/*=====  判“忙”函數 (右) ==========*/
BUSY2()
        {
           do
              {
                 ACC=cradd3;                /*  讀狀態(tài)字  */
              }
           while (ACC_7==1);                /*  判“忙”標志  */
        }
/*----- 寫指令函數(右)  -------------*/
PR4()
        {
           busy2();                         /*  判忙  */
           cwadd2=com;                      /*  寫指令(右)  */
        }
/*-----  寫數據函數(右) -------------*/
PR5()
        {
           busy2();			     /* 判忙  */
           dwadd3=dat1;                      /*  寫顯示數據(右)  */
        }
/*-----  讀數據函數（右）------------*/
PR6()
        {
          busy2();
          dat1=dradd2();
        }