'ASCII digit to integer conversion (positive values only)
'Programmed by Jeffry Johnston, 2005
1[1?,1~10:2,0+*0,2=*0,0+*0,0+*0,0+*2,0+*1,0-48]1
2[0#]0