Encoding a Value as BCD (a = bcd[b])

It converts the value of b to BCD code and loads it into variable a.

Example:

(#1 = 1234)

(IT CONVERTS VARIABLE #1 TO THE BCD NUMBER SYSTEM)

(AND LOADS IT INTO #0)

G65 L25 P#0 Q#1

(IT CONVERTS VARIABLE #1 TO THE BCD NUMBER SYSTEM)

(AND LOADS IT INTO #0)

#0 = BCD[#1]

(#0 WILL BE 0000 0000 0000 0000 0001 0010 0011 0100)