Grammaticale segmentatie


Semantus
Host 10.184.19.84 1
Host 10.184.19.84 2
Connected successfully
Host 10.184.19.84 3 IPAD CNTR IP Code=".$ipcd; $sql = "SELECT * from land where `rchs`= '$ipcd' order by levl desc "; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $result1 = mysql_query($sql, $link); $num_lang = mysql_num_rows($result1); // echo "
IPAD CNTR Aantal landen ".$num_lang; $cntr_array=array(); $l=0; $sw=0; while ($row = mysql_fetch_assoc($result1)) { $lnks=$row['lnks']; $rchs=$row['rchs']; $levl=$row['levl']; // echo "ipad-cntr-func Nederlandse landnaam".$lnks; $cntr_array[$l]=$lnks; $l=$l+1; } // echo "
IPAD CNTR
"; // print_r($cntr_array); return $cntr_array; } ?> ".$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); } ?> 
Uw tekst
> > > > > > > > > > > >
Spreker
Gesprekspartner
Meest recente uiting:".urlencode($invr_bzv1); // $invr_bzv1=$invr_lnks." ".$invr_lgrm." ".$invr_rchs; $invr_bzv1=trim($invr_bzv1); $splt_bzv1=explode(" ",$invr_bzv1); // echo "
COUNT SPLT BZV1 ".count($splt_bzv1); if (count($splt_bzv1) > 3 and count($splt_bzv1) < 7) { $invr_lnks=$splt_bzv1[0]." ".$splt_bzv1[1]." ".$splt_bzv1[2]; $invr_rchs=$splt_bzv1[3]." ".$splt_bzv1[4]." ".$splt_bzv1[5]; // echo "
6 LNKS ".$invr_lnks."RCHS ".$invr_rchs; $splt_array[0]=$invr_lnks; $splt_array[1]=$invr_rchs; } if (count($splt_bzv1) > 5 and count($splt_bzv1) < 9) { $invr_lnks=$splt_bzv1[0]." ".$splt_bzv1[1]." ".$splt_bzv1[2]; $invr_midn=$splt_bzv1[3]." ".$splt_bzv1[4]." ".$splt_bzv1[5]; $invr_rchs=$splt_bzv1[6]." ".$splt_bzv1[7]." ".$splt_bzv1[8]; // echo "
9 LNKS ".$invr_lnks." MIDN ".$invr_midn. " RCHS ".$invr_rchs; $splt_array[0]=$invr_lnks; $splt_array[1]=$invr_midn; $splt_array[2]=$invr_rchs; } if (count($splt_bzv1) > 9) { $sgmt_rslt=bepl_sgmt($invr_bzv1,2); $sw=0; // print_r($sgmt_rslt); foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { $splt_array[$sw]=$sgmt_key; $sw=$sw+1; } // print_r($splt_array); $invr_lnks=$splt_array[0]; $invr_midn=$splt_array[1]; $invr_rchs=$splt_array[2]; // echo "
> 9 LNKS ".$invr_lnks." MIDN ".$invr_midn. " RCHS ".$invr_rchs; } if (count($splt_bzv1) < 3) { $splt_array[0]=$invr_bzv1; $invr_lnks=$invr_bzv1; } $slct_tabl="gw27,mtsw,smta,data,base,wtvr"; // print_r($splt_array); foreach($splt_array as $splt_key => $splt_val) { echo "
".$splt_val."
"; $aiml_rslt=xtrt_aiml($splt_val); // print_r($aiml_rslt); $ad=0; ///////// foreach($aiml_rslt as $aiml_key => $aiml_val) { $aiml_dtls=explode("@",$aiml_key); // print_r($aiml_dtls); if ($srelt != $sgmt_key) { $srelt=$sgmt_key; echo "
".$sgmt_key."
"; } if ($ad < 6) { if (substr_count($sgmt_key," ") > 1) { $data_sw=1; $sgmt_key=trim($sgmt_key); if ($srelt != $sgmt_key) { $srelt=$sgmt_key; echo "
".$sgmt_key."
"; } $aiml_long=$aiml_dtls[2]; $aiml_long=str_replace($sgmt_key,"...",$aiml_long); // echo "
".$sgmt_key."
".$aiml_long."...
"; } if (substr_count($sgmt_key," ") < 2) { $data_sw=1; $sgmt_key=trim($sgmt_key); if ($lrelt != $sgmt_key) { $lrelt=$sgmt_key; echo "
".$sgmt_key."
"; } // echo "
COUNT SGMT KEY SHRT ".substr_count($sgmt_key," ")."
"; $aiml_shrt=$aiml_dtls[1]; $aiml_shrt=str_replace($sgmt_key,"...",$aiml_shrt); // echo "
".$aiml_shrt."...
"; } $ad=$ad+1; } } ///////// if (count($aiml_rslt) == 0 or count($splt_array) == 1) { $all_tabl=explode(",",$slct_tabl); $frst_begn="%".$splt_val."%"; if (count($splt_array) == 1) { $frst_begn=$splt_val; } // print_r($all_tabl); foreach($all_tabl as $tabl_key => $tabl_val) { $invr_tabl=$tabl_val; // $sql0 = "SELECT * FROM wiki where `rchs` like '$zoek_begn' or `rchs` like '$zoek_midn' or `rchs` like '$zoek_eind' or `rchs` like '$frst_begn' order by lnks,rchs,domn desc"; $sql0 = "SELECT * FROM $tabl_val where `rchs` like '$frst_begn' or `lnks` like '$frst_begn' order by lnks,rchs,domn desc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $tablresult = mysql_query($sql0, $link); $tabl_num = mysql_num_rows($tablresult); // echo "
Aantallen ".$tabl_val." ".$tabl_num."
"; echo ""; if ($tabl_num == 0) { $tabl_rslt=xtrt_xxxx($splt_val,$invr_taal,$tabl_val,2); // print_r($tabl_rslt); foreach($tabl_rslt as $tabl_key => $tabl_val) { $tabl_dtls=explode("!!",$tabl_key); $taal=$tabl_dtls[1]; $domn=$tabl_dtls[2]; $lnks=$tabl_dtls[3]; $rchs=$tabl_dtls[4]; $ipad=$tabl_dtls[7]; $domn_array[$domn]=$domn_array[$domn]+1; $lnks_array[$domn."@".$rchs."@".$lnks."@".$taal]=$lnks_array[$domn."@".$rchs."@".$lnks."@".$taal]+1; } } // print_r($lnks_array); // echo "
You can select your chatbot here by selecting his profession and get to know his or her knowledge."; if ($tabl_num > 0) { $np=0; while ($row = mysql_fetch_assoc($tablresult)) { $scre=$row['score']; $id=$row['id']; $ipad=$row['ipad']; $taal=$row['taal']; $domn=$row['domn']; $domn_array[$domn]=$domn_array[$domn]+1; // echo "
DOMN ".$domn; $lnks=$row['lnks']; $string=$lnks; $rchs=$row['rchs']; $perd_sent=explode(".",$rchs); // print_r($perd_sent); // echo "
SCORE ".$scre." DOMN ".$domn." LNKS ".$lnks." RCHS ".$rchs; $lnks_array[$domn."@".$rchs."@".$lnks."@".$taal]=$lnks_array[$domn."@".$rchs."@".$lnks."@".$taal]+1; $splt_rchs=explode(" ",$domn); // print_r($splt_rchs); // $lnks_array[$lnks."@".$rchs]=$lnks_array[$lnks."@".$rchs]+1; } } } } if (count($lnks_array) > 0) { echo "
"; $ld=0; foreach($lnks_array as $lnks_key => $lnks_val) { $lnks_dtls=explode("@",$lnks_key); $lnks_domn=$lnks_dtls[0]; $lnks_vrag=$lnks_dtls[1]; $lnks_antw=$lnks_dtls[2]; $lnks_taal=$lnks_dtls[3]; if ($ld < 6) { $ld=$ld+1; $llnks_vrag=$lnks_vrag; $llnks_antw=$lnks_antw; if (substr($lnks_vrag,0,6) == "./data") { $llnks_vrag="".$lnks_vrag.""; } if (substr($lnks_antw,0,6) == "./data") { $llnks_antw="".$lnks_antw.""; } // echo ""; } } } echo "
".$lnks_taal."".$lnks_domn."".$llnks_vrag."".$llnks_antw."
"; $lnks_array=array(); // print_r($lnks_array); // echo "
DOMN
"; // print_r($domn_array); } $splt_tabl= " dat een , dat het , dat er , het er , dat daar , dat hier , is een , is het "; $splt_word=explode(",",$splt_tabl); // print_r($splt_word); foreach($splt_word as $splt_key => $splt_val) { $splt_lnks=explode($splt_val,$invr_bzv1); // echo "
"; // print_r($splt_lnks); if (count($splt_lnks) == 1) { $splt_lnks=explode("=",$invr_bzv1); // echo "
"; // print_r($splt_lnks); } if (count($splt_lnks) == 2) { $invr_lnks=$splt_lnks[0]." ".$splt_val; $invr_rchs=$splt_lnks[1]; $aiml_text="<category><pattern>".$invr_lnks."</pattern><template>".$invr_rchs."></template></category>"; $sql1 = "INSERT INTO `aiml` (`id`,`bot_id`,`pattern`,`thatpattern`,`template`,`topic`,`filename`) VALUES (null,'1','$invr_lnks','$invr_bzv2','$invr_rchs','$invr_domn','admin_added_aiml')"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $logentry_result = mysql_query($sql1, $link); $sql1 = "INSERT INTO `wiml` (`id`,`bot_id`,`aiml`,`pattern`,`thatpattern`,`template`,`topic`,`filename`,`taal`,`domn`,`cont`,`synm`,`levl`,`datm`) VALUES (null,'1','$aiml_text','$invr_rchs','$invr_bzv2','$invr_lnks','$invr_domn','admin_added_aiml','$invr_taal','$invr_domn','$invr_levl','$invr_cont','$datm_tstp')"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $logentry_result = mysql_query($sql1, $link); echo "
".$aiml_text."
"; } } $invr_bzv2=$invr_lnks; $invr_rchs=trim($invr_rchs); str_replace("*","",$invr_rchs); ////////////////// Bepaal de taalkundige eigenschappen /////////////////////// echo "Uiting taalkundige eigenschappen ".$invr_bzv1; $rslt_val=""; $sgmt_rslt=bepl_sgmt($invr_bzv1); echo ""; // print_r($sgmt_rslt); $say_dtls=explode(" ",$invr_bzv1); $void_sgmt=$invr_bzv1; // print_r($say_dtls); // print_r($spec_rslt); $spec_dtls=explode("@",$spec_rslt); // print_r($spec_dtls); // echo "
VOID SGMT ".$void_sgmt; // print_r($sgmt_rslt); $data_sw=0; // echo "
"; foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { // echo "
SGMT KEY ".$sgmt_key; $aiml_rslt=xtrt_aiml($sgmt_key); // print_r($aiml_rslt); $ad=0; foreach($aiml_rslt as $aiml_key => $aiml_val) { $aiml_dtls=explode("@",$aiml_key); // print_r($aiml_dtls); if ($ad < 6) { if (substr_count($sgmt_key," ") > 1) { $data_sw=1; $sgmt_key=trim($sgmt_key); if ($srelt != $sgmt_key) { $srelt=$sgmt_key; echo "
".$sgmt_key."
"; } $aiml_long=$aiml_dtls[2]; $aiml_long=str_replace($sgmt_key,"...",$aiml_long); // echo ""; } if (substr_count($sgmt_key," ") < 2) { $data_sw=1; $sgmt_key=trim($sgmt_key); if ($lrelt != $sgmt_key) { $lrelt=$sgmt_key; echo "
".$sgmt_key."
"; } // echo "
COUNT SGMT KEY SHRT ".substr_count($sgmt_key," ")."
"; $aiml_shrt=$aiml_dtls[1]; $aiml_shrt=str_replace($sgmt_key,"...",$aiml_shrt); // echo ""; } $ad=$ad+1; } } if ($data_sw == 0) { $wtvr_rslt=xtrt_xxxx($sgmt_key,$invr_taal,"wtvr",4); foreach($wtvr_rslt as $wtvr_key => $wtvr_val) $wtvr_dtls=explode("!!",$wtvr_key); // print_r($wtvr_dtls); $wtvr_domn=$wtvr_dtls[2]; echo ""; } echo "
Responses
".$sgmt_key."
".$aiml_long."...
".$aiml_shrt."...
".$wtvr_domn."
"; // echo "
DEEL TWEE INVR BZV1 ".$invr_bzv1." INVR BZV2 ".$invr_bzv2." INVR LNKS ".$invr_lnks." INVR RCHS ".$invr_rchs; // echo "
SGMT KEY ".$sgmt_key." VAL ".$sgmt_val; $tlkd_rslt=smta_tlkd($sgmt_key."@tlkd"); // print_r($tlkd_rslt); // $tlkd_rslt=smts_tlkd($invr_bzv1); // asort($tlkd_rslt); foreach($tlkd_rslt as $tlkd_key => $tlkd_val) { // echo "
TLKD KEY ".$tlkd_key." TLKD VAL ".$tlkd_val; $tlkd_itms=explode("@",$tlkd_key); $tlkd_gram=$tlkd_itms[0]; $tlkd_pos=explode(" ",$tlkd_gram); // print_r($tlkd_pos); if (count($tlkd_pos) > 1) { $tlkd_mult=$tlkd_pos[0]; $tlkd_word=$tlkd_pos[1]; } $tlkd_text=$tlkd_itms[1]; $tlkd_array[$tlkd_text."@".$tlkd_val."@".$tlkd_word]=$tlkd_array[$tlkd_text."@".$tlkd_val."@".$tlkd_word]+1; } asort($tlkd_array); // echo "
"; // print_r($tlkd_array); $srelt="xxxxxx"; $swr=0; $swt=0; foreach($tlkd_array as $tlkd_key => $tlkd_val) { $tlkd_itms=explode("@",$tlkd_key); $tlkd_text=$tlkd_itms[0]; $tlkd_word=$tlkd_itms[1]; $tlkd_gram=$tlkd_itms[2]; $tlkd_prts=explode(".",$tlkd_word); // print_r($tlkd_prts); $tlkd_lnks=$tlkd_prts[0]; $tlkd_rchs=$tlkd_prts[1]; // echo "
SRELT ".$srelt." TLKD WORD ".$tlkd_word." TLKD TEXT ".$tlkd_text; $void_sgmt=strtolower($void_sgmt); if ($srelt != $tlkd_text and $tlkd_text != null and substr_count($tlkd_text," ") > 1) { $srelt=$tlkd_text; if ($sgmt_key != $tlkd_text and $swr == 0) { $sgmt_key=trim($sgmt_key); // echo "
Geen response voor ".$sgmt_key. " en ".$tlkd_text; $void_sgmt=str_replace($sgmt_key,"".$sgmt_key."",$void_sgmt); $smta_rslt=xtrt_xxxx($tlkd_text,$invr_taal,"wtvr",4); foreach ($smta_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); $smta_lnks=$smta_dtls[3]; $smta_rchs=$smta_dtls[4]; if ($arelt != $smta_lnks) { echo "
".substr($smta_lnks,0,64)."...
"; $arelt=$smts_lnks; } } $swr=1; // echo "
".$sgmt_key."
".$tlkd_word."-".$tlkd_gram."
"; // echo "
".$sgmt_key."
"; } if ($sgmt_key == $tlkd_text and $swt == 0) { $sgmt_key=trim($sgmt_key); echo "
Response voor ".$sgmt_key; $swt=1; // echo "
SGMT KEY ".$sgmt_key." VOID SGMT ".$void_sgmt; // echo "
SGMT KEY ".$sgmt_key." VOID SGMT ".$void_sgmt; // echo "
".$sgmt_key."
".$tlkd_word."-".$tlkd_gram."
"; // echo "
".$sgmt_key."
"; $sgmt_key=trim($sgmt_key); $void_sgmt=str_replace($sgmt_key,"".$sgmt_key."",$void_sgmt); } } // echo "
SGMT KEY ".urlencode($sgmt_key)." VAL ".urlencode($itms_val); } } // echo "
SGMT KEY ".$sgmt_key." VOID SGMT ".$void_sgmt; // echo "
SGMT KEY ".$sgmt_key." VOID SGMT ".$void_sgmt; // echo "
".$sgmt_key."
".$tlkd_word."-".$tlkd_gram."
"; // echo "
".$sgmt_key."
"; // echo "
Ik heb wel een antwoord op ".$sgmt_key." Maar niet voor ".$void_sgmt."
"; echo ""; echo ""; echo ""; $mtsw_rslt=xtrt_xxxx($invr_lnks,$invr_taal,"mtsw",6); // print_r($mtsw_rslt); foreach ($mtsw_rslt as $smta_key => $smta_val) { $smta_dtls=explode("!!",$smta_key); $smta_lnks=$smta_dtls[3]; $smta_rchs=$smta_dtls[4]; if ($arelt != $smta_lnks) { echo ""; $arelt=$smts_lnks; } } $tlkd_pos = strpos($invr_bzv1," dat het "); if ($tlkd_pos === false) { // echo "
KEY ".$tlkd_key." VAL ".$tlkd_val.""; // $desc_array["v@".$tlkd_key]=$desc_array["v@".$tlkd_key]+1; } else { $splt_itms=explode("dat het",$invr_bzv1); echo "
Discourse ".$invr_bzv2; // print_r($splt_itms); $splt_lnks=$splt_itms[0]; $splt_rchs=$splt_itms[1]; $splt_array[$splt_lnks]=$splt_rchs; } // print_r($splt_array); exit; echo "
".substr($smta_lnks,0,64)."...
"; if (strlen($invr_bzv1) > 512) { $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $uw_vraag=text_isrt($invr_taal."@uw vraag"); $tekens=text_isrt($invr_taal."@tekens"); $analyse=text_isrt($invr_taal."@analyse"); echo "
".$uw_vraag." >> 128 ".$tekens."".$sinvr_bzv1; $href_calc="".$analyse.""; // $href_parm="?bzkr=".$invr_bzkr."&ipad=".$invr_ipad."&corp=".$invr_corp."&smdm=".$invr_smdm."&taal=".$invr_taal."&lgrm=".$sinvr_lgrm."&chbt=".$invr_chbt."&bzv1=".$sinvr_bzv1.">"; echo "
".$href_calc; } if ($invr_taal == "russisch") { $latn_cyrc=latncyrc($invr_bzv1); // echo "
LATN CYRC ".$latn_cyrc; $cyrc_latn=cyrclatn($invr_bzv1); // echo "
CYRC LATN ".$cyrc_latn; $test_bzv1=$invr_bzv1; if ($latn_cyrc != $test_bzv1) { $invr_bzv1=$latn_cyrc; } if ($cyrc_latn != $test_bzv1) { $invr_bzv1=$cyrc_latn; } } // echo "
CYRC INVR BZV1 ".$invr_bzv1; // echo ""; ////////////////// // $letr_rslt=letr_expl($invr_taal."@".$invr_bzv1); // echo "
INVR TAAL ".$invr_taal." INVR BZV1 ".$invr_bzv1; // print_r($letr_rslt); // exit; $uinvr_bzv1=urlencode($invr_bzv1); $uinvr_bzv1=str_replace("%E2%80%A6",".",$uinvr_bzv1); $uinvr_bzv1=str_replace("%E2%80%98","",$uinvr_bzv1); $invr_bzv1=urldecode($uinvr_bzv1); $invr_bzv1=str_replace("/v.)",",vrl, ",$invr_bzv1); $invr_bzv1=str_replace("/",",=, ",$invr_bzv1); $invr_bzv1=str_replace("’","",$invr_bzv1); $invr_bzv1=str_replace(",","",$invr_bzv1); $invr_bzv1=str_replace("—","",$invr_bzv1); $invr_bzv1=str_replace("–","",$invr_bzv1); $invr_bzv1=str_replace("?",".",$invr_bzv1); $invr_bzv1=str_replace("*",".",$invr_bzv1); // $invr_bzv1=str_replace("/"," ",$invr_bzv1); $invr_bzv1=str_replace("|",".",$invr_bzv1); $invr_bzv1=str_replace("&","",$invr_bzv1); $invr_bzv1=str_replace("!",".",$invr_bzv1); // $invr_bzv1=str_replace("·","-",$invr_bzv1); $invr_bzv1=str_replace(",,",",",$invr_bzv1); // echo "
INVR BZV1 EEN ".$invr_bzv1." INVR IPAD ".$invr_ipad." INVR CHBT ".$invr_chbt." INVR TAAL ".$invr_taal."
"; $splt_bzv1=explode("=",$invr_bzv1); foreach ($splt_bzv1 as $splt_key => $splt_val) { echo "
SPLT BZV1 EEN ".$splt_val."
"; } /////////////// BEPAAL TAAL ///////////// $taal_rslt=bepl_taal($invr_bzv1); asort($taal_rslt); // print_r($taal_rslt); // echo "
TALEN
"; $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); // echo "
"; foreach($taal_rslt as $taal_key => $taal_val) { $text_taal=$taal_key; $lang_taal=text_isrt($text_taal."@".$text_taal); // echo "
LANG TAAL ".$lang_taal." TEXT TAAL ".$text_taal; $taal_jump="".$lang_taal." #".$taal_val.""; echo " ".$taal_jump; } if ($invr_taal != $text_taal and $invr_taal != null) { $text_taal=$invr_taal; } $ipcd_code=taal_ipcd($invr_taal); // echo "
IPCD CODE ".$ipcd_code." INVR TAAL ".$invr_taal; if ($smta_vldt==1) { $lpromt=""; // echo "
".$lpromt; } /////////////////////// translate ////// echo "
BEGIN TEKSTTAAL ".$text_taal; $invr_bzv1=$splt_bzv1[0]." ".$splt_bzv1[2]; // echo "
INVR BZV1 TWEE ".$invr_bzv1."
"; $bzv1_leng=strlen($invr_bzv1); $new_bzv1=""; for ($l=0;$l<$bzv1_leng;$l++) { // echo "
INVR BZV1 ".$invr_bzv1[$l]."=ascii ".$asci_letr." ENCD ".urlencode($invr_bzv1[$l]); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $asci_letr=ord($invr_bzv1[$l]); // echo "
INVR BZV1 ".$invr_bzv1[$l]."=ascii ".$asci_letr; if ($asci_letr == 13 or $asci_letr == 10 or $asci_letr == 9) { $invr_bzv1[$l] = "."; // echo "
INVR = "; } $asci_letr=ord($invr_bzv1[$l]); $new_bzv1=$new_bzv1.$invr_bzv1[$l]; } echo ""; $href_calc=""; $ttaal="".text_isrt($text_taal."@".$text_taal).""; $tchbt="".text_isrt($text_taal."@".$invr_chbt).""; $href_goto="".$href_goto.$href_parm."
".$tchbt.""; // echo ""; echo "
".$href_calc.$href_parm."
".$ttaal."
"; ////// $say=$invr_bzv1; $verb_itms=explode(";",$invr_bzv1); $comm_itms=explode(",",$invr_bzv1); $sent_itms=explode(".",$invr_bzv1); // echo "
SENT ? "; // print_r($sent_itms); // echo "
"; $invr_bzv1=trim($invr_bzv1); echo "
Na het trimmen ".$invr_bzv1; $invr_bzv1=str_replace("zn.","znw,",$invr_bzv1); $invr_bzv1=str_replace("vrl.","vrlk znw,",$invr_bzv1); $invr_bzv1=str_replace("meerv.","mvd,",$invr_bzv1); $invr_bzv1=str_replace("iem.","iemand",$invr_bzv1); $invr_bzv1=str_replace("bn.","bvn,",$invr_bzv1); $invr_bzv1=str_replace("bijw.","bwd,",$invr_bzv1); $invr_bzv1=str_replace("tgov.","tegenover,",$invr_bzv1); $invr_bzv1=str_replace("tussenw..","twp,",$invr_bzv1); $invr_bzv1=str_replace("Lat.","latijn,",$invr_bzv1); $invr_bzv1=str_replace("Gr.","grieks,",$invr_bzv1); $invr_bzv1=str_replace("Fr.","frans,",$invr_bzv1); $invr_bzv1=str_replace("Du.","duits,",$invr_bzv1); $invr_bzv1=str_replace("dr.","dokter,",$invr_bzv1); $invr_bzv1=str_replace("Eng.","engels,",$invr_bzv1); $invr_bzv1=str_replace("m.n.","met name ,",$invr_bzv1); $invr_bzv1=str_replace("o.a.","oa",$invr_bzv1); $invr_bzv1=str_replace("resp.","respectievelijk",$invr_bzv1); $invr_bzv1=str_replace("alg.","algemeen",$invr_bzv1); $invr_bzv1=str_replace("(niet:"," ",$invr_bzv1); $invr_bzv1=str_replace("onpers.","onpersoonlijk",$invr_bzv1); $invr_bzv1=str_replace("versch.","verschillende",$invr_bzv1); // $invr_bzv1=str_replace("h.","hebben,",$invr_bzv1); $invr_bzv1=str_replace("voorz.","vzt",$invr_bzv1); $invr_bzv1=str_replace("bijv. naamw.","bvn,",$invr_bzv1); $invr_bzv1=str_replace("onovergank.","onv,",$invr_bzv1); $invr_bzv1=str_replace("overgank.","ovg,",$invr_bzv1); $invr_bzv1=str_replace("werkw.;","wwd,",$invr_bzv1); $invr_bzv1=str_replace("(geen afbreking)","",$invr_bzv1); $invr_bzv1=str_replace("°","graden ",$invr_bzv1); $invr_bzv1=str_replace("•",",",$invr_bzv1); $invr_bzv1=str_replace("niet: ","",$invr_bzv1); $invr_bzv1=str_replace("11"," ",$invr_bzv1); $invr_bzv1=str_replace("22"," ",$invr_bzv1); $invr_bzv1=str_replace("33"," ",$invr_bzv1); $invr_bzv1=str_replace("44"," ",$invr_bzv1); $invr_bzv1=str_replace("55"," ",$invr_bzv1); $invr_bzv1=str_replace("—","",$invr_bzv1); $invr_bzv1=str_replace(" & ",",",$invr_bzv1); $invr_bzv1=str_replace("Ÿ"," ",$invr_bzv1); $invr_bzv1=str_replace(" 10 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 11 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 12 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 13 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 14 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 15 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 16 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 17 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" a Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 1 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 2 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 3 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 2 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 3 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 4 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 5 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 6 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 7 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 8 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 9 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" (m.)",",mnlk, ",$invr_bzv1); $invr_bzv1=str_replace(" (v.)",",vrlk, ",$invr_bzv1); $invr_bzv1=str_replace(" /v.)",",vrlk, ",$invr_bzv1); $invr_bzv1=str_replace("bep.",",bepaald ",$invr_bzv1); $invr_bzv1=str_replace("ben.",",benaming ",$invr_bzv1); $invr_bzv1=str_replace("Ned.",",nederlands ",$invr_bzv1); $invr_bzv1=str_replace("biochem.","biochemie ",$invr_bzv1); $invr_bzv1=str_replace("Fr.",",frans ",$invr_bzv1); $invr_bzv1=str_replace("‹","ori=",$invr_bzv1); $invr_bzv1=str_replace(";",",",$invr_bzv1); $invr_bzv1=str_replace("-tje",",tje,",$invr_bzv1); $invr_bzv1=str_replace("-pje",",pje,",$invr_bzv1); $invr_bzv1=str_replace("-ten",",ten,",$invr_bzv1); $invr_bzv1=str_replace("-’s","-’s,",$invr_bzv1); $invr_bzv1=str_replace("....",".",$invr_bzv1); $invr_bzv1=str_replace(":","",$invr_bzv1); $invr_bzv1=str_replace("_","",$invr_bzv1); $invr_bzv1=str_replace(", ,",",",$invr_bzv1); $invr_bzv1=str_replace("•",",mrf",$invr_bzv1); $invr_bzv1=strtolower($invr_bzv1); // echo "
Na replace ".$invr_bzv1; $perd_bzv1=explode(".",$invr_bzv1); $hulp_perd=$perd_bzv1[0]; $hulp_perd=str_replace(")","",$hulp_perd); $hulp_perd=str_replace("(","domein=",$hulp_perd); $zero_data=explode(".",$hulp_perd); // echo "
ZERO DATA"; // print_r($perd_bzv1); foreach($perd_bzv1 as $perd_key => $perd_val) { if ($perd_val[1] != null) { // echo "
".$perd_val."
"; $perd_dtls=explode("+",$perd_val); foreach($perd_dtls as $perd_key => $perd_val) { if (strlen($perd_val) > 3) { $perd_wrds[$perd_val]=$perd_wrds[$perd_val] +1; } } } } if (count($perd_wrds) > 0) { // echo "
"; foreach ($perd_wrds as $wrds_key => $wrds_val) { // echo " ".$wrds_key; } } // $zero_data[1]="opening ".$zero_data[1]; ///////////////// ////////////////// $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $bzv1_wrds=explode(" ",$invr_bzv1); if (count($bzv1_wrds) < 5) { $aiml_rslt=xtrt_aiml($invr_bzv1); $smta_rslt=xtrt_xxxx($invr_bzv1,$invr_taal,"smta"); // $trce_rslt=xtrt_xxxx($invr_bzv1,"nederlands","trce"); // print_r($trce_rslt); } ////////////////// Bepaal de taalkundige eigenschappen /////////////////////// echo "
TLKD SMTS 0017 ".$new_bzv1; $rslt_val=""; // $tlkd_rslt=smta_tlkd($invr_bzv1."@tlkd"); $tlkd_rslt=smts_tlkd($invr_bzv1); foreach($tlkd_rslt as $tlkd_key => $tlkd_val) { echo "
TLKD KEY ".$tlkd_key." TLKD VAL ".$tlkd_val; } // print_r($tlkd_rslt); $scnd_rslt=smta_tlkd($invr_bzv1."@scnd"); // $smts_rslt=tlkd_smts($invr_bzv1); // print_r($scnd_rslt); foreach($scnd_rslt as $smts_key => $smts_val) { echo "
SMTS KEY ".$smts_key." SMTS VAL ".$smts_val; } foreach($scnd_rslt as $scnd_key => $scnd_val) { echo "
SCND KEY ".$scnd_key." SCND VAL ".$scnd_val; $scnd_dtls=explode("@",$scnd_key); $scnd_item=$scnd_dtls[1]; // echo "
".$scnd_item; if(strlen($scnd_item) > 3) { $rslt_val=$rslt_val." ".$scnd_val; // echo "
".$scnd_item."=".$scnd_val; } } // echo "
RSLT VAL ".$rslt_val; $sw_eror=0; $cs=$cs+1; // echo ""; // echo "
Top of Page"; // echo "
".$cs."-".$invr_bzv1.""; $tlkd_smts=array(); $ln=0; $ts=0; // echo "
TLKD RSLT
"; foreach ($smts_rslt as $tlkd_key => $tlkd_val) { $last_text=""; $tlkd_pos = strpos($tlkd_val,"."); $tlkd_key=trim($tlkd_key); $tlkd_val=trim($tlkd_val); if ($tlkd_pos === false) { // echo "
KEY ".$tlkd_key." VAL ".$tlkd_val.""; $desc_array["v@".$tlkd_key]=$desc_array["v@".$tlkd_key]+1; } else { // echo "
KEY ".$tlkd_key." VAL ".$tlkd_val.""; $desc_array["k@".$tlkd_key]=$desc_array["k@".$tlkd_key]+1; } } // echo ""; $sw=0; foreach($desc_array as $desc_key => $desc_val) { // echo "
DESC KEY ".$desc_key." DESC VAL ".$desc_val; $desc_dtls=explode("@",$desc_key); $desc_code=$desc_dtls[0]; $desc_text=$desc_dtls[1]; $desc_itms=explode("!!",$desc_text); // print_r($desc_itms); $itms_text=$desc_itms[0]; $itms_gram=$desc_itms[1]; $itms_posn=$desc_itms[2]; // echo "
DESC TEXT ".$desc_text." ITMS TEXT ".$itms_text; if ($sw== 0 ) { $frst_text=$itms_text; $sw=1; } $itms_gram=$desc_itms[4]; $sitms_text=str_replace(" ","+",$itms_text); $verb_rslt=""; if (substr($itms_gram,0,1)== "x" ) { $verb_rslt="verb,"; } if (substr($itms_gram,2,2)== "sb" ) { $verb_rslt=$verb_rslt.",noun"; } $last_text=$itms_text; echo "
FRST TEXT ".$frst_text." LAST TEXT ".$last_text; if (substr($itms_gram,0,2) == "vr" and $itms_posn == 0) { $last_text=$itms_text; if ($irelt != $last_text) { // echo "
Waarom zegt u iets over ".$last_text; $irelt=$last_text; } } if ($trelt != $itms_text) { $text_itms=explode(" ",$itms_text); // print_r($text_itms); if (count($text_itms) > 1) { if ($itms_posn == "0") { $sitms_text=$sitms_text."+*"; $zoek_text=$itms_text; } if ($itms_posn == "50") { $sitms_text="*+".$sitms_text."+*"; } if ($itms_posn == "99") { $sitms_text="*+".$sitms_text; $zoek_text=$zoek_text." ".$itms_text; } $ankn_array[$itms_text."@".$invr_bzv1]=$ankn_array[$itms_text."@".$invr_bzv1]+1; $llink_aiml="".$itms_text.""; $llink_xbot="XBOT ".$itms_text.""; // echo "
LINK AIML ".$llink_aiml." LINK XBOT ". $llink_xbot; // if ($verb_rslt != null and (count($text_itms) > 1)) if (count($text_itms) > 1) { $verb_rslt=str_replace(","," ",$verb_rslt); $itms_gram=trim($itms_gram); $itms_gram=substr($itms_gram,0,4); // echo "
VOOR AANTAL TLKD for ".$itms_gram; $tlkd_rslt=xtrt_xxxx($itms_gram,"nederlands","tlkd"); // print_r($tlkd_rslt); // echo "
AANTAL TLKD ".count($tlkd_rslt)." for ".$itms_gram; $gram_desc="xxxxx"; if (count($tlkd_rslt) > 0) { foreach($tlkd_rslt as $chbt_key => $chbt_val) { $nb=$nb+1; // echo "
KEY ".$chbt_key; $rule_itms=explode("!!",$chbt_key); $gram_summ=$rule_itms[3]; $gram_desc=$rule_itms[4]; $gram_itms=explode("+",$gram_desc); $gram_rslt=""; foreach($gram_itms as $gram_key => $gram_val) { $gram_rslt=$gram_rslt."
".$gram_val.""; } } } // echo "
GRAM RSLT".$gram_rslt; $calc_rslt=calc_text($itms_text); // print_r($calc_rslt); foreach($calc_rslt as $calc_key => $calc_val) { $summ_array[$calc_key]=$summ_arrya[$calc_key]+1; // echo "
CALC KEY ".$calc_key." CALC VAL ".$calc_val; } $lgram_rslt="".$itms_gram.""; echo ""; // echo "
"; $trelt=$itms_text; $link_smts="".$itms_text.""; // echo "
".$link_smts; } } } } foreach($summ_array as $calc_key => $calc_val) { echo "
CALC KEY ".$calc_key." CALC VAL ".$calc_val; } // print_r($summ_array); // echo "
".$llink_aiml." ".$lgram_rslt."".$gram_summ."
".$llink_xbot."".$lgram_rslt."".$gram_summ."~~ ".$gram_desc."
"; echo ""; // echo ""; foreach($desc_array as $desc_key => $desc_val) { // echo "
DESC KEY ".$desc_key." DESC VAL ".$desc_val; $desc_dtls=explode("@",$desc_key); $desc_code=$desc_dtls[0]; $desc_text=$desc_dtls[1]; $desc_itms=explode("!!",$desc_text); // echo "
"; // print_r($desc_itms); $itms_text=$desc_itms[0]; $itms_gram=$desc_itms[1]; $itms_posn=$desc_itms[2]; if ($sw== 0 ) { $frst_text=$itms_text; $sw=1; } // echo "
ITMS POSN ".$itms_posn." ITMS TEXT ".$itms_text." ITMS_GRAM ".$itms_gram; $sitms_text=str_replace(" ","+",$itms_text); if (substr($itms_gram,0,1) == "x" or substr($itms_gram,2,2)== "sb") { $aiml_rslt=xtrt_aiml($itms_text,$invr_taal); // echo "
AIML RSLT ".count($aiml_rslt)." FOR ".$itms_text."
"; $numb_aiml=0; $aiml_numb=count($aiml_rslt); // print_r($aiml_rslt); //////////////////// if ($aiml_numb > 0) { foreach($aiml_rslt as $aiml_key =>$aiml_val) { $aiml_dtls=explode("@",$aiml_key); $aiml_scre=$aiml_dtls[0]; $aiml_vrag=$aiml_dtls[1]; $aiml_antw=$aiml_dtls[2]; if ($arelt != $aiml_antw.$aiml_vrag) { $arelt=$aiml_antw.$aiml_vrag; if ($numb_aiml < 5 and $aiml_vrag != null ) { $dspl_antw=$aiml_antw; // echo ""; $dspl_antw=str_replace("invrdatm",$datm_datm,$dspl_antw); $dspl_antw=str_replace("invrtime",$datm_time,$dspl_antw); $dspl_antw=str_replace("invrwkdg",$weekdag,$dspl_antw); $aiml_antw=$dspl_antw; // echo ""; // echo "
AIML SCRE ".$aiml_scre." AIML VRAAG ".$aiml_vrag." ANTWOORD ".$aiml_antw; $numb_aiml=$numb_aiml+1; } } } } } } // echo "
ZOEK TEXT ".$zoek_text; // echo "
Eerdere vragen
".$dspl_antw."
".$aiml_vrag."".$aiml_antw."
"; /////////////////// ///////// //////// $midl_text=str_replace($frst_text,"",$invr_bzv1); $midl_text=str_replace($last_text,"",$midl_text); $frst_text=trim($frst_text); $midl_text=trim($midl_text); $rchs_text=trim($rchs_text); $cmds_ipad=$_SERVER['REMOTE_ADDR']; $cmds_bzv2=$frst_text."[sgmt[".$text_taal."[".$midl_text."[".$last_text."[100"; // echo "
SENTENCE RESULT ".$cmds_bzv2; include ("chbt-cmds-code-2.php"); echo "
".$frst_text."-".$midl_text."-".$last_text.""; // $slast_text=str_replace(" ","+",$last_text); // $llink_bzv1="".$last_text.""; // echo "
".$verb_rslt." ".$llink_bzv1." ".$last_text; // echo ""; // require_once("fnsh-func.php"); // echo "
TLKD SMTS
"; // print_r($tlkd_smts); // $save_smts=$tlkd_smts; // $save_smts=ksort($tlkd_smts); // return($desc_array); foreach ($tlkd_rslt as $tlkd_key => $tlkd_val) { // echo "
TLKD KEY ".$tlkd_key." TLKD VAL ".$tlkd_val; $key_itms=explode("@",$tlkd_key); // echo "
KEY ITMS
"; // print_r($key_itms); $tlkd_gram=$key_itms[0]; $tlkd_form=$key_itms[1]; $tlkd_gram=trim($tlkd_gram); $tlkd_form=trim($tlkd_form); $stlkd_form=str_replace(" ","+",$tlkd_form); $stlkd_gram=str_replace(" ","+",$tlkd_gram); // $tlkd_form=str_replace("START","",$tlkd_form); $form_dtls=explode(".",$tlkd_form); $tlkd_word=$form_dtls[1]; // echo "
TLKD KEY".$tlkd_key." TLKD VAL ".$tlkd_val." GRAMMATICA ".$tlkd_gram." WOORDVORM ".$tlkd_word."
"; /////////////////////// if (strlen($tlkd_word) > 1) { // echo $tlkd_word." "; // $ankn_array[$tlkd_word."@".$tlkd_val]=$ankn_array[$tlkd_word."@".$tlkd_val]+1; } $tlkd_pos=strpos($invr_bzv1,$tlkd_form,0); // echo "
TLKD POS ".$tlkd_pos; $ptlkd_form="".$tlkd_form.""; $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$invr_bzv1); // echo "
".$ptlkd_form."TAAL ".$invr_taal; echo ""; //////////////////////////////////////////////////////////////////////////////////////////////////////////// if ($tlkd_form == "error") { // echo "
ERROR TEKSTTAAL ".$text_taal; $svrag_qstn=str_replace(" ","+",$tlkd_gram); $smta_updt="?bzkr=".$invr_bzkr."&lnks=".$stlkd_gram."&bzv1=".$svrag_qstn."&taal=".$text_taal; $psmta_word= ''.$tlkd_gram.''; $gram_rchs="".$psmta_word.""; $gram_rchs="".$psmta_word.""; $url_rchs="bzv1-0001.php".$smta_updt.">".$psmta_word.""; echo ""; $cmds_ipad=$userip; $cmds_bzv2=$tlkd_gram."[gw27[".$bzv1_taal."[woordvorm.woordvorm[tbd[".$ec; // echo "
GW27 INVR BZV2 ".$cmds_bzv2."
"; // include ("chbt-cmds-code-2.php"); $gram_error[$tlkd_gram]=$gram_error[$tlkd_gram]+1; $ec=$ec+1; echo ""; // echo ""; } echo "
".$gram_rchs."".$tlkd_gram."".$tlkd_gram."
"; //////////////////////////////////////////////////////////////////////////////////////////////////////////// if ($tlkd_pos === false) { // echo "
The string ".$tlkd_form." was not found in the string ".$line_bzv1; } else { // // echo "
STRING FOUND TLKD FORM ".$tlkd_form."
"; $form_dtls=explode(" ",$tlkd_form); // echo "
AANTAL FORM DTLS ".count($form_dtls); // print_r($form_dtls); $tlkd_dtls=explode($tlkd_form,$strn_val); // echo "
".$tlkd_form."
"; // echo "
AANTAL TLKD DTLS ".count($tlkd_dtls); // print_r($tlkd_dtls); $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$invr_bzv1); // echo "
".$pline_bzv1; // echo "
SMTS DATA ".$tlkd_form."+".$tlkd_val; $ts=$ts+1; $tlkd_posn=$tlkd_pos; if (strlen($tlkd_pos) == 1) { $tlkd_posn=substr("00".$tlkd_pos,0,3); } if (strlen($tlkd_pos) == 2) { $tlkd_posn=substr("0".$tlkd_pos,0,3); } $tlkd_smts[$tlkd_posn."+".$tlkd_form."+".$tlkd_val]=$tlkd_smts[$tlkd_posn."+".$tlkd_form."+".$tlkd_val]+1; // echo "
".$tlkd_form.""; // echo "
LOCATIE ".$tlkd_form." POS ".$tlkd_pos; $tlkd_itms=explode("+",$tlkd_form); // echo "
TLKD ITMS
"; // print_r($tlkd_itms); } // echo "
VERB RESULT ".$verb_rslt; } ?>