@formRow.local[label;body] пара "описание поля"+"поле" в форме.
^ifdef[$label;
	<font size=-1><b>$label</b></font><br>
;
	<br>
]
$body<br><br>

@form.local[] HTML форма для отправки сообщения
<form method=post>
	<input type=hidden name=doInsert value=1>
	^macro[formRow.local;ваше имя:;<input name=name id=name size=20 value="^form[name]">]
	^macro[formRow.local;комментарии:;<textarea name=comment id=comment cols=15 rows=10>^form[comment]</textarea>]
	^macro[formRow.local;;<input type=submit value="отправить">]
</form>

@nav.local[] навигация по записям в книге для гостей
^context[nav;
	^ifdef[^var[total];;
		^sql[select count(id) from xgb]
		^var[total;^item[0]]
	]
	^var[i;0]
	<table border=0 cellpadding=3 cellspacing=0 width=100%><td bgcolor=eeeeee>
	<font size=-1>|
	^while[i<^var[total];
		^eq[^var[i];^var[start];
			<b>^eval[1+i]-^if[^eval[count+i]>^var[total];^eval[total];^eval[count+i]]</b>
		;
			<a href=./?start=^var[i]>^eval[1+i]-^if[^eval[count+i]>^var[total];^eval[total];^eval[count+i]]</a>
		]
		|
		^var[i;+;^var[count]]
	]
	</font>
	</td></table>
]

@main
^var[start;^number[start]]
^var[count;10]
^macro[server;
	^macro[html;;
		<p>Этот документ работает с&nbsp^;данными из&nbsp^;SQL таблицы&nbsp^;xgb*.</p>
		<p>Все&nbsp^;что&nbsp^;нужно сделать для&nbsp^;показа записей, это&nbsp^;выбрать их&nbsp^;(записи) из&nbsp^;таблицы (<b>select * from xgb</b>) и&nbsp^;пройтись по&nbsp^;ним&nbsp^;оператором <b>^^menu[]</b>.</p>
		<p>Если мы&nbsp^;хотим выдавать записи пачками по&nbsp^;<b>n</b>, то&nbsp^;SQL&nbsp^;запрос придется немного усложнить (<b>select * from xgb limit s,n</b>) и&nbsp^;озаботиться построением навигационной линейки, с&nbsp^;помошью которой нужно будет передавать параметр документу (с&nbsp^;какой записи начинать выборку).</p>
		<p>С&nbsp^;записью данных в&nbsp^;таблицу тоже все&nbsp^;достаточно просто: <b>^^sql[insert into xgb ...]</b>. Нужно только угадать момент, когда пользователь отправил данные на&nbsp^;сервер. Сделать это&nbsp^;можно по-разному. Я&nbsp^;в&nbsp^;данном случае вставил элемент в&nbsp^;форму <b>&lt^;input type=hidden name=doInsert value=1&gt^;</b> и&nbsp^;отслеживаю наличие &nbsp^;параметра <b>doInsert</b> (<b>^^ifdef[^^form[doInsert];...]</b>).</p>
		<hr size=1 noshade>
		<p>* Код для&nbsp^;создания SQL&nbsp^;таблицы&nbsp^;xgb:</p>
		<p>create table xgb (<br>
			id int not null auto_increment primary key,<br>
			published datetime,<br>
			name varchar(50),<br>
			comment text)</p>
	;
		^ifdef[^form[doInsert];
			^context[tmp;
				^sql[insert into xgb (
					published,
					name,
					comment
				) values (
					now(),
					'^form[name]',
					'^form[comment]'
				)]
			]
		]
		^macro[form.local]
		^macro[nav.local]
		^context[records;
			^sql[select date_format(published, '%d.%m.%Y %H:%i') as fpublished, name, comment from xgb order by published desc limit ^var[start],^var[count]]
			^menu[
				<p><font size=-1><b>^item[name]</b> (^item[fpublished])</font><br>
				^item[comment]</p>
				^eq[^item[count];^item[number];;<hr size=1>]
			]
		]
		^macro[nav.local]
	]
]