Re^4: Daunting Problem With Perl Opengl Lighting

in reply to Re^3: Daunting Problem With Perl Opengl Lighting
in thread Daunting Problem With Perl Opengl Lighting

Okay I found the answer in a book for perl. Obviously packing the arrays or giving reference isnt good enough

    glMaterialfv_p(GL_FRONT, GL_SPECULAR, 1, 1, 1, 1);
    glMaterialfv_p(GL_FRONT, GL_SHININESS, 50);
    glLightfv_p (GL_LIGHT0, GL_POSITION, 1, 1, 1, 0);
[download]

did the trick

Comment on Re^4: Daunting Problem With Perl Opengl Lighting Download Code

Replies are listed 'Best First'.
Re^5: Daunting Problem With Perl Opengl Lighting by zentara (Archbishop) on Jul 20, 2008 at 13:35 UTC
Hi, I'm using the latest SVN rev from New Perl OpenGL Release. I found that I also had to remove the line glEnable(GL_LIGHTING); from init, or the screen was black. By the way, if you havn't seen it, there is a very nice example in the SVN rev called isosurf.pl, that is where I found those function's need for arrays. Isosurf.pl looks like it displays DNA type shapes, maybe you will find it contains some useful ideas. P.S. I'm running the NVidia driver on linux. I'm not really a human, but I play one on earth Remember How Lucky You Are	[reply]

Replies are listed 'Best First'.

Re^5: Daunting Problem With Perl Opengl Lighting
by zentara (Archbishop) on Jul 20, 2008 at 13:35 UTC

New Perl OpenGL Release

P.S. I'm running the NVidia driver on linux.

I'm not really a human, but I play one on earth Remember How Lucky You Are

[reply]

In Section Seekers of Perl Wisdom