WORD-FREQ
Determine relations between Utterance and Semanta's knowledge

"; require_once ("conv.php");/////////////////////// ?>
> > > > > > > >
"; $datm=date("Y-m-d H:i:s", time()); echo "
".$datm; set_time_limit(0); // error_reporting(0); echo "
"; echo ""; // require_once ("slct-tabl.php"); // echo "
TWEE INVR VGPT ".$invr_vgpt; //////////////////////// $bzv1_dtls=explode(" ",$invr_bzv1); // require_once ("bild-wiki-func.php"); require_once ("config-smta.php"); // require_once ("chck-infr-func.php"); require_once ("chbt-date-func.php"); require_once ("smta-tlkd-func-0017.php"); require_once ("tlkd-smts-func.php"); // require_once ("taal-ipcd-func.php"); // require_once ("text-isrt-func.php"); require_once ("xtrt-xxxx-func.php"); require_once ("xtrt-aiml-func.php"); require_once ("bepl-sgmt-func.php"); // require_once ("bepl-spec-func.php"); require_once ("bepl-taal-func.php"); //////////////// /////// $taal_rslt=bepl_taal($invr_bzv1); // print_r($taal_rslt); krsort($taal_rslt); $taal_sw=0; foreach($taal_rslt as $taal_key => $taal_val) { if ($taal_sw == 0) { $taal_sw = 1; $text_taal=$taal_key; } } $invr_taal=$text_taal; echo "
Teksttaal is ".$invr_taal."
"; //////////////////////// echo "
"; // print_r($bzv1_dtls); // echo "
"; $new_trgt=0; $sw=0; foreach($bzv1_dtls as $dtls_key => $dtls_val) { // echo "
INVR FUNC ".$invr_func." NEW TRGT ".$new_trgt." SW ".$sw; if (strlen($dtls_val) > 4 ) { if ($sw ==3) { $sw=0; echo ""; } $new_trgt=$new_trgt+1; $sw=$sw+1; // echo ""; } } //////////////////////// echo ""; echo "
"; if ($new_trgt < 3) { // echo "
De tekst bevat ondersteunende woordvormen "; foreach($bzv1_dtls as $dtls_key => $dtls_val) { if (strlen($dtls_val)> 4) { $dtls_val=" * "; } $dtls_mtsw=$dtls_mtsw." ".$dtls_val; } // echo "
DTLS MTSW ".$dtls_mtsw; $mtsw_rslt=xtrt_xxxx("-----",$invr_taal,"mtsw"); ksort($mtsw_rslt); // echo "
MTSW RSLT"; // prInt_r($mtsw_rslt); foreach ($mtsw_rslt as $mtsw_key => $mtsw_val) { $mtsw_dtls=explode("!!",$mtsw_key); $mtsw_taal=$mtsw_dtls[1]; $mtsw_domn=$mtsw_dtls[2]; $mtsw_lnks=$mtsw_dtls[3]; $mtsw_rchs=$mtsw_dtls[4]; if (substr($mtsw_rchs,0,2) == "S-" and $mtsw_taal == $invr_taal) { similar_text($dtls_mtsw,$mtsw_lnks,$smlr_perc); if ($smlr_perc > 60) { $perc_roun=round($smlr_perc); echo "
PERC ROUN ".$perc_roun; $perc_rslt[$perc_roun."@".$mtsw_lnks."@".$mtsw_rchs]=$perc_rslt[$perc_roun."@".$mtsw_lnks."@".$mtsw_rchs]+1; echo ""; // echo ""; } } } krsort($perc_rslt); // print_r($perc_rslt); foreach($perc_rslt as $perc_key => $perc_val) { $perc_dtls=explode("@",$perc_key); echo ""; } } echo "
".$perc_roun."
".$mtsw_lnks."
".$mtsw_rchs."
".$mtsw_lnks."
".$mtsw_rchs."
".$perc_dtls[0]."
".$perc_dtls[1]."
".$perc_dtls[2]."
"; // echo "
INVR BZV1 ".$invr_bzv1." INVR VGPT ".urlencode($invr_vgpt)." INVR CHBT ".$invr_chbt." INVR CONT ".$invr_cont; if ($invr_vgpt == null) { $invr_vgpt="gesprekspartner"; } if ($invr_cont == null) { $invr_cont=$conv_tabl[$invr_vgpt]; } // print_r($conv_tabl); echo "
CONV RSLT"; echo $conv_rslt; $invr_vgpt=trim($invr_vgpt); $invr_cont=trim($invr_cont); $conv_rslt=$conv_tabl[$invr_vgpt]; // echo "
CONV RSLT"; // echo $conv_rslt; $conv_dtls=explode("@",$conv_rslt); // echo "
CONV DTLS"; // print_r($conv_dtls); $conv_vrag=$conv_dtls[0]; $conv_text=trim($conv_dtls[1]); $conv_itms=explode(",",$conv_text); $conv_vgpt=trim($invr_vgpt); echo ""; $linvr_vgpt="".$invr_vgpt.""; $linvr_chbt="".$invr_chbt.""; echo ""; echo ""; echo "

Toegang tot alle kennisdomeinen van
".$linvr_vgpt."

Toegang tot de kennis van
".$linvr_chbt."
"; $luval_chbt="".$uval_chbt.""; // echo "".$luval_chbt." ".$uval_itms[1].""; echo ""; echo ""; // print_r($uval_array); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); foreach($uval_array as $uval_key => $uval_val) { // $uval_val=urlencode($uval_val $uval_dtls=explode("%3C",$uval_key); // print_r($uval_dtls); $uval_itms=explode("@",$uval_dtls[0]); $uval_chbt=$uval_itms[0]; $luval_chbt="".$uval_chbt.""; // echo ""; $uval_https=explode("https",$uval_itms[1]); // print_r($uval_https); $uval_url=$uval_https[1]; if(substr($uval_url,0,1) == ":") { $suval_url=str_replace(" ","+",$uval_url); // echo "
".$uval_chbt.""; } } echo "
".$luval_chbt." ".$uval_itms[1]."
"; echo ""; /////////// $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); echo "
"; $linvr_vgpt="".$invr_vgpt.""; $linvr_chbt="".$invr_chbt.""; // echo ""; // echo ""; echo "

Toegang tot alle kennisdomeinen van
".$linvr_vgpt."

Toegang tot het brein van
".$linvr_chbt."
"; echo ""; echo ""; if ($invr_chbt == null) { $corp_tabl="intnl,freq,wiki,smta,data,mtsw"; $corp_array=explode(",",$corp_tabl); print_r($corp_array); echo "
"; echo ""; $sw=0; foreach($corp_array as $corp_key => $corp_val) { $conv_rslt=$conv_tabl[$corp_val]; $conv_dtls=explode("@",$conv_rslt); $conv_vrag=$conv_dtls[0]; $conv_text=trim($conv_dtls[1]); $conv_itms=explode(",",$conv_text); $conv_vgpt=trim($conv_itms[0]); $sconv_text=str_replace(" ","+",$conv_text); // $conv_text=str_replace(" ","",$conv_text); // $conv_text=str_replace(",","
",$conv_text); $text_itms=explode(",",$conv_text); // echo ""; $sw=0; } // echo "
TEXT VAL ".$text_val; // echo ""; $sw=$sw+1; // echo ""; } } echo ""; } $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $sinvr_cont=str_replace(" ","+",$invr_cont); // echo ""; $cont_dtls=explode(",",$invr_cont); if (count($cont_dtls) == 1) { $cont_dtls[0]=$invr_cont; } // print_r($cont_dtls); // $invr_vgpt=$cont_dtls[0]; $base_rslt=xtrt_xxxx($invr_vgpt,"nederlands","base"); // echo "
COUNT BASE RSLT ".count($base_rslt); // print_r($base_rslt); // echo ""; foreach($base_rslt as $base_key =>$base_val) { $base_dtls=explode("!!",$base_key); $base_domn=$base_dtls[2]; $base_lnks=$base_dtls[3]; $base_rchs=$base_dtls[4]; $base_corp=$base_dtls[7]; // echo ""; } if (count($cont_dtls) > 0) { foreach($cont_dtls as $cont_key => $cont_val) { $scont_val=str_replace(" ","+",$cont_val); // echo ""; } } echo "

".$conv_text."
"; foreach($text_itms as $text_key => $text_val) { if ($sw == 8) { echo "
".$invr_cont."
".$base_corp."
"; $bzv1_dtls=explode(" ",$invr_bzv1); $sgmt_rslt=bepl_sgmt($invr_bzv1); // print_r($sgmt_rslt); echo ""; foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { // echo "
SGMT KEY ".$sgmt_key; $invr_bzv1=strtolower($invr_bzv1); $sgmt_key=strtolower($sgmt_key); $aiml_ptrn=$sgmt_key; $aiml_tmpl=$invr_bzv1; $aiml_that=$invr_bzv2; $aiml_file=$invr_vgpt; echo ""; $sql1 = "INSERT INTO `wiml` (`id`,`bot_id`,`pattern`,`thatpattern`,`template`,`topic`,`filename`) VALUES (NULL,'1','$aiml_ptrn','$aiml_that','$aiml_tmpl','','$aiml_file')"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); // $logentry_result = mysql_query($sql1, $link); } echo "
".$aiml_ptrn."
".$aiml_tmpl."
"; echo ""; echo ""; echo "

".$invr_bzv1."

Ogenblikje aub
"; $line=$invr_bzv1; require_once("conv-line-bzv1.php"); $bzv1_sent=explode(".",$line); $shrt_line=$invr_bzv1; $long_line=""; $word_cntr=0; echo ""; foreach($bzv1_sent as $sent_key => $sent_val) { $posn_word=0; if ($sent_val != null) { // echo ""; } $sgmt_rslt=bepl_sgmt($sent_val); // echo "
SGMT RSLT"; // print_r($sgmt_rslt); // echo ""; echo "
ZINNEN ".$sent_val."".$sent_key."
".$sent_val."
"; echo ""; foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { $aiml_rslt=xtrt_aiml($sgmt_key,"nederlands"); // print_r($aiml_rslt); foreach($aiml_rslt as $aiml_key => $aim_val) { $aiml_dtls=explode("@",$aiml_key); $aiml_scre=$aiml_dtls[0]; $aiml_ptrn=$aiml_dtls[1]; $aiml_tmpl=$aiml_dtls[2]; $aiml_file=$aiml_dtls[3]; // echo ""; $rslt_array[$sgmt_key."!!".$aiml_tmpl]=$rslt_array[$sgmt_key."!!".$aiml_tmpl]+1; // echo ""; } // echo ""; $smta_zoek=""; $sgmt_itms=explode(" ",$sgmt_key); foreach($sgmt_itms as $itms_key => $itms_val) { // echo "
SGMT ITMS". $smta_zoek; // print_r($sgmt_itms); $smta_rslt=xtrt_xxxx($itms_val,"nederlands","smta",4); foreach($smta_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); // echo "
SMTA DTLS"; // print_r($freq_dtls); $smta_domn=$smta_dtls[2]; $smta_rchs=$smta_dtls[4]; $smta_lnks=$smta_dtls[3]; // echo "
SGMT INVR VGPT ".$invr_vgpt; // $conv_text=$conv_tabl[smta]; // $conv_rslt=str_replace("invraiml",$dtls_word,$conv_text); // echo "
CONV RSLT ".$conv_rslt; $conv_rslt=str_replace("invrvgpt",$invr_vgpt,$conv_rslt); $conv_rslt=str_replace("invrbzkr",$invr_bzkr,$conv_text); $sconv_rslt=str_replace(" ","+",$conv_rslt); // echo "
CONV RSLT ".$conv_rslt; if ($smta_relt != $smta_rchs) { // echo ""; $rslt_array[$sgmt_key."!!".$smta_rchs]=$rslt_array[$sgmt_key."!!".$smta_rchs]+1; $smta_relt=$smta_rchs; } } } $conv_rslt=""; // print_r($smta_rslt); $smta_array=array(); $dtls_array=array(); $sgmt_key=trim($sgmt_key); $ssgmt_key=str_replace(" ","+",$sgmt_key); echo "
".$aiml_scre."-".$aiml_ptrn."
".$aiml_tmpl."
".$aiml_tmpl."
SGMT KEY ".$sgmt_key."
".substr($smta_lnks,0,128)."...
".$smta_rchs."
"; echo ""; // echo ""; $frst_rslt=smta_tlkd($sgmt_key."@tlkd"); // print_r($frst_rslt); echo ""; foreach($frst_rslt as $frst_key => $frst_val) { $tlkd_dtls=explode("@",$frst_key); // print_r($tlkd_dtls); // echo "
FRST KEY ".$frst_key." FRST VAL ".$frst_val; $tlkd_lnks=trim($tlkd_dtls[0]); $gram_itms=explode(" ",$tlkd_lnks); // echo "
"; // print_r($gram_itms); $gram_lnks=$gram_itms[1]; $tlkd_rchs=trim($tlkd_dtls[1]); // $tlkd_rchs=trim($tlkd_val); $tlkd_lnks=trim($tlkd_lnks); $tlkd_rchs=trim($tlkd_rchs); $rchs_dtls=explode(" ",$tlkd_rchs); if (count($rchs_dtls) !=0 and $tlkd_rchs == $sgmt_key) { if ($gram_lnks.$tlkd_rchs != $grelt) { // echo ""; // echo "
".$tlkd_lnks."--".$tlkd_rchs."
"; $grelt=$gram_lnks.$tlkd_rchs; } } } // echo "
".$sgmt_key."
".$sgmt_key."
TEKST TEST".$gram_lnks."
"; $tlkd_rslt=smta_tlkd($sgmt_key."@scnd"); // print_r($tlkd_rslt); ksort($tlkd_rslt); $tn=0; foreach($tlkd_rslt as $tlkd_key => $tlkd_val) { $tlkd_dtls=explode("@",$tlkd_key); // print_r($tlkd_dtls); $tlkd_lnks=trim($tlkd_dtls[1]); $tlkd_rchs=trim($tlkd_val); if (strlen($tlkd_lnks) > 4) { if ($trelt != $tlkd_lnks) { // echo ""; $tlkd_array[$tlkd_val]=$tlkd_array[$tlkd_val]+1; } } } // $smta_array[$tlkd_val]=$smta_array[$tlkd_val]+1; } // print_r($bzv1_dtls); foreach($bzv1_dtls as $bzv1_key => $bzv1_val) { // echo "
BZV1 VAL ".$bzv1_val; if (strlen($bzv1_val) < 5) { // $shrt_line=str_replace($bzv1_val,"*",$shrt_line); } $posn_word=$posn_word+1; if (strlen($bzv1_val) > 4) { $shrt_line=str_replace($bzv1_val,"*",$shrt_line); $smta_rslt=xtrt_xxxx($bzv1_val,"nederlands","berp",12); foreach($smta_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); // echo "
FREQ DTLS"; // print_r($freq_dtls); $smta_domn=$smta_dtls[2]; $smta_rchs=$smta_dtls[4]; $smta_lnks=$smta_dtls[3]; if ($smta_relt != $smta_rchs) { // echo ""; // echo ""; $rslt_array[$sgmt_key."!!".$smta_rchs]=$rslt_array[$sgmt_key."!!".$smta_rchs]+1; $smta_relt=$smta_rchs; } } $smta_rslt=xtrt_xxxx($bzv1_val,"nederlands","data",4); foreach($smta_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); // echo "
FREQ DTLS"; // print_r($freq_dtls); $smta_domn=$smta_dtls[2]; $smta_rchs=$smta_dtls[4]; $smta_lnks=$smta_dtls[3]; $data_dtls=explode("/",$smta_rchs); // echo "
DATA DTLS"; // print_r($data_dtls); $data_corp=$data_dtls[2]; $base_rslt=xtrt_xxxx($data_corp,"nederlands","base",2); foreach($base_rslt as $base_key => $base_val) { $base_dtls=explode("!!",$base_key); // echo "
BASE DTLS"; // print_r($base_dtls); $base_vgpt=$base_dtls[2]; if ($data_relt != $smta_rchs) { $lsmta_rchs="".substr($smta_rchs,0,64)."deze dan.. ..."; // echo ""; // echo ""; // $rslt_array[$sgmt_key."!!".$smta_rchs]=$rslt_array[$sgmt_key."!!".$smta_rchs]+1; $data_relt=$smta_rchs; } } } $smta_rslt=xtrt_xxxx($bzv1_val,"nederlands","wiki",4); foreach($smta_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); // echo "
FREQ DTLS"; // print_r($freq_dtls); $smta_domn=$smta_dtls[2]; $smta_rchs=$smta_dtls[4]; $smta_lnks=$smta_dtls[3]; if ($wiki_relt != $smta_rchs and $smta_rchs != null) { // echo ""; $wiki_relt=$smta_rchs; $rslt_array[$sgmt_key."!!".$smta_rchs]=$rslt_array[$sgmt_key."!!".$smta_rchs]+1; } // echo ""; } $word_cntr=$word_cntr+1; $posn_line=$posn_line.$posn_word." "; // $long_line=$long_line." ".$bzv1_val; // echo "
BZV1 VAL ".$bzv1_val." WORD POSN".$posn_word; // echo "".$shrt_val.""; $data_rslt=xtrt_xxxx($bzv1_val,"nederlands","mtsw",4); $data_cntr=count($data_rslt); // echo ""; $gw27_rslt=xtrt_xxxx($bzv1_val,"nederlands","gw27"); // echo "
GW27 RSLT"; // print_r($gw27_rslt); $gram_rslt=smta_tlkd($bzv1_val."@gram"); // $gram_rslt=tlkd_smts($bzv1_val); // echo "
GRAM RSLT"; // print_r($gram_rslt); foreach($gram_rslt as $gram_key => $gram_val) { // echo ""; $gram_dtls=explode("@",$gram_key); // echo "
GRAM DTLS "; // print_r($gram_dtls); foreach($gram_dtls as $dtls_key => $dtls_val) { $dtls_itms=explode(",",$dtls_val); if (count($dtls_itms) > 1) { // echo "
DTLS ITMS "; // print_r($dtls_itms); } foreach($dtls_itms as $itms_key => $itms_val) { $bzv1_val=trim($bzv1_val); $itms_val=trim($itms_val); // echo "
BZV1 VAL ".urlencode($bzv1_val)." ITMS VAL ".urlencode($itms_val); if ($itms_val !="znw znw" or $bzv1_val != $itms_val) { // echo "
BZV1 VAL ".$bzv1_val." ITMS VAL ".$itms_val; $dtls_array[$itms_val]=$dtls_array[$itms_val]+1; } } } } $gram_text=$gram_dtls[1]; // echo ""; // $smta_array[$tlkd_val]=$smta_array[$tlkd_val]+1; $wrds_array[$bzv1_val]=$data_cntr; $tlkd_rslt=smta_tlkd($bzv1_val."@scnd"); foreach($tlkd_rslt as $tlkd_key => $tlkd_val) { // echo ""; $smta_array[$tlkd_val]=$smta_array[$tlkd_val]+1; } if (count($gw27_rslt) == 0) { $gram_array[$bzv1_val]=$gram_array[$bzv1_val]+1; // echo " wikipedia "; // echo ""; $nd=0; foreach($dtls_array as $dtls_key => $dtls_val) { $dtls_itms=explode(".",$dtls_key); // print_r($dtls_itms); $dtls_word=$dtls_itms[0]; $dtls_gram=$dtls_itms[1]; // echo "
DTLS GRAM".$dtls_gram; $conv_text=""; $conv_text=$conv_tabl[$dtls_gram]; // echo "
"; if ($conv_text == null) { $freq_rslt=xtrt_xxxx($dtls_word,"nederlands","freq",1); // print_r($freq_rslt); foreach($freq_rslt as $freq_key => $freq_val) { $freq_dtls=explode("!!",$freq_key); // echo "
FREQ DTLS"; // print_r($freq_dtls); $freq_domn=$freq_dtls[2]; $freq_rchs=$freq_dtls[3]; $freq_lnks=$freq_dtls[4]; $freq_bron=$conv_tabl[$freq_lnks]; $sfreq_rchs=str_replace(" ","+",$freq_rchs); // echo "
"; } } $dtls_taal=$dtls_itms[2]; // echo "
INVR VGPT ".$invr_vgpt; // echo "
INVR BZKR ".$invr_bzkr; $conv_rslt=str_replace("invraiml",$dtls_word,$conv_text); // echo "
CONV RSLT ".$conv_rslt; $conv_rslt=str_replace("invrvgpt",$invr_vgpt,$conv_rslt); $conv_rslt=str_replace("invrbzkr",$invr_bzkr,$conv_rslt); $conv_itms=explode("@ ",$conv_rslt); // print_r($conv_itms); echo "
".$tlkd_dtls[1]."
".$tlkd_val.""; $trelt=$tlkd_lnks; } if ($trelt == $tlkd_lnks) { if ($tn < 8) { $tn=$tn+1; // echo "
".$tlkd_val."
".$conv_tabl[smta]."
".substr($smta_lnks,0,128)."...
".substr($smta_rchs,0,48)."...
".substr($smta_lnks,0,128)."...
".substr($smta_rchs,0,128)."...
".$conv_tabl[data]."
".substr($smta_lnks,0,64)."...
".$lsmta_rchs."
".substr($smta_lnks,0,64)."...
".$lsmta_rchs."
".$conv_tabl[wiki]."
".substr($smta_lnks,0,64)."...
".substr($smta_rchs,0,48)."...
".$smta_lnks."
".$smta_rchs."
".$shrt_key."
".$bzv1_val." ".$data_cntr."
GRAM KEY ".$gram_key."
GRAM KEY ".$gram_key." GRAM TEXT ".$gram_text."
TLKD VAL ".$tlkd_val."
".urlencode($bzv1_val).""; } } } // echo "
".$sgmt_key."
CONV TEXT ".$conv_text."
".$freq_bron."
"; // echo "
"; if ($nd==0) { // echo "
".$conv_itms[0]."
Een antwoord formuleren kan door op de tekst te klikken.
"; } $conv_resp=$conv_itms[1]; $sconv_resp=str_replace(" ","+",$conv_resp); // echo "
conv_resp".$conv_resp; if ($nd < 5) { if ($dtls_word !=null) { // echo "twee
".$smta_rchs."
"; $nd=$nd+1; $sinvr_bzv2=str_replace(" ","+",$invr_bzv2); // echo "
"; // echo "een
".$lconv_rslt."
"; $smta_rslt=xtrt_xxxx("xdotx".$conv_rslt,"nederlands","smta"); foreach($smta_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); $smta_rchs=$smta_dtls[3]; $smta_lnks=$smta_dtls[4]; // print_r($mtsw_dtls); if ($smta_rchs !=null) { // echo "
".$smta_rchs."
"; } } } } } arsort($smta_array); // echo "
SMTA ARRAY"; // print_r($smta_array); $ns=0; $mtsw_rslt=xtrt_xxxx($sgmt_key,"nederlands","mtsw",4); foreach($mtsw_rslt as $mtsw_key => $mtsw_val) { $mtsw_dtls=explode("!!",$mtsw_key); // print_r($mtsw_dtls); $mtsw_domn=$mtsw_dtls[2]; $mtsw_lnks=$mtsw_dtls[3]; $mtsw_rchs=$mtsw_dtls[4]; $mtsw_levl=$mtsw_dtls[6]; if ($mtsw_levl == 10) { // echo "
".$mtsw_domn."
".$mtsw_rchs."
"; $rslt_array[$sgmt_key."!!".$mtsw_rchs]=$rslt_array[$sgmt_key."!!".$mtsw_rchs]+1; } } // echo "
BZV1 VAL ".$bzv1_val." SHRT LINE ".$shrt_line; // echo "
ASTERISKS ".substr_count($shrt_line, '*'); } } echo "
"; print_r($tlkd_array); /////////////////////// echo ""; // echo "
SHRT LINE ".$shrt_line; $shrt_rslt=bepl_sgmt($shrt_line); // print_r($shrt_rslt); // echo "
SHRT RSLT ".$shrt_rslt; foreach($shrt_rslt as $shrt_key => $shrt_val) { $shrt_itms=explode("*",$shrt_key); // echo "
SHRT ITMS"; // print_r($shrt_itms); foreach($shrt_itms as $itms_key => $itms_val) { $itms_dtls=explode(" ",$itms_val); // print_r($itms_dtls); // echo "
COUNT IMS DTLS ".count($itms_dtls); if (count($itms_dtls) == 2 ) { $shrt_comb=$itms_dtls[0]." ".$itms_dtls[1]; $shrt_comb=trim($shrt_comb); $zoek_sgmt="%".$shrt_comb."%"; // echo "
SHRT COMB ".$shrt_comb; $sql = "SELECT * FROM mtsw WHERE `lnks` like '$zoek_sgmt' or `lnks`= '$shrt_comb' "; $trefresult = mysql_query($sql, $link); $tref_num = mysql_num_rows($trefresult); // echo "
SQL TEXT ".$sql." Aantallen ".$tref_num." in mtsw voor ".$zoek_sgmt; while ($row = mysql_fetch_assoc($trefresult) ) { $lnks=$row['lnks']; $rchs=$row['rchs']; // echo ""; $rslt_array[$lnks."!!".$rchs]=$rslt_array[$lnks."!!".$rchs]+1; } } if (count($itms_dtls) > 2 ) { $shrt_comb=$itms_dtls[0]." ".$itms_dtls[1]." ".$itms_dtls[2]; } $shrt_comb=trim($shrt_comb); $zoek_sgmt="%".$shrt_comb."%"; // echo "
SHRT COMB ".$shrt_comb; $sql = "SELECT * FROM mtsw WHERE `lnks` like '$zoek_sgmt' or `lnks`= '$shrt_comb' "; $trefresult = mysql_query($sql, $link); $tref_num = mysql_num_rows($trefresult); // echo "
SQL TEXT ".$sql." Aantallen ".$tref_num." in mtsw voor ".$zoek_sgmt; while ($row = mysql_fetch_assoc($trefresult) ) { $lnks=$row['lnks']; $rchs=$row['rchs']; // echo ""; $rslt_array[$lnks."!!".$rchs]=$rslt_array[$lnks."!!".$rchs]+1; } } } // echo "
".$invr-bzv1." met semantische kenmerken
".$rchs."
".$invr-bzv1." met semantische kenmerken
".$rchs."
"; echo ""; $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); foreach($smta_array as $smta_key => $smta_val) { // echo "
SMTA KEY".$smta_key." RESPONSE ".$conv_tabl[$smta_key]; $lwiki_key="Kijk hier naar ".$smta_key." en ".$invr_bzv1." in wikipedia "; $lsmta_key="Formuleer een antwoord voor ".$smta_key.""; echo ""; $ns=$ns+1; } $shrt_array[$shrt_line]=$sgmt_key; arsort($gram_array); $gram_cntr=count($gram_array); // echo "
GRAM ARRAY ".$gram_cntr." WORD COUNTER ".$word_cntr; echo "
".$lsmta_key."".$lwiki_key."
"; if ($gram_cntr > 0) { $word_perc=$gram_cntr/$word_cntr; $text_perc=number_format($word_perc*100, 0); // echo "
TEXT PERC ".$text_perc."% GRAM ARRAY ".$gram_cntr." WORD COUNTER ".$word_cntr; foreach ($gram_array as $gram_key => $gram_val) { // echo "
"; } } // print_r($conv_tabl); echo "
".$gram_val."
"; // echo "
POSN LINE ".$posn_line; $shrt_dtls=explode(" ",$posn_line); // print_r($posn_dtls); // echo "
SHRT LINE ".$shrt_line; $shrt_dtls=explode(" ",$shrt_line); // print_r($shrt_dtls); // echo "
LONG LINE ".$long_line; $long_dtls=explode(" ",$long_line); // print_r($long_dtls); // print_r($shrt_dtls); $line_dtls=explode(" ",$line); foreach($shrt_dtls as $dtls_key => $dtls_val) { // echo "".$line_dtls[$dtls_key]."".$dtls_val.""; } echo ""; //////////////////////// foreach($sgmt_array as $sgmt_key => $sgmt_val) { $sgmt_dtls=explode("!!",$sgmt_key); $sgmt_text=$sgmt_dtls[0]; $sgmt_smta=$sgmt_dtls[1]; if ($srelt != $sgmt_text) { // echo "
".$sgmt_text."
"; $srelt=$sgmt_text; } // echo "
".$sgmt_smta.""; ///////////////// arsort($tlkd_array); // echo "
TLKD ARRAY"; // print_r($tlkd_array); if (count($tlkd_array) > 0) { $tr=0; foreach ($tlkd_array as $tlkd_key => $tlkd_val) { if ($tr< 4) { $tlkd_dtls=explode("!!",$tlkd_key); $tlkd_sgmt=$tlkd_dtls[0]; $tlkd_sgmt=trim($tlkd_sgmt); $tlkd_resp=$tlkd_dtls[1]; if ($tlkd_resp == $sgmt_smta) { // echo "
TLKD RESP ".$tlkd_resp." SGMT SMTA ".$sgmt_smta; echo "
".$tlkd_resp."-".$tlkd_sgmt."-".$sgmt_text."-".$sgmt_smta."
"; echo "
".$tlkd_sgmt."-".$sgmt_smta."
"; $fnal_array[$sgmt_smta]=$fnal_array[$sgmt_smta]+1; $tr=$tr+1; } } } } } $datm=date("Y-m-d H:i:s", time()); // echo "
Alle TLKD ".$datm; echo ""; exit; // echo "
RSLT ARRAY"; // print_r($rslt_array); echo ""; $ns=0; $sgmt_array=array(); foreach ($rslt_array as $rslt_key => $rslt_val) { $rslt_dtls=explode("!!",$rslt_key); // print_r($rslt_dtls); $rslt_sgmt=$rslt_dtls[0]; $rslt_sgmt=trim($rslt_sgmt); $rslt_resp=$rslt_dtls[1]; $line=$rslt_resp; // echo "
LINE ".$line; require_once("conv-line-bzv1.php"); $rslt_resp=$line; $rslt_resp=urldecode($line); // echo "
RSLT RESP ".$rslt_resp; $ns=0; if (strlen($rslt_resp) < 65) { $tlkd_rslt=smta_tlkd($rslt_resp."@scnd"); // echo "
TLKD RSLT "; // print_r($tlkd_rslt); // echo ""; foreach($tlkd_rslt as $tlkd_key => $tlkd_val) { if ($ns < 4) { // echo ""; $sgmt_array[$rslt_resp."!!".$tlkd_val]=$sgmt_array[$rslt_resp."!!".$tlkd_val]+1; $ns=$ns+1; } } // echo ""; $drelt=$rslt_sgmt; echo "
Ik heb onderstaande semantische aspecten gevonden in het antwoord
".$rslt_resp."
".$rslt_resp."
".$tlkd_val."
".$rslt_resp."
"; // echo "
SGMT ARRAY "; // print_r($sgmt_array); echo ""; } } // echo ""; foreach($sgmt_array as $sgmt_key => $sgmt_val) { $sgmt_dtls=explode("!!",$sgmt_key); $sgmt_text=$sgmt_dtls[0]; $sgmt_smta=$sgmt_dtls[1]; if ($srelt != $sgmt_text) { // echo ""; $srelt=$sgmt_text; } // echo ""; ///////////////// arsort($tlkd_array); // echo "
TLKD ARRAY"; // print_r($tlkd_array); if (count($tlkd_array) > 0) { $tr=0; foreach ($tlkd_array as $tlkd_key => $tlkd_val) { if ($tr< 4) { $tlkd_dtls=explode("!!",$tlkd_key); $tlkd_sgmt=$tlkd_dtls[0]; $tlkd_sgmt=trim($tlkd_sgmt); $tlkd_resp=$tlkd_dtls[1]; if ($tlkd_resp == $sgmt_smta) { // echo "
TLKD RESP ".$tlkd_resp." SGMT SMTA ".$sgmt_smta; // echo ""; // echo ""; $fnal_array[$sgmt_smta]=$fnal_array[$sgmt_smta]+1; $tr=$tr+1; } } } } } arsort($fnal_array); $fk=0; foreach($fnal_array as $fnal_key => $fnal_val) { if ($fk < 4) { $fk=$fk+1; echo ""; } } $datm=date("Y-m-d H:i:s", time()); echo "
Einde ".$datm; exit; ?>
Ik heb onderstaande semantische aspecten gevonden
".$invr_bzv1."
".$sgmt_text."
".$sgmt_smta."
".$tlkd_resp."-".$tlkd_sgmt."-".$sgmt_text."-".$sgmt_smta."
".$tlkd_sgmt."-".$sgmt_smta."
".$fnal_key."-".$fnal_val."