Creative modding - Wątek roboczy

[Creative]

11 stron, czystej familiady

a co do moda, zgaduję że to będzie czysty 10 minutowy symulator "Pójdź z A do B, czasami z B do C koniec"

A ty czym się pochwalisz?

[Nefarem]

11 stron, czystej familiady

a co do moda, zgaduję że to będzie czysty 10 minutowy symulator "Pójdź z A do B, czasami z B do C koniec"

A ty czym się pochwalisz?

Chociaż by tym: https://forum.original-war.net/viewtopi ... =28&t=4238

[Creative]

Jaka jest komenda na zapisanie postaci i exportowanie zapisanej postaci?

[Xander]

Jaka jest komenda na zapisanie postaci i exportowanie zapisanej postaci?

Spoiler:

SaveCharacters(ident,'ident');

Spoiler:

export IDENT;
Export Function TWOJA_FUNKCJA;

uc_side = KOLOR(1 - am, 2 - ar, 3 - rus, 4 - am2 itp);
uc_nation = 1 - amerykanie, 2 - arabowie, 3 - ruskie;
IDENT := CreateCharacter('IDENT');
PlaceUnitArea(IDENT, TWOJA_AREA, false (true to pojawianie się jak z eona));

to jest taka podstawowa podstawa podstawowej podstawowności chyba

[Serpent]

Jak zrobiłeś moda z x misjami bez zapisywania głównej postaci

No jak? Normalnie, kopiuj/wklej

[Markok]

Znowu zapowiadają się z góry ustalane poziomy postaci do każdej misji, chyba że Creative zaaplikuje do moda ten niezwykle zawiły kod, który podesłał Xander, musiał nad nim ślęczeć godzinami, masterpiece!

PS. Xander po Twoich postach obliczam Twój wiek na połowę mojego, ale przecież zrobiłeś Pamiętnik Amerykanina i robi mi się bajzel w głowie, pomusz .

[Creative]

Jak zrobiłeś moda z x misjami bez zapisywania głównej postaci

Na razie, bez zapisywania, jak zrobię wszystkie misje to dopiero dodam zapisywanie postaci

Code : Tout sélectionner

SaveCharacters(D1,'D1');

Code : Tout sélectionner

export D1;
Export Function TWOJA_FUNKCJA;  <-??

uc_side = KOLOR(3);
uc_nation = 3
IDENT := CreateCharacter('D1');
PlaceUnitArea(D1, Area28, false);

Dobrze? O co chodzi z tą funkcją? np.Solder?

[Xander]

Spoiler:

Jak zrobiłeś moda z x misjami bez zapisywania głównej postaci

Na razie, bez zapisywania, jak zrobię wszystkie misje to dopiero dodam zapisywanie postaci

Code : Tout sélectionner

SaveCharacters(D1,'D1');

Code : Tout sélectionner

export D1;
Export Function TWOJA_FUNKCJA;  <-??

uc_side = KOLOR(3);
uc_nation = 3
IDENT := CreateCharacter('D1');
PlaceUnitArea(D1, Area28, false);

Dobrze? O co chodzi z tą funkcją? np.Solder?

Może bardziej sprecyzuję

Spoiler:

export OWChyba; // exportuje postać

Export Function PrepareHero; // funkcja która wywoła cały moduł
begin
uc_side = 4; // 1 - Am, 2 - Ar, 3 - rus, 4 - am2
uc_nation = 1; // 1 - wygląd amerykanina, 2 - wygląd araba, 3 - wygląd ruska
OWCHyba := CreateCharacter('OWChyba'); // tworze moją zapisaną postać
PlaceHumanInUnit(OWChyba,f1); // miejsce, w której ma moja postać się zrespić (w tym pojawiam się w samochodzie
end;

[MasterKiller]

Co to znaczy "funkcja na exportowanie postaci?"

[Serpent]

Taki tam mały kod z sosa na "export":

Spoiler:

Code : Tout sélectionner

// END_MISSION
Export Function END_MISSION;
var names, filter, i, tab;
begin

     if FilterAllUnits([f_or, [[f_side, 3], [f_side, 6]], [f_type, unit_human]]) = 0 then
        SaveVariable(1, 'var_rus')
         else
          SaveVariable(0, 'var_rus');

     if GetTech(8, 2) = state_researched then
        SaveVariable(1, 'var_bio')
         else
          SaveVariable(0, 'var_bio');

         tab := [];

         filter := FilterAllUnits([[f_side, 2], [f_type, unit_vehicle], [f_not, [f_empty]]]);

         for i = 1 to filter do
         begin
         tab := tab ^ [GetChassis(filter[i]), GetEngine(filter[i]), GetControl(filter[i]), GetWeapon(filter[i])];
         end;

         SaveVariable(tab, 'unit_vehs');

         // MEDALS
           if GetTech(8, 2) = state_researched then
              AddMedal('med1', 1)
               else
                AddMedal('med1', -1);

           if sib_pow then
              AddMedal('med2', 1)
               else
                AddMedal('med2', -1);

           if FilterAllUnits([[f_side, 2], [f_class, class_bazooker]]) > 0 then
              AddMedal('med3', 1)
               else
                AddMedal('med3', -1);

        GiveMedals('MAIN');

     // save
        RewardPeople(FilterAllUnits([[f_side, 2], [f_type, unit_human], [f_not, [f_class, 15]], [f_not, [f_class, 16]]]));

        SaveCharacters(Louis, 'Louis');

        if IsLive(Rolf) then
           begin
           //for i = 1 to 4 do
               //AddExperience(Rolf, i, 60000);

           SaveCharacters(Rolf, 'Rolf_08');
           end;

        if IsLive(Jenna) then
           begin
           //for i = 1 to 4 do
               //AddExperience(Jenna, i, 15000);

           SaveCharacters(Jenna, 'Jenna_08');
           end;

        if IsLive(Rick) then
           begin
           //for i = 1 to 4 do
               //AddExperience(Rick, i, 15000);

           SaveCharacters(Rick, 'Rick_08');
           end;

        if IsLive(Mike) then
           begin
           //for i = 1 to 4 do
               //AddExperience(Mike, i, 60000);

           SaveCharacters(Mike, 'Mike_08');
           end;

        if IsLive(Nicolas) then
           begin
           //for i = 1 to 4 do
               //AddExperience(Nicolas, i, 60000);

           SaveCharacters(Nicolas, 'Nicolas_08');
           end;

        if IsLive(Gali) then
           begin
           //for i = 1 to 4 do
               //AddExperience(Gali, i, 60000);

           SaveCharacters(Gali, 'Gali_08');
           end;

        SetSide([Louis, Rolf, Gali, Nicolas, Jenna, Rick, Mike], 5);

        filter := FilterAllUnits([[f_side, 2], [f_type, unit_human]]);
        names  := ['a_08', 'b_08', 'c_08', 'd_08', 'e_08', 'f_08', 'g_08', 'h_08', 'i_08', 'j_08', 'k_08', 'l_08', 'm_08', 'n_08', 'o_08', 'p_08'];

        for i = 1 to filter do
            if IsLive(filter[i]) and GetClass(filter[i]) < 11 then
               SaveCharacters(filter[i], names[i]);


        YouWin;
        SetNextMission(1);

End;

Jednak patent Blackmena wydaje się lepszy

[Creative]

Jest problem bo nie gra nie zapisuje postaci z 1 misji na 1 misja_cont.
W 1 misji jest postac o idencie D1 a w misji jest tylko area25.

Koniec misji:

Code : Tout sélectionner

Every 0$1 trigger IsDead(M1) do
begin
IngameOn;
Dialogueon;
Say(D1,'D1-DG-3');
SayRadio(A1,'D1-AS-4');
Dialogueoff;
setside([k1],3);
CenteronUnits(D1);
ComEnterUnit(D1, k1);
Wait(0$15);
SaveCharacters(D1,'D1');
changemap('1','%_cont');
IngameOff;
end;

Misja 1_cont

kod dałem na samym dole SAIL'u.

Code : Tout sélectionner

export D1;
Export Function save;

begin
uc_side = 3;
uc_nation = 3;
D1 := CreateCharacter('D1');
PlaceUnitArea(D1, Area25, false);
end;

[Xander]

Spoiler:

Export Function PrepareHero; // funkcja która wywoła cały moduł

o ile się orientuje, nazwa funkcji który wywoła cały Twój moduł to save;
chyba wiesz, aby to dać na samym początku... prawda?.... prawda?
kogo ja oszukuje ;_;

[Creative]

Spoiler:

Export Function PrepareHero; // funkcja która wywoła cały moduł

o ile się orientuje, nazwa funkcji który wywoła cały Twój moduł to save;
chyba wiesz, aby to dać na samym początku... prawda?.... prawda?
kogo ja oszukuje ;_;

Działa, dzięki Ci wielkie. W zamian w modzie będzie zapisywanie postaci

[Antitheus]

Działa, dzięki Ci wielkie. W zamian w modzie będzie zapisywanie postaci

Wow! Nowość! W żadnym modzie tego nie było!

[Nefarem]

Eventy ? U blackmena? Dobre sobie.