VK6TT

\ to display a number on the 3 character display of the W1209 board
\ formatted xx.x ie one decimal place
\ using extract and digit ie existing words

: Clrdisplay 32 E7S 32 E7S 32 E7S 	;
: DIGIT [ $CC C, $88F1 , OVERT
: EXTRACT [ $CC C, $88FE , OVERT
: .dp 46 E7S ; 
: Clrdisplay 32 E7S 32 E7S 32 E7S 	;