;;10位串行輸出D/A轉換器TLC5615
;;


           ORG   0500H
           DIN BIT  P1.4         ；定義I/O口
           SCLK BIT  P1.7
           D/A_CS BIT  P1.5
           DOUT BIT  P1.6
           DA_DATAH  EQU 30H     ;定義D/A的數據區
           DA_DATAL  EQU 31H
   TLC5615:CLR D/A_CS              ；；設置CS 為低電平
           ACALL    A_DELAY2       ；延時
           MOV R6,#08H
C_DA_LOOH:LCALL  A_DELAY2
          MOV A,DA_DATAH   ；裝入高八位
          RLC A            ；從最高位D/A寄存器中移
          MOV DIN,C
          SETB SCLK
          MOV  DA_DATAH,A
          ACALL    A_DELAY2
          CLR  SCLK
          DJNZ R6,C_DA_LOOH
          MOV R6,#08H           
C_DA_LOOL:MOV A,DA_DATAL      ；裝入低八位
          RLC A
          MOV DIN,C
          SETB SCLK
          MOV  DA_DATAL,A 
          LCALL  A_DELAY2                  
          CLR  SCLK
          DJNZ R6,C_DA_LOOL
          SETB D/A_CS
          RET