mirrors/hyperrogue
1
0
Fork 0
mirror of https://github.com/zenorogue/hyperrogue.git synced 2025-10-31 05:52:59 +00:00
Code Issues Releases Wiki Activity
Files
42d769e75ccfda3089df044adf4a5e2357ca0fd3
hyperrogue/rogueviz/ads/ads-game.cpp
Zeno Rogue f642db223b fix to RELHELL standalone
2025-06-25 00:28:34 +02:00

398 lines
14 KiB
C++
Raw Blame History

/* Main file of Relative Hell. */
/* Compile with mymake -O3 -rv rogueviz/ads/ads-game */
/* Best run with -ads-menu; more detailed options are available too */
#define VER_RH "1.1"
#ifdef RELHELL
#define CUSTOM_CAPTION "Relative Hell " VER_RH
#define MAXMDIM 4
#define CAP_INV 0
#define CAP_COMPLEX2 0
#define CAP_EDIT 0
#define CAP_BT 0
#define CAP_SOLV 0
#define CAP_THREAD 0
#define CAP_FILES 1
#define CAP_CONFIG 1
#define CAP_CRYSTAL 0
#define CAP_ARCM 0
#define CAP_HISTORY 0
#define CAP_STARTANIM 0
#include "../../hyper.cpp"
#include "../presentation.cpp"
namespace rogueviz { std::vector<hr::reaction_t> cleanup; }
#endif
#include "../rogueviz.h"
#include "math.cpp"
#include "globals.cpp"
#include "shapes.cpp"
#include "resources.cpp"
#include "ads-lands.cpp"
#include "map.cpp"
#include "control.cpp"
#include "display.cpp"
#include "menu.cpp"
#include "ds-game.cpp"
#include "ds-texture.cpp"
#include "views.cpp"
#include "tour.cpp"
#include "help.cpp"
#include "hiscore.cpp"
namespace hr {
namespace ads_game {
/* ADS-specific keys */
void set_default_keys() {
multi::change_default_key(lps_relhell, SDL12('p', SDL_SCANCODE_P), 16 + 9);
multi::change_default_key(lps_relhell, SDL12('t', SDL_SCANCODE_T), 16 + 10);
multi::change_default_key(lps_relhell, SDL12('o', SDL_SCANCODE_O), 16 + 11);
multi::change_default_key(lps_relhell, SDL12('m', SDL_SCANCODE_M), 16 + 12);
multi::change_default_key(lps_relhell, SDL12('i', SDL_SCANCODE_I), 16 + 13);
multi::change_default_key(lps_relhell, SDL12('k', SDL_SCANCODE_K), 16 + 14);
multi::change_default_key(lps_relhell, SDL12('l', SDL_SCANCODE_L), 16 + 15);
}
void ads_sub_restart() {
if(in_spacetime()) {
switch_spacetime();
ads_sub_restart();
switch_spacetime();
return;
}
hybrid::in_actual([&] {
vctr = new_vctr = starting_point;
vctrV = new_vctrV = current = ads_matrix(Id, 0);
init_rsrc();
});
ci_at.clear();
displayed.clear();
gen_terrain(vctr, ci_at[vctr], -2);
forCellEx(c1, vctr) ci_at[c1].type = wtNone;
ci_at[vctr].type = wtNone;
invincibility_pt = ads_how_much_invincibility;
paused = false;
ship_pt = 0;
no_param_change = all_params_default();
init_gamedata();
}
void ads_restart() {
bool b = in_spacetime();
stop_game();
run_ads_game();
// to ensure correct LPS, switch reverse first
switch_spacetime_to(!b);
switch_spacetime_to(b);
}
purehookset hooks_pre_ads_start;
bool changed_structure = false;
void run_ads_game_hooks() {
rogueviz::rv_hook(hooks_global_mouseover, 100, generate_mouseovers);
rogueviz::rv_change<color_t>(titlecolor, 0);
rogueviz::rv_hook(hooks_frame, 100, view_ads_game);
rogueviz::rv_hook(hooks_prestats, 100, display_rsrc);
rogueviz::rv_hook(hooks_handleKey, 150, handleKey);
rogueviz::rv_hook(hooks_drawcell, 0, ads_draw_cell);
rogueviz::rv_hook(shmup::hooks_turn, 0, ads_turn);
rogueviz::rv_hook(anims::hooks_anim, 100, replay_animation);
rogueviz::rv_hook(hooks_nextland, 0, ads_nextland);
rogueviz::rv_hook(hooks_music, 100, [] (eLand& l) { l = vctr->land; return false; });
if(!changed_structure) {
specialland = laCrossroads; land_structure = lsNiceWalls;
}
}
void run_size_hooks() {
rogueviz::rv_hook(hooks_scalefactor, 100, [] (geometry_information *i) {
i->scalefactor = vid.creature_scale / 3;
});
rogueviz::rv_hook(hooks_cgi_string, 100, [] (string& s) { s += " ads"; });
}
void run_ads_game() {
if(!sl2) set_geometry(gTwistedProduct);
if(hybrid::csteps) {
stop_game();
hybrid::csteps = 0;
}
run_size_hooks();
hybrid::reconfigure(); // we need to reconfigure to take scalefactor change into account
run_ads_game_hooks();
callhooks(hooks_pre_ads_start);
start_game();
starting_point = hybrid::get_where(cwt.at).first;
cgi.use_count++;
hybrid::in_underlying_geometry([] {
cgi.use_count++;
});
auto umap = hybrid::get_umap();
hybrid::actual_geometry = geometry;
geometry = hybrid::underlying;
hybrid::underlying_cgip->single_step = cgi.single_step;
hybrid::underlying_cgip->psl_steps = cgi.psl_steps;
cgip = hybrid::underlying_cgip;
hybrid::pmap = currentmap;
currentmap = umap;
pmodel = mdDisk;
cwt.at = centerover = currentmap->gamestart();
ads_sub_restart();
}
void add_ads_cleanup() {
rogueviz::on_cleanup_or_next([] {
switch_spacetime_to(true);
displayed.clear();
});
}
local_parameter_set lps_relhell("relhell:");
local_parameter_set lps_relhell_space("relhell:space:", &lps_relhell);
local_parameter_set lps_relhell_ds_spacetime("relhell:ds:", &lps_relhell);
local_parameter_set lps_relhell_ads_spacetime("relhell:ads:", &lps_relhell);
local_parameter_set lps_relhell_ds_spacetime_klein("relhell:ads:klein:", &lps_relhell_ds_spacetime);
local_parameter_set lps_relhell_ds_spacetime_pers("relhell:ads:pers:", &lps_relhell_ds_spacetime);
void default_settings() {
set_default_keys();
// lps_add(lps_relhell, nohelp, 1);
lps_add(lps_relhell, nomenukey, true);
lps_add(lps_relhell, nomap, true);
lps_add(lps_relhell, no_find_player, true);
lps_add(lps_relhell, showstartmenu, false);
lps_add(lps_relhell, mapeditor::drawplayer, false);
lps_add(lps_relhell, vid.drawmousecircle, false);
lps_add(lps_relhell, draw_centerover, false);
lps_add(lps_relhell, vid.axes3, false);
lps_add(lps_relhell, ccolor::which, &ccolor::random);
lps_add(lps_relhell, ccolor::rwalls, 0);
lps_add(lps_relhell, vid.fov, 150.);
lps_add(lps_relhell, specialland, laCrossroads);
lps_add(lps_relhell, land_structure, lsNiceWalls);
lps_add(lps_relhell, vid.creature_scale, 1);
lps_add(lps_relhell_ds_spacetime_klein, pmodel, mdDisk);
lps_add(lps_relhell_ds_spacetime_klein, pconf.alpha, 0.);
lps_add(lps_relhell_ds_spacetime_pers, pmodel, mdPerspective);
lps_add(lps_relhell_ds_spacetime, vid.grid, true);
lps_add(lps_relhell_ds_spacetime, stdgridcolor, 0xFFFFFFFF);
lps_add(lps_relhell_ds_spacetime, models::desitter_projections, true);
lps_add(lps_relhell_space, pmodel, mdDisk);
lps_add(lps_relhell_space, pconf.scale, .95);
lps_add(lps_relhell_ads_spacetime, pmodel, mdRelPerspective);
lps_add(lps_relhell_ads_spacetime, nonisotropic_weird_transforms, true);
lps_add(lps_relhell_ads_spacetime, vid.grid, false);
lps_add(lps_relhell_ads_spacetime, slr::range_xy, 2.);
lps_add(lps_relhell_ads_spacetime, slr::range_z, 2.);
charstyle& cs = getcs();
lps_add(lps_relhell, cs.skincolor, 0xFFFFFFFF);
lps_add(lps_relhell, cs.eyecolor, 0x8080FFFF);
lps_add(lps_relhell, cs.dresscolor, 0xFFC0C0FF);
lps_add(lps_relhell, cs.haircolor, 0xC0FFC0FF);
}
void gamedata_store(struct hr::gamedata* gd) {
gd->store(history);
gd->store(ci_at);
gd->store(rocks);
gd->store(main_rock);
gd->store(ship_pt);
gd->store(view_pt);
gd->store(invincibility_pt);
gd->store(current);
gd->store(current_ship);
gd->store(vctr);
gd->store(new_vctr);
gd->store(vctr_ship);
gd->store(vctrV);
gd->store(new_vctrV);
gd->store(vctrV_ship);
gd->store(ang);
gd->store(paused);
gd->store(pdata);
}
void set_config() {
load_hiscores();
lps_enable(&lps_relhell);
// enable_canvas();
}
void run_ads_game_std() {
set_config();
set_geometry(gNormal);
set_variation(eVariation::pure);
lps_enable(&lps_relhell_space);
run_ads_game();
showstartmenu = false;
}
void change_scale(ld s) {
vid.creature_scale *= s;
rock_density /= (s * s);
rock_max_rapidity *= s;
ads_simspeed *= s;
ds_accel *= s;
pconf.scale /= s;
ads_how_much_invincibility *= s;
ads_max_pdata.oxygen *= s;
ads_tank_pdata.oxygen *= s;
crash_particle_life *= s;
fuel_particle_life *= s;
}
auto shot_hooks =
arg::add3("-ads-game1", run_ads_game)
+ arg::add3("-ads-game", run_ads_game_std)
+ arg::add3("-ads-zero", set_config)
+ arg::add3("-ads-menu", [] { set_config(); pushScreen(pick_the_game); })
+ arg::add3("-ads-scale", [] { arg::shift(); ld s = arg::argf(); change_scale(s); })
+ arg::add3("-ads-restart", restart)
+ addHook(hooks_gamedata, 500, gamedata_store)
+ addHook(hooks_configfile, 100, [] {
param_f(ads_how_much_invincibility, "ads_invinc")
-> editable(0, TAU, TAU/4, "AdS invincibility time", "How long does the period of invincibility after crashing last, in absolute units.", 'i');
param_f(ds_how_much_invincibility, "ds_invinc")
-> editable(0, TAU, TAU/4, "dS invincibility time", "How long does the period of invincibility after crashing last, in absolute units.", 'i');
param_b(auto_angle, "ads_auto_angle")
-> editable("automatically rotate the projection", 'a');
param_f(ads_simspeed, "ads_game_simspeed")
-> editable(0, 2*TAU, TAU/4, "AdS game speed", "Controls the speed of the game, in absolute units per second.", 's');
param_f(ds_simspeed, "ds_game_simspeed")
-> editable(0, 2*TAU, TAU/4, "dS game speed", "Controls the speed of the game, in absolute units per second.", 's');
/*param_f(ads_scale, "ads_game_scale")
-> editable(0, 2, 0.1, "AdS game scale", "Controls the scaling of game objects.", 'c');
param_f(ds_scale, "ds_game_scale")
-> editable(0, 2, 0.1, "dS game scale", "Controls the scaling of game objects.", 'c'); */
param_f(ads_accel, "ads_game_accel")
-> editable(0, 30, 1, "AdS acceleration", "Controls your ship's acceleration, in absolute units per second squared.", 'a');
param_f(ds_accel, "ds_game_accel")
-> editable(0, 30, 1, "dS acceleration", "Controls your ship's acceleration, in absolute units per second squared.", 'a');
param_f(ads_time_unit, "ads_time_unit")
-> editable(0, 2*TAU, 1, "AdS time unit",
"Controls the unit used when the 'display the proper times' option is on.\n\n"
"It takes tau(=2π) units to go the full circle, so the default time unit is tau. You can also use the absolute units (1).\n\n"
"Times in settings are always specified in absolute units."
, 'a');
param_f(ds_time_unit, "ds_time_unit")
-> editable(0, 2*TAU, 1, "dS time unit",
"Controls the unit used when the 'display the proper times' option is on.\n\n"
"It takes tau(=2π) units to go the full circle, so the default time unit is tau. You can also use the absolute units (1).\n\n"
"Times in settings are always specified in absolute units."
, 'a');
param_f(pause_speed, "ads_pause_speed")
-> editable(0, 30, 1, "movement speed while paused", "Controls the speed of camera movement while paused and holding the 'move switch' key. Absolute units per second.", 'v');
param_f(rock_density, "ads_rock_density")
-> editable(0, 5, 0.05, "rock density", "how many rocks to generate", 'd');
param_f(rock_max_rapidity, "ads_rock_rapidity")
-> editable(0, 5, 0.05, "rock rapidity", "how fast should the rocks be relative to the map", 'w');
param_f(ads_missile_rapidity, "ads_missile_rapidity")
-> editable(0, 5, 0.05, "AdS missile rapidity", "how fast should the missiles go relative to the ship", 'm');
param_f(ds_missile_rapidity, "ds_missile_rapidity")
-> editable(0, 5, 0.05, "dS missile rapidity", "how fast should the missiles go relative to the ship", 'm');
param_b(auto_rotate, "ads_auto_rotate")
-> editable("automatically rotate the screen", 'r');
param_b(view_proper_times, "ads_display")
-> editable("display the proper times", 't');
param_f(crash_particle_rapidity, "ads_crash_rapidity")
-> editable(0, 5, 0.1, "crash particle rapidity", "how fast should the crash particles be", 'r');
param_f(crash_particle_qty, "ads_crash_qty")
-> editable(0, 5, 0.1, "crash particle quantity", "how many crash particles", 'q');
param_f(crash_particle_life, "ads_crash_life")
-> editable(0, 5, 0.1, "crash particle lifetime", "how long should the crash particles live", 'l');
param_f(fuel_particle_rapidity, "ads_fuel_rapidity")
-> editable(0, 5, 0.1, "fuel particle rapidity", "how fast should the fuel particles be", 'R');
param_f(fuel_particle_qty, "ads_fuel_qty")
-> editable(0, 5, 0.1, "fuel particle quantity", "how many fuel particles", 'Q');
param_f(fuel_particle_life, "ads_fuel_life")
-> editable(0, 5, 0.1, "fuel particle lifetime", "how long should the fuel particles live", 'L');
param_i(max_gen_per_frame, "ads_gen_per_frame")
-> editable(0, 100, 1, "tiles to generate per frame", "reduce if the framerate is low", 'G');
param_i(draw_per_frame, "ads_draw_per_frame")
-> editable(0, 3000, 0.1, "tiles to draw per frame", "reduce if the framerate is low", 'D');
param_f(time_scale, "rh_time_scale")
-> editable(0, 1, 0.1, "Relative Hell time label scale", "scaling factor for the time labels", 'T');
param_f(time_shift, "rh_time_shift")
-> editable(0, 1, 0.1, "Relative Hell time label shift", "shift for the time labels", 'U');
param_i(XSCALE, "ds_xscale")
-> editable(4, 512, 8, "x precision of Earth-de Sitter", "", 'x');
param_i(YSCALE, "ds_yscale")
-> editable(4, 512, 8, "y precision of Earth-de Sitter", "", 'y');
param_i(talpha, "ds_talpha")
-> editable(0, 255, 16, "dS texture intensity", "", 't');
param_f(spacetime_step, "ads_spacetime_step")
-> editable(0, 1, 0.05, "step size in the spacetime display", "", 's');
param_i(spacetime_qty, "ads_spacetime_qty")
-> editable(0, 100, 5, "step quantity in the spacetime display", "", 'q');
param_color(ghost_color, "color:ghost", true);
param_enum(hi_sort_by, "sort_by", 3)
->editable({{"platinum", ""}, {"plasteel", ""}, {"uranium", ""}, {"total score", ""}}, "sort high scores by", 'h');
rsrc_config();
});
#ifdef RELHELL
auto hook1=
addHook(hooks_config, 100, [] {
if(arg::curphase == 1) {
conffile = "relhell.ini";
}
if(arg::curphase == 2) {
set_config();
enable_canvas();
}
if(arg::curphase == 3) {
showstartmenu = false;
popScreenAll();
pushScreen(pick_the_game);
}
});
#endif
auto hook2 = addHook(hooks_configfile, 300, default_settings)
+ arg::add3("-relhell", [] {
set_config();
enable_canvas();
showstartmenu = false; popScreenAll(); pushScreen(pick_the_game);
});
}
}
Reference in New Issue View Git Blame Copy Permalink