User contributions
(newest | oldest) View (newer 50 | older 50) (20 | 50 | 100 | 250 | 500)
- 07:09, 22 April 2017 (diff | hist) . . (+1,036) . . N KeepTrimOrientation (Created page with " Function KeepTrimOrientation(TrimObj As HybridShapeTrim, nthSmallest As Integer) As Boolean Dim UVal As Integer Dim VVal As Integer UVal = -1 Dim WinningArr(3) Dim Winni...")
- 07:08, 22 April 2017 (diff | hist) . . (+647) . . N KeepSplitByArea (Created page with " Sub KeepSplitByArea(SplitSurface As Variant, ForSmaller0ForBigger1 as Integer) Dim Pt1Meas 'As Measurable Set Pt1Meas = thespaworkbench.GetMeasurable(SplitSurface) Dim AAr...") (current)
- 07:08, 22 April 2017 (diff | hist) . . (+1,423) . . N KeepSolidSplitByVolumeInPart (Created page with " Sub KeepSolidSplitByVolumeInPart(SplitSolid As Split, ForSmaller0ForBigger1 As Integer, CurPart As Part) Dim Ori Ori = SplitSolid.SplittingSide Dim OppOri OppOri = Not Sp...") (current)
- 07:08, 22 April 2017 (diff | hist) . . (+943) . . N KeepSolidSplitByVolume (Created page with " Sub KeepSolidSplitByVolume(SplitSolid As Split, ForSmaller0ForBigger1 As Integer) If IsUpdatable(SplitSolid) Then Dim Pt1Meas Set Pt1Meas = TheSPAWorkbench.Get...") (current)
- 07:08, 22 April 2017 (diff | hist) . . (+541) . . N KeepSolidSplitByIntersection (Created page with " Sub KeepSolidSplitByIntersection(SplitSolid As Split, CompareObj As Variant) Dim Ori Ori = SplitSolid.SplittingSide Dim OppOri OppOri = Not SplitSolid.SplittingSide I...") (current)
- 07:07, 22 April 2017 (diff | hist) . . (+478) . . N KeepSmallestSplit (Created page with " Sub KeepSmallestSplit(SplitSurface As Variant) Dim Pt1Meas 'As Measurable Set Pt1Meas = thespaworkbench.GetMeasurable(SplitSurface) Dim AArea As Double AArea = Pt1Meas.Ar...") (current)
- 07:07, 22 April 2017 (diff | hist) . . (+712) . . N KeepSmallerCurvePar (Created page with " Sub KeepSmallerCurvePar(CurvePar As HybridShapeCurvePar) If IsUpdatable(CurvePar) Then Dim CMeas Set CMeas = TheSPAWorkbench.GetMeasurable(CurvePar) Dim F...") (current)
- 07:07, 22 April 2017 (diff | hist) . . (+758) . . N KeepInsideBox (Created page with " global proc string KeepInsideBox(string $ObjName, float $BBMin[], float $BBMax[]) { //Author Nick Pisca 0001d 2010 //string $ObjName = "nurbsSphere1"; float $BBMax[] = {1...") (current)
- 07:06, 22 April 2017 (diff | hist) . . (+785) . . N KeepHighestLevel (Created page with " Sub KeepHighestLevel(LevelPlane As HybridShapePlaneOffset, TestPtObj As Variant) If IsUpdatable(LevelPlane) And IsUpdatable(TestPtObj) Then Dim OrigOri As Integer...") (current)
- 07:06, 22 April 2017 (diff | hist) . . (+654) . . N KeepCurveSplitByLength (Created page with " Sub KeepLongestSplit(InputSpl As HybridShapeSplit, ForSmaller0ForBigger1 As Integer) MyPart.UpdateObject InputSpl Dim HMeas Set HMeas = theSPAWorkbench.GetMeasurable(Input...") (current)
- 07:06, 22 April 2017 (diff | hist) . . (+476) . . N KeepBiggestSplit (Created page with " Sub KeepBiggestSplit(SplitSurface As Variant) Dim Pt1Meas 'As Measurable Set Pt1Meas = TheSPAWorkbench.GetMeasurable(SplitSurface) Dim AArea As Double AArea = Pt1Meas.Ar...") (current)
- 07:05, 22 April 2017 (diff | hist) . . (+579) . . N IsWithinDist (Created page with " global proc int IsWithinDist(string $Obj1, string $Obj2, float $Dist) { //Author Nick Pisca 0001d 2009 float $B1[] = `getAttr($Obj1+".translate")`; vector $B1Vec...") (current)
- 07:05, 22 April 2017 (diff | hist) . . (+676) . . N IsWithDistByString MEL (Created page with " global proc int IsWithDistByString(string $SkipStrArr[], vector $TestVec, float $Rad) { //0001D LLC 2015 Nick Pisca //string $SkipStrArr[] = {"0.888,0.777","0.555,0.6"};...") (current)
- 07:05, 22 April 2017 (diff | hist) . . (+735) . . N IsVectorInArrayWithinDistance (Created page with " vector $TTArr[]; $TTArr[0] = <<2,3,22>>; $TTArr[1] = <<2,-3,22>>; $TTArr[2] = <<-2,3,22>>; vector $MArr = <<22,23,22>>; int $HHH = IsVectorInArrayWithinRange($MArr, $TTA...") (current)
- 07:04, 22 April 2017 (diff | hist) . . (+839) . . N IsVectorInArray (Created page with " vector $TTArr[]; $TTArr[0] = <<2,3,22>>; $TTArr[1] = <<2,-3,22>>; $TTArr[2] = <<-2,3,22>>; vector $MArr = <<2,3,22>>; int $HHH = IsVectorInArray($MArr, $TTArr); globa...") (current)
- 07:04, 22 April 2017 (diff | hist) . . (+243) . . N IsUpdatableInPart (Created page with " Function IsUpdatableInPart(InputObj As Variant, CurPart As Part) As Boolean On Error GoTo blast CurPart.UpdateObject InputObj IsUpdatableInPart= True Exit Function blast...") (current)
- 07:04, 22 April 2017 (diff | hist) . . (+211) . . N IsUpdatable (Created page with " Function IsUpdatable(InputObj As Variant) As Boolean On Error GoTo Blast2 MyPart.UpdateObject InputObj IsUpdatable = True Exit Function Blast2: IsUpdatable = False End...") (current)
- 07:03, 22 April 2017 (diff | hist) . . (+552) . . N IsSurfaceAbove (Created page with " Function IsSurfaceAbove(BottomObj As Variant, TopObj As Variant) As Boolean If IsUpdatable(BottomObj) = False Or IsUpdatable(TopObj) = False Then IsSurfaceAbove...") (current)
- 07:03, 22 April 2017 (diff | hist) . . (+202) . . N IsSpace (Created page with " Function IsSpace(Obj1 As Variant) As Boolean On Error GoTo Blast Dim HHH As ArcSpace Set HHH = Obj1 IsSpace = True Exit Function Blast: IsSpace = False End Function...") (current)
- 07:03, 22 April 2017 (diff | hist) . . (+272) . . N IsSmartUpdatable (Created page with " Function IsSmartUpdatable(InputObj As Variant) As Boolean On Error GoTo blast Set CurPart = GetContainingPart(InputObj) CurPart.UpdateObject InputObj IsSmartUpdatable...") (current)
- 07:02, 22 April 2017 (diff | hist) . . (+244) . . N IsProductDocument (Created page with " Function IsProductDocument(CurObj As Variant) As Boolean On Error GoTo Blast Dim CurPD As ProductDocument Set CurPD = CurObj IsProductDocument = True Exit Function Blas...") (current)
- 07:02, 22 April 2017 (diff | hist) . . (+751) . . N IsProductActive (Created page with " Function IsProductActive() As Boolean OPArr = StrangeComponent("Part", "TESTCASE1", CATIA.ActiveDocument.Product.Products, CATIA.ActiveDocument.Product) Set Outp...") (current)
- 07:02, 22 April 2017 (diff | hist) . . (+235) . . N IsPlanar (Created page with " Function IsPlanar(InputObj As Variant) As Boolean Dim CM Set CM = TheSPAWorkbench.GetMeasurable(InputObj) If CM.GeometryName = 7 Then IsPlanar = True Else IsPla...") (current)
- 07:02, 22 April 2017 (diff | hist) . . (+232) . . N IsPartDocument (Created page with " Function IsPartDocument(CurObj As Variant) As Boolean On Error GoTo Blast Dim CurPD As PartDocument Set CurPD = CurObj IsPartDocument = True Exit Function Blast: IsPar...") (current)
- 07:01, 22 April 2017 (diff | hist) . . (+583) . . N IsObjInSetWithinDist (Created page with " Function IsObjInSetWithinDist(STRUCTSet As HybridBody, CompareObj As Variant, DistVal As Double) As Boolean Dim MEMCounter As Integer MEMCounter = 1 Dim TMeas Set TMeas =...") (current)
- 07:01, 22 April 2017 (diff | hist) . . (+210) . . N IsNumber (Created page with " Function IsNumber(ValueObj As String) As Boolean On Error GoTo Blast Dim HHH As Double HHH = CDbl(ValueObj) IsNumber = True Exit Function Blast: IsNumber = False End...") (current)
- 07:00, 22 April 2017 (diff | hist) . . (+622) . . N IsMidPtCoordToFarFromCurve (Created page with " Function IsMidPtCoordToFarFromCurve(Pt1 As Variant, Pt2 As Variant, CCurve As Variant, MaxDist As Double, ConstSet As HybridBody) As Boolean Dim MidPt As HybridShapePointB...") (current)
- 07:00, 22 April 2017 (diff | hist) . . (+636) . . N IsIntersectionResultCurve (Created page with " Function IsIntersectionResultCurve(Obj1 As Variant, Obj2 As Variant, ConstSet As HybridBody) As Boolean On Error GoTo Blast If CheckIntersection(Obj1, Obj2, MyPart, M...") (current)
- 06:59, 22 April 2017 (diff | hist) . . (+456) . . N IsIntInArray MEL (Created page with " global proc int IsIntInArray(int $ObjNum, int $Arr1[]) { //Nick Pisca 2011, 0001d //int $ObjNum = 5; int $Arr1[] = {99,2,1,4}; int $Boo = 0; int $x = 0;...") (current)
- 06:59, 22 April 2017 (diff | hist) . . (+433) . . N IsInStrArr MEL (Created page with " global proc int IsInStrArr(string $Str[], string $CompareStr) { //0001D LLC 2015 Nick Pisca //string $Str[] = {"dd","ee","FF"}; string $CompareStr = "ee"; //IsInStrArr(...") (current)
- 06:59, 22 April 2017 (diff | hist) . . (+293) . . N IsInIntArray MEL (Created page with " global proc int IsInIntArray(int $IntArr[], int $IntNum) { for ($x=0;$x<size($IntArr);$x++) { if ($IntArr[$x] == $IntNum) { return 1; } } return 0; } ''Mo...") (current)
- 06:58, 22 April 2017 (diff | hist) . . (+568) . . N IsCurveAbove (Created page with " Function IsCurveAbove(BottomObj As Variant, TopObj As Variant) As Boolean If IsUpdatable(BottomObj) = False Or IsUpdatable(TopObj) = False Then IsCurveAbove =...") (current)
- 06:58, 22 April 2017 (diff | hist) . . (+316) . . N IsConvertibleToNumber (Created page with " Function IsConvertibleToNumber(InputStr As Variant) As Boolean On Error GoTo Blast HHH = CDbl(InputStr) If InputStr = "" Then IsConvertibleToNumber = False Exit...") (current)
- 06:58, 22 April 2017 (diff | hist) . . (+221) . . N IsAppOpen (Created page with " Function IsAppOpen(AppName As String) As Boolean On Error GoTo Blast Set MyApp = GetObject(, AppName & ".Application") IsAppOpen = True Exit Function Blast: IsAppOpen =...") (current)
- 06:58, 22 April 2017 (diff | hist) . . (+195) . . N Is64Bit (Created page with " Function Is64Bit() As Boolean If InStr(CATIA.SystemConfiguration.OperatingSystem, "64") <> 0 Then Is64Bit = True Else Is64Bit = False End If End Function Ca...") (current)
- 06:57, 22 April 2017 (diff | hist) . . (+88) . . N Incidence Angle from Polygons-ResearchNodes (Created page with "http://researchnodes.org/doku.php?id=examples:incidenceanglespoly.mel Category:MEL") (current)
- 06:56, 22 April 2017 (diff | hist) . . (+7) . . N In-House MEL (Created page with "Test...") (current)
- 06:56, 22 April 2017 (diff | hist) . . (+617) . . N ImmediateAnnotation (Created page with " Sub ImmediateAnnotation(PointObj As HybridShape, TextStr As String) Dim PtMeas Dim Ccoords() ReDim Ccoords(2) Set PtMeas = theSPAWorkbench.GetMeasurable(P...") (current)
- 06:18, 22 April 2017 (diff | hist) . . (0) . . N File:LASERNOTCHIMAGE05.png (current)
- 06:17, 22 April 2017 (diff | hist) . . (0) . . N File:LASERNOTCHIMAGE04.png (current)
- 06:17, 22 April 2017 (diff | hist) . . (0) . . N File:LASERNOTCHIMAGE03.png (current)
- 06:17, 22 April 2017 (diff | hist) . . (0) . . N File:LASERNOTCHIMAGE02.png (current)
- 06:17, 22 April 2017 (diff | hist) . . (0) . . N File:LASERNOTCHIMAGE01.png (current)
- 06:17, 22 April 2017 (diff | hist) . . (0) . . N File:ExcelCA04.PNG (current)
- 06:17, 22 April 2017 (diff | hist) . . (0) . . N File:ExcelCA03.PNG (current)
- 06:16, 22 April 2017 (diff | hist) . . (0) . . N File:ExcelCA02.PNG (current)
- 06:16, 22 April 2017 (diff | hist) . . (0) . . N File:ExcelCA01.PNG (current)
- 06:15, 22 April 2017 (diff | hist) . . (+158) . . N File:SphereModel07sfw.jpg (Totally awesome Spheriolithography technique for vrml format. Rendering in Maya SW. Generation scripting MEL. Author Nick Pisca 2009. http://www.nickpisca.com) (current)
- 06:13, 22 April 2017 (diff | hist) . . (+89) . . N File:RampModel04sfw.jpg (Multi Rampshader automation on several NURBS closed surfaces. MEL scripted by Nick Pisca.) (current)
- 06:09, 22 April 2017 (diff | hist) . . (+394) . . N Image Gallery (Created page with "thumb|400px|MEL scripted cellular 3D Print vrml color Spheriolithography technique pioneered by Nick Pisca. Image:N005sfw.jpg|thumb|400px|MEL...")
(newest | oldest) View (newer 50 | older 50) (20 | 50 | 100 | 250 | 500)