task body FAHRGAESTE is

begin
  loop
    accept VORSICHT do
      -- Ansage: "Vorsicht ..."
    end VORSICHT;
    accept EINSTEIGEN do
      -- in den Zug einsteigen
    end EINSTEIGEN;
    accept ZURUECKBLEIBEN do
      -- Ansage: "Zurueckbleiben!"
    end ZURUECKBLEIBEN;
    if -- Gefahrensituation then
      ZUG.NOTBREMSE;
    end if;
  end loop;
end FAHRGAESTE;