User contributions

Jump to: navigation, search
Search for contributions
 
 
     
 
   

(newest | oldest) View ( | ) (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 ( | ) (20 | 50 | 100 | 250 | 500)