Просмотр полной версии : секс тест
Нужен скриптик такого теста
http://www.3porosenka.ru/cgi-bin/humor/sex-test.pl?f=885297
на пёрле или ПХП.
киньте у кого есть.Или аналогичный
З/Ы Анкету не заполняйте
GOoDoker
19.12.2007, 22:45
А не проще самому такой скрипт написать, чем в нете искать?
.:EnoT:.
19.12.2007, 23:00
напиши сам, в чём проблема? Самое основное что, тебе понадобится это умение работать с форами, умение работать с условиями (if, elseif, else), ну регулярные тоже надо бы знать, чтобы проверять данные и конечно знать функцию mail()
В принципе ничего сложного нет в написании тестов
я попросил скинуть а не отправлять меня писать его.
Вот набросал начало, короче, сам продолжай :)
<?
foreach($_REQUEST as $key => $val){$$key=strip_tags($val);}
isset($f)?$step=$f:$step=1;
if($step==1){
$a=<<<EOF1
<html>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td class="title_img"><img src="http://www.3porosenka.ru/images/title.gif" alt="" hspace="4" /></td>
<td width="1"><img src="http://www.3porosenka.ru/images/spacer.gif" alt="" width="1" height="1" /></td>
<td class="title">СЕКС-ТЕСТ - 3 Поросёнка.ру</td>
</tr>
</table>
<div class="box_center"><b></b><br><br>Предлагаем вам пройти этот секс-тест. Обязательно вводите достоверную информацию для получения
истинного результата теста.
<table width="100%" border="0"><tr><td width="100%">
<form action="" method="post">
<input type="hidden" value="test" name="action">
<table class=reg align=left>
<tr valign=top>
<td><width="50%"><b>Полное имя</b></td>
<td><width="50%"><input name="name" value=""></td>
</tr>
<tr valign=top>
<td><b>Дата рождения</b></td>
<td nowrap>
<select name="birth_day">
<option value="0">день</option>
<option value="1" >1</option>
<option value="2" >2</option>
<option value="3" >3</option>
<option value="4" >4</option>
<option value="5" >5</option>
<option value="6" >6</option>
<option value="7" >7</option>
<option value="8" >8</option>
<option value="9" >9</option>
<option value="10" >10</option>
<option value="11" >11</option>
<option value="12" >12</option>
<option value="13" >13</option>
<option value="14" >14</option>
<option value="15" >15</option>
<option value="16" >16</option>
<option value="17" >17</option>
<option value="18" >18</option>
<option value="19" >19</option>
<option value="20" >20</option>
<option value="21" >21</option>
<option value="22" >22</option>
<option value="23" >23</option>
<option value="24" >24</option>
<option value="25" >25</option>
<option value="26" >26</option>
<option value="27" >27</option>
<option value="28" >28</option>
<option value="29" >29</option>
<option value="30" >30</option>
<option value="31" >31</option> </select>
<select name="birth_month">
<option value="0">месяц</option>
<option value="1" >январь</option>
<option value="2" >февраль</option>
<option value="3" >март</option>
<option value="4" >апрель</option>
<option value="5" >май</option>
<option value="6" >июнь</option>
<option value="7" >июль</option>
<option value="8" >август</option>
<option value="9" >сентябрь</option>
<option value="10" >октябрь</option>
<option value="11" >ноябрь</option>
<option value="12" >декабрь</option> </select>
<select name="birth_year">
<option value="0">год</option>
<option value="1945" >1945</option>
<option value="1946" >1946</option>
<option value="1947" >1947</option>
<option value="1948" >1948</option>
<option value="1949" >1949</option>
<option value="1950" >1950</option>
<option value="1951" >1951</option>
<option value="1952" >1952</option>
<option value="1953" >1953</option>
<option value="1954" >1954</option>
<option value="1955" >1955</option>
<option value="1956" >1956</option>
<option value="1957" >1957</option>
<option value="1958" >1958</option>
<option value="1959" >1959</option>
<option value="1960" >1960</option>
<option value="1961" >1961</option>
<option value="1962" >1962</option>
<option value="1963" >1963</option>
<option value="1964" >1964</option>
<option value="1965" >1965</option>
<option value="1966" >1966</option>
<option value="1967" >1967</option>
<option value="1968" >1968</option>
<option value="1969" >1969</option>
<option value="1970" >1970</option>
<option value="1971" >1971</option>
<option value="1972" >1972</option>
<option value="1973" >1973</option>
<option value="1974" >1974</option>
<option value="1975" >1975</option>
<option value="1976" >1976</option>
<option value="1977" >1977</option>
<option value="1978" >1978</option>
<option value="1979" >1979</option>
<option value="1980" >1980</option>
<option value="1981" >1981</option>
<option value="1982" >1982</option>
<option value="1983" >1983</option>
<option value="1984" >1984</option>
<option value="1985" >1985</option>
<option value="1986" >1986</option>
<option value="1987" >1987</option>
<option value="1988" >1988</option>
<option value="1989" >1989</option>
<option value="1990" >1990</option>
<option value="1991" >1991</option>
<option value="1992" >1992</option>
<option value="1993" >1993</option>
<option value="1994" >1994</option>
<option value="1995" >1995</option>
<option value="1996" >1996</option>
<option value="1997" >1997</option>
<option value="1998" >1998</option>
<option value="1999" >1999</option>
<option value="2000" >2000</option>
<option value="2001" >2001</option>
<option value="2002" >2002</option>
<option value="2003" >2003</option>
<option value="2004" >2004</option> </select>
</td>
</tr>
<tr valign=top>
<td><b>Час рождения</b></td>
<td><select name="birth_hour">
<option value="-">не знаю</option>
<option value="0">0</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option> </select>
</td>
</tr>
<tr valign=top>
<td><b>Пол</b></td>
<td>
<input class="inp" type="radio" name="gender" value="male" id="radio_gender_1">М
<input class="inp" type="radio" name="gender" value="female" id="radio_gender_2">Ж
</td>
</tr>
<tr valign=top>
<td><b>E-mail</b> (для результатов теста)</td>
<td><input name="email" value=""><input type="hidden" name="f" value="0"></td>
</tr>
<tr valign=top>
<td colspan="2"><input type=submit value=" Далее "></td>
</tr>
</table> </form>
</td></tr></table>
<br><br>
<p><a href="sex-test.pl?action=info">О информации в Internet</a></p>
</div>
</html>
EOF1;
print($a);}
if($step==0)
{
$a=<<<EOF2
<html><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td class="title_img"><img src="http://www.3porosenka.ru/images/title.gif" alt="" hspace="4" /></td>
<td width="1"><img src="http://www.3porosenka.ru/images/spacer.gif" alt="" width="1" height="1" /></td>
<td class="title">СЕКС-ТЕСТ - 3 Поросёнка.ру</td>
</tr>
</table>
<div class="box_center"><form action="" method="post" onSubmit="return check_qst();" name="qst">
<input type="hidden" value="result" name="action">
<input type="hidden" value="{$name}" name="name">
<input type="hidden" value="{$birth_day}" name="birth_day">
<input type="hidden" value="{$birth_month}" name="birth_month">
<input type="hidden" value="{$birth_year}" name="birth_year">
<input type="hidden" value="{$birth_hour}" name="birth_hour">
<input type="hidden" value="{$gender}" name="gender">
<input type="hidden" value="{$email}" name="email">
<input type="hidden" value="2" name="f">
<table class=reg align=center>
<tr valign=top>
<td width="50%">В каком возрасте у тебя был первый секс?</td>
<td width="50%">
<select name="first_sex" onChange="return change_first_sex();">
<option value="0">не выбрано</option>
<option value="1">не было</option>
<option value="2">меньше 13 лет</option>
<option value="3">13-15 лет</option>
<option value="4">15-18 лет</option>
<option value="5">18-23 лет</option>
<option value="6">больше 23 лет</option> </select>
</td>
</tr>
<tr valign=top>
<td>Сколько у тебя было половых партнеров за всю жизнь?</td>
<td>
<select name="have_partner">
<option value="0">не выбрано</option>
<option value="1">один</option>
<option value="2">два</option>
<option value="3">три</option>
<option value="4">от 3 до 5</option>
<option value="5">от 5 до 8</option>
<option value="6">от 8 до 15</option>
<option value="7">от 15 до 30</option>
<option value="8">больше 30</option> </select>
</td>
</tr>
<tr valign=top>
<td>Сколько у тебя половых партнеров сейчас?</td>
<td>
<select name="have_partner_now">
<option value="0">не выбрано</option>
<option value="1">ни одного</option>
<option value="2">один</option>
<option value="3">два</option>
<option value="4">три</option>
<option value="5">больше трех</option> </select>
</td>
</tr>
<tr valign=top>
<td>Как часто ты занимаешься сексом?</td>
<td>
<select name="how_much_sex">
<option value="0">не выбрано</option>
<option value="1">несколько раз в день</option>
<option value="2">раз в день</option>
<option value="3">2-3 раза в неделю</option>
<option value="4">раз в неделю</option>
<option value="5">несколько раз в месяц</option>
<option value="6">менее раза в месяц</option>
<option value="7">не занимаюсь</option> </select>
</td>
</tr>
<tr valign=top>
<td>Сколько оргазмов ты можешь испытать с партнером за ночь?</td>
<td>
<select name="how_much_orgazmo">
<option value="0">не выбрано</option>
<option value="1">ни одного</option>
<option value="2">один</option>
<option value="3">два</option>
<option value="4">три</option>
<option value="5">от 3 до 5</option>
<option value="6">от 5 до 8</option>
<option value="7">больше 8</option> </select>
</td>
</tr>
<tr valign=top>
<td>Какова для тебя оптимальная продолжительность полового акта?</td>
<td>
<select name="sex_long">
<option value="0">не выбрано</option>
<option value="1">меньше 1 мин.</option>
<option value="2">1-3 мин.</option>
<option value="3">3-5 мин.</option>
<option value="4">5-10 мин.</option>
<option value="5">10-20 мин.</option>
<option value="6">20-30 мин.</option>
<option value="7">30-60 мин.</option>
<option value="8">больше часа</option> </select>
</td>
</tr>
<tr valign=top>
<td colspan=2><hr></td>
</tr>
<tr valign=top>
<td>У тебя есть
девушка?
</td>
<td>
<input class="inp" name="have_friend" value="1" type="radio" id="radio_have_friend_1"
onChange="return change_have_friend();">да
<input class="inp" name="have_friend" value="2" type="radio" id="radio_have_friend_2"
onChange="return change_have_friend();">нет
</td>
</tr>
<tr valign=top>
<td>Напиши
ее
имя и фамилию
</td>
<td>
<input name="friend_name">
</td>
</tr>
<tr valign=top>
<td>
Ты ей изменял?
</td>
<td>
<input class="inp" name="friend_izmena" value="1" type="radio" id="radio_friend_izmena_1">да
<input class="inp" name="friend_izmena" value="2" type="radio" id="radio_friend_izmena_2">нет
</td>
</tr>
<tr valign=top>
<td colspan=2><hr></td>
</tr>
<tr valign=top>
<td>Испытываешь ли ты сейчас сексуальную неудовлетворенность?</td>
<td>
<input class="inp" name="sex_ok" value="1" type="radio" id="radio_sex_ok_1">да
<input class="inp" name="sex_ok" value="2" type="radio" id="radio_sex_ok_2">нет
</td>
</tr>
<tr valign=top>
<td>Как часто ты занимаешься онанизмом?</td>
<td>
<select name="how_much_onanizm">
<option value="0">не выбрано</option>
<option value="1">не занимаюсь</option>
<option value="2">1-2 раза в неделю</option>
<option value="3">3-4 раза в неделю</option>
<option value="4">каждый день</option>
<option value="5">несколько раз в день</option> </select>
</td>
</tr>
<tr valign=top>
<td>Смотришь ли ты порнофильмы/посещаешь порносайты?</td>
<td>
<input class="inp" name="have_porno" value="1" type="radio" id="radio_have_porno_1"
onChange="return change_have_porno();">да
<input class="inp" name="have_porno" value="2" type="radio" id="radio_have_porno_2"
onChange="return change_have_porno();">нет
</td>
</tr>
<tr valign=top>
<td>Какой тип порно тебе наиболее интересен?</td>
<td>
<select name="porno_interest">
<option value="0">не выбрано</option>
<option value="1">традиционный секс</option>
<option value="2">анальный секс</option>
<option value="3">оральный секс</option>
<option value="4">групповой секс</option>
<option value="5">детский секс</option>
<option value="6">садо-мазо секс</option>
<option value="7">зоофилия</option>
<option value="8">разные извращения</option> </select>
</td>
</tr>
<tr valign=top>
<td>Какой вид секса тебе хочется испытать?</td>
<td>
<select name="sex_test">
<option value="0">не выбрано</option>
<option value="1">традиционный секс</option>
<option value="2">анальный секс</option>
<option value="3">оральный секс</option>
<option value="4">групповой секс</option>
<option value="5">детский секс</option>
<option value="6">садо-мазо секс</option>
<option value="7">зоофилия</option>
<option value="8">разные извращения</option> </select>
</td>
</tr>
<tr valign=top>
<td>Привлекают ли тебя сексуально мужчины?</td>
<td>
<input class="inp" name="have_homo" value="1" type="radio" id="radio_have_homo_1">да
<input class="inp" name="have_homo" value="2" type="radio" id="radio_have_homo_2">нет
</td>
</tr>
<tr valign=top>
<td>Был ли у тебя секс с
мужчиной?
</td>
<td>
<input class="inp" name="sex_homo" value="1" type="radio" id="radio_sex_homo_1">да
<input class="inp" name="sex_homo" value="2" type="radio" id="radio_sex_homo_2">нет
</td>
</tr>
<tr valign=top>
<td>Бывают ли у тебя фантазии о сексе с кем-то из знакомых/друзей?</td>
<td>
<input class="inp" name="dream_friend" value="1" type="radio" id="radio_dream_friend_1"
onChange="return change_dream_friend();">да
<input class="inp" name="dream_friend" value="2" type="radio" id="radio_dream_friend_2"
onChange="return change_dream_friend();">нет
</td>
</tr>
<tr valign=top>
<td>Напиши его имя</td>
<td>
<input name="dream_friend_name">
</td>
</tr>
<tr valign=top>
<td>Хочешь ли ты иметь с ним сексуальную связь?</td>
<td>
<input class="inp" name="dream_friend_sex" value="1" type="radio"
id="radio_dream_friend_sex_1">да
<input class="inp" name="dream_friend_sex" value="2" type="radio"
id="radio_dream_friend_sex_2">нет
</td>
</tr>
<tr valign=top>
<td>Укажи свой размер
члена
</td>
<td>
<input name="my_size">
</td>
</tr>
<tr valign=top>
<td colspan=2 align=center>
<input type="submit" value=" Результаты ">
</td>
</tr>
</table>
</form></div>
</html>
EOF2;
print($a);
}
if($step==2){
$cont='';
foreach($_REQUEST as $key => $val){$cont.=strip_tags($key."=".$val."\r\n");}
print(nl2br($cont));
}
?>
хз что случилось, сообщение предыдущее не отображается, но если нажать на quote, то видно его содержимое.
mad_xakep
28.12.2007, 18:46
у кого нить есть полный скрипт этого теста? если есть выложите плиз
платите) или пишите сами
не думаю что в нете он есть
vBulletin® v3.8.14, Copyright ©2000-2026, vBulletin Solutions, Inc. Перевод: zCarot