fkt.asm

用于对TLC5615数模转换芯片进行控制

;*******************************
   DIN1 EQU     P1
   DIN2 EQU     P2
  SCLK  BIT     P3.0
   CS   BIT     P3.1
CONTROL BIT     P3.2
HEADER  EQU     0AAH
;*******************************
        ORG     00H
        LJMP    MAIN
        ORG     03H
        LJMP    READ_DATA
        ORG     100H
MAIN:   MOV     SP,#60h
        MOV     R2,#00
        CLR     SCLK          ;
        SETB    CS           ;
        SETB    IT0             ;INT0边沿触发
        MOV     IE,#81H


        SJMP    $
        RET

READ_DATA:
        MOV     R2,#04H
READ_DATA_0:
       ; JB      CONTROL,$
        MOV     A,P0
        CJNE    A,#HEADER,READ_DATA_0
        AJMP    READ_DATA_2
READ_DATA_01:
       ; DEC     R2
        ;CJNE    R2,#02H,READ_DATA_0
        DJNZ    R2,READ_DATA_0
READ_DATA_1:
        MOV     A,#00
        MOV     P0,#0FFH
        RETI
READ_DATA_2:
        CLR     SCLK
        CLR     CS
;12=0
        MOV     DIN1,#0
        MOV     DIN2,#0
        SETB    SCLK
        CLR     SCLK
;11=0
        MOV     DIN1,#0
        MOV     DIN2,#0
        SETB    SCLK
        CLR     SCLK
;10
NEXT0:  JB      CONTROL,$
        MOV     A,P0
        CJNE    A,#HEADER,NEXT
        SJMP    NEXT0
NEXT:   MOV     DIN1,A
        MOV     30H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;9
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     31H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;8
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     32H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;7
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     33H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;6
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     34H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;5
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     35H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;4
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     36H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;3
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN1,A
        MOV     37H,A
        JB      CONTROL,$
        MOV     A,P0
        MOV     DIN2,A
        SETB    SCLK
        CLR     SCLK
;2=0
        MOV     DIN1,#0
        MOV     DIN2,#0
        SETB    SCLK
        CLR     SCLK
;1=0
        MOV     DIN1,#0
        MOV     DIN2,#0
        SETB    SCLK
        CLR     SCLK
        SETB    CS   ;开始转换

        LJMP    READ_DATA_01

        END