if S.line[atc_id]=="4" then
  F.stn("Spn3E", "Hts4E", "Jng4E", "L")
  if depart then
    setstate("Hts4DivOut", "cr")
  end
else
  F.stn("Spn3E", "Hts3E", "Brn3E", "L")
  if depart then
    setstate("Hts4DivOut", "st")
  end
end