seqend在lisp的意思
大家好，今天我们来学习 cd 二次开发时使用最多的一个函数， s e t q 函数， 我写了三号代码 s etq 函数，就是说将一个值付给一个变量，简单说就是设置 a 等于五，设置 b 等于三，设置 c 等于，这是一个括号，它是一个整体，也就是 a 加 b， 设置 c 等于 a 加 b。 我们运行一下， 选中这三行，运行选中的代码 看擦擦返回来这么一个结果 是， a 等于五， b 等于三， c， c 的值是五加三。我们在这里运行完之后，检验一下这个 c 现在的值，用这个检验按钮， 我们看到了 c 现在是八， b 现在是三， 哎，现在是。
粉丝3244获赞5740
相关视频
05:58查看AI文稿AI文稿大家好，很高兴又和大家见面了，今天我们将利用之前学习过的这几个函数来制作一个小程序， 这个程序的功能是两取两点之间的距离， 我们打开威力四步编辑去， 然后我们新建一个文件， 其实这这是我已经新建好的，我们就在这写吧，新建文件点这个按钮就可以。然后我们用 d， e， f， u， n， c 冒号来定义一个命令勾 l， 这个就是我们两曲距离所使用的一个命令。我们定义好了， 我们在屏幕上拾取一个点， 把第一点复制给 pte 这个变量，我们再继续往屏幕上指定下一个点，因为量取两点之间的距离， 我们学两个点， 两曲拾取两个点之后，我们就要计算这两个点的距离，这两个点的距离我们用第四题词函数， 哎计算， 这样一来这个函数就能将前面两个点的距离计算出来，然后复制给 ds 这个变量。 ds 变量现在是一个浮点型的，是一个数值型型的数据， 数值型的数据他可能小数位数比较多，我们给他进行一个四舍五入， 用 rtos 函数前面我们说过，然后将这个 ds 这个数值进行一个以实际制的方式， 使劲这个方式进行四舍五入，我们保留两位小数吧， 然后 四舍五入的之后，他会变成一个字符串形式的值， 我们再用 s， t， r， c， a， t 函数串联一个字符串距离，然后写上字 s， t， 屏幕上就会显示这样的信息。我们用普润特函数将 str 这个串联好的字符串打印到屏幕上。好，这个程序做好了，我们加载一下， 加载完之后我们回到 cad 里头，现在我们这个图里头 已经存在勾 l 这个命令了，我们现在运行一下指定第一点，再指定第二点，我们看到了距离二十四点零六， 我们发现后边还有一个这个信息，他是多余的，那么怎么去掉他呢？我们继续看， 只需要在显示这个字符串之后再加上一个这样的语句，这个写到程序的最后边就行了，如果中间有有几次显示字符串的话，这个只需只需要 写到程序的结尾在前一行就可以了。我们重新加载一下，然后重新运行一下 go 点，第一点，第二点。好，这次没有多余的信息显示出来，这个程序还有哪里需要改进的呢？我们试一下自带的这些命令， 查询两点距离几方位，用他这个试一下，哎，他这个看到了吧？他这个里头有一个虚拟的小白小白线， 运行他这个程序会有一个这个虚拟的白线显示出来，然后这是他的量取结果。那么我们能不能做到这个虚拟线的效果呢？ 答案是肯定的， 关键在于在拾取第二点的时候，我们把第一点这个餐这个变量给他作为参数，写到这个这个位置就可以了。我们写进来之后， pt 一和他什么代表的是他？我们再运行一下加载 回到 cad ol， 确定第一点看到了吧，已经实现刚才说的那个虚拟线的功能了。第二点，好，距离出来了， 感兴趣的朋友可以学一下， 喜欢利斯普编程的可以关注我，谢谢。
505志翔CAD
02:29查看AI文稿AI文稿大家好，今天我们来介绍一下利斯普语言中的底范一函数，使用底范一函数可以在 cad 当中定义一个快捷命令， 我们通过一个实力来介绍一下，首先我们打开威力斯普编辑器， 输入迪拜 c 冒号，然后我们给他定义一个快捷命令，叫什么呢？比如说叫零， 然后当我们使用零这个命令的时候，让他 在命令行输出一条信息， 信息的内容是迪范函数势力， 然后我们加载一下这一个程序，实际上这就是一个很小的一个应用程序了， 我们加载一下，加载后我们在命令行输入零， 我们看到命令行打印了一行信息，底范函数势力， 而且我们看到后边还有一一条信息，这是这是一条多余的信息，那么怎么去掉它呢？我们 再打开微粒子编辑器，只需要在程序的结尾处再输入一遍 prink， 然后后面不要加任何字符串，这样就不会显示两遍这条语句了这条信息了。我们重新加载一下这个命令， 我们再次运行零这个快捷命令。零，好，我们看到这一次没有多余的信息显示，并且显示了我们预先设置好的底范函数失利这样一条信息。 关于底饭函数我们就介绍到这里，谢谢关注我，学习更多利斯普编程知识。
65志翔CAD
01:10查看AI文稿AI文稿他们或许不是 it 大佬，但他们绝对是中国顶尖程序员，中国类型第一人。网民冰河，本名田春，人称散哥啊，格里 sold， 资深的软件工程师，前网易杭州研究院高级开发工程师和系统管理员，资深 comelet for 的程序员。关于他的头衔呢，还有很多很多啊。 散哥呢，性格是比较古怪的居多，和网易还有一段情愿纠缠。呃，怎么说呢，当时他在网易从事了 ms 相关的工作啊。据说，他坐在丁磊的办公室旁边，经常冲进丁磊的办公室，拔掉他的 iphone， 然后把自己的手机插上。后来呢，他承担并开发出网易内部一套办公区 wifi 的系统， 在公司内部呢，赢得了好评。于是呢，散哥就找到丁磊，说哈，这套系统找华为做二十万美金哦，我不着额呀，给我二十万人民币就行了。丁磊就直接找到了他的实属领导，说你员工怎么这样啊。 然后呢，又一次，三哥又做了一些东西啊，又找到丁伟，说上次只有二十万美金，我就不跟你计较了啊，这次开发的东西能卖两百万美金。嗯， 于是呢，很正常的，丁总就把他给开除掉了，哈哈。后来呢，他走的时候说我不会怀念网易，只会怀念这些战友，我不会再回到网易，下次回来的时候，就是我收购网易的时候。
225百知教育郑州
02:26查看AI文稿AI文稿cad 中啊，经常会用到一些小程序，小插件，所以呢，本节课呢，我们来讲一下如何去加载它，对吧？ 呃，我们来看一下呢，这里呢我们主要是讲两种方法啊，第一种的话呢，呃，我们要利用到一个命令啊，就是我们的一个 ap 命令，好吧，我们可以在这个命令行面输入我们的一个 ap 命令 啊，直接说 ap 空格，这是一个加载命令啊，当我们点击后，他会弹出来我们一个这样的对话框，然后呢，我们在这个里面呢找到我们的一个插插件，对吧？在这个 比如说我们的一个这个坐标插件，对吧？好，选了之后，对吧？那么我们的这个插件的话呢，他都是一个这样子一个格式啊，好吧，他都是一个这样的一个格式，我们来看一下他的 格式拼音呢，嗯，它都是一个 v l x 格式，对吧？所以说呢，这种 v l 格式呢，一般就是我们这种小插件呢，好，我们选择这个后点击加载好，点一下加载之后，在这个下方呢，它会显示已加载成功 啊，那这样的话呢，就可以了，好吧。呃，如果说，呃，老师我是不是每一次都在加等呢啊？老师如果说我想自动加怎么办呢？啊？那这也有方法啊，我们可以点击这一个内容，看到没有， 在我们这个右下角会有个内容，点击下之后最后有一个添加啊，我们找到我们这个文件之后呢，点击添加进去就可以了，那么，呃，这个时候呢，下一次我们再进行使用的时候，哎，他就会进行自动的一个加载了，好吧，所以呢，这个呢，就是我们的一个第一种方 啊，第二种方法呢，哎，我们可以进行拖动啊，就是什么操作呢？我们来看一下啊，比如说现在，哎，我们找到这个文件，找到这个文件之后啊，然后呢我们直接选择他鼠标着电啊，按住不松 啊，然后呢往这个里面拖动，然后松开鼠标，哎，他就自定了在这个下方呢，他会显示啊，已加载看没有啊，然后指令是多少啊，他都会告诉你 啊，所以说呢，这就是我们常用的两种方法啊，一种呢就是采用到我们的 ap mini 来进行这个加，第二种呢就是直接进行拖动啊，那么本节课的内容呢，就给大家讲这么多，小同学呢，记得点赞关注加转发学习。
15:00查看AI文稿AI文稿大家好，今天我们来讲解一下标注图块名称这个插件的原代码。 我们首先先运行一遍这个命令，输入 mc， 选择一个图块，然后指定一个位置，他就会把这个图块的名称标注了，标注出来，通过一个多重引线给他标注出来一个名字。 接下来我们看代码，这是标注图块名称的一个圆代码，这里边的 除了这个函数之外，其他的函数我们都讲解过，在这里我们只只是简单的介绍一下。 首先我们看第一行，然后我们我们一行一行的往下说， 第一行 dfun 函数，它是用来定义一个命令插件的命令， 前面这段是固定不变的，我们只看这两个，他的命令是 mc， 我们把命令定定好了之后， 在后面输入一对括号，然后进行下一行代码，下一行代码是调用，通过这个函数来调用 看不接口，看不接口环境，然后 我们通过这个函数来获取 acad 应用程序对象。获取应用程序对象之后，我们再通过 cad 应用程序对象来 获取他的一个活动文档，也就是当前打开的一个 dwg 图形。在本例中，这个图形是我们现在所看到的这个图形 获取到活动文档之后，也就是刚才那个图。获取到活动文档之后，我们再获取活动文档的模型空间对象， 通过活动文档这个电量这个对象来获取他的模型空间对象，我们把获取到的模型空间对象复制给电量 ms 这段代码是为了后边执行这个方法的时候提前做的一些准备。 接下来我们通过 ntcl 函数在图中选择一个图块， 这是我们选择时命令行给用户的一个提示， 我们选择之后将会返回来一个列表，这个列表里头有两 两个元素，第一个元素是我们选择的图原名第二个对象，第二个元素是我们点击那一刻所选择的那个点位坐标。 如果我们选择图块的时候，成功的选择选择了，他会返回来一个列表里，列表里头有两个元素，如果我们没有成功选择，我们点了回车了或者是右键了，他会返回来一个空值， 这里就是下面一行，是用衣服来判断我们是否正确选择了，如果我们正确选择了，将会运行衣服里边的这一段代码，因为衣服 礼义服语句里头只能有两个代码快，如果义父表达是如果为真的话，将会运行第一个代码快，如果义父表达是 不为针，则运行第二个代码快，第二个代码快，可以在这里输入，在这里没有他就是说不为针的时候就没有任何， 没有任何动作，没有任何操作吧。然后我们删掉这里，这个没用他。当义父表达视为真的时候，我们准备了一个代码块在这里，也就是我们如果成成功的选择了一个 图块的话，他会运行这段代码 p， r， o， t， n 这个这个函数就是为了将这多行代码 括起来组成一个代码块，他起到这个作用。我们再看 这一行，其实这个负值函数 setq， 他可以连续的对电量进行复制，现在是两行，我们看的可能不是很清楚，我们改一下他这个格式， 吃啊， 这个 setq 负值，将这个值付给 en， 也就是 我们先不管他是什么值，我们先讲解一下这个 s 一 t q 函数，他可以 将这个值付给这个边量，然后不需要再次输入 setq， 还可以紧接着将这个值复制给这个边量， 跟这的原理是一样的，他他可以连续的复制，前面是变量，后边是变量， 想要代表的一些数据，电量数据，电量数据，他都是成对出现的，这里也是一样， 我们还改回这个格式，这个是设置电量 en 来代表 这个列表里头的第一个元素。 c ar 函数是用来获取 列表里头的第一个元素，我们刚才说了这个如果选择成功的话，他会返回一个列表，列表里头有两个元素，第一个元素代表的是一个图原名， 第二个元素代表的是一个点位坐标。 c ar 来获取列表中的第一个元素，也就是那个图原名 联名复制给以 n 这个变量 cadr 用来获取列表内第二个元素，也就是那个点坐标，点坐标复制给 pte 这个变量。接下来 我们通过你的盖子函数来获取涂鸦名里头的一些属性信息，属性属性信息复制给 sse， 这个电量 稍等一下，我们看一下 sic， 有这个可能更直观一点， 有了他的属性信息之后，也就是我们现在看到的这些，这这个他因为 还有好多的属性属性信息里面，其中里面以二代号为二的这个 属性信息代表的是他的图块名称。我们通过 so 克函数获取代号为二的属性信息，也就是我鼠标点击在这里，他也是一个列表， 列表形式存存那个出现的，因为这个属性信息里头，我们看列表里头包含二，还包含开关站 ct 这个图块名 我们不想要前面这个代号。二，我们只想要后面这个图块的名称，那么 我们使用 cdr 这个函数来获取他的这个图块名称，他就会将前面这个代号给去掉了，运行之后他会只保留图块名， 我们现在看一下他这个图块名啊，图块名现在就是这个效果的图块名，我们获取到之后， 我们下一步就是指定一个注记位置，我们通过 getpony 的函数在屏幕上拾取一个点，拾取一个点的同时， 我们用 pte 作为这个标注的基点，标注的 几点精准点。在选择 pt 二的时候，把 pt 一作为一个橡皮筋的 开始点，这样我们在选择 pt2 的时候，他会有一个橡皮筋的效果，我们看一下 就是这样，这里图块的右上角有橡皮筋的开始点，就是刚才我们说的 pt 一， 我们现在鼠标的位置是，我们鼠标如果点到哪里，哪里就是 p t。 二，我们点一下， 我们点取的坐标 会复制给 pt2 这个边量。接着我们来运行一下 ms， 也就是模型空间对象他的一个 a d d m later 这个方法，它是这个函数，是用来运行一个对象， 运行一个对象的一个方法，这是那个方法名，这是我们要执行的对象 执行方法的对象，也就是模型空间，通过模型空间来执行一个方法名，执行一个方法， 我们执行的这个是添加多重引线的这么一个方法，添加多重引线，引线他需要两个参数，第一个参数是 两个点坐标，两个点坐标他怎么是一个参数呢？然后我们把这个点坐标作为他这个数据格式，简单的给他处理了一下， 做成这种样子，也就是说 x， 他其中包含 xyz， pt 一的 xyz 和 pt 二的 xyz， 我们这一段代码就是， 嗯，就是这个功能，把两个坐标给他合合到一起，然后这是添加多重领先时的第一个参数， 他还有第二个参数，第二个参数代表的是多重引线的一个序号，这里我们输入一就可以了。 我们如果运行这一行代码，他会在屏幕上添加一个多重引线，我们现在可以也可以试一下， 好多重引线已经绘制，并且把这个多重多重引线对象已经复制给 ml 这个变量。我们看一下多重引线，现在多重引线已经绘制了，但是他并没有 相关的文字。紧接着我们看下一行，下一行这个函数是用来 给多重引线修改他的文字内容，如果这个多重引线并没有文字的话，他会把这个内容添加到多重引线上面。 当然这个函数不真不仅仅只针对于多重引线这个对象，他还可以针对文字或者是多行文字 这些对象修改文字内容的时候也可以用这个函数。 我们将多重引线的文字 修改为图块名称，我们运行一下 看一下，这时候这个做成引线已经有了文字文字的描述。运行完这个之后， 我们看一下这个括号，这个括号是刚才说了他组成一个代码块，这个是一幅代表把一幅这个，嗯，一幅这个表达式这个整体给他括起来。 这个函数我们之前也讲过，大家看一下前面的视频，他就是为了禁止他显示一些比较没用的一些信息。
138志翔CAD
03:02查看AI文稿AI文稿那上一次呢，咱说到了这个图员信息表，那还有几个相当相相对来说很重要的一个函数，他就可以通过改变那个表来进而修改这个图员的一个属性。那么咱来执行一下这段程序，首先加载一下 运行点点点点，是不是将其他所有图言的颜色啊，改成了这个粉色，那咱们来看看怎么去实现的啊？咱先来把最后两行程序注视掉， 先说说这个 associate， 那 associate 呢？就是可以通过前面这个锁引找到 具体图员信息表里边啊，他包含的那个小表。那咱来先熨一下，看一下上边，这边也屏蔽掉给他。 重点来看一下这个 sosa 的这个函数，它的一个定义就是从关联表中搜索一个元素，如果找到这返回该关联表条目啊，看看它是什么意思，运行 运行之后他是不是返回一个六十二点六啊，这样呢，也算是一个表啊，这也算是一个表 六十二颜色的主码六，代表他是这个粉色啊，代表他是一个粉色，这就是这个函数的一个一个用法啊。 so save， 通过六十二这个缩音找到你 图原定义信息表里边六十二开头的那个呃，小元素， 那下边呢？就是咱来手动给他定义一个啊，手动定义一个新的一个小元素， 现在给他改成一啊一，就代表着红色啊，新图元表啊，新图元表，他等于括号后边六十二点一，就是说这就是咱人为给他创造的一个新表，前面呢加一个小分号， 因为所有原则上这个表或者是这个括号后边紧挨着的第一个元素必须得是这种函数，是吧？咱所有的这个括号后边这个第一个挨着这个元素必须得是一个函数啊。如果你 想让他不运行这个表，那你就前面加一个这种英文的分，英文的一个分号啊，英文的分号。那这样呢？咱就构造出了一个啊，六十二点一，那原来他是六十二点六，对吧？那我现在给要给他换成六十二点一，那这样我就把他突然定义信息给他改变了。 改变了之后呢？后边我就可以通过这个啊， subs 的啊，联合着这个 emo 的函数对他重新重新显示，重新去定义。
4能悟
03:46查看AI文稿AI文稿她是华语乐坛红到发黑的女歌手，也被全网称为转场圣体。但就是这样一位被完成表情包的女人，曾因天生左额骨萎缩，被认为当不了歌手，说话漏风、唱歌跑气，却偏偏凭这一副先天残缺的嗓音，唱出华语乐坛播放量第一的光年之外。 二十三岁一战成名，手握顶级唱功与原创才华登顶月坛，却在赞誉和诋毁的风暴中被卷入舆论深渊。欢迎来到 by 力，本期为你分享邓紫棋。 一九九一年，邓紫棋出生于上海的音乐世家，母亲与外婆都是声乐教师，因此从小便展露出惊人的音乐天赋。四岁随家人迁居香港，十三岁考入英国皇家钢琴八级，也是在这年写出了他人生中第一首完整作品睡公主。 二零零八年发行首张个人 ep g e m， 不 仅横扫香港各大颁奖里新人奖项，还让他在十九岁成为红馆。乐坛声名斐然，但却尚未被内地大众熟知， 转机出现在我是歌手的舞台，节目主音泡沫 demo 向二十三岁的他递出邀约，结果便是初登舞台无人时，一曲唱完天下之 一首泡 沫的连续高音轰炸，不仅炸出一夜暴涨的粉丝，更炸开了他通往华语乐坛顶流的大门。然而流量是把双刃剑，英放歌风 被贴上耍大牌标签之后，更是被潮皮裤穿搭。面对全网铺天盖地的负面评价，他没有争辩，而是把自己关进录音室，选择用作品回应一切。二零一五年发行全创作专辑新的心跳格念，推出华语歌曲播放量第一的光年之外，但争议从不曾真正远离。二零一八年，他坐上中国新说唱导师席， 质疑声瞬间炸开，一个唱流行的懂什么说唱？他没有辩驳，只用一段硬核即兴 flow， 就 让全场瞬间闭嘴。 同年推出专辑摩天动物园，不仅横扫各大奖项，更拿下金曲奖、评选团大奖。然而鲜花与掌声背后，是外人难以窥见的坎坷。 二零一九年，长久积压的合约矛盾彻底爆发，与蜂鸟音乐的解约风波，成了他人生路上最沉重的打击。不仅泡沫、光年之外等歌曲版权尽数归属就动价，就连邓紫棋这一艺名也早已被公司提前注册。商标显现，让他无法再使用。但他却将万般至故与满身委屈化作创作的底气，以作品落笔写下句号，强势反击。 二零二零年，他成立个人工作室，亲自担任监制、词曲、编曲，把命运的船舵赚回自己手中。次年推出启示录专辑十四首歌、十四只 mv， 构建出一整部音乐连续剧。他用近乎偏执的创作主权，宣告名字可以被注册，但才华与灵魂谁也抢不走。 二零二三年，他带着启示录的余韵，开启了 i m gloria 试巡演唱会，不断刷新华语乐坛巡演记录的同时， 还斩获格莱美官方认证的全球女歌手巡演票房第四名，创下华语歌手巡演史上的断层巅峰成绩。从红馆新人到全球巡演票房前列，他用一首首作品凿穿偏见的高墙，又用一场场极致的舞台证明，真正的顶流，从不是一时的流量热度，而是经久不衰的实力与始终滚烫的音乐初心。
1.6万BIOALLEY
15:58
00:45
03:19查看AI文稿AI文稿大家好，本节我们来介绍利斯普语言中的 ntcel 函数。使用 ntcel 函数可以让用户在 cad 界面中选取一个对象。 有时候我们在选择一个对象的时候，同时希望获取选择处的坐标点， 那么我们就可以选选择使用 ntcl 函数。 ntcl 函数将会返回一个表。表内的第一个元素代表的是我们所选的图原名， 第二个元素则是我们点击十位置的坐标。我们通过一个实力来看一下 nca 函数。 intercel 函数。我们可以不带任何参数去使用。 我们先这样测试一下。我们运行一下支行代码， 系统默认有一个提示是选择对象四个文字，然后我们选择一个对象。 这时候返回来一个列表值。列表值的第一个元素是图原名，第二个元素是坐标。 然后我们可以在 n 次赛函数后面加上一个字符串作为参数。字符串内可以写上一些提示信息。 比如说，我们说选择一个文字， 我们再次运行这行代码。 我们选择一个文字，我们再次运行这行代码。看一下命令行，命令行有一个提示说选择一个文字。这就是我们刚才遇线设置好的一个提示信息。我们选择文字， 同样的，他返回来一个列表。 我们通常会将所返回的竖直， 或者说所返回的结果，我们会给他复制给一个变量，以供后面的代码去 要取。 我们再运行一下， 请选择一个文字，我们点击一下，这时候这个列表的值。这个列表 将复制给这个 es 变量。我们下次想使用列表内的元素的时候，我们就可以通过其他方法来从 es 这个变量中去获取 好 in the 三样函数。我们就介绍到这里。谢谢关注我，学习更多利斯普编程知识。
42志翔CAD
00:30查看AI文稿AI文稿今天带大家玩转 cd， 输快捷键 x w w 选择墙体厚度两百四框选我们的轴线， 这个时候你的一个墙体厚度就快速绘制好了。再输入快捷键 a z h 框选对象进行一个尺寸的快速标注，然后输快捷键 w m j， 指定一个闭合点， 把它所有的面积周长都给它进行统计标注出来。这个方法快不快呢？
5145玩转设计
![[SICP]计算机程序的构造和解释（Lec1a：Lisp概览） 中英双语字幕](https://p9-pc-sign.douyinpic.com/image-cut-tos-priv/9ebdac94900be5a32002335bc2ce51f6~tplv-dy-resize-origshort-autoq-75:330.jpeg?lk3s=138a59ce&x-expires=2103310800&x-signature=NUMEOpo6aCM16wsqZuhc9r4lZLw%3D&from=327834062&s=PackSourceEnum_AWEME_DETAIL&se=false&sc=cover&biz_tag=pcweb_cover&l=20260829054530A64E39A508F86DA21BA3)