AM, PDMS CLIPPING
aid clear all !rangeplus = 100 !modelref = !!ce -- ce volume check !vol = object volume(!!ce) -- from Position !volFrom = !vol.from !volFromX = !volFrom.east !volFromY = !volFrom.north !volFromZ = !volFrom.up -- to Position !volTo = !vol.to !volToX = !volTo.east !volToY = !volTo.north !volToZ = !volTo.up !xlen = abs(!volFromX - !volToX) !ylen = abs(!volFromY - !volToY) !zlen = abs(!volFromZ - !volToZ) -- center position !cenpoint = !volFrom.midpoint(!volTo) -- Geometrical Box !box = object gmfbox() !box.orientation = object orientation('Z is UP') !box.position = !cenpoint -- aid box !xlen = !xlen + !rangeplus !ylen = !ylen + !rangeplus !zlen = !zlen + !rangeplus aid box num 1 at $!cenpoint xlen $!xlen ylen $!ylen zlen $!zlen filled off -- length !box.xLength = !xlen !box.yLength = !ylen !box.zLength = !zlen -- volume !clipVol = object volume(!box) !!gphViews.clipboxElement(!!gph3ddesign1.view, !clipVol) !!gphviews.rotate(!!gph3ddesing1.view, !box.position ) -- aid text !clipVolFrom = !clipVol.from !clipVolTo = !clipVol.to !clipVolPos[1] = !clipVolFrom !clipVolPos[2] = !clipVolTo -- ship grid !shipGrid = object shipGrid() do !p index !clipVolPos !shipPosition = !shipGrid.shipGridPosition(!clipVolPos[$!p]) !shipPos[1] = !shipPosition.xPrefix & ' ' & !shipPosition.xGridLine & ' +' & (!shipPosition.xoffset.value().string('d2')) !shipPos[2] = !shipPosition.yPrefix & ' ' & !shipPosition.yGridLine & ' +' & (!shipPosition.yoffset.value().string('d2')) !shipPos[3] = !shipPosition.zPrefix & ' ' & !shipPosition.zGridLine & ' +' & (!shipPosition.zoffset.value().string('d2')) !shipPos[3] = !clipVolPos[$!p].up.value().string('d2') !shipPos[1] = !shipPos[1].replace('+-','-') !shipPos[2] = !shipPos[2].replace('+-','-') !shipPos[3] = !shipPos[3].replace('+-','-') !br = ' ' !grids[$!p] = |$!shipPos[1], $!shipPos[2] $!br $!shipPos[3] ($!shipPos[4])| enddo aid text '$!grids[1]' at $!clipVolFrom aid text '$!grids[2]' at $!clipVolTo
'AM, PDMS PML' 카테고리의 다른 글
AM, PDMS FORM (0) | 2021.12.13 |
---|---|
AM PDMS EDGPACKET - EQUI MOVE (0) | 2021.05.20 |
AM, PDMS CE VOLUME CHECK (0) | 2021.05.10 |
AM, PDMS SESSION으로 HISTORY 보기 (0) | 2021.02.25 |
AM, PDMS LINE OBJECT (0) | 2021.02.17 |