@auto[] $targets[^table::create{name value}] ^targets.append{target_travel ^lang[Travel;Путешествие]} ^targets.append{target_marriage ^lang[Marriage;Замужество]} ^targets.append{target_communication ^lang[Communication;Общение]} ^targets.append{target_friendship ^lang[Friendship;Дружба]} $maxYear(50) $indexLimit(10) $postURL[] ^if($form:action eq 'unsubscribe' && ^form:user_id.int(0) && def $form:key){ ^if(!$user || $user.id ne $form:user_id){ ^connect[$connect_string]{ $t_user[^table::sql{select id, pass, email from users where id='$form:user_id' and md5(concat(id,'_',regdate))='$form:key'}] } ^if($t_user){ $cookie:email[ $.value[$t_user.email] $.domain[$domain_main] $.expires[session] ] $cookie:pass[ $.value[^math:md5[${t_user.pass}_${t_user.id}]] $.domain[$domain_main] $.expires[session] ] ^Site:302[/?action=$form:action&user_id=$form:user_id&key=$form:key^if(def $form:category){&category=$form:category}] }{ ^Site:302[/] } }{ ^if($form:key eq ^math:md5[${user.id}_$user.regdate]){ ^connect[$connect_string]{ ^if(def $form:category){ ^void:sql{update users set send_notification_categories=replace(send_notification_categories, '|$form:category|', '|') where id='$user.id'} }{ ^void:sql{update users set send_notification_categories=replace(send_notification_categories, '|dialog|', '|') where id='$user.id'} } ^Users:action_cache_delete[$user.id] } $postURL[?action=unsubscribe] } } } ^if($user){ ^use[/blank.p] ^Site:302[^Users:getUri[$user.id;$user.type;$.uri[$seo_uri_uri] $.age($user.birth_age) $.name[$user.name]]$postURL] } @getNewList[] $result[^table::sql{ select ^GirlsList:getFileds[] from users where active='Y' and verify='Y' and type='W' and is_deleted = 0 and chat_admin = 0 order by regdate desc limit 3 }] @getBestList[][locals] $result[^table::sql{ select ^GirlsList:getFileds[] from users where active='Y' and verify='Y' and type='W' and is_deleted = 0 and chat_admin = 0 and last_visit > (now() - interval 7 day) order by rand() limit 3 }] @getAllList[][locals] $not_ids[^form:not_id.split[,]] $sql[active='Y' and verify='Y' and type='W' and is_deleted = 0 and chat_admin = 0 ^if($form:camera eq '1'){and is_webcam='Y'} ^if($form:online eq '1'){and is_online = 1} ^if($form:new eq '1'){ $newUserDate[^date::create[^now.sql-string[]]] ^newUserDate.roll[day](-5) and regdate>='^newUserDate.sql-string[]' } ^targets.menu{ ^if($form:[$targets.name] eq '1'){and $targets.name='Y'} } ^if(^form:age_min.int(18)>18){ and TIMESTAMPDIFF(YEAR,birth,curdate())>='^form:age_min.int(0)' } ^if(^form:age_max.int($maxYear)<$maxYear){ and TIMESTAMPDIFF(YEAR,birth,curdate())<='^form:age_max.int(0)' } ^if($not_ids){ and id not in (^not_ids.menu{'$not_ids.piece'}[,]) } ] $result[^table::sql{ select ^GirlsList:getFileds[] from users where $sql order by id desc limit ^eval($indexLimit+1) }] @b[] ^if($MAIN:domain_main eq $MAIN:main_domain_name){ $MAIN:sTitle[^lang[$SEO.meta_title_index_en;$SEO.meta_title_index_ru]] $MAIN:sKeywords[^lang[$SEO.meta_keywords_index_en;$SEO.meta_keywords_index_ru]] $MAIN:sDescription[^lang[$SEO.meta_description_index_en;$SEO.meta_description_index_ru]] }{ $MAIN:sTitle[^lang[Victoriya.Club Dating Site;Victoriya.Club Dating Site]] $MAIN:sKeywords[] $MAIN:sDescription[^lang[Meet Slavic Ladies;Meet Slavic Ladies]] } $sBodyClass[index-page]
^lang[$data.years_en;$data.years_ru]
^lang[$data.address_en;$data.address_ru]