Page 1 of 1

Save Characters - problem

Posted: Tue Mar 17, 2009 6:33 pm
by Pablo Abruzzi
Mam problem z opcją save characters, nie moge wczytać zestawu, aby się pojawił w arei. Proszę o pomoc. Oto zawartość misji 01:

Code: Select all

var wybrani,niewybrani,dowybrania; 

every 0$1 trigger IsInArea(loger,area_2) do
Begin 
dowybrania=FilterAllUnits([[f_type,1],[f_side,1]]) diff loger diff p1;
wybrani=CharacterSelection('napis',2,5,[sel_change_class,loger,sel_changeable,sel_not_hired]^dowybrania^[sel_not_changeable,p1],[1,2,3,4,5,6,7,8,9]);
niewybrani=p1^dowybrania diff wybrani;  
SaveCharacters(wybrani,'zestaw1');
end;
I _cont:

Code: Select all

export zestaw1; 
Starting 
var i; 
Begin 
zestaw1=CreateCharacterSet(zestaw1); 
 for i in zestaw1 do 
  PlaceUnitArea(i,area1,false); 
end; 
Nie wiem co w tu jest źle, ale postacie się nie pojawiają. Próbowałem też postawić warunek, ale nic to nie dało.

Posted: Tue Mar 17, 2009 10:44 pm
by Moonstrider
Rozumiem, że CharacterSelection działa?

Posted: Sun May 17, 2009 9:51 am
by tex
Spróbuj tak:

W 1 misji:

Code: Select all

var wybrani,niewybrani,dowybrania;

every 0$1 trigger IsInArea(loger,area_2) do
Begin
dowybrania=FilterAllUnits([[f_type,1],[f_side,1]]) diff loger diff p1;
wybrani=CharacterSelection('napis',2,5,[sel_change_class,loger,sel_changeable,sel_not_hired]^dowybrania^[sel_not_changeable,p1],[1,2,3,4,5,6,7,8,9]);
niewybrani=p1^dowybrania diff wybrani; 
SaveCharacters(zestaw1,'zestaw1');
SaveCharacters(wybrani,'wybrani');
RewardPeople(wybrani);
RewardPeople(zestaw1);
YouWin;
end;
I w 1_cont

Code: Select all

export zestaw1,wybrani;

Starting
var i;
Begin
wybrani=CreateCharacter('wybrani');
PlaceUnitXY(wybrani, x, y, true);
zestaw1=CreateCharacterSet(zestaw1);
 for i in zestaw1 do
  PlaceUnitArea(i,area1, true);
end; 
Powinno zadziałać ;)

Posted: Sun May 17, 2009 10:30 am
by Moonstrider
W kodzie Pabla powinno wystarczyć tylko wzięcie w _cont zestaw1 w cudzysłów ' ' oraz wstawienie uc_side= .