работающий пример:

Larrikin 20.05.2004 01:21

@auto[]
@main[]
  ^use[sql.p]
  ^use[mysql.p]
  ^use[auth.p]
  ^use[lib.p]

  $MAIN:pSQL[^mysql::init[$SQL.connect-string]]
  ^MAIN:pSQL.server{
    $auth_data[^auth::init[$cookie:CLASS;$form:fields;$.csql[$MAIN:pSQL]]]
    ^header[]
    ^body[]
    ^footer[]
  }

@header[]
#Впишешь из уроков

@body[]

@body_additional[]
      ^login_form[]

@body_main[]

@footer[]

@login_form[]

^if($auth_data.is_logon){
                <p>
                        <b>Информация о пользователе:</b><br />
                        Логин: $auth_data.user.name<br />
                        Email: $auth_data.user.email<br />
                        Состоит в группах: ^auth_data.user.groups.menu{$auth_data.user.groups.name}[, ]<br />
                        Дата регистрации: $auth_data.user.dt_register<br />
                        Дата последнего логина: $auth_data.user.dt_logon
                </p>
                <a href="./profile.htm">Изменить параметры</a><br />
        ^rem{ *** выводим форму для логаута. если пользователь не залогинен форма показана не будет *** }
        ^auth_data.htmlFormLogout[$.target_url[./index.htm]]
  }{
      <font color=white>
    Введите имя и пароль
                ^auth_data.htmlFormLogon[$.target_url[./index.htm]]
                <a href="./profile.htm">Регистрация</a>
      </font>
  }