Joomla 4. Компонент K2 и форк K2ForJ4 (18 янв 2024)

Если вас, как и меня, достало выслушивать (вычитывать) бесконечные обещания разработчика K2 опубликовать версию компонента K2 под Joomla 4 (без чего невозможно реализовать апгрейд from Joomla 3 to Joomla 4) - воспользуйтесь форком K2ForJ4. Который в данный момент установлен и без каких-либо проблем работает на этом веб-сайте.

Покер на костях и на пыхе

Больше
10 года 7 мес. назад - 10 года 6 мес. назад #1 от Aleksej
Aleksej создал тему: Покер на костях и на пыхе
Здесь привожу код игры "Покер на костях"; демку и недлинное описание вы можете увидеть в блоге, welcome по ссылке .


Code:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN""http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> <title>Poker Dice</title> </head> <body style="background-color:green;"> <form method="POST"> <?php $secondroll = $_POST['secondroll']; if(empty($_POST["cash"])) $cash = 100; else $cash = $_POST["cash"]; rolldie(); if($_POST["secondroll"] == "1") { print "<h2>Second roll</h2>\n"; $secondroll = "0"; evaluate(); } else { print "<h2>First Roll</h2>\n"; $secondroll = "1"; } printstuff(); function rolldie(){ global $die, $secondroll, $keepit; print"<table border='1'>"; for($i=0;$i<5;$i++){ if(!isset($_POST["keepit"][$i])){ $die[$i] = rand(1,6); } else { $die[$i] = $_POST["keepit"][$i]; }// завершаем if $thefile="$die[$i].png"; print<<<HERE <td> <img src = $thefile ><br> HERE; if($secondroll == FALSE) { print "<input type='checkbox' name='keepit[".$i."]' value='".$die[$i]."'> </td>"; }} print<<<HERE </tr></td> <tr> <td colspan="5"> <center> <input type="submit"> </center> </td></tr> </table> HERE; } function evaluate(){ global $die, $cash; $payoff=0; $cash-=2; $numVals=array(6); for($theval=1;$theval<=6;$theval++){ for($dienum=0;$dienum<5;$dienum++){ if($die[$dienum]==$theval){ $numVals[$theval]++;}}} for($i=1;$i<=6;$i++){ print"$i:$numVals[$i]<br>";} $numPairs = 0; $numThrees = 0; $numFours = 0; $numFives = 0; for($i = 1; $i <= 6; $i++){ switch($numVals[$i]){ case 2: $numPairs++; break; case 3: $numThrees++; break; case 4: $numFours++; break; case 5: $numFives++; break;}} if($numPairs == 2) { print "You have two pairs!\n"; $payoff = 1; }// end if if($numThrees == 1) { if($numPairs == 1) { print "You have a full house! \n"; $payoff = 5; } else { print "You have three of a kind! \n"; $payoff = 2; }// end if for double }// end if for thriple if($numFours == 1) { print "You have four of a kind\n"; $payoff = 5; }// end if if($numFives == 1) { print "You got a five of a kind !\n"; $payoff = 10; }// end if if (($numVals[1] == 1) && ($numVals[2] == 1) && ($numVals[3] == 1) && ($numVals[4] == 1) && ($numVals[5] == 1)) { print "You have a straight!\n"; $payoff = 10; }// end if if (($numVals[2] == 1) && ($numVals[3] == 1) && ($numVals[4] == 1) && ($numVals[5] == 1) && ($numVals[6] == 1)) { print "You have a straight\n"; $payoff = 10; }// end if print "You bet 2\n"; print "Payoff is $payoff\n"; $cash += $payoff; } function printstuff(){ global $cash, $secondroll; print"<br>Деньги $cash<br>"; print<<<HERE <input type="hidden" name="secondroll" value="$secondroll"> <input type="hidden" name="cash" value="$cash"> HERE; } ?> </form> </body> </html>
Последнее редактирование: 10 года 6 мес. назад пользователем p.rishard.

Пожалуйста Войти или Регистрация, чтобы присоединиться к беседе.

Dev banner 3
Больше
10 года 7 мес. назад #2 от Aleksej
Aleksej ответил в теме Покер на костях и на пыхе
Мне подсказывают, что более адекватно было бы сравнивать не поэлементно, а -
сократить и сравнивать прямо массивы в пыхе:

Code:
php -r 'if (Array(1, 2, 3, 4) == Array(1, 2, 3, 4)) { echo "equal";}else { echo "not equal"; }'


:)

Пожалуйста Войти или Регистрация, чтобы присоединиться к беседе.

Работает на Kunena форум