# script_setup_random_scene
# Input: arg1 = center_no, arg2 = mission_template_no
# Output: none
("setup_random_scene",
[
(party_get_current_terrain, ":terrain_type", "p_main_party"),
(assign, ":scene_to_use", "scn_random_scene"),
(try_begin),
(eq, ":terrain_type", rt_steppe),
(store_random_in_range, "$rand2", 0, 9),
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_steppe1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_steppe1"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_steppe2"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_steppe3"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_steppe4"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_steppe5"),
(else_try),
(eq,"$rand2",6),
(assign, ":scene_to_use", "scn_random_scene_steppe6"),
(else_try),
(eq,"$rand2",7),
(assign, ":scene_to_use", "scn_random_scene_steppe7"),
(else_try),
(eq,"$rand2",
,
(assign, ":scene_to_use", "scn_random_scene_steppe8"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_plain),
(store_random_in_range, "$rand2", 0, 23),
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_plain1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_plain1"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_plain2"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_plain3"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_plain4"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_plain5"),
(else_try),
(eq,"$rand2",6),
(assign, ":scene_to_use", "scn_random_scene_plain6"),
(else_try),
(eq,"$rand2",7),
(assign, ":scene_to_use", "scn_random_scene_plain7"),
(else_try),
(eq,"$rand2",
,
(assign, ":scene_to_use", "scn_random_scene_plain8"),
(else_try),
(eq,"$rand2",9),
(assign, ":scene_to_use", "scn_random_scene_plain9"),
(else_try),
(eq,"$rand2",10),
(assign, ":scene_to_use", "scn_random_scene_plain10"),
(else_try),
(eq,"$rand2",11),
(assign, ":scene_to_use", "scn_random_scene_plain11"),
(else_try),
(eq,"$rand2",12),
(assign, ":scene_to_use", "scn_random_scene_plain12"),
(else_try),
(eq,"$rand2",13),
(assign, ":scene_to_use", "scn_random_scene_plain13"),
(else_try),
(eq,"$rand2",14),
(assign, ":scene_to_use", "scn_random_scene_plain16"),
(else_try),
(eq,"$rand2",15),
(assign, ":scene_to_use", "scn_random_scene_plain17"),
(else_try),
(eq,"$rand2",16),
(assign, ":scene_to_use", "scn_random_scene_plain18"),
#
(else_try),
(eq,"$rand2",17),
(assign, ":scene_to_use", "scn_random_scene_plain19"),
(else_try),
(eq,"$rand2",1
,
(assign, ":scene_to_use", "scn_random_scene_plain20"),
(else_try),
(eq,"$rand2",19),
(assign, ":scene_to_use", "scn_random_scene_plain21"),
(else_try),
(eq,"$rand2",20),
(assign, ":scene_to_use", "scn_random_scene_plain22"),
(else_try),
(eq,"$rand2",21),
(assign, ":scene_to_use", "scn_random_scene_plain23"),
(else_try),
(eq,"$rand2",22),
(assign, ":scene_to_use", "scn_random_scene_plain24"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_snow),
(store_random_in_range, "$rand2", 0,
,
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_snow1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_snow1"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_snow2"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_snow3"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_snow4"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_snow5"),
(else_try),
(eq,"$rand2",6),
(assign, ":scene_to_use", "scn_random_scene_snow6"),
(else_try),
(eq,"$rand2",7),
(assign, ":scene_to_use", "scn_random_scene_snow7"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_steppe_forest),
(store_random_in_range, "$rand2", 0,
,
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest1"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest2"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest3"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest4"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest5"),
(else_try),
(eq,"$rand2",6),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest6"),
(else_try),
(eq,"$rand2",7),
(assign, ":scene_to_use", "scn_random_scene_steppe_forest7"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_forest),
(store_random_in_range, "$rand2", 0, 11),
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_plain_forest1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_plain_forest1"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_plain_forest2"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_plain_forest3"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_plain_forest4"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_plain_forest5"),
(else_try),
(eq,"$rand2",6),
(assign, ":scene_to_use", "scn_random_scene_plain_forest6"),
(else_try),
(eq,"$rand2",7),
(assign, ":scene_to_use", "scn_random_scene_plain_forest7"),
(else_try),
(eq,"$rand2",
,
(assign, ":scene_to_use", "scn_random_scene_plain_forest8"),
(else_try),
(eq,"$rand2",9),
(assign, ":scene_to_use", "scn_random_scene_plain_forest9"),
(else_try),
(eq,"$rand2",10),
(assign, ":scene_to_use", "scn_random_scene_plain_forest10"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_snow_forest),
(store_random_in_range, "$rand2", 0, 7),
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_snow_forest1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_snow_forest1"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_snow_forest2"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_snow_forest3"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_snow_forest4"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_snow_forest5"),
(else_try),
(eq,"$rand2",6),
(assign, ":scene_to_use", "scn_random_scene_snow_forest6"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_water),
(store_random_in_range, "$rand2", 0, 6),
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_water1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_water2"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_water3"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_water4"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_water5"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_water6"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_bridge),
(store_random_in_range, "$rand2", 0, 6),
(try_begin),
(eq,"$rand2",0),
(assign, ":scene_to_use", "scn_random_scene_plain1"),
(else_try),
(eq,"$rand2",1),
(assign, ":scene_to_use", "scn_random_scene_plain2"),
(else_try),
(eq,"$rand2",2),
(assign, ":scene_to_use", "scn_random_scene_plain3"),
(else_try),
(eq,"$rand2",3),
(assign, ":scene_to_use", "scn_random_scene_plain4"),
(else_try),
(eq,"$rand2",4),
(assign, ":scene_to_use", "scn_random_scene_plain5"),
(else_try),
(eq,"$rand2",5),
(assign, ":scene_to_use", "scn_random_scene_plain6"),
(try_end),
(else_try),
(eq, ":terrain_type", rt_desert_forest),
(assign, ":scene_to_use", "scn_random_scene_plain1"),
(else_try),
(eq, ":terrain_type", rt_desert),
(assign, ":scene_to_use", "scn_random_scene_plain1"),
(try_end),
(jump_to_scene,":scene_to_use"),
]),