Providing for the player and her initial situation, that is, at the start of play.

§1.

void RTPlayer::compile_generic_constants?Usage of RTPlayer::compile_generic_constants:
Generic Module - §1(void) {
    RTPlayer::InitialSituation_define(PLAYER_OBJECT_INIS_HL, 0);
    RTPlayer::InitialSituation_define(START_OBJECT_INIS_HL, 1);
    RTPlayer::InitialSituation_define(START_ROOM_INIS_HL, 2);
    RTPlayer::InitialSituation_define(START_TIME_INIS_HL, 3);
    RTPlayer::InitialSituation_define(START_BEAT_INIS_HL, 4);
    RTPlayer::InitialSituation_define(DONE_INIS_HL, 5);
}

void RTPlayer::InitialSituation(void) {
    inter_name *iname = Hierarchy::find(INITIALSITUATION_HL);
    packaging_state save = EmitArrays::begin_word(iname, K_value);
    RTVariables::initial_value_as_array_entry(player_VAR);
    if (start_object == NULL) EmitArrays::numeric_entry(0);
    else EmitArrays::iname_entry(RTInstances::value_iname(start_object));
    if (start_room == NULL) EmitArrays::numeric_entry(0);
    else EmitArrays::iname_entry(RTInstances::value_iname(start_room));
    RTVariables::initial_value_as_array_entry(time_of_day_VAR);
    RTDialogueBeats::compile_starting_beat_entry();
    EmitArrays::numeric_entry(0);
    EmitArrays::end(save);
    Hierarchy::make_available(iname);
}

void RTPlayer::InitialSituation_define(int id, int val) {
    inter_name *iname = Hierarchy::find(id);
    EmitArrays::begin_word(iname, K_value);
    Emit::numeric_constant(iname, (inter_ti) val);
    Hierarchy::make_available(iname);
}

§2. "Player" is set in an unusual way. That is, Inform does not compile

now the player is Mr Chasuble;

to something like player = O31_mr_chasuble, as it would do for a typical variable. It's very important that code compiled by Inform 7 doesn't do this, because if executed it would break the invariants for WorldModelKit variables about the current situation. The correct thing is always to call the function ChangePlayer instead:

void RTPlayer::player_schema(nonlocal_variable *nlv) {
    RTVariables::set_write_schema(nlv, I"ChangePlayer(*2)");
}