lisp执行中，能否知道本lisp程序的启动命令是什么？

mandala

这事情是我想歪了，仅仅知道启动命令还不够。是这样： 我有两个主程序，内容基本完全相同，差别在调用同一个子程序时，输入参数不同，导致执行的结果也不同。这样的话，我在一个lsp里要放入两个基本相同的程序，导致这个lsp很大。 所以我想能不能用一个变量来解决，比如我输入aaa命令，调用子程序时就自动输入一组参数；bbb命令时就输入另一组。这样两个程序可以合并为一个，且不用用户在程序运行时输入选项。因为执行时老是要求输入选项，很麻烦。 大家碰到过这种问题吗？是如何解决的？

mandala

这个问题是不是比较另类？主要是想在程序里设一个局部变量，根据不同的主程序调整参数。

cnks

有什么意义？？

zml84

cnks 发表于 2011-9-6 11:46
有什么意义？？

有意义，可防止函数背不良目的的调用。

cnks

zml84 发表于 2011-9-6 14:57
有意义，可防止函数背不良目的的调用。

这好像防不住吧

mandala

这事情是我想歪了，仅仅知道启动命令还不够。是这样：

我有两个主程序，内容基本完全相同，差别在调用同一个子程序时，输入参数不同，导致执行的结果也不同。这样的话，我在一个lsp里要放入两个基本相同的程序，导致这个lsp很大。

所以我想能不能用一个变量来解决，比如我输入aaa命令，调用子程序时就自动输入一组参数；bbb命令时就输入另一组。这样两个程序可以合并为一个，且不用用户在程序运行时输入选项。因为执行时老是要求输入选项，很麻烦。

大家碰到过这种问题吗？是如何解决的？

Andyhon

都在 调用子程序 之前给个 识别id

依 识别id 给个别参数

cnks

mandala 发表于 2011-9-6 16:51
这事情是我想歪了，仅仅知道启动命令还不够。是这样：

我有两个主程序，内容基本完全相同，差别在调用同 ...

用不了这么复杂，很简单的事，如6楼就能搞定

mandala

Andyhon 发表于 2011-9-6 17:09
都在 调用子程序 之前给个 识别id

依 识别id 给个别参数

识别id是什么？是不是指需要用（getreal）之类的输入一个选项？然后（if （= id 1）（progn………………）？

问题是我不想这么做，因为程序里设置输入太多的选项，会影响程序执行的流畅性。

能直接从输入命令的不同来判断吗？

caoyin

楼主不要随便编辑原内容，因为3~5楼已经就原来话题展开讨论，你编辑原内容让别人看了感觉不知所云
------------------------------------------------------------------
6楼是不是这个意思
(defun HHH (mode)
  (if mode
    (command "_.TRIM")
    (command "_.EXTEND")
  )
  (princ)
)
(defun c:hhh1 ()(HHH T))
(defun c:hhh2 ()(HHH nil))