taisei/src/stages/stage3.c

/*
 * This software is licensed under the terms of the MIT-License
 * See COPYING for further information.
 * ---
 * Copyright (C) 2011, Lukas Weber <laochailan@web.de>
 * Copyright (C) 2012, Alexeyew Andrew <http://akari.thebadasschoobs.org/>
 */

#include "stage3.h"
#include "global.h"
#include "stage.h"
#include "stageutils.h"
#include "stage3_events.h"

typedef struct Stage3State {
	float clr_r;
	float clr_g;
	float clr_b;

	float fog_exp;

	float tunnel_angle;
	float tunnel_avel;
	float tunnel_updn;
	float tunnel_side;
} Stage3State;

static Stage3D bgcontext;
static Stage3State stgstate;

Vector **stage3_bg_pos(Vector pos, float maxrange) {
	//Vector p = {100 * cos(global.frames / 52.0), 100, 50 * sin(global.frames / 50.0)};
	Vector p = {
		stgstate.tunnel_side * cos(global.frames / 52.0),
		0,
		stgstate.tunnel_updn * sin(global.frames / 50.0)
	};
	Vector r = {0, 3000, 0};

	return linear3dpos(pos, maxrange, p, r);
}

void stage3_bg_tunnel_draw(Vector pos) {
	int n = 6;
	float r = 300;
	int i;

	glEnable(GL_TEXTURE_2D);

	glPushMatrix();
	glTranslatef(pos[0], pos[1], pos[2]);

	glBindTexture(GL_TEXTURE_2D, get_tex("stage3/border")->gltex);
	for(i = 0; i < n; i++) {
		glPushMatrix();
		glRotatef(360.0/n*i + stgstate.tunnel_angle, 0, 1, 0);
		glTranslatef(0,0,-r);
		glScalef(2*r/tan((n-2)*M_PI/n), 3000, 1);
		draw_quad();
		glPopMatrix();
	}

	glPopMatrix();
	glDisable(GL_TEXTURE_2D);
}

void stage3_tunnel(int fbonum) {
	Shader *shader = get_shader("tunnel");

	glColor4f(1,1,1,1);
	glUseProgram(shader->prog);
	glUniform3f(uniloc(shader, "color"),stgstate.clr_r,stgstate.clr_g,stgstate.clr_b);
	glActiveTexture(GL_TEXTURE0 + 2);
	glBindTexture(GL_TEXTURE_2D, resources.fbg[fbonum].depth);
	glActiveTexture(GL_TEXTURE0);

	draw_fbo_viewport(&resources.fbg[fbonum]);
	glUseProgram(0);
}

void stage3_fog(int fbonum) {
	Shader *shader = get_shader("zbuf_fog");

	glColor4f(1,1,1,1);
	glUseProgram(shader->prog);
	glUniform1i(uniloc(shader, "depth"), 2);
	glUniform4f(uniloc(shader, "fog_color"), .5, .5, .5, 1.0);
	glUniform1f(uniloc(shader, "start"), 0.2);
	glUniform1f(uniloc(shader, "end"), 0.8);
	glUniform1f(uniloc(shader, "exponent"), stgstate.fog_exp/2);
	glUniform1f(uniloc(shader, "sphereness"),0);
	glActiveTexture(GL_TEXTURE0 + 2);
	glBindTexture(GL_TEXTURE_2D, resources.fbg[fbonum].depth);
	glActiveTexture(GL_TEXTURE0);

	draw_fbo_viewport(&resources.fbg[fbonum]);
	glUseProgram(0);
}

void stage3_start(void) {
	init_stage3d(&bgcontext);

 	bgcontext.cx[2] = -10;
	bgcontext.crot[0] = -95;
	bgcontext.cv[1] = 10;

	add_model(&bgcontext, stage3_bg_tunnel_draw, stage3_bg_pos);

	memset(&stgstate, 0, sizeof(Stage3State));
	stgstate.clr_r = 1.0;
	stgstate.clr_g = 0.0;
	stgstate.clr_b = 0.5;

// TESTING
//	bgcontext.cv[1] = -90;
//	stgstate.fog_exp = 5.0;
}

void stage3_preload(void) {
	get_resource(RES_BGM,     "bgm_stage3",          RESF_TRANSIENT);
	get_resource(RES_BGM,     "bgm_stage3boss",      RESF_TRANSIENT);
	get_resource(RES_TEXTURE, "stage3/border",       RESF_REQUIRED | RESF_TRANSIENT);
	get_resource(RES_TEXTURE, "stage3/spellbg1",     RESF_REQUIRED | RESF_TRANSIENT);
	get_resource(RES_TEXTURE, "stage3/wspellbg",     RESF_REQUIRED | RESF_TRANSIENT);
	get_resource(RES_TEXTURE, "stage3/wspellclouds", RESF_REQUIRED | RESF_TRANSIENT);
	get_resource(RES_TEXTURE, "stage3/wspellswarm",  RESF_REQUIRED | RESF_TRANSIENT);
}

void stage3_end(void) {
	free_stage3d(&bgcontext);
}

void stage3_draw(void) {
	TIMER(&global.timer)

	set_perspective(&bgcontext, 300, 5000);
	stgstate.tunnel_angle += stgstate.tunnel_avel;
 	bgcontext.crot[2] = -(creal(global.plr.pos)-VIEWPORT_W/2)/80.0;
#if 1
	FROM_TO(0, 160, 1) {
		bgcontext.cv[1] -= 0.5/2;
		stgstate.clr_r -= 0.2 / 160.0;
		stgstate.clr_b -= 0.1 / 160.0;
	}

	FROM_TO(0, 500, 1)
		stgstate.fog_exp += 5.0 / 500.0;

	FROM_TO(400, 500, 1) {
		stgstate.tunnel_avel += 0.005;
		bgcontext.cv[1] -= 0.3/2;
	}

	FROM_TO(1050, 1150, 1) {
		stgstate.tunnel_avel -= 0.010;
		bgcontext.cv[1] -= 0.2/2;
	}

	FROM_TO(1060, 1400, 1) {
		/*stgstate.clr_r -= 1.0 / 340.0;
		stgstate.clr_g += 1.0 / 340.0;
		stgstate.clr_b -= 0.5 / 340.0;*/
	}

	FROM_TO(1170, 1400, 1)
		stgstate.tunnel_side += 100.0 / 230.0;

	FROM_TO(1400, 1550, 1) {
		bgcontext.crot[0] -= 3 / 150.0;
		stgstate.tunnel_updn += 70.0 / 150.0;
		stgstate.tunnel_avel += 1 / 150.0;
		bgcontext.cv[1] -= 0.2/2;
	}

	FROM_TO(1570, 1700, 1) {
		stgstate.tunnel_updn -= 20 / 130.0;
	}

	FROM_TO(1800, 1850, 1)
		stgstate.tunnel_avel -= 0.02;

	FROM_TO(1900, 2000, 1) {
		stgstate.tunnel_avel += 0.013;
	}

	FROM_TO(2000, 2740, 1) {
		stgstate.tunnel_side -= 100.0 / 740.0;
		//stgstate.fog_exp -= 1.0 / 740.0;
		bgcontext.crot[0] += 11 / 740.0;
	}

	FROM_TO(2740, 2799, 1) {
		stgstate.fog_exp += 3.0 / 60.0;
		bgcontext.cv[1] += 1.0/2;
		stgstate.tunnel_avel -= 0.7 / 60.0;
		bgcontext.crot[0] -= 11 / 60.0;
	}

	// 2800 - MIDBOSS

	FROM_TO(2900, 3100, 1) {
		bgcontext.cv[1] -= 90 / 200.0/2;
		stgstate.tunnel_avel -= 1 / 200.0;
		stgstate.fog_exp -= 1.0 / 200.0;
		stgstate.clr_b += 0.2 / 200.0;
	}

	FROM_TO(3300, 3360, 1) {
		stgstate.tunnel_avel += 2 / 60.0;
		stgstate.tunnel_side += 70 / 60.0;
	}

	FROM_TO(3600, 3700, 1) {
		stgstate.tunnel_side += 20 / 60.0;
		stgstate.tunnel_updn += 40 / 60.0;
	}

	FROM_TO(3830, 3950, 1) {
		stgstate.tunnel_avel -= 2 / 120.0;
	}

	FROM_TO(3960, 4000, 1) {
		stgstate.tunnel_avel += 2 / 40.0;
	}

	FROM_TO(4360, 4390, 1) {
		stgstate.clr_r -= .5 / 30.0;
	}

	FROM_TO(4390, 4510, 1) {
		stgstate.clr_r += .5 / 120.0;
	}

	FROM_TO(4299, 5299, 1) {
		stgstate.tunnel_side -= 90 / 1000.0;
		stgstate.tunnel_updn -= 40 / 1000.0;
		stgstate.clr_r -= 0.5 / 1000.0;
		bgcontext.crot[0] += 7 / 1000.0;
		//stgstate.fog_exp -= 3.0 / 1000.0;
	}

	// 5300 - BOSS

	FROM_TO(5099, 5299, 1) {
		bgcontext.cv[1] += 90 / 200.0/2;
		stgstate.tunnel_avel -= 1.1 / 200.0;
		bgcontext.crot[0] -= 15 / 200.0;
		stgstate.fog_exp += 3.0 / 200.0;
	}

	FROM_TO(5301, 5500, 1) {
		bgcontext.cv[1] -= 70 / 200.0/2;
		stgstate.clr_r += 1.1 / 200.0;
		stgstate.clr_b -= 0.6 / 200.0;
	}

	FROM_TO(5301, 5700, 1) {
		bgcontext.crot[0] -= 10 / 400.0;
		stgstate.fog_exp -= 4.0 / 400.0;
		//stgstate.tunnel_avel -= 0.5 / 200.0;
	}
#endif

	draw_stage3d(&bgcontext, 7000);
}

void stage3_mid_spellbg(Boss*, int t);

void stage3_spellpractice_events(void) {
	TIMER(&global.timer);

	AT(0) {
		if(global.stage->spell->draw_rule == stage3_mid_spellbg) {
			skip_background_anim(&bgcontext, stage3_draw, 2800, &global.timer, NULL);
			global.boss = create_boss("Scuttle", "scuttle", BOSS_DEFAULT_SPAWN_POS);
		} else {
			skip_background_anim(&bgcontext, stage3_draw, 5300, &global.timer, NULL);
			global.boss = create_boss("Wriggle EX", "wriggleex", BOSS_DEFAULT_SPAWN_POS);
		}

		boss_add_attack_from_info(global.boss, global.stage->spell, true);
		start_attack(global.boss, global.boss->attacks);

		start_bgm("bgm_stage3boss");
	}
}

ShaderRule stage3_shaders[] = { stage3_fog, stage3_tunnel, NULL };

StageProcs stage3_procs = {
	.begin = stage3_start,
	.preload = stage3_preload,
	.end = stage3_end,
	.draw = stage3_draw,
	.event = stage3_events,
	.shader_rules = stage3_shaders,
	.spellpractice_procs = &stage3_spell_procs,
};

StageProcs stage3_spell_procs = {
	.begin = stage3_start,
	.end = stage3_end,
	.draw = stage3_draw,
	.event = stage3_spellpractice_events,
	.shader_rules = stage3_shaders,
};