西工大电子实习程序.txt
《西工大电子实习程序.txt》由会员分享,可在线阅读,更多相关《西工大电子实习程序.txt(6页珍藏版)》请在冰点文库上搜索。
ORG0000H
LJMPSTART
ORG0030H
START:
NOP
;0
MOVR3,#08H
MOVA,#0FEH
AX0:
MOVP1,A
RLA
LCALLDELAY
NOP
DJNZR3,AX0
;1
MOVA,#0FEH
AX10:
MOVR3,#08H
AX11:
MOVP1,A;дP1��
RLA;ѭ������
LCALLDELAY;��ʱ
NOP
DJNZR3,AX11
RR A
MOVR4,#07H
AX12:
RR A
MOVP1,A
LCALLDELAY
NOP
DJNZR4,AX12
MOVA,#0FDH
;2
MOVR3,#0E7H
MOVR4,#0FEH
AX20:
MOVR5,#07H
AX21:
MOV A,R3
ANLA,R4
MOVP1,A
LCALLDELAY
MOVA,R4
RLA
MOVR4,A
DJNZ R5,AX21
MOVR6,#07H
AX22:
MOVA,R3
ANLA,R4
MOVP1,A
LCALLDELAY
MOVA,R4
RRA
MOVR4,A
NOP
DJNZ R6,AX22
;3
AX30:
MOVR3,#0FEH
MOVR4,#7FH
MOVR5,#08H
AX31:
MOVA,R3
ANLA,R4
MOVP1,A
MOVA,R3
RLA
MOVR3,A
MOVA,R4
RRA
MOVR4,A
LCALLDELAY
DJNZR5,AX31
;4
MOV R3,#0FEH
MOVR4,#0FEH
MOVR5,#08H
MOVR6,#08H
AX41:
MOVA,R3
ANLA,R4
MOVR3,A
MOVP1,A
MOVA,R4
RLA
MOVR4,A
LCALLDELAY
DJNZR5,AX41
MOVR4,#80H
AX42:
MOVA,R3
ORLA,R4
MOVR3,A
MOVP1,A
MOVA,R4
RRA
MOVR4,A
LCALLDELAY
DJNZR6,AX42
;50
MOV R3,#0FFH ;����ѭ���ϴν����¼��
MOVR5,#8H ;һ�������
MOVR6,#8H ;���������
MOVR7,#8H
AX51:
MOVR4,#7FH
AX52:
MOVA,R4
RLA
MOVR4,A
ANLA,R3
MOVP1,A
LCALLDELAY
DJNZR5,AX52
MOVR3,A
DECR7
MOVR5,R7 ;����һ�������
DJNZR6,AX51
;51
MOV R6,#08H
MOV R3,#00H
AX520:
MOV R5,R6
MOV R4,#01H
AX521:
MOV A,R4
ORL A,R3
MOV P1,A
LCALLDELAY
MOV A,R4
RL A
MOV R4,A
DJNZ R5,AX521
RR A
ORL A,R3
MOV R3,A
DJNZ R6,AX520
;6
MOVR3,#0FEH ;������
MOVR4,#0FEH;RL��
MOVR5,#1H ;Сѭ����֮��
MOVR6,#0H ;Сѭ����
MOVR7,#8H ;��ѭ����
AX60:
MOVR6,R5
MOVA,R5
INCA
MOVR5,A
MOVR4,#0FEH
AX61:
MOVA,R3
ANLA,R4
MOVP1,A
MOVA,R4
RLA
MOVR4,A
LCALLDELAY
DJNZR6,AX61
MOVA,R3
RLA
MOVR3,A
DJNZR7,AX60
;7
MOVA,#0FH
MOVR3,#0FH
AX7:
MOVP1,A
RRA
LCALLDELAY
DJNZR3,AX7
;8
MOVR3,#0F0H
MOVA,#0FH
MOVR4,#8H
AX8:
MOVP1,A
XCHA,R3
LCALLDELAY
DJNZR4,AX8
LJMPSTART
DELAY:
MOVR0,#01H;��ʱ�ӳ���
DELAY1:
MOVR1,#00H
DELAY2:
MOVR2,#0B2H
DJNZR2,$
DJNZR1,DELAY2
DJNZR0,DELAY1
RET
END