|
;====================================================================
; Main.asm file generated by New Project wizard
;
; Created: 周一 10月 26 2020
; Processor: AT89C51
; Compiler: ASEM-51 (Proteus)
;====================================================================
$NOMOD51
$INCLUDE (8051.MCU)
;====================================================================
; DEFINITIONS
;====================================================================
;====================================================================
; VARIABLES
;====================================================================
;====================================================================
; RESET and INTERRUPT VECTORS
;====================================================================
; Reset Vector
org 0000h
jmp Start
;====================================================================
; CODE SEGMENT
;====================================================================
org 0100h
Start:
MOV R2,#10
MOV DPTR,#TAB
CLR P2.0 ;共陽極,清零讓全滅,并選定幾號數碼管
L1:MOV A,#0 ;0賦給A
MOVC A,@A+DPTR;
MOV R3,A
MOV P0,R3 ;將數據給到P0端口
LCALL ys1
INC DPTR
DJNZ R2,L1
TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
ys0:
mov r0,#200
L3:nop
nop
nop
djnz r0,L3 ;1ms
ret
ys1:mov r1,#250
L2:lcall ys0 ;2*1ms*250=0.5s
lcall ys0
djnz r1,L2
ret
;====================================================================
END
|
-
2.png
(163.53 KB, 下載次數: 47)
下載附件
2021-12-29 12:04 上傳
-
1.png
(161.64 KB, 下載次數: 60)
下載附件
2021-12-29 12:04 上傳
|