CAD中LISP程序使用方法Word文档下载推荐.docx

CAD中LISP程序使用方法Word文档下载推荐.docx

《CAD中LISP程序使用方法Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《CAD中LISP程序使用方法Word文档下载推荐.docx（19页珍藏版）》请在冰豆网上搜索。

CAD快速切换图层LISP代码（方法2）

给楼主发一个图层更改的lisp程序，按对应数字键就可以切换到相应的图层。

很方便。

0————0

1————OBJ

2————6t

3————SCETR

。

8————BORDER

如果这些不是你想要的图层，将lisp用笔记本打开，把里边的OBJ，6t等图层名改为你想要的就可以了。

以后要切换图层时，按相应的数字键即可。

（defunYH_chlayer（YH_layer/YH_S）

（if（null（tblsearch"

LAYER"

YH_layer））

（entmake（list

'

（0."

）

（100."

AcDbSymbolTableRecord"

AcDbLayerTableRecord"

（cons2YH_layer）;

图层名称

（70.0）;

图层状态

（62.7）;

图层颜色

（6."

bylayer"

）;

图层线型）

（setqYH_S（cadr（ssgetfirst）））（ifYH_S

（command"

CHPROP"

YH_S"

"

"

la"

YH_layer"

c"

（setvar"

clayer"

YH_layer）

（princ）

）

（defunc:

0（）

（YH_chlayer"

0"

1（）

OBJ"

2（）

6t"

3（）

SCETR"

4（）

HIDD"

5（）

DIM"

6（）

DASH"

7（）

TEXT"

8（）

BORDER"

））

#Cad

到上面一行为址，保存为lsp格式。

LISP小程序,改变对象颜色;

;

数字1

（defunC:

1（/gp）（setvar"

cmdecho"

0）（princ"

\n?

改变对象颜色为红色?

）（setqgp（ssget））（if（/=gpnil）（command"

.change"

gp"

p"

1"

））

（princ"

\nOK"

）;

enddefunC:

1

数字2

2（/gp）（setvar"

改变对象颜色为黄色?

2"

2

数字3

3（/gp）（setvar"

改变对象颜色为绿色?

3"

3

数字4

4（/gp）（setvar"

0）

改变对象颜色为青色?

4"

4

数字5

5（/gp）（setvar"

改变对象颜色为蓝色?

5"

5

数字6

6（/gp）（setvar"

改变对象颜色为紫色?

6"

6

数字7

7（/gp）（setvar"

改变对象颜色为白色?

7"

7

数字8

8（/gp）（setvar"

改变对象颜色为深灰色?

8"

8

数字9

9（/gp）

改变对象颜色为灰色?

（setqgp（ssget））

（if（/=gpnil）（command"

9"

9

（英文版）

Tworegulationspromulgatedforimplementationisinthepartyinpowerforalongtimeandtheruleoflawconditions,theimplementationofcomprehensivestrictlystrategicplan,implementationinaccordancewiththerulesanddisciplinetomanagetheparty,strengtheninner-partysupervisionofmajorinitiatives.Thetworegulationssupportingeachother,the<

code>

adheretoapositiveadvocate,focusingonmoralityisofPartymembersandPartyleadingcadrescansee,enoughtogetahighstandard;

<

rule>

aroundthepartydiscipline,disciplinaryrulerrequirements,listedas"

negativelist,focusingonverticalgauge,drawthepartyorganizationsandPartymembersdonottouchthe"

bottomline"

.Here,themainfromfoursquarefacetwopartyrulesofinterpretation:

thefirstpartintroducestwopartyRevisedregulationsthenecessityandtherevisionprocess;

thesecondpartistheinterpretationofthetwofundamentalprinciplesoftherevisionoflawsandregulationsintheparty;

thethirdpartintroducestwopartyregulationsmodifiedthemainchangesandneedstograspseveralkeyproblems;

thefourthpartonhowtograsptheimplementationofthetworegulationsoftheparty.<

and<

Regulations>

revisedthenecessityandrevisedhistoryoftheCPCCentralCommitteetheamendmenttotheChineseCommunistPartymembersandleadingcadreshonestpoliticsseveralguidelines>

ChineseCommunistPartydisciplineandPunishmentRegulations>

column1by2015tostrengthen

partylawsandregulationsfocus.TwopartyregulationsrevisionworklastedaYears,poolingthewisdomofthewholeparty,ideologicalconsensus,drawhistoricalexperience,respectforthewisdomofourpredecessors,whichreflectstheunityofinheritanceandinnovation;

followthecorrectdirection,graspthelimitedgoals,adheretotheparty'

sleadership,tosolvethemassesofthepeoplereflectafocusontheproblem.Thenewrevisionofthe<

reflectstheparty'

s18andtheeighthsessionofthethird,thespiritofthefourthplenarysession,reflectingtheexperienceofstudyingandimplementingtheGeneralSecretaryXiJinpingseriesofimportantspeech,reflectstheparty'

seighteenyearscomprehensivestrictlypractice.（a）revisedtworegulationsofthepartyneedof<

theICACguidelines>

in<

in1997LeadersasmembersoftheCommunistPartyofChinacleanpoliticscertaincriteria（Trial）>

basedonrevised,thepromulgationandimplementationofJanuary2010,tostrengthentheconstructionofthecontingentofleadingcadresplayanimportantrole.Butwiththepartytomanagethepartystrictlyadministeringthedeepening,hasnotbeenabletofullymeettheactualneeds.Contentistoocomplicated,"

eightprohibition,52arenotallowedto"

hardtoremember,andalsodifficulttoputintopractice;

thesecondisconciselypositiveadvocatedbythelackofprohibitedprovisionsexcessive,noautonomyrequirements;

thethirdisbannedtermsanddisciplinelaw,bothwiththepartydiscipline,disciplinaryregulations

repeatandCriminallawandotherlawsandregulationsrepeat;

thefourthisto"

clean"

thethemeisnotprominent,notfortheexistingproblems,andisnarrow,onlyneedleofcounty-levelleadingcadresabove.<

isin1997<

ChineseCommunistPartydisciplinarycases（Trial）>

basedonrevision,inDecember2003thepromulgationandimplementation,tostrengthentheconstructionofthepartyplayveryimportantrole.Alongwiththedevelopmentofthesituation,whichmanyprovisionshavebeenunabletofullymeetthecomprehensivestrictlyadministeringthepracticeneeds.OneisJilaw,morethanhalfoftheprovisionsandcriminallawandothercountrieslawsandregulationsRepetition;

twoisthepoliticaldisciplineregulationsisnotprominent,notspecific,forviolationofthepartyconstitution,damagetheauthorityofPartyConstitutionofmisconductlacknecessaryandseriousresponsibilitytopursue;

thirdisthemaindisciplinefortheleadingcadres,doesnotcoverallPartymembers.Basedontheabovesituation,needto<

thecriterionofacleanandhonestadministration>

thetwoislikelytobemorerelevantregulationsfirstamendment.Byrevising,reallyputtheauthorityofPartydiscipline,theseriousnessinthepartytreeandcallupthemajorityofPartymembersandcadresofthepartyconstitutionofpartycompassespartyconsciousness.（II）twopartyregulationsrevisionprocesstheCentralCommitteeoftheCommunistPartyofChinaattachesgreatimportancetotworegulationsrevision.XiJinping,generalbooksrecordedintheFifth

PlenarySessionoftheeighthsessionoftheCentralCommissionforDisciplineInspection,ontherevisedregulations<

>

madeclearinstructions.Accordingtothecentraldeployment,theCentralCommissionforDisciplineInspectionfrom2014undersixmonthsbeginstudytworegulationsrevision.TheStandingCommitteeoftheCentralCommissionforDisciplineInspection4reviewrevised.ComradeWangQishan14timesheldaspecialmeetingtostudytworegulationsrevision,amendmentclarifiesthedirection,majorissuesofprinciple,pathandtarget,respectivelyheldaforumwilllistentopartoftheprovince（area）secretaryofthePartycommittee,SecretaryoftheDisciplineInspectionCommission,partofthecentralministriesandstateorgansDepartment

Thefirstpartycommitteeismainlyresponsibleforpeople,viewsofexpertsandscholarsandgrassrootspartyorganizationsandPartymembers.ApprovedbytheCentralCommitteeoftheCommunistPartyofChina,on7September2015,thegeneralofficeoftheCentralCommitteeofthePartyissuedanoticetosolicittheprovinces（autonomousregions,municipalities）Party,thecentralministriesandcommissions,stateministriesandcommissionsoftheParty（party）,theGeneralPoliticalDepartmentofthemilitary,every3peopleorganizationofPartyoftworegulationsrevisionopinion.CentralCommissionforDisciplineInspectionofextensivesolicitationofopinions,carefulstudy,attracting,formedarevisedsentreviewers.InOctober8andOctober12,CentralCommitteePolitical

BureauStandingCommitteeandthePoliticalBureauoftheCentralCommitteeAfterconsiderationofthetworegulationsreviseddraft.OnOctober18,theCentralCommitteeoftheCommunistPartyofChinaformallyissuedtworegulations.Cansay,twolawsamendmentconcentratedthewisdomofthewholeparty,embodiestheparty.Second,<

revisionofthebasicprinciplesoftwopartyregulationsrevisionworkandimplementthepa