clrscr_b.src

C51源码.其内文件包含spi

; CLRSCR_R.SRC generated from: CLRSCR_R.C

$NOMOD51

NAME    CLRSCR_B

;DPP     DATA    084H
P1      DATA    090H
DPL     DATA    082H
DPH     DATA    083H
B       DATA    0F0H
?PR?clrlcdram_B?CLRSCR_B SEGMENT CODE
?DT?clrlcdram_B?CLRSCR_B SEGMENT DATA
EXTRN   IDATA (a_bcolor_r)
PUBLIC  Clrlcdram_B

        RSEG  ?DT?clrlcdram_B?CLRSCR_B
?clrlcdram_B?BYTE:
p?02:                   DS  2

        RSEG  ?PR?clrlcdram_B?CLRSCR_B
        USING   0
Clrlcdram_B:
clrscr:
        push   6
        push   7
        push   dpl
        push   dph
        push   0
        mov    r6,  #195
        mov    r7,  #163
		;
        
	SETB   P1.0
	CLR    P1.4
		;
        mov    dptr,#23FFH;#0f2ch
        mov    r0,#a_bcolor_r
        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