CHAR
* CHAR ( 'word' -- value )

return the (ascii-)value of the following word's
first character.

FORTH/ANS core (dpANS.6.1.0895) ordinary primitive