SAIL - Zapytania

[Blashix]

Przeczytałem z poradnika z ow support ale wyskakuje mi błąd że "expressed case not found"
Zapytanie chciałem dodać po kodzie:

Kód: Vybrat vše

every 0$1 trigger IsInArea(berd,Area10) do
begin
CenterOnUnits(berd);  //środkuje kamere
DialogueOn;  // otwera dialog po dojsciu do arei
Say(winston, 'dialog3')
end;

A to Zapytanie:

Kód: Vybrat vše

Case Query("Q1") of
1 : begin
end;
2: begin
end;
end

Wyszło mi takie coś:

Co jest nie tak ?

Kód: Vybrat vše

every 0$1 trigger IsInArea(berd,Area10) do
begin
CenterOnUnits(berd);  //środkuje kamere
DialogueOn;  // otwera dialog po dojsciu do arei
Say(winston, 'dialog3')
end;

Case Query("Q1") of <<------------ O tą linikę się pluje
1 : begin
ForcedSay(berd, 'dialog6')
on enterbuilding(b,un) do
begin
if b=eon then
case un of
berd:if not killhim then
begin 
wait(0$1);
savecharacters(berd,'B');
changemap('1','%_cont');
end;

end;
2: begin
DialogueOn;  // otwera dialog po dojsciu do arei
Say(winston, 'dialog7')
(I misja odnowa, nie wiem jaki kod trza xD)
end;
end;

[NNPlaya]

Bo to całe zapytanie powinieneś umieścić między znacznikami begin end. Rozumien, że chciałeś, żeby zapytanie się wyświetliło przy tym every? Jeśli tak, to kod powinien być taki:

Kód: Vybrat vše

every 0$1 trigger IsInArea(berd,Area10) do
begin
CenterOnUnits(berd);  
DialogueOn; 
Say(winston, 'dialog3');

Case Query("Q1") of 
<ten kod z case query>

end;

Jeszcze jedno, on enterbuilding powinno być poza every:

Kód: Vybrat vše

every cośtam
Begin
<jakiś_kod>
end;

On enterbuilding ....

I powinieneś wstawić coś takiego za to co Ty masz:

Kód: Vybrat vše

 on enterbuilding(b,un) do
  begin
   if b=eon then
    case un of
    berd: begin
    wait(0$1.3);
    savecharacters(berd,'berd');
    changemap('1','%_cont');
  end;
   else
    RemoveUnit(un);
  end;
end;

[ Dodano: Nie Maj 06, 2007 8:54 pm ]
W rezultacie cały kod:

Kód: Vybrat vše

every 0$1 trigger IsInArea(berd,Area10) do
begin
CenterOnUnits(berd);
Say(winston, 'dialog3');

Case Query("Q1") of
1 : begin
ForceSay(berd, 'dialog6');
ComEnterUnit(berd,eon);
end;
2: begin
Say(winston, 'dialog7');
YouLost('');
end;

end;

On Enterbuilding(b,un) do
begin
if b=eon then
case un of
berd: begin
Wait(0$1.3);
SaveCharacters(berd,'berd');
ChangeMap('1','%_cont');
end;
else
RemoveUnit(un);
end;

Sprawdź, czy działa

[ Dodano: Nie Maj 06, 2007 8:57 pm ]
Aha, DialogueOn; to nie jest zaczęcie dialogu, tylko zapauzowanie gry i w tym czasie dialog do momentu aż wykonana zostanie komenda DialogueOff; . Jak nie zamkniesz tego

Kód: Vybrat vše

DialogueOn;
DialogueOff;

To gra albo się zawiesi, albo misja nie będzie działać. Czyli: nie stosuj tego DialogueOn; albo zamykaj dialog DialogueOff;

[Blashix]

Czepia się dalej :/ ...
"Character ignored"
"expected but "" Found"

I co teraz ??

[NNPlaya]

Której linijki się czepia?? Może być tak jeżeli zamiast nawiasów " " wpisałeś takie: ' ' albo odwrotnie.

[Blashix]

Pluje się dokładnie na tą:

Kód: Vybrat vše

Case Query("Q1") of 

[Radzio]

Wymien caly kod na ten i zastosuj sie do komentarzy.

Kód: Vybrat vše

every 0$1 trigger IsInArea(berd,Area10) do
begin
CenterOnUnits(berd);
DialogueOn;
Say(winston,'dialog3');
Case Query('Q1') of
1: begin
Say(berd,'dialog6');
DialogueOff;
end;
2: begin
Say(winston,'dialog7');
YouLost('');
end;
end;

on enterbuilding(b,un) do
begin
if b=eon then
if un=berd then
begin
wait(0$1);
savecharacters(berd,'B');
changemap(1,'%_cont'); // przy takim przejsciu uzycie zapisu postaci jest bezsensowne - ten temat byl juz poruszany na forum
end;
end;

[NNPlaya]

Nie będzie chyba trzeba całego kodu zmieniać, wystarczy, że wpiszesz zamiast
Case Query("Q1") of

Case Query('Q1') of

czyli zmienisz nawiasy z podwójnych na pojedyncze.

[Radzio]

Ja edytowalem to na jego kodzie nie na twoim xD. Nawet na niego nie patrzylem.

[NNPlaya]

W każdym razie oba kody powinny działać

[Blashix]

No już poszło ale zaczeło znowu na tej linice:

Kód: Vybrat vše

on enterbuilding(b,un) do 

Więc zmieniłem co nie co:

Kód: Vybrat vše

on enterbuilding(b,un) do
begin
if b=eon then
if un=berd then
begin
wait(0$1);
savecharacters(berd,'B');
changemap(1,'%_cont'); // przy takim przejsciu uzycie zapisu postaci jest bezsensowne - ten temat byl juz poruszany na forum
end;
end;

Na takie cuś:

Kód: Vybrat vše

on enterbuilding(b,un) do
begin
if b=eon then
if un=berd then
wait(0$1);
changemap(1,'%_cont');
end;

I teraz działa
EDIT: Zmieniłem i dalej działa

[Radzio]

Teraz to nie ma sensu, bo kod zmieni mape, jesli ktokolwiek wejdzie do EONa, a zaczeka jeszcze 1 sek, jesli to bedzie berd.

[NNPlaya]

Powinieneś zamknąć to w begin end

Kód: Vybrat vše

on enterbuilding(b,un) do
begin
if b=eon then
if un=berd then
Begin
wait(0$1);
changemap(1,'%_cont');
end;
end;