; ( n -- ) Dictionary ; R( -- ) ; compile 16 bit into flash at here. VE_COMMA: .db $01, $2c ; , .dw VE_HEAD .set VE_HEAD = VE_COMMA XT_COMMA: .dw DO_COLON PFA_COMMA: .dw XT_HERE .dw XT_ISTORE .dw XT_DP .dw XT_EFETCH .dw XT_1PLUS .dw XT_DP .dw XT_ESTORE .dw XT_EXIT