Page 6 of 7

Posted: Sun Feb 25, 2007 7:06 pm
by Scyzor
sorry , ze sie wtracam ale mam tylko 1 pytanie i nieoplaca sie robic osobnego tematu.
Co zrobic zeby misja skonczyla sie po opracowaniu w laboratorium lasera i zdalnego sterowania ??

temat

Posted: Sun Feb 25, 2007 7:32 pm
by NaDoL
Mówiłem że jest na forum wystarczy poszukać >.>
Researched(1,technologia)
liste tech masz w pliku txt z owsupport ze stałymi albo tutaj=>
http://forum.original-war.net/viewtopic ... 3&start=45

Posted: Sun Feb 25, 2007 10:50 pm
by Scyzor
thx

Posted: Wed Feb 28, 2007 4:50 pm
by Odyseusz
No tak, wiem że 3 rodzaje broni powinny być, ale gdy z 3 próbowałem to też był ten błąd. :) Teraz powinno pójść z górki, w weekend może udostępnie już bete moda, bo narazie nie mam czasu by 3 misje dokończyć :?

==========
Mam jeszcze jeden problem, otóż w pewnym momencie misji mamy zapytanie, jeśli wybieramy pierwsza odpowiedź na mapie powinno sie pojawić 2 dodatkowych żołnierzy, jednak pomimo pomyślnej compilacji postacie te się nie pojawiają. Zostały exportowane i utworzone na początku skryptu.
every 15$0 do
Begin
InGameOn;
CenterNowOnXY(49,37);
SayRadio(Harisson,'h1');
SayRadio(Kowalski,'k8');
SayRadio(Harisson,'h2');
SayRadio(Kowalski,'k9');
SayRadio(Harisson,'h3');
SayRadio(Kowalski,'k10');
SayRadio(Harisson,'h4');

Wait(0$1);
Case Query('Zapytanie1') of
1: begin
SayRadio(Kowalski,'k11');
SayRadio(Harisson,'h5');
SayRadio(Kowalski,'k13');
InGameOff;

Wait(0$10);
PlaceUnitArea(Welker,posilki,false);
PlaceUnitArea(Lamarr,posilki,false);

end;

2: begin
SayRadio(Kowalski,'k12');
SayRadio(Harisson,'h6');
SayRadio(Kowalski,'k13');

InGameOff;
end;
end;
end;

Posted: Thu Mar 01, 2007 6:49 pm
by Scyzor
nie jestem pewien ale chyba za duzo tych end; na koncu
a jak nie to wez compile w edytorze saila
w tedy powinien wyskoczyc error i zobaczysz co jest zle

Posted: Thu Mar 01, 2007 6:52 pm
by ph3nom
Scyzor wrote:nie jestem pewien ale chyba za duzo tych end; na koncu
a jak nie to wez compile w edytorze saila
w tedy powinien wyskoczyc error i zobaczysz co jest zle
Nie chyba ale na pewno. Nie znam się za bardzo na SAIL, ale wiadomo nie od dziś że w kodzie może być tylko jedne "end;".

Posted: Thu Mar 01, 2007 7:13 pm
by Odyseusz
Kiedy wpisywałem jedno end na końcu kodu wyskakiwał mi error, ale ok. Sprawdze zaraz kod z jednym end :wink:

Posted: Thu Mar 01, 2007 7:19 pm
by Radzio
End'ow powinno byc tyle co i begin'ow.

EDIT: Czyli podsumowujac: powinno byc o jednego end'a mniej...

Posted: Thu Mar 01, 2007 7:31 pm
by Odyseusz
W przypadku gdy na końcu kodu pozostają 2 endy wyskakuje error:
Compiling Error at Main line 165: 'end' or command expectet but 'end_of_file' found!
A gdy jeden end to mamy:
Compiling Error at Main line 165: Expression expectet

Posted: Thu Mar 01, 2007 7:40 pm
by Radzio
W pierwszym przypdaku brakuje end'a, w drugim jakiegos slowa.

Posted: Thu Mar 01, 2007 7:44 pm
by Odyseusz
Radzio wrote:W pierwszym przypdaku brakuje end'a
No właśnie... jeśli dodam 3 end to wróce do punktu wyjścia.

A co do tego słowa... to żadnego braku w kodzie nie zauważyłem.

Posted: Thu Mar 01, 2007 7:45 pm
by Radzio
a napisales na poczatku starting ?

---

i jak mozesz to wklej caly kod...

Posted: Thu Mar 01, 2007 7:53 pm
by Odyseusz
Jest również oddzielny moduł dla skrzynek.

Code: Select all

export Kowalski,Jablonski,Alex,Sword,Harisson,Welker,Lamarr;
export soldiers_skill, soldiers_skill2, drivers_skill;
export guard10,soldat1,soldat2,soldat3,soldat4,soldat5;
export Ruskie;

function prepare_difficulty;
Begin
drivers_skill=[2, 3, 4][Difficulty];
soldiers_skill=[1, 2, 4][Difficulty];
soldiers_skill2=[3, 4, 5][Difficulty];
end;

Starting
Begin
prepare_difficulty;

uc_side:=1;
uc_nation:=nation_american;
Welker:=NewCharacter('Welker');
Welker:=NewCharacter('Lamarr');

uc_side=3;
uc_nation=nation_russian;
hc_skills=[soldiers_skill2,3,2,0];
hc_class=1;
guard10=CreateHuman;
PlaceUnitXY(guard10,135,134,false);

uc_side:=4;
uc_nation:=nation_american;
Harisson:=NewCharacter('Harisson');

uc_side=1;
Kowalski=CreateCharacter('Kowalski');
Jablonski=CreateCharacter('Jablonski');
PlaceUnitArea(Kowalski,start,false);
PlaceUnitArea(Jablonski,start,false);
If TestCharacters('Alex') then
Begin
Alex=CreateCharacter('Alex');
PlaceUnitArea(Alex,start,false);
end;
If TestCharacters('Sword') then
Begin
Sword=CreateCharacter('Sword');
PlaceUnitArea(Sword,start,false);

SetBName(depot,'omega');
ComEnterUnit(guard10,bunker1);
ComEnterUnit(guard2,bunker2);
ComEnterUnit(guard3,bunker3);
ComEnterUnit(guard4,bunker4);
ComEnterUnit(guard5,armory);
ComEnterUnit(guard6,armory);
ComEnterUnit(guard7,armory);
ComEnterUnit(nauk1,lab);
ComEnterUnit(nauk2,lab);
ComEnterUnit(me1,factory);
ComEnterUnit(me2,factory);
ComEnterUnit(me3,factory);

InGameOn;
ComHold([Cathy,Biernacki,Sword,Alex]);
CenterNowOnXY(79,133);
Say(Kowalski,'k1');
Say(Biernacki,'b1');
Say(Kowalski,'k2');
Say(Jablonski,'j1');
Say(Biernacki,'b2');
Say(Kowalski,'k3');
Say(Jablonski,'j2');
Say(Biernacki,'b3');
Say(Cathy,'c1');
Say(Biernacki,'b4');
Say(Kowalski,'k4');
Say(Cathy,'c2');

SetSide(Cathy,GetSide(Kowalski));
SetSide(Biernacki,GetSide(Kowalski));
Wait(0$0.5);
ChangeMissionObjectives('C1');
ChangeMissionObjectives('C2');
ChangeMissionObjectives('C3');
InGameOff;
end;
end;

every 0$1 trigger IsInArea(Kowalski,baza) do
Begin
InGameOn;
ComMoveXY(Kowalski,48,40);
ComMoveXY(Jablonski,57,42);
ComMoveXY(Biernacki,50,37);
Say(Kowalski,'k5');
Say(Biernacki,'b5');
Say(Kowalski,'k6');
Say(Jablonski,'j3');
Say(Kowalski,'k7');

SetSide(depot,GetSide(Kowalski));
SetSide(solar,GetSide(Kowalski));
SetSide(armoury,GetSide(Kowalski));
SetSide(bunkier,GetSide(Kowalski));
SetSide(laboratorium,GetSide(Kowalski));
Wait(0$0.5);
ChangeMissionObjectives('C4');
ChangeMissionObjectives('M1');
InGameOff;
end;

every 10$0 do
Begin
uc_side=3;
uc_nation=nation_russian;
hc_class=1;
hc_skills=[soldiers_skill,1,2,0];
soldat1=CreateHuman;
soldat2=CreateHuman;
hc_skills=[soldiers_skill,0,0,2];
soldat3=CreateHuman;
hc_skills=[soldiers_skill,3,0,0];
soldat4=CreateHuman;
hc_skills=[soldiers_skill,1,3,0];
soldat5=CreateHuman;
PlaceUnitArea(soldat1,ataki,false);
PlaceUnitArea(soldat2,ataki,false);
PlaceUnitArea(soldat3,ataki,false);
PlaceUnitArea(soldat4,ataki,false);
PlaceUnitArea(soldat5,ataki,false);
ComAgressiveMove([soldat1,soldat2,soldat3,soldat4,soldat5],50,38);
AddComAttackUnit([soldat1,soldat2,soldat3,soldat4,soldat5],FilterAllUnits([f_side,1]));
Ruskie=[soldat1,soldat2,soldat3,soldat4,soldat5];

end;

every 15$0 do
Begin
InGameOn;
CenterNowOnXY(49,37);
SayRadio(Harisson,'h1');
SayRadio(Kowalski,'k8');
SayRadio(Harisson,'h2');
SayRadio(Kowalski,'k9');
SayRadio(Harisson,'h3');
SayRadio(Kowalski,'k10');
SayRadio(Harisson,'h4');
Wait(0$1);
Case Query('Zapytanie1') of
1: begin
SayRadio(Kowalski,'k11');
SayRadio(Harisson,'h5');
SayRadio(Kowalski,'k13');
InGameOff;
Wait(0$10);
PlaceUnitArea(Welker,posilki,false);
PlaceUnitArea(Lamarr,posilki,false);
end;
2: begin
SayRadio(Kowalski,'k12');
SayRadio(Harisson,'h6');
SayRadio(Kowalski,'k13');
InGameOff;
end;
end;
end;

Posted: Thu Mar 01, 2007 7:59 pm
by Radzio
przed function napisz export
moze to pomoze...

temat

Posted: Thu Mar 01, 2007 8:02 pm
by NaDoL
Kod dolny z zapytaniem sie zgadza... powinno być 3 endy, i compiluje wiec nie widze problemu, wcześniejszego nie spr bo nie ma sensu skoro to jest inny tak jakby fragment