1
0
mirror of https://github.com/zenorogue/hyperrogue.git synced 2024-10-31 19:36:16 +00:00
hyperrogue/rogueviz/ads/control.cpp
2022-10-16 09:46:04 +02:00

230 lines
6.1 KiB
C++

namespace hr {
namespace ads_game {
vector<string> move_names = { "acc down", "acc left", "acc up", "acc right", "fire", "pause", "display times", "switch spin", "menu", "[paused] future", "(paused] past", "[paused] move switch" };
void fire() {
if(!pdata.ammo) return;
playSound(nullptr, "fire");
pdata.ammo--;
auto c = vctr;
ads_matrix S0 = ads_inverse(current * vctrV) * spin(ang*degree);
ads_matrix S1 = S0 * lorentz(0, 2, ads_missile_rapidity);
auto& ro = ci_at[c].rocks;
auto r = std::make_unique<ads_object> (oMissile, c, S1, rsrc_color[rtAmmo]);
r->shape = &shape_missile;
r->life_start = 0;
ads_matrix Scell(Id, 0);
cell *lcell = hybrid::get_at(vctr, 0);
auto wcell = make_pair(vctr, 0);
int steps = 0;
compute_life(lcell, unshift(r->at), [&] (cell *c1, ld t) {
if(true) for(int i=0; i<lcell->type; i++) {
auto lcell1 = lcell->cmove(i);
auto wcell1 = hybrid::get_where(lcell1);
if(wcell1.first == c1) {
Scell = Scell * currentmap->adj(lcell, i);
optimize_shift(Scell);
lcell = lcell1;
wcell = wcell1;
adjust_to_zero(Scell, wcell, cgi.plevel);
steps++;
lcell = hybrid::get_at(wcell.first, 0);
break;
}
}
if(true) if(wcell.first != c1) {
println(hlog, "warning: got lost after ", steps, " steps");
println(hlog, wcell);
println(hlog, c1);
println(hlog, "their distance is ", PIU(celldistance(wcell.first, c1)));
return true;
}
auto& ci = ci_at[c1];
hybrid::in_underlying_geometry([&] {
gen_terrain(c1, ci);
});
if(among(ci.type, wtSolid, wtDestructible)) {
r->life_end = t;
auto Scell_inv = ads_inverse(Scell);
Scell_inv = Scell_inv * r->at;
Scell_inv = Scell_inv * ads_matrix(Id, t);
optimize_shift(Scell_inv);
auto X = ads_inverse(Scell);
X = X * (r->at * ads_matrix(Id, t));
optimize_shift(X);
ads_matrix prel = ads_inverse(S0) * r->at * ads_matrix(Id, t);
println(hlog, "crashed: proper time = ", t/TAU, " wall time = ", Scell_inv.shift / TAU, " player time = ", (prel.shift+ship_pt) / TAU, " start = ", ship_pt / TAU);
if(abs(X.shift - Scell_inv.shift) > .2) {
println(hlog, "INTRANSITIVITY ERROR! ", X.shift, " vs ", Scell_inv.shift);
exit(1);
}
return true;
}
return false;
});
ro.emplace_back(std::move(r));
}
bool handleKey(int sym, int uni) {
if(cmode & sm::NORMAL) {
char* t = multi::scfg.keyaction;
if(t[sym] >= 16 && t[sym] < 32) return true;
if(sym == 'v') pushScreen(game_menu);
if(sym == SDLK_ESCAPE) pushScreen(game_menu);
return true;
}
return false;
}
void apply_lorentz(transmatrix lor) {
current = ads_matrix(lor, 0) * current;
}
ld read_movement() {
ld mdx = multi::axespressed[4]/30000.;
ld mdy = multi::axespressed[5]/30000.;
#if CAP_VR
if(vrhr::active()) {
mdy -= vrhr::vrgo_y;
mdx += vrhr::vrgo_x;
}
#endif
if(mdx || mdy) {
ang = atan2(mdy, mdx) / degree;
return hypot(mdx, mdy);
}
auto& a = multi::actionspressed;
bool left = a[16+1];
bool right = a[16+3];
bool up = a[16+2];
bool down = a[16];
int clicks = (left?1:0) + (right?1:0) + (up?1:0) + (down?1:0);
if(left && right) left = right = false;
if(up && down) up = down = false;
if(left) ang = 180;
if(right) ang = 0;
if(up) ang = 90;
if(down) ang = 270;
if(left && up) ang = 135;
if(left && down) ang = 225;
if(right && up) ang = 45;
if(right && down) ang = 315;
ld mul = clicks ? 1 : 0;
if(clicks > 2) mul *= .3;
if(!paused) {
if(game_over || pdata.fuel < 0) mul = 0;
}
return mul;
}
bool ads_turn(int idelta) {
multi::handleInput(idelta);
ld delta = idelta / 1000.;
if(!(cmode & sm::NORMAL)) return false;
hybrid::in_actual([&] {
handle_crashes();
auto& a = multi::actionspressed;
auto& la = multi::lactionpressed;
if(a[16+4] && !la[16+4] && !paused) fire();
if(a[16+5] && !la[16+5]) switch_pause();
if(a[16+6] && !la[16+6]) view_proper_times = !view_proper_times;
if(a[16+7] && !la[16+7]) auto_rotate = !auto_rotate;
if(a[16+8] && !la[16+8]) pushScreen(game_menu);
if(auto_angle) pconf.model_orientation += ang;
if(true) {
/* proper time passed */
ld pt = delta * ads_simspeed;
ld mul = read_movement();
ld dv = pt * ads_accel * mul;
if(paused && a[16+11]) {
current = ads_matrix(spin(ang*degree) * xpush(mul*delta*-pause_speed) * spin(-ang*degree), 0) * current;
}
else
apply_lorentz(spin(ang*degree) * lorentz(0, 2, -dv) * spin(-ang*degree));
if(!paused) {
pdata.fuel -= dv;
gen_particles(rpoisson(dv*fuel_particle_qty), vctr, ads_inverse(current * vctrV) * spin(ang*degree+M_PI) * rots::uxpush(0.06 * ads_scale), rsrc_color[rtFuel], fuel_particle_rapidity, fuel_particle_life, 0.02);
}
ld tc = 0;
if(!paused) tc = pt;
else if(a[16+9]) tc = pt;
else if(a[16+10]) tc = -pt;
if(!paused && !game_over) {
shipstate ss;
ss.at = ads_inverse(current * vctrV) * spin((ang+90)*degree);
ss.ang = ang;
ss.current = current;
ss.start = ship_pt;
ss.duration = pt;
ss.vctrV = vctrV;
ss.vctr = vctr;
history.emplace_back(ss);
ci_at[vctr].shipstates.emplace_back(ss);
}
current.T = cspin(3, 2, tc) * current.T;
optimize_shift(current);
hassert(eqmatrix(chg_shift(current.shift) * current.T, unshift(current)));
if(auto_rotate)
current.T = cspin(1, 0, tc) * current.T;
else if(!paused)
ang += tc / degree;
if(!paused) {
ship_pt += pt;
pdata.oxygen -= pt;
if(pdata.oxygen < 0) {
pdata.oxygen = 0;
game_over = true;
}
}
else view_pt += tc;
}
if(auto_angle) pconf.model_orientation -= ang;
fixmatrix_ads(current.T);
fixmatrix_ads(new_vctrV.T);
});
return true;
}
}}