请指点自定义CAD命令锁定其它实现不了怎么回事？

glcsq

我自定义了CAD命令，除选择指定的图层外，锁定其它图层，没有提示错误，却也没有锁定其余图层，不知道怎么回事，请大神指定一下。命令如下：(command "-layer" "lo" (ssget "X" (list '(0 . "*" ) (cons 8 (strcat "~" (cdr (assoc 8 (entget (car (entsel))))))))) "")