WRDV SHRT
Analyse and process wordforms in science

"; $long_wrds=""; // echo "" .$long_wrds; // $sinvr_bzv1=urlencode($long_wrds); ?>

Uiting > > > > > > > >
".$gram_sql." Aantallen GRAM ".$gram_num; while ($row = mysql_fetch_assoc($gramresult)) { $gram_taal=$row['taal']; $gram_domn=$row['domn']; $domn_dtls=explode(",",$gram_domn); $gram_rchs=$row['rchs']; $rchs_dtls=explode(",",$gram_rchs); $gram_lnks=$row['lnks']; $gram_levl=$row['levl']; foreach($rchs_dtls as $rchs_key => $rchs_val) { foreach($domn_dtls as $domn_key => $domn_val) { $gram_tabl[$gram_lnks]=$rchs_val."@".$domn_val."@".$gram_taal; } } } foreach($gram_tabl as $gram_key => $gram_val) { echo "
".$gram_key." GRAM VAL ".$gram_val; } // print_r($gram_tabl); // exit; echo ""; // echo ""; // echo ""; // echo ""; //echo ""; echo "
"; ///////////////// $sens_dtls=explode(".",$invr_bzv1); // print_r($sens_dtls); foreach($sens_dtls as $sens_key => $invr_bzv1); { // print_r($bzv1_dtls); echo ""; // print_r($bzv1_dtls); $dtls_text="tbd"; foreach($bzv1_dtls as $dtls_key => $dtls_val) { if (strlen($dtls_val ) <5) { // echo "
DTLS VAL U ".urlencode(" ".$dtls_val." "); // $dtls_text=$splt_tabl[" ".$dtls_val." "]; $dtls_text=$splt_tabl[" ".$dtls_val." "]; //echo ""; // echo ""; } if (strlen($dtls_val )> 4) { echo ""; $gw27_rslt=xtrt_xxxx($dtls_val,$invr_taal,"gw27",4); if (count($gw27_rslt) > 0) { print_r($gw27_rslt); foreach ($gw27_rslt as $gw27_key => $gw27_val) { $gw27_dtls=explode("!!",$gw27_key); $gw27_lnks=$gw27_dtls[3]; $gw27_rchs=$gw27_dtls[4]; echo ""; } } } } } echo "
".$dtls_val." ".$dtls_text."
".$gw27_lnks."--".$gram_tabl[$gw27_rchs.'@engels']."
"; /////////////// $bzv1_val=strtolower($invr_bzv1); $bzv1_val=trim($bzv1_val); $bzv1_val=str_replace(" 0 ","",$bzv1_val); $bzv1_val=str_replace(" & "," and ",$bzv1_val); $bzv1_val=str_replace(", ",". ",$bzv1_val); $bzv1_val=str_replace("© ",". ",$bzv1_val); $bzv1_val=str_replace('"','',$bzv1_val); $bzv1_val=str_replace(':','. ',$bzv1_val); $bzv1_val=str_replace(';','. ',$bzv1_val); $invr_bzv1=$bzv1_val; ////////////////////// $sinvr_bzv1=str_replace(" ","%20",$invr_bzv1); // echo "
".$sinvr_bzv1; $url='https://api-free.deepl.com/v2/translate?auth_key=b7f7282d-a4ab-58bc-ec82-a23aed6c8a3b%3Afx&text='.$sinvr_bzv1.'&target_lang=en-US&source_lang=nl&preserve_formatting=1&tag_handling=0'; // echo "
1 URL DEEP ".$url; $rslt= file_get_contents($url); $deep_data = json_decode($rslt); // print_r($deep_data); foreach($deep_data as $deep_key => $deep_val) { // echo "
DEEP KEY .".$deep_key." DEEP VAL ".$deep_val; // print_r($deep_val); foreach ($deep_val as $key => $object) { echo $deep_val->object_property; } // print_r($deep_val); foreach($object as $val_key => $val_val) { if ($val_key == "text") { $sinvr_bzv1=str_replace(" ","%20",$val_val); // echo "
NL EN ".$val_val; $url2='https://api-free.deepl.com/v2/translate?auth_key=b7f7282d-a4ab-58bc-ec82-a23aed6c8a3b%3Afx&text='.$sinvr_bzv1.'&target_lang=nl&source_lang=en&preserve_formatting=1&tag_handling=0'; // echo "
2 URL DEEP ".$url2; $rslt2= file_get_contents($url2); $deep_data2 = json_decode($rslt2); // print_r($deep_data2); foreach($deep_data2 as $deep2_key => $deep2_val) { // echo "
DEEP KEY2 .".$deep2_key." DEEP VAL ".$deep2_val; // print_r($deep2_val); foreach ($deep2_val as $key => $object2) { echo $deep_val2->object_property; } foreach($object2 as $val2_key => $val2_val) { if ($val2_key == "text") { echo "
".$val2_val; $sinvr_bzv1=str_replace(" ","%20",$val2_val); $url3='https://api-free.deepl.com/v2/translate?auth_key=b7f7282d-a4ab-58bc-ec82-a23aed6c8a3b%3Afx&text='. $sinvr_bzv1.'&target_lang=ru&source_lang=nl&preserve_formatting=1&tag_handling=0'; // echo "
3 URL DEEP ".$url3 $rslt3= file_get_contents($url3); $deep_data3 = json_decode($rslt3); // print_r($deep_data3); foreach($deep_data3 as $deep3_key => $deep3_val) { // echo "
DEEP KEY3 .".$deep3_key." DEEP VAL ".$deep3_val; // print_r($deep3_val); foreach ($deep3_val as $key => $object3) { echo $deep_val3->object_property; } foreach($object3 as $val3_key => $val3_val) { if ($val3_key == "text") { // echo "
NL RU ".$val3_val; $sinvr_bzv1=str_replace(" ","%20",$val3_val); $url4='https://api-free.deepl.com/v2/translate?auth_key=b7f7282d-a4ab-58bc-ec82-a23aed6c8a3b%3Afx&text='. $sinvr_bzv1.'&target_lang=nl&source_lang=ru&preserve_formatting=1&tag_handling=0'; // echo "
4 URL DEEP ".$url4 $rslt4= file_get_contents($url4); $deep_data4 = json_decode($rslt4); // print_r($deep_data4); foreach($deep_data4 as $deep4_key => $deep4_val) { // echo "
DEEP KEY4 .".$deep4_key." DEEP VAL ".$deep4_val; // print_r($deep4_val); foreach ($deep4_val as $key => $object4) { echo $deep_val4->object_property; } foreach($object4 as $val4_key => $val4_val) { if ($val4_key == "text") { echo "
".$val4_val; } } } } } } } } } } } } /////////////////// WAAR BEN IK ///////////////// require_once("smta-mdls-func.php"); $cmds_bzv2="shrt wrdv[vrag[generiek[".$smta_scpt."[RECHTS[0"; // echo "
CMDS BZV2 ".$cmds_bzv2; // include("chbt-cmds-code-2.php"); // print_r($conv_tabl); foreach($conv_tabl as $conv_key => $conv_val) { $conv_dtls=explode(",",$conv_val); // print_r($conv_dtls); foreach($conv_dtls as $dtls_key => $dtls_val) { $dtls_val=trim($dtls_val); $tabl_conv[$dtls_val."@".$conv_key]=$tabl_conv[$dtls_val."@".$conv_key]+1; } } ECHO "
TABL CONV "; print_r($tabl_conv); $rn=0; foreach($tabl_conv as $tabl_key => $tabl_val) { /////////////// $bzv1_val=strtolower($tabl_key); $bzv1_val=trim($bzv1_val); $bzv1_val=str_replace(" 0 ","",$bzv1_val); $bzv1_val=str_replace(" & "," and ",$bzv1_val); $bzv1_val=str_replace(", ",".",$bzv1_val); $bzv1_val=str_replace("© ",".",$bzv1_val); $bzv1_val=str_replace('"','',$bzv1_val); $bzv1_val=str_replace(':','.',$bzv1_val); $bzv1_val=str_replace(';','.',$bzv1_val); $bzv1_val=str_replace('!','.',$bzv1_val); $bzv1_val=str_replace('?','.',$bzv1_val); $tabl_key=$bzv1_val; // echo "
TABL KEY ".$tabl_key. " TABL VAL ".$tabl_val; $tabl_key=trim($tabl_key); $tabl_xtrt=explode("@",$tabl_key); // echo "
TABL XTRT"; // print_r($tabl_xtrt); $tabl_lnks=$tabl_xtrt[0]; $lnks_dtls=explode(" ",$tabl_lnks); foreach($lnks_dtls as $lnks_key => $lnks_val) { if (strlen($lnks_val) > 4) { $lnks_array[$lnks_val]=$lnks_array[$lnks_val]+1; } } $tabl_rchs=$tabl_xtrt[1]; // echo "
INVR BZV2 ".$invr_bzv2." TABL LNKS ".$tabl_lnks." TABL RCHS ".$tabl_rchs; if ($invr_bzv2 == $tabl_lnks or $invr_bzv2 == $tabl_rchs) { // echo "
INVR BZV2 ".$invr_bzv2." TABL LNKS ".$tabl_lnks." TABL RCHS ".$tabl_rchs."
"; } $lnks_rchs[$tabl_rchs]=$tabl_lnks; $rn=$rn+1; } // print_r($lnks_array); // echo "
REGELS ".$rn; ////////////////////////////////////////////// if ($invr_tabl == null) { // $invr_tabl="wtvr"; } //echo "
INVR BZV1 ".$invr_bzv1." INVR BZV2 ".$invr_bzv2." INVR TABL ".$invr_tabl; /////////////// // echo "
Segmentanalyse op basis van "; echo ""; $splt_text=null; for ($i = 0; $i <= 3; $i++) { $nt=0; $sgmt_rslt=bepl_sgmt($invr_bzv1,$i); // print_r($sgmt_rslt); foreach($sgmt_rslt as $sgmt_key => $sgmt_val) { // echo ""; // $splt_text=$splt_tabl[$sgmt_key]; $lpzg_rslt=xtrt_xxxx($sgmt_key,$invr_taal,$invr_tabl,4); if (count($lpzg_rslt) > 0) { //echo ""; foreach ($lpzg_rslt as $lpzg_key => $lpzg_val) { $lpzg_key=strtolower($lpzg_key); $lpzg_dtls=explode("!!",$lpzg_key); // print_r($lpzg_dtls); $lpzg_lnks=$lpzg_dtls[2]; $lpzg_rchs=$lpzg_dtls[3]; $lpzg_array[$lpzg_lnks."@".$lpzg_rchs]=$lpzg_array[$lpzg_lnks."@".$lpzg_rchs]+1; // echo ""; } //echo ""; } } } echo "
".$sgmt_key."
".$lpzg_lnks."
".$lpzg_rchs."
"; echo ""; ksort($lpzg_array); foreach ($lpzg_array as $lpzg_key => $lpzg_val) { $lpzg_dtls=explode("@",$lpzg_key); //print_r($lpzg_dtls); $lpzg_lnks=$lpzg_dtls[0]; $lpzg_rchs=$lpzg_dtls[1]; $slpzg_lnks=str_replace(" ","+",$lpzg_lnks); $llpzg_lnks="".$lpzg_lnks.""; if ($lpzg_lnks != $lrelt and $lpzg_lnks== $invr_vgpt) { echo ""; $lrelt=$lpzg_lnks; echo ""; } if ($lpzg_lnks != $lrelt and $lpzg_lnks != $invr_vgpt) { echo ""; $lrelt=$lpzg_lnks; echo ""; } } echo "
".$llpzg_lnks."

".$lpzg_rchs."
".$llpzg_lnks."

".$lpzg_rchs."
"; /////////////////// $gram_sql="SELECT * from gram where `taal`= 'engels' order by `lnks` asc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $gramresult = mysql_query($gram_sql, $link); $gram_num = mysql_num_rows($gramresult); // echo "
".$gram_sql." Aantallen GRAM ".$gram_num; while ($row = mysql_fetch_assoc($gramresult)) { $gram_taal=$row['taal']; $gram_domn=$row['domn']; $gram_rchs=$row['rchs']; $gram_lnks=$row['lnks']; $gram_levl=$row['levl']; if ($gram_taal == "engels" ) { $gram_tabl[$gram_lnks]=$gram_rchs; } } // print_r($gram_tabl); /////////////////// $ls=0; $bzv1_dtls=explode(" ",$invr_bzv1); // print_r($bzv1_dtls); $bzv1_snts=explode(".",$invr_bzv1); echo ""; if (count($bzv1_dtls) > 0) { // print_r($bzv1_dtls); foreach($bzv1_dtls as $dtls_key => $dtls_val) { if (strlen($dtls_val )> 3) { $gw27_rslt=xtrt_xxxx($dtls_val,$invr_taal,"gw27",12); if (count($gw27_rslt) > 0) { // print_r($gw27_rslt); foreach ($gw27_rslt as $gw27_key => $gw27_val) { $gw27_dtls=explode("!!",$gw27_key); $gw27_lnks=$gw27_dtls[3]; $gw27_rchs=$gw27_dtls[4]; $rchs_itms=explode(",",$gw27_rchs); $sgw27_lnks=str_replace(" ","+",$gw27_lnks); $lgw27_lnks="".$gw27_lnks.""; foreach ($rchs_itms as $rchs_key => $rchs_val) { if ($gram_tabl[$rchs_val] != null) { echo ""; } } } } $ls=$ls+1; $dtls_val=trim($dtls_val); if ($dtls_val[0] == "*") { $dtls_val[0] =""; echo ""; } if ($dtls_val[0] == "+") { $dtls_val[0] =""; echo ""; } } if ($ls==0) { ////////////////////////////////////////////// $invr_sent=$snts_val; // echo "
NO VALID WORDS FOUND IN INVR SENT ".$invr_sent; } } } exit; ?>

Verwijzing
".$lgw27_lnks."--".$gram_tabl[$rchs_val]."
".$dtls_val."
".$dtls_val."