(1) 'Parse_' prefixed to the lang.dat-files plus code-adapts (2) made…

… start with data-file-validation-proc

mostfiles/flashread.nim

@@ -225,7 +225,7 @@ routes:
     innervarob["statustext"] = newlang(statustekst)
     innervarob["statusdata"] = ""
     innervarob["pastedtext"] = ""
-    innervarob["processedtext"] = filepathst
+    innervarob["processedtext"] = filepathst & "<br><br>" & evaluateDataFiles(datFileAll)
     innervarob["text_language"] = setDropDown("text-language", readOptionFromFile("text-language", "value"))
     innervarob["taglist"] = setDropDown("taglist", "paragraph-with-headings")
     innervarob["radiobuttons_1"] = setRadioButtons("orders","")

mostfiles/install_defs/readibl_0.94_for-linux_installer-si_2.3.txt

@@ -44,9 +44,9 @@ arguments---none
 .
 LICENSE
 settings_flashread.conf
-dutch.dat
-english.dat
-german.dat
+parse_dutch.dat
+parse_english.dat
+parse_german.dat
 language_template.dat
 summary_dutch_concise.dat
 summary_dutch_default.dat

mostfiles/loadgui.nim

@@ -31,14 +31,12 @@ proc loadTextLangsFromConfig() =
 # Load the processing-languages of the dropdown "dropdownsta" of 
 # webgui_def.nim from the config-file
 
-
   var
     valuelist: string
     sourcelangsq: seq[string]
     langvaluelistsq: seq[array[2, string]]
     tbo: bool = false
 
-
   # get the processing-languages from the config-file
   valuelist = readOptionFromFile("text-language", "value-list")
   sourcelangsq = valuelist.split(",,")
@@ -47,7 +45,7 @@ proc loadTextLangsFromConfig() =
 
   # generate the new valuelist
   for langst in sourcelangsq:
-    if fileExists(langst & ".dat"):
+    if fileExists("parse_" & langst & ".dat"):
       langvaluelistsq.add([langst, capitalizeAscii(langst)])
 
   if tbo: echo langvaluelistsq

mostfiles/dutch.dat → mostfiles/parse_dutch.dat

@@ -596,6 +596,9 @@ treed
 treden
 trad 
 traden
+dreigen
+dreigt
+dreigd
 reken 
 rekent
 rekend

mostfiles/process_text.nim

@@ -404,7 +404,7 @@ proc applyDefinitionFileToText(input_tekst, languagest: string,
 
   if highlightbo == false:
     log("text coloring....")
-    def_filenamest = languagest & ".dat"
+    def_filenamest = "parse_" & languagest & ".dat"
     deffilest = textsourcefileta[def_filenamest]
     blockheadersq = @[
         "PUNCTUATION OF SENTENCES TO HANDLE",

mostfiles/source_files.nim

@@ -10,6 +10,14 @@ import os
 import fr_tools
 
 
+
+type
+  DataFileType* = enum
+    datFileLanguage
+    datFileSummary
+    datFileAll
+
+
 var
   versionfl:float = 0.2
   textsourcefilesq: seq[string] = @["outer_html.html",
@@ -20,8 +28,10 @@ var
   faultsfoundbo: bool = false
 
 
-proc addLanguageFiles() =
-  # dynamicly add the language.dat files from the config-file
+proc addLanguageFilesToList() =
+  # Dynamicly add the language.dat files from the config-file 
+  # to the list textsourcefilesq
+
   var
     valuelist: string
     sourcelangsq:seq[string]
@@ -36,7 +46,8 @@ proc addLanguageFiles() =
 
   # generate the new valuelist
   for langst in sourcelangsq:
-    textsourcefilesq.add(langst & ".dat")
+    # textsourcefilesq.add(langst & ".dat")
+    textsourcefilesq.add("parse_" & langst & ".dat")
 
   if tbo: echo textsourcefilesq
 
@@ -61,9 +72,43 @@ proc loadTextSourceFiles() =
     echo repr(errob) & "\p****End exception****\p"
 
 
-addLanguageFiles()
+
+
+proc writeFilePatternToSeq*(filestartwithst: string): seq[string] = 
+
+#[ Write the files from pattern in the current dir to the sequence and
+ return that]#
+
+  var
+    filelisq: seq[string]
+    filenamest: string
+
+
+  # walk thru the file-iterator and sequence the right file(names)
+  for kind, path in walkDir(getAppDir()):
+    if kind == pcFile:
+      filenamest = extractFileName(path)
+      if len(filenamest) > len(filestartwithst):
+        if filenamest[0..len(filestartwithst) - 1] == filestartwithst:
+          # log(filenamest)
+          filelisq.add(filenamest)
+
+  result = filelisq
+
+
+
+
+proc evaluateDataFiles*(filetypeu: DataFileType): string = 
+
+  result = "Nothing evaluated yet"
+
+
+
+addLanguageFilesToList()
 loadTextSourceFiles()
 
+
+
 when isMainModule:
   # echo textsourcefileta["dutch.dat"]
   echo sourcefilestatust

mostfiles/summary_english_concise.dat

@@ -14,6 +14,7 @@ definition
 mechanism
 method
  caus
+effect 
  result
 consequence
  reason 

mostfiles/summary_english_default.dat

@@ -48,7 +48,7 @@ effects
 task
 influence
 category
-classification 
+classif
  type 
 theor
 supposition
@@ -78,5 +78,7 @@ develop
 goal
 evidence
 proof
+question
+answer
 >----------------------------------<