view gtk/plugins/crazychat/dog_lids.c @ 15005:5e07a6f8eb33

[gaim-migrate @ 17784] SF Patch #1571670 from zdeqb "Perl bindings for the functions in core.h and some bindings for the functions in privacy.h." I made the following changes: 1. I chose to export gaim_get_core() as Gaim::get_core instead of Gaim::Core::get_core. 2. I don't see any reason to require Perl code to pass bogus values just because C requires them. So, I changed Gaim::Core::quit_cb to NOT take an argument, and to pass NULL to gaim_core_quit_cb(). 3. I fixed a typo. 4. I cleaned up some spacing issues. I noticed that Core.c didn't get created from Core.xs until I re-ran configure. Maybe there's no way to avoid this? committer: Tailor Script <[e-mail]>

#include

#include "lid1.h"
#include "lid2.h"
#include "lid3.h"
#include "lid4.h"
#include "lid5.h"
#include "lid6.h"
#include "lid8.h"
#include "lid9.h"
#include "lid10.h"

#define NUM_LIDS 9

GLint lidLists[NUM_LIDS];

void initLids(){
	GLint test;
	int i;
	
	GLint[0]=Gen3DObjectListLid1();
	GLint[1]=Gen3DObjectListLid2();
	GLint[2]=Gen3DObjectListLid3();
	GLint[3]=Gen3DObjectListLid4();
	GLint[4]=Gen3DObjectListLid5();
	GLint[5]=Gen3DObjectListLid6();
	GLint[6]=Gen3DObjectListLid8();
	GLint[7]=Gen3DObjectListLid9();
	GLint[8]=Gen3DObjectListLid10();

};

void drawLids(int left, right) {
	//draw left
	GLfloat offset = .5;

	glPushMatrix();
	glTranslatef(offset, 0, 0);
	glCallList(lidLists[left]);
	glPopMatrix();

	//draw right
	glPushMatrix();
	glTranslatef(-offset, 0, 0);
	glScalef(-1, 1, 1);
	glCallList(lidLists[right]);
	glPopMatrix();
}