[anyone|plyr,"mayor_talk", [],
"I want to talk about bank.", "mayor_bank",[]],
[anyone,"mayor_bank", [(eq, "$g_bank", 0)],
"Fine. It looks you don't have bank account yet. You must pay amount of 1000 denars to create bank account. You can make deposits and hand out money from bank. Your money will be 10% bigger every week.", "mayor_bank_1",[]],
[anyone,"mayor_bank", [(eq, "$g_bank", 1), (troop_get_slot, reg1, "trp_player", slot_bank_money)],
"Actual balance of your bank account is {reg1} denars. What do you want to do?", "mayor_bank_3",[]],
[anyone|plyr,"mayor_bank_3", [(store_troop_gold, ":money", "trp_player"), (ge, ":money", 100)],
"[Make a deposit of 100 denars]", "mayor_bank",[
(troop_get_slot, reg1, "trp_player", slot_bank_money),
(val_add, reg1, 100),
(troop_set_slot, "trp_player", slot_bank_money, reg1),
(troop_remove_gold, "trp_player", 100)]],
[anyone|plyr,"mayor_bank_3", [(store_troop_gold, ":money", "trp_player"), (ge, ":money", 1000)],
"[Make a deposit of 1000 denars]", "mayor_bank",[
(troop_get_slot, reg1, "trp_player", slot_bank_money),
(val_add, reg1, 1000),
(troop_set_slot, "trp_player", slot_bank_money, reg1),
(troop_remove_gold, "trp_player", 1000)]],
[anyone|plyr,"mayor_bank_3", [(store_troop_gold, ":money", "trp_player"), (ge, ":money", 10000)],
"[Make a deposit of 10000 denars]", "mayor_bank",[
(troop_get_slot, reg1, "trp_player", slot_bank_money),
(val_add, reg1, 10000),
(troop_set_slot, "trp_player", slot_bank_money, reg1),
(troop_remove_gold, "trp_player", 10000)]],
[anyone|plyr,"mayor_bank_3", [(troop_get_slot, reg1, "trp_player", slot_bank_money), (ge, reg1, 100)],
"[Hand out 100 denars]", "mayor_bank",[
(troop_get_slot, reg1, "trp_player", slot_bank_money),
(val_add, reg1, -100),
(troop_set_slot, "trp_player", slot_bank_money, reg1),
(troop_add_gold, "trp_player", 100)]],
[anyone|plyr,"mayor_bank_3", [(troop_get_slot, reg1, "trp_player", slot_bank_money), (ge, reg1, 1000)],
"[Hand out 1000 denars]", "mayor_bank",[
(troop_get_slot, reg1, "trp_player", slot_bank_money),
(val_add, reg1, -1000),
(troop_set_slot, "trp_player", slot_bank_money, reg1),
(troop_add_gold, "trp_player", 1000)]],
[anyone|plyr,"mayor_bank_3", [(troop_get_slot, reg1, "trp_player", slot_bank_money), (ge, reg1, 10000)],
"[Hand out 10000 denars]", "mayor_bank",[
(troop_get_slot, reg1, "trp_player", slot_bank_money),
(val_add, reg1, -10000),
(troop_set_slot, "trp_player", slot_bank_money, reg1),
(troop_add_gold, "trp_player", 10000)]],
[anyone|plyr,"mayor_bank_3", [],
"Nothing. I've only wanted to check balance of my account.", "mayor_pretalk",[]],
[anyone|plyr,"mayor_bank_1", [(store_troop_gold, ":money", "trp_player"), (ge, ":money", 1000)],
"Good! I want to create account. Here are my 1000 denars.", "mayor_bank_zalozenie",[(troop_remove_gold, "trp_player", 1000), (assign, "$g_bank", 1), (troop_set_slot, "trp_player", slot_bank_money, 1000), (display_message, "@Your bank account is now open.")]],
[anyone|plyr,"mayor_bank_1", [],
"Ok, it's all I wanted to know. I don't have enough money.", "mayor_pretalk",[]],
[anyone,"mayor_bank_zalozenie", [],
"Fine, your bank account is now open.", "mayor_pretalk",[]],