/***************************/
/* 繪點函數W_DOT           */
/* 函數調用入口： W_DOT()  */
/* 函數參數：PARA          */
/* 函數輸入變量：O_X,O_Y   */
/***************************/
W_DOT(int O_X,int O_Y)
  {
    unsigned char i,j,dat;
    unsigned int k;
      j=PARA;
      i=O_X%8;
      O_X=O_X/8;
      k=j*O_Y+O_X;
      wcadd1=0x4f;
      wcadd1=0x46;   /* 設置光標地址 */
      wdadd1=k%256;  /* 計算光標地址 */
      wdadd1=k/256;
      if(i==0)O_Y=0x80;
        else
          {
             O_Y=1;
            for(;i<7;i++)  /* 計算顯示位 */
              {
                O_Y=O_Y*2;
              }
           }
       wcadd1=0x43;  /* MREAD 代碼 */
       dat=rdadd1;   /* 讀取當前顯示數據 */
       wcadd1=0x46;  /* 設置光標地址 */
       wdadd1=k%256; /* 計算光標地址 */
       wdadd1=k/256;
       wcadd1=0x42;  /* MWRITE 代碼 */
       wdadd1=dat|O_Y;  /* 寫入合成數據 */
  }