AutoLISP 函数

ActiveX 或 Visual Basic 等同功能

+ (加)

+ (加操作)

- (减)

- (减操作)

* (乘)

* (乘操作)

/ (除)

/ (除操作)

= (等于)

= (等于比较操作)

/= (不等于)

<> (不等于比较操作)

< (小于)

< (小于比较操作)

<= (小于等于)

<= (小于等于比较操作)

> (大于)

> (大于比较操作)

>= (大于等于)

>= (大于等于比较操作)

~ (逐位非)

Not 操作

1+ (增量)

使用 + (加操作)

1- (减量)

使用 - (减操作)

abs

Abs 函数

acad_colordlg

未提供

acad_helpdlg

在在线索引中搜索HELP

acad_strlsort

在在线索引中搜索SORT

action_tile

使用 Visual Basic 对话框编辑器

add_list

使用 Visual Basic 对话框编辑器

ads

AutoCAD.Application.ListADS 方法

alert

MsgBox 函数

and

And 操作

angle

AutoCAD.Application.ActiveDocument.Utility. AngleFromXAxis 方法

angtof

AutoCAD.Application.ActiveDocument.Utility. AngleToReal 方法

angtos

AutoCAD.Application.ActiveDocument.Utility. AngleToString 方法

append

使用 Visual Basic 阵列处理函数

apply

未提供

arx

AutoCAD.Application.ListARX 方法

arxload

AutoCAD.Application.LoadARX 方法

arxunload

AutoCAD.Application.UnloadARX 方法

ascii

Asc 函数

assoc

未提供

atan

Atn 函数

atof

CDbl 函数

atoi

CInt 函数

atom

在在线帮助索引中搜索IS

atoms-family

未提供

autoarxload

未提供

autoload

未提供

Boole

使用 Visual Basic 逻辑操作

boundp

在在线帮助索引中搜索IS

car/cdr

使用 Visual Basic 阵列处理函数

chr

Chr 函数

client_data_tile

使用 Visual Basic 对话框编辑器

close

AutoCAD.Application.Documents.Close 方法

command

AutoCAD.ActiveDocument.SendCommand 方法

cond

Select Case 语句

cons

使用阵列处理函数或AutoCAD.Application.collection.Add< entityname >方法

cos

Cos 函数

cvunit

使用转换函数

defun

Visual Basic 关键字函数和 End 函数

dictadd

AutoCAD.Application.ActiveDocument. Dictionaries.Add 方法

dictnext

AutoCAD.Application.ActiveDocument. Dictionaries.Item 方法

dictremove

AutoCAD.Application.ActiveDocument. Dictionaries.Dictionary.Delete 方法

dictrename

AutoCAD.Application.ActiveDocument. Dictionaries.Dictionary.Rename 方法

dictsearch

AutoCAD.Application.ActiveDocument. Dictionaries.Dictionary.GetName and GetObject 方法s

dimx_tile and dimy_tile

使用 Visual Basic 对话框编辑器

distance

AutoCAD.Application.Utility.GetDistance 的交互式方法。也可通过以下自定义函数实现

Function distance(sp As Variant, ep As Variant) _
As Double
   Dim x As Double
   Dim y As Double
   Dim z As Double
   x = sp(0) - ep(0)
   y = sp(1) - ep(1)
   z = sp(2) - ep(2)
   distance = Sqr((Sqr((x ^ 2) + (y ^ 2)) ^ 2) + (z ^ 2))
End Function

distof

未提供

done_dialog

使用 Visual Basic 对话框编辑器

end_image

使用 Visual Basic 对话框编辑器

end_list

使用 Visual Basic 对话框编辑器

entdel

AutoCAD.Application.ActiveDocument.collection_object.Delete 方法

entget

AutoCAD.Application.ActiveDocument.collection_object.property 属性

entlast

AutoCAD.Application.ActiveDocument.Modelspace.Item(count-1)

entmake

AutoCAD.Application.ActiveDocument. Modelspace.Add<entityname> 方法

entmakex

AutoCAD.Application.ActiveDocument. Modelspace.Add<entityname> 方法

entmod

使用对象的任何读写属性

entnext

AutoCAD.Application.ActiveDocument.collection. Item 方法

entsel

AutoCAD.Application.ActiveDocument. SelectionSets 对象/方法/属性

entupd

AutoCAD.Application.ActiveDocument. Modelspace.object.Update 方法

eq

未提供

equal

Eqv 操作

*error*

Error 对象/方法/属性

eval

不可用

exit

AutoCAD.Application.Quit 方法

exp

Exp 函数

expand

未提供

expt

^ (求幂操作)

fill_image

使用 Visual Basic 对话框编辑器

findfile

Dir 函数

fix

Fix, Int, Cint 函数

float

CDbl 函数

foreach

For Each...Next 语句

gc

AutoCAD.Application.ActiveDocument.PurgeAll

gcd

未提供

get_attr

使用 Visual Basic 对话框编辑器

get_tile

使用 Visual Basic 对话框编辑器

getangle

AutoCAD.Application.ActiveDocument.Utility. GetAngle 方法

getcfg

AutoCAD.Application.Preferences.property 属性

getcname

未提供

getcorner

AutoCAD.Application.ActiveDocument.Utility. GetCorner 方法

getdist

AutoCAD.Application.ActiveDocument.Utility. GetDistance 方法

getenv

AutoCAD.Application.Preferences.property 属性

getfiled

使用 Visual Basic 文件对话框

getint

AutoCAD.Application.ActiveDocument.Utility. GetInteger 方法

getkword

AutoCAD.Application.ActiveDocument.Utility. GetKeyword 方法

getorient

AutoCAD.Application.ActiveDocument.Utility. GetOrientation 方法

getpoint

AutoCAD.Application.ActiveDocument.Utility. GetPoint 方法

getreal

AutoCAD.Application.ActiveDocument.Utility. GetReal 方法

getstring

AutoCAD.Application.ActiveDocument.Utility. GetString 方法

getvar

AutoCAD.Application.GetVariable 方法

graphscr

AppActivate AutoCAD.Application.Caption

grclear

Obsolete 函数

grdraw

未提供

grread

未提供

grtext

AutoCAD.Application.ActiveDocument.Utility.Prompt

grvecs

未提供

handent

AutoCAD.Application.ActiveDocument. ModelSpace.object.Handle 属性

help

在在线帮助索引中搜索HELP

if

If... Then... Else 语句

initget

AutoCAD.Application.ActiveDocument.Utility .InitializeUserInput

inters

AutoCAD.Application.ActiveDocument. Modelspace.object.IntersectWith

itoa

Str 函数

lambda

未提供

last

arrayname(UBound(arrayname))

length

UBound 函数

list

ReDim 语句

listp

IsArray 函数

load_dialog

使用 Visual Basic 对话框编辑器

load

在自动操作过程中不支持AutoLISP

log

Log 函数

logand

And 函数

logior

Or 函数

lsh

Imp 函数

mapcar

未提供

max

Max 函数

mem

未提供

member

使用集合

menucmd

AutoCAD.Application.MenuBar 对象

menugroup

AutoCAD.Application.MenuGroup 对象

min

Min 函数

minusp

使用 < 0 语法

mode_tile

使用 Visual Basic 对话框编辑器

namedobjdict

AutoCAD.Application.ActiveDocument.
Dictionaries 集合

nentsel

AutoCAD.Application.ActiveDocument.
SelectionSets.SelectionSet.SelectAtPoint 方法

nentselp

AutoCAD.Application.ActiveDocument.
SelectionSets.SelectionSet.SelectAtPoint 方法

new_dialog

使用 Visual Basic 对话框编辑器

not

使用逻辑操作

nth

使用 object(n) 语法

null

IsNull 函数

numberp

TypeName 函数

open

Open 函数

or

使用逻辑操作

osnap

未提供 (可使用 SetVariable 方法来控制 OSMODE 系统变量。)

polar

AutoCAD.Application.ActiveDocument.Utility.PolarPoint 方法

prin1

AutoCAD.Application.ActiveDocument.Utility.Prompt

princ

AutoCAD.Application.ActiveDocument.Utility.Prompt

print

AutoCAD.Application.ActiveDocument.Utility.Prompt

progn

未提供

prompt

AutoCAD.Application.ActiveDocument.Utility.Prompt

quit

AutoCAD.Application.Quit 方法

quote

未提供

read

未提供

read-char

Input 函数

read-line

Line Input 函数

redraw

AutoCAD.Application.ActiveDocument.
Modelspace.object.Update 方法

regapp

AutoCAD.Application.ActiveDocument.RegisteredApplications.Add 方法

rem

Mod 函数

repeat

For... Each, While,

reverse

未提供

rtos

AutoCAD.Application.ActiveDocument.Utility.
RealToString 方法

set

Set 函数

set_tile

使用 Visual Basic 对话框编辑器

setcfg

AutoCAD.Application.Preferences.property
属性

setfunhelp

未提供

setq

Set 函数

setvar

AutoCAD.Application.SetVariable 方法

sin

Sin 函数

setview

AutoCAD.Application.ActiveDocument.Viewports.Viewport.SetView 方法

slide_image

使用 Visual Basic 对话框编辑器

snvalid

未提供

sqrt

Sqr 函数

ssadd

AutoCAD.Application.ActiveDocument.
SelectionSets.Add 方法

ssdel

AutoCAD.Application.ActiveDocument.
SelectionSets.SelectionSet.Delete 方法

ssget

AutoCAD.Application.ActiveDocument.
SelectionSets.SelectionSet.SelectOnScreen 方法

ssgetfirst

未提供

sslength

AutoCAD.Application.ActiveDocument.
SelectionSets.SelectionSet.Count 方法

ssmemb

比较对象的ID与SelectionSet成员

ssname

AutoCAD.Application.ActiveDocument.
SelectionSets.SelectionSet.Name 属性

ssnamex

未提供

sssetfirst

AutoCAD.Application.ActiveDocument.PickfirstSelectionSet

startapp

Shell 函数

start_dialog

使用 Visual Basic 对话框编辑器

start_image

使用 Visual Basic 对话框编辑器

start_list

使用 Visual Basic 对话框编辑器

strcase

StrConv 函数

strcat

& 操作

strlen

Len 函数

subst

未提供

substr

Mid 函数

tablet

未提供

tblnext

AutoCAD.Application.ActiveDocument.collection_object.Item 方法

tblobjname

AutoCAD.Application.ActiveDocument.collection_object.Name 方法

tblsearch

AutoCAD.Application.ActiveDocument.collection_object.Name 方法

term_dialog

使用 Visual Basic 对话框编辑器

terpri

未提供

textbox

AutoCAD.Application.ActiveDocument.space.
object.GetBoundingBox 方法

textpage

未提供

textscr

未提供

trace

未提供

trans

AutoCAD.Application.ActiveDocument.Utility.
TranslateCoordinates 方法

type

TypeName 函数

unload_dialog

使用 Visual Basic 对话框编辑器

untrace

未提供

vector_image

使用 Visual Basic 对话框编辑器

ver

AutoCAD.Application.Version 属性

vports

AutoCAD.Application.ActiveDocument.Viewports 集合

wcmatch

Like 操作

while

While... Wend

write-char

Print 函数

write-line

Print 函数

xdroom

未提供

xdsize

未提供

zerop

使用 = 0 语法