Converting Dec word to Hex string

[paul borgmeier]

digits var byte[5]
x var byte
y var word
y = 12345

for x = 0 to 4
	digits[x]= (y dig x) +$30 ' find digit & convert to ASCII
next x
end

' digits[0]=$35
' digits[1]=$34
' digits[2]=$33
' digits[3]=$32
' digits[4]=$31