USER'S GUIDE

ORL

A,

B

 

MOV

B,

A

 

SJMP

HEX_LP

 

 

;

 

 

 

HEX_OUT:

 

 

 

MOV

B,

#2

 

OUT_LP:

 

 

 

SWAP

A

 

 

PUSH

ACC

 

 

ANL

A,

#0FH

 

CJNE

A, #10,

$+3

 

JC

HEX_OK

 

 

ADD

A,

#7

 

HEX_OK:

 

 

 

ADD

A,

#30H

 

LCALL

CHAR_OUT

 

 

POP

ACC

 

 

DJNZ

B,

OUT_LP

 

RET

 

 

 

;

 

 

 

TEXT_OUT:

 

 

 

PUSH

ACC

 

 

WT1:

 

 

 

CLR

A

 

 

MOVC

A,

@A+DPTR

 

INC

DPTR

 

 

JZ

WT2

 

 

LCALL

CHAR_OUT

 

 

SJMP

WT1

 

 

WT2:

 

 

 

POP

ACC

 

 

RET

 

 

 

;

 

 

 

CHAR_IN:

 

 

 

JNB

RI,

CHAR_IN

 

MOV

A,

SBUF

 

CLR

RI

 

 

RET

 

 

 

;

 

 

 

CHAR_OUT:

 

 

 

JNB

TI,

CHAR_OUT

 

MOV

SBUF,

A

 

CLR

TI

 

 

RET

 

 

 

;

 

 

 

RBYTE:

 

 

 

PUSH

MCON

 

; Save MCON register.

ORL

MCON,

#4

; Switch to PES.

MOVX

A,

@R0

; Read the register.

DEC

R0

 

; Decrement the pointer.

POP

MCON

 

; Restore MCON register.

RET

 

 

; Return.

;

 

 

 

WBYTE:

 

 

 

PUSH

MCON

 

; Save MCON register.

ORL

MCON,

#4

; Switch to PES.

MOVX

@R0,

A

; Read the register.

DEC

R0

 

; Decrement the pointer.

 

 

 

 

050396 161/173

 

 

 

162

Page 162
Image 162
Mitsubishi DS907x SIP, DS5000TK manual 162