mov dptr,#04h
mov a,#1
movx @dptr,a
mov dptr,#02h
mov a,#2
movx @dptr,a
mov dptr,#00h
mov a,#3
movx @dptr,a
mov dptr,#0bh
mov a,#22h
movx @dptr,a
mov dptr,#0ah
mov a,#20h
movx @dptr,a
RET
;..............................
RD187:
clr cs12c
mov dptr,#0ah
movx a,@dptr
jb acc.7,rd187
mov dptr,#04h
movx a,@dptr
mov 40h,a
mov dptr,#02h
movx a,@dptr
mov 41h,a
mov dptr,#00h
movx a,@dptr
mov 42h,a
SETB CS12C
RET