Scripting:Duranium Extraktion - Versionsgeschichte

Moax am 28. April 2008 um 11:36 Uhr

2008-04-28T11:36:31Z

? Nächstältere Version		Version vom 28. April 2008, 11:36 Uhr
Zeile 42:		Zeile 42:
	Da das Tug aufgewertet nehmt ein Tug, einfach einen kleinen Träger+Jägerverband mit einen Tug und einen Frachter hinstellen und das Script anwenden. So wird das Duranium voll Automatisch abgebaut.		Da das Tug aufgewertet nehmt ein Tug, einfach einen kleinen Träger+Jägerverband mit einen Tug und einen Frachter hinstellen und das Script anwenden. So wird das Duranium voll Automatisch abgebaut.

-	[[Kategorie:Scripte\| Duranium Extraktion]]	+	[[Kategorie:Scripte\|Duranium Extraktion]]

Moax: /* Das Skript */

2008-04-28T11:32:13Z

Das Skript

? Nächstältere Version		Version vom 28. April 2008, 11:32 Uhr
Zeile 1:		Zeile 1:
	--[[Spieler:Moax\|Moax]] 12:42, 25. Apr 2008 (W. Europe Daylight Time)Duranium Extraktion per Flotte =		--[[Spieler:Moax\|Moax]] 12:42, 25. Apr 2008 (W. Europe Daylight Time)Duranium Extraktion per Flotte =
		+	=Duranium Extraktion=
	==Das Skript==		==Das Skript==
	// Script zur Extraktion von Duranium aus größeren Trümmerfeldansammlungen bei Unterstützung durch eine energieliefernde Flotte.		// Script zur Extraktion von Duranium aus größeren Trümmerfeldansammlungen bei Unterstützung durch eine energieliefernde Flotte.

Moax am 25. April 2008 um 10:42 Uhr

2008-04-25T10:42:19Z

Neue Seite

--[[Spieler:Moax|Moax]] 12:42, 25. Apr 2008 (W. Europe Daylight Time)Duranium Extraktion per Flotte =
==Das Skript==
// Script zur Extraktion von Duranium aus größeren Trümmerfeldansammlungen bei Unterstützung durch eine energieliefernde Flotte.
//Waren in den Trümmerfeldern werden angezeigt.
// In den Trümmerfeldern vorhandene Rettungskapseln werden auf das Schiff Basis gebeamt, bei dem es sich nicht unbedingt um eine Basis handeln muss.
//In Zeile 5 ist die EPS-Größe des Extraktorschiffes anzugeben, also 30 bei einer Ortygia.
//Das Script bricht ab, wenn der Laderaum des Schiffes voll, keine Energie mehr vorhanden oder kein Duranium mehr zu extrahieren ist.

Var Extraktorschiff As CMyShip = New CMyShip(123456);
Var Energieflotte As CMyFlotte = New CMyFlotte(123456);
Var Basis As CMyShip = New CMyShip(123122);
Var Trümmerfeld As CShip;
Var EPS As Integer = 30; //EPS-Größe des Extraktorschiffes
Var index As Integer;

Energieflotte.Aktion.TransferiereZuSchiff(Extraktorschiff.ShipID, Math.Floor(EPS / Energieflotte.Ships.Count), EBeamRessource.Energie)
For (Each Trümmerfeld In Extraktorschiff.SRS){
If (Trümmerfeld.UserID = 3 and Trümmerfeld.Hülle > 5 and Extraktorschiff.Energie > 0 and Extraktorschiff.Lager.FreieKapazität > 0){
For (index = 2 To 31){
If (Trümmerfeld.Lager.Menge(index) > 0) {
WriteLine(Trümmerfeld.Name & '(' & Trümmerfeld.ShipID & ') enthält ' & Trümmerfeld.Lager.Menge(index) & ' ' & CWarenInfo.GetName(index));
}
}
If (Trümmerfeld.Lager.Menge(EWarenTyp.Rettungskapseln) > 0){
Basis.Aktion.TransferiereVonSchiff(Trümmerfeld.ShipID, Trümmerfeld.Lager.Menge(EWarenTyp.Rettungskapseln), EBeamRessource.Rettungskapseln)
}
Extraktorschiff.Aktion.TraktorStrahlEinschalten(Trümmerfeld.ShipID);
extrahieren();
}
}

Function extrahieren(){
While (Trümmerfeld.Hülle > 5 and Extraktorschiff.Energie > 0 and Extraktorschiff.Lager.FreieKapazität > 0){
Extraktorschiff.Aktion.WrackExtraktoren(EPS);
Energieflotte.Aktion.TransferiereZuSchiff(Extraktorschiff.ShipID, Math.Floor(EPS / Energieflotte.Ships.Count), EBeamRessource.Energie)
}
}
Extraktorschiff.Aktion.TraktorStrahlAbschalten();

==Kommentar==
Da das Tug aufgewertet nehmt ein Tug, einfach einen kleinen Träger+Jägerverband mit einen Tug und einen Frachter hinstellen und das Script anwenden. So wird das Duranium voll Automatisch abgebaut.

[[Kategorie:Scripte| Duranium Extraktion]]