test.asm

学林电子实验箱源码 完整板

;轮流显示数字和流水灯。
;***************************************************************************
;*  [e-mail]		     (51c51 test web)     www.8951.com     *
;*  Create by :石学军      www.51c51.com 更多例程请登陆网站        	   *
;***************************************************************************
org	0000h
ajmp	loop
org	0030h
loop:
mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#28h
clr p1.0
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#7eh
clr p1.1
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#0a2h
clr p1.2
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#62h
clr p1.3
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#74h
clr p1.4
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#61h
clr p1.5
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#21h
clr p1.6
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay

mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh
mov p0,#7ah
clr p1.7
clr p2.3
lcall delay
clr p2.4
lcall delay
clr p2.5
lcall delay
clr p2.6
lcall delay
mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh


mov p0,#0ffh
mov p1,#0ffh
mov p2,#0ffh

AJMP LOOP
DELAY:
CLR P3.3
MOV  R7,#255
D1:MOV R6,#255
setb p3.3
D2: DJNZ R6,D2
clr p3.3
DJNZ R7,D1
SETB P3.3
RET
END