標(biāo)題: 微電腦彩燈控制器程序 [打印本頁]

作者: 663776    時間: 2019-5-8 20:16
標(biāo)題: 微電腦彩燈控制器程序
; filename:GJ-05.ASM微電腦彩燈控制器程序清單

      ORG  0000H     ;程序入口地址
      AJMP MAIN      
      ORG 001BH      ;定時器T0中斷入口地址
      LJMP WT0
      ORG  30H
MAIN:MOV  SP,#50H    ;設(shè)置棧指針
      MOV20H,#0
      MOV P3,#0
      MOV  P1,#0
      MOV TH0,#6     ;T0中斷(方式2 常數(shù)自動裝入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
本帖需要重新編輯補全電路原理圖,源碼,詳細(xì)說明與圖片即可獲得100+黑幣(帖子下方有編輯按鈕)




歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1