Musisz dodać tutaj warunek sprawdzający nazwe maista. Jak znajde czas to jutro to napiszę. Narazie tylko zrobię zarys.
("sail_from_port",[(party_slot_eq,"$current_town",slot_party_type, spt_town),
(try_begin),
(eq,"$current_town", p_town_1), Tu ma być numerek miasta
(else_try),
(eq,"$current_town", p_town_2), Tu ma być innego miasta numerek miasa
(try_end),
], "Buy a ship (2000 denars)",
[(assign, "$g_player_icon_state", pis_ship),
(party_set_flags, "p_main_party", pf_is_ship, 1),
(troop_remove_gold, "trp_player", 2000),
(party_get_position, pos1, "p_main_party"),
(map_get_water_position_around_position, pos2, pos1, 6),
(party_set_position, "p_main_party", pos2),
(assign, "$g_main_ship_party", -1),
(change_screen_return),
]),Z czego to
(try_begin),
(eq,"$current_town", p_town_1), Tu ma być numerek miasta
(else_try),Można przekopiować tyle razy ile się chce.