Ashmond
Sergeant at Arms
And now for more deviant dialog trickery, with purists in mind. 
Buy your spouse shopping sprees for small, beneficial bonuses.
Mate with your spouse for small, beneficial bonuses. I'd like to have it where you get a small boost to relations with the spouse's original faction. Perhaps that'll come later.
This isn't fully tested as I haven't tried it with a female character.
Here's the code, if you're interested. The relation hit numbers are a bit off for testing purposes, so you might want to change them if you're going to try this with long term impact in mind. I'm thinking the -10 should probably be -1 or -2 and with the available blatant insult option given with negative relations, it probably shouldn't be more than -1.
Okay, so the most pressing question at this point involves the following tuple:
[anyone,"spouse_mate",
[
(call_script, "script_troop_get_player_relation","$g_talk_troop"),
(lt,"$g_talk_troop_relation",0),
], "Do ye not have enemies to kill or something?","close_window",
[
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 12),
(assign, "$g_spouse_mate", ":fut_hours"),
]
],
Here, I'd like to make use of agent_start_running_away and agent_fade_out.
Nothing but ingame script error warnings and so far, I can't figure exactly what to set the troop as for it to use this code. I assume the troop needs to be set to another type or state and then set back again, of course I have no idea if that will break something. Also, I assume this has something to do with the ladies using unmoveable_in_party_window in their troop tuples, or their scene slot settings. Or, what?
Any comments or pointers?
Buy your spouse shopping sprees for small, beneficial bonuses.
Mate with your spouse for small, beneficial bonuses. I'd like to have it where you get a small boost to relations with the spouse's original faction. Perhaps that'll come later.
This isn't fully tested as I haven't tried it with a female character.
Here's the code, if you're interested. The relation hit numbers are a bit off for testing purposes, so you might want to change them if you're going to try this with long term impact in mind. I'm thinking the -10 should probably be -1 or -2 and with the available blatant insult option given with negative relations, it probably shouldn't be more than -1.
Code:
#Spouse Talk
[anyone|plyr,"spouse_talk",
[
(str_store_troop_name,s67,"$g_talk_troop"),
(store_current_hours,":cur_hours"),
(ge,":cur_hours","$g_spouse_bribe"),
], "Allow me to show love to my spouse","spouse_show_love",[]],
[anyone, "spouse_show_love",
[(ge,"$g_talk_troop_relation",30),],
"Of course dear {playername}, what did ye have in mind?","spouse_show_love_ans1",[]],
[anyone|plyr, "spouse_show_love_ans1",
[
(store_troop_gold,":gold","trp_player"),
(ge,":gold",100000),
], "I was thinking that a shopping spree is in order for thee, my sweet honeybee.","spouse_spree1",[]],
[anyone|plyr, "spouse_show_love_ans1",[],"Actually, I've changed my mind","close_window",
[(call_script,"script_change_player_relation_with_troop","$g_talk_troop",-10),]],
[anyone, "spouse_spree1",
[
(store_current_hours,":cur_hours"),
(val_add,":cur_hours",72),
(assign,"$g_spouse_bribe",":cur_hours"),
], "Oh {playername}, yer heart is enough for me.^As for this gift, I will accept of thee.","close_window",
[
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",2),
(troop_remove_gold,"trp_player",10000),
]
],
[anyone, "spouse_show_love",
[
(ge,"$g_talk_troop_relation",10),
(lt,"$g_talk_troop_relation",30),
], "Of course, what did ye have in mind?","spouse_show_love_ans2",[]],
[anyone|plyr, "spouse_show_love_ans2",
[
(store_troop_gold,":gold","trp_player"),
(ge,":gold",50000),
], "I was thinking that a shopping spree is in order for thee.","spouse_spree2",[]],
[anyone|plyr, "spouse_show_love_ans2",[],"Actually, I've changed my mind","close_window",
[ (call_script,"script_change_player_relation_with_troop","$g_talk_troop",-10),]],
[anyone, "spouse_spree2",
[
(store_current_hours,":cur_hours"),
(val_add,":cur_hours",48),
(assign,"$g_spouse_bribe",":cur_hours"),
], "Oh {playername}, I accept this gift of thee.","close_window",
[
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",1),
(troop_remove_gold,"trp_player",5000),
]
],
[anyone, "spouse_show_love",
[
(lt,"$g_talk_troop_relation",10),
(ge,"$g_talk_troop_relation",0),
], "Cold, hard denarie never hurts anyone.","spouse_show_love_ans3",[]],
[anyone|plyr, "spouse_show_love_ans3",
[
(store_troop_gold,":gold","trp_player"),
(ge,":gold",25000),
], "Of course and I have some denarie just for thee.","spouse_spree3",[]],
[anyone|plyr, "spouse_show_love_ans3",[],"Actually, I've changed my mind","close_window",
[(call_script,"script_change_player_relation_with_troop","$g_talk_troop",-10),]],
[anyone, "spouse_spree3",
[
(store_current_hours,":cur_hours"),
(val_add,":cur_hours",24),
(assign,"$g_spouse_bribe",":cur_hours"),
], "{playername}, I shall enjoy a spending spree^with this gift ye give me.","close_window",
[
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",1),
(troop_remove_gold,"trp_player",2500),
]
],
[anyone, "spouse_show_love",
[
(call_script, "script_troop_get_player_relation","$g_talk_troop"),
(lt,reg0,0),
], "Love?! So ye be a joker now? Or is it that ye think love is for sale?","spouse_show_love_ans4",[]],
[anyone|plyr, "spouse_show_love_ans4",
[
(store_troop_gold,":gold","trp_player"),
(ge,":gold",50000),
], "I know fine things fit for court are for sale.","spouse_spree4",[]],
[anyone|plyr, "spouse_show_love_ans4",[],"Actually, I've changed my mind","close_window",
[(call_script,"script_change_player_relation_with_troop","$g_talk_troop",-10),]],
[anyone, "spouse_spree4",[],"Are ye to insinuate that I'm insuficient for ye court?","spouse_spree4",[]],
[anyone|plyr, "spouse_spree4",[],"{s67}, enjoy the gift and give me no grief.","spouse_spree4a",[]],
[anyone|plyr, "spouse_spree4",[],"Yes. {s67}, ye are burdensome to my court.","spouse_spree4b",[]],
[anyone, "spouse_spree4a",
[
(store_current_hours,":cur_hours"),
(val_add,":cur_hours",24),
(assign,"$g_spouse_bribe",":cur_hours"),
], "Very well {playername}. I'll put this to good use.","close_window",
[
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",2),
(troop_remove_gold,"trp_player",5000),
]
],
[anyone, "spouse_spree4b",
[
(store_current_hours,":cur_hours"),
(val_add,":cur_hours",24),
(assign,"$g_spouse_bribe",":cur_hours"),
], "What an ass ye be {playername},^take ye gift and shove it!","close_window",
[(call_script,"script_change_player_relation_with_troop","$g_talk_troop",-1),]],
#The Bed Chamber
[anyone|plyr,"spouse_talk",
[
(store_current_hours,":cur_hours"),
(ge,":cur_hours","$g_spouse_mate"),
], "My dear spouse, let us retire to my bed chamber.","spouse_mate",[]],
[anyone,"spouse_mate",
[
(ge,"$g_talk_troop_relation",60),
], "There is nothing I'd rather do, my sweet {playername}.","close_window",
[
(finish_mission),
(rest_for_hours,6,5,0),
(assign,"$g_leave_town",1),
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 24),
(assign, "$g_spouse_mate", ":fut_hours"),
(call_script, "script_change_player_relation_with_faction_ex", "$g_talk_troop_faction",2),
(call_script, "script_change_player_party_morale", 5),
(call_script, "script_change_player_honor", 5),
(call_script, "script_change_player_relation_with_center", "$current_town",2),
(add_xp_as_reward, 20),
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",2),
]
],
[anyone,"spouse_mate",
[
(lt,"$g_talk_troop_relation",60),
(ge,"$g_talk_troop_relation",30),
], "I have been waiting for this moment {playername}.","close_window",
[
(finish_mission),
(rest_for_hours,4,5,0),
(assign,"$g_leave_town",1),
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 36),
(assign, "$g_spouse_mate", ":fut_hours"),
(call_script, "script_change_player_relation_with_faction_ex", "$g_talk_troop_faction",2),
(call_script, "script_change_player_party_morale", 5),
(call_script, "script_change_player_honor", 5),
(call_script, "script_change_player_relation_with_center", "$current_town",2),
(add_xp_as_reward, 15),
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",1),
]
],
[anyone,"spouse_mate",
[
(lt,"$g_talk_troop_relation",30),
(ge,"$g_talk_troop_relation",10),
], "As ye wish my {husband/wife}.","close_window",
[
(finish_mission),
(rest_for_hours,2,5,0),
(assign,"$g_leave_town",1),
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 48),
(assign, "$g_spouse_mate", ":fut_hours"),
(call_script, "script_change_player_relation_with_faction_ex", "$g_talk_troop_faction",1),
(call_script, "script_change_player_party_morale", 5),
(call_script, "script_change_player_honor", 5),
(call_script, "script_change_player_relation_with_center", "$current_town",1),
(add_xp_as_reward, 10),
(call_script,"script_change_player_relation_with_troop","$g_talk_troop",1),
]
],
[anyone,"spouse_mate",
[
(lt,"$g_talk_troop_relation",10),
(ge,"$g_talk_troop_relation",0),
], "Aye, I suppose we must look to the future.","close_window",
[
(finish_mission),
(rest_for_hours,1,5,0),
(assign,"$g_leave_town",1),
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 72),
(assign, "$g_spouse_mate", ":fut_hours"),
(call_script, "script_change_player_relation_with_faction_ex", "$g_talk_troop_faction",1),
(call_script, "script_change_player_party_morale", 1),
(call_script, "script_change_player_honor", 5),
(call_script, "script_change_player_relation_with_center", "$current_town",1),
(add_xp_as_reward, 5),
]
],
[anyone,"spouse_mate",
[
(call_script, "script_troop_get_player_relation","$g_talk_troop"),
(lt,"$g_talk_troop_relation",0),
], "Do ye not have enemies to kill or something?","close_window",
[
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 12),
(assign, "$g_spouse_mate", ":fut_hours"),
]
],
#/Spouse Talk
[anyone|plyr,"spouse_talk",
[],
"We shall speak later, my {wife/husband}", "close_window",[
]],Okay, so the most pressing question at this point involves the following tuple:
[anyone,"spouse_mate",
[
(call_script, "script_troop_get_player_relation","$g_talk_troop"),
(lt,"$g_talk_troop_relation",0),
], "Do ye not have enemies to kill or something?","close_window",
[
(store_current_hours,":fut_hours"),
(val_add, ":fut_hours", 12),
(assign, "$g_spouse_mate", ":fut_hours"),
]
],
Here, I'd like to make use of agent_start_running_away and agent_fade_out.
Nothing but ingame script error warnings and so far, I can't figure exactly what to set the troop as for it to use this code. I assume the troop needs to be set to another type or state and then set back again, of course I have no idea if that will break something. Also, I assume this has something to do with the ladies using unmoveable_in_party_window in their troop tuples, or their scene slot settings. Or, what?
Any comments or pointers?
Pointers, no, not really. Good luck though.
