Вроде разобрался, но появился другой вопрос..

osatuk 15.08.2004 20:45

Для начала, грубо, получилась следующая функция:

@find[f;t][tbl]
$tbl[^table::sql{select * from tower where _from = $f}]
^if($f == $t){$ok[1]}
^if($ok == 0){
^tab.append{$f}
  ^tbl.menu{
    ^if(!^tab.locate[old;$tbl._to]){
    ^find[$tbl._to;$t]}
  }
}

, но вопрос в том, как сохранить только правильный путь и отбросить ветви приводящие в тупик?
Да, комнат всего 60, а не 12 как в примере, так что есть тупики..

---