LCALL DP_LINE_HZ MOV DPTR,#COMW MOV A,#90H LCALL RFG MOVX @DPTR,A MOV DPTR,#TAB_HZ2 LCALL DP_LINE_HZ LCALL DEL_1S
MOV DPTR,#TAB_BMP1 LCALL BMP LCALL DEL_1S LCALL BMP_BLACK LCALL DEL_1S
MOV DPTR,#TAB_BMP2 LCALL BMP LCALL DEL_1S MOV DPTR,#TAB_BMP3 LCALL BMP LCALL DEL_1S LJMP MAIN DP_HZ: CLR A
MOVC A,@A+DPTR INC DPTR PUSH DPL PUSH DPH MOV DPTR,#DAT LCALL RFG MOVX @DPTR,A POP DPH POP DPL CLR A
21
MOVC A,@A+DPTR INC DPTR PUSH DPL PUSH DPH MOV DPTR,#DAT LCALL RFG MOVX @DPTR,A POP DPH POP DPL RET
DP_LINE_HZ: MOV R7,#32 NT_HZ: CLR A
MOVC A,@A+DPTR INC DPTR PUSH DPL PUSH DPH MOV DPTR,#DAT LCALL RFG MOVX @DPTR,A POP DPH POP DPL DJNZ R7,NT_HZ RET BMP:
PUSH DPL PUSH DPH MOV R7,#64 MOV A,#80H MOV DPTR,#COMW LCALL RFG
22
MOVX @DPTR,A MOV A,#20H MOV DPTR,#DAT CLS:
LCALL RFG MOVX @DPTR,A DJNZ R7,CLS MOV DPTR,#COMW MOV A,#34H LCALL RFG MOVX @DPTR,A MOV A,#36H LCALL RFG MOVX @DPTR,A MOV Y_V,#80H MOV R6,#32 NEXT_LINE1: MOV R7,#32
MOV A,Y_V;#80H;;;;;;;;;;;;;;;;;;;;;;;YYY LCALL RFG MOV DPTR,#COMW MOVX @DPTR,A MOV A,#80H LCALL RFG MOVX @DPTR,A
NEXT_LINE: POP DPH POP DPL MOV A,#3EH MOVC A,@A+DPTR INC DPTR PUSH DPL PUSH DPH
23
MOV DPTR,#DAT LCALL RFG MOVX @DPTR,A DJNZ R7,NEXT_LINE INC Y_V
DJNZ R6,NEXT_LINE1 POP DPH POP DPL RET
BMP_BLACK: PUSH DPL PUSH DPH MOV R7,#64 MOV A,#80H MOV DPTR,#COMW LCALL RFG MOVX @DPTR,A MOV A,#20H MOV DPTR,#DAT CLS1:
LCALL RFG MOVX @DPTR,A DJNZ R7,CLS1
MOV DPTR,#COMW MOV A,#34H LCALL RFG MOVX @DPTR,A MOV A,#36H LCALL RFG MOVX @DPTR,A MOV Y_V,#80H MOV R6,#32
24
