acet函数

nzl1116

(
;;; acettest.fas
(3 "ACET-AUTOLOAD-APPLY" 652)
(3 "ACET-ALERT" 651)
(3 "C:EXPRESSMENU" 650)
(3 "C:EXPRESSTOOLS" 649)
(3 "ACET-INIT-FAS-LIB" 648)
(3 "ACET-INIT-FORCE-LOAD-ARX-LIB" 647)
(3 "ACET-INIT-GET-LIB-DIR" 646)
(3 "ACET-INIT-ADD-LIB-DIR" 645)
(3 "ACET-INIT-EXPRESS-NOT-INSTALLED-MSG" 644)
(3 "ACET-HOW-TO-GET-EXPRESS" 643)
(3 "ACET-GO-TO-EXPRESS-PAGE" 642)
(3 "ACET-FILENAME-ACAD-ROOT" 641)
(3 "ACET-FILENAME-DIR-ON-PATH" 640)
(3 "ACET-INIT-EXPRESS-INSTALLED" 639)
(3 "ACET-AUTOLOAD" 638)
(3 "ACET-AUTOLOAD2" 637)
(3 "ACET-AUTOLOAD-EXEC" 636)
(3 "ACET-CMD-CHECK" 635)
(3 "ACET-INIT-EXCLUDE-LIST" 634)
(3 "ACET-DISABLED-COMMAND" 633)
(3 "ACET-INIT-PRODKEY" 632)
(3 "ACET-INIT-GET-UPDATE" 631)
(3 "ACET-PARTIAL-MENU-STATUS-GET" 630)
(3 "ACET-PARTIAL-MENU-STATUS-SET" 629)
(3 "ACET-FILE-SYSTIME-COMPARE" 628)
(3 "ACET-MENU-LOAD" 627)
(3 "ACET-MENU-LOAD2" 626)
(3 "ACET-REG-SETDEMANDLOAD" 625)
(3 "ACET-REG-SETCOMMAND" 624)
(3 "ACET-REG-SETACTIVEX" 623)
(3 "C:EXPRESSREG" 622)
(3 "ACET-INIT-CREATE-REG-ENTRIES" 621)
(3 "ACET-LSP-LOAD" 620)
(3 "ACET-INIT" 619)
(3 "LOCAL-CMD-FILE-NOT-INSTALLED" 618)
(3 "FORMAT-SYSTIME" 617)

;;;acetdomnu.fas
(3 "C:REBUILD-EXPRESS-MENU" 366)
(3 "ACET-MENU-REBUILD" 365)
(3 "ACET-MENU-BUILD" 364)
(3 "ACET-MENU-DISABLE" 363)
(3 "ACET-MENU-POPUP-MAKE" 362)
(3 "ACET-MENU-TOOLBAR-HAS-COMMANDS" 361)
(3 "ACET-MENU-TOOLBAR-MAKE" 360)
(3 "ACET-MENU-CHILD-ITEM-LIST-GET" 359)
(3 "ACET-MENU-BUILD-VALID-ITEM" 358)
(3 "ACET-MENU-HELPSTRINGS-MAKE" 357)
(3 "ACET-INI-ITEM-LIST-GET" 356)
(3 "ACET-MENU-WRITE-HEADER" 355)
(3 "ACET-MENU-ADD-SPACES" 354)
(3 "ACET-STRING" 353)

;;;acetutil.fas
(3 "ACET-LIST-INSERT-NTH" 1171)
(3 "ACET-GEOM-POINT-FUZ" 1170)
(3 "ACET-GEOM-LIST-FUZ" 1169)
(3 "ACET-ELIST-ADD-DEFAULTS" 1168)
(3 "ACET-FILENAME-DIRECTORY" 1167)
(3 "ACET-DICT-ENAME" 1166)
(3 "ACET-GEOM-VECTOR-SIDE" 1165)
(3 "ACET-ELIST-FILTER-NOT-MATCH" 1164)
(3 "ACET-ELIST-FILTER-AND-MATCH" 1163)
(3 "ACET-ELIST-FILTER-GC-MATCH" 1162)
(3 "ACET-ELIST-FILTER-OR-MATCH" 1161)
(3 "ACET-ELIST-FILTER--4-MATCH" 1160)
(3 "BNS_FILTER_MATCH" 1159)
(3 "ACET-ELIST-FILTER-MATCH" 1158)
(3 "ACET-FILENAME-EXTENSION" 1157)
(3 "ACET-FILENAME-PATH-REMOVE" 1156)
(3 "ACET-FILENAME-EXT-REMOVE" 1155)
(3 "ACET-STR-LR-TRIM" 1154)
(3 "ACET-STR-SPACE-TRIM" 1153)
(3 "ACET-STR-M-FIND" 1152)
(3 "ACET-STR-TO-LIST" 1151)
(3 "ACET-LIST-M-ASSOC" 1150)
(3 "ACET-GEOM-TEXTBOX" 1149)
(3 "ACET-GEOM-TXTBOX" 1148)
(3 "ACET-GEOM-MTXTBOX" 1147)
(3 "ACET-GEOM-MIDPOINT" 1146)
(3 "MAXMINPNT" 1145)
(3 "ACET-GEOM-LIST-EXTENTS" 1144)
(3 "ACET-GEOM-VIEW-POINTS" 1143)
(3 "ACET-GEOM-PIXEL-UNIT" 1142)
(3 "ACET-GEOM-OBJECT-POINT-LIST" 1141)
(3 "ACET-GEOM-PLINE-POINT-LIST" 1140)
(3 "ACET-GEOM-ARC-POINT-LIST" 1139)
(3 "ACET-GEOM-PLINE-ARC-INFO" 1138)
(3 "ACET-GEOM-ARC-DELTA-ANGLE" 1137)
(3 "ACET-GEOM-CALC-ARC-ERROR" 1136)
(3 "ACET-GEOM-ELLIPSE-POINT-LIST" 1135)
(3 "ACET-GEOM-ELLIPSE-POINT-AT-E-ANGLE" 1134)
(3 "ACET-GEOM-SPLINE-POINT-LIST" 1133)
(3 "ACET-GEOM-INSERT-POINT-LIST" 1132)
(3 "ACET-GEOM-INSERT-CLIP-LIST" 1131)
(3 "ACET-GEOM-MATRIX-TRANS" 1130)
(3 "ACET-GEOM-VECTOR-SCALE" 1129)
(3 "ACET-GEOM-ARBITRARY-X" 1128)
(3 "ACET-GEOM-M-TRANS" 1127)
(3 "ACET-GEOM-POINT-ROTATE" 1126)
(3 "ACET-GEOM-CROSS-PRODUCT" 1125)
(3 "ACET-GEOM-IMAGE-CLIP-LIST" 1124)
(3 "ACET-GEOM-TRANS-IMAGE-TO-UCS" 1123)
(3 "ACET-GEOM-IMAGE-BOUNDS" 1122)
(3 "ACET-GEOM-UNIT-VECTOR" 1121)
(3 "ACET-GEOM-DELTA-VECTOR" 1120)
(3 "ACET-GEOM-VECTOR-ADD" 1119)
(3 "ACET-GEOM-SS-EXTENTS" 1118)
(3 "ACET-GEOM-SS-EXTENTS-ACCURATE" 1117)
(3 "ACET-GEOM-SS-EXTENTS-FAST" 1116)
(3 "ACET-GEOM-EXTENTS" 1115)
(3 "ACET-SS-VISIBLE" 1114)
(3 "ACET-SS-ENTDEL" 1113)
(3 "ACET-SS-NEW" 1112)
(3 "ACET-SS-CLEAR-PREV" 1111)
(3 "ACET-ERROR-INIT" 1110)
(3 "ACET-ERROR-RESTORE" 1109)
(3 "ACET-UNDO-INIT" 1108)
(3 "ACET-UNDO-BEGIN" 1107)
(3 "ACET-UNDO-END" 1106)
(3 "ACET-UNDO-RESTORE" 1105)
(3 "ACET-CMD-EXIT" 1104)
(3 "ACET-SYSVAR-SET" 1103)
(3 "ACET-SYSVAR-RESTORE" 1102)
(3 "ACET-CALC-ROUND" 1101)
(3 "ACET-TABLE-NAME-LIST" 1100)
(3 "ACET-LAYER-LOCKED" 1099)
(3 "ACET-LAYER-UNLOCK-ALL" 1098)
(3 "ACET-LAYER-LOCKED-LIST" 1097)
(3 "ACET-TABLE-PURGE" 1096)
(3 "ACET-DICT-MAKE" 1095)
(3 "ACET-ARXLOAD-OR-BUST" 1094)
(3 "ACET-ARX-RE-LOAD" 1093)
(3 "ACET-SETVAR" 1092)
(3 "ACET-SETVAR-DWG" 1091)
(3 "ACET-SETVAR-CPROFILE" 1090)
(3 "ACET-SETVAR-FIXED-PROFILE" 1089)
(3 "ACET-GETVAR" 1088)
(3 "ACET-GETVAR-DWG" 1087)
(3 "ACET-GETVAR-CPROFILE" 1086)
(3 "ACET-GETVAR-FIXED-PROFILE" 1085)
(3 "ACET-DXF" 1084)
(3 "ACET-SPINNER" 1083)
(3 "ACET-CURRENTVIEWPORT-ENAME" 1082)
(3 "ACET-PSPACE-VIEWPORT-ENAME" 1081)
(3 "ACET-UCS-GET" 1080)
(3 "ACET-UCS-CMD" 1079)
(3 "ACET-SAFE-COMMAND" 1078)
(3 "ACET-ANGLE-FORMAT" 1077)
(3 "ACET-GEOM-VECTOR-D-ANGLE" 1076)
(3 "ACET-GEOM-Z-AXIS" 1075)
(3 "ACET-STR-ESC-WILDCARDS" 1074)
(3 "ACET-INSERT-SPACIAL-FILTER" 1073)
(3 "ACET-SS-FLT-CSPACE" 1072)
(3 "ACET-UI-PROGRESS-INIT" 1071)
(3 "ACET-UI-PROGRESS-SAFE" 1070)
(3 "ACET-UI-PROGRESS-DONE" 1069)
(3 "ACET-VBALOAD" 1068)
(3 "ACET-INIT-ACETUTIL-ARX" 1067)
)

机械工程师

这个用来做什么用？

nzl1116

机械工程师 发表于 2013-8-1 13:06
这个用来做什么用？

用途？不能明说

sicky111

那楼主发这个帖子的有意何在？告诉别人，你看懂了FAS？

自贡黄明儒

能否把ET工具中的几个fas源码都提供给大家？

nzl1116

继续添加
;;;acetutil4
("SUBSCRIPT-DUPS" 764)
("ACET-INSERT-ATTRIB-MOD" 18016 765)
("BNS_GET_ATT" 17990 766)
("BNS_MOD_ATT" 17952 767)
("ACET-INSERT-ATTRIB-GET" 17119 768)
("ACET-INSERT-ATTRIB-SET" 16645 769)
("ACET-FILE-FIND" 16288 770)
("ACET-XREF-CPROJECT-PATH" 16181 771)
("ACET-LIST-GROUP-BY-ASSOC" 16103 772)
("BNS_TRUNCATE_2_VIEW" 15629 773)
("ACET-GEOM-TRANS-UCS-TO-IMAGE" 14930 774)
("ACET-GEOM-OBJECT-END-POINTS" 13952 775)
("ACET-BLINK-AND-SHOW-OBJECT" 13130 776)
("ACET-SS-ANNOTATION-FILTER" 12880 777)
("ACET-XDATA-SET" 11122 778)
("ACET-FILE-OPEN" 10709 779)
("ACET-FILE-FIND-IMAGE" 10378 780)
("ACET-APPID-DELETE" 10203 781)
("ACET-FILE-BACKUP" 9787 782)
("ACET-R12-DXF-CONVERT" 9576 783)
("ACET-FILE-FIND-ON-PATH" 9265 784)
("ACET-REACTOR-REMOVE" 9216 785)
("ACET-REACTOR-EXISTS" 8917 786)
("ACET-ACAD-REFRESH" 8621 787)
("ACET-CALC-BITLIST" 8503 788)
("ACET-VIEWPORT-VPFREEZE" 8337 789)
("ACET-VIEWPORT-FROZEN-LAYER-LIST-SET" 7500 790)
("ACET-GEOM-OBJECT-Z-AXIS" 7229 791)
("ACET-PLINE-MAKE" 6768 792)
("ACET-UCS-SET" 6588 793)
("ACET-SS-REMOVE-DUPS" 5876 794)
("ACET-SS-REMOVE-DUPS-EXTENTS-LIST" 5197 795)
("ACET-SS-REMOVE-DUPS-GENERALIZE-ENT" 3871 796)
("ACET-SS-REMOVE-DUPS-REVERSE" 3684 797)
("ACET-XDATA-GET" 3328 798)
("ACET-FILENAME-SUPPORTPATH-REMOVE" 3210 799)
("ACET-PREF-SUPPORTPATH-LIST" 3148 800)
("ACET-PATH-TO-LIST" 2644 801)
("ACET-LIST-IS-DOTTED-PAIR" 2565 802)
("ACET-EDITOR-REACTOR-ADD" 2509 803)
("ACET-SS-SORT" 2248 804)
("ACET-SS-INTERSECTION" 1978 805)
("ACET-SS-REMOVE" 1711 806)
("ACET-LIST-SPLIT" 1443 807)
("ACET-FILE-BACKUP-DELETE" 1340 808)
("ACET-FILE-BACKUP-RESTORE" 1212 809)
("BNS_ANNOTATION_SS" 1186 810)
("BNS_GROUPS_SEL" 1052 811)
("BNS_GROUPS_UNSEL" 829 812)
("ACET-WMFIN" 86 813)
("ACET-SYS-SHIFT-DOWN" 53 814)
("ACET-SYS-CONTROL-DOWN" 20 815)
("ACET-SYS-LMOUSE-DOWN" 0 816)

nzl1116

自贡黄明儒 发表于 2013-8-2 09:00
能否把ET工具中的几个fas源码都提供给大家？

还不能用工具把fas整合成lsp，只能手动整合，有时间只能把作用和参数给弄出来。

yangwenclever

楼主想告诉别人， 他可以破解LISP

linshiyin2

sicky111

明总现在对这类人表明了零容忍的态度。