code forth
0 VALUE pl_h
0 VALUE siege
\ ...
: enter_wall ( -- )
pl? unless false exit then
player@ "Heading" p@ to pl_h
\ ...
VALUE - это переменная, общая для всех экземпляров Форта! Не пользовательская! Дальше - продолжать?
![:D :D](http://s.wrk.ru/s/biggrin.gif)
Используйте для локальных целей
UVALUE (сокращение от стандартного имени
USER-VALUE).
А, вообще, надо будет сделать локальные переменные слова на манер реализации в SPF.