This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
\ 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 ; |