#138 Title Texte auch aus Textresourcen holen

hauptDialog: Titel aus Textschnipsel
planetAuswahlDialog: Titel aus Textschnipsel
planetenEigenschaftenDialog; Titel aus Textschnipsel
planetMondNameDialog: Titel aus Textschnipsel
planetSammelEigenschaftenDialog: Titel aus Textschnipsel
rezepteBekanntDialog: Titel aus Textschnipsel
spielStatusDialog; Titel aus Textschnipsel
sprachUmschaltung: Titel aus Textschnipsel
stoffErlangenDialog: Titel aus Textschnipsel
systemNamenDialog: Titel aus Textschnipsel
textResources: Neue Texte Texte zu gemeinsamen Texten verschoben

hauptDialog.pl

@@ -18,7 +18,6 @@
 	Versteckt5 = false,
 	Versteckt6 = false,
 	Versteckt8 = false,
-	debug(myTrace, 'Versteckt1=~k Versteckt2=~k Versteckt3=~k Versteckt4=~k Versteckt5=~k Versteckt6=~k Versteckt7=~k', [Versteckt1, Versteckt2, Versteckt3, Versteckt4, Versteckt5, Versteckt6, Versteckt7]),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
 	textResources:getText(txtLinkZurMaske, TxtLinkZurMaske),
 	textResources:getText(txtErklaerung, TxtErklaerung),
@@ -88,7 +87,8 @@
 	\['</formSpace>']
 	             ],       
 server:holeCssAlsStyle(StyleString),
-TermerizedHead = [\[StyleString], title('hauptDialog')],
+textResources:getText(txtNoMansSkyTrainerFunktionsAuswahl, TxtNoMansSkyTrainerFunktionsAuswahl),
+TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerFunktionsAuswahl)],
 reply_html_page(TermerizedHead, TermerizedBody).
 
 baueRef(Versteckt, Link, Text) -->

planetAuswahlDialog.pl

@@ -27,7 +27,8 @@
 		\['</formSpace>']
 		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: System-Auswahl')],
+	textResources:getText(txtNoMansSkyTrainerSystemAuswahl, TxtNoMansSkyTrainerSystemAuswahl),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerSystemAuswahl)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelle(OptionList) -->
@@ -74,7 +75,8 @@
 	 \['</formSpace>']
 		             ],       
 	 server:holeCssAlsStyle(StyleString),
-	 TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planet-Auswahl')],
+	 textResources:getText(txtNoNansSkyTrainerHimmelskoerperEingeben, TxtNoNansSkyTrainerHimmelskoerperEingeben),
+	 TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerHimmelskoerperEingeben)],
 	 reply_html_page(TermerizedHead, TermerizedBody)
 	)).
 
@@ -111,7 +113,8 @@
 
 fehlerBehandlung :-
    	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planeteneigenschaften Fehler')],
+	textResources:getText(txtNoMansSkyTrainerFehlerAuswahl, TxtNoMansSkyTrainerFehlerAuswahl),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerFehlerAuswahl)],
 	textResources:getText(txtBitteEineAuswahlTreffen, TxtBitteEineAuswahlTreffen),
 	TermerizedBody = [
 		\['<redHeader>'],

planetMondNameDialog.pl

@@ -75,7 +75,8 @@
 		\['</formSpace>'] 
 		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planetennamen')],
+	textResources:getText(txtNoNansSkyTrainerHimmelskoerperEingeben, TxtNoNansSkyTrainerHimmelskoerperEingeben),
+	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerHimmelskoerperEingeben)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelleReadOnly(AuswahlSystem) -->
@@ -229,7 +230,8 @@
 	string_concat(FehlerMeldung0, TxtInSpalte, FehlerMeldung1),
 	string_concat(FehlerMeldung1, 1, FehlerMeldung2),
    	string_concat(FehlerMeldung2, TxtIstUnvollstaendig, FehlerMeldung),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planeteneingabe Fehler')],
+   	textResources:getText(txtNoMansSkyTrainerFehlerInZeile, TxtNoMansSkyTrainerFehlerInZeile),	
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerFehlerInZeile)],
 	TermerizedBody = [
 		\['<redHeader>'],
 		h3(align(center), FehlerMeldung),
@@ -260,7 +262,8 @@
 
 gespeichert :-
     server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Himmelskörper-Namen')],
+	textResources:getText(txtNoMansSkyTrainerGespeichert, TxtNoMansSkyTrainerGespeichert),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerGespeichert)],
 	textResources:getText(txtGespeichert, TxtGespeichert),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),	
 	TermerizedBody = [

planetSammelEigenschaftenDialog.pl

@@ -82,7 +82,8 @@
 	 \['</formSpace>']
 		             ],       
 	 server:holeCssAlsStyle(StyleString),
-	 TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planet-Auswahl')],
+	 textResources:getText(txtNoNansSkyTrainerAuswahlSammelart, TxtNoNansSkyTrainerAuswahlSammelart),
+	 TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerAuswahlSammelart)],
 	 reply_html_page(TermerizedHead, TermerizedBody)
 	)).
 
@@ -201,9 +202,10 @@
      ]
 	],
 	server:holeCssAlsStyle(StyleString),
+	textResources:getText(txtNoNansSkyTrainerSammelEingabeSammelEigenschaften, TxtNoNansSkyTrainerSammelEingabeSammelEigenschaften),
 	TermerizedHead = [
 		\[StyleString], 
-		title('No mans Sky trainer: System-Sammel-Eigenschaften')    
+		title(TxtNoNansSkyTrainerSammelEingabeSammelEigenschaften)    
 		],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
@@ -392,7 +394,8 @@
     server:holeCssAlsStyle(StyleString),
 	textResources:getText(txtGespeichert, TxtGespeichert),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planetennamen')],
+	textResources:getText(txtNoMansSkyTrainerGespeichert, TxtNoMansSkyTrainerGespeichert),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerGespeichert)],
 	TermerizedBody = [
 		\['<header>'],
 		h1(align(center), TxtGespeichert),
@@ -411,7 +414,8 @@
 	ZeileNo is FeldNo mod 100,
    	string_concat(TxtDieZeile, ZeileNo, FehlerMeldung0),
    	string_concat(FehlerMeldung0, TxtIstUnvollstaendig, FehlerMeldung),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planeteneigenschaften Fehler')],
+	textResources:getText(txtNoMansSkyTrainerFehlerInZeile, TxtNoMansSkyTrainerFehlerInZeile),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerFehlerInZeile)],
 	TermerizedBody = [
 		\['<redHeader>'],
 		h3(align(center), FehlerMeldung),

planetenEigenschaftenDialog.pl

@@ -127,7 +127,8 @@
 		 ]),
 	\['</formSpace>']		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: System-Eigenschaften')],
+	textResources:getText(txtNoMansSkyTrainerHimmelskoerperEingeben, TxtNoMansSkyTrainerHimmelskoerperEingeben),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerHimmelskoerperEingeben)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelleReadOnly(AuswahlSystem, AuswahlPlanet) -->
@@ -474,7 +475,8 @@
 
 gespeichert :-
       server:holeCssAlsStyle(StyleString),
-	  TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planeteneigenschaften gespeichert')],
+	  textResources:getText(txtNoMansSkyTrainerGespeichert, TxtNoMansSkyTrainerGespeichert),
+	  TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerGespeichert)],
 	  TermerizedBody = [
 		\['<header>'],
 		h3(align(center),'gespeichert!'),
@@ -492,7 +494,8 @@
 	textResources:getText(txtVorhandenGekennzeichnet, TxtVorhandenGekennzeichnet),
    	string_concat(TxtDieEinrichtung, TxtGruppe, FehlerMeldung0),
    	string_concat(FehlerMeldung0, TxtVorhandenGekennzeichnet, FehlerMeldung),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planeteneigenschaften Fehler')],
+	textResources:getText(txtNoMansSkyTrainerFehlerInZeile, TxtNoMansSkyTrainerFehlerInZeile),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerFehlerInZeile)],
 	TermerizedBody = [
 		\['<redHeader>'],
 		h3(align(center), FehlerMeldung),

rezepteBekanntDialog.pl

@@ -36,7 +36,8 @@
 		\['</formSpace>']
 		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: System-Auswahl')],
+	textResources:getText(txtNoMansSkyTrainerSystemAuswahl, TxtNoMansSkyTrainerSystemAuswahl),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerSystemAuswahl)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelle(OptionList) -->
@@ -119,9 +120,9 @@
 	ausgabe:joinRecordsNumbering(FeldNoList4, RezeptListe4, 2, NumerierteRecordList4),
 
 	textResources:getText(txtBekannteRezepteEingeben, TxtBekannteRezepteEingeben),
-	textResources:getText(txtEingabeBekannteRezepte, TxtEingabeBekannteRezepte),
+	textResources:getText(txtBekannteRezepte, TxtBekannteRezepte),
 	string_concat(TxtBekannteRezepteEingeben, ': ', Txt0),
-	string_concat(Txt0, TxtEingabeBekannteRezepte, TxtHeader),
+	string_concat(Txt0, TxtBekannteRezepte, TxtHeader),
 	textResources:getText(txtOk, TxtOk),
 	textResources:getText(txtReset, TxtReset),
 
@@ -148,7 +149,8 @@
 		\['</formSpace>']
 		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('Eingabe bekannte Rezepte')],
+	textResources:getText(txtNoMansSkyTrainerEingabeBekannteRezepte, TxtNoMansSkyTrainerEingabeBekannteRezepte),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerEingabeBekannteRezepte)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelleReadOnly(AuswahlStoffKlasse) -->
@@ -250,7 +252,8 @@
 
 gespeichert :-
    	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('systemNamenDialog')],
+	textResources:getText(txtNoMansSkyTrainerGespeichert, TxtNoMansSkyTrainerGespeichert),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerGespeichert)],
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
 	textResources:getText(txtGespeichert, TxtGespeichert),
 	TermerizedBody = [

spielStatusDialog.pl

@@ -145,7 +145,8 @@
 		  ]), 
 	\['</formSpace>']],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans sky trainer: Vorraussetzungen Materialsammlung')],
+	textResources:getText(txtNoMansSkyTrainerVorraussetzungenMaterialsammlung, TxtNoMansSkyTrainerVorraussetzungenMaterialsammlung),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerVorraussetzungenMaterialsammlung)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 spielStatus(Request) :-
@@ -178,10 +179,14 @@
     (Spaere = off -> assertz(spielStatus:spielStatus(sphaereRufbar, false)); assertz(spielStatus:spielStatus(sphaereRufbar, true))),
 	assertz(spielStatus:spielStatus(konfiguriert, true)),
 	sammlung:vorgefertigeLoesungenErstellen,
+	gespeichert.
+
+gespeichert :-
     server:holeCssAlsStyle(StyleString),
 	textResources:getText(txtGespeichert, TxtGespeichert),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),	
-	TermerizedHead = [\[StyleString], title('No mans sky trainer: Vorraussetzungen Materialsammlung')],
+	textResources:getText(txtNoMansSkyTrainerGespeichert, TxtNoMansSkyTrainerGespeichert),
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerGespeichert)],
 	TermerizedBody = [
 		\['<header>'],
 		h1(align(center),TxtGespeichert),

sprachUmschaltung.pl

@@ -37,7 +37,8 @@
 		\['</formSpace>']
 		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: System-Auswahl')],
+	textResources:getText(txtNoNansSkyTrainerSprachAuswahl, TxtNoNansSkyTrainerSprachAuswahl),
+	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerSprachAuswahl)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelle(OptionList) -->
@@ -68,7 +69,8 @@
 
 gespeichert :-
    	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('systemNamenDialog')],
+	textResources:getText(txtNoNansSkyTrainerSprachAuswahl, TxtNoNansSkyTrainerSprachAuswahl),
+	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerSprachAuswahl)],
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
 	textResources:getText(txtGespeichert, TxtGespeichert),
 	TermerizedBody = [

stoffErlangenDialog.pl

@@ -74,7 +74,6 @@
 	textResources:getText(txtGerichte, TxtGerichte),
 	textResources:getText(txtOk, TxtOk),
 	textResources:getText(txtReset, TxtReset),
-
 	textResources:getText(txtOptimiertesVorgehenErhalten, TxtOptimiertesVorgehenErhalten),
 	textResources:getText(txtAuswahlEmpfohleneHandlungenStoffErhalten, TxtAuswahlEmpfohleneHandlungenStoffErhalten),
 	string_concat(TxtOptimiertesVorgehenErhalten, ': ', Txt0),
@@ -121,7 +120,8 @@
 		\['</formSpace>']     
 	],
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Stoff erlangen')],
+	textResources:getText(txtNoNansSkyTrainerStoffErlangen, TxtNoNansSkyTrainerStoffErlangen),
+	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerStoffErlangen)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 eingabeTabelleReadOnly(AuswahlSystem, AuswahlPlanet) -->
@@ -183,7 +183,8 @@
 einenWaehlen() :-
 	textResources:getText(txtBitteGenauEineAuswahlTreffen, TxtBitteGenauEineAuswahlTreffen),
 	server:holeCssAlsStyle(StyleString),
-   	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Stoff erlangen')],
+	textResources:getText(txtNoNansSkyTrainerStoffErlangen, TxtNoNansSkyTrainerStoffErlangen),
+   	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerStoffErlangen)],
 	TermerizedBody = [
 		\['<redHeader>'],
 		h1(align(center), TxtBitteGenauEineAuswahlTreffen),
@@ -195,7 +196,8 @@
 nurEinenWaehlen() :-
 	textResources:getText(txtBitteNurEineAuswahlTreffen, TxtBitteNurEineAuswahlTreffen),
 	server:holeCssAlsStyle(StyleString),
-   	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Stoff erlangen')],
+	textResources:getText(txtNoNansSkyTrainerStoffErlangen, TxtNoNansSkyTrainerStoffErlangen),
+   	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerStoffErlangen)],
 	TermerizedBody = [
 		\['<redHeader>'],
 		h1(align(center), TxtBitteNurEineAuswahlTreffen),
@@ -258,7 +260,8 @@
 	textResources:getText(txtSummenwert, TxtSummenwert),
 	textResources:getText(txtEinheit, TxtEinheit),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Stoff erlangen')],
+	textResources:getText(txtNoNansSkyTrainerStoffErlangen, TxtNoNansSkyTrainerStoffErlangen),
+	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerStoffErlangen)],
 	TermerizedBody = [
 		  	\['<header>'],
 		  	h1([align(center)], [TxtStoffErlangen]),
@@ -346,7 +349,8 @@
 nichtHerstellBar(Ziel) :-
 	ausgabe:baueBegruendung(Ziel, BegrTupel),
    	server:holeCssAlsStyle(StyleString),
-   	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Stoff erlangen')],
+	textResources:getText(txtNoNansSkyTrainerStoffErlangen, TxtNoNansSkyTrainerStoffErlangen),
+   	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerStoffErlangen)],
 	BegrTupel \= [],
 	textResources:getText(txtBeschaffenUndHerstellenNichtMoeglich, TxtBeschaffenUndHerstellenNichtMoeglich),
 	textResources:getText(txtBegruendungDp, TxtBegruendungDp),
@@ -365,7 +369,8 @@
 
 nichtHerstellBar(_) :-
    	server:holeCssAlsStyle(StyleString),
-   	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Stoff erlangen')],
+	textResources:getText(txtNoNansSkyTrainerStoffErlangen, TxtNoNansSkyTrainerStoffErlangen),
+   	TermerizedHead = [\[StyleString], title(TxtNoNansSkyTrainerStoffErlangen)],
 	textResources:getText(txtBeschaffungNichtMoeglichUndKeineRezepteVvorhanden, TxtBeschaffungNichtMoeglichUndKeineRezepteVvorhanden),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
 	TermerizedBody = [

systemNamenDialog.pl

@@ -47,7 +47,8 @@
 		\['</formSpace>']
 		             ],       
 	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('systemNamenDialog')],
+	textResources:getText(txtNoMansSkyTrainerSternensystemeEingeben, TxtNoMansSkyTrainerSternensystemeEingeben),	
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerSternensystemeEingeben)],
 	reply_html_page(TermerizedHead, TermerizedBody).
 
 innereTabelle(NumerierteRecordList) -->
@@ -226,8 +227,8 @@
 
 gespeichert :-
    	server:holeCssAlsStyle(StyleString),
-	TermerizedHead = [\[StyleString], title('systemNamenDialog')],
 	textResources:getText(txtGespeichert, TxtGespeichert),
+	TermerizedHead = [\[StyleString], title(TxtGespeichert)],
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),	
 	TermerizedBody = [
 		\['<header>'],
@@ -245,11 +246,12 @@
 	textResources:getText(txtInSpalte, TxtInSpalte),
 	textResources:getText(txtIstUnvollstaendig, TxtIstUnvollstaendig),
 	textResources:getText(txtFunktionsAuswahl, TxtFunktionsAuswahl),
+	textResources:getText(txtNoMansSkyTrainerSternensystemeEingeben, TxtNoMansSkyTrainerSternensystemeEingeben),
 	string_concat(TxtDieZeile, Zeile, FehlerMeldung0),
 	string_concat(FehlerMeldung0, TxtInSpalte, FehlerMeldung1),
 	string_concat(FehlerMeldung1, Spalte, FehlerMeldung2),
    	string_concat(FehlerMeldung2, TxtIstUnvollstaendig, FehlerMeldung),
-	TermerizedHead = [\[StyleString], title('No mans Sky trainer: Planeteneigenschaften Fehler')],
+	TermerizedHead = [\[StyleString], title(TxtNoMansSkyTrainerSternensystemeEingeben)],
 	TermerizedBody = [
 		\['<redHeader>'],
 		h3(align(center), FehlerMeldung),