gmane.lisp.cl-opengl.devel

Re: Sample code for vertex arrays

Willem Rein Oudshoorn — 2013-04-28T07:39:33



Yes, I do have some sample code.  The overall code is specific for OSX
but the vertex array bit is generic.  

I have a description of it at:

http://ironhead.xs4all.nl/blog/posts/OpenGL-with-CCL-on-OSX.html

and the complete code is at:

https://github.com/woudshoo/opengl-example

If you run into any problems, don't hesitate to ask.

Kind regards,
Wim Oudshoorn.

Sample code for vertex arrays

2013-04-27T22:32:54

Can anyone provide sample code using vertex arrays?

The program varray.lisp in the redbook examples uses these but things like gl:vertex-pointer do not appear to be exported into the cl-opengl package.

Trouvez la salle de bains de vos rêves

Au Fil du Bain — 2013-04-12T00:14:11

Watch TV Online

David — 2013-04-11T22:54:14

Watch TV on your computer!

The future of television has arrived. Now you can watch 4,500 channels of HD quality TV across the world - online!

StreamDirect shows TV channels on your computer. Just forget large TV bills - there are no hardware purchases and no monthly charges with this award-winning software. You can connect your computer directly to your TV set, too - on their website you will see how.

Get access to movies, TV shows, live sports events and much more. Anytime and anywhere in the world.

Watch TV now at http://SmartURL.it/StreamTV

Regards,
David Morris
Online TV analyst


---
You are receiving this mailing because you have subscribed your email cl-opengl-devel< at >common-lisp.net to receive newsletters of this context.
To unsubscribe from our emails, please press here: mailto:out< at >columnist.com?subject=unsubs;cl-opengl-devel< at >common-lisp.net;w2pqiHz9C

Online Reviews Inc. 260 Kearny St, San Francisco, CA 94104, USA.

Re: slow interpolation issues

cage — 2013-03-11T09:38:14

Hi,

thank you for your reply!

[...]


I have just replaced all glaref calls with:

(cffi:mem-aref (gl::gl-array-pointer array) :float offset)

and the results are surprisingly good!

  seconds  |     gc     | consed | calls |  sec/call  |  name  
----------------------------------------------------
     3.924 |      0.000 |      0 | 2,500 |   0.001569 | CL-GL-UTILS:LERP-GL-ARRAY
----------------------------------------------------
     3.924 |      0.000 |      0 | 2,500 |            | Total


That's a good idea indeed! My fault is that i still stick with the old
fixed pipeline opengl paradigm.
 
Thank you for your help!
C.

Re: slow interpolation issues

Bart Botta — 2013-03-10T23:24:34


Most of the problem is https://github.com/3b/cl-opengl/issues/27 (glaref
and (setf glaref) are slow).

Another problem is that the compiler doesn't know what types the values
are, so has to call generic math routines instead of using CPU ops directly.

Storing the source arrays as specialized lisp arrays, and declaring types
(and/or check-type) would help with both problems, though writing to the
gl-array would still be slow until that bug is fixed. You could work around
the bug by using cffi:mem-aref directly instead of glaref, or if you are
using shaders, you could just do the interpolation on the GPU.

-b-
_______________________________________________
cl-opengl-devel mailing list
cl-opengl-devel< at >common-lisp.net
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/cl-opengl-devel

slow interpolation issues

cage — 2013-03-10T13:35:04

Hello,

I have written an MD2 3d mesh loader, everything works fine except for
the animations.

Because  the model  save only  the key  frame for  each  animation the
loader  must interpolate  the vertex  position of  the mesh  to  get a
smooth animation.

My solution was to save the  triangles vertices in a gl-array for each
frame an then doing linear interpolation, something like that:


(defun lerp-gl-array (a b c count interpolation-factor)
  (dotimes (i count) 
    (setf (gl:glaref c i) 
      (alexandria:lerp interpolation-factor (gl:glaref a i) (gl:glaref b i)))))

but it seem to be too slow as shown by the SBCL profiler


  seconds  |     gc     |     consed    | calls |  sec/call  |  name  
-----------------------------------------------------------
   264.554 |      8.189 | 8,307,049,792 | 2,870 |   0.092179 | CL-GL-UTILS:LERP-GL-ARRAY
-----------------------------------------------------------
   264.554 |      8.189 | 8,307,049,792 | 2,870 |            | Total

is this my fault? Any idea how can

glop

Luís Oliveira — 2013-01-28T21:15:28

Hello,

This project is potentially interesting for cl-opengl users:
<https://github.com/patzy/glop>. Has anybody tried it out?

Cheers,

Re: package "GL" not found

Luís Oliveira — 2012-12-28T21:51:08

That backtrace looks weird. It seems to be missing information on a
bunch of frames. That might mean that your version of SBCL is
mismatched with SLIME. They should be more or less contemporary.

In any case, there's that ERROR ASDF:MISSING-DEPENDENCY frame that
matches my previous hunch about Alexandria being missing.

BTW, this sort of support is usually easier via IRC. #lisp at Freenode
is a good spot to ask for help.

Cheers,

Re: package "GL" not found

Nick Khamis — 2012-12-28T20:43:49

I have some time today and this weekend to weed out all the
dependencies. In have also pasted the nested errors in pastebin:
http://pastebin.com/FKGr02XR. Will also attempt at making something
out of the generated error messages.

At the present moment, I do not have any idea how swank and asdf come
to play. Let alone SBCL, and even emacs. I'll take a step back and
look through whatever documentation there is on the net regarding
cl-opengl.

May the source be with me?

Nick.

Re: package "GL" not found

Nick Khamis — 2012-12-28T17:20:52

I totally understand how Quicklisp, Portage and source trees alike
make life a lot easier however, I have always liked to build certain
things manually from source. Reason being is that I maintain my own
documentation of the process as I go along, and allows me to get a
sense of the bigger picture. Finally, there is also a portability
issue, that I can deduce my way through using the said approach.
Totally a time consuming overcurve in some senses, but it could be
beneficial in some sense.

I did see the Makefile in cl-opengl, but it seems to be only compiling
things from the tools/
directory.

Trying not to take any more of you time than needed,

Nick

Re: package "GL" not found

Luís Oliveira — 2012-12-28T12:29:35

On Fri, Dec 28, 2012 at 12:18 PM, Nikodemus Siivola
<nikodemus< at >random-state.net> wrote:

Indeed. Nick, if you feel so inclined, you should definitely learn
about ASDF and whatnot later on, but these issues are rather
uninteresting compared to physics. If you spend too much time fighting
ASDF, you'll soon lose interest. :-) So you should definitely give
Quicklisp a go.

Re: package "GL" not found

Nikodemus Siivola — 2012-12-28T12:18:21

Given the OP's stated goals, I would suggest going with quick list.
Cheers,

- nikodemus

Sent from my phone - apologies for substandard spelling and formatting.
On Dec 28, 2012 1:06 PM, "Luís Oliveira" <luismbo< at >gmail.com> wrote:

_______________________________________________
cl-opengl-devel mailing list
cl-opengl-devel< at >common-lisp.net
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/cl-opengl-devel

Re: package "GL" not found

Luís Oliveira — 2012-12-28T11:04:59

You got an error while loading cl-opengl. Apparently, it didn't even
load any of cl-opengl's source files. The fact that "Alexandria" is
mentioned in the error, suggests that something while processing
cl-opengl's dependencies since Alexandria is one of the projects
cl-opengl depends on. (Since you don't want to use quicklisp, you'll
have to download it yourself.)

However that ABORT restart #1 ("Return to sldb level 1.") indicates
that this is a nested error. I.e., there was some error, probably
indicating that Alexandria was not found, but for some reason, while
printing information about that error, something else went wrong.

Can you pick that restart to try and figure out what that error was?
If that doesn't work, expand the backtrace. It should have more useful
information.

HTH,

Re: package "GL" not found

Nick Khamis — 2012-12-28T01:32:48

Hahaha!!! I'm totally not convinced about my explanation either! ;)
Please excuse me, trying to kick the eclipse habit, and new to
the emacs realm.

* The following is the output in (slime-repl):

; SLIME 2010-07-21
CL-USER> (asdf:load-system :cl-opengl)
; Loading system definition from
; /usr/local/tools/cl-opengl/cl-opengl.asd into #<PACKAGE "ASDF0">
; Registering #<SYSTEM CL-OPENGL> as CL-OPENGL

* And in (sldb sbcl):

There is no applicable method for the generic function
  #<STANDARD-GENERIC-FUNCTION ASDF:COMPONENT-NAME (1)>
when called with arguments
  (#:ALEXANDRIA).
   [Condition of type SIMPLE-ERROR]

Restarts:
 0: [RETRY] Retry calling the generic function.
 1: [ABORT] Return to sldb level 1.
 2: [RETRY] Retry SLIME REPL evaluation request.
 3: [*ABORT] Return to SLIME's top level.
 4: [TERMINATE-THREAD] Terminate this thread (#<THREAD "repl-thread"
RUNNING {B8B6C81}>)

Backtrace:
  0: (   )[:EXTERNAL]
  1: (SB-PCL::CALL-NO-APPLICABLE-METHOD  )
  2: (ASDF::COMPONENT-FIND-PATH )
  3: ( )
  4: ( )

Re: package "GL" not found

Luís Oliveira — 2012-12-27T17:21:48

[...]

I'm not convinced by your explanation. :-) Can you paste what happens
after (asdf:load-system :cl-opengl)?

Re: package "GL" not found

Nick Khamis — 2012-12-27T16:47:23

It seems that way! The reason I say that because if I change:

(push (merge-pathnames subdir #P"/usr/local/tools/") to:
(push (merge-pathnames subdir #P"/usr/local/tools/cl-opengl")

Which ASDF would correctly interpret as the invalid directory:

(push (merge-pathnames subdir #P"/usr/local/tools/cl-opengl/cl-opengl")

And Loading slime fails at that point. But to answer your question,
outside of this,
I have done nothing to test if it actually gets loaded into the environment.

A warning, I am a CS student just starting to use Lisp and OpenGL to
get some exposure
of Physics through computation. A link that I feel would be great to
venture into on the
side. I will give it another go today.

Thanks in Advance,

Nick.

On 12/27/12, Luís Oliveira <luismbo< at >gmail.com> wrote:

Re: package "GL" not found

Luís Oliveira — 2012-12-27T10:26:03

Did cl-opengl actually get loaded at this point?

package "GL" not found

Nick Khamis — 2012-12-27T00:58:33

Hello Everyone,

My current environment consists of (Emacs, SBCL, ASDF, and SLIME).
Trying to run a few minimalistic examples I keep getting:

package "GL" not found

Things I have done to try to make ASDF central registry aware of the
cl-opengl implementation:

#~/.sbclrc

;;; asdf-prep.lisp
(dolist (subdir (list ;; ... some other packages ...
                      #P"cl-opengl/"))
  (push (merge-pathnames subdir #P"/usr/local/tools/")
        asdf:*central-registry*))

And in the code I added:

(require :asdf)                 ; need ASDF to load other things
(asdf:load-system :cl-opengl)   ; load OpenGL bindings
(asdf:load-system :cl-glu)      ; load GLU bindings
(asdf:load-system :cl-glut)     ; load GLUT bindings


I have heard of quicklisp however, trying to understand how
environment variables work, and would like to get it going with
this minimalistic setup first if possible.


Your help is greatly appreciated,

Nick.

Re: cl-glut not able to open windows until shown how by lispbuilder-sdl

Luís Oliveira — 2012-08-07T19:03:00

On Tue, Aug 7, 2012 at 2:02 PM, Zach Hall
<halloweenincorporated< at >gmail.com> wrote:

That is indeed weird.



Unless someone has a better idea, I'd try some plain C demo using
FreeGLUT and see if that works.

Cheers,

cl-glut not able to open windows until shown howby lispbuilder-sdl

Zach Hall — 2012-08-07T13:02:06

Hi everyone,

I'm having a weird problem with cl-glut.

When I run something using glut to produce a window, I don't get a window.
Inserting a swank-handler into the loop of the examples, I determined that
they WERE running, they just weren't giving me a window.

I'm using Windows 7, Clozure-CL and I have FreeGlut loaded and detected
properly. Everything works, except that the window doesn't show.

So! I decided to try Lispbuilder-SDL, I loaded up their examples and they
are able to successfully open windows.

What's really odd about this, is that AFTER I've created a window using
Lispbuilder, it seems to show Glut what to do, and Glut can suddenly open
display windows properly.

Does anyone have any idea what could be causing this?
_______________________________________________
cl-opengl-devel mailing list
cl-opengl-devel< at >common-lisp.net
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/cl-opengl-devel