3D bolt creation routine-test drivers required...

[Cerberus]

kari,

 

I have had a look at the code I originaly posted and I cannot find "mbolt" anywhere. Try re-copying it and running again. If this does not work then I am afraid someone else will have to help out.

 

As stated, I am still a novice at this lisp stuff so I'm not too sure why you would get an error message.

 

Incidentally, all the lisp ideas I have had are all on the back burner because the powers that be at work have decided we are all going to use Inventor now!

[kari_sinkko]

hey C,

 

I used the lsp that was attached. I've combined your lisp that was in two parts and the reuslt is that it works

 

Inventor I've used it and it's really powerful.

 

 

 

kari,

 

I have had a look at the code I originaly posted and I cannot find "mbolt" anywhere. Try re-copying it and running again. If this does not work then I am afraid someone else will have to help out.

 

As stated, I am still a novice at this lisp stuff so I'm not too sure why you would get an error message.

 

Incidentally, all the lisp ideas I have had are all on the back burner because the powers that be at work have decided we are all going to use Inventor now!

BOLT.LSP

[garlictaste]

That`s it !

-garlic-

[petkovski]

3) If for some reason the routine crashes out half way through, it doesn't return everything to its original state (UCS, layer, etc) which really annoying. During trials I ended up with the following layers being created:

steelwork bolting

steelwork bolting bolting

steelwork bolting bolting bolting

steelwork bolting bolting bolting bolting, etc. is there a way to return everything and stop this?

 

Any other ideas for improvement?

 

 

Hi,

I am not a expert in lisp,but i try something in this rutine.

I exchange the part where layer "Bolting" is create with this one:

 

 

; check if layer "Bolting" exist and if not create new layer "Bolting" and set current

 

(if (not (tblsearch "layer" "Bolting"))

(command "_.-layer" "_make" "Bolting" "_color" "8" "Bolting"

""

)

(command "_.-layer" "_thaw" "Bolting" "_on" "Bolting" "_set"

"Bolting" ""

)

)

This routine doesn't return the org layer state,just check,create and set current.

Maybe this will help?

[fuccaro]

This kind of problems usually are handled by an error trap.