我怎么也不知道问题出在哪儿

我还有梦想

(defun c:ck();查看外部扩展数据
  (setq entname (car (entsel "\n 选取外部扩展数据要素类")))
  (setq appname "south")
  (regapp (setq mame appname))；启动外部扩展属性
  ( setq xxdata ( entget entname ( list rname) ) ) ;取出扩
展数据
  ( setq south - sx ( cdr ( assoc - 3 xxdata) ) ) ;提取 - 3
的后表
  ( setq south - sx2 ( cdr ( nth 2 south - sx1) ) ) ;提取表
的第三项
  (princ" \n外部扩展数据 : ")
  (princ south - sx2) ;显示内部属性结构
)

USER2128

(entget entname '("*")) 会列出所有数据的

edata

1. (defun c:ck(/ APPNAME ENTNAME SOUTH-SX1 SOUTH-SX2 XXDATA);查看外部扩展数据
   
2.   (setq entname (car (entsel "\n 选取外部扩展数据要素类")))
   
3.   (setq appname "south")
   
4.   ;(regapp (setq rname appname));启动外部扩展属性 查看不需要注册应用名
   
5.   ( setq xxdata ( entget entname ( list appname))) ;取出扩展数据
   
6.   ( setq south-sx1 ( cdr ( assoc -3 xxdata))) ;提取 - 3的后表
   
7.   ( setq south-sx2 ( cdr ( nth 2 (car south-sx1)))) ;提取表的第三项 nth 从0开始所以是2
   
8.   (princ" \n外部扩展数据 : ")
   
9.   (princ south-sx2) ;显示内部属性结构  
   
10.   (princ);抑制返回值
    
11. )

(defun c:ck(/ APPNAME ENTNAME SOUTH-SX1 SOUTH-SX2 XXDATA);查看外部扩展数据<br />   (setq entname (car (entsel "\n 选取外部扩展数据要素类")))<br />   (setq appname "south")<br />   ;(regapp (setq rname appname));启动外部扩展属性 查看不需要注册应用名 <br />   ( setq xxdata ( entget entname ( list appname))) ;取出扩展数据<br />   ( setq south-sx1 ( cdr ( assoc -3 xxdata))) ;提取 - 3的后表<br />   ( setq south-sx2 ( cdr ( nth 2 (car south-sx1)))) ;提取表的第三项 nth 从0开始所以是2<br />   (princ" \n外部扩展数据 : ")<br />   (princ south-sx2) ;显示内部属性结构  <br />   (princ);抑制返回值<br /> )

edata

错误太多，你自己在vlide中输入，自己检查数据，不要在记事本之类的录入文字。
vlide可以直观的检查出语法问题。
分号不要用中文，必须是英文才能是注释效果。
setq south-sx1 这个south-sx1 不要用空格断开，否则变成了几个变量。
(regapp (setq rname appname));启动外部扩展属性,查询不需要regapp，一般只新的文件，添加扩展的时候才使用，如果已经有这个名字，就不需要重复注册了。
;提取表的第三项 nth 从0开始所以是2