("draw_icons",
   [
    (try_for_parties, ":party"),
   
      (party_slot_eq, ":party", slot_party_type, spt_kingdom_hero_party),
      (party_is_active, ":party"),
      (gt, ":party", 0),
      (neg|party_is_in_any_town, ":party"),
      (store_faction_of_party, ":fac", ":party"),
      (store_party_size, ":num", ":party"),
      (party_get_icon, ":icon", ":party"),
   
     (party_get_slot, ":leader", ":party", slot_kingdom_party_leader),
     (assign, ":is_king", 0),
      (try_for_range, ":cur_fac", "fac_kingdom_1", "fac_kingdoms_end"),
       (faction_slot_eq, ":cur_fac", slot_faction_leader, ":leader"),
       (assign, ":is_king", 1),
      (try_end),
   
      (try_begin),
       (eq, ":is_king", 0),
      
      (try_begin),
        (eq, ":fac", "fac_kingdom_3"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_ttr_army"),
          (else_try),
            (assign, ":icon", "icon_ttr_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_4"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_swed_army"),
          (else_try),
            (assign, ":icon", "icon_swed_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_5"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_hun_army"),
          (else_try),
            (assign, ":icon", "icon_hun_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_2"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_rus_army"),
          (else_try),
            (assign, ":icon", "icon_rus_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_6"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_turk_army"),
          (else_try),
            (assign, ":icon", "icon_turk_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_1"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_teu_army2"),
          (else_try),
            (assign, ":icon", "icon_teu_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_7"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_mold_army"),
          (else_try),
            (assign, ":icon", "icon_mold_army"),
          (try_end),     
       (else_try),
        (eq, ":fac", "fac_kingdom_8"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_lit_army"),
          (else_try),
            (assign, ":icon", "icon_lit_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_9"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_pol_army"),
          (else_try),
            (assign, ":icon", "icon_pol_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_player_supporters_faction"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_rus_army"),
          (else_try),
            (assign, ":icon", "icon_rus_army"),
          (try_end),
   
     (else_try),
   
      (try_begin),
        (eq, ":fac", "fac_kingdom_3"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_ttr_army"),
          (else_try),
            (assign, ":icon", "icon_ttr_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_4"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_swed_army"),
          (else_try),
            (assign, ":icon", "icon_swed_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_5"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_hun_army"),
          (else_try),
            (assign, ":icon", "icon_hun_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_2"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_rus_army"),
          (else_try),
            (assign, ":icon", "icon_rus_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_6"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_turk_army"),
          (else_try),
            (assign, ":icon", "icon_turk_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_1"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_teu_army2"),
          (else_try),
            (assign, ":icon", "icon_teu_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_7"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_mold_army"),
          (else_try),
            (assign, ":icon", "icon_mold_army"),
          (try_end),     
       (else_try),
        (eq, ":fac", "fac_kingdom_8"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_lit_army"),
          (else_try),
            (assign, ":icon", "icon_lit_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_kingdom_9"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_pol_army"),
          (else_try),
            (assign, ":icon", "icon_pol_army"),
          (try_end),
      (else_try),
        (eq, ":fac", "fac_player_supporters_faction"),
          (try_begin),
            (ge, ":num", 160),
            (assign, ":icon", "icon_rus_army"),
          (else_try),
            (assign, ":icon", "icon_rus_army"),
          (try_end),
      (try_end),
   
      (try_end),
   
      (party_set_icon, ":party", ":icon"),
   
    (try_end),
  ]),

(0.01,
  [
    (call_script, "script_draw_icons"),
  ]),

  ( "teu_army", 0, "teu_map_icons_a", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "teu_army2", 0, "teu_map_icons_b", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "rus_army", 0, "rus_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "ttr_army", 0, "ttr_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "swed_army", 0, "euro_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "hun_army", 0, "hun_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,), 
  ( "turk_army", 0, "turk_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "mold_army", 0, "mold_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "hun_army", 0, "hun_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),
  ( "lit_army", 0, "lit_army_icon", avatar_scale, snd_gallop, 0.15, 0.173, 0,),   
  ( "pol_army", 0, "euro_army_icon2", avatar_scale, snd_gallop, 0.15, 0.173, 0,),

     ("initialize_aristocracy",
   [
     #LORD OCCUPATIONS, BLOOD RELATIONSHIPS, RENOWN AND REPUTATIONS
   
     #King ages chief cambiado entero
   

   
     (try_for_range, ":cur_troop", kings_begin, kings_end),
      (troop_set_slot, ":cur_troop", slot_troop_occupation, slto_kingdom_hero),
##      (store_random_in_range, ":age", 50, 65),
##      (troop_set_slot, ":cur_troop", slot_troop_age, ":age"),
##      (eq, ":cur_troop", "trp_kingdom_5_lord"),
##      (troop_set_slot, ":cur_troop", slot_troop_age, 47),   
     (troop_set_slot, "trp_kingdom_1_lord", slot_troop_age, 47),   
     (troop_set_slot, "trp_kingdom_2_lord", slot_troop_age, 44),
     (try_end),
   
    # Kingdom 1
   
    (try_for_range, ":cur_lady", kingdom_ladies_begin, kingdom_ladies_end),
      (troop_set_slot, ":cur_lady", slot_troop_occupation, slto_kingdom_lady),
#         (store_random_in_range, ":age", 20, 35),

     
   (troop_set_slot, "trp_kingdom_1_lady_1", slot_troop_age, 44),
        (troop_set_slot, "trp_kingdom_1_lady_2", slot_troop_age, 42),
        (troop_set_slot, "trp_kingdom_1_lady_3", slot_troop_age, 45),   
   (troop_set_slot, "trp_kingdom_1_lady_4", slot_troop_age, 44),
        (troop_set_slot, "trp_kingdom_1_lady_5", slot_troop_age, 43),
   (troop_set_slot, "trp_kingdom_1_lady_6", slot_troop_age, 48),   
   (troop_set_slot, "trp_kingdom_1_lady_7", slot_troop_age, 49),
        (troop_set_slot, "trp_kingdom_1_lady_8", slot_troop_age, 27),
        (troop_set_slot, "trp_kingdom_1_lady_9", slot_troop_age, 25),   
   (troop_set_slot, "trp_kingdom_1_lady_10", slot_troop_age, 17),
   (troop_set_slot, "trp_kingdom_1_lady_11", slot_troop_age, 17),
        (troop_set_slot, "trp_kingdom_1_lady_12", slot_troop_age, 16),
        (troop_set_slot, "trp_kingdom_1_lady_13", slot_troop_age, 20),
        (troop_set_slot, "trp_kingdom_1_lady_14", slot_troop_age, 21),     
        (troop_set_slot, "trp_kingdom_1_lady_15", slot_troop_age, 21),
        (troop_set_slot, "trp_kingdom_1_lady_16", slot_troop_age, 15),
   (troop_set_slot, "trp_kingdom_1_lady_17", slot_troop_age, 20),         
   (troop_set_slot, "trp_kingdom_1_lady_18", slot_troop_age, 17),
   (troop_set_slot, "trp_kingdom_1_lady_19", slot_troop_age, 19),
   (troop_set_slot, "trp_kingdom_1_lady_20", slot_troop_age, 16),

        (troop_set_slot, "trp_kingdom_2_lady_1", slot_troop_age, 46),
        (troop_set_slot, "trp_kingdom_2_lady_2", slot_troop_age, 43),
        (troop_set_slot, "trp_kingdom_2_lady_3", slot_troop_age, 45),   
   (troop_set_slot, "trp_kingdom_2_lady_4", slot_troop_age, 47),
        (troop_set_slot, "trp_kingdom_2_lady_5", slot_troop_age, 46),
   (troop_set_slot, "trp_kingdom_2_lady_6", slot_troop_age, 45),   
   (troop_set_slot, "trp_kingdom_2_lady_7", slot_troop_age, 40),
        (troop_set_slot, "trp_kingdom_2_lady_8", slot_troop_age, 47),
        (troop_set_slot, "trp_kingdom_2_lady_9", slot_troop_age, 45),   
   (troop_set_slot, "trp_kingdom_2_lady_10", slot_troop_age, 17),
   (troop_set_slot, "trp_kingdom_2_lady_11", slot_troop_age, 17),
        (troop_set_slot, "trp_kingdom_2_lady_12", slot_troop_age, 16),
        (troop_set_slot, "trp_kingdom_2_lady_13", slot_troop_age, 22),
        (troop_set_slot, "trp_kingdom_2_lady_14", slot_troop_age, 21),     
        (troop_set_slot, "trp_kingdom_2_lady_15", slot_troop_age, 21),
        (troop_set_slot, "trp_kingdom_2_lady_16", slot_troop_age, 15),
   (troop_set_slot, "trp_kingdom_2_lady_17", slot_troop_age, 20),         
   (troop_set_slot, "trp_kingdom_2_lady_18", slot_troop_age, 17),
   (troop_set_slot, "trp_kingdom_2_lady_19", slot_troop_age, 19),
   (troop_set_slot, "trp_kingdom_2_lady_20", slot_troop_age, 16),

#           (troop_set_slot, ":cur_lady", slot_troop_age, ":age"),
         
         (store_random_in_range, ":lady_reputation", 20, 26),
         
           
         (try_begin),
            (eq, ":lady_reputation", 20),
            (assign, ":lady_reputation", lrep_moralist),
         (else_try),
             (eq, ":lady_reputation", 21),
            (assign, ":lady_reputation", lrep_ambitious),
         (else_try),
             (eq, ":lady_reputation", 22),
            (assign, ":lady_reputation", lrep_adventurous),
         (else_try),
             (eq, ":lady_reputation", 23),
            (assign, ":lady_reputation", lrep_otherworldly),
         (else_try),
             (eq, ":lady_reputation", 24),
            (assign, ":lady_reputation", lrep_ambitious),
         (else_try),
         
            (assign, ":lady_reputation", lrep_conventional),
                     
         (try_end),
         (troop_set_slot, ":cur_lady", slot_lord_reputation_type, ":lady_reputation"),
                           
         (call_script, "script_add_lady_items", ":cur_lady"),
           
         
         
         
     (try_end),
   
    (try_for_range, ":cur_troop", lords_begin, lords_end),
      (troop_set_slot, ":cur_troop", slot_troop_occupation, slto_kingdom_hero),

#edades lords
     #casados
     (troop_set_slot, "trp_knight_1_1", slot_troop_age, 52),
     (troop_set_slot, "trp_knight_1_2", slot_troop_age, 50),
     (troop_set_slot, "trp_knight_1_3", slot_troop_age,46),     
     (troop_set_slot, "trp_knight_1_5", slot_troop_age,46),   
     (troop_set_slot, "trp_knight_1_6", slot_troop_age, 49),   
     (troop_set_slot, "trp_knight_1_7", slot_troop_age,45), 
     (troop_set_slot, "trp_knight_1_9", slot_troop_age,39),

     (troop_set_slot, "trp_knight_2_1", slot_troop_age, 55),
     (troop_set_slot, "trp_knight_2_2", slot_troop_age, 50),
     (troop_set_slot, "trp_knight_2_3", slot_troop_age,48),
     (troop_set_slot, "trp_knight_2_4", slot_troop_age,46),     
     (troop_set_slot, "trp_knight_2_5", slot_troop_age,46),   
     (troop_set_slot, "trp_knight_2_6", slot_troop_age, 52),   
     (troop_set_slot, "trp_knight_2_7", slot_troop_age,47),   

#viudos con hijas
     (troop_set_slot, "trp_knight_1_4", slot_troop_age,50),
     (troop_set_slot, "trp_knight_1_8", slot_troop_age,44),     
     (troop_set_slot, "trp_knight_2_8", slot_troop_age,52),
     (troop_set_slot, "trp_knight_2_9", slot_troop_age,47),

#caballeros solterones
     (troop_set_slot, "trp_knight_1_10", slot_troop_age,32),   
     (troop_set_slot, "trp_knight_1_11", slot_troop_age,30),   
     (troop_set_slot, "trp_knight_1_12", slot_troop_age,26),     
     (troop_set_slot, "trp_knight_2_10", slot_troop_age,31),   
     (troop_set_slot, "trp_knight_2_11", slot_troop_age,29),     

#edades hijos chief
     (troop_set_slot, "trp_knight_1_13", slot_troop_age,18),
     (troop_set_slot, "trp_knight_1_14", slot_troop_age,19),   
     (troop_set_slot, "trp_knight_1_15", slot_troop_age,22),
     (troop_set_slot, "trp_knight_1_16", slot_troop_age,16),   
     (troop_set_slot, "trp_knight_1_17", slot_troop_age,21),     
     (troop_set_slot, "trp_knight_1_18", slot_troop_age,22),
     (troop_set_slot, "trp_knight_1_19", slot_troop_age,20),   
     (troop_set_slot, "trp_knight_1_20", slot_troop_age,20),

     (troop_set_slot, "trp_knight_2_12", slot_troop_age,18),
     (troop_set_slot, "trp_knight_2_13", slot_troop_age,16),   
     (troop_set_slot, "trp_knight_2_14", slot_troop_age,20),
     (troop_set_slot, "trp_knight_2_15", slot_troop_age,17),   
     (troop_set_slot, "trp_knight_2_16", slot_troop_age,21),     
     (troop_set_slot, "trp_knight_2_17", slot_troop_age,20),
     (troop_set_slot, "trp_knight_2_18", slot_troop_age,21),     
     (troop_set_slot, "trp_knight_2_19", slot_troop_age,22),   
     (troop_set_slot, "trp_knight_2_20", slot_troop_age,22),
     (troop_set_slot, "trp_knight_2_21", slot_troop_age,20),   
     (troop_set_slot, "trp_knight_2_22", slot_troop_age,17),     
#edades hijos acaba chief

#          (store_random_in_range, ":lord_renown", 200, 350),
#         (troop_set_slot, ":cur_troop", slot_troop_renown, ":lord_renown"),
         
       (store_random_in_range, ":lord_reputation", 20, 26),
         (try_begin),
            (eq, ":lord_reputation", 20),
            (assign, ":lord_reputation", lrep_martial),
         (else_try),
             (eq, ":lord_reputation", 21),
            (assign, ":lord_reputation", lrep_quarrelsome),
         (else_try),
             (eq, ":lord_reputation", 22),
            (assign, ":lord_reputation", lrep_selfrighteous),
         (else_try),
             (eq, ":lord_reputation", 23),
            (assign, ":lord_reputation", lrep_cunning),
         (else_try),
             (eq, ":lord_reputation", 24),
            (assign, ":lord_reputation", lrep_upstanding),
         (else_try),
         
            (assign, ":lord_reputation", lrep_debauched),
                     
         (try_end),
     
     
            (troop_set_slot, ":cur_troop", slot_lord_reputation_type, ":lord_reputation"),
     
     
     
    (try_end),
   
   
 #reinos relaciones familiares
      (troop_set_slot, "trp_knight_1_1", slot_troop_spouse, "trp_kingdom_1_lady_1"),
      (troop_set_slot, "trp_kingdom_1_lady_1", slot_troop_spouse, "trp_knight_1_1"),
      (troop_set_slot, "trp_kingdom_1_lady_10", slot_troop_father, "trp_knight_1_1"),
      (troop_set_slot, "trp_kingdom_1_lady_10", slot_troop_mother, "trp_kingdom_1_lady_1"),
      (troop_set_slot, "trp_kingdom_1_lady_10", slot_troop_guardian, "trp_knight_1_13"),
      (troop_set_slot, "trp_kingdom_1_lady_11", slot_troop_father, "trp_knight_1_1"),
      (troop_set_slot, "trp_kingdom_1_lady_11", slot_troop_mother, "trp_kingdom_1_lady_1"),
      (troop_set_slot, "trp_kingdom_1_lady_11", slot_troop_guardian, "trp_knight_1_13"),
      (troop_set_slot, "trp_knight_1_13", slot_troop_father, "trp_knight_1_1"),
      (troop_set_slot, "trp_knight_1_13", slot_troop_mother, "trp_kingdom_1_lady_1"),
      (troop_set_slot, "trp_knight_1_13", slot_troop_guardian, "trp_kingdom_1_lady_10"),
      (troop_set_slot, "trp_knight_1_13", slot_troop_guardian, "trp_kingdom_1_lady_11"),
     (troop_set_slot, "trp_knight_1_1", slot_troop_guardian, "trp_knight_1_2"),     
     (troop_set_slot, "trp_knight_1_1", slot_troop_guardian, "trp_knight_1_3"),     

      (troop_set_slot, "trp_knight_1_2", slot_troop_spouse, "trp_kingdom_1_lady_2"),
      (troop_set_slot, "trp_kingdom_1_lady_2", slot_troop_spouse, "trp_knight_1_2"),
      (troop_set_slot, "trp_kingdom_1_lady_12", slot_troop_father, "trp_knight_1_2"),
      (troop_set_slot, "trp_kingdom_1_lady_12", slot_troop_mother, "trp_kingdom_1_lady_2"),
      (troop_set_slot, "trp_kingdom_1_lady_12", slot_troop_guardian, "trp_knight_1_14"),
      (troop_set_slot, "trp_knight_1_14", slot_troop_father, "trp_knight_1_2"),
      (troop_set_slot, "trp_knight_1_14", slot_troop_mother, "trp_kingdom_1_lady_2"),
      (troop_set_slot, "trp_knight_1_14", slot_troop_guardian, "trp_kingdom_1_lady_12"),
     (troop_set_slot, "trp_knight_1_2", slot_troop_guardian, "trp_knight_1_1"),
     (troop_set_slot, "trp_knight_1_2", slot_troop_guardian, "trp_knight_1_3"),     

      (troop_set_slot, "trp_knight_1_3", slot_troop_spouse, "trp_kingdom_1_lady_3"),
      (troop_set_slot, "trp_kingdom_1_lady_3", slot_troop_spouse, "trp_knight_1_3"),
      (troop_set_slot, "trp_kingdom_1_lady_13", slot_troop_father, "trp_knight_1_3"),
      (troop_set_slot, "trp_kingdom_1_lady_13", slot_troop_mother, "trp_kingdom_1_lady_3"),
      (troop_set_slot, "trp_kingdom_1_lady_13", slot_troop_guardian, "trp_knight_1_15"),
      (troop_set_slot, "trp_knight_1_15", slot_troop_father, "trp_knight_1_3"),
      (troop_set_slot, "trp_knight_1_15", slot_troop_mother, "trp_kingdom_1_lady_3"),
      (troop_set_slot, "trp_knight_1_15", slot_troop_guardian, "trp_kingdom_1_lady_13"),   
     (troop_set_slot, "trp_knight_1_3", slot_troop_guardian, "trp_knight_1_1"),
     (troop_set_slot, "trp_knight_1_3", slot_troop_guardian, "trp_knight_1_2"),     

      (troop_set_slot, "trp_kingdom_1_lady_14", slot_troop_father, "trp_knight_1_4"),
      (troop_set_slot, "trp_kingdom_1_lady_14", slot_troop_guardian, "trp_knight_1_16"),
      (troop_set_slot, "trp_knight_1_16", slot_troop_father, "trp_knight_1_4"),
      (troop_set_slot, "trp_knight_1_16", slot_troop_guardian, "trp_kingdom_1_lady_14"),
     (troop_set_slot, "trp_knight_1_4", slot_troop_guardian, "trp_knight_1_5"),     

     (troop_set_slot, "trp_knight_1_5", slot_troop_spouse, "trp_kingdom_1_lady_4"),
     (troop_set_slot, "trp_kingdom_1_lady_4", slot_troop_spouse, "trp_knight_1_5"),
     (troop_set_slot, "trp_knight_1_17", slot_troop_father, "trp_knight_1_5"),
     (troop_set_slot, "trp_knight_1_17", slot_troop_mother, "trp_kingdom_1_lady_4"),
     (troop_set_slot, "trp_knight_1_5", slot_troop_guardian, "trp_knight_1_4"),     

     (troop_set_slot, "trp_knight_1_6", slot_troop_spouse, "trp_kingdom_1_lady_5"),
     (troop_set_slot, "trp_kingdom_1_lady_5", slot_troop_spouse, "trp_knight_1_6"),
     (troop_set_slot, "trp_kingdom_1_lady_15", slot_troop_mother, "trp_kingdom_1_lady_5"),
     (troop_set_slot, "trp_kingdom_1_lady_15", slot_troop_father, "trp_knight_1_6"),
     (troop_set_slot, "trp_kingdom_1_lady_15", slot_troop_guardian, "trp_knight_1_18"),
     (troop_set_slot, "trp_knight_1_18", slot_troop_father, "trp_knight_1_6"),
     (troop_set_slot, "trp_knight_1_18", slot_troop_mother, "trp_kingdom_1_lady_5"),
     (troop_set_slot, "trp_knight_1_18", slot_troop_guardian, "trp_kingdom_1_lady_15"),
     (troop_set_slot, "trp_knight_1_6", slot_troop_guardian, "trp_knight_1_7"),     

     (troop_set_slot, "trp_knight_1_7", slot_troop_spouse, "trp_kingdom_1_lady_6"),
     (troop_set_slot, "trp_kingdom_1_lady_6", slot_troop_spouse, "trp_knight_1_7"),
     (troop_set_slot, "trp_kingdom_1_lady_16", slot_troop_mother, "trp_kingdom_1_lady_6"),
     (troop_set_slot, "trp_kingdom_1_lady_16", slot_troop_father, "trp_knight_1_7"),
     (troop_set_slot, "trp_kingdom_1_lady_16", slot_troop_guardian, "trp_knight_1_19"),
     (troop_set_slot, "trp_knight_1_19", slot_troop_father, "trp_knight_1_7"),
     (troop_set_slot, "trp_knight_1_19", slot_troop_mother, "trp_kingdom_1_lady_6"),
     (troop_set_slot, "trp_knight_1_19", slot_troop_guardian, "trp_kingdom_1_lady_16"),   
     (troop_set_slot, "trp_knight_1_7", slot_troop_guardian, "trp_knight_1_6"),     

     (troop_set_slot, "trp_kingdom_1_lady_17", slot_troop_father, "trp_knight_1_8"),     
     (troop_set_slot, "trp_kingdom_1_lady_19", slot_troop_father, "trp_knight_1_8"),     

     (troop_set_slot, "trp_knight_1_9", slot_troop_spouse, "trp_kingdom_1_lady_7"),
     (troop_set_slot, "trp_kingdom_1_lady_7", slot_troop_spouse, "trp_knight_1_9"),
     (troop_set_slot, "trp_kingdom_1_lady_18", slot_troop_mother, "trp_kingdom_1_lady_8"),
     (troop_set_slot, "trp_kingdom_1_lady_18", slot_troop_father, "trp_knight_1_9"),
     (troop_set_slot, "trp_kingdom_1_lady_18", slot_troop_guardian, "trp_knight_1_20"),
     (troop_set_slot, "trp_knight_1_20", slot_troop_father, "trp_knight_1_9"),
     (troop_set_slot, "trp_knight_1_20", slot_troop_mother, "trp_kingdom_1_lady_7"),
     (troop_set_slot, "trp_knight_1_20", slot_troop_guardian, "trp_kingdom_1_lady_18"),     

     (troop_set_slot, "trp_kingdom_1_lady_8", slot_troop_guardian, "trp_knight_1_10"),
     (troop_set_slot, "trp_kingdom_1_lady_9", slot_troop_guardian, "trp_knight_1_11"),
     (troop_set_slot, "trp_kingdom_1_lady_20", slot_troop_guardian, "trp_knight_1_12"),     
     
     (troop_set_slot, "trp_knight_2_1", slot_troop_spouse, "trp_kingdom_2_lady_1"),
     (troop_set_slot, "trp_kingdom_2_lady_1", slot_troop_spouse, "trp_knight_2_1"),
     (troop_set_slot, "trp_kingdom_2_lady_10", slot_troop_mother, "trp_kingdom_2_lady_1"),
     (troop_set_slot, "trp_kingdom_2_lady_10", slot_troop_father, "trp_knight_2_1"),
     (troop_set_slot, "trp_knight_2_12", slot_troop_father, "trp_knight_2_1"),
     (troop_set_slot, "trp_knight_2_12", slot_troop_mother, "trp_kingdom_2_lady_1"),     
     (troop_set_slot, "trp_knight_2_1", slot_troop_guardian, "trp_knight_2_2"),     
     (troop_set_slot, "trp_knight_2_2", slot_troop_spouse, "trp_kingdom_2_lady_2"),
     (troop_set_slot, "trp_kingdom_2_lady_2", slot_troop_spouse, "trp_knight_2_2"),
     (troop_set_slot, "trp_kingdom_2_lady_11", slot_troop_mother, "trp_kingdom_2_lady_2"),
     (troop_set_slot, "trp_kingdom_2_lady_11", slot_troop_father, "trp_knight_2_2"),
     (troop_set_slot, "trp_knight_2_13", slot_troop_father, "trp_knight_2_2"),
     (troop_set_slot, "trp_knight_2_13", slot_troop_mother, "trp_kingdom_2_lady_2"), 
     (troop_set_slot, "trp_knight_2_2", slot_troop_guardian, "trp_knight_2_3"),
     (troop_set_slot, "trp_knight_2_3", slot_troop_spouse, "trp_kingdom_2_lady_3"),
     (troop_set_slot, "trp_kingdom_2_lady_3", slot_troop_spouse, "trp_knight_2_3"),
     (troop_set_slot, "trp_kingdom_2_lady_12", slot_troop_mother, "trp_kingdom_2_lady_3"),
     (troop_set_slot, "trp_kingdom_2_lady_12", slot_troop_father, "trp_knight_2_3"),
     (troop_set_slot, "trp_knight_2_14", slot_troop_father, "trp_knight_2_3"),
     (troop_set_slot, "trp_knight_2_14", slot_troop_mother, "trp_kingdom_2_lady_3"),
     (troop_set_slot, "trp_knight_2_3", slot_troop_guardian, "trp_knight_2_1"),       
     
     (troop_set_slot, "trp_knight_2_4", slot_troop_spouse, "trp_kingdom_2_lady_4"),
     (troop_set_slot, "trp_kingdom_2_lady_4", slot_troop_spouse, "trp_knight_2_4"),
     (troop_set_slot, "trp_kingdom_2_lady_13", slot_troop_mother, "trp_kingdom_2_lady_4"),
     (troop_set_slot, "trp_kingdom_2_lady_13", slot_troop_father, "trp_knight_2_4"),
     (troop_set_slot, "trp_knight_2_15", slot_troop_father, "trp_knight_2_4"),
     (troop_set_slot, "trp_knight_2_15", slot_troop_mother, "trp_kingdom_2_lady_4"),
     (troop_set_slot, "trp_knight_2_16", slot_troop_father, "trp_knight_2_4"),
     (troop_set_slot, "trp_knight_2_16", slot_troop_mother, "trp_kingdom_2_lady_4"),       
     (troop_set_slot, "trp_knight_2_4", slot_troop_guardian, "trp_knight_2_8"),
     (troop_set_slot, "trp_kingdom_2_lady_17", slot_troop_father, "trp_knight_2_8"),
     (troop_set_slot, "trp_knight_2_20", slot_troop_father, "trp_knight_2_8"),     
     (troop_set_slot, "trp_knight_2_8", slot_troop_guardian, "trp_knight_2_9"),     
     (troop_set_slot, "trp_kingdom_2_lady_18", slot_troop_father, "trp_knight_2_9"),
     (troop_set_slot, "trp_knight_2_21", slot_troop_father, "trp_knight_2_9"),   
     (troop_set_slot, "trp_knight_2_9", slot_troop_guardian, "trp_knight_2_4"),     
     
     (troop_set_slot, "trp_knight_2_5", slot_troop_spouse, "trp_kingdom_2_lady_5"),
     (troop_set_slot, "trp_kingdom_2_lady_5", slot_troop_spouse, "trp_knight_2_5"),
     (troop_set_slot, "trp_kingdom_2_lady_14", slot_troop_mother, "trp_kingdom_2_lady_5"),
     (troop_set_slot, "trp_kingdom_2_lady_14", slot_troop_father, "trp_knight_2_5"),
     (troop_set_slot, "trp_knight_2_17", slot_troop_father, "trp_knight_2_5"),
     (troop_set_slot, "trp_knight_2_17", slot_troop_mother, "trp_kingdom_2_lady_5"),     
     (troop_set_slot, "trp_knight_2_6", slot_troop_spouse, "trp_kingdom_2_lady_6"),
     (troop_set_slot, "trp_kingdom_2_lady_6", slot_troop_spouse, "trp_knight_2_6"),
     (troop_set_slot, "trp_kingdom_2_lady_15", slot_troop_father, "trp_knight_2_6"),
     (troop_set_slot, "trp_kingdom_2_lady_15", slot_troop_mother, "trp_kingdom_2_lady_6"),
     (troop_set_slot, "trp_knight_2_18", slot_troop_father, "trp_knight_2_6"),
     (troop_set_slot, "trp_knight_2_18", slot_troop_mother, "trp_kingdom_2_lady_6"),     

     (troop_set_slot, "trp_knight_2_7", slot_troop_spouse, "trp_kingdom_2_lady_7"),
     (troop_set_slot, "trp_kingdom_2_lady_7", slot_troop_spouse, "trp_knight_2_7"),
     (troop_set_slot, "trp_kingdom_2_lady_16", slot_troop_mother, "trp_kingdom_2_lady_7"),
     (troop_set_slot, "trp_kingdom_2_lady_16", slot_troop_father, "trp_knight_2_7"),
     (troop_set_slot, "trp_knight_2_19", slot_troop_father, "trp_knight_2_7"),
     (troop_set_slot, "trp_knight_2_19", slot_troop_mother, "trp_kingdom_2_lady_7"),         

     (troop_set_slot, "trp_kingdom_2_lady_19", slot_troop_mother, "trp_kingdom_2_lady_8"),
     (troop_set_slot, "trp_knight_2_10", slot_troop_mother, "trp_kingdom_2_lady_8"),     

     (troop_set_slot, "trp_knight_2_22", slot_troop_mother, "trp_kingdom_2_lady_9"),     
     
     (troop_set_slot, "trp_kingdom_2_lady_20", slot_troop_guardian, "trp_knight_2_11"),     
   
##      (call_script, "script_init_troop_age", ":cur_troop", ":age"),
     
     (try_begin),
       (eq, "$cheat_mode", 1),
       (assign, reg3, "$cheat_mode"),
       (display_message, "@{!}DEBUG -- Assigned lord reputation and relations"),
     
#       (display_message, "str_assigned_lord_reputation_and_relations_cheat_mode_reg3"), #This string can be removed
     (try_end),

   

     

   
   

   
     (try_for_range, ":cur_troop", pretenders_begin, pretenders_end),
      (troop_set_slot, ":cur_troop", slot_troop_occupation, slto_inactive_pretender),
      (store_random_in_range, ":age", 15, 40),
      (troop_set_slot, ":cur_troop", slot_troop_age, ":age"),
      (eq, ":cur_troop", "trp_kingdom_5_pretender"),
      (troop_set_slot, ":cur_troop", slot_troop_age, 45),     
     (try_end),
   ]),