"; $datm=date("Y-m-d H:i:s", time()); $rfer_srvr=$_SERVER['SERVER_NAME']; $rfer_url=$_SERVER['HTTP_REFERER']; if ($rfer_url == null) { $rfer_url=$rfer_srvr; } $userip=$_SERVER['REMOTE_ADDR']; // echo "
RFER SRVR ".$rfer_srvr." RFER URL ".$rfer_url; require_once ("conv.php"); require_once ("config-smta.php"); require_once ("bwrk-bzkr-func.php"); require_once ("xtrt-aiml-func.php"); require_once ("bepl-sgmt-func.php"); require_once ("xtrt-xxxx-func.php"); // echo "
INVR CHBT ".$invr_chbt."INVR CORP ".$invr_corp." INVR LGRM ".$invr_lgrm." INVR TAAL ".$invr_taal; if ($invr_chbt == null) { $invr_chbt="semantus"; } if ($invr_corp == null) { $invr_corp = "semanta"; } $sql= "SELECT * FROM bzkr where `rchs` = '$rfer_srvr' and `domn` = '$invr_bzv1' 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 "
".$sql." BZKR FUNC Aantallen TABL NUM ".$tabl_num; $hrelt="xxxxx"; // echo "
SYSTEEM FOUT: Geen gesprekspartner voor dit adres "; $datm=date("Y-m-d H:i:s", time()); echo "
Afgeleid uit uw IP Adres.".$userip."
"; $cmds_ipad=$rfer_url; // echo "
HIER MOET HET MEE BZKR ".$invr_bzkr." CHBT ".$invr_chbt."CORP ".$invr_corp." TAAL ".$invr_taal." BZV1 ".urlencode($invr_bzv1)." BZV2 ".$invr_bzv2." LNKS ".$invr_lnks."RCHS ".$invr_rchs." LGRM ".$invr_lgrm." DOMN ". // $cmds_bzv2=$text_file."[splt[".$text_taal."[".$invr_corp."[".$full_val."[1"; $cmds_bzv2=$invr_corp."[bzkr[nederlands[".$invr_bzv1."[".$rfer_srvr."[0"; include("chbt-cmds-code-2.php"); echo "
Deze gegevens zijn opgeslagen ".$cmds_bzv2."
"; if ($tabl_num > 0) { while ($row = mysql_fetch_assoc($tablresult)) { $id=$row['id']; $ipad=$row['ipad']; $domn=$row['domn']; $taal=$row['taal']; $lnks=$row['lnks']; $rchs=$row['rchs']; $levl=$row['levl']; $bzkr_levl=$levl+1; $datm=$row['datm']; $domn_itms=explode(",",$domn); echo "
ID ".$id." IPAD ".$ipad." TAAL".$taal." DOMN ".$domn." LNKS ".$lnks." RCHS ".$rchs; // echo "
IPAD "; // print_r($bzkr_array); $sql1 = "UPDATE bzkr SET `levl`='$bzkr_levl', `datm` ='$datm' WHERE `ipad`= '$refr_url' and `domn` = '$invr_bzv1' "; $logentry_result = mysql_query($sql1, $link); $bzkr_array[$rchs."!!".$domn."!!".$lnks]=$bzkr_array[$rchs."!!".$domn."!!".$lnks]+1; } } echo "
BZKR ARRAY ".$func_parm."
"; //print_r($bzkr_array); echo "
Onze conversatie tot nu toe."; echo ""; // echo ""; foreach ($bzkr_array as $bzv1_key => $bzv1_val) { $bzv1_rslt=explode("!!",$bzv1_key); $bzv1_rchs=$bzv1_rslt[0]; $bzv1_domn=$bzv1_rslt[1]; $bzv1_lnks=$bzv1_rslt[2]; if ($bzv1_domn != $bzv1_rchs and $bzv1_domn != null) { echo ""; } } echo "
CorpusGesprekspartnerWebsite
".$bzv1_domn."".$bzv1_lnks."".$bzv1_rchs."
"; ///////////////// SMTA AIML ////////// $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $invr_bzv1=trim($invr_bzv1); // echo "
INVR BZV1 ".$invr_bzv1; $bzv1_dtls=explode(" ",$invr_bzv1); foreach($bzv1_dtls as $bzv1_key => $bzv1_val) { if (strlen($bzv1_val) > 4) { $subj_array[$bzv1_val]=$subj_array[$bzv1_val]+1; } } $sgmt_rslt=bepl_sgmt($invr_bzv1); // echo "
SGMT RSLT"; // print_r($sgmt_rslt); echo ""; foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { $word_array=""; $smta_array=""; // echo "
SGMT KEY ".$sgmt_key; $bzv1_dtls=explode(" ",$sgmt_key); $smta_totl=0; $mtsw_rslt=xtrt_xxxx($sgmt_key,"nederlands","mtsw"); // print_r($mtsw_rslt); echo "
"; foreach ($mtsw_rslt as $mtsw_key => $mtsw_val) { $mtsw_dtls=explode("!!",$mtsw_key); $mtsw_uttr=$mtsw_dtls[3]; $mtsw_resp=$mtsw_dtls[4]; if (substr($mtsw_resp,1,1)== "-") { echo ""; } } } echo "
".$mtsw_uttr."
".substr($mtsw_resp,2,256)."
"; ?>
Uw uiting

> > > > >
"; $bzv1_rslt=bepl_sgmt($invr_bzv1); foreach($bzv1_rslt as $aiml_key => $aiml_val) { $qstn_rslt=xtrt_aiml($aiml_key); echo "
AIML KEY ".$aiml_key; if ($sw == 0) { $sw=1; $tmpl_dspl=substr($aiml_tmpl,0,64); $ptrn_dspl=$aiml_ptrn; echo "".$aiml_aiml."".$ptrn_perc."%
".$tmpl_perc."%".$aiml_ptrn."
".substr($aiml_tmpl,0,64)."..."; } if ($sw ==1 and count($qstn_rslt) > 1) { $aiml_itms=explode("@",$aiml_key); // print_r($aiml_itms); $aiml_ptrn=$aiml_itms[1]; $aiml_tmpl=$aiml_itms[2]; $aiml_aiml=$aiml_itms[3]; if($aiml_aiml == null) { $aiml_aiml="generiek"; } similar_text($aiml_ptrn,$invr_bzv1, $ptrn_perc); similar_text($aiml_tmpl,$invr_bzv1, $tmpl_perc); // echo "
AIML PTRN ".$aiml_ptrn."AIML TMPL ".$aiml_tmpl; $ptrn_perc=round ($ptrn_perc, 0); $tmpl_perc=round ($tmpl_perc, 0); if($ptrn_perc > 0) { $antw_tabl[$tmpl_perc."@".$ptrn_perc."@".$aiml_tmpl."@".$aiml_ptrn]=$antw_tabl[$tmpl_perc."@".$ptrn_perc."@".$aiml_tmpl."@".$aiml_ptrn]+1; $caiml_aiml= "".$aiml_aiml.""; if ($ptrn_perc == "100") { $tmpl_dspl=substr($aiml_tmpl,0,64); $ptrn_dspl=$aiml_ptrn; // echo "
".$aiml_aiml."".$ptrn_perc."%
".$tmpl_perc."%
".$aiml_ptrn."
".substr($aiml_tmpl,0,128)."..."; } else { $tmpl_dspl=substr($aiml_tmpl,0,64); $ptrn_dspl=$aiml_ptrn; // echo "
".$aiml_aiml."".$ptrn_perc."%
".$tmpl_perc."%
".$aiml_ptrn."
".substr($aiml_tmpl,0,64)."...
"; } } } } krsort($antw_tabl); // print_r($antw_tabl); $sw=0; foreach($antw_tabl as $antw_key => $antw_val) { $antw_dtls=explode("@",$antw_key); $antw_tmpc=$antw_dtls[0]; $antw_ptpc=$antw_dtls[1]; $antw_ptrn=$antw_dtls[2]; $antw_tmpl=$antw_dtls[3]; if ($sw ==0) { $sw=1; echo "".$antw_tmpc."%
".$antw_ptpc."%
".$antw_tmpl."
".substr($antw_ptrn,0,128)."...
"; } } echo ""; echo ""; // print_r($antw_tabl); ksort($antw_tabl); foreach($antw_tabl as $antw_key => $antw_val) { $antw_dtls=explode("@",$antw_key); // print_r($antw_dtls); $pattern=$invr_bzv1; $altn_ptrn=$antw_dtls[2]; $template=$antw_dtls[3]; // echo "
PATTERN ".$pattern." TEMPLATE ".$template; $dspl_antw=str_replace("seeker",$invr_name,$template); $dspl_antw=str_replace("xxxx","web master",$dspl_antw); $dspl_antw=str_replace("gesprekspartner",$invr_chbt,$dspl_antw); $dspl_antw=str_replace("invrvrag",$say,$dspl_antw); $dspl_antw=str_replace("invrmin1",$invr_min1,$dspl_antw); $dspl_antw=str_replace("invrdatm",$datm_datm,$dspl_antw); $dspl_antw=str_replace("invrjaar",$datm_jaar,$dspl_antw); $dspl_antw=str_replace("invrmand",$datm_mand,$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("invrbzkr",$invr_bzkr,$dspl_antw); $dspl_antw=str_replace("invrname",$invr_name,$dspl_antw); $dspl_antw=str_replace("invrbzv1",$invr_bzv1,$dspl_antw); $dspl_antw=str_replace("invrbzv2",$invr_bzv2,$dspl_antw); $dspl_antw=str_replace("invrsmdm",$invr_smdm,$dspl_antw); $dspl_antw=str_replace("invrcont",$invr_cont,$dspl_antw); $dspl_antw=str_replace("invrhttp",$invr_ipad,$dspl_antw); $dspl_antw=str_replace("invripad",$invr_ipad,$dspl_antw); $aiml_rctie=$dspl_antw; // echo ""; $chbt_aiml="<category><pattern>".$pattern."</pattern><template>".$dspl_antw."</template></category>"; $altn_aiml="<category><pattern>".$altn_ptrn."</pattern><template>".$dspl_antw."</template></category>"; // echo ""; } echo "
".$aiml_rctie."
".$chbt_aiml."".$altn_aiml."
"; //echo ""; //echo ""; //echo ""; //echo ""; //echo ""; //echo "
Gesprek ".$invr_chbt."Doorzoeken uitingen ".$invr_chbt."Tekstverwerking ".$invr_chbt."Extractie kennisbank ".$invr_chbt."
"; echo ""; echo ""; echo ""; // echo ""; // echo ""; echo "
"; exit; $invr_lgrm=$altn_ptrn."".$dspl_antw; $plce_hldr=$dspl_antw; $chbt_clor=strlen($dspl_antw) ; echo "
".$chbt_clor.">".$dspl_antw.""; ?>