Filter
Top Products
APPENDIX
BENCHMARK:
Block
Translate
PROCESSOR:
I
nte
1 i
APX
88
REGISTER
USAGE
AL
ACCUMULATOR
BX
TRANSLATE
TABLE
POINTER
CX
-
COUNT
SI
EBCBUF
POINTER
01
-
ASCIBUF
POINTER
Bytes
Cycles
4 8
LEA
BX,
TABLE
;Initialize
Table
Pointer
4 8
LEA
S
I,
EBCBUF
;Initialize
EBCDIC
Pointer
4 8
LEA
01,
ASCIBUF
;Initialize
ASCII
Pointer
4
18
MOv
CX,
COUNT
;Initialize
COUNT
1
~
CLD
;Clear
direction
flag
16
NEXT:
LODS
EBCBUF
;Read
EBCDIC
character
15
XlAT
TABLE
;Translate
to
AS
C I I
15
STOS
ASCIBUF
;Store
translated
byte
~
3
CMP
AL,EOL
;Comp?re
with
terminator
~
19/5
LOOPNE
NEXT
;Loop
unless
AL=EOL
or
ex
=0
~4
bytes
of
code
10
lines
of
code
15
AFN-01664A