Allow professions to start with a nearby vehicle - trucker profession

data/json/professions.json

@@ -1481,6 +1481,23 @@
       "female": [ "bra", "panties" ]
     }
   },
+  {
+    "type": "profession",
+    "ident": "trucker",
+    "name": "Trucker",
+    "description": "You ruled the road in your big rig and managed to drive it somewhere you hoped was safe when the riots hit.  Now it's just you and your trusty truck cab.",
+    "points": 5,
+    "skills": [ { "level": 1, "name": "mechanics" }, { "level": 4, "name": "driving" } ],
+    "vehicle": "semi_truck",
+    "items": {
+      "both": {
+        "items": [ "tank_top", "socks", "boots_steel", "pants", "multitool", "wristwatch", "gloves_work", "hat_ball" ],
+        "entries": [ { "group": "charged_cell_phone" } ]
+      },
+      "male": [ "boxer_shorts" ],
+      "female": [ "bra", "panties" ]
+    }
+  },
   {
     "type": "profession",
     "ident": "lumberjack",

doc/JSON_INFO.md

@@ -803,12 +803,20 @@ Example for mods:
 
 This mod removes one of the rocks (the other rock is still created), the t-shirt, adds a 2x4 item and gives female characters a t-shirt with the special snippet id.
 
-#### `pet`
+#### `pets`
 
-(optional, string mtype_id)
+(optional, array of string mtype_ids )
 
-A string that is the same as a monster id
-player will start with this as a tamed pet.
+A list of strings, each is the same as a monster id
+player will start with these as tamed pets.
+
+#### `vehicle`
+
+(optional, string vproto_id )
+
+A  string, which is the same as a vehicle ( vproto_id )
+player will start with this as a nearby vehicle.
+( it will find the nearest road and place it there, then mark it as "remembered" on the overmap )
 
 #### `flags`
 

src/game.cpp

@@ -838,6 +838,9 @@ bool game::start_game()
             add_msg( m_debug, "cannot place starting pet, no space!" );
         }
     }
+    if( u.starting_vehicle ) {
+        place_starting_vehicle( u.starting_vehicle );
+    }
     // Assign all of this scenario's missions to the player.
     for( const mission_type_id &m : scen->missions() ) {
         const auto mission = mission::reserve_new( m, character_id() );
@@ -848,6 +851,68 @@ bool game::start_game()
     return true;
 }
 
+void game::place_starting_vehicle( const cata::optional<vproto_id> &starting_vehicle )
+{
+    vehicle veh( *starting_vehicle );
+    std::vector<std::string> omt_search_types;
+    if( veh.can_float() ) {
+        omt_search_types.push_back( "river" );
+        omt_search_types.push_back( "lake" );
+    }
+    if( veh.max_ground_velocity() > 0 ) {
+        omt_search_types.push_back( "road" );
+        omt_search_types.push_back( "field" );
+    }
+    if( omt_search_types.empty() ) {
+        return;
+    }
+    find_location_for_starting_vehicle( *starting_vehicle, omt_search_types );
+
+}
+
+void game::find_location_for_starting_vehicle( const vproto_id id,
+        std::vector<std::string> &omt_search_types )
+{
+    for( const std::string &search_type : omt_search_types ) {
+        omt_find_params find_params;
+        find_params.must_see = false;
+        find_params.cant_see = false;
+        find_params.types.emplace_back( search_type, ot_match_type::type );
+        for( int count = 0; count < 10; ++count ) {
+            // find nearest road
+            find_params.min_distance = count * 2;
+            find_params.search_range = 10 + count * 2;
+            // if player spawns underground, park their car on the surface.
+            tripoint omt_origin = u.global_omt_location();
+            omt_origin.z = 0;
+            std::vector<tripoint> goals = overmap_buffer.find_all( omt_origin, find_params );
+            for( const tripoint &goal : goals ) {
+                if( goal != overmap::invalid_tripoint ) {
+                    // try place vehicle there.
+                    tinymap target_map;
+                    target_map.load( omt_to_sm_copy( goal ), false );
+                    tripoint origin = target_map.getlocal( sm_to_ms_copy( omt_to_sm_copy( goal ) ) ) + point(
+                                          SEEX, SEEY );
+                    std::vector<int> angles = {0, 90, 180, 270};
+                    vehicle *veh = target_map.add_vehicle( id, origin, random_entry( angles ), rng( 50, 80 ),
+                                                           0,
+                                                           false );
+                    if( veh ) {
+                        tripoint abs_local = g->m.getlocal( target_map.getabs( origin ) );
+                        tripoint p_m = ms_to_sm_remain( abs_local );
+                        veh->sm_pos = p_m;
+                        veh->pos = abs_local.xy();
+                        overmap_buffer.add_vehicle( veh );
+                        target_map.save();
+                        return;
+                    }
+                }
+            }
+        }
+    }
+    debugmsg( "could not place starting vehicle" );
+}
+
 //Make any nearby overmap npcs active, and put them in the right location.
 void game::load_npcs()
 {

src/game.h

@@ -733,6 +733,10 @@ class game
         // Data Initialization
         void init_autosave();     // Initializes autosave parameters
         void create_starting_npcs(); // Creates NPCs that start near you
+        // try and place starting vehicle on a nearby road.
+        void place_starting_vehicle( const cata::optional<vproto_id> &starting_vehicle );
+        void find_location_for_starting_vehicle( const vproto_id id,
+                std::vector<std::string> &omt_search_types );
 
         // V Menu Functions and helpers:
         void list_items_monsters(); // Called when you invoke the `V`-menu

src/newcharacter.cpp

@@ -52,6 +52,7 @@
 #include "pimpl.h"
 #include "type_id.h"
 #include "cata_string_consts.h"
+#include "veh_type.h"
 
 // Colors used in this file: (Most else defaults to c_light_gray)
 #define COL_STAT_ACT        c_white   // Selected stat
@@ -518,6 +519,7 @@ bool avatar::create( character_type type, const std::string &tempname )
     for( mtype_id elem : prof->pets() ) {
         starting_pets.push_back( elem );
     }
+    starting_vehicle = prof->vehicle();
     std::list<item> prof_items = prof->items( male, get_mutations() );
 
     for( item &it : prof_items ) {
@@ -1476,14 +1478,19 @@ tab_direction set_profession( const catacurses::window &w, avatar &u, points_lef
             }
         }
         // Profession pet
-        cata::optional<mtype_id> montype;
         if( !sorted_profs[cur_id]->pets().empty() ) {
             buffer += colorize( _( "Pets:" ), c_light_blue ) + "\n";
             for( auto elem : sorted_profs[cur_id]->pets() ) {
                 monster mon( elem );
                 buffer += mon.get_name() + "\n";
             }
         }
+        // Profession vehicle
+        if( sorted_profs[cur_id]->vehicle() ) {
+            buffer += colorize( _( "Vehicle:" ), c_light_blue ) + "\n";
+            vproto_id veh_id = *sorted_profs[cur_id]->vehicle();
+            buffer += veh_id->name;
+        }
         // Profession spells
         if( !sorted_profs[cur_id]->spells().empty() ) {
             buffer += colorize( _( "Spells:" ), c_light_blue ) + "\n";

src/overmapbuffer.cpp

@@ -600,7 +600,8 @@ void overmapbuffer::remove_vehicle( const vehicle *veh )
 
 void overmapbuffer::add_vehicle( vehicle *veh )
 {
-    const point omt = ms_to_omt_copy( g->m.getabs( veh->global_pos3().xy() ) );
+    point abs_pos = g->m.getabs( veh->global_pos3().xy() );
+    const point omt = ms_to_omt_copy( abs_pos );
     const overmap_with_local_coords om_loc = get_om_global( omt );
     int id = om_loc.om->vehicles.size() + 1;
     // this *should* be unique but just in case

src/player.h

@@ -943,7 +943,7 @@ class player : public Character
 
         bool reach_attacking = false;
         bool manual_examine = false;
-
+        cata::optional<vproto_id> starting_vehicle;
         std::vector<mtype_id> starting_pets;
 
         void make_craft_with_command( const recipe_id &id_to_make, int batch_size, bool is_long = false,

src/profession.cpp

@@ -171,6 +171,9 @@ void profession::load( const JsonObject &jo, const std::string & )
         _description_male = to_translation( "prof_desc_male", desc );
         _description_female = to_translation( "prof_desc_female", desc );
     }
+    if( jo.has_string( "vehicle" ) ) {
+        _starting_vehicle = vproto_id( jo.get_string( "vehicle" ) );
+    }
     if( jo.has_array( "pets" ) ) {
         for( JsonObject subobj : jo.get_array( "pets" ) ) {
             int count = subobj.get_int( "amount" );
@@ -286,7 +289,10 @@ void profession::check_definition() const
     if( !item_group::group_is_defined( _starting_items_female ) ) {
         debugmsg( "_starting_items_female group is undefined" );
     }
-
+    if( _starting_vehicle && !_starting_vehicle->is_valid() ) {
+        debugmsg( "vehicle prototype %s for profession %s does not exist", _starting_vehicle->c_str(),
+                  id.c_str() );
+    }
     for( const auto &a : _starting_CBMs ) {
         if( !a.is_valid() ) {
             debugmsg( "bionic %s for profession %s does not exist", a.c_str(), id.c_str() );
@@ -434,6 +440,11 @@ std::list<item> profession::items( bool male, const std::vector<trait_id> &trait
     return result;
 }
 
+cata::optional<vproto_id> profession::vehicle() const
+{
+    return _starting_vehicle;
+}
+
 std::vector<mtype_id> profession::pets() const
 {
     return _starting_pets;

src/profession.h

@@ -13,6 +13,7 @@
 #include "pldata.h"
 #include "translations.h"
 #include "type_id.h"
+#include "veh_type.h"
 
 template<typename T>
 class generic_factory;
@@ -69,6 +70,7 @@ class profession
         std::vector<bionic_id> _starting_CBMs;
         std::vector<trait_id> _starting_traits;
         std::vector<mtype_id> _starting_pets;
+        cata::optional<vproto_id> _starting_vehicle;
         // the int is what level the spell starts at
         std::map<spell_id, int> _starting_spells;
         std::set<std::string> flags; // flags for some special properties of the profession
@@ -103,6 +105,7 @@ class profession
         signed int point_cost() const;
         std::list<item> items( bool male, const std::vector<trait_id> &traits ) const;
         std::vector<addiction> addictions() const;
+        cata::optional<vproto_id> vehicle() const;
         std::vector<mtype_id> pets() const;
         std::vector<bionic_id> CBMs() const;
         StartingSkillList skills() const;