Open Multiple IGES Files

[Karl@CP PISTONS]

Hi All,

I need to come up with a script (for X4) that will import multiple IGES files from various directories and merge them into one mastercam file.

 

First file opens fine but when the next file is opened the first is closed. I thought about saving the first as temp1 then using the MergeMC() but I was hoping for a more simple solution.

 

Way back in ver9 the import did not close the previous files.

 

Anybody have any other sugestions?

 

Karl

[Mick from CNC Software Inc.]

This is a bit long winded but works and might give you some ideas

 

code:

---

' -- Start Script

 

Const DEF_PATH = "C:Documents and SettingsmgMy DocumentsCabinet Software DXF filesKCDwACME - SMALL"

 

Call Main()

 

 

' ////////////////////

' Sub Declaration

' ////////////////////

Sub Main()

' -- Add code here...

 

Dim ret

 

ReadDXF DEF_PATH & "ACME_1_Back_001F.dxf"

SaveMC False

NewMC False

 

ReadDXF DEF_PATH & "ACME_1_Bottom_001F.dxf"

SaveMC False

NewMC False

 

 

ReadDXF DEF_PATH & "ACME_2_Spanner_Top_Back_001F.dxf"

SaveMC False

NewMC False

 

 

' -- re-open and merge

OpenMC DEF_PATH & "ACME_1_Back_001F.mcx"

MergeMC DEF_PATH & "ACME_1_Bottom_001F.mcx"

MergeMC DEF_PATH & "ACME_2_Spanner_Top_Back_001F.mcx"

 

RepaintScreen True

 

 

 

 

 

End Sub

---

[Karl@CP PISTONS]

Thanks Mick I'll give it a try later this afternoon when work load permits.

 

Karl