Project: Battle Planets Forum

Code: Alles auswählen

--
-- Dieses Script setzt alle Gebäude eines wählbaren Spielers die als Kartenbestandteil gelten auf neutral.
--
-- Verwendbar in: mapeditor
--
-- -------------------------------------------------------------------------------------------------------
--
-- globale Variable vorbelegen:
slotnr = 0
neutral = false
counter = 0
--
-- -------------------------------------------------------------------------------------------------------
--
-- Table für Kartenbestandteile erzeugen:
--
kartenbestandteile = {}
kartenbestandteile.Headquarter1 = 3
kartenbestandteile.Town1 = 24
kartenbestandteile.Akku = 25
kartenbestandteile.Lab10 = 27
kartenbestandteile.Lab25 = 28
kartenbestandteile.Headquarter2 = 55
kartenbestandteile.Headquarter3 = 56
kartenbestandteile.TrainingCenter = 57
kartenbestandteile.VillaDeng = 58
kartenbestandteile.Town2 = 59
kartenbestandteile.Town3 = 60
kartenbestandteile.Headquarter4 = 1002
kartenbestandteile.Bunker1 = 1003
kartenbestandteile.SecretDepot = 1005
kartenbestandteile.MountainEntrance = 1009
kartenbestandteile.HQTitanNet = 1010
kartenbestandteile.Bunker2 = 1015
kartenbestandteile.Bunker3 = 1016
kartenbestandteile.SecretFactory = 1202
kartenbestandteile.SecretTown = 1203
kartenbestandteile.Wreck = 1299
kartenbestandteile.Aussenposten = 12031
kartenbestandteile.Fabrik = 12032
kartenbestandteile.Treibstoffbunker = 12033
--
-- -------------------------------------------------------------------------------------------------------
--
-- Funktionen:
--
-- Ermittle Gebäude ID
function GetGebaeudeID ( feldGebaeude )
   
   local gebaeudetyp = feldGebaeude:getType()
   local gebaeudeid   = gebaeudetyp:getID()
   
   return gebaeudeid

 end
--
--
-- Prüfe ob aktuelle GebäudeID Kartenbestandteil ist
function CheckGebaeudeID ( _index )

   if gebaeudeID == kartenbestandteile [ _index ] then
      neutral = true
      return neutral
   end

end
--
--
--
-- Dialog zur Auswahl der Slotnummer ---------------------------------------------------------------------
--
--  Dialog vorbereiten      
dlg = asc.PropertyDialog ( 'Auswahl des Spielers' )     
dlg:addInteger ( 'Geben Sie die Slotnummer ein' , slotnr )
--
-- Dialog starten
result = dlg:run()
--
-- Skript Abbruch mit "Cancel"
if result == false then
   asc.warningMessage ( "        Skript abgebrochen!" )

   return
end
--
-- Ergebnis des Dialogs in Variable slotnr speichern
slotnr = dlg:getInteger ( 'Geben Sie die Slotnummer ein' ) 
--
-- ungueltigen Spieler abfangen
if slotnr < 1 or slotnr > 7 then
   asc.warningMessage ( "Ungueltiger Spieler - (1-7 ist moeglich) - Skript abgebrochen!")

   return
end
--
-- Dialog Ende -------------------------------------------------------------------------------------------
--
-- Karte laden
map = asc.getActiveMap()
--
-- Absuchen der Karte Feld für Feld
for y = 0,map:height()-1 do
	for x = 0,map:width()-1 do

		--Zeiger auf Feld setzen
		feld = map:getField(x,y)

		-- Prüfe ob ein Gebäudeeingang auf dem Feld ist
		if feld:getBuildingEntrance() then

			-- Prüfe ob das Gebäude dem ausgewählten Spieler gehört
			if feld:getBuildingEntrance():getOwner() == slotnr then
             
				-- Zeiger auf Gebäude setzen
				gebaeude = feld:getBuildingEntrance()
             
				-- Ermittle ID des Gebäudes per Funktion
				gebaeudeID   = GetGebaeudeID( gebaeude )
                           
				-- Prüfe ob Gebäude Kartenbestandteil ist per Funktion
				table.foreach ( kartenbestandteile , CheckGebaeudeID )
            
				-- Gebäude ist Kartenbestandteil
				if neutral then
            
            		-- Gebäude neutral stellen
					gebaeude:convert ( 8 )

					-- Erhöhe Zähler 
					counter = counter + 1
                
					-- Stelle Zeiger "Gebäude ist Kartenbestandteil" zurück
					neutral = false
                
				end
			end
		end
	end
end
asc.infoMessage( counter .. ' Gebaeude neutral gestellt' )