X-Git-Url: http://git.mutantstargoat.com/user/nuclear/?a=blobdiff_plain;f=src%2Fgamescr.c;h=30222f6413693b242806fad4fe47b24f529a210a;hb=fb9a8d7e99aa7429f114644971b1ca20f196a3bf;hp=469fc124932d077ae3861985eedf6acbc469b1e2;hpb=d151a7d42478d1e7f4c2e25422a1a1624ead0948;p=vrtris

diff --git a/src/gamescr.c b/src/gamescr.c
index 469fc12..30222f6 100644
--- a/src/gamescr.c
+++ b/src/gamescr.c
@@ -1,11 +1,24 @@
 #include <stdlib.h>
 #include <time.h>
 #include <assert.h>
+#include <imago2.h>
+#ifdef BUILD_VR
+#include <goatvr.h>
+#endif
+#include <drawtext.h>
 #include "opengl.h"
 #include "game.h"
 #include "screen.h"
 #include "cmesh.h"
 #include "blocks.h"
+#include "logger.h"
+#include "gameinp.h"
+#include "color.h"
+
+#define FONTSZ	75
+
+int init_starfield(void);
+void draw_starfield(void);
 
 static int init(void);
 static void cleanup(void);
@@ -13,7 +26,7 @@ static void start(void);
 static void stop(void);
 static void update(float dt);
 static void draw(void);
-static void draw_block(int block, const int *pos, int rot);
+static void draw_block(int block, const int *pos, int rot, float sat, float alpha);
 static void drawpf(void);
 static void reshape(int x, int y);
 static void keyboard(int key, int pressed);
@@ -21,6 +34,7 @@ static void mouse(int bn, int pressed, int x, int y);
 static void motion(int x, int y);
 static void wheel(int dir);
 
+static void update_cur_block(void);
 static void addscore(int nlines);
 static int spawn(void);
 static int collision(int block, const int *pos);
@@ -44,8 +58,12 @@ struct game_screen game_screen = {
 	wheel
 };
 
-static struct cmesh *blkmesh;
-static float cam_theta, cam_phi, cam_dist = 30;
+static struct cmesh *blkmesh, *wellmesh;
+static unsigned int tex_well;
+
+static struct dtx_font *scorefont;
+
+static float cam_theta, cam_phi = -15, cam_dist = 30;
 static int bnstate[16];
 static int prev_mx, prev_my;
 
@@ -71,28 +89,67 @@ static int pause;
 static int score, level, lines;
 static int just_spawned;
 
+#ifdef BUILD_VR
+static int vrbn_a = 0, vrbn_x = 4;
+#endif
+
 #define NUM_LEVELS	21
 static const long level_speed[NUM_LEVELS] = {
 	887, 820, 753, 686, 619, 552, 469, 368, 285, 184,
 	167, 151, 134, 117, 107, 98, 88, 79, 69, 60, 50
 };
 
+static const float blkcolor[][4] = {
+	{1.0, 0.65, 0.0, 1},
+	{0.16, 1.0, 0.4, 1},
+	{0.65, 0.65, 1.0, 1},
+	{1.0, 0.9, 0.1, 1},
+	{0.0, 1.0, 1.0, 1},
+	{1.0, 0.5, 1.0, 1},
+	{1.0, 0.35, 0.2, 1},
+	{0.5, 0.5, 0.5, 1}
+};
+
+#define GAMEOVER_FILL_RATE	50
+
 
 static int init(void)
 {
-	if(!(blkmesh = cmesh_alloc())) {
+	if(!(scorefont = dtx_open_font("data/score.font", 0))) {
+		error_log("failed to open score font\n");
+		return -1;
+	}
+	dtx_prepare_range(scorefont, FONTSZ, 32, 127);
+	dtx_save_glyphmap("foo.ppm", dtx_get_glyphmap(scorefont, 0));
+
+	if(init_starfield() == -1) {
 		return -1;
 	}
-	if(cmesh_load(blkmesh, "data/noisecube.obj") == -1) {
-		fprintf(stderr, "failed to load block model\n");
+
+	if(!(blkmesh = cmesh_alloc()) || cmesh_load(blkmesh, "data/noisecube.obj") == -1) {
+		error_log("failed to load block mesh\n");
+		return -1;
+	}
+
+	if(!(wellmesh = cmesh_alloc()) || cmesh_load(wellmesh, "data/well.obj") == -1) {
+		error_log("failed to load well mesh\n");
 		return -1;
 	}
+
+	if(!(tex_well = img_gltexture_load("data/grid.png"))) {
+		error_log("failed to load well texture\n");
+		return -1;
+	}
+
 	return 0;
 }
 
 static void cleanup(void)
 {
 	cmesh_free(blkmesh);
+	cmesh_free(wellmesh);
+	glDeleteTextures(1, &tex_well);
+	dtx_close_font(scorefont);
 }
 
 static void start(void)
@@ -109,27 +166,128 @@ static void start(void)
 	next_block = rand() % NUM_BLOCKS;
 
 	memset(pfield, 0, PF_COLS * PF_ROWS * sizeof *pfield);
+
+	ginp_repeat(500, 75, GINP_LEFT | GINP_RIGHT | GINP_DOWN);
+
+	dtx_use_font(scorefont, FONTSZ);
+
+#ifdef BUILD_VR
+	if(goatvr_invr()) {
+		int bn = goatvr_lookup_button("A");
+		if(bn >= 0) vrbn_a = bn;
+		debug_log("lookup button A: %d\n", bn);
+
+		bn = goatvr_lookup_button("X");
+		if(bn >= 0) vrbn_x = bn;
+		debug_log("lookup button X: %d\n", bn);
+	}
+#endif
 }
 
 static void stop(void)
 {
 }
 
+#define JTHRES	0.6
+
+#define CHECK_BUTTON(idx, gbn) \
+	if(joy_bnstate & (1 << idx)) { \
+		ginp_bnstate |= gbn; \
+	}
+
+static void update_input(float dtsec)
+{
+#ifdef BUILD_VR
+	int num_vr_sticks;
+
+	if((num_vr_sticks = goatvr_num_sticks()) > 0) {
+		float p[2];
+
+		goatvr_stick_pos(0, p);
+
+		if(fabs(p[0]) > fabs(joy_axis[GPAD_LSTICK_X])) {
+			joy_axis[GPAD_LSTICK_X] = p[0];
+		}
+		if(fabs(p[1]) > fabs(joy_axis[GPAD_LSTICK_Y])) {
+			joy_axis[GPAD_LSTICK_Y] = -p[1];
+		}
+
+		if(goatvr_button_state(vrbn_a)) {
+			joy_bnstate |= GPAD_A;
+		}
+		if(goatvr_button_state(vrbn_x)) {
+			joy_bnstate |= GPAD_START;
+		}
+		if(goatvr_action(0, GOATVR_ACTION_TRIGGER) || goatvr_action(1, GOATVR_ACTION_TRIGGER)) {
+			joy_bnstate |= GPAD_UP;
+		}
+	}
+#endif	/* BUILD_VR */
+
+	ginp_bnstate = 0;
+
+	/* joystick axis */
+	if(joy_axis[GPAD_LSTICK_X] >= JTHRES) {
+		ginp_bnstate |= GINP_RIGHT;
+	} else if(joy_axis[GPAD_LSTICK_X] <= -JTHRES) {
+		ginp_bnstate |= GINP_LEFT;
+	}
+
+	if(joy_axis[GPAD_LSTICK_Y] >= JTHRES) {
+		ginp_bnstate |= GINP_DOWN;
+	} else if(joy_axis[GPAD_LSTICK_Y] <= -JTHRES) {
+		ginp_bnstate |= GINP_UP;
+	}
+
+	CHECK_BUTTON(GPAD_LEFT, GINP_LEFT);
+	CHECK_BUTTON(GPAD_RIGHT, GINP_RIGHT);
+	CHECK_BUTTON(GPAD_UP, GINP_UP);
+	CHECK_BUTTON(GPAD_DOWN, GINP_DOWN);
+	CHECK_BUTTON(GPAD_A, GINP_ROTATE);
+	CHECK_BUTTON(GPAD_START, GINP_PAUSE);
+
+	update_ginp();
+
+	if(GINP_PRESS(GINP_LEFT)) {
+		game_keyboard('a', 1);
+	}
+	if(GINP_PRESS(GINP_RIGHT)) {
+		game_keyboard('d', 1);
+	}
+	if(GINP_PRESS(GINP_DOWN)) {
+		game_keyboard('s', 1);
+	}
+	if(GINP_PRESS(GINP_UP)) {
+		game_keyboard('\t', 1);
+	}
+	if(GINP_PRESS(GINP_ROTATE)) {
+		game_keyboard('w', 1);
+	}
+	if(GINP_PRESS(GINP_PAUSE)) {
+		game_keyboard('p', 1);
+	}
+
+#ifdef BUILD_VR
+	memset(joy_axis, 0, sizeof joy_axis);
+#endif
+}
+
 static void update(float dtsec)
 {
 	static long prev_tick;
 	long dt;
 
+	update_input(dtsec);
+
 	if(pause) {
 		prev_tick = time_msec;
 		return;
 	}
 	dt = time_msec - prev_tick;
 
-	/*
 	if(gameover) {
 		int i, row = PF_ROWS - gameover;
-		int *ptr;
+		unsigned int *ptr;
 
 		if(dt < GAMEOVER_FILL_RATE) {
 			return;
@@ -138,15 +296,14 @@ static void update(float dtsec)
 		if(row >= 0) {
 			ptr = pfield + row * PF_COLS;
 			for(i=0; i<PF_COLS; i++) {
-				*ptr++ = TILE_GAMEOVER;
+				*ptr++ = PF_VIS | PF_FULL | 7;
 			}
 
 			gameover++;
-			prev_tick = msec;
+			prev_tick = time_msec;
 		}
 		return;
 	}
-	*/
 
 	if(num_complines) {
 		/* lines where completed, we're in blinking mode */
@@ -162,6 +319,7 @@ static void update(float dtsec)
 			unsigned int *ptr = pfield + complines[i] * PF_COLS;
 			for(j=0; j<PF_COLS; j++) {
 				*ptr = (*ptr & ~PF_VIS) | ((blink & 1) << PF_VIS_SHIFT);
+				ptr++;
 			}
 		}
 		return;
@@ -188,32 +346,108 @@ static void update(float dtsec)
 		dt -= tick_interval;
 		prev_tick = time_msec;
 	}
+
+	update_cur_block();
 }
 
 static void draw(void)
 {
+	static const int nextblk_pos[] = {0, 0};
+	static const float lpos[] = {-1, 1, 6, 1};
+	float t;
+
 	glTranslatef(0, 0, -cam_dist);
 	glRotatef(cam_phi, 1, 0, 0);
 	glRotatef(cam_theta, 0, 1, 0);
 
+	glLightfv(GL_LIGHT0, GL_POSITION, lpos);
+
+	draw_starfield();
+
+	glPushAttrib(GL_ENABLE_BIT);
+	glBindTexture(GL_TEXTURE_2D, tex_well);
+	glEnable(GL_TEXTURE_2D);
+	glDisable(GL_LIGHTING);
+	glColor3f(1, 1, 1);
+	cmesh_draw(wellmesh);
+	glPopAttrib();
+
 	/* center playfield */
 	glPushMatrix();
-	glTranslatef(-PF_COLS / 2, PF_ROWS / 2, 0);
+	glTranslatef(-PF_COLS / 2 + 0.5, PF_ROWS / 2 - 0.5, 0);
 
 	drawpf();
 	if(cur_block >= 0) {
-		draw_block(cur_block, pos, cur_rot);
+		draw_block(cur_block, pos, cur_rot, 1.0f, 1.0f);
 	}
+	glPopMatrix();
+
+	glPushAttrib(GL_ENABLE_BIT);
+	glEnable(GL_BLEND);
+	glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 
+	glPushMatrix();
+	t = (float)time_msec / 1000.0f;
+	glTranslatef(-PF_COLS / 2 + 0.5 + PF_COLS + 3, PF_ROWS / 2 - 0.5, 0);
+	glTranslatef(1.5, -1, 0);
+	glRotatef(cos(t) * 8.0f, 1, 0, 0);
+	glRotatef(sin(t * 1.2f) * 10.0f, 0, 1, 0);
+	glTranslatef(-1.5, 1, 0);
+	draw_block(next_block, nextblk_pos, 0, 0.25f, 0.75f);
 	glPopMatrix();
+	glPopAttrib();
+
+	glPushAttrib(GL_ENABLE_BIT);
+	glDisable(GL_LIGHTING);
+
+	glPushMatrix();
+	glTranslatef(-11, 6, 0);
+	glScalef(0.05, 0.05, 0.05);
+
+	glColor3f(1, 1, 1);
+	dtx_string("Score");
+	glTranslatef(0, -dtx_line_height() * 1.5, 0);
+	glPushMatrix();
+	glScalef(1.5, 1.5, 1.5);
+	dtx_printf("%d", score);
+	glPopMatrix();
+
+	glTranslatef(0, -dtx_line_height() * 2, 0);
+	dtx_string("Level");
+	glTranslatef(0, -dtx_line_height() * 1.5, 0);
+	glPushMatrix();
+	glScalef(1.5, 1.5, 1.5);
+	dtx_printf("%d", level);
+	glPopMatrix();
+
+	glTranslatef(0, -dtx_line_height() * 2, 0);
+	dtx_string("Lines");
+	glTranslatef(0, -dtx_line_height() * 1.5, 0);
+	glPushMatrix();
+	glScalef(1.5, 1.5, 1.5);
+	dtx_printf("%d", lines);
+	glPopMatrix();
+
+	glPopMatrix();
+	glPopAttrib();
 }
 
-static void draw_block(int block, const int *pos, int rot)
+static const float blkspec[] = {0.85, 0.85, 0.85, 1};
+
+static void draw_block(int block, const int *pos, int rot, float sat, float alpha)
 {
-	int i, pal;
+	int i;
 	unsigned char *p = blocks[block][rot];
+	float col[4], hsv[3];
 
-	/*pal = FIRST_BLOCK_PAL + block;*/
+	rgb_to_hsv(blkcolor[block][0], blkcolor[block][1], blkcolor[block][2],
+			hsv, hsv + 1, hsv + 2);
+	hsv_to_rgb(hsv[0], hsv[1] * sat, hsv[2], col, col + 1, col + 2);
+	col[3] = alpha;
+
+	glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE, col);
+	glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, blkspec);
+	glMaterialf(GL_FRONT_AND_BACK, GL_SHININESS, 50.0f);
 
 	for(i=0; i<4; i++) {
 		int x = pos[1] + BLKX(*p);
@@ -223,7 +457,7 @@ static void draw_block(int block, const int *pos, int rot)
 		if(y < 0) continue;
 
 		glPushMatrix();
-		glTranslatef(x, y, 0);
+		glTranslatef(x, -y, 0);
 		cmesh_draw(blkmesh);
 		glPopMatrix();
 	}
@@ -237,9 +471,14 @@ static void drawpf(void)
 	for(i=0; i<PF_ROWS; i++) {
 		for(j=0; j<PF_COLS; j++) {
 			unsigned int val = *sptr++;
-			if(val & PF_FULL) {
+
+			glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE, blkcolor[val & 7]);
+			glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, blkspec);
+			glMaterialf(GL_FRONT_AND_BACK, GL_SHININESS, 50.0f);
+
+			if((val & (PF_FULL | PF_VIS)) == (PF_FULL | PF_VIS)) {
 				glPushMatrix();
-				glTranslatef(j, i, 0);
+				glTranslatef(j, -i, 0);
 				cmesh_draw(blkmesh);
 				glPopMatrix();
 			}
@@ -260,6 +499,7 @@ static void keyboard(int key, int pressed)
 
 	switch(key) {
 	case 'a':
+	case KEY_LEFT:
 		if(!pause) {
 			next_pos[1] = pos[1] - 1;
 			if(collision(cur_block, next_pos)) {
@@ -271,6 +511,7 @@ static void keyboard(int key, int pressed)
 		break;
 
 	case 'd':
+	case KEY_RIGHT:
 		if(!pause) {
 			next_pos[1] = pos[1] + 1;
 			if(collision(cur_block, next_pos)) {
@@ -282,6 +523,8 @@ static void keyboard(int key, int pressed)
 		break;
 
 	case 'w':
+	case KEY_UP:
+	case ' ':
 		if(!pause) {
 			prev_rot = cur_rot;
 			cur_rot = (cur_rot + 1) & 3;
@@ -294,11 +537,13 @@ static void keyboard(int key, int pressed)
 		break;
 
 	case 's':
+	case KEY_DOWN:
 		/* ignore drops until the first update after a spawn */
 		if(cur_block >= 0 && !just_spawned && !pause) {
 			next_pos[0] = pos[0] + 1;
 			if(collision(cur_block, next_pos)) {
 				next_pos[0] = pos[0];
+				update_cur_block();
 				stick(cur_block, next_pos);	/* stick immediately */
 			}
 		}
@@ -306,12 +551,14 @@ static void keyboard(int key, int pressed)
 
 	case '\n':
 	case '\t':
+	case '0':
 		if(!pause && cur_block >= 0) {
 			next_pos[0] = pos[0] + 1;
 			while(!collision(cur_block, next_pos)) {
 				next_pos[0]++;
 			}
 			next_pos[0]--;
+			update_cur_block();
 			stick(cur_block, next_pos);	/* stick immediately */
 		}
 		break;
@@ -376,6 +623,14 @@ static void wheel(int dir)
 {
 }
 
+static void update_cur_block(void)
+{
+	if(cur_block < 0) return;
+
+	memcpy(pos, next_pos, sizeof pos);
+	prev_rot = cur_rot;
+}
+
 static void addscore(int nlines)
 {
 	static const int stab[] = {40, 100, 300, 1200};	/* bonus per line completed */
@@ -427,6 +682,7 @@ static int collision(int block, const int *pos)
 
 		if(y < 0) continue;
 
+		if(x < 0 || x >= PF_COLS || y >= PF_ROWS) return 1;
 		if(pfield[y * PF_COLS + x] & PF_FULL) return 1;
 	}