sh: src/shqlit.c Source File

00001 
00006 /*
00007  *  PROGRAM NAME:  sh
00008  *
00009  *  (c) COPYRIGHT INTERNATIONAL BUSINESS MACHINES
00010  *  CORPORATION 12/1/2001.  ALL RIGHTS RESERVED.
00011  *
00012  *  Please refer to the LICENSE file in the top directory
00013  *
00014  *      author: Mike Henderson mhender@watson.ibm.com
00015  */
00016 
00017 static char *id="@(#) $Id: shqlit.c,v 1.2 2006/08/17 19:28:17 mhender Exp $";
00018 
00019 #include <shInternal.h>
00020 
00032 void shqlit(int *m, float *x, float *y, float *z,int *r,int *g,int *b)
00033  {
00034 
00035 /*    This Routine Returns the parameters associated with light source */
00036 
00037 /*             x,y,z   (real) position.                                */
00038 /*             r,g,b   (integer 0-255) color.                          */
00039 /*             type    (integer 0-1) 0=point,1=direction.              */
00040 
00041   *r=sh_rs[*m];
00042   *g=sh_gs[*m];
00043   *b=sh_bs[*m];
00044 
00045   *x=sh_lit[ +3*(*m)];
00046   *y=sh_lit[1+3*(*m)];
00047   *z=sh_lit[2+3*(*m)];
00048 
00049   return;
00050  }