M7b: tågfaser, räls, in-/utkörning, vind, ankomstindikator och melodier

- level.Schedule.Phase: away/approaching/arriving/dwelling/closing/leaving
  ur tidtabellen med progress; Boardable (öppna dörrar) och Present;
  validering av minsta uppehåll/borta-tid; TrackTile för rälsen
- sim.Run: ombordstigning bara med öppna dörrar, TrainVisible via Present,
  PlatformPhase och NearTrack (närmaste perrong inom två rutor)
- game/trains.go: rälsrutor längs kantraden (roterade för vertikala spår),
  tre vagnar som bromsar in och accelererar ut längs rälsen, strålkastare
  under inrullningen, blinkande lampor vid kanten för den som står nära,
  dammpartiklar längs perrongen; kameran får en rutas marginal så att
  kanträlsen syns
- game/audio.go: ebiten/v2/audio med avgångsmelodi (approaching) och
  dörrsignal (closing), volym efter avstånd, -mute; tools/gensound
  syntetiserar placeholder-WAV:ar
- HUD: fasberoende perrongtext och "tåg på väg in" nära rälsen;
  skriptkommandot waitphase; skärmdump av ankomsten
- plan (Björn 2026-10-24): räls/väg-grafik och melodierna i M7b; folk/NPC:er,
  vänster-/högertrafik, bredare gångar, reklam- och ljudröra som nytt steg
  M9b – i spelbeskrivning, roadmap, testplan
- docs/README/wiki uppdaterade

Co-Authored-By: Claude Fable 5.1 <noreply@anthropic.com>

internal/sim/run.go

@@ -634,8 +634,45 @@ func (r *Run) PlatformHere() (tr *level.Train, atPlatform bool, seconds float64)
 	if tr == nil {
 		return nil, false, 0
 	}
-	atPlatform, seconds = tr.Schedule.Status(r.Time)
-	return tr, atPlatform, seconds
+	_, seconds = tr.Schedule.Status(r.Time)
+	return tr, tr.Schedule.Boardable(r.Time), seconds
+}
+
+// PlatformPhase är tågfasen för en perrongruta (Away om inget tåg).
+func (r *Run) PlatformPhase(t level.Tile) (level.Phase, float64) {
+	tr := r.Level.TrainAt(t)
+	if tr == nil {
+		return level.Away, 0
+	}
+	return tr.Schedule.Phase(r.Time)
+}
+
+// NearTrack hittar närmaste perrong inom maxDist rutor (schackavstånd) från
+// spelaren – det är där man ser och hör tåget komma.
+func (r *Run) NearTrack(maxDist int) (tr *level.Train, platform level.Point, phase level.Phase, progress float64, dist int, ok bool) {
+	best := maxDist + 1
+	for _, t := range []level.Tile{level.Platform, level.WrongPlatform} {
+		for _, p := range r.Level.Find(t) {
+			d := max(abs(p.X-r.Player.Tile.X), abs(p.Y-r.Player.Tile.Y))
+			if d < best {
+				if cand := r.Level.TrainAt(t); cand != nil {
+					best, tr, platform = d, cand, p
+				}
+			}
+		}
+	}
+	if tr == nil {
+		return nil, level.Point{}, level.Away, 0, 0, false
+	}
+	phase, progress = tr.Schedule.Phase(r.Time)
+	return tr, platform, phase, progress, best, true
+}
+
+func abs(a int) int {
+	if a < 0 {
+		return -a
+	}
+	return a
 }
 
 // SignHere returnerar skylten spelaren står stilla på, annars nil.
@@ -709,14 +746,11 @@ func (r *Run) stepReading() {
 	}
 }
 
-// TrainVisible rapporterar om tåget för en perrongruta står inne just nu.
+// TrainVisible rapporterar om tåget för en perrongruta syns just nu
+// (rullar in, står inne eller rullar ut).
 func (r *Run) TrainVisible(t level.Tile) bool {
 	tr := r.Level.TrainAt(t)
-	if tr == nil {
-		return false
-	}
-	at, _ := tr.Schedule.Status(r.Time)
-	return at
+	return tr != nil && tr.Schedule.Present(r.Time)
 }
 
 // AskHelp börjar fråga en förbipasserande om vad skylten betyder. Kräver att