TCL Command ABRESULTS, Liste der Einflusslinien

Syntax

      set inflines   [ABRESULTS laneset INFLINE GET]

array set infline  [ABRESULTS laneset INFLINE GET LANE ilane]

Beschreibung

Abfrage der Liste der Einflusslinien aller Spursets oder eines bestimmten Spursets

Abfrage der Daten-ID einer Einflusslinie einer bestimmten Spur

Argument	Dimension	Bedeutung
laneset	TEXT	Name des Spursets
INFLINE	KEYWORD	Ergebnistyp der Abfrage
GET	KEYWORD	Daten abfragen
LANE	KEYWORD	Daten-ID einer Spur abfragen
ilane	INT	Nummer der Spur

Rückgabe für [ABRESULTS laneset INFLINE GET]

Return	Dimension	Bedeutung
dataids	LIST	Liste der Daten-IDs der Einflusslinien eines Sets oder aller Sets (laneset = "")

Rückgabefeld für [ABRESULTS laneset INFLINE GET LANE ilane]

Feldargument	Dimension	Bedeutung
error	INT	Fehlerstatus
info	TEXT	Fehlerinformation
id	OBJID	Daten-ID der spezifizierten Spur

Scopes

All

Beispiele

# Influence lines

# ---------------

puts $outfile ""

puts $outfile ""

puts $outfile " Traffic, Influence lines"

puts $outfile " ------------------------"

set inflines [ABRESULTS "" INFLINE GET]

puts $outfile ""

puts $outfile " Laneset Lane"

puts $outfile " ----------------------------------"

set format11 " %-30s %3d"

foreach inflID $inflines {

    array unset infline

    array set infline [ABRESULT $inflID INFLINE GET]

    puts $outfile [format $format11 $infline(lset) $infline(lane)]

}

Es wird angenommen, dass eine Textdatei outfile zum Schreiben geöffnet wurde. Die Ergebnisse werden formatiert in die Textdatei geschrieben.

Die Ausgaben sind projektabhängig und können zum Beispiel wie folgt aussehen:

Traffic, Influence lines

------------------------

Laneset Lane

----------------------------------

Lane Set_left 1

Lane Set_right 1

Lane Set_left 2

Lane Set_right 2

Lane Set_left 3

Lane Set_right 3

Lane Set_left 4

Lane Set_right 4

Ausgaben zu obiger Script.

set inflines [ABRESULTS "Lane Set_left" INFLINE GET]

puts $outfile ""

puts $outfile " Laneset 'Lane Set_left' Lane"

puts $outfile " ----------------------------------"

set format12 " %34d"

foreach inflID $inflines {

    array unset infline

    array set infline [ABRESULT $inflID INFLINE GET]

    puts $outfile [format $format12 $infline(lane)]

}

Es wird angenommen, dass eine Textdatei outfile zum Schreiben geöffnet wurde. Die Ergebnisse werden formatiert in die Textdatei geschrieben.

Die Ausgaben sind projektabhängig und können zum Beispiel wie folgt aussehen:

Laneset 'Lane Set_left' Lane

----------------------------------

1

2

3

4

Ausgaben zu obiger Script.