А можно, опять таки, посмотреть с другой стороны: почему вы все используете строку с нулевым оканчанием, а?

иногда нормальные мысли предлагал (правда я уже не помню где)

ну, и что выглядит проще?

: to-str \ addr g m d h m s -- addr
7 REVERSE
DUP >R
6 >R
BEGIN
R@ WHILE
SWAP usign num>s{ >R OVER R@ MOVE R> + }num
-1 RP@ +!
REPEAT
RDROP
S" .dat" >R OVER R@ MOVE R> +
0!
R>
;

: TEST
1000 ALLOCATE THROW
0x0A BASE KEEP!
gmdhms
to-str
;

При этом легко сделать универсальную реализацию для подобных ситуаций. Были б они ещё

Разве он писал по тому вопросу, который ты задал?

И, главное, у вас нет формализованного синтаксиса, который вы заменяете и который достаточно удобен, если уметь пользоваться.

Ну часто нужен показанный код, а? Поэтому и синтаксиса нет за ненадобностью.

Если уж мне понадобится, что-то похожее для конкретной задачи.
Я сделаю так:

: TEST 6 REVERSE 10 BASE KEEP! R:STR 1000 "{un}{un}{un}{un}{un}{un}.dat" SWAP EXECUTE ;
Самый, блин, короткий и высокоуровневый вариант в моём арсенале.

То есть, кроме решения задачи еще и парсер делать будете?

Учебный форт, в моем понимании, это грамотно написанный проект.
Первое, что бы были видны все структуры.
Это еще и методичка, для создания своих фортов.
Поскольку, разумеется, реализуется не на ассемблере, то естественно должны быть проработаны
затруднения, которые возникнут при реализации на языках высокого уровня.
Например, память может представлять не массив байт, а массив 2 или 4 байтовых слов.
И как хранить строки в словарях и тд.

После реализации и подключения к какому-нибудь проекту на языке высокого уровня,
"учебный форт" становится боевым.
На нем можно писать внутрипрограммные скрипты, в таких проектах производительность
скриптов как правило не важна.

1. Нужна полноценная ВФМ? (точнее, нужен ли стек возвратов?)

2. Команды для общения с внешней средой должны быть "статическими"? Т.е. EMIT допустим как примитив.