clrscr_l.src

C51源码.其内文件包含spi

; CLRSCR_L.SRC generated from: CLRSCR_L.C

$NOMOD51

NAME    CLRSCR_L

;DPP     DATA    084H
P1      DATA    090H
DPL     DATA    082H
DPH     DATA    083H
B       DATA    0F0H
?PR?clrlcdram_L?CLRSCR_L SEGMENT CODE
?DT?clrlcdram_L?CLRSCR_L SEGMENT DATA
EXTRN   IDATA (a_bcolor_l)
PUBLIC  Clrlcdram_L

        RSEG  ?DT?clrlcdram_L?CLRSCR_L
?clrlcdram_R?BYTE:
p?02:                   DS  2

        RSEG  ?PR?clrlcdram_L?CLRSCR_L
        USING   0
Clrlcdram_L:
clrscr:
        push   6
        push   7
        push   dpl
        push   dph
        push   0
        mov    r6,  #195;#215
        mov    r7,  #45
		;
        ;mov    dpp, #0f7h
	
	SETB   p1.0
	CLR    P1.4
		;
        mov    dptr,#023FFH;#0FFFh
        mov    r0,#a_bcolor_l
        mov    a,@r0
        mov    b,a
        swap   a
        orl    a,b
clrloop:
	    movx   @dptr,a
        inc    dph
        djnz   r6,clrloop
        mov    dph,#23H;#0fh
        inc    dpl
        mov    r6,#195;#215
        djnz   r7, clrloop
		;
        ;mov    dpp,#0efh
	SETB   P1.4
	
        CLR    P1.0
		;
        pop    0
        pop    dph
        pop    dpl
        pop    7
        pop    6
        RET

        END