创建等轴测坡度图案填充

tmelancon · 发表于 2022-7-5 18:31:04

大家好，我主要在管道行业工作，我们不使用Autocad 3D Plant，因为我们不在设计行业，而是在维护行业。也就是说，我们没有管道坡度图案填充功能。有关坡度图案填充示例，请参见照片。

我们用这个表示45度，45度和90度的肘部。如果有人能插话分享一些对我们有帮助的东西，帮助我们快速自动创建这个舱口，我将不胜感激。

ROBP · 发表于 2022-7-5 18:34:52

你试过用板条舱口的区域吗？

rlx · 发表于 2022-7-5 18:37:44

我自己从未使用过iso，但我为我的同事编写了一个程序，RlxIso。如果我有空闲时间，我可以问他们这应该怎么做，也许可以更新我的程序（如果他们有兴趣的话）。在我看来，它就像一个等距三角形，用户图案填充为90度。现在，我正在工作的工厂正处于重大停工期间，所以不确定我是否很快有时间。

gr.Rlx

rkent · 发表于 2022-7-5 18:43:38

也许可以进一步解释一下基本bhatch函数无法提供的功能。无论iso是2d还是3d视图，bhatch都可以正常工作，所以我猜你想要更多？

tmelancon · 发表于 2022-7-5 18:45:39

为了澄清，现在我的办公室必须手动绘制直角三角形（即使用简单的直线命令或偏移命令），然后根据角度是垂直角度还是水平角度应用阴影。

我的问题与lisp有关，lisp可以自动创建三角形和图案填充（我应该在标题中更具体一些，但AutoCAD Plant 3D就是这么称呼它的）。然而，由于这是基本的cad操作，我们可以整天手动绘制、修剪和填充这些图形，没有任何问题。失败之处在于，在整个管道回路中有几十个角度，每天都有几十个角度需要完成。

我需要有人来帮助与lisp例程自动化三角形和阴影在一个或两个点击。这是我的程序的屏幕截图来展示示例。第一幅图像取自AutoCAD Plant 3D，仅供参考。

[img]https://www.cadtutor.net/forum/image/png;base64，Ivborw0kgoaaaansuheugaaataaaajmcaaaabckqbzaaaek0leqvr4no3d23ljulifqp//T3Me5JHdsi4sEgBRqMw4D2dPu2UQwHKvKN++ngbcvr6uxghkizyaqohxiknqjdcaxfiakcec2aaaekrwqzyaqohxiknqjjjjqohxiknqjdcaxfiakc2aekrwzyaqohxiknqjjjcaxfiakc2aekrwqzyaqoqohxiknqjjjc2aqozi8sannkm+9zkm520yqpy5dfa77njawjydxjeiq1eiq1 AKMIBCWIDEKRWQJZYAQPHBANNGBBCGFEIQ1AKMIBCWIDEKRWQJZYAQPHBANNGBBCGFEIQ1AKMIBCWIDEKRWQJZYAQPHBANNGBBCGFEIQ1AKMIBCWIDEKRWQJZYAQPHBANNGBbcgfeiq1akmibcwidekrwqzyaaqphbangbbcgfeiq1akmibcwidekrwqzy/OPLxxHgIx8oIE5sHn19fakdwDs+RECc2DyndgAv+eAAcWLzjtoBPOHDAsSJzWc6B/aphxmgtmx2meoafhoahfie6b2anummaryhomdkb1pgjangcphnnaxeipcwjznfehcx4edc2niumdlradifmaffb5h2k6ddglpc6cblijrytzdq3mholfpzrb9cjpeoc2dsd6zbzbzbzzzzzzzkyltqnww JT0QJZYD6RYWJTGGOLHPY6GDFITUECC2I6GDSBRXHJIXGUFTGEIMSSJZWG6QNXRANNHCW6ODC5BFixoyyagdkjbkQJZYXUGHG5MFOLGZS4BMQgsxinnliw6ia1rhtixmyvaaqkikcsjyzudpiaeekc2mxl54bjysbeic3ujdpgrijwktgnobc5fhibobnnqomiukqpzyjknzwpxeeolejh+jDriYAEKc2GSldsBlRA/ixcy3nqmuihqjzpgxxaabihwkcludxpe1ibobpagdmikuzzylejngl5edolezk1ghdcc2km7yauxarixgz9agc0jlaqjjjzzv6qjdrbgyqcgrxilnowohncvbecc2nyz6kwu2jhpstzmn1t5s5ms 2Eqcbpebrfxzspu3uosarwye4salurlehpcayecc2bjvaashcanfiww+1A3YRE4gTGx7pHPCBjECc2PCEUQe8Ix0QJza8pHbAc3IBcWLDB2ohpjiiibmbbdte54ic4qjzysjdrb3wtbigtg2ludla44acx4qidg9lcf4gtgw4y6qaunx/ixizt1a4qcuchtmxoxoqo2gfrfrc4ssgznqndviu5sammogxjccogtg9pto1ic6w1xykmvagflcrehtmzos+dgqw41xikn3rl1sbr3gelehkhudtbhjkoc2dcu2sek3ggiexsuohoqmwsmcwldnyw6smzvhtix4upqbym5tbannlxp7saz1xizz6byk4a5c5cnngweamocnbliu5smiziz4smiziz47AWEZCT4Gtggyalczavlxpizi5gxuwkdcs4ssg2akdtmephlixszharbd5olqx1slwdw0mzztwo5z7hhmzjnnomhlrs5bwe4hiknyuw36qagnxdixiau1A6U5O5BNIQMNRBNDW6IBMB0TM5GM2VGZixyqvghqzlskgc2laotynbxdoiextwo3bqsnqsgcwldmnqonk7ie5swjzrb724vxannixo7aa9nwrixiys1A5ACPCGTMworoegdrcj4ssgwow6Amavgjixosk1ngchogg+psozjity4sae6nymwdwbixamoghwybobocb2sfe7gneiq38q+fgm5ce4sqghl18ihraxfia8+phbzkykcc2ma7agdpubiqjzbwmc7bpg 9 whibmb2mwogx9uassjdqsohwybwgfhia2eqr3vox2iexs4soeoy9fdnnjacuydrtl0ibmboevtkmdxq5zyqbtqryeoguleblrsoupwyhanntcyucf6nc/Eic0nPrImsoimz1g7zltpxm920iypyjphal3pjg06mrf2cj4zhtixge50jtu4uigtgxjbqgmpjhlixabgutsw4rahtmxgnj0jpscicwidzdqym3zqzzywgxujqycgsjdvxm7cheugc2maudi5mhbeiq3mwqgjdccecwidc1e7enbaecc2mco1qobulebualc0zkucc2mdujdpm5eqgtmwgabvjls4c4sqg0thto76egbo8qmwpxiknjpoqdqdytgfzytfzyt4sqg8vlbidqqdqdqdqyqfffzy62dbwjjdsicwidwd0lxp62oxo0yq8htmwgt2jbudgasicqjzaq24hcoxoczqmhtmgswntq+e4wzcnnhaygrhnwwwgxiknjkzwxmmgqpzyqgikxzvsjdssmcmcfzdbkKC2EBICSC1BCDEIQ0KPNBCWZCNHABGRGHBWWGXIKN5GBICQG7B3FIA+kdqxpqx3H2DeLEBlZweKqhcxxh0yBObGARhz+HYTQRZRSSGTMXGKAGQ8FCV9L7EIMWUXI2NJZQOYJPHWHSF56OD86ZKWBQLO2AX5MTTTBHAP6AQHPMYF5ANNGAT8W16pinnye4SQFEUEUESYCQJZBAB2HI7SBCWID7KJZ/LAVECC2WF5GHD9SASSJDRCJCCCIDCCIDYDYAEEURH1LHXXOEBVGUKKDO+ZTwzliA5xScdRR7XmhBbEBGqhVO+o8kbqjnkazvphhwee1sqgagz9zrh8a0ihygo0t/ioY+FHg27EBuhl2dqx5ENBZ2ID9LVg51jviaA/sQG6W23UsdKzwChiAWyytu1y4ylgllebhlqhdmrfp1xbbial5o4cqrcpfxbeb4bqjrx1jlw2xehvgsilrr7ofwtebreshtqrakwdbzpgmc2rzj8sebiappgkbm8ibr4gnmawfa9ymnsd1mrwntegai8qguj7cacstg+biydrgpndaewidezhgarebrraxkrxwhngal0nzafa44qg+AyCgfUITaf+mgyge0ey7j9zto2trc7mfeherhjy7tez8cgxgpnwg8idbabrk3jugcpebhgtg D9Vyfa44qmya0rqokehsgkhst41n4yajxayysugamsqgggeftrephhce2adjkbxqltgagyzsnjafa44qg2ceddrgpndaewidjkbwqhfia3s3Vnvyfa44qmya7hqoqgyavlzrg5vcaueidcxwgfscgfq1yjtyram44aixaxpzs21scgccitzalwohccc2qbflto1n4yajxaboqueafhmbol2v28amcmarygm0tnjb2bqooejsgmyudavsqfawr9tbaohhce2qetnckaaspjltsqgaodk2fa5ymngazgcwctia7rx/pmpcgcstgyabk52byudlic2qannvlzu4ycfiq1wvppxvnxgsflomemygoc1epbyruowjyalt8pbm1/cebcgcstgyad55wJYFACF3/zPeWVZJ8xkbGykdACbPEaZff7YNg53jr9/8FF1PT3KARD2ZGKPYEBBMIBVLGZBRZRHJ8LX7SYRBNMiJBAC6G2EE0CX8++/kPhgDV9feWJNzCcwvFSlnXC5b6+7nkRG+CJA21jf+e4v5nCAcv6VTW+/8NVKwFm1q9w/H4bhQPW9CwjYgM8oXC8k2WdMN6fwcbPnwxeCZBCp8LxvmEoHJDY66rx/EFDVGIKONC8K2WDMMANQVH9VGNWQTTO3D8/VOFA9LbHQexAZ5QON7Jsk7oat9g4+fN+60ESK132/j7HxUOyCFYNb7/Uo+VAAtoWDhe/ZHCAFKCVF9IA7ZUDBZ X978RHDC1Q4ONN7/dcCXAYrqON/7+kcIBkzpXNb5fo8lKgIWdmW1sCgek1qJqfL9Sk1cBFtapbfz9U4UD5tL0qosN8M6ZEhCtIwoHzKLdYOPnJdu+HLCSkw1A4YB8OlSN7xfu8aLAGrqON/6+jcIBV+pWNb5fvt9LA6n1Hm/8fRuFAy7T/1aLDfBc7/HG3zdTOOACnQcbP+9NWPSA0HKW3VJ7ZGOHDWQANY/t2HvCUjk5HhD4YCpja0a3+9z8PsD5nf+KYKKB8ZROGSNSA/MNWYREGAGV0x2PH551E9Y2BOTB5WVOGAUVXANB6XCO27B6MTFFC6YXQRV42AKRQCTAPWTSAOHGMUZOBRNFXWWIUJBRRUNYNURTUAF2RK74UDRJMFxJZSY1AEO1/BMICGYNAQCCTPVYOBHMV9Cuyudrpv+Ws6+PmCA5r82ReGAceYebNwlWOLFMpxiejZ5jBf73OPXptQtHFkeITWbfNe1arR+zccg1fx4rbb1cwemkwsq8vuy5qjtdfqtsaohdjtzbqcnnbev99br3bafwkhg3dZ1w2c1+OTKaFXVjhgr8xV4yb36oHD+o039r+4WGGG7LHHLVNGG4IB+4439L65wwAf5Bxt3izwGENJ1vLH/9RUOEGMHQNGZ1MAO3UDB+x/fYUDnliuatws+EjAe73HG/VFHCIBJ9EXCS+GPDUgLZx+M0UDkpbdLBxt/KzAX+d/GSKWRFTGCGETRV41BTZ/QuDu/HHDDG2HYN2ALSNYRPCWLZU4DG2HYNGIL2KWK8LLTX56G8G 2FY9VK/TTBE5UGG3FLHHJKAVKTSARHTIKCNFCYATWFWYOPTU3PYGC26ZWCEJHQNFT+uGhiIbfCqtwbJvCQZw7o3BABQ1/rqjCsW3+8SCi/GDjzi7A4tr+pC+FY9sUDvZRNf5lL2BxbX9tisKxbQoHn6gaz9grwfnzh2sucgybwsfrscl9gw1epxpigc2+zff4w2hjl1scyfi5esqytyvsnhwqrkntb4vvolzneaxvwm32wrravu1otgxvtggowu2isfoe7jf2vrhcwoionopfc+o03tj/ygohy1jrsjp+4439l65wscbv4xx7b0vp2jb2v77cwoc+ml2jaiciyqzz00ybdrie2edfrug/vfhclbclsnplrkpf14qoteofg4k45dzskcxiwj95sphezz BYKMPEWORON82FI6Aloskstxoaezoosgbbpiyk+3zmoVjsk3+me3cjlnscy7pxtvsgkhlkdjjj1nmlbztyrjodnkgq9hlsk/j14oqhafz1slhpocyci2g3fp9rajcezblnbyhagxnuyG3Vt8Kq3AEZFknT6kaF7HpkFjDb4VVOAKyrJO/nn11bd1k1bygcavnwyw8gg1ez+5CVwnGZLOvkRtWYgzOAlJr/xfgfiydlole1zuikxmvzzf4qjiss7ihnknakafk0+pxpigcavnwwzbbxpqccett47fckhwbdzzkkoxmqdbyxrbakr0cwdzaiakzp8uam/x4hvicrikgwddtirdbwszkjwtchloisw2mjdouea/drG/hdXOLZN4ZiDqpGN04I0enytaPTFFY5tUziupmrk5Mwgh67jjf2vr3Bsm8JxKZuflpODBHq3jf3vQuHYNv/mXcRgIzmHBwmc/GSKwtFYlnUuQ9VYgiOE2Q0Yb0zyZgoHj1SNhThImJ3CMZ0s68zOPq/FccLUzreNGZrEzjdTOPhmsLEiJwpTO/+tsdm0iz1vpncgaizmuck8mnwyzyymsfpfnfi7qbozsnc5mqtwxbszqjd6+2f5P/uwh0vkzmngowahdpioujmrv4ybdgmemapthmgfdb8zzflcsefpn02brnypx2dcj5qtyshgxd6vz8me1upiytpff/dgbijd9w4yb7+axlsvoxuytptfyvspijhapxs8zjkdqobsys7nf67ojivjkapxs9kjkfqohdavb7+2Pr8FPPLC8c6g427xR6nN9vFtm0KB4z3t2o81I4zr7zzP455swWrxs2SD9WDwQa/UAQFSSAZTB5FDU42TLE/cWf//72LZSXJJWRXS2BR1V4QUO6VG2BPEBERFXZSMMJOTnH4n+rPhePQXz/WZU3JC0/eG+ZavCCawGDhApH9B/sN28/snCsXzVuKjzjMXaG11wOGCHaNkL/cn8sAedf5OObVakaN3WedD+DDT5xP2CEtQtHoapxU+1531M12Mctge6OtY1WRaFr4ag12Lgr+MHPQRPEUCVQ3ZKFO2JVUCNCN74L/ZBILCGOJUCOFOUIZ6FI66VEPG4XFFFAQAAC7TOVJ54YHEEGO3JA2WOVD1EAEVWE6U3C80FDNVI0FBFDB1EA0FWFW i6u3c8sbuohkrgo2q7ue156cm1ghhyfg5v44k6e2kwqttueozqvg1s/T+lyrdxuovtuvozx2cgridlxjg7u3r9wgd7ckbmnbnrzuhupv+gzhlvr40biauwvdnwbw8/cybc15k7ZLBBZ64XDNWqbWxNC4eqEbPYXqkaDOGSwTgP/6hhwp//qBv/X3T1WNsJV2bKVnYW6uGoxz8p/25oVD1ThojX0z2GAstw0Gads29r/g0zcz2Dgl+9apglzbnynbjikqkydetdq1ea6bh6m0lxt7h/NA19nygdJtzHpslmF+wfd9Wgb+1/26/+feqztnujw02miarcn1dxhujcys7aeqwtrcroiru9vy88qri8pdlxvydyd KUI/R1VeFQNTqaf2/nXyH1uJTQUb+28EZPDTA6M3L7DTAYLXSJHQ0UHKRGIGHNUSQB3NxO6KVR2/J7BQRGOLTTAPBU4ODNG7BFX+G4ON0aba7akWA6+5qdDFmQaws0BEf/cbzUyy5wYbpOKyQntjxhuqxmUu33lVg4RcWWhv8FdvMNqF+69qkJaLC42dbxvvf/aGtnG9q47A0ZOZ6wstnW8DryqFqjGR8QdhsEF+Y2+wwAxgk8c49/tNXr/Q19MXKVO1PN3QQSBUDWM3EEV2GQTDMIO1ZDUPPXC+AJT2ZSRUG7W4ZDBM28KHASXRWLK4EPTKMBB8ZRDWYXDDFTMDHGUA41TNHJ8YLMQTmqroszewgblP92Kupzy1Kmav7P6FSK2P9 7wi6eglx0ogvadzjnlq2ozgcdstx1oevdqoj8oasa1opgwykkr0und92dost3ho7tnoo6fo4ggxtm6snxckdrb85d1aa8aycdti26qkevasc2bqohkhktllb/9N0T+j8wwwbekr2l7tt9ga/4lDxCmbVT3/gKoGvCMVECYwlHdqwugasBrsgEx2gbPW4WLAW9JCARoG6XdBhgP/7cZbMAuQgIBCkdp99P//f+4ercpqmbe2kz1dz1daiyg9fi7qnk44gh2kbxbrngyharyddpgv0ujuqe9gy3anatfvhm2yjt4btr/n6xcrcdtma7x19f2kzpfuqgnci28jyqd2bayalaxfia49ujeo+fq7E9YA4sYF/qbrv7fxnsecq2ma3g43q9n8rqhsccwid4qf qkz50e83cvsgtmyottuo7di3trozecc21gwud3h03dtie5sqejvqo7kz+xyesbobd7xkwwagztcumqufffdfmvx40devyjmhsmljtn5nx0yhdasgw6oqcx8piehskkh0yiotduvwlybficqlFdj1+x5kZBnNiwLFWjun6/zdW9gjixYU2qRmm9f3G82wVxYsNqDDaqG3D6LhjEiQ3rUDWq6z3Y+P2ogccxyrgqrmndqsb93qfbykn6bhvjt99w3ixibevi3qbg82fr9fiehsenvqo6qnf/70cq2jcqqlhatvjvjvgygsgzixgcjuklof5jqpiqw6qnuzddbu5lkj5ce2dpx1s+ivdf0vu5uqatzmth7iqgwy4eut939x2ckzzorv4 2BOVCXIBU3RENV7XDYKO6MU9/5rXBrMSGvna2jd/1QtWobtrBxt3ky4MpiQ0dhdrGrWSoGqXNXzVuUiwSJiM29BJtGwYb1SU6/URLhWmIDb0oHOyVZbBxl2u1MAexoZdjhUPnqCVd1bjJuGa4MTJQI8LBO0MRXK3ELCN1XIYUDRCNHAOE7KECFF1WBBGHC4WD51IPNU4WEAQYTMZOREHGH2TUJZTLHGGEHT6U

tmelancon · 发表于 2022-7-5 18:50:04

登录/注册后可看大图

zaphod · 发表于 2022-7-5 18:52:08

dymanics perhaps?
ISO hatch.dwg

Lee Mac · 发表于 2022-7-5 18:53:52

This looked like an interesting program to write - please try the following (adjust the settings at the top to suit):
[code];;----------------------=={ Isometric Triangle }==----------------------;;;; ;;;; Prompts the user to pick two points at a non-isometric angle and ;;;; proceeds to construct a hatched isometric right-angled triangle, ;;;; offset from the two given points by a distance specified in the ;;;; code. ;;;;----------------------------------------------------------------------;;;; Author: Lee Mac, Copyright © 2015 - www.lee-mac.com ;;;;----------------------------------------------------------------------;;;; Version 1.0 - 2015-10-06 ;;;; ;;;; - First release. ;;;;----------------------------------------------------------------------;;;; Version 1.1 - 2015-10-10 ;;;; ;;;; - Removed restriction on non-isometric angles (e.g. 60 deg). ;;;;----------------------------------------------------------------------;;(defun c:isotri ( / an1 an2 div err hat hpa off pat pi6 ply pt1 pt2 scl spc vt1 vt2 vt3 ) (setq off 1.0 ;; Triangle offset pat "ANSI31" ;; Hatch pattern name hpa (/ pi 4.0) ;; Hatch angle scl 0.1 ;; Hatch scale ) (cond ( (not (and (setq pt1 (getpoint "\nPick 1st point: ")) (setq pt2 (getpoint "\nPick 2nd point: " pt1)) ) ) ) ( (progn (defun div ( x m / r ) (setq r (rem x m)) (or (equal 0.0 r 1e-6) (equal m r 1e-6)) ) (setq an1 (angle pt1 pt2) pi6 (/ pi 6.0) ) (and (div an1 pi6) (not (div an1 (+ pi6 pi6)))) ) (princ "\nCannot generate triangle for isometric angle.") ) ( (or (

tmelancon · 发表于 2022-7-5 18:57:04

Humm I tried your code lee. I am selecting both end points of the line I wish to create the hatched triangle for but keep getting the message- "Cannot generate triangle for isometric angle."... In our industry we draw strictly in isometric and these are indeed isometric angles. However, when I draw lines straight up and straight right(90 and 180 degrees) then run the code and pick my two points, it pops in a isometric triangle like what is shown in the image that I will attach.

登录/注册后可看大图

tmelancon · 发表于 2022-7-5 19:01:14

Now here is the depiction of what we would actually need.. Thanks again for everything by the way this is extremely generous of you. Excellent hard work!

登录/注册后可看大图

[编程交流] 创建等轴测坡度图案填充

发表回复

精选推荐