Looking for animation lisp routines

[madcadder]

Thanks guys for the help you have helped me make a great point now we are trying to see how we can do some animation lisp for out product for a presentation and other things.

Thanks alot.

The closest thing I can tell you (for what you need) is look at the Cadalyst C2006 Benchmark . It might be able to point you in a direction. Maybe give them a quick email for advice.

[kennet.sjoberg]

One other way to do an animation, is to use layer technique with a scriptfile.
I.e. show a building grows up from the bottom to the top, it can be done repeatedly in a loop like a screen saver and "each frame" time dependent. It can be really nice if you have a 3D-modell in perspective and shade mode on.


: ) Happy Computing !

kennet

[mike.brooks]

One other way to do an animation, is to use layer technique with a scriptfile.
I.e. show a building grows up from the bottom to the top, it can be done repeatedly in a loop like a screen saver and "each frame" time dependent. It can be really nice if you have a 3D-modell in perspective and shade mode on.


: ) Happy Computing !

kennet

Would you have any examples of this it is what would work great for us.

Thanks

[kennet.sjoberg]

Would you have any examples of this it is what would work great for us.

Thanks

. . . hmm this one is especially for you

Save KitCar.dwg and KitCar.scr.txt to the same location
Rename KitCar.scr.txt to KitCar.scr
open KitCar.dwg in at least AutoCAD 2006


: ) Happy Scripting !

kennet

BTW the car in the demo is a real car that I wooden made together whith my son. Look at KitCar.jpg

[mike.brooks]

kennet

I love it and the office loves it and thinks for the information it the script file you are a great help. One more question about this though can you run a script file out side of autocad. If so what other progreams can run it.

Thanks

[kennet.sjoberg]

kennet

I love it and the office loves it . . .

I am glad you and your office like it.

. . .can you run a script file out side of autocad. . .

No you can not run a scriptfile without AutoCAD,
a scriptfile is just AutoCAD commands one after an other.

. . . If so what other progreams can run it. . . .

Sorry, I think it is better if you ask in the program forum. . .

: ) Happy Computing !

kennet

Hint, to create scriptfile you can track down your commands to a logfile
Command: logfileon . . . do some things, create, zoom, whatever . . . Command: logfileoff
open the newly created logfile with (startapp "NotePad" (getvar "LOGFILENAME" )), edit and save as MyCurrentDrawing.scr.

[mike.brooks]

thanks again

[Adesu]

Hi kennet,
it's good animation,I like that.
btw...it's a simple procedure I think,you only played layer system,alls the layer off and then switch on one by one.
if you zoom at the spring,it look rather roughish,I guess you got trouble to create spring,I have a sample to create spring,look at attach file,sorry I'm not teach you,but that as share for help to others member.
Good luck.

[kennet.sjoberg]

. . .if you zoom at the spring,it look rather roughish . . .

I extruded a circle along a 3D-poly that I created with a lisp program.
If I generate a lot of vertex the spring will be very exact, but in this case I felt no matter and assign only 12 vertex / cycle.
But I think my spring has a more exactly formula than yours ½ circle construction.

: ) Happy Computing !

kennet

[hofcad]

Dear Readers,

I found something.
In the past, I made Metal sheet folding, Piston crank mechanism and Railway barrier.
See the attachment HofCAD.zip
Also nice is: http://www.black-cad.homepage.t-online.de/starten.htm

But, what is the best substitute for de command REPLAY in AutoCAD 2007+
to display images by a script file?

setvar cmdecho 0
(setq acadver (atoi (substr (getvar "ACADVER") 1 2)))
(setq renlist '("render" "render" "render" "render" "render" "acrender" "acrender" "acrender")) 
(if (not (member (strcat (nth (- acadver 10) renlist) ".arx") (arx)))(arxload (nth (- acadver 10) renlist)))
(c:replay "C:\\SHOWTIME\\Image0" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image1" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image2" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image3" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image4" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image5" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image6" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image7" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image8" "TGA")
delay 4000
(c:replay "C:\\SHOWTIME\\Image9" "TGA")
delay 4000
rscript

Regards