(else_try),
(eq, ":object", "$g_presentation_obj_6"), # Borrow chosen amount of money
(try_begin),
(gt, reg6, 0),
(party_get_slot, ":debt", "$current_town", slot_debt),
(try_begin),
(le, ":debt", 0),
(store_current_hours, ":date"),
(val_add, ":date", 24*14*2), # First Deadline / 4 weeks / then 2 weeks (see simple_triggers)
(party_set_slot, "$current_town", slot_deadline, ":date"),
(try_end),
(troop_add_gold, "trp_player", reg6),
(val_mul, reg6, 120),
(val_div, reg6, 100),
(val_add, ":debt", reg6),
(party_set_slot, "$current_town", slot_debt, ":debt"),
(start_presentation, "prsnt_bank"),
(else_try),
(display_message, "@You cant borrow 0 denars."),
(try_end),