namespace hr { namespace ads_game { multi::config scfg_ads; vector 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 (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; itype; 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 = scfg_ads.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, scfg_ads); 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; } }}