@BITS @ @EXECUTE
@BITS
* @BITS ( addr mask -- value )

see the companion word !BITS 
 simulate:
   : @BITS  SWAP @ AND ;

FORTH/FORTH forth_83 ordinary primitive