New pages
(newest | oldest) View (newer 50 | older 50) (20 | 50 | 100 | 250 | 500)
- 06:58, 22 April 2017 IsAppOpen (hist) [221 bytes] Nickpisca (talk | contribs) (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 =...")
- 06:58, 22 April 2017 Is64Bit (hist) [195 bytes] Nickpisca (talk | contribs) (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...")
- 06:57, 22 April 2017 Incidence Angle from Polygons-ResearchNodes (hist) [88 bytes] Nickpisca (talk | contribs) (Created page with "http://researchnodes.org/doku.php?id=examples:incidenceanglespoly.mel Category:MEL")
- 06:56, 22 April 2017 In-House MEL (hist) [7 bytes] Nickpisca (talk | contribs) (Created page with "Test...")
- 06:56, 22 April 2017 ImmediateAnnotation (hist) [617 bytes] Nickpisca (talk | contribs) (Created page with " Sub ImmediateAnnotation(PointObj As HybridShape, TextStr As String) Dim PtMeas Dim Ccoords() ReDim Ccoords(2) Set PtMeas = theSPAWorkbench.GetMeasurable(P...")
- 06:09, 22 April 2017 Image Gallery (hist) [452 bytes] Nickpisca (talk | contribs) (Created page with "thumb|400px|MEL scripted cellular 3D Print vrml color Spheriolithography technique pioneered by Nick Pisca. Image:N005sfw.jpg|thumb|400px|MEL...")
- 06:08, 22 April 2017 HybridShapeExistsInHybridBody (hist) [276 bytes] Nickpisca (talk | contribs) (Created page with " Function HybridShapeExistsInHybridBody(InputStr As String, CurSet as HybridBody) As Boolean On Error GoTo blast Set HHH = CurSet.HybridShapes.Item(InputStr) HybridShapeExi...")
- 06:07, 22 April 2017 HybridShapeExists (hist) [242 bytes] Nickpisca (talk | contribs) (Created page with " Function HybridShapeExists(InputStr As String) As Boolean On Error GoTo blast Set HHH = CurSet.HybridShapes.Item(InputStr) HybridShapeExists = True Exit Function blast:...")
- 06:07, 22 April 2017 Honeycomb Panels 03-madeincalifornia (hist) [2,501 bytes] Nickpisca (talk | contribs) (Created page with "'Direct: http://madeincalifornia.blogspot.com/2009/01/honeycomb-panels-03.html Option Explicit ' Author: Milutin Cerovic 2009 ' www.4ofseven.com ' adapted:http://www.ma...")
- 06:06, 22 April 2017 History (hist) [704 bytes] Nickpisca (talk | contribs) (Created page with "<div align="right">Back to Academic_Archives.</div> __TOC__ == Graphic User Interface == === Papers === * [http://www.cl.cam.ac.uk/techreports/UCAM-CL-TR-574.pdf Ivan S...")
- 06:06, 22 April 2017 HasVolume (hist) [340 bytes] Nickpisca (talk | contribs) (Created page with " Function HasVolume(InputBody As Variant, CurPart As Part) As Boolean On Error GoTo Blast2 Dim CMEAS Set CMEAS = theSPAWorkbench.GetMeasurable(CurPart.CreateReferenceFromOb...")
- 06:06, 22 April 2017 HasRadius (hist) [297 bytes] Nickpisca (talk | contribs) (Created page with " Function HasRadius(InputCrv As Variant) As Double On Error GoTo blast Dim PtMeas Dim RadiusVal As Double Set PtMeas = TheSPAWorkbench.GetMeasurable(InputCrv) RadiusVa...")
- 06:05, 22 April 2017 HasParent (hist) [214 bytes] Nickpisca (talk | contribs) (Created page with " Function HasParent(CurObj As Variant) As Boolean On Error GoTo Blast Dim NAParent Set NAParent = CurObj.Parent HasParent = True Exit Function Blast: HasParent = False...")
- 06:05, 22 April 2017 HasPackage (hist) [406 bytes] Nickpisca (talk | contribs) (Created page with " 'Dim PkgManager 'Set PkgManager = MyPart.GetItem("GTCAttPkgManagerVBExt") Function HasPackage(InputObj As Variant) As Boolean On Error GoTo Blast Dim pkgs As AttPackage...")
- 06:05, 22 April 2017 HasHOffset (hist) [214 bytes] Nickpisca (talk | contribs) (Created page with " Function HasHOffset(BeamBeam As Variant) As Boolean On Error GoTo Blast Dim HS HS = BeamBeam.HOffset.Value HasHOffset = True Exit Function Blast: HasHOffset = False E...")
- 06:04, 22 April 2017 HasCOG (hist) [258 bytes] Nickpisca (talk | contribs) (Created page with " Function HasCOG(PointObj As Variant) As Boolean On Error GoTo Blast Dim MMeas Set MMeas = TheSPAWorkbench.GetMeasurable(PointObj) Dim MM(2) MMeas.GetCOG MM HasCOG = Tru...")
- 06:04, 22 April 2017 HasArea (hist) [282 bytes] Nickpisca (talk | contribs) (Created page with " Function HasArea(InputSurf As Variant) As Boolean On Error GoTo Blast2 Dim CMEAS Set CMEAS = TheSPAWorkbench.GetMeasurable(InputSurf) Dim AreaCalc As Double AreaCalc = C...")
- 06:04, 22 April 2017 HasAngleBetween (hist) [289 bytes] Nickpisca (talk | contribs) (Created page with " Function HasAngleBetween(Obj1 As Variant, Obj2 As Variant) As Double On Error GoTo Blast Set C2 = TheSPAWorkbench.GetMeasurable(Obj1) AngleVal = C2.GetAngleBetween(Obj2)...")
- 06:03, 22 April 2017 Get Curve Intersection Coordinates-ResearchNodes (hist) [113 bytes] Nickpisca (talk | contribs) (Created page with "http://researchnodes.org/doku.php?id=cellularaggregation:getcurveintersectioncoordinates.mel Category:MEL")
- 06:03, 22 April 2017 GetYIntercept (hist) [185 bytes] Nickpisca (talk | contribs) (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...")
- 06:03, 22 April 2017 GetXYZFromPoint (hist) [368 bytes] Nickpisca (talk | contribs) (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...")
- 06:02, 22 April 2017 GetXYZFromArray (hist) [836 bytes] Nickpisca (talk | contribs) (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...")
- 06:02, 22 April 2017 GetTopLineTXTFile (hist) [494 bytes] Nickpisca (talk | contribs) (Created page with " int $YYY = GetTopLineTXTFile("c:\\mayacount.txt"); global proc int GetTopLineTXTFile(string $Path) { //Nick Pisca 0001d, string $Path = "c:\\mayacount.txt"; string...")
- 06:01, 22 April 2017 GetThreeClosestObjsFromArray (hist) [1,033 bytes] Nickpisca (talk | contribs) (Created page with " global proc string[] GetThreeClosestObjsFromArray(string $MainObj, string $OtherArr[] ) { //Author Nick Pisca 0001d 2009 string $ClosestArr[2]; float $ClosestDis...")
- 06:01, 22 April 2017 GetTechnologicalObject Parameters (hist) [3,981 bytes] Nickpisca (talk | contribs) (Created page with " AnnotatedViews <br> ArrangementProduct <br> AssemblyFeatures <br> CATAnnotationSets <br> ClashResults <br> Clashes <br> DMUReviews <br> Distances <br> Groups <br> HumanWorkbe...")
- 06:01, 22 April 2017 GetSubstitutedMaterial (hist) [414 bytes] Nickpisca (talk | contribs) (Created page with " proc string GetSubstitutedMaterial(string $Name){ //Author Nick Pisca 0001d 2007 string $FF[] = `listRelatives $Name`; string $GG[] = `listConnections $FF[0]`; string $HH...")
- 06:00, 22 April 2017 GetSlope (hist) [163 bytes] Nickpisca (talk | contribs) (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")
- 06:00, 22 April 2017 GetRGBGrid MEL (hist) [2,562 bytes] Nickpisca (talk | contribs) (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...")
- 05:59, 22 April 2017 GetPolygonFaceArea MEL (hist) [1,483 bytes] Nickpisca (talk | contribs) (Created page with " global proc float getPolygonFaceArea( string $mesh, int $face ) { float $area = 0; select -r ($mesh+".f["+$face+"]"); string $vertIndicesStr[] = `polyInfo -fv`; strin...")
- 05:59, 22 April 2017 GetPolyTriangleArea MEL (hist) [939 bytes] Nickpisca (talk | contribs) (Created page with " global proc float getPolyTriangleArea( string $mesh, string $vertIndices[] ) { vector $verts[3]; string $transform[] = `listRelatives -p $mesh`; float $transformMatrix[...")
- 05:59, 22 April 2017 GetPartFromName (hist) [356 bytes] Nickpisca (talk | contribs) (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...")
- 05:59, 22 April 2017 GetNormalAtVTX MEL (hist) [745 bytes] Nickpisca (talk | contribs) (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. //...")
- 05:58, 22 April 2017 GetNClosestObjsFromArray (hist) [1,078 bytes] Nickpisca (talk | contribs) (Created page with " global proc string[] GetNClosestObjsFromArray(string $MainObj, string $OtherArr[], int $NCount) { //Author Nick Pisca 0001d 2009 string $ClosestArr[]; float $Clos...")
- 05:58, 22 April 2017 GetMinimumDistanceAtLineEndPts (hist) [593 bytes] Nickpisca (talk | contribs) (Created page with " Function GetMinimumDistanceAtLineEndPts(Line1 As Variant, Line2 As Variant) As Double IsUpdatable Line1 IsUpdatable Line2 Dim L1Meas Set L1Meas = TheSPAWorkbench.GetMeasu...")
- 05:58, 22 April 2017 GetMayaRAMUsageXPHome (hist) [1,121 bytes] Nickpisca (talk | contribs) (Created page with " global proc float GetMayaRAMUsageXPHome() { //Author Nick Pisca 0001d 2010, float $Ram1 = GetMayaRAMUsageXPHome(); string $TLbuffer[]; string $TL = `system ("c:\\pslist.ex...")
- 05:58, 22 April 2017 GetMayaRAMUsage (hist) [748 bytes] Nickpisca (talk | contribs) (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...")
- 05:57, 22 April 2017 GetMaxProjDistance (hist) [1,461 bytes] Nickpisca (talk | contribs) (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...")
- 05:57, 22 April 2017 GetMaterial (hist) [350 bytes] Nickpisca (talk | contribs) (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...")
- 05:57, 22 April 2017 GetInitialMaterial (hist) [405 bytes] Nickpisca (talk | contribs) (Created page with " proc string GetInitialMaterial(string $Name){ //Author Nick Pisca 0001d 2006 string $FF[] = `listRelatives $Name`; string $GG[] = `listConnections $FF[0]`; string $HH[] =...")
- 05:56, 22 April 2017 GetFirstInstanceInExcel (hist) [448 bytes] Nickpisca (talk | contribs) (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...")
- 05:56, 22 April 2017 GetDistanceBetwTwoVectors (hist) [443 bytes] Nickpisca (talk | contribs) (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 =...")
- 05:56, 22 April 2017 GetDistanceBetwTwoArrays (hist) [537 bytes] Nickpisca (talk | contribs) (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 =...")
- 05:56, 22 April 2017 GetDistBetwTwoCurves MEL (hist) [1,224 bytes] Nickpisca (talk | contribs) (Created page with " global proc float GetDistBetwTwoCurves(string $InputCrv, string $InputCrv2, float $Divs) { //Wing, Eric, Nick 2010 //string $InputCrv = "transform95"; string $Input...")
- 05:55, 22 April 2017 GetDistBetwPointsByVectorDirection MEL (hist) [1,141 bytes] Nickpisca (talk | contribs) (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>...")
- 05:55, 22 April 2017 GetDarkestVector MEL (hist) [876 bytes] Nickpisca (talk | contribs) (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 =...")
- 05:42, 22 April 2017 GetDarkestIndices MEL (hist) [638 bytes] Nickpisca (talk | contribs) (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);...")
- 05:42, 22 April 2017 GetCurveLength MEL (hist) [447 bytes] Nickpisca (talk | contribs) (Created page with " global proc float GetCurveLength(string $InputCrv) { //Wing, Eric, Nick 2010 //string $InputCrv = "transform82"; float $LenDim; string $SNode[] = `lis...")
- 05:42, 22 April 2017 GetCurveLength-ctrl-i (hist) [631 bytes] Nickpisca (talk | contribs) (Created page with "Direct: http://crtl-i.com/blog/?p=16 proc float getCurveLength( string $curve ) { string $arcLenNode = `createNode arcLengthDimension`; connectAttr -f ( $curve + “.wor...")
- 05:42, 22 April 2017 GetConnectingVTXs MEL (hist) [1,062 bytes] Nickpisca (talk | contribs) (Created page with " global proc string[] getConnectingVTXs(int $InputCVNum, string $ObjName) { // Nick Pisca 2011 0001d //int $InputCVNum = 1; //string $ObjName = "Sample_DSF_mesh...")
- 05:41, 22 April 2017 GetClosestIndices MEL (hist) [2,402 bytes] Nickpisca (talk | contribs) (Created page with " global proc int[] GetClosestIndices(string $RGBMat[], int $CurInt[], string $Skip[], int $All0NeighborNum, string $PlaneName, int $XDivs, int $YDivs) { //0001D LLC 2...")