edjs.asm

早期开发的MS8051与PC的RS232通讯-1程序源码

;
;-----dvcc51系统软件手册------
;---------               末页
;                             
        org     0000h
        ljmp    9a00h
        org     9a00h
        mov     sp,#54h         ;设栈底
        mov     r0,#2bh         ;8255控制口
        mov     a,#0b0h         ;\送控制字
        movx    @r0,a           ;
        mov     a,#08h          ;
        mov     @r0,a           ;00001000b送RAM
        mov     r1,#28h         ;28H送寄存器R1
        movx    a,@r1           ;读8255A口(数据)
        mov     r0,#2ah         ;8255C口送R0
start:  acall   shou            ;转9A29
        cjne    a,#0ffh,la18    ;比较;不等255转9A18,等则跳出
        ljmp    0ff77h
la18:   mov     dph,a           ;9A18子程序,收的第一字节作高位
        acall   shou            ;再收,
        mov     dpl,a           ;第二字节作低8位
        acall   shou            ;收数据
        acall   fang            ;放数据到@DPTR
        acall   fang
        movx    @dptr,a
        sjmp    start
fang:   movx    @dptr,a         ;9A27
        inc     dptr            ;DPTR+1
shou:   movx    a,@r0           ;9A29子程序,读C口(2AH)进A
        jnb     e5h,shou        ;直接位不置位转
        movx    A,@R1           ;读8255A口(数据)
        RET
        END