列出场景中所有对象

/* 列出场景中所有对象 显示名称和类型 */
proc listAll(){
    print("\nNodes...");
    //定义一个数组nodes，执行ls命令，把结果存入数组
    string $nodes[] = `ls`;
    //执行for循环：如果node在nodes中，则对node执行 objectType命令，并把结果存储在变量nodeType中
    for($node in $nodes){
        string $nodeType = `objectType $node`;
        //打印结果
        print("\nNode: " + $node + "(" + $nodeType + ")");
    }
};