O eventach i o on VehicleConstructed oraz instrukcji wait

[Nitek]

Kód: Vybrat vše

on VehicleConstructed(vehi,fact) do
var dri;
begin
  vehi=IsDrivenBy(dri);
  if GetSide(fact)=5 then
  begin
    ComMoveToArea(dri,ArV);
    AddComExitVehicle(dri);
    AddComEnterUnit(dri,fact);
    GetV;// nieistotna teraz funkcja
    if rand(0,1) then ComConstruct(fact,ar_half_tracked,engine_combustion,control_manual,ar_gun)
    else ComConstruct(fact,ar_half_tracked,engine_combustion,control_manual,ar_flame_thrower);
  end;

Taki kod z "IsDrivenBy" powinien również działać.

[JRF]

@up co z tego, że powinien, jak nie działa : P
Poza tym nie widzę sensu walić VEHI=IsDrivenBy(DRI)...

Z tego, co pamiętam to ze starym kodem podczas testowania dostawałem "polecenie niemożliwe" czy coś w tym guście...

Nie łapię, co za różnica czy walnę lokalną czy globalną zmienną w tym przykładzie, a jednak...

Niezbadane są ścieżki saila : D

---
ty,
JRF

[Radzio]

SAIL nie implementuje zmiennych lokalnych dla niektórych z bloków. Np. nie robi tego dla bloku starting.

Anyway, tam powinno być:

Kód: Vybrat vše

dri:= IsDrivenBy(vehi);

To działa:

Kód: Vybrat vše

on VehicleConstructed(veh, fact) do
var dri;
begin
  dri:= IsDrivenBy(veh);
  if GetSide(fact) = 5 then
  begin
    ComMoveToArea(dri, ArV);
    AddComExitVehicle(dri);
    AddComEnterUnit(dri, fact);
    GetV;
    if Rand(0, 1) then
      ComConstruct(fact, ar_half_tracked, engine_combustion, control_manual, ar_gun)
    else
      ComConstruct(fact, ar_half_tracked, engine_combustion, control_manual, ar_flame_thrower);
  end;
end;

[Nitek]

SAIL nie implementuje zmiennych lokalnych dla niektórych z bloków. Np. nie robi tego dla bloku starting.

Anyway, tam powinno być:

Kód: Vybrat vše

dri:= IsDrivenBy(vehi);

Trochę to głupie, bo "is driven by" oznacza "jest prowadzony przez", więc na logikę to wygląda, jakby kierowca był prowadzony przez pojazd Niestety SAIL nigdy nie był normalny

[Radzio]

Właśnie to jest ok, bo funkcja zwraca wartość, odpowiadając na pytanie: "Whom vehicle is driven by?".