|
|
|
Syntax
array set node [ABANODE nodeid GET]
Description
Query the data of a node.
Argument |
Dimension |
Meaning |
nodeid |
OBJID |
Object-ID of node |
GET |
KEYWORD |
Query data |
Return array
Array item |
Dimension |
Meaning |
error |
INT |
Error code |
info |
TEXT |
Object or error information |
id |
OBJID |
Object-ID |
number |
INT |
Node number |
x |
LSTRUCTD |
X-coordinate |
y |
LSTRUCTD |
Y-coordinate |
z |
LSTRUCTD |
Z-coordinate |
Scopes
All
Examples
# units
array set uu [ABMUNIT LSTRUCT GET]
array set ur [ABMUNIT ANGLE GET]
# get dataID of mode 1
array set mode1 [ABRESULTS $sched1 EIGENMODE GET 1 ATDAY FINAL]
set dataID $mode1(id)
# list of nodes
array set nodes [ABANODES GET LIST]
# node data - displacements
set format1a " %12s %12s %12s %12s %12s %12s"
set format1b " %6d %12.8f %12.8f %12.8f %12.8f %12.8f %12.8f"
puts $outfile ""
puts $outfile " --------------------------------------------------------"
puts $outfile " Mode 1: Displacements (global)"
puts $outfile " --------------------------------------------------------"
puts $outfile ""
puts $outfile " Node Ux Uy Uz Rx Ry Rz"
puts $outfile [format $format1a $uu(symb) $uu(symb) $uu(symb) $ur(symb) $ur(symb) $ur(symb)]
puts $outfile " ------------------------------------------------------------------------------------"
set ID $nodes(first)
for { set inode 0 } { $inode < $nodes(count) } { incr inode } {
if { $inode > 0 } { set ID [OBJNEXT $ID] }
array unset node
array set node [ABANODE $ID GET]
array unset nres
array set nres [ABRNODE $node(number) GET EIGENMODE $dataID]
set ux [lindex $nres(u) 0]
set uy [lindex $nres(u) 1]
set uz [lindex $nres(u) 2]
set rx [lindex $nres(u) 3]
set ry [lindex $nres(u) 4]
set rz [lindex $nres(u) 5]
puts $outfile [format $format1b $node(number) $ux $uy $uz $rx $ry $rz]
}
It is assumed that a text file outfile has been opened for writing . The result data is written formatted into the text file.
The output is project-dependent and can look like the following, for example:
--------------------------------------------------------
Mode 1: Displacements (global)
--------------------------------------------------------
Node Ux Uy Uz Rx Ry Rz
[m] [m] [m] [rad] [rad] [rad]
------------------------------------------------------------------------------------
101 -0.06808574 -0.00001676 1.00000000 0.00190870 0.01487211 -0.00044531
102 -0.06807815 -0.00231433 0.92802958 0.00347961 0.01488881 -0.00042507
103 -0.06813041 -0.00440829 0.85614120 0.00504881 0.01488316 -0.00036354
104 -0.06825014 -0.00608660 0.78449624 0.00661574 0.01483521 -0.00025858
105 -0.06842214 -0.00714452 0.71335269 0.00817987 0.01472620 -0.00010771
....
Output for script above.
|
(C) ALLPLAN GmbH |
Privacy policy |
