S5-95U, Second Serial Interface
ASCII Driver
FB4
STL
Description
NAME :DU>ASCII
Converter Binary number to ASCII number
BEZ :DUAL E/A/D/B/T/Z: E BI/BY/W/D: W
BEZ :A-TH E/A/D/B/T/Z: A BI/BY/W/D: W
BEZ :A-ZE E/A/D/B/T/Z: A BI/BY/W/D: W
:L KB 0
Delete auxiliary register
:T FW 240
:T FW 242
:T FW 244
Residual value register
:
:L =DUAL
Load binary number (area 0-9999)
:L KF +9999
:>F
:BEC
:TAK
SUBT :L KF +1000
Evaluation of thousands
:>=F
:JC =TAUS
Jump to processing thousands
:TAK
SUBH :L KF +100
Evaluation of hundreds
:>=F
:JC =HUND
Jump to processing hundreds
:TAK
SUBZ :L KF +10
Evaluation of tens
:>=F
:JC =ZEHN
Jump to processing tens
:JU =EINE
Jump to processing units
:
TAUS :-F
:T FW 244
:L FY 240
:ADD KF +1
:T FY 240
Increment thousands count register
:TAK
:JU =SUBT
Jump to processing thousands
:
HUND :-F
:T FW 244
:L FY 241
:ADD KF +1
:T FY 241
Increment hundreds count register
:TAK
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a
EWA 4NEB 812 6095-02
4-21