HEX HERE HIWORD
HEX
* HEX ( -- )

set the input/output BASE to hexadecimal 
 simulate:        : HEX 16 BASE ! ;

FORTH/ANS core (dpANS.6.2.1660) ordinary primitive