Как сделать из 3333 так 3 333?

beavka 08.06.2007 15:01

Для счетчика посещений, чтобы отделять тысячи от остальных цифр и так далее.
Вот такой счетчик:

@counter[i_file_name][file_name;file;count]
^if(!def $i_file_name){^throw[counter;file_name not specified]}
$file_name[${i_file_name}.count]
^file:lock[${file_name}.lock]{
^try{
$file[^file::load[text;$file_name]]
$result[^eval($file.text)]
}{
$exception.handled(1)
$result(0)
}
$count[^eval($result+1)]
^count.save[$file_name]
}

такой его вызов:

@countit[]
^counter[/counter/counter]

---