FLIP.zip

[B747US]

Hi There

 

1) Anybody knows why FLIP.zip under FTP/VB_script is not working the way it should?

2) Dose anybody know how to fix it?

3) Can this Script mirror NC files with I & J moves in them as well? if not:

4)how can mirror I & J moves properly?

 

 

Thanks

[?Mark]

Works well here, but using only R's. I think that's what Roger originally made it for.

 

But here is his note:

quote:

---

'// Description: "flips" a lathe NC file across the X axis

'//

'// Inverts the sign on ALL "X" coordinates

'// Inverts arc directions: G02<->G03 (also handles G2<->G3 format)

'// Inverts the sign on ALL "I" coordinates (only those in an Arc motion block)

'//

---

So maybe it should work with I's also...

[B747US]

I GET THIS ERROR WHEN I RUN IT

 

Script: C:FLIP.VBS

Line: 67

Char: 7

Error: Type Mismatch:'GetPathFromExtension'

Code: 800A000D

Source: Microsoft VBScript runtime error

 

how can I fix this?

[Roger Martin from CNC Software]

I saw this -> "I think that's what Roger originally made it for."

 

And investigated because I thought that Mark was confused, as I really don't do VBScripts.

So I downloaded FLIP.ZIP that lo and behold - my name is on it.

(Note in the version log - "Enhanced version of a original sample script that Mick did").

I unzipped FLIP.VBS and it runs fine for me (I only tried X2-MR2), but since the VBS is dated 2004, it must have run on earlier versions of X.

 

Sorry B747US, but I don't know why it errors for you.

 

You could try this...

 

Change this ->

code:

---

Set FSO = CreateObject("Scripting.FileSystemObject")

 

' -- Build path to the default NC folder

strSwitched = GetPathFromExtension("NC") + "*.NC"

---

To this ->

code:

---

Set FSO = CreateObject("Scripting.FileSystemObject")

 

' -- Build path to the default NC folder

' Comment out the GetPathFromExtension line

'strSwitched = GetPathFromExtension("NC") + "*.NC"

' Add new declaration for strSwitched

strSwitched = "*.NC"

---

It is very possible that this will just lead to to another Error message but it's worth a try.

[B747US]

I GET THIS ERROR NOW

 

Script: C:FLIP.VBS

Line: 73

Char: 1

Error: Type Mismatch:'AskForFilename'

Code: 800A000D

Source: Microsoft VBScript runtime error

 

how can I fix this one?

[?Mark]

Hi Roger, you made it for us a long time ago. We still use it (almost daily) with no problems. It never gave us ANY error.

 

Mark

[B747US]

I think this file was named "flip-it" in the past,

Mark is flip-it what you use? looks like it is changed or something.

[?Mark]

Flip-it was the original file ( I think Roger revised it couple times). I compared the one on ftp with mine and they're identical (both are named FLIP).

hth

 

edit:

compared them side by side in editor, and they're identical

[B747US]

I dont have the old one and this one givs problem, I dont know anything about VB, and dont know how to fix it.

anybody can help?

[?Mark]

I'd try developers forum, as there is more vb and c-hook types

I'd be happy to run a few files for you if you need them right away.

 

Mark

[B747US]

Mark

 

Do Developers have different FTP site? I like to try.

I’ll appreciate if you could mirror 4 files I have, these have “I & J” moves, does flip works on “I & J” as well? if you can do these where can I send the files, I will need them to be mirrored about both “X” and ”Y” axis.

Thanks a lot

[?Mark]

quote:

---

Do Developers have different FTP site?

---

They're a part of this forum, any one can post a question there.

 

Also, this vb only "flips" a lathe NC file across the X axis and NOT Y axis, sorry.

For a person good with vb, it should not be hard to make another one just for Y axis.

 

my email:

jmqminc at aol dot com