horrid highway: fade out trains if they are taking too long

planet/Worlds.ocf/HorridHighway.ocs/LocomotiveHighway.ocd/Script.c

@@ -85,6 +85,11 @@ local FxCheckLocomotive = new Effect
 			Target->RemoveObject();
 			return FX_Execute_Kill;
 		}
+		if (time > this.time_allowed)
+		{
+			Target->FadeOut(18, true);
+			return FX_Execute_Kill;		
+		}
 		return FX_OK;
 	}	
 };