PasswordPhraseGenerator/index_.php

112 lines
2.6 KiB
PHP
Raw Permalink Normal View History

<!DOCTYPE html>
<html lang="da">
<head>
<meta charset="utf-8">
<meta http-equiv="x-ua-compatible" content="ie=edge">
<meta name="viewport" content="width=device-width, initial-scale=1, shrink-to-fit=no">
<title>Sætningsgenerator</title>
<style>
*{margin:0;padding:0;}html{height:100%;}
h1{text-align:center;margin-top:10%;}
</style>
</head>
2020-11-06 22:54:05 +00:00
<body><!--
<?php
$tal = rand(2,79);
$model = rand(0,1);
$end=array(".","!","?","!?","..."," :-)"," ;-)");
$tegn=$end[array_rand($end)];
$result = "";
$ord = array(
"sub"=>JSON_Decode(file_get_contents('data/navneord.json')),
"ver"=>JSON_Decode(file_get_contents('data/verber.json')),
"adj"=>JSON_Decode(file_get_contents('data/adj.json')),
"pro"=>array("jeg","han","hun","den","det","de","I","vi","du","De"),
"tid"=>array("før","efter","imens","inden"),
"for"=>array("over","under","ved siden af","bag","foran","overfor"));
function rando($arr){
return $arr[array_rand($arr)];
}
function word($cla,$conj=null){
global $ord;
$word = $ord[$cla][array_rand($ord[$cla])]; //rand(0,count($ord[$cla]));
if($conj==null){
return $word;
}else{
return $word[$conj];
}
}
function lego($conj=0){
// 0 = ubestemt ental, eks. "en grim tyr" el. "et dumt æg".
// 1 = bestemt ental, eks. "den grimme tyr" el. "det dumme æg"
// 2 = ubestemt flertal, eks. "ægte tedåser"
// 3 = bestemt flertal, eks. "de rådne æbler"
$main = word("sub");
$desc = word("adj");
if($main[4]=="t"){$neutrum=true;}else{$neutrum = false;}
2020-11-06 22:54:05 +00:00
print_r($main);
switch($conj){
case 0:
if($neutrum){
$phrase="et ".word("adj")[1]." ".$main[0];
}else{
$phrase="en ".word("adj")[0]." ".$main[0];
}
break;
case 1:
if($neutrum){
$phrase="det ".word("adj")[2]." ".$main[0];
}else{
$phrase="den ".word("adj")[2]." ".$main[0];
}
break;
case 2:
$phrase=word("adj")[2]." ".$main[2];
break;
case 3:
$phrase="de ".word("adj")[2]." ".$main[2];
break;
}
return $phrase;
}
switch($model){
case 0:
if($tal>1){
$b = lego(2);
}else{
$b = lego(rand(0,1));
}
$c = word("ver",rand(1,4));
$d = word("sub",rando([1,3]));
$result="$tal $b $c $d$tegn";
break;
case 1:
$a = lego(rando([0,1,3]));
$b = word("ver",rand(1,4));
if($tal>1){$c = word("sub",2);}else{$c = word("sub",rando([1,3]));}
$result = "$a $b $tal $c$tegn";
break;
}
2020-11-06 22:54:05 +00:00
#$result=str_replace("\n","",$result);
/*
tal tillæg navneord verb navneord
tillæg navneord verb tal navneord
stedord verb tal tillægsord navneord
stedord verb tid stedord verb tillægsord navneord
stedord tillægsord navneord! stedord verbum.
*/
?>--><h1><?=ucwords($result,"|")?></h1>
</body>
</html>