APPLICATION EXAMPLES

8x 8 MULTIPLY-ASSEMBLED BY MCS-48 MACRO ASSEMBLER

SEE AP-49

I SIS-II

"CS-48/UPI-41 "ACRO

ASSE"BLER,

Y3 . •

LOC

OBJ

 

LI NE

 

SOURCE

STATE"ENT

 

 

I'In ;·1

"PY8X8:

 

 

 

1-

lSI

"PY8X8:

 

 

 

1- 151 ;1 "ULTIPLICAHOI15-8]:'8

1835

BAl8

I-

152

 

"oy

XA,188

 

 

1= 153 ;1 COUNT: -8

 

8137

BBIB

I'

154

;1

"oy

COUNT. 18

 

 

1=

155

REPEAT

 

 

 

I-

15i

"PYBLP:

 

 

 

I-

157

; 2

IF "UlTIPLICANOII]-B THEN BEGIN

8139

1243

1=

158

 

J8B

"PY8A

 

 

I-

15,

: 3

"UlTIPlICANO:'"UlTIPlICAHO/2

813B

2A

I-

Iii

 

XCH

A, XA

813C

'7

I-

Iii

 

ClR

C

8130

i7

I-

li2

 

RRC

A

Bl3E

2A

I-

li3

 

XCN

A, XA

Bl3F

i7

I-

li4

 

RRC

A

Bl48

EBl'

I'

165

 

OJ HZ

COUNT. "PULP

Bl42

83

I-

Ih

 

RET

 

 

 

1=

167

: 2

ELSE

 

 

 

I'

168

"PY8A:

 

 

 

I-

I"

:3

nUL T I PLI CANOl 15-8] : -nUL T IPLI CANDI 15- 81+"ULT I PLIER

8843

2A

I'

178

 

XCH

A, XA

8844

01

I'

t 71

 

AOO

A, IRI

8845

i7

I-

172

 

RRC

A

884'

2A

I-

173

 

XCN

A, XA

8847

67

1=

174

 

RRC

A

884B

EBl'

I-

175

 

OJ NZ

COUNT, "PULP

884A

83

I'

176

 

RE T

 

 

 

I-

177

: 3

nUlTIPllCAHO:="ULTIPLICAHD/2

 

 

I-

178

;2

ENOIF

 

 

 

I-

17'

: 2

COUNT: 'COUNT-l

 

 

I- 188 :1 UNTIL COUNT=8

 

 

1= 181 :1 END npY8X8

 

 

 

I'

182

$EJECT

 

5-27

Page 138
Image 138
Intel mcs-48 manual IIn ·1