create a named marker that you can use to
running the created word will reset the dict/order variables
to the state at the creation of this name.
: (MARKER) (CREATE) HERE , GET-ORDER DUP , 0 DO , LOOP etc...
DOES> DUP @ (FORGET) CELL+ DUP CELL+ SWAP @ SET-ORDER etc...
core ordinary primitive