".$datm; $datm_dtls=explode(" ",$datm); $datm_datm=$datm_dtls[0]; $datm_time=$datm_dtls[1]; // print_r($datm_dtls); include ("config.php"); include ("conv.php"); require_once("xtrt-xxxx-func.php"); ///////////// //////////// $site_datm=date("Y-m-d H:i:s", time()); $datm_itms=explode(" ",$site_datm); $datm_datm=$datm_itms[0]; $datm_time=$datm_itms[1]; $zoek_datm="%".substr($datm_datm,5,5)."%"; // echo "
DATUM ".$datm_datm."ZOEK DATM ".$zoek_datm; ///////////////////// EERSTE INDRUK ///////////////////////// $rule_rslt=xtrt_xxxx($invr_bzv1,"nederlands","data"); // print_r($rule_rslt); // asort($rule_rslt); $cr=0; foreach($rule_rslt as $rule_key => $rule_val) { // echo "Eerste indruk "; $rule_itms=explode("!!",$rule_key); $tref_scre=$rule_itms[0]; $tref_taal=$rule_itms[1]; $tref_corp=$rule_itms[2]; $tref_vrag=$rule_itms[3]; $tref_antw=$rule_itms[4]; $stref_antw=str_replace(" ","+",$tref_antw); $tref_dtls=explode("@",$tref_antw); $tref_lnks=$tref_dtls[0]; $tref_rchs=$tref_dtls[1]; $stref_vrag=str_replace(" ","+",$tref_vrag); $ltref_antw="".$tref_antw.""; $ltref_antw=""; $tref_datm=$rule_itms[5]; $tref_levl=$rule_itms[6]; $tref_ipad=$rule_itms[7]; $cr=$cr+1; if ($tref_rchs != null) { echo "
". $tref_scre."-".$tref_lnks."<>".$tref_rchs.""; } } /////////////// $zoek_rchs="%".$invr_bzv1."%"; $nr=0; // echo "
Het gesprek tot nu toe"; // $sqltref="SELECT * FROM `splt` where `datm` like '$zoek_datm' or `rchs` like '$zoek_rchs' order by `datm` desc "; $sqltref="SELECT * FROM `splt` where `rchs` like '$zoek_rchs' order by `datm` desc "; // echo "
URL ENCODED ".urlencode($line); mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $trefresult = mysql_query($sqltref, $link); $tref_num = mysql_num_rows($trefresult); // echo "
Aantallen ".$sqltref." ".$tref_num; if ($tref_num == 0) { // echo "
".$line."--NO MATCHES FOUND CALL US on 31-162-313323
"; // exit; } else { while ($row = mysql_fetch_assoc($trefresult) ) { $domn=$row['domn']; $lnks=$row['lnks']; $rchs=$row['rchs']; $datm=$row['datm']; $datm_itms=explode(" ",$site_datm); $datm_datm=$datm_itms[0]; $datm_time=$datm_itms[1]; $levl=$row['levl']; $datm_rslt[$datm_datm."!".$domn."!".$lnks."!".$rchs."!".$levl]=$datm_rslt[$datm_datm."!".$domn."!".$lnks."!".$rchs."!".$levl]+1; $nr=$nr+1; } } // print_r($datm_rslt); echo ""; foreach($datm_rslt as $rslt_key => $rslt_val) { // echo ""; } echo "
".$rslt_key." ".$rslt_val."
"; $save_corp=$invr_corp; if($invr_corp == $rslt_domn) { // echo "
DATM ".$rslt_datm." DOMN ".$rslt_domn; } if (count($datm_rslt) > 0) { echo "
BEGIN ".$datm." INVR BZV1 ".$invr_bzv1." INVR CONT ".$invr_cont." INVR CHBT ".$invr_chbt; $finvr_cont=str_replace(" ","_",$invr_cont); $myFile = "./data/semanta_data/".substr($finvr_cont,0,64)."_".strlen($invr_cont).".dat"; echo "
MY FILE ".$myFile; $smta_array=array(); $sa=0; $smta_cnvs[0]="smta-cnvs"; $fh = fopen($myFile, 'w') or die("can't open file"); echo ""; echo ""; ////////////////////////////////// // echo "
COUNT ".count($datm_rslt); $ac=0; foreach($datm_rslt as $rslt_key => $rslt_val) { // echo "
RSLT KEY ".$rslt_key." RSLT VAL ".$rslt_val; $rslt_itms=explode("!",$rslt_key); $rslt_datm=$rslt_itms[0]; $rslt_domn=$rslt_itms[1]; $rslt_lnks=$rslt_itms[2]; $rslt_rchs=$rslt_itms[3]; $rchs_itms=explode("@",$rslt_rchs); $vrag_rchs=$rchs_itms[1]; $vrag_lnks=$rchs_itms[0]; $rslt_levl=$rslt_itms[4]; // echo "
KEUZE ".urlencode($vrag_lnks); // if ( $invr_corp == $rslt_domn and $vrag_rchs[0] != null) if ($vrag_rchs[0] != null) { $ac=$ac+1; $splt_dtls=explode($vrag_lnks,$invr_bzv1); $splt_lnks=$splt_dtls[0]; $splt_rchs=$splt_dtls[1]; fwrite($fh, $ac."-".$rslt_rchs); if ($splt_rchs != null) { // echo "
SPLT LNKS ".$splt_lnks." SPLT RCHS ".$splt_rchs; echo ""; } echo ""; $smta_cnvs[0]="THE_URL:https.//www.semanta.nl/semanta/data/semanta/".$my_file."
THE_TITLE:".$plt_lnks."@".$splt_rchs; print_r($smta_cnvs); $smta_json=json_encode($smta_cnvs); // echo "
SMTA JSON ".$smta_json; $obj = json_decode($smta_json,true); // fclose($fh); echo "
Check ".$invr_bzv1.""; $str = file_get_contents($myFile); // echo "
STR ".$str; $obj = json_decode($str,true); } }} echo "
UtteranceShortcutReaction
".$splt_lnks."".$vrag_lnks."".$splt_rchs."
".$rslt_lnks."".$vrag_lnks."".$vrag_rchs."
"; fclose($fh); //////////////////////// echo "
Check ".$invr_bzv1.""; exit; // $finvr_bzv1=str_replace(" ","_",$invr_bzv1).".json"; // $myFile = "./json/".$finvr_bzv1; $smta_array=array(); $sa=0; $smta_cnvs[0]="smta-cnvs"; $fh = fopen($myFile, 'w') or die("can't open file"); foreach($datm_rslt as $splt_key => $splt_val) { // echo "
SPLT KEY ".$splt_key." SPLT VAL ".$splt_val; ///////////////////// $splt_itms=explode("!",$splt_key); //////////////// $smta_array[$sa]=$splt_itms[3]."!!".$splt_itms[4]; $sa=$sa+1; // $smta_array= array_merge($smta_array,$splt_itms); // echo "
SPLT JSON ".$splt_json; // print_r($row); // echo "
SMTA JSON
"; // print_r($obj); // echo "
";
	foreach($splt_itms as $obj_key => $obj_val)
		{
		// echo "
OBJ KEY ".$obj_key." OBJ VAL ".$obj_val; if ($obj_key == "2") { $obj_text=""; if ($orelt != $obj_val) { $obj_text=$obj_text.$obj_val; $orelt=$obj_val; } } if ($obj_key == "4") { if ($krelt != $obj_val) { $obj_dtls=explode("@",$obj_val); foreach($obj_dtls as $val_key => $val_val) { if ($val_val != null) { // echo "
VAL VAL ".urlencode($val_val); } } $obj_text=$obj_text. "".$vr."".$obj_val.""; // echo $obj_text; $krelt=$obj_val; $vr=$vr+1; } } } // echo "
"; //////////////// // echo "
KEY ".$splt_key." VAL ".$splt_val; $splt_scre=$splt_itms[0]; $splt_taal=$splt_itms[1]; $splt_chbt=$splt_itms[2]; $splt_cont=$splt_itms[3]; $splt_antw=$splt_itms[4]; $splt_dtls=explode("@",$splt_antw); $splt_lnks=$splt_dtls[0]; $splt_rchs=$splt_dtls[1]; $ssplt_antw=str_replace(" ","+",$splt_rchs); // echo "
SPLT RCHS ".urlencode($splt_rchs)." SPLT LNKS ".urlencode($splt_lnks); // echo "
SPLT CONT ".$splt_cont; // echo "
DIT DENKT ".$splt_chbt."".$splt_rchs.""; $zoek_ook=" ".$splt_rchs." "; if (strlen($splt_rchs) > 1 and substr($splt_cont,0,6) != "./data") { echo "
DIT DENKT ".$splt_chbt."".$splt_rchs.""; $dspl_antw=$splt_rchs; $antw_smts=explode("@",$dspl_antw); // print_r($antw_smts); $dspl_antw=str_replace("@"," ",$dspl_antw); $dspl_antw=str_replace("%%",$splt_lnks,$dspl_antw); $dspl_antw=str_replace("gast",$invr_name,$dspl_antw); $dspl_antw=str_replace("xxxx","webeditor",$dspl_antw); $dspl_antw=str_replace("gesprekspartner",$invr_chbt,$dspl_antw); $dspl_antw=str_replace("invrvrag",$invr_bzv1,$dspl_antw); $dspl_antw=str_replace("invrrslt",$invr_rslt,$dspl_antw); $dspl_antw=str_replace("invrdatm",$invr_datm,$dspl_antw); $dspl_antw=str_replace("invrtime",$datm_time,$dspl_antw); $dspl_antw=str_replace("invrwkdg",$weekdag,$dspl_antw); $dspl_antw=str_replace("invrcorp",$invr_corp,$dspl_antw); $dspl_antw=str_replace("invrchbt",$invr_chbt,$dspl_antw); $dspl_antw=str_replace("invrcont",$splt_cont,$dspl_antw); $dspl_antw=str_replace("ipcdland",$ipcd_land,$dspl_antw); $dspl_antw=str_replace("invrmin1","".$invr_min1."", $dspl_antw); $invr_bzv2=$dspl_antw; echo "
".$splt_chbt." over ".$dspl_antw.""; $dspl_antw=str_replace("invrlnks","".$lnks_lnks."".$dspl_antw); $dspl_antw=str_replace("invrrchs","".$lnks_rchs."".$dspl_antw); // echo "
DIT DENKT NA INVRRCHS ".$splt_chbt."".$dspl_antw.""; // $invr_bzv2=$dspl_antw; } } // echo "
INVR BZV2 ".$invr_bzv2; ////////////////////////////////////// LOSSE ITEMS $splt_rslt=xtrt_xxxx($invr_bzv1,$invr_taal,"splt"); // print_r($splt_rslt); // echo "
ITEM RSLT ".count($splt_rslt)." BZV1 ".$invr_bzv1; $sr=0; $bc=0; if (count($splt_rslt) > 0) { echo ""; foreach($splt_rslt as $splt_key => $splt_val) { if ($crelt != $splt_chbt) { // echo "
Context: ".$splt_chbt; $crelt=$splt_chbt; } $splt_itms=explode("!!",$splt_key); // echo "
KEY ".$splt_key." VAL ".$splt_val; $splt_scre=$splt_itms[0]; $splt_taal=$splt_itms[1]; $splt_chbt=$splt_itms[2]; $splt_cont=$splt_itms[3]; $splt_antw=$splt_itms[4]; // echo "
DIT WEET ".$splt_chbt."".$splt_antw.""; $splt_dtls=explode("@",$splt_antw); $splt_lnks=$splt_dtls[0]; $splt_rchs=$splt_dtls[1]; $splt_rchs=str_replace("%%",$splt_lnks); $ssplt_antw=str_replace(" ","+",$splt_rchs); // echo "
Context ".$splt_cont; // echo "
DIT DENKT CHBT ".$splt_chbt."SPLT RCHS ".$splt_antw.""; $zoek_ook=" ".$splt_rchs." "; if (strlen($splt_rchs) > 1 and substr($splt_cont,0,6) == "./data" ) // if ($splt_rchs !=null and $splt_lnks == $invr_bzv1 and $splt_chbt == $invr_chbt and $splt_lnks == $invr_corp) { // echo "
DIT DENKT ".$splt_chbt."".$splt_rchs.""; $dspl_antw=$splt_rchs; $dspl_antw=str_replace("@"," ",$dspl_antw); $dspl_antw=str_replace("%%",$splt_lnks,$dspl_antw); $dspl_antw=str_replace("gast",$invr_name,$dspl_antw); $dspl_antw=str_replace("xxxx","webeditor",$dspl_antw); $dspl_antw=str_replace("gesprekspartner",$invr_chbt,$dspl_antw); $dspl_antw=str_replace("invrvrag",$invr_bzv1,$dspl_antw); $dspl_antw=str_replace("invrrslt",$invr_rslt,$dspl_antw); $dspl_antw=str_replace("invrdatm",$invr_datm,$dspl_antw); $dspl_antw=str_replace("invrtime",$datm_time,$dspl_antw); $dspl_antw=str_replace("invrwkdg",$weekdag,$dspl_antw); $dspl_antw=str_replace("invrcorp",$invr_corp,$dspl_antw); $dspl_antw=str_replace("invrchbt",$invr_chbt,$dspl_antw); $dspl_antw=str_replace("invrcont",$splt_cont,$dspl_antw); $dspl_antw=str_replace("ipcdland",$ipcd_land,$dspl_antw); $dspl_antw=str_replace("invrmin1",$invr_min1,$dspl_antw); $invr_bzv2=$dspl_antw; $sinvr_bzv2=str_replace(" ","+",$invr_bzv2); echo "
".$splt_chbt." over ".$dspl_antw.""; // $dspl_antw=str_replace("invrlnks","".$lnks_lnks."".$dspl_antw); // $dspl_antw=str_replace("invrrchs","".$lnks_rchs."".$dspl_antw); // echo "
DIT DENKT NA INVRRCHS ".$splt_chbt."".$dspl_antw.""; // $invr_bzv2=$dspl_antw; echo "
"; if ($sr == 0) { $antw_ook="".$invr_chbt.""; echo "
".$antw_ook."
"; $antw_smts=explode(":",$dspl_antw); $da=0; if (count($antw_smts) > 1 and $da ==0) { echo "Voor ".$antw_smts[0]." zijn er meerdere keuzes mogelijk. Ik noem er ".count($antw_smts); $da=$da+1; } foreach($antw_smts as $smts_key => $smts_val) { if ($da > 0) { // echo ""; $da=$da+1; } } // echo "
".$smts_val."
"; // echo "Dit heb ik ook nog gevonden"; $sr=$sr+1; } else { if ($sr > 0 and $sr < 8) { if ($splt_rchs != $srelt) { $sr=$sr+1; $srelt=$splt_rchs; // echo "
INVR MIN1 ".$invr_min1; $antw_ook=" ".$invr_bzv2." "; // echo "".$sr."".$invr_bzv2.""; // echo "".$antw_ook.""; $bzv2_array[$bc]=$invr_bzv2; $bc=$bc+1; } } } } } } foreach($bzv2_array as $bzv2_key => $bzv2_val) { $full_val=$bzv2_val; include("wrte-data-func.php"); } echo ""; $smta_json=json_encode($smta_array); fwrite($fh, $smta_json); $obj = json_decode($smta_json,true); fclose($fh); echo "
Check ".$invr_bzv1.""; $str = file_get_contents($myFile); // echo "
STR ".$str; $obj = json_decode($str,true); echo "
";
// print_r($obj);
echo "
"; $json = json_decode($str, true); // echo "
JSON ".$json; // echo '
' . print_r($json, true) . '
'; if ($invr_func== "cnvs") { $antw_ook="U kunt reageren door hier te klikken"; echo "
".$antw_ook."
"; exit; } /////// if ($invr_taal == null) { $invr_taal="nederlands"; } if ($invr_corp == null) { $invr_corp="semanta"; } if ($invr_domn == null) { $invr_domn=$invr_corp; } if ($invr_func == null) { $invr_func="bzkr"; } if ($invr_chbt == null) { $invr_chbt="semantus"; } if ($invr_bzkr == null) { $invr_bzkr="bezoeker"; } if ($invr_bzkr != null) { // echo "
hallo ".$invr_bzkr; } $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); ?>
> > Corpus> >
INVR TAAL ".$invr_taal; // echo "
INVR FUNC ".$invr_func; // echo "
INVR DOMN ".$invr_domn; // echo "
INVR BZV1 ".$invr_bzv1; $grammatica=text_isrt($invr_taal."@Grammatica"); // echo "
Taalkunde".$grammatica; $grammatica=strtoupper($grammatica); $bezoeker=text_isrt($invr_taal."Bezoeker"); echo "

".$invr_tabl."


"; $wiki_ipcd=taal_ipcd($invr_taal); ///////////////// // $sql = "SELECT * FROM $invr_tabl order by `datm` desc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); // $tablresult = mysql_query($sql, $link); $tabl_num = mysql_num_rows($tablresult); // echo "
Totaal Aantal ".$invr_tabl." ".$sql." ".$tabl_num; $nr=0; while ($row = mysql_fetch_assoc($tablresult) and $nr < 16) { $ipad=$row['ipad']; $taal=$row['taal']; $domn=$row['domn']; // echo "
DOMN ".$domn; $lnks=$row['lnks']; $rchs=$row['rchs']; $datm=$row['datm']; $nr=$nr+1; $datm_dtls=explode(" ",$datm); // print_r($datm_dtls); $last_datm=$datm_dtls[0]; $last_time=$datm_dtls[1]; } echo "
LAATSTE DATUM".$last_datm; if ($invr_tabl == null) { $invr_tabl="splt"; } if ($invr_bzv1 == null) { $invr_bzv1="semanta"; } if ($invr_corp== null) { $invr_corp="semanta"; } if ($invr_taal == null) { $invr_taal="nederlands"; } $strp_bzv1=str_replace("+","%",$invr_bzv1); $invr_bzv1=str_replace("+"," ",$invr_bzv1); // echo "
LENGTES BZV1".strlen($invr_bzv1)." STRP ".strlen($strp_bzv1); // echo "
zoekterm+ --- beginnen met ".$strp_bzv1; // echo "
+zoekterm+ --- bevatten zoekterm"; // echo "
+zoekterm --- eindigen met zoekterm"; // echo "
zoekterm Alleen de gekozen zoekvorm laten zien"; // $calc_rslt=calc_text($invr_bzv1,"semanta","semantus"); // print_r($calc_rslt); $bzv1_itms=explode(" ",$strp_bzv1); $subs_itms=explode(" ",$invr_bzv1); // print_r($subs_itms); ////////////// SUBSTITUTES ///// foreach($subs_itms as $bzv1_key => $bzv1_val) { if (strlen($bzv1_val) > 3) { $subs_rslt=xtrt_xxxx($bzv1_val,"nederlands","subs"); // print_r($subs_rslt); foreach($subs_rslt as $subs_key => $subs_val) { // echo "
KEY ".$subs_key." VAL ".$subs_val; $key_dtls=explode("!!",$subs_key); $dtls_subs=$key_dtls[4]; $dtls_bron=$key_dtls[3]; $subs_array[$dtls_subs]=$subs_array[$dtls_subs]+1; } } } // print_r($subs_array); if (count($subs_array) > 0) { foreach($subs_array as $subs_key => $subs_val) { $ssubs_key=str_replace("+"," ",$subs_key); echo "
".$subs_key.""; // echo "
".$invr_bzv1."<>".$subs_key; } } //////// $zoek_bzv1=$strp_bzv1; if (count($bzv1_itms) > 1) { // $zoek_bzv1=$bzv1_itms[0]; // echo "U kunt in deze versie een woordvorm per keer opvragen. Voor meer informatie klikt u hier."; } if (strlen($strp_bzv1) < 3) { echo "U kunt in deze versie alleen woordvormen met meer dan 2 tekens opvragen. Voor meer informatie klikt u hier."; } ////////////////// $line-$invr_bzv1; $sql="SELECT * , MATCH (domn,lnks,rchs) AGAINST ('$line') AS score FROM $invr_tabl WHERE MATCH (domn,lnks,rchs) AGAINST ('$line') order by `lnks`,`score` desc"; if ($invr_tabl== "splt") { $sub_line=substr($line,4,512); $cln_line=str_replace("+"," ",$sub_line); trim($sub_line); // echo "
LINE ".$line; $line=$invr_bzv1; $sql="SELECT * , MATCH (lnks,rchs) AGAINST ('$line') AS score FROM $invr_tabl WHERE MATCH (lnks,rchs) AGAINST ('$line')order by `score` desc"; } // echo "
INVR BZV1 ".$invr_bzv1." INVR TAAL ".$invr_taal."INVR TABL ".$invr_tabl." INVR CORP ".$invr_corp." INVR FUNC ".$invr_func; // $sql = "SELECT * FROM $invr_tabl where `lnks` like '$strp_bzv1' or `rchs` like '$strp_bzv1' order by `lnks`,`rchs` desc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $tablresult = mysql_query($sql, $link); $tabl_num = mysql_num_rows($tablresult); echo "
Aantallen ".$invr_tabl." ".$sql." ".$tabl_num; // echo "
"; $linvr_bzv1=str_replace(" ","+",$invr_bzv1); echo ''; // echo ''; $drelt="xxxxxxxx"; if ($tabl_num == 0) { $lrchs="".$invr_bzv1.""; echo $lrchs; } if ($tabl_num != 0) { header('Content-type: application/json; charset=utf-8'); $vr=1; echo "
LANGUAGEPOS
"; while ($row = mysql_fetch_assoc($tablresult) and $vr < 9) { // echo json_encode($row); $smta_json=json_encode($row); // echo "
FETCH ROW
"; // print_r($row); // echo "
SMTA JSON ".$vr."-".$smta_json; $obj = json_decode($smta_json,true); foreach($obj as $obj_key => $obj_val) { // echo "
OBJ KEY ".$obj_key; if ($obj_key == "domn") { $obj_text=""; // echo $obj_text; $vr=$vr+1; } } } } } // print_r($obj); // echo "
"; } } echo "
"; if ($orelt != $obj_val) { $obj_text=$obj_text.$obj_val; $orelt=$obj_val; } } if ($obj_key == "rchs") { $obj_dtls=explode("@",$obj_val); // echo "
VAL VAL ".urlencode($val_val); foreach($obj_dtls as $val_key => $val_val) { if ($val_val != null) { if ($krelt != $obj_val) { $krelt=$obj_val; // echo "
VAL VAL ".urlencode($val_val); $obj_text=$obj_text. "
".$vr."".$val_val."
"; ?>