标题: 微电脑彩灯控制器程序 [打印本页]

作者: 663776    时间: 2019-5-8 20:16
标题: 微电脑彩灯控制器程序
; filename:GJ-05.ASM微电脑彩灯控制器程序清单

      ORG  0000H     ;程序入口地址
      AJMP MAIN      
      ORG 001BH      ;定时器T0中断入口地址
      LJMP WT0
      ORG  30H
MAIN:MOV  SP,#50H    ;设置栈指针
      MOV20H,#0
      MOV P3,#0
      MOV  P1,#0
      MOV TH0,#6     ;T0中断(方式2 常数自动装入8位定时器)
      MOV TL0,#6
      MOV TMOD,#02H
      SETB EA
      SETB ET0
      SETB TR0
M:    MOVP3,#01H
      MOV P1,#0FFH
      JNB 08H,$
      CLR 08H
      MOV P3,#00H
      MOV P1,#00H
      JNB 08H,$
      CLR 08H
      ACALL DSP
      AJMP M
WT0:  PUSH ACC
      PUSH PSW
      INC21H
      MOVA,21H
      CJNEA,#200,TORETI
      MOV21H,#0
      INC22H      
      MOVA,22H
      CJNEA,#10,TORETI    ;1s
      MOV22H,#0        
      SETB08H         
TORETI:POPPSW
       POP ACC
       RETI
DSP:  SETB 00H
      MOV  P1,20H
      MOVP3,#1
      JNB 08H,$
      CLR 08H
      SETB 01H
      MOV  P1,20H
      JNB 08H,$
      CLR 08H
      SETB 02H
      MOV  P1,20H
      JNB 08H,$
      CLR 08H
      SETB 03H
      MOV  P1,20H
      JNB 08H,$
      CLR 08H
      SETB 04H
      MOV  P1,20H
      JNB 08H,$
      CLR 08H
      SETB 05H
      MOV  P1,20H
      JNB 08H,$
      CLR 08H
      SETB 06H
      MOV  P1,20H
      JNB 08H,$
      CLR 08H
      SETB 07H
      MOV  P1,20H
      MOV 20H,#0
      RET
      END

作者: admin    时间: 2019-5-8 23:39
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)




欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1