skt.asm

实现对模数转化芯片TLC8032的控制逻辑

        CLK     BIT     P3.5
        CS      BIT     P3.7
        KDI     BIT     P3.6
        KD0     BIT     P1.0
        CONTROL BIT     P3.2
        HEADER  EQU     0AAH
        INPUT1  EQU     P1
        INPUT2  EQU     P2
        OUTPUT  EQU     P0

      ORG      0000H
      LJMP     START
      ORG      0000BH
      LJMP     INTIME0
      ORG      0100H
;*******************************************
;      程序起始
;*******************************************
START:
      MOV      SP,#60H
      MOV      TMOD,#22H       ;设置定时器2为方式2
      MOV      TL0,#06         ;定时125us
      MOV      TH0,#06
      ;MOV      INPUT,#0FFH
      MOV      P0,#0FFH
      MOV      P1,#00H
      MOV      P2,#00H
      MOV      P3,#0FFH
      SETB     EA
      SETB     ET0
      SETB     TR0
      SJMP     $
      RET
;****************************************************
;                ADC0832
;
;****************************************************
INTIME0:
 ;init the tlc0832
        SETB    KDI
        CLR     CLK
        CLR     CS
;Write "1"  ,The 1' pusle
        NOP
        SETB    CLK
        NOP
        NOP
        NOP
        CLR     KDI
        CLR     CLK
;Write "1" ,The 2' pusle
        SETB    KDI
        NOP
        NOP
        NOP
        SETB    CLK
        NOP
        NOP
        NOP
        CLR    KDI
        CLR    CLK
;Write "0" ,The 3' pusle
        NOP
        NOP
        NOP
        NOP
        SETB    CLK
        NOP
        NOP
        NOP
        NOP
        CLR     CLK
;同步信号
        MOV     OUTPUT,#HEADER  ;发送同步头
        CLR     CONTROL
        NOP
        SETB    CLK
        SETB    CONTROL
        NOP
;read data

        MOV     R7,#8
        ;MOV     R2,#55H
        ;SETB    CONTROL
WRITEUSB:
        SETB    CONTROL
        CLR     CLK
        ;MOV     A,R7  ;INPUT
        MOV     A,INPUT1
        MOV     OUTPUT,A
        CLR     CONTROL
        NOP
        NOP
        NOP
        ;SETB    CONTROL
        NOP
        NOP
        NOP
        ;MOV     A,#66H ;INPUT
        
        MOV      A,INPUT2
        NOP
        NOP
        NOP
        NOP
        SETB    CLK
        SETB    CONTROL
        ;JNB     CONTROL,$
        MOV     OUTPUT,A
        CLR     CONTROL
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        ;NOP

        ;JNB     CONTROL,$
        ;SETB    CONTROL
        DJNZ    R7,WRITEUSB
        SETB    CONTROL
        SETB    CS
        RETI

        END