CADPL-Pack-v1.lsp,很多有用的函数,对初学者很有帮助

taner

1. ;;; ======================================================================================= ;;;
   
2. ;;; CADPL-Pack-v1.lsp                                                                       ;;;
   
3. ;;; [2013-04-07]                                                                            ;;;
   
4. ;;; ======================================================================================= ;;;
   
5. 
   
6. ; [ACX] ===================================================================================== ;
   
7. ; cd:ACX_AddArc           - Tworzy obiekt typu ARC / Creates a ARC object                     ;
   
8. ; cd:ACX_AddCircle        - Tworzy obiekt typu CIRCLE / Creates a CIRCLE object               ;
   
9. ; cd:ACX_AddLayer         - Tworzy nowa warstwe / Creates a new layers                        ;
   
10. ; cd:ACX_AddLine          - Tworzy obiekt typu LINE / Creates a LINE object                   ;
    
11. ; cd:ACX_AddLWPolyline    - Tworzy obiekt typu LWPOLYLINE / Creates a LWPOLYLINE object       ;
    
12. ; cd:ACX_AddTable         - Tworzy obiekt typu ACAD_TABLE / Creates a ACAD_TABLE object       ;
    
13. ; cd:ACX_AddMText         - Tworzy obiekt typu MTEXT / Creates a MTEXT object                 ;
    
14. ; cd:ACX_AddText          - Tworzy obiekt typu TEXT / Creates a TEXT object                   ;
    
15. ; cd:ACX_AddTextStyle     - Tworzy nowy stylu tekstu / Creates a new text style               ;
    
16. ; cd:ACX_AddXline         - Tworzy obiekt typu XLINE / Creates a XLINE object                 ;
    
17. ; cd:ACX_ADoc             - Aktywny dokument / Active document                                ;
    
18. ; cd:ACX_ASpace           - Aktywny obszar / Active space                                     ;
    
19. ; cd:ACX_Blocks           - Kolekcja Blocks / Blocks collection                               ;
    
20. ; cd:ACX_GetProp          - Pobiera cechy obiektu / Gets the object properties                ;
    
21. ; cd:ACX_Layers           - Kolekcja Layers / Layers collection                               ;
    
22. ; cd:ACX_Layouts          - Kolekcja Layouts / Layouts collection                             ;
    
23. ; cd:ACX_LineTypes        - Kolekcja LineTypes / LineTypes collection                         ;
    
24. ; cd:ACX_LoadLineType     - Laduje definicje linii z pliku LIN / Loads linetype from LIN file ;
    
25. ; cd:ACX_Model            - Obszar modelu / Model space                                       ;
    
26. ; cd:ACX_Paper            - Obszar papieru / Paper space                                      ;
    
27. ; cd:ACX_SetProp          - Zmienia cechy obiektu VLA / Sets the property of VLA-Object       ;
    
28. ; cd:ACX_TextStyles       - Kolekcja TextStyles / TextStyles collection                       ;
    
29. ;                                                                                             ;
    
30. ; [BLK] ===================================================================================== ;
    
31. ; cd:BLK_GetAttEntity     - Zwraca liste atrybutow bloku / Returns a list of attributes block ;
    
32. ; cd:BLK_GetAtts          - Pobiera wartosci atrybutow / Gets the values of all attributes    ;
    
33. ; cd:BLK_GetAttsVLA       - Pobiera wartosci atrybutow / Gets the values of all attributes    ;
    
34. ; cd:BLK_GetAttValueVLA   - Pobiera wartosc atrybutu / Gets the attribute value               ;
    
35. ; cd:BLK_GetDynBlockNames - Lista nazw blokow (*U) zaleznych od bloku dynamicznego /          ;
    
36. ;                           List of the blocks name (*U) which depends on a dynamic block     ;
    
37. ; cd:BLK_GetDynamicProps  - Pobiera wlasciwosci bloku dyn. / Gets the dyn. block properties   ;
    
38. ; cd:BLK_GetEntity        - Lista obiektow w definicji bloku / List of objects in block def.  ;
    
39. ; cd:BLK_GetXrefs         - Lista odnosnikow zewnetrznych / List of external references       ;
    
40. ; cd:BLK_InsertBlock      - Wstawia blok / Inserts a block                                    ;
    
41. ; cd:BLK_IsDynamicInsert  - Sprawdza czy blok dynamiczny / Checks if the dynamic block        ;
    
42. ; cd:BLK_SetAttValueVLA   - Zmienia wartosc atrybutu / Sets the attribute value               ;
    
43. ; cd:BLK_SetDynamicProps  - Zmienia wlasciwosci bloku dyn. / Sets the dyn. block properties   ;
    
44. ;                                                                                             ;
    
45. ; [CAL] ===================================================================================== ;
    
46. ; cd:CAL_BitList          - Lista bitow liczby calkowitej / List of bits integer              ;
    
47. ; cd:CAL_Sequence         - Tworzy ciag arytmetyczny / Creates arithmetic sequence            ;
    
48. ;                                                                                             ;
    
49. ; [CON] ===================================================================================== ;
    
50. ; cd:CON_All2Str          - Zmiana elem. listy na lancuchy / Convert list elem. onto strings  ;
    
51. ; cd:CON_ObjConv          - Konwertuje obiekt / Convert object                                ;
    
52. ; cd:CON_List2Value       - Zmiana listy na lancuch tekstowy / Convert list onto text string  ;
    
53. ; cd:CON_Real2Str         - Konwertuje liczbe na tekst / Converts number to a string          ;
    
54. ; cd:CON_TransMatrix      - Macierz transformacji ukl. wsp. / The coor. transformation matrix ;
    
55. ; cd:CON_Value2List       - Zmiana lancucha tekstow. na liste / Convert string into list elem.;
    
56. ; cd:CON_XYZ2Variant      - Lista liczb na 3DPoint / List of numbers to 3DPoint               ;
    
57. ;                                                                                             ;
    
58. ; [DCL] ===================================================================================== ;
    
59. ; cd:DCL_ChangeColorList  - Obsluga listy kolorow / Handling of list colors                   ;
    
60. ; cd:DCL_ChangeStringList - Obsluga listy tekstow / Handling of list strings                  ;
    
61. ; cd:DCL_FillColorList    - Wypelnia "popup_list" kolorami / Fills "popup_list" with colors   ;
    
62. ; cd:DCL_FillColorImage   - Wypelnia wycinek "image" kolorem / Fills "image" tile with color  ;
    
63. ; cd:DCL_FillStringList   - Wypelnia "popup_list" tekstami / Fills "popup_list" with strings  ;
    
64. ; cd:DCL_ImgBtnSortIcon   - Image_button - ikona sortowania / Image_button - sort icon        ;
    
65. ; cd:DCL_MsgBox           - DCL-owe okno komunikatu / DCL message box                         ;
    
66. ; cd:DCL_SetList          - Wypelnia wycinki / Fills tiles                                    ;
    
67. ; cd:DCL_StdEditBoxDialog - Okno dialogowe z "edit_box" / Dialog control with "edit_box"      ;
    
68. ; cd:DCL_StdListDialog    - Okno dialogowe z "list_box" / Dialog control with "list_box"      ;
    
69. ;                                                                                             ;
    
70. ; [DCT] ===================================================================================== ;
    
71. ; cd:DCT_AddDict          - Dodaje slownik / Adds the dictionary                              ;
    
72. ; cd:DCT_AddXrecord       - Dodaje Xrecord / Adds the Xrecord                                 ;
    
73. ; cd:DCT_GetDict          - Pobiera slownik / Gets a dictionary                               ;
    
74. ; cd:DCT_GetDictList      - Pobiera liste slownikow / Gets a list of dictionaries             ;
    
75. ; cd:DCT_GetExtDict       - Pobiera/Tworzy ExtensionDict. / Gets/Creates an ExtensionDict.    ;
    
76. ; cd:DCT_GetExtDictVLA    - Pobiera/Tworzy ExtensionDict. / Gets/Creates an ExtensionDict.    ;
    
77. ; cd:DCT_GetXrecord       - Pobiera Xrecord / Gets Xrecord                                    ;
    
78. ; cd:DCT_RemoveDict       - Usuwa slownik / Removes the dictionary                            ;
    
79. ; cd:DCT_ReplaceXrecord   - Podmienia Xrecord / Replace Xrecord                               ;
    
80. ; cd:DCT_SetXrecordVLA    - Zmienia Xrecord / Change Xrecord                                  ;
    
81. ;                                                                                             ;
    
82. ; [DWG] ===================================================================================== ;
    
83. ; cd:DWG_AddCustomProp    - Dodaje wlasciwosci uzytkownika / Add custom drawing properties    ;
    
84. ; cd:DWG_GetCustomProp    - Lista wlasciwosci uzytkownika / Custom drawing properties         ;
    
85. ; cd:DWG_GetOpenDocs      - Lista otwartych dokumentow / Open documents list                  ;
    
86. ; cd:DWG_GetSummaryInfo   - Lista wlasciwosci dokumentu / Summary drawing properties list     ;
    
87. ; cd:DWG_Layout2VLA       - Zmiana nazwy arkusza na ob. VLA / Convert layout name to VLA-Ob.  ;
    
88. ; cd:DWG_LayoutsList      - Lista arkuszy rysunku / Layouts drawing list                      ;
    
89. ; cd:DWG_RemoveCustomProp - Usuwa wlasciwosci uzytkownika / Removes custom drawing properties ;
    
90. ; cd:DWG_SetSummaryInfo   - Zmiana wlasciwosci dokumentu / Set summary drawing properties     ;
    
91. ;                                                                                             ;
    
92. ; [DXF] ===================================================================================== ;
    
93. ; cd:DXF_Massoc           - Zwraca wartosc danego klucza z listy asocjacyjnej /               ;
    
94. ;                           Returns the value of a key from assoc list                        ;
    
95. ; cd:DXF_RemoveDXF        - Usuwa kody z listy DXF / Removes codes from the list of DXF       ;
    
96. ;                                                                                             ;
    
97. ; [ENT] ===================================================================================== ;
    
98. ; cd:ENT_CheckTableObj    - Poprawnosc nazwanego obiektu / Correctness of the named object    ;
    
99. ; cd:ENT_MakeArc          - Tworzy obiekt typu ARC / Creates a ARC object                     ;
    
100. ; cd:ENT_MakeBlockEnd     - Tworzy koniec definicji bloku / Creates a block definition end    ;
     
101. ; cd:ENT_MakeBlockHead    - Tworzy poczatek definicji bloku / Creates a block definition head ;
     
102. ; cd:ENT_MakeCircle       - Tworzy obiekt typu CIRCLE / Creates a CIRCLE object               ;
     
103. ; cd:ENT_MakeEllipse      - Tworzy obiekt typu ELLIPSE / Creates a ELLIPSE object             ;
     
104. ; cd:ENT_MakeLayer        - Tworzy nowa warstwe / Creates a new layers                        ;
     
105. ; cd:ENT_MakeLine         - Tworzy obiekt typu LINE / Make LINE object                        ;
     
106. ; cd:ENT_MakeLWPolyline   - Tworzy obiekt typu LWPOLYLINE / Creates a LWPOLYLINE object       ;
     
107. ; cd:ENT_MakeTable        - Tworzy obiekt typu ACAD_TABLE / Creates a ACAD_TABLE object       ;
     
108. ; cd:ENT_MakeText         - Tworzy obiekt typu TEXT / Creates a TEXT object                   ;
     
109. ; cd:ENT_MakeTextStyle    - Tworzy nowy stylu tekstu / Creates a new text style               ;
     
110. ; cd:ENT_MakeXline        - Tworzy obiekt typu XLINE / Creates a XLINE object                 ;
     
111. ; cd:ENT_SetBasicDXF      - Zmiana podstawowych cech obiektu / Set basic object properties    ;
     
112. ; cd:ENT_SetDXF           - Zmiana danych DXF obiektu / Set DXF data of object                ;
     
113. ;                                                                                             ;
     
114. ; [LST] ===================================================================================== ;
     
115. ; cd:LST_InsertItem       - Wstawia nowy element na liste / Inserts a new item in the list    ;
     
116. ; cd:LST_ItemPosition     - Lista wystapien elementu / List of occurrences item in the list   ;
     
117. ; cd:LST_MoveItemDown     - Przesuwa element o jedna pozyc. w dol / Moves item one pos. down  ;
     
118. ; cd:LST_MoveItemToBottom - Przesuwa element na ostatnia pozyc. / Moves item to the last pos. ;
     
119. ; cd:LST_MoveItemToTop    - Przesuwa element na pozycje 0 / Moves item to the 0th position    ;
     
120. ; cd:LST_MoveItemUp       - Przesuwa element o jedna pozyc. w gore / Moves item one pos. up   ;
     
121. ; cd:LST_RemoveItem       - Usuwa element z listy / Removes the item from the list            ;
     
122. ; cd:LST_ReplaceItem      - Zastepuje element na liscie / Replaces the item on the list       ;
     
123. ; cd:LST_ReverseItems     - Zamienia elementy miejscami / Reverse the elements in places      ;
     
124. ;                                                                                             ;
     
125. ; [SSX] ===================================================================================== ;
     
126. ; cd:SSX_Convert          - Zmienia PICKSET na liste obiek. / Convert PICKSET to list of obj. ;
     
127. ;                                                                                             ;
     
128. ; [STR] ===================================================================================== ;
     
129. ; cd:STR_CountChar        - Liczba wystapien znaku / Number of occurrences of a character     ;
     
130. ; cd:STR_FillChar         - Uzupelnia lancuch tekstowy / Complements the text string          ;
     
131. ; cd:STR_Parse            - Dzieli lancuch separatorem / Divide string by separator           ;
     
132. ; cd:STR_ReParse          - Laczy liste lancuchow w lancuch z separatorem /                   ;
     
133. ;                           Combines a list of strings in the string with the separator       ;
     
134. ; cd:STR_TableNameAuto    - Tworzy automatyczna nazwe / Creates automatic name                ;
     
135. ;                                                                                             ;
     
136. ; [SYS] ===================================================================================== ;
     
137. ; cd:SYS_AcadInfo         - AcadInfo np. ("AutoCAD" 18.0 64 "PL")                             ;
     
138. ; cd:SYS_CheckError       - Sprawdza dzialanie funkcji / Checks proper operation of the func. ;
     
139. ; cd:SYS_CollList         - Zwraca liste obiektow / Returns a list of objects                 ;
     
140. ; cd:SYS_FilesLoader      - Wczytuje pliki lsp,fas,vlx / Loads files lsp,fas,vlx              ;
     
141. ; cd:SYS_FontPaths        - Lista sciezek do czcionek / List of paths to the fonts            ;
     
142. ; cd:SYS_GetDateTime      - Zwraca date/czas systemowa(y) / Return system date/time           ;
     
143. ; cd:SYS_GetSymbols       - Lista symboli LISP-a / LISPs symbols list                         ;
     
144. ; cd:SYS_Msgbox           - Standardowe okno komunikatu / Standard message box                ;
     
145. ; cd:SYS_ReadFile         - Czyta plik tekstowy / Read a text file                            ;
     
146. ; cd:SYS_RW               - Odczyt/Zapis danych w rejest. / Reads/Writes data to the registry ;
     
147. ; cd:SYS_UndoBegin        - Poczatek grupy operacji / Start of group operations               ;
     
148. ; cd:SYS_UndoEnd          - Koniec grupy operacji / End of group operations                   ;
     
149. ; cd:SYS_WriteFile        - Zapisuje plik tekstowy / Writes the text file                     ;
     
150. ;                                                                                             ;
     
151. ; [USR] ===================================================================================== ;
     
152. ; cd:USR_EntSelObj        - Wybiera zadane obiekty / Select a desired object                  ;
     
153. ; cd:USR_GetKeyWord       - Pobranie slowa kluczowego od uzyt. / Get a keyword from the user  ;
     
154. ; cd:USR_GetPoint         - Pobiera punkt od uzytkownika / Gets point from user               ;
     
155. ;                                                                                             ;
     
156. ; [XDT] ===================================================================================== ;
     
157. ; cd:XDT_GetXData         - Czyta dane dodatkowe XDATA / Reads additional data XDATA          ;
     
158. ; cd:XDT_PutXData         - Dodaje dane dodatkowe XDATA / Adds additional data XDATA          ;
     
159. ; cd:XDT_RemoveXData      - Usuwa dane dodatkowe XDATA / Removes additional data XDATA        ;
     
160. ;                                                                                             ;
     
161. ; =========================================================================================== ;

复制代码

yjch

谢谢taner,站在巨人的肩膀上，研读中

ucuc2003

下了，有空了仔细学习下，谢谢