Join GitHub today
Fetching latest commit…
Cannot retrieve the latest commit at this time.
|Failed to load latest commit information.|
md2-view is just that, an Id MD2 model viewer. Nothing fancy. I'm in the process of learning Common Lisp. In other words, don't look for elite Lisp code here. ;) Dependencies: lispbuilder-sdl lispbuilder-sdl-image cl-opengl Running: Load md2-view.lisp. The main function is MD2-VIEW:RUN. Give it a list of model file names to load. Interface: * Mouse Left mouse button to rotate Middle button to zoom Right button to pan Ctrl+Left mouse button to drag a zoom box * Keys 1 - top view 2 - right view 3 - front view 4 - isometric view 5 - left view 6 - bottom view 7 - back view a - toggle animation (animation will not start at the last frame) b - toggle bounding boxes (disabled during animation) c - cycle line -> point -> face polygon modes f - fit all loaded models in the view g - toggle gnome (disabled during animation) h - print these commands i - print loaded models info to stdout l - toggle lighting (default OpenGL lighting is implemented) n - next frame (disabled during animation) p - previous frame (disabled during animation) q - exit s - cycle smooth -> flat shade models t - toggle textures TODO: * Use Pathnames for all file ops * load .tga textures * more error checking (catch zoom overflow)