qicai.txt

来自「七彩多变彩灯控制器」· 文本 代码 · 共 3,022 行 · 第 1/5 页

       LCALL W0 ;第二个IC数据输入
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W1
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR    EN_595   ; 使能器件595输出
       MOV    R5,#10
       CALL   DELAY1

       SETB  EN_595
       LCALL W0
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W2
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       SETB  EN_595
       LCALL W0
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W3
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       SETB  EN_595
       LCALL W0
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W4
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       SETB  EN_595
       LCALL W1
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W4
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       SETB  EN_595
       LCALL W2
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W4
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       SETB  EN_595
       LCALL W3
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W4
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       SETB  EN_595
       LCALL W4
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       LCALL W4
       CLR   STCP_595 ;把数据输入脚置低电平
       NOP
       NOP
       SETB  STCP_595 ;上升沿将数据送到输出锁存器
       NOP
       NOP
       NOP
       CLR   EN_595
       MOV   R5,#10
       CALL  DELAY1

       RET
;--------------------------------------------------

;----------------------------

W0:
       MOV   STATE0,#0FFH
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595


       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       RET
;------------------------------------------------------------------------------------------

W1:
       MOV   STATE0,#0FFH
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595


       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSG_595,C
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSR_595,C
       CPL   C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       RET
;-------------------------------


;------------------------------------------------------------------------------------------

W2:
       MOV   STATE0,#0FFH
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595


       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSG_595,C
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSR_595,C
       CPL   C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSG_595,C
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSR_595,C
       CPL   C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       RET
;-------------------------------



;------------------------------------------------------------------------------------------

W3:
       MOV   STATE0,#0FFH
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595


       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       CPL   C
       MOV   DSG_595,C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSG_595,C
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSR_595,C
       CPL   C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      
       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSG_595,C
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSR_595,C
       CPL   C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595
      

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSG_595,C
       CPL   C
       MOV   DSR_595,C
       MOV   DSB_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       MOV   A,STATE0
       RLC   A
       MOV   STATE0,A
       MOV   DSR_595,C
       CPL   C
       MOV   DSB_595,C
       MOV   DSG_595,C
       SETB  SGCP_595 ;上升沿发生移位
       NOP
       NOP
       CLR   SGCP_595

       RET
;-------------------------------


;----------------------------

W4:
       MOV   STATE0,#0FFH
      
       MOV   A,STATE