! 本程序来源于机械工业出版社( 2004 年)
FINISH
/CLEAR
/TITLE, QTZ25 TOWER CRANE
/FILENAME, QTZ25
/PREP7
!(1) 定义第 1 个塔身标准节上的节点
N, 1, 650, 0, -650 $ N, 2, 650, 0, 650 $ N, 3, -650, 0, 650
N, 4, -650, 0, -650 $ N, 5, 650, 100, -650 $ N, 6, 650, 100, 650
N, 7, -650, 100, 650 $ N, 8, -650, 100, -650 $ N, 9, 650, 1200, -650
N, 10, 650, 1200, 650 $ N, 11, -650, 1200, 650 $ N, 12, -650, 1200, -650
N, 13, 650,