Scripting:KolonieEnergie optimieren - Versionsgeschichte

Faldrian: /* KolonieEnergie optimieren */

2007-04-30T17:49:42Z

KolonieEnergie optimieren

? Nächstältere Version		Version vom 30. April 2007, 17:49 Uhr
Zeile 5:		Zeile 5:
	Der Script funktioniert unabhängig vom Kolonietyp und eigentlich sollte er es gut tun.		Der Script funktioniert unabhängig vom Kolonietyp und eigentlich sollte er es gut tun.
	Bei Fragen, Fehlern oder Verbesserungen gerne eine IGM an [FWD]Faldrian (36705). Viel Spaß mit dem Script!		Bei Fragen, Fehlern oder Verbesserungen gerne eine IGM an [FWD]Faldrian (36705). Viel Spaß mit dem Script!
		+
		+	Achja, da es eine Funktion ist, kann man die auch sehr bequem für mehrere Kolonien ausführen lassen.

Faldrian: Scripting:KolonieEnerge optimieren wurde nach Scripting:KolonieEnergie optimieren verschoben: Energie schreibt man mit i.

2007-04-30T17:48:10Z

Scripting:KolonieEnerge optimieren wurde nach Scripting:KolonieEnergie optimieren verschoben: Energie schreibt man mit i.

? Nächstältere Version

Version vom 30. April 2007, 17:48 Uhr

Faldrian: /* KolonieEnergie optimieren */

2007-04-30T17:46:00Z

KolonieEnergie optimieren

? Nächstältere Version		Version vom 30. April 2007, 17:46 Uhr
Zeile 2:		Zeile 2:

	= KolonieEnergie optimieren =		= KolonieEnergie optimieren =
		+	Dieser Script eigent sich gut um den Deut-Verbrauch auf Kolonien zu optimieren, indem nur genau soviel Energie produziert wird, wie mindestens benötigt wird. Überflüssige Satelliten werden abgestellt bzw. benötigte angestellt, falls zu wenig Energie vorherrschen sollte.
		+	Der Script funktioniert unabhängig vom Kolonietyp und eigentlich sollte er es gut tun.
		+	Bei Fragen, Fehlern oder Verbesserungen gerne eine IGM an [FWD]Faldrian (36705). Viel Spaß mit dem Script!
		+
		+
	== Skriptcode ==		== Skriptcode ==
	// Arbeitsweise:		// Arbeitsweise:

Faldrian: /* Skriptcode */

2007-04-30T17:37:52Z

Skriptcode

? Nächstältere Version		Version vom 30. April 2007, 17:37 Uhr
Zeile 3:		Zeile 3:
	= KolonieEnergie optimieren =		= KolonieEnergie optimieren =
	== Skriptcode ==		== Skriptcode ==
-		+	// Arbeitsweise:
-	// Arbeitsweise:	+	// Schaut, in welchem Modus er operiert:
-	// Schaut, in welchem Modus er operiert:	+	// mehrenergie = True --> zu wenig Energie vorhanden, schalte so viele Satelliten an, bis >0 EnergieBilanz ist
-	// mehrenergie = True --> zu wenig Energie vorhanden, schalte so viele Satelliten an, bis >0 EnergieBilanz ist	+	// mehrenergie = False --> Deut wird verschwendet, schalte alle überflüssigen Satelliten ab, solange >0 EnergieBilanz bleibt
-	// mehrenergie = False --> Deut wird verschwendet, schalte alle überflüssigen Satelliten ab, solange >0 EnergieBilanz bleibt	+	// Dann geht er alle Gebäude der Kolonie durch und arbeitet die ab.
-	// Dann geht er alle Gebäude der Kolonie durch und arbeitet die ab.	+
-		+	function OptEnergie(BYREF coloid AS Integer) {
-	function OptEnergie(BYREF coloid AS Integer) {	+	VAR colo AS NEW CMyKolonie(coloid);
-	VAR colo AS NEW CMyKolonie(coloid);	+	VAR coloman AS NEW CColonieManager();
-	VAR coloman AS NEW CColonieManager();	+	VAR hausenumerator AS IEnumerator;
-	VAR hausenumerator AS IEnumerator;	+	VAR haus AS CGebäude;
-	VAR haus AS CGebäude;	+	VAR mehrenergie AS Boolean;
-	VAR mehrenergie AS Boolean;	+
-		+	coloman.BenutzeKolonie(coloid);
-	coloman.BenutzeKolonie(coloid);	+	hausenumerator = colo.Gebäude.GetEnumerator(); // Hole die Häuser;
-	hausenumerator = colo.Gebäude.GetEnumerator(); // Hole die Häuser;	+
-		+	// Vorher
-	// Vorher	+	WriteLine('Bearbeite: ' & colo.Name);
-	WriteLine('Bearbeite: ' & colo.Name);	+	WriteLine('EnergieBilanz: ' & CStr(colo.EnergieBilanz));
-	WriteLine('EnergieBilanz: ' & CStr(colo.EnergieBilanz));	+
-		+	// Mehr oder weniger Energie benötigt?
-	// Mehr oder weniger Energie benötigt?	+	mehrenergie = (colo.EnergieBilanz < 0);
-	mehrenergie = (colo.EnergieBilanz < 0);	+
-		+	while(hausenumerator.MoveNext()) {
-	while(hausenumerator.MoveNext()) {	+	haus = hausenumerator.Current;
-	haus = hausenumerator.Current;	+	If((haus.TypName = 'Solarsatellit') AND (haus.Aktiv = NOT mehrenergie)) { // Juhu, einen Satelliten gefunden
-	If((haus.TypName = 'Solarsatellit') AND (haus.Aktiv = NOT mehrenergie)) { // Juhu, einen Satelliten gefunden	+	VAR koords AS String = '@' & CStr(haus.Feld.Coords.X) & '\|' & CStr(haus.Feld.Coords.Y);
-	VAR koords AS String = '@' & CStr(haus.Feld.Coords.X) & '\|' & CStr(haus.Feld.Coords.Y);	+	coloman.GebäudeAktivieren(koords, mehrenergie);
-	coloman.GebäudeAktivieren(koords, mehrenergie);	+	If(mehrenergie) {
-	If(mehrenergie) {	+	WriteLine('Solarsatellit ' & koords & ' eingeschaltet.');
-	WriteLine('Solarsatellit ' & koords & ' eingeschaltet.');	+	If((colo.EnergieBilanz >= 0)) { // Ziel erreicht, aus dem Negativen raus
-	If((colo.EnergieBilanz >= 0)) { // Ziel erreicht, aus dem Negativen raus	+	exit while; // Damit ist es auch genug und wir können terminieren
-	exit while; // Damit ist es auch genug und wir können terminieren	+	}
-	}	+	} else {
-	} else {	+	If((colo.EnergieBilanz < 0)) { // zu wenig Energie, Satelliten doch wieder anmachen
-	If((colo.EnergieBilanz < 0)) { // zu wenig Energie, Satelliten doch wieder anmachen	+	coloman.GebäudeAktivieren(koords, True);
-	coloman.GebäudeAktivieren(koords, True);	+	exit while; // Damit ist es auch genug und wir können terminieren
-	exit while; // Damit ist es auch genug und wir können terminieren	+	} else {
-	} else {	+	WriteLine('Solarsatellit ' & koords & ' ausgeschaltet.');
-	WriteLine('Solarsatellit ' & koords & ' ausgeschaltet.');	+	}
-	}	+	}
-	}	+	}
-	}	+	}
-	}	+
-		+	// Nachher
-	// Nachher	+	WriteLine('EnergieBilanz: ' & CStr(colo.EnergieBilanz));
-	WriteLine('EnergieBilanz: ' & CStr(colo.EnergieBilanz));	+	}
-	}	+
-		+	OptEnergie(DEINEKOLONIEID);
-	OptEnergie(~~DEINE KOLONIEID~~);	+

	== Bemerkungen ==		== Bemerkungen ==

Faldrian am 30. April 2007 um 17:33 Uhr

2007-04-30T17:33:41Z

? Nächstältere Version		Version vom 30. April 2007, 17:33 Uhr
Zeile 2:		Zeile 2:

	= KolonieEnergie optimieren =		= KolonieEnergie optimieren =
-
	== Skriptcode ==		== Skriptcode ==

Faldrian am 30. April 2007 um 17:31 Uhr

2007-04-30T17:31:20Z

Neue Seite

{{scriptingmenue}}

= KolonieEnergie optimieren =

== Skriptcode ==

// Arbeitsweise:
// Schaut, in welchem Modus er operiert:
// mehrenergie = True --> zu wenig Energie vorhanden, schalte so viele Satelliten an, bis >0 EnergieBilanz ist
// mehrenergie = False --> Deut wird verschwendet, schalte alle überflüssigen Satelliten ab, solange >0 EnergieBilanz bleibt
// Dann geht er alle Gebäude der Kolonie durch und arbeitet die ab.

function OptEnergie(BYREF coloid AS Integer) {
VAR colo AS NEW CMyKolonie(coloid);
VAR coloman AS NEW CColonieManager();
VAR hausenumerator AS IEnumerator;
VAR haus AS CGebäude;
VAR mehrenergie AS Boolean;

coloman.BenutzeKolonie(coloid);
hausenumerator = colo.Gebäude.GetEnumerator(); // Hole die Häuser;

// Vorher
WriteLine('Bearbeite: ' & colo.Name);
WriteLine('EnergieBilanz: ' & CStr(colo.EnergieBilanz));

// Mehr oder weniger Energie benötigt?
mehrenergie = (colo.EnergieBilanz < 0);

while(hausenumerator.MoveNext()) {
haus = hausenumerator.Current;
If((haus.TypName = 'Solarsatellit') AND (haus.Aktiv = NOT mehrenergie)) { // Juhu, einen Satelliten gefunden
VAR koords AS String = '@' & CStr(haus.Feld.Coords.X) & '|' & CStr(haus.Feld.Coords.Y);
coloman.GebäudeAktivieren(koords, mehrenergie);
If(mehrenergie) {
WriteLine('Solarsatellit ' & koords & ' eingeschaltet.');
If((colo.EnergieBilanz >= 0)) { // Ziel erreicht, aus dem Negativen raus
exit while; // Damit ist es auch genug und wir können terminieren
}
} else {
If((colo.EnergieBilanz < 0)) { // zu wenig Energie, Satelliten doch wieder anmachen
coloman.GebäudeAktivieren(koords, True);
exit while; // Damit ist es auch genug und wir können terminieren
} else {
WriteLine('Solarsatellit ' & koords & ' ausgeschaltet.');
}
}
}
}

// Nachher
WriteLine('EnergieBilanz: ' & CStr(colo.EnergieBilanz));
}

OptEnergie(DEINE KOLONIEID);

== Bemerkungen ==

[[Kategorie:Scripte|KolonieEnergie optimieren]]