Tak, mapa moja - już dość dawno robiona, ale pamiętam, że skopiowałam skrypt z demo, nic nie zmieniając...

A może ja miałam jakąś inną wersję tego, wcześniejszą, albo co? Dobrze, że wkleiłaś, to sobie porównam.

Poczytałam na tamtym forum - czekaj Ty, jak lubisz się męczyć, to coś Ci wymyślę męczącego!

... eeee, nie, jednak nie, przecież musiałabym to przetestować...

Tamtą ich mapę obejrzałam wyłącznie w Edytorze - obejrzałam sobie bandytów i już nie miałam zamiaru otwierać w grze.

A ja mam aktualnie w robocie 4 mapki - żadnej nie dokończyłam, bo nie chce mi się robić Questów...

... i jeszcze jedna funkcja prosto ze skryptu.
function Mission_Victory ktora sprawila mi troche klopotu i ktora chyba nie do konca zadzialala

Victory Celebration
There are a few possibilities for special actions after winning a map.
One of those is the victory celebration, during which the player’s knight might be present as well.
In order to set the knight’s position for the festival, you need to place a script entity called
“VictoryKnightPos” in the direct vicinity of the marketplace.
Afterwards, you need to add a new function to the map script:

function Mission_Victory()
local PossibleSettlerTypes = {
Entity,
Entity,
}
VictoryGenerateFestivalAtPlayer( PlayerID, PossibleSettlerTypes )
local VictoryKnightPos = Logic.GetEntityIDByName("VictoryKnightPos")
local x,y = Logic.GetEntityPosition(VictoryKnightPos)
local Orientation = Logic.GetEntityOrientation(VictoryKnightPos)
local KnightID = Logic.GetKnightID(1)
VictorySetEntityToPosition( KnightID, x, y, Orientation )
end

· PlayerID: ID of the victorious player. Usually 1.
· Entity: A settler who could be present during the festival. Here you could list several
different settlers. Each value entered here needs to be preceded by “Entities.”. You
could use the following values:
U_NPC_Monk_ME U_NPC_Monk_NE U_NPC_Monk_NA U_NPC_Monk_SE
U_NPC_Villager01_ME U_NPC_Villager01_NE U_NPC_Villager01_SE
U_NPC_Villager01_NA U_Baker U_BathWorker U_Soapmaker U_DairyWorker
U_HerbGatherer U_GrainFarmer U_CattleFarmer U_Woodcutter
U_SheepFarmer U_Weaver U_BannerMaker U_Beekeeper U_Barkeeper
U_IronMiner U_Stonecutter U_Fisher U_Hunter U_SmokeHouseWorker
U_Butcher U_Pharmacist U_BroomMaker U_Tanner U_Priest U_Blacksmith
U_CandleMaker U_Carpenter U_Actor_Nobleman U_Actor_Bandit
U_Actor_Princess U_TheatreWorker U_SpouseS01 U_SpouseS02 U_SpouseS03
U_SpouseF01 U_SpouseF02 U_SpouseF03

Przyklad - > Example for a small victory celebration with only fishermen, woodcutters and their spouses as guests, not the player’s knight:

function Mission_Victory()
local PossibleSettlerTypes = {
Entities.U_Fisher,
Entities.U_Woodcutter,
Entities.U_SpouseS01,
Entities.U_SpouseF01,
}
VictoryGenerateFestivalAtPlayer( 1, PossibleSettlerTypes )
end

Ostatnio edytowany przez sisi (2009-08-23 10:59:30)

prosto z "S6_SEED_ScriptTutorials_UK" strona 13.
gdzies na jakims forum doczytalam, ze festiwal moze byc z fajerwerkami lub bez, ale nie moge tego na razie odnalezc, u mnie w skrypcie.lua wyglada to tak (ale "VictoryKnightPos" chyba mi nie dziala):

...
}
VictoryGenerateFestivalAtPlayer( 1, PossibleSettlerTypes )
Logic.StartFestival( 1, 1 )

local VictoryKnightPos = Logic.GetEntityIDByName("VictoryKnightPos")
...

jasne, ze z ta funkcja MachSchatzTausch 'tak po prostu': drewno za zloto, kielbasa za kamien, itd... zobacz demo, wszystko wyjasnia.
fragment skryptu z funkcja wklejasz w lua na takiej samej zasadzie jak MachSchatzVersteck

znalazlam:
http://www.siedler-games.de/forum/s6-sc … -fest.html

function FestVeranstalten()
   Logic.StartFestival(_PlayerID, FestivalIndex )
end

gdzie FestivalIndex = 1 (fajerwerki), = 0 (bez fajerwerkow)

Ostatnio edytowany przez sisi (2009-08-25 01:01:12)

nie wiem, zalezy chyba od fabuly... mozna zaplacic drewnem (rusztowania), zeby pozyskac kamien z ruin (pozwolenie na rozbiorke - > quest, ktory widzialam na tej szczegolnej mapie z niemieckiego serwera)

wklejam, ku pamieci... bo nic jeszcze o tym nie wiem.

Funkcja UserSetCamera
http://wiki.siedler-aek.de/user_funktio … rsetcamera

przyklad:

UserSetCamera(
    {Target = Logic.GetStoreHouse(1),
    OffsetX = 0,
    OffsetY = -1000,
    Duration = 10,
    ZoomFactor = 0.35,
    RotationAngle = 0,
    MayRotate = 1,
    Title = "Ein neuer Titel ...",
    TitleColor = "64, 0, 255",
    TitleAlpha = 128,
    Text = "Und hier der Text ...!",
    TextColor = "255, 255, 255",
    TextAlpha = 255,
    Bars = "black",
    MiniMap = 1,
    MiniMapMarker = 1}
)

function UserSetCamera(Param)
    assert(Param.Target)
    local id,x,y = 0
    if type(Param.Target) == "number" then
        Param.x,Param.y = Logic.GetEntityPosition(Param.Target)
        Param.ID = Param.Target
    elseif type(Param.Target) == "string" then
        Param.x,Param.y = Logic.GetEntityPosition(Logic.GetEntityIDByName(Param.Target))
        Param.ID = Logic.GetEntityIDByName(Param.Target)
    elseif type(Param.Target) == "table" then
        Param.x = Param.Target[1]
        Param.y = Param.Target[2]
        Param.ID = Logic.GetEntityAtPosition(Param.Target[1], Param.Target[2])
    end
    if not Param.ID then Param.ID = 0 end
    if type(Param.OffsetX) ~= "number" then Param.OffsetX = 0 end
    if type(Param.OffsetY) ~= "number" then Param.OffsetY = 0 end
    if not Param.Duration or Param.Duration > 30 or Param.Duration < 5 then
        Param.Duration = 5
    end
    if not Param.ZoomFactor or Param.ZoomFactor > 0.5 or Param.ZoomFactor < 0.05 then
        Param.ZoomFactor = 0.5
    end
    if not Param.RotationAngle or Param.RotationAngle > 180 or Param.RotationAngle < -180 then
        Param.RotationAngle = -45
    end
    if type(Param.MayRotate) ~= "number" or Param.MayRotate ~= 0 or Param.MayRotate ~= 1 then
        Param.MayRotate = 1
    end
    if not Param.Title or type(Param.Title) ~= "string" then
        Param.Title = ""
    else
        Param.Title = Umlaute(Param.Title)
    end
    if not Param.TitleColor or type(Param.TitleColor) ~= "string" then
        Param.TitleColor = "255, 255, 255"
    end
    if not Param.TitleAlpha or type(Param.TitleAlpha) ~= "number" then
        Param.TitleAlpha = 255
    end
    if not Param.Text or type(Param.Text) ~= "string" then
        Param.Text = ""
    else
        Param.Text = Umlaute(Param.Text)
    end
    if not Param.TextColor or type(Param.TextColor) ~= "string" then
        Param.TextColor = "255, 255, 255"
    end
    if not Param.TextAlpha or type(Param.TextAlpha) ~= "number" then
        Param.TextAlpha = 255
    end
    if not Param.Bars or type(Param.Bars) ~= "string" or Param.Bars ~= "black" and Param.Bars ~= "transp" then
        Param.Bars = "none"
    end
    if not Param.MiniMap or type(Param.MiniMap) ~= "number" then
        Param.MiniMap = 0
    end
    if not Param.MiniMapMarker or type(Param.MiniMapMarker) ~= "number" then
        Param.MiniMapMarker = 1
    end
    Logic.ExecuteInLuaLocalState("SetLookAt("..Param.ID..", "..Param.x..", "..Param.y..", "..Param.OffsetX..", "..Param.OffsetY..", "..Param.Duration..", "..Param.ZoomFactor..", "..Param.RotationAngle..", ".. Param.MayRotate..", '"..Param.Title.."', '"..Param.TitleColor.."', "..Param.TitleAlpha..", '"..Param.Text.."', '"..Param.TextColor.."', "..Param.TextAlpha..", '"..Param.Bars.."', "..Param.MiniMap..", "..Param.MiniMapMarker..")")
end

Ostatnio edytowany przez sisi (2009-08-25 00:18:04)

Niektóre te nowe mogą być bardzo niebezpieczne...

Na przykład:

Goal_TributeClaim

-- Dies ist kein herkoemmliches Goal
-- Es sollte immer versteckt eingesetzt werden, da es selbsttaetig weitere sichtbare Quests erzeugt.
-- Die Texte fuer diese Quests muessen in die NachrichtenParameter diese Verhaltens.
-- Der fordernde Player muss als Questgeber angegeben werden.
-- Es laeuft bis der Questgeber zerstoert wurde.
-- Quests werden nur dann erzeugt, wenn der QuestEmpfaenger das Territorium im Besitz hat.
-- Wird nicht bezahlt, wird automatisch der Aussenposten zerstoert udn das Territorium wird wieder neutral.
-- Dieses Goal kann typischerweise mit einem Trigger_AlwaysActive verknuepft werden.

Tłumaczenie z Tłumacza Google:

- To nie jest konwencjonalny Goal
- Należy stosować zawsze ukryty, ponieważ automatycznie tworzy bardziej widoczne questów.
- Teksty do tych zadań w parametrach wiadomości takie zachowanie.
- W trudnych gracz musi być podany jako dawca quest.
- To prowadzi do dawcy quest został zniszczony.
- Misje są generowane tylko wtedy, gdy QuestEmpfaenger jest właścicielem terytorium.
- W przypadku braku płatności zostanie automatycznie zniszczony UDN placówkę na terytorium ponownie neutralny.
- Ten cel może zazwyczaj być związany z Trigger_AlwaysActive.

Goal_TributeClaim to chyba wlasnie ten quest zostal uzyty w CC-Reisefieber do platnosci za park narodowy. ale musialam miec mine jak mi kasa zaczela uciekac ze skarbca ... (bardzo fajna mapa, rozegralas?)

Reward_CreateEffect ma chyba zastosowania w wersji z dodatkiem (Wschodnie Krolestwa). to wszystko szalenie poszlo juz naprzod... na wiki jest mapa demo wlasnie z tymi efektami, dla mnie niedostepne...

Masz racje, że to jest chyba dla W.K. - ale QSB jest jedno, nic nie piszą, że do W.K.....  no i jeszcze jedno, mapy zapisuje się osobno dla podstawy i osobno dla dodatku, ale....  hmmmm....

Mam jedną mapę zrobioną pod W.K. spróbuję, czy tam to zadziała. Jutro. Dziś juz nie mogę na to patrzeć!


CC-Reisefieber nie rozegrałam, bo gada po niemiecku - a po samych rodzajach questów trudno się zorientować o co chodzi. Nie lubię tak, muszę mieć jasność, czego ode mnie chcą. Widać, że mapa z pomysłem, chociaż to uciekanie kasy bardzo irytujące.

Możliwe, że to był ten nowy quest - szkoda, ze opis niemiecki, do angielskiego mam program tłumaczący, no i składnia zdania jest jasna - po niemiecku nigdy nie wiem, gdzie jest to najważniesze w zdaniu.
Uczyłam się rok na intensywnym kursie, ale to było w 1973 roku! Wyobrażasz sobie?!

sciagnij sobie do efektow demo.... to powinno cos rozjasnic (wiki / mapy)
http://wiki.siedler-aek.de/maps/effekte-demo

w mapach models_demo tez sa efekty (widzialam w lua w spisie _entity)...