(华)课程设计
MOV A, 12H CJNE A, #00H,PP3 mov a, @r0 JZ L23
PP3: MOV 13H,#0FFH mov a, @r0 mov dptr,#date1 movc a,@a+dptr call write2
L23:INC R0 MOV A, 13H CJNE A, #00H,PP4 mov a, @r0 JZ L24
PP4: MOV 14H,#0FFH mov a, @r0 mov dptr,#date1 movc a,@a+dptr call write2
L24:INC R0 mov a, @r0 mov dptr,#date1 movc a,@a+dptr call write2 MOV A,15H
CJNE A, #00H,KHZ MOV A,#00H MOV dptr,#DANWEI1 JMP QUSHU
26
(华)课程设计
KHZ:MOV dptr,#DANWEI2
QUSHU:movc a,@a+dptr call write3 mov r5,#4 l3:mov a,#20h call write2 djnz r5,l3 ret
write2:
mov p0, a setb rs CLR rw clr e call delay setb e ret
write3: mov r1,#00h ;写数据 a2: mov a, r1
movc a, @a+dptr call write2 inc r1 cjne a,#00h,a2 ret delay:
mov r7, #255 d1: mov r6, #255 d2: djnz r6, d2 djnz r7, d1 ret
27
(华)课程设计
date: db \
date1: db 30h,31h,32h,33h,34h,35h,36h,37h,38h,39h DANWEI1: DB \ \ DANWEI2: DB \ \ XIAOSHUDIAN: DB \
28