- UID
- 41992
- 积分
- 958
- 精华
- 贡献
-
- 威望
-
- 活跃度
-
- D豆
-
- 在线时间
- 小时
- 注册时间
- 2003-4-10
- 最后登录
- 1970-1-1
|
发表于 2013-6-3 20:56:58
|
显示全部楼层
本帖最后由 xshrimp 于 2013-6-4 09:24 编辑
给你提供一个函数库参考
;;; ======================================================================================= ;;;
;;; CADPL-Pack-v1.lsp ;;;
;;; [2013-03-20] ;;;
;;; ======================================================================================= ;;;
; [ACX] ===================================================================================== ;
; cd:ACX_AddArc - Tworzy obiekt typu ARC / Creates a ARC object ;
; cd:ACX_AddCircle - Tworzy obiekt typu CIRCLE / Creates a CIRCLE object ;
; cd:ACX_AddLayer - Tworzy nowa warstwe / Creates a new layers ;
; cd:ACX_AddLine - Tworzy obiekt typu LINE / Creates a LINE object ;
; cd:ACX_AddLWPolyline - Tworzy obiekt typu LWPOLYLINE / Creates a LWPOLYLINE object ;
; cd:ACX_AddTable - Tworzy obiekt typu ACAD_TABLE / Creates a ACAD_TABLE object ;
; cd:ACX_AddMText - Tworzy obiekt typu MTEXT / Creates a MTEXT object ;
; cd:ACX_AddText - Tworzy obiekt typu TEXT / Creates a TEXT object ;
; cd:ACX_AddTextStyle - Tworzy nowy stylu tekstu / Creates a new text style ;
; cd:ACX_AddXline - Tworzy obiekt typu XLINE / Creates a XLINE object ;
; cd:ACX_ADoc - Aktywny dokument / Active document ;
; cd:ACX_ASpace - Aktywny obszar / Active space ;
; cd:ACX_Blocks - Kolekcja Blocks / Blocks collection ;
; cd:ACX_GetProp - Pobiera cechy obiektu / Gets the object properties ;
; cd:ACX_Layers - Kolekcja Layers / Layers collection ;
; cd:ACX_Layouts - Kolekcja Layouts / Layouts collection ;
; cd:ACX_LineTypes - Kolekcja LineTypes / LineTypes collection ;
; cd:ACX_LoadLineType - Laduje definicje linii z pliku LIN / Loads linetype from LIN file ;
; cd:ACX_Model - Obszar modelu / Model space ;
; cd:ACX_Paper - Obszar papieru / Paper space ;
; cd:ACX_SetProp - Zmienia cechy obiektu VLA / Sets the property of VLA-Object ;
; cd:ACX_TextStyles - Kolekcja TextStyles / TextStyles collection ;
; ;
; [BLK] ===================================================================================== ;
; cd:BLK_GetAttEntity - Zwraca liste atrybutow bloku / Returns a list of attributes block ;
; cd:BLK_GetAtts - Pobiera wartosci atrybutow / Gets the values of all attributes ;
; cd:BLK_GetAttsVLA - Pobiera wartosci atrybutow / Gets the values of all attributes ;
; cd:BLK_GetAttValueVLA - Pobiera wartosc atrybutu / Gets the attribute value ;
; cd:BLK_GetDynamicProps - Pobiera wlasciwosci bloku dyn. / Gets the dyn. block properties ;
; cd:BLK_GetEntity - Lista obiektow w definicji bloku / List of objects in block def. ;
; cd:BLK_GetXrefs - Lista odnosnikow zewnetrznych / List of external references ;
; cd:BLK_InsertBlock - Wstawia blok / Inserts a block ;
; cd:BLK_IsDynamicInsert - Sprawdza czy blok dynamiczny / Checks if the dynamic block ;
; cd:BLK_SetAttValueVLA - Zmienia wartosc atrybutu / Sets the attribute value ;
; cd:BLK_SetDynamicProps - Zmienia wlasciwosci bloku dyn. / Sets the dyn. block properties ;
; ;
; [CAL] ===================================================================================== ;
; cd:CAL_BitList - Lista bitow liczby calkowitej / List of bits integer ;
; cd:CAL_Sequence - Tworzy ciag arytmetyczny / Creates arithmetic sequence ;
; ;
; [CON] ===================================================================================== ;
; cd:CON_All2Str - Zmiana elem. listy na lancuchy / Convert list elem. onto strings ;
; cd:CON_ObjConv - Konwertuje obiekt / Convert object ;
; cd:CON_Real2Str - Konwertuje liczbe na tekst / Converts number to a string ;
; cd:CON_TransMatrix - Macierz transformacji ukl. wsp. / The coor. transformation matrix ;
; cd:CON_XYZ2Variant - Lista liczb na 3DPoint / List of numbers to 3DPoint ;
; ;
; [DCL] ===================================================================================== ;
; cd:DCL_ChangeColorList - Obsluga listy kolorow / Handling of list colors ;
; cd:DCL_ChangeStringList - Obsluga listy tekstow / Handling of list strings ;
; cd:DCL_FillColorList - Wypelnia "popup_list" kolorami / Fills "popup_list" with colors ;
; cd:DCL_FillColorImage - Wypelnia wycinek "image" kolorem / Fills "image" tile with color ;
; cd:DCL_FillStringList - Wypelnia "popup_list" tekstami / Fills "popup_list" with strings ;
; cd:DCL_ImgBtnSortIcon - Image_button - ikona sortowania / Image_button - sort icon ;
; cd:DCL_MsgBox - DCL-owe okno komunikatu / DCL message box ;
; cd:DCL_SetList - Wypelnia wycinki / Fills tiles ;
; cd:DCL_StdEditBoxDialog - Okno dialogowe z "edit_box" / Dialog control with "edit_box" ;
; cd:DCL_StdListDialog - Okno dialogowe z "list_box" / Dialog control with "list_box" ;
; ;
; [DCT] ===================================================================================== ;
; cd:DCT_AddDict - Dodaje slownik / Adds the dictionary ;
; cd:DCT_AddXrecord - Dodaje Xrecord / Adds the Xrecord ;
; cd:DCT_GetDict - Pobiera slownik / Gets a dictionary ;
; cd:DCT_GetDictList - Pobiera liste slownikow / Gets a list of dictionaries ;
; cd:DCT_GetExtDict - Pobiera/Tworzy ExtensionDict. / Gets/Creates an ExtensionDict. ;
; cd:DCT_GetExtDictVLA - Pobiera/Tworzy ExtensionDict. / Gets/Creates an ExtensionDict. ;
; cd:DCT_GetXrecord - Pobiera Xrecord / Gets Xrecord ;
; cd:DCT_RemoveDict - Usuwa slownik / Removes the dictionary ;
; cd:DCT_ReplaceXrecord - Podmienia Xrecord / Replace Xrecord ;
; cd:DCT_SetXrecordVLA - Zmienia Xrecord / Change Xrecord ;
; ;
; [DWG] ===================================================================================== ;
; cd:DWG_AddCustomProp - Dodaje wlasciwosci uzytkownika / Add custom drawing properties ;
; cd:DWG_GetCustomProp - Lista wlasciwosci uzytkownika / Custom drawing properties ;
; cd:DWG_GetOpenDocs - Lista otwartych dokumentow / Open documents list ;
; cd:DWG_GetSummaryInfo - Lista wlasciwosci dokumentu / Summary drawing properties list ;
; cd:DWG_Layout2VLA - Zmiana nazwy arkusza na ob. VLA / Convert layout name to VLA-Ob. ;
; cd:DWG_LayoutsList - Lista arkuszy rysunku / Layouts drawing list ;
; cd:DWG_RemoveCustomProp - Usuwa wlasciwosci uzytkownika / Removes custom drawing properties ;
; cd:DWG_SetSummaryInfo - Zmiana wlasciwosci dokumentu / Set summary drawing properties ;
; ;
; [DXF] ===================================================================================== ;
; cd:DXF_Massoc - Zwraca wartosc danego klucza z listy asocjacyjnej / ;
; Returns the value of a key from assoc list ;
; cd:DXF_RemoveDXF - Usuwa kody z listy DXF / Removes codes from the list of DXF ;
; ;
; [ENT] ===================================================================================== ;
; cd:ENT_CheckTableObj - Poprawnosc nazwanego obiektu / Correctness of the named object ;
; cd:ENT_MakeArc - Tworzy obiekt typu ARC / Creates a ARC object ;
; cd:ENT_MakeBlockEnd - Tworzy koniec definicji bloku / Creates a block definition end ;
; cd:ENT_MakeBlockHead - Tworzy poczatek definicji bloku / Creates a block definition head ;
; cd:ENT_MakeCircle - Tworzy obiekt typu CIRCLE / Creates a CIRCLE object ;
; cd:ENT_MakeEllipse - Tworzy obiekt typu ELLIPSE / Creates a ELLIPSE object ;
; cd:ENT_MakeLayer - Tworzy nowa warstwe / Creates a new layers ;
; cd:ENT_MakeLine - Tworzy obiekt typu LINE / Make LINE object ;
; cd:ENT_MakeLWPolyline - Tworzy obiekt typu LWPOLYLINE / Creates a LWPOLYLINE object ;
; cd:ENT_MakeTable - Tworzy obiekt typu ACAD_TABLE / Creates a ACAD_TABLE object ;
; cd:ENT_MakeText - Tworzy obiekt typu TEXT / Creates a TEXT object ;
; cd:ENT_MakeTextStyle - Tworzy nowy stylu tekstu / Creates a new text style ;
; cd:ENT_MakeXline - Tworzy obiekt typu XLINE / Creates a XLINE object ;
; cd:ENT_SetBasicDXF - Zmiana podstawowych cech obiektu / Set basic object properties ;
; cd:ENT_SetDXF - Zmiana danych DXF obiektu / Set DXF data of object ;
; ;
; [LST] ===================================================================================== ;
; cd:LST_InsertItem - Wstawia nowy element na liste / Inserts a new item in the list ;
; cd:LST_ItemPosition - Lista wystapien elementu / List of occurrences item in the list ;
; cd:LST_MoveItemDown - Przesuwa element o jedna pozyc. w dol / Moves item one pos. down ;
; cd:LST_MoveItemToBottom - Przesuwa element na ostatnia pozyc. / Moves item to the last pos. ;
; cd:LST_MoveItemToTop - Przesuwa element na pozycje 0 / Moves item to the 0th position ;
; cd:LST_MoveItemUp - Przesuwa element o jedna pozyc. w gore / Moves item one pos. up ;
; cd:LST_RemoveItem - Usuwa element z listy / Removes the item from the list ;
; cd:LST_ReplaceItem - Zastepuje element na liscie / Replaces the item on the list ;
; cd:LST_ReverseItems - Zamienia elementy miejscami / Reverse the elements in places ;
; ;
; [SSX] ===================================================================================== ;
; cd:SSX_Convert - Zmienia PICKSET na liste obiek. / Convert PICKSET to list of obj. ;
; ;
; [STR] ===================================================================================== ;
; cd:STR_CountChar - Liczba wystapien znaku / Number of occurrences of a character ;
; cd:STR_FillChar - Uzupelnia lancuch tekstowy / Complements the text string ;
; cd:STR_Parse - Dzieli lancuch separatorem / Divide string by separator ;
; cd:STR_ReParse - Laczy liste lancuchow w lancuch z separatorem / ;
; Combines a list of strings in the string with the separator ;
; cd:STR_TableNameAuto - Tworzy automatyczna nazwe / Creates automatic name ;
; ;
; [SYS] ===================================================================================== ;
; cd:SYS_AcadInfo - AcadInfo np. ("AutoCAD" 18.0 64 "PL") ;
; cd:SYS_CheckError - Sprawdza dzialanie funkcji / Checks proper operation of the func. ;
; cd:SYS_CollList - Zwraca liste obiektow / Returns a list of objects ;
; cd:SYS_FilesLoader - Wczytuje pliki lsp,fas,vlx / Loads files lsp,fas,vlx ;
; cd:SYS_FontPaths - Lista sciezek do czcionek / List of paths to the fonts ;
; cd:SYS_GetDateTime - Zwraca date/czas systemowa(y) / Return system date/time ;
; cd:SYS_GetSymbols - Lista symboli LISP-a / LISPs symbols list ;
; cd:SYS_Msgbox - Standardowe okno komunikatu / Standard message box ;
; cd:SYS_ReadFile - Czyta plik tekstowy / Read a text file ;
; cd:SYS_RW - Odczyt/Zapis danych w rejest. / Reads/Writes data to the registry ;
; cd:SYS_UndoBegin - Poczatek grupy operacji / Start of group operations ;
; cd:SYS_UndoEnd - Koniec grupy operacji / End of group operations ;
; cd:SYS_WriteFile - Zapisuje plik tekstowy / Writes the text file ;
; ;
; [USR] ===================================================================================== ;
; cd:USR_EntSelObj - Wybiera zadane obiekty / Select a desired object ;
; cd:USR_GetKeyWord - Pobranie slowa kluczowego od uzyt. / Get a keyword from the user ;
; cd:USR_GetPoint - Pobiera punkt od uzytkownika / Gets point from user ;
; ;
; [XDT] ===================================================================================== ;
; cd:XDT_GetXData - Czyta dane dodatkowe XDATA / Reads additional data XDATA ;
; cd:XDT_PutXData - Dodaje dane dodatkowe XDATA / Adds additional data XDATA ;
; cd:XDT_RemoveXData - Usuwa dane dodatkowe XDATA / Removes additional data XDATA ;
; ;
; =========================================================================================== ;
|
评分
-
查看全部评分
|
楼主: Lispboy
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园
( 辽ICP备15016793号 )
窥视卡
雷达卡
已领礼包: 
财富等级: 
发表于 2013-6-3 19:48:33
发表于 2013-6-3 20:02:17
请点击此处下载
