Ответ

Cep}|{ 28.09.2002 11:23

@counter[]
^if(!def $cookie:counter){
	$cookie:counter[
		$.value[ip]
		$.expires(1)
	]
	$c[^table::load[counter.txt]]
	# всего
	$total[^eval($c.total+1)]
	# сегодня
	$now[^date::now[]]
	^if($c.day == $now.day){
		$today[^eval($c.today+1)]
		$day[$c.day]
	}{
		$day[$now.day]
		$today[1]
	}
	$newc[^table::create{total	today	day
$total	$today	$day}
	]
	^newc.save[counter.txt]	
	$result[$newc]
}{
	$c[^table::load[counter.txt]]
	$result[$c]
}