А сюда смотри если СОВСЕМ-СОВСЕМ тяжко :)

Misha v.3 15.05.2002 15:04

$allfields[$form:fields]

$text[^allfields.foreach[key;val]{$form:[$key]
}]

^text.save[ttt.txt]