Deze module is in onderhoud en in alphatest ".$func."Vraag:".$invr_text; include ("config.php"); $invr=explode("@",$invr_text); $taal=$invr[0]; if ($taal == null) { $taal="engels"; } $text=$invr[1]; $tabl_rchs=$text; // print_r($invr); $sql="select * from text where `lnks` = '$text' and `taal` = '$taal' "; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $tablresult = mysql_query($sql,$link); $num_tabl= mysql_num_rows($tablresult); // echo "
hebben we iets gevonden
".$num_tabl." ".$sql; if ($num_tabl == 0) { $sqlland="select * from land where `lnks` = '$text' and `taal` = '$taal' "; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $tablresult = mysql_query($sqlland,$link); $num_land= mysql_num_rows($tablresult); if ($num_land == 0) { } if ($num_land > 0) { while ($row = mysql_fetch_assoc($tablresult)) { $tabl_lnks= $row['lnks']; $tabl_rchs= $row['rchs']; $tabl_taal= $row['taal']; // echo "
Dit is het antwoord:".$tabl_rchs; } } } if ($num_tabl > 0) { // echo "
hebben we iets gevonden
".$gn06_tabl." ".$gn06sql; while ($row = mysql_fetch_assoc($tablresult)) { $tabl_lnks= $row['lnks']; $tabl_rchs= $row['rchs']; $tabl_taal= $row['taal']; } } // echo "
Dit is het antwoord:".$tabl_rchs; return $tabl_rchs; } ?>  ".$modl_desc."
".$line."--".$taal; // echo " BEPAAL TAAL ".urlencode($line); /////////////// $mb_rslt=preg_split('/(?"; foreach($mb_rslt as $mb_key => $mb_val) { $mb_lowr=mb_strtolower($mb_val,'UTF-8'); $mb_text=$mb_text.$mb_lowr; } // echo "
TEST TLKD MB TEXT ".$mb_text; $mb_dtls=explode(" ",$mb_text); $new_mb=""; $tl=0; foreach($mb_dtls as $mb_key => $mb_val) { // echo "
KEY ".$mb_key." VAL ".$mb_val; $new_mb=$new_mb." ".$mb_val; } trim($new_mb); $unew_mb=urlencode($new_mb); $new_lnks=mb_strtolower($unew_mb); // echo "
NEW LINE ".$new_lnks; $line=urldecode($new_lnks); $line=trim($line); // echo "
".$modl_desc." ".$line." ".$taal." ".$tabel; $strn_val=$line; $scre_array=array(); $sw_mt=0; /////////////////////// echo ""; $sqltref="SELECT * FROM aiml WHERE MATCH (pattern,template) AGAINST ('$line' IN NATURAL LANGUAGE MODE) order by `pattern` desc " ; // $sqltref="SELECT * , MATCH (pattern,template,topic) AGAINST ('$line' ) AS score FROM aiml WHERE MATCH (pattern,template,topic) AGAINST ('$line' ) order by `score` desc"; // $sqltref="SELECT * , MATCH (pattern,template,topic) AGAINST ('$line' ) AS score FROM wiml WHERE MATCH (pattern,template,topic) AGAINST ('$line' ) order by `score` desc"; if ($tabel == "aiml") { $sqltref="SELECT * , MATCH (pattern,template,filename) AGAINST ('$line' ) AS score FROM aiml WHERE MATCH (pattern,template,filename) AGAINST ('$line' ) order by `score` desc"; } if ($tabel == "wiml") { // $sqltref="SELECT * , MATCH (pattern,template,thatpattern) AGAINST ('$line' ) AS score FROM wiml WHERE MATCH (pattern,template,thatpattern) AGAINST ('$line' ) order by `score` desc"; } if ($tabel == "ftma") { // $sqltref="SELECT * , MATCH (pattern,template,filename) AGAINST ('$line' ) AS score FROM ftma WHERE MATCH (pattern,template,filename) AGAINST ('$line' ) order by `score` desc"; } $splt_bzv1=explode(" ",$line); $zoek_bzv1="%".$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." SQL "; // echo "
"; // echo ""; if ($tref_num == 0) { // $scre_array["0@".$line."@".$template."@".$domn]=$scre_array[$scre."@".$pattern."@".$template."@".$domn]+1; // echo ""; } // echo "
You can select your chatbot here by selecting his profession and get to know his or her knowledge."; if ($tref_num > 0) { $corp_sw="0"; $kd=0; // echo ""; echo "
Er zijn ".$tref_num." entries gevonden voor uw uiting ".$wrds_form; while ($row = mysql_fetch_assoc($trefresult) and $kd <32 ) { $scre=$row['score']; $id=$row['id']; $pattern=$row['pattern']; $thatpattern=$row['thatpattern']; $template=$row['template']; $topic=$row['topic']; $intention=$row['filename']; $scre= round($scre, 2); $nscr="00".$scre."00"; // echo "
PATTERN ".$pattern." TEMPLATE ".$template; if (strlen($scre)== 1) { $nscre=substr($nscr,0,4); } if (strlen($scre)== 2) { $nscre=substr($nscr,1,4); } if (strlen($scre)== 3) { $nscre=substr($nscr,2,4); } $splt_intn=explode("@",$intention); $usag_intn=$splt_intn[0]; $usag_extn=$splt_intn[1]; if ($hrelt != $pattern) { $kd=$kd+1; $cpattern="".$pattern.""; $ctemplate="".$template.""; echo ""; // echo "
NSCRE ".$nscre; $scre_array[$nscre."@".$topic."@".$pattern."@".$thatpattern."@".$template."@".$usag_intn]=$scre_array[$nscre."@".$topic."@".$pattern."@".$thatpattern."@".$template."@".$usag_intn]+1; // echo ""; $hrelt=$pattern; // echo "
ToelichtingTemplatePatternOnderwerp
GEEN DIRECT RESULTAAT ".$cpattern."".$ctemplate."
SemantaGesprekspartnerCorpusKennisdomein
".$cpattern."
".$cpattern."".$ctemplate."
".$cpattern."".$ctemplate."".$usag_intn."".$usag_extn.""; } $domn_array[$domn]=$domn_array[$domn]+1; } } echo "
"; // echo "
Pandorabots entries: ".count($scre_array); // print_r($scre_array); krsort($scre_array); return($scre_array); } ?> ".$func." INVOER ".urlencode($line)."
"; $rfer_srvr=$_SERVER['SERVER_NAME']; $rfer_url=$_SERVER['HTTP_REFERER']; $userip=$_SERVER['REMOTE_ADDR']; // echo "
RFER ".$rfer_url; require_once ("config.php"); // require_once("bwrk-bzkr-func.php"); require_once("xtrt-xxxx-func.php"); require_once ("tlkd-smts-func.php"); require_once("smta-tlkd-func-0017.php"); $invr_bzv1=$line; // echo "
".$modl." VOORAF INVR BZV1 ".$invr_bzv1." INVR CORP ".$invr_corp." INVR CONT ".$invr_cont." INVR TAAL ".$invr_taal." INVR CHBT ".$invr_chbt." INVR MAIL ".$invr_mail."INVR BZV2 ".$invr_bzv2."INVR DOMN".$invr_domn; $say_itms=explode(" ",$line); $invr_bzv1=str_replace("+"," ",$invr_bzv1); // echo "
SAY ITMS "; // print_r($say_itms); // trim($invr_bzv1); $smts_rslt=tlkd_smts($line); // require_once("time-laps-func.php"); // $ontl_rslt=time_laps($ontl_strt."@BEPL SMTS"); // echo $ontl_rslt; $invr_bzv1=str_replace("+"," ",$invr_bzv1); // echo "
SMTS ITMS "; // print_r($smts_rslt); $bzv1_itms=explode(" ",$invr_bzv1); $new_bzv1=""; // sort($smts_rslt); // echo ""; $srelt="XXXXX"; $st=0; // echo 'beterschap'; foreach($smts_rslt as $smts_key => $smts_val) { // echo "
SMTS KEY ".$smts_key." SMTS VAL ".$smts_val; $smts_itms=explode("!!",$smts_key); // print_r($smts_itms); $smts_type=$smts_itms[0]; $smts_sgmt=$smts_itms[1]; // echo "
SMTS TYPE ".$smts_type." SMTS SGMT ".$smts_sgmt; $ssmts_sgmt=str_replace(" ","+",$smts_sgmt); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $smts_text=$smts_itms[2]; $sgmt_itms=explode(" ",$smts_type); if (count($sgmt_itms) > 1) { // print_r($sgmt_itms); $itms_cntr=count($sgmt_itms); foreach($sgmt_itms as $itms_key => $itms_val) { // echo "
ITMS KEY ".$itms_key."ITMS VAL ".$itms_val; $subs_rslt=xtrt_xxxx("xdotx".$itms_val,"nederlands","subs"); foreach($subs_rslt as $subs_key => $subs_val) { $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_word=$subs_dtls[2]; $subs_intp=$subs_dtls[3]; $subs_dale=$subs_dtls[7]; // echo "
SUBS WORD ".$subs_word; if ($itms_val == $subs_word) { // echo "
SUBS WORD ".$subs_word." ITMS VAL ".$itms_val; if ($irelt != $subs_intp) { // echo "
EUREKA ".$subs_dtls[2]." Interpretatie ".$subs_dtls[3].">>".$subs_dtls[7]; $gvkr_array[$st]=count($sgmt_itms)." ".$subs_key; $irelt = $subs_intp; } $st=$st+1; } } // echo "GEVOEL EN EMOTIES"; $subs_rslt=xtrt_xxxx("xdotx".$itms_val,"nederlands","gevl"); foreach($subs_rslt as $subs_key => $subs_val) { $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_word=$subs_dtls[2]; $subs_intp=$subs_dtls[3]; $subs_dale=$subs_dtls[7]; // echo "
ITMS VAL ".$itms_val." SUBS WORD ".$subs_word." SUBS INTP ".$subs_intp." SUBS DALE ".$subs_dale; if ($itms_val == $subs_dale) { if ($grelt != $subs_dale) { // echo "
EUREKA ".$subs_word." Interpretatie ".$subs_intp.">>".$subs_dale; $gvkr_array[$st]=count($sgmt_itms)." ".$subs_key; $grelt = $subs_dale; } $st=$st+1; } } // $st=$st+1; } } } // echo "
GEVL TEXT ".$gevl_text; ////////////////////////////////////////// asort($gvkr_array); // print_r($gvkr_array); // echo "
KRKT TEXT ".$krkt_text; // echo "
GRAM TEXT ".$gram_text; // $gvkr_array[grammatica]=$gram_text; // $gvkr_array[karakter]=$krkt_text; // $gvkr_array[gevoel]=$gevl_text; // print_r($gvkr_array); return $gvkr_array; }
Alles over vertegenwoordigers, gesprekspartners en chatbots
INVR LGRM ".$invr_lgrm; $spec_rslt=bepl_spec($invr_lgrm); $bzv1_rslt=xtrt_xxxx($invr_lgrm,$invr_taal,"lpzg",24); // print_r($bzv1_rslt); foreach($bzv1_rslt as $bzv1_key => $bzv1_val) { $chbt_itms=explode("!!",$bzv1_key); // print_r($chbt_itms); $bzv1_taal=$chbt_itms[1]; $bzv1_scre=$chbt_itms[0]; $bzv1_taal=$chbt_itms[1]; $bzv1_corp=$chbt_itms[2]; //echo "
INVR CORP ".$invr_corp." CHBT CORP ".$chbt_corp; $corp_array[$chbt_key]=$corp_array[$chbt_key]+1; if ($invr_corp == $chbt_corp) { // $corp_array[$chbt_key]=$corp_array[$chbt_key]+1; } $schbt_corp=str_replace(" ","+",$chbt_corp); $bzv1_lnks=$chbt_itms[3]; $bzv1_rchs=$chbt_itms[4]; $bzv1_datm=$chbt_itms[5]; $bzv1_levl=$chbt_itms[6]; $bzv1_url=$chbt_itms[7]; if (strlen($invr_lgrm) < 64 and $rrelt != $bzv1_rchs) { $sim = similar_text($invr_lgrm, $bzv1_rchs, $perc); if ($perc > 25) { // echo "
PERC ".round($perc, 2); // echo " SCORE ".$bzv1_scre." ".$bzv1_rchs; $rrelt=$bzv1_rchs; } } } echo "
Zoektekst
"; $chbt_rslt=xtrt_xxxx($invr_lgrm,$invr_taal,"base"); if (count($chbt_rslt) > 1) { echo "Website"; foreach($chbt_rslt as $chbt_key => $chbt_val) { $chbt_itms=explode("!!",$chbt_key); // print_r($chbt_itms); $chbt_taal=$chbt_itms[1]; $chbt_scre=$chbt_itms[0]; $chbt_taal=$chbt_itms[1]; $chbt_corp=$chbt_itms[2]; //echo "
INVR CORP ".$invr_corp." CHBT CORP ".$chbt_corp; $corp_array[$chbt_key]=$corp_array[$chbt_key]+1; if ($invr_corp == $chbt_corp) { // $corp_array[$chbt_key]=$corp_array[$chbt_key]+1; } $schbt_corp=str_replace(" ","+",$chbt_corp); $chbt_lnks=$chbt_itms[3]; $chbt_rchs=$chbt_itms[4]; $chbt_datm=$chbt_itms[5]; $chbt_levl=$chbt_itms[6]; $chbt_url=$chbt_itms[7]; echo ""; } echo "
TaalGesprekspartnerKennisdomeinCorpus
".$chbt_taal."".$chbt_corp."".$chbt_lnks."".$chbt_rchs."".$chbt_url."
"; } if ($invr_tabl== null) { $invr_tabl="base"; } //echo "
INVR TABL ".$invr_tabl; $omsc_rslt=xtrt_xxxx($invr_tabl,$invr_taal,"omsc"); // print_r($omsc_rslt); foreach($omsc_rslt as $omsc_key => $omsc_val) { $omsc_itms=explode("!!",$omsc_key); $omsc_text=$omsc_itms[4]; echo "
We gaan zoeken in ".$omsc_text; } /////////// $lgrm_lngt=strlen($invr_lgrm); $mtph_lngt=($lgrm_lngt/4)+2; echo round($mtph_lngt,0, PHP_ROUND_HALF_UP); $mtph_lgrm=metaphone ($invr_lgrm,$mtph_lngt); // echo "
INVR LGRM ".$invr_lgrm."LGRM LNGT ".$lgrm_lngt." MTPN LNGT ".$mtph_lngt." MTPN LGRM ".$mtph_lgrm; /////////// if ($invr_lgrm== null) { $invr_lgrm="Wat doet semanta voor mij"; } $summ_lgrm=""; if ($invr_lgrm != null) { $lgrm_dtls=str_replace("+"," ",$invr_lgrm); // echo "
Wat kregen we binnen TAAL ".$invr_taal. " CHBT ".$invr_chbt." MAIL ".$invr_mail." BZV1".$invr_bzv1." PWRD ".$invr_pwrd." IPAD ".$invr_ipad." TABL ".$invr_tabl." LGRM ".$invr_lgrm." CORP ".$invr_corpm; $lgrm_dtls=explode(" ",$invr_lgrm); // print_r($lgrm_dtls); if (count($lgrm_dtls) > 2) { // echo "Zinsanalyse"; $sinvr_bzv1=str_replace(" ","+",$invr_lgrm); $summ_lgrm=$summ_lgrm." ".$lgrm_val; ?> &pwrd=&bzv1=> "; if (count($lgrm_dtls) > 1) { // echo "Losse woorden "; foreach($lgrm_dtls as $lgrm_key => $lgrm_val) { if (strlen($lgrm_val) > 3) { $summ_lgrm=$summ_lgrm." ".$lgrm_val; ?> &pwrd=&lgrm=>- "; } } $sinvr_bzv1=str_replace(" ","+",$summ_lgrm); $srch_tabl="base,data,sgmt"; $srch_dtls=explode(",",$srch_tabl); echo ""; foreach($srch_dtls as $srch_key => $srch_val) { $invr_tabl=$srch_val; $chbt_rslt=xtrt_xxxx($invr_lgrm,$invr_taal,$invr_tabl); // print_r($chbt_rslt); if(count($chbt_rslt) == 0) { // echo "
"; } if(count($chbt_rslt) > 0) { // echo "
"; $sinvr_lgrm=str_replace(" ","+",$invr_lgrm); echo "
Semanta heeft geen zoekwoord ".$invr_lgrm." gevonden in het zoekgebied van ".$srch_val."
Semanta heeft het zoekwoord ".$invr_lgrm." gevonden in ".count($chbt_rslt)." relaties met ".$srch_val." waarvan er max 4 worden getoond
"; // print_r($chbt_rslt); //echo ""; $cn=0; // echo "
Wat kregen we binnen TAAL ".$invr_taal. " CHBT ".$invr_chbt." MAIL ".$invr_mail." BZV1".$invr_bzv1." PWRD ".$invr_pwrd." IPAD ".$invr_ipad." TABL ".$invr_tabl." LGRM ".$invr_lgrm; $nb=0; $nd=0; $nw=0; $nr=0; $ns=0; $nv=0; // echo "
chbt KEY ". $chbt_key." chbt VAL ".$chbt_val; foreach($chbt_rslt as $chbt_key =>$chbt_val) { $chbt_itms=explode("!!",$chbt_key); // print_r($chbt_itms); $chbt_taal=$chbt_itms[1]; $chbt_scre=$chbt_itms[0]; $chbt_taal=$chbt_itms[1]; $chbt_corp=$chbt_itms[2]; //echo "
INVR CORP ".$invr_corp." CHBT CORP ".$chbt_corp; if ($invr_corp == $chbt_corp) { $corp_array[$chbt_key]=$corp_array[$chbt_key]+1; } $schbt_corp=str_replace(" ","+",$chbt_corp); $chbt_lnks=$chbt_itms[3]; $chbt_rchs=$chbt_itms[4]; $schbt_rchs=str_replace(" ","+",$chbt_rchs); $chbt_datm=$chbt_itms[5]; $chbt_levl=$chbt_itms[6]; $chbt_url=$chbt_itms[7]; // echo "
Wat kregen we binnen TAAL ".$invr_taal. " CHBT ".$invr_chbt." MAIL ".$invr_mail." BZV1".$invr_bzv1." PWRD ".$invr_pwrd." IPAD ".$invr_ipad." TABL ".$invr_tabl." LGRM ".$invr_lgrm; if ($chbt_corp != "semanta") { $chbt_array[$chbt_corp."!!".$chbt_taal]=$chbt_array[$chbt_corp."!!".$chbt_taal]+1; } if ($invr_tabl == "wrtv") { if ($nw < 2) { $domn_array[$invr_tabl."@".$chbt_lnks]=$domn_array[$invr_tabl."@".$chbt_lnks]+1; echo ""; $nw=$nw+1; } } if ($invr_tabl == "data") { if ($ns < 2) { $domn_array[$invr_tabl."@".$chbt_rchs]=$domn_array[$invr_tabl."@".$chbt_rchs]+1; // echo ""; $ns=$ns+1; } } if ($invr_tabl == "sgmt") { if ($nr< 2) { // $domn_array[$invr_tabl."@".$chbt_rchs]=$domn_array[$invr_tabl."@".$chbt_rchs]+1; // echo ""; $nr=$nr+1; } } if ($invr_tabl == "lpzg") { if ($nv < 2) { $domn_array[$invr_tabl."@".$chbt_lnks]=$domn_array[$invr_tabl."@".$chbt_lnks]+1; // echo ""; $nv=$nv+1; } } if (substr($chbt_lnks,0,6)== "./data") { $domn_array[$invr_tabl."@".$chbt_rchs]=$domn_array[$invr_tabl."@".$chbt_rchs]+1; $lchbt_lnks="".$chbt_corp.""; $luttr_srch=""; // $lvgpt_indx=""; // echo ""; echo ""; } } } } } // print_r($domn_array); $cn=0; foreach($domn_array as $domn_key => $domn_val) { $domn_itms=explode("@",$domn_key); $domn_text=$domn_itms[1]; if ($cn < 8) { if (strlen($invr_lgrm) < 64 and $rrelt != $domn_text) { $sim = similar_text($invr_lgrm, $domn, $perc); if ($perc > 25) { $domn_perc=round($perc, 2); echo ""; $rrelt=$domn_text; } } $cn=$cn+1; } } echo "
"; //print_r($chbt_array); arsort($chbt_array); $ca=0; foreach($chbt_array as $chbt_key => $chbt_val) { $ca=$ca+1; if ($ca < 5) { $key_dtls=explode("!!",$chbt_key); $key_corp=$key_dtls[0]; $key_text=$key_dtls[1]; $lchbt_key="".$key_corp.""; echo "
".$lchbt_key; } } ?>
KennisdomeinWebsitechatbotCorpus
".$chbt_lnks."".$chbt_url." ".$chbt_corp. "". $chbt_rchs." ".$lvgpt_indx."
".$chbt_lnks."".$chbt_url." ".$chbt_corp. "". $chbt_rchs." ".$lvgpt_indx."
".$chbt_lnks."".$chbt_url." ".$chbt_corp. "". $chbt_rchs." ".$lvgpt_indx."
".$chbt_lnks."".$chbt_url." ".$chbt_corp. "". $chbt_rchs." ".$lvgpt_indx."
".$lchbt_lnks."".$chbt_url." ".$chbt_corp. "". $chbt_rchs."
".$lchbt_lnks."".$luttr_srch."". $chbt_rchs."
".$domn_text."".$domn_perc."