User contributions

Jump to: navigation, search
Search for contributions
 
 
     
 
   

(newest | oldest) View ( | ) (20 | 50 | 100 | 250 | 500)

  • 06:03, 22 April 2017 (diff | hist) . . (+113). . N Get Curve Intersection Coordinates-ResearchNodes(Created page with "http://researchnodes.org/doku.php?id=cellularaggregation:getcurveintersectioncoordinates.mel Category:MEL") (current)
  • 06:03, 22 April 2017 (diff | hist) . . (+185). . N GetYIntercept(Created page with " Function GetYIntercept(X1 As Variant, X2 As Variant, Y1 As Variant, Y2 As Variant) As Double GetYIntercept = Y1 - (X1 * (Y1 - Y2) / (X1 - X2)) End Function Category:CAT...") (current)
  • 06:03, 22 April 2017 (diff | hist) . . (+368). . N GetXYZFromPoint(Created page with " Function GetXYZFromPoint(InputPt As Variant) As Variant Dim SArr() ReDim SArr(2) If IsUpdatable(InputPt) Then Dim CMeas Set CMeas = TheSPAWorkbench.GetMeasurable...") (current)
  • 06:02, 22 April 2017 (diff | hist) . . (+836). . N GetXYZFromArray(Created page with " Function GetXYZFromArray(PtArr As Variant, XVal As Double, YVal As Double, ZVal As Double, Closest1Farthest0 As Integer) As Integer Dim WinningVal As Double If Closest1Fart...") (current)
  • 06:02, 22 April 2017 (diff | hist) . . (+494). . N GetTopLineTXTFile(Created page with " int $YYY = GetTopLineTXTFile("c:\\mayacount.txt"); global proc int GetTopLineTXTFile(string $Path) { //Nick Pisca 0001d, string $Path = "c:\\mayacount.txt"; string...") (current)
  • 06:01, 22 April 2017 (diff | hist) . . (+1,033). . N GetThreeClosestObjsFromArray(Created page with " global proc string[] GetThreeClosestObjsFromArray(string $MainObj, string $OtherArr[] ) { //Author Nick Pisca 0001d 2009 string $ClosestArr[2]; float $ClosestDis...") (current)
  • 06:01, 22 April 2017 (diff | hist) . . (+3,981). . N GetTechnologicalObject Parameters(Created page with " AnnotatedViews <br> ArrangementProduct <br> AssemblyFeatures <br> CATAnnotationSets <br> ClashResults <br> Clashes <br> DMUReviews <br> Distances <br> Groups <br> HumanWorkbe...") (current)
  • 06:01, 22 April 2017 (diff | hist) . . (+414). . N GetSubstitutedMaterial(Created page with " proc string GetSubstitutedMaterial(string $Name){ //Author Nick Pisca 0001d 2007 string $FF[] = `listRelatives $Name`; string $GG[] = `listConnections $FF[0]`; string $HH...") (current)
  • 06:00, 22 April 2017 (diff | hist) . . (+163). . N GetSlope(Created page with " Function GetSlope(X1 As Variant, X2 As Variant, Y1 As Variant, Y2 As Variant) As Double GetSlope = (Y1 - Y2) / (X1 - X2) End Function Category:CATIA DP VB") (current)
  • 06:00, 22 April 2017 (diff | hist) . . (+2,562). . N GetRGBGrid MEL(Created page with " global proc string[] GetRGBGrid(string $FileName, int $xMax, int $yMax ) { //0001D LLC 2015 Nick Pisca //int $xMax = 5; int $yMax = 6; string $FileName = "file1"; //eva...") (current)
  • 05:59, 22 April 2017 (diff | hist) . . (+1,483). . N GetPolygonFaceArea MEL(Created page with " global proc float getPolygonFaceArea( string $mesh, int $face ) { float $area = 0; select -r ($mesh+".f["+$face+"]"); string $vertIndicesStr[] = `polyInfo -fv`; strin...") (current)
  • 05:59, 22 April 2017 (diff | hist) . . (+939). . N GetPolyTriangleArea MEL(Created page with " global proc float getPolyTriangleArea( string $mesh, string $vertIndices[] ) { vector $verts[3]; string $transform[] = `listRelatives -p $mesh`; float $transformMatrix[...") (current)
  • 05:59, 22 April 2017 (diff | hist) . . (+356). . N GetPartFromName(Created page with " Function GetPartFromName(InputStr As String) As Part For X = 1 To CATIA.Documents.Count If TypeName(CATIA.Documents.Item(X)) = "PartDocument" Then If CATIA.Doc...") (current)
  • 05:59, 22 April 2017 (diff | hist) . . (+745). . N GetNormalAtVTX MEL(Created page with " global proc vector getNormalAtVTX(int $InputCVNum, string $ObjName) { // Nick Pisca 2011, 0001d // NOTE: this isn't really accurate, but works for quick solutions. //...") (current)
  • 05:58, 22 April 2017 (diff | hist) . . (+1,078). . N GetNClosestObjsFromArray(Created page with " global proc string[] GetNClosestObjsFromArray(string $MainObj, string $OtherArr[], int $NCount) { //Author Nick Pisca 0001d 2009 string $ClosestArr[]; float $Clos...") (current)
  • 05:58, 22 April 2017 (diff | hist) . . (+593). . N GetMinimumDistanceAtLineEndPts(Created page with " Function GetMinimumDistanceAtLineEndPts(Line1 As Variant, Line2 As Variant) As Double IsUpdatable Line1 IsUpdatable Line2 Dim L1Meas Set L1Meas = TheSPAWorkbench.GetMeasu...") (current)
  • 05:58, 22 April 2017 (diff | hist) . . (+1,121). . N GetMayaRAMUsageXPHome(Created page with " global proc float GetMayaRAMUsageXPHome() { //Author Nick Pisca 0001d 2010, float $Ram1 = GetMayaRAMUsageXPHome(); string $TLbuffer[]; string $TL = `system ("c:\\pslist.ex...") (current)
  • 05:58, 22 April 2017 (diff | hist) . . (+748). . N GetMayaRAMUsage(Created page with " float $Ram1 = GetMayaRAMUsage(); //Note, this tool only works on Windows XP Pro and newer. Windows XP Home may not run this. global proc float GetMayaRAMUsage() { //Aut...") (current)
  • 05:57, 22 April 2017 (diff | hist) . . (+1,461). . N GetMaxProjDistance(Created page with " Function GetMaxProjDistance(CrvObj1 As Variant, Obj2 As Variant, IntervalDist As Double, ConstSet As HybridBody) As Double Dim Floater As HybridShapePointOnCurve Set Floate...") (current)
  • 05:57, 22 April 2017 (diff | hist) . . (+350). . N GetMaterial(Created page with " global proc string getMaterial(string $ObjName) { //Author Nick Pisca 0001d 2006 string $LH[] = `listHistory $ObjName`; string $LC[] = `listConnections $LH[0]`; string $L...") (current)
  • 05:57, 22 April 2017 (diff | hist) . . (+405). . N GetInitialMaterial(Created page with " proc string GetInitialMaterial(string $Name){ //Author Nick Pisca 0001d 2006 string $FF[] = `listRelatives $Name`; string $GG[] = `listConnections $FF[0]`; string $HH[] =...") (current)
  • 05:56, 22 April 2017 (diff | hist) . . (+448). . N GetFirstInstanceInExcel(Created page with " Function GetFirstInstanceInExcel(InputVal As String, ColumnNo As Integer, EndRow As Integer) As Integer Dim LCounter As Integer LCounter = 2 While LCounter <= EndRow...") (current)
  • 05:56, 22 April 2017 (diff | hist) . . (+443). . N GetDistanceBetwTwoVectors(Created page with " global proc float GetDistanceBetwTwoVectors(vector $V1, vector $V2) { //Author Nick Pisca 0001d 2010 //vector $V1 = <<0,22,1>>; vector $V2 = <<22,0,0>>; vector $DDiff =...") (current)
  • 05:56, 22 April 2017 (diff | hist) . . (+537). . N GetDistanceBetwTwoArrays(Created page with " global proc float GetDistanceBetwTwoArrays(float $A1[], float $A2[]) { //Author Nick Pisca 0001d 2010 //float $A1[] = {0,22,1}; float $A2[] = {22,0,0}; vector $A1vec =...") (current)
  • 05:56, 22 April 2017 (diff | hist) . . (+1,224). . N GetDistBetwTwoCurves MEL(Created page with " global proc float GetDistBetwTwoCurves(string $InputCrv, string $InputCrv2, float $Divs) { //Wing, Eric, Nick 2010 //string $InputCrv = "transform95"; string $Input...") (current)
  • 05:55, 22 April 2017 (diff | hist) . . (+1,141). . N GetDistBetwPointsByVectorDirection MEL(Created page with " global proc float getDistBetwPointsByVectorDirection(vector $p1, vector $p2, vector $n) { //0001D LLC (c) Nick Pisca 2015 //vector $p1 = <<1,3,4>>; vector $p2 = <<-2,0,5>...") (current)
  • 05:55, 22 April 2017 (diff | hist) . . (+876). . N GetDarkestVector MEL(Created page with " global proc vector GetDarkestVector(vector $CurPos, float $Rad, int $NumTests, string $File) { //0001D LLC 2015 Nick Pisca //vector $CurPos = <<0.1,0.1,0.0>>; float $Rad =...") (current)
  • 05:42, 22 April 2017 (diff | hist) . . (+638). . N GetDarkestIndices MEL(Created page with " global proc int[] GetDarkestIndices(string $RGBMat[]) { //0001D LLC 2015 Nick Pisca //string $RGBMat[] = $WZ; int $indexNums[1] = {0,0}; int $XEndCt = size($RGBMat);...") (current)
  • 05:42, 22 April 2017 (diff | hist) . . (+447). . N GetCurveLength MEL(Created page with " global proc float GetCurveLength(string $InputCrv) { //Wing, Eric, Nick 2010 //string $InputCrv = "transform82"; float $LenDim; string $SNode[] = `lis...") (current)
  • 05:42, 22 April 2017 (diff | hist) . . (+631). . N GetCurveLength-ctrl-i(Created page with "Direct: http://crtl-i.com/blog/?p=16 proc float getCurveLength( string $curve ) { string $arcLenNode = `createNode arcLengthDimension`; connectAttr -f ( $curve + “.wor...") (current)
  • 05:42, 22 April 2017 (diff | hist) . . (+1,062). . N GetConnectingVTXs MEL(Created page with " global proc string[] getConnectingVTXs(int $InputCVNum, string $ObjName) { // Nick Pisca 2011 0001d //int $InputCVNum = 1; //string $ObjName = "Sample_DSF_mesh...") (current)
  • 05:41, 22 April 2017 (diff | hist) . . (+2,402). . N GetClosestIndices MEL(Created page with " global proc int[] GetClosestIndices(string $RGBMat[], int $CurInt[], string $Skip[], int $All0NeighborNum, string $PlaneName, int $XDivs, int $YDivs) { //0001D LLC 2...") (current)
  • 05:41, 22 April 2017 (diff | hist) . . (+577). . N GetClosestIndex MEL(Created page with " global proc int GetClosestIndex(string $LocArr[], vector $XYZArr[], vector $CurVec, int $Skip[]) { //0001D LLC 2015 Nick Pisca float $WinDist = 1000000.0; int $WinInt =...") (current)
  • 05:40, 22 April 2017 (diff | hist) . . (+1,583). . N GetClosestCVOnCurveToVectorWithinZPlane MEL(Created page with " global proc int GetClosestCVOnCurveToVectorWithinZPlane(vector $V1, string $Crv1, float $ZDev) { //vector $V1 = <<25666.759821, 10518.81918, 1000>>;...") (current)
  • 05:40, 22 April 2017 (diff | hist) . . (+684). . N GetCOGFromNurbsNameSearchString(Created page with " global proc vector GetCOGFromNurbsNameSearchString(string $SearchStr) { //Author Nick Pisca 0001d 2010 //string $SearchStr = "nurbsS*"; //GetCOGFromNurbsNameSearchStrin...") (current)
  • 05:39, 22 April 2017 (diff | hist) . . (+755). . N GetCOGFromArray(Created page with " Function GetCOGFromArray(ObjArr As Variant) As Variant Dim TotArr(2) Dim TotCounter As Integer TotCounter = 0 For X = 0 To UBound(ObjArr) If IsEmpty(ObjArr(X)) = Fal...") (current)
  • 05:39, 22 April 2017 (diff | hist) . . (+369). . N GetBiggestFloatIndex(Created page with " global proc int GetBiggestFloatIndex(float $FLArr[]) { //Author Nick Pisca 0001d 2008 float $KL[] = sort($FLArr); float $Biggest = $KL[(size($KL)-1)]; for($x=0;$x<size...") (current)
  • 05:39, 22 April 2017 (diff | hist) . . (+767). . N GetAngleBetween(Created page with " Function GetAngleBetween(PtAx As Variant, PtAy As Variant, PtAz As Variant, PtBx As Variant, PtBy As Variant, PtBz As Variant, PtCx As Variant, PtCy As Variant, PtCz As Varia...") (current)
  • 05:39, 22 April 2017 (diff | hist) . . (+319). . N GetAcuteAngle(Created page with " Function GetAcuteAngle(Line1 As Variant, Line2 As Variant) As Double Dim AMeas Set AMeas = TheSPAWorkBench.GetMeasurable(Line1) Dim AAng As Double AAng = AMeas.GetAngleBe...") (current)
  • 05:38, 22 April 2017 (diff | hist) . . (+88). . N Generate Point Cloud-ResearchNodes(Created page with "http://researchnodes.org/doku.php?id=examples:qhull:genpointcloud.mel Category:MEL") (current)
  • 05:38, 22 April 2017 (diff | hist) . . (+351). . N GenerateRealParametersFromDblArray(Created page with " Function GenerateRealParametersFromDblArray(ParmList As Parameters, DblArr As Variant) As Variant Dim ParmArr() ReDim ParmArr(UBound(DblArr)) For X = 0 To UBound(DblArr)...") (current)
  • 05:38, 22 April 2017 (diff | hist) . . (+896). . N GeneratePublication(Created page with " Function GeneratePublication(CurPart As Part, CurObj As Variant) As Publication Dim GBool As Boolean GBool = False Dim CurSel Set CurSel = CurObj Dim partDocument1 As...") (current)
  • 05:37, 22 April 2017 (diff | hist) . . (+653). . N GenerateOffCurveTangToCurve(Created page with " global proc string GenerateOffCurveTangToCurve(vector $Pt1, vector $Pt1Close, vector $Pt2, float $OffDist, string $NameStr) { vector $MidVec = OffMidVector($Pt1, $Pt2,...") (current)
  • 05:37, 22 April 2017 (diff | hist) . . (+1,177). . N GenerateOffCurve(Created page with " global proc string GenerateOffCurve(vector $Pt1, vector $Pt2, float $OffDist, string $NameStr) { vector $MidVec = OffMidVector($Pt1, $Pt2, $OffDist); vector $M1 = O...") (current)
  • 05:36, 22 April 2017 (diff | hist) . . (+1,126). . N GenerateMultiOffCurveTangToCurve(Created page with " global proc string GenerateMultiOffCurveTangToCurve(vector $Pt1, vector $Pt1Close, vector $Pt2, float $OffDist, string $NameStr) { vector $MidVec = OffMidVector($Pt1, $...") (current)
  • 05:36, 22 April 2017 (diff | hist) . . (+393). . N GenerateLengthParametersFromDblArray(Created page with " Function GenerateLengthParametersFromDblArray(ParmList As Parameters, DblArr As Variant) As Variant 'Default units are mm. Dim ParmArr() ReDim ParmArr(UBound(DblArr)) For...") (current)
  • 05:36, 22 April 2017 (diff | hist) . . (+606). . N GenerateCATPartFromProduct(Created page with " Sub GenerateCATPartFromProduct() Dim ActDoc As ProductDocument Set ActDoc = CATIA.ActiveDocument Dim MySel As Selection Set MySel = CATIA.ActiveDocument.Selection MySel....") (current)
  • 05:36, 22 April 2017 (diff | hist) . . (+899). . N FurthestPoints(Created page with " Function FurthestPoints(Point1A As Variant, Point2A As Variant, Point1B As Variant) As Variant Dim SmallestDist As Double SmallestDist = 0 Dim WinHH, WinJJ As Integer...") (current)
  • 05:35, 22 April 2017 (diff | hist) . . (+529). . N Format MEL(Created page with " global proc string Format(int $n, string $zeros) { //0001D LLC (c) 2016 Nick Pisca //int $n = 67; string $zeros = "00000"; string $jjj = Format(67, "0000"); int $nn = s...") (current)
  • 05:35, 22 April 2017 (diff | hist) . . (+799). . N ForceColorObjUgly(Created page with " Sub ForceColorObjUgly(InputObj As Variant, R As Integer, G As Integer, B As Integer, LineTypeNo As Integer, PointTypeNo As Integer, ThicknessNo As Integer, TransparencyVal as...") (current)

(newest | oldest) View ( | ) (20 | 50 | 100 | 250 | 500)