|
@@ -430,12 +430,31 @@ if $ARGS[0] = 'SvetaCallsNPC':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- act 'I think we should break up...':
|
|
|
- cla
|
|
|
- '<<$Call4Date["NPC-He"]>> sounds hurt, but you insist it is for the best. You both say goodbye and part ways.'
|
|
|
- gs 'telefon', 'DeleteContact', $Call4Date["NPC"]
|
|
|
+ !!Willpower checks for resistance
|
|
|
+ if npc_rel[$Call4Date["NPC"]] <= 25:
|
|
|
+ $Call4Date["loverResist"] = 'easy'
|
|
|
+ elseif npc_rel[$Call4Date["NPC"]] <= 50:
|
|
|
+ $Call4Date["loverResist"] = 'medium'
|
|
|
+ else
|
|
|
+ $Call4Date["loverResist"] = 'hard'
|
|
|
+ end
|
|
|
+ gs 'willpower', 'misc', 'self', $Call4Date["loverResist"]
|
|
|
|
|
|
- act 'Hangup':gt 'telefon', 'fin'
|
|
|
+ if will_cost <= pcs_willpwr:
|
|
|
+ act 'I think we should break up... (<<will_cost>> Willpower)':
|
|
|
+ *clr & cla
|
|
|
+ gs 'willpower', 'pay', 'self'
|
|
|
+ gs 'stat'
|
|
|
+
|
|
|
+ '<<$Call4Date["NPC-He"]>> sounds hurt, but you insist it is for the best. You both say goodbye and part ways.'
|
|
|
+ gs 'telefon', 'DeleteContact', $Call4Date["NPC"]
|
|
|
+
|
|
|
+ act 'Hang up': gt 'telefon', 'fin'
|
|
|
+ end
|
|
|
+ else
|
|
|
+ act 'I think we should break up... (<font color="red"><<will_cost>> Willpower</font>)':
|
|
|
+ '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
|
+ end
|
|
|
end
|
|
|
|
|
|
act 'Hangup':gt 'telefon', 'fin'
|
|
@@ -453,6 +472,18 @@ if $ARGS[0] = 'NPCCallsForDate':
|
|
|
Call4Date["ContactIndex"] = ARGS[1]
|
|
|
$Call4Date["NPC"] = $contact[Call4Date['ContactIndex']]
|
|
|
|
|
|
+ if npc_gender[$Call4Date["NPC"]] = 0:
|
|
|
+ $Call4Date["NPC-he"] = 'he'
|
|
|
+ $Call4Date["NPC-He"] = 'He'
|
|
|
+ $Call4Date["NPC-his"] = 'his'
|
|
|
+ $Call4Date["NPC-His"] = 'His'
|
|
|
+ else
|
|
|
+ $Call4Date["NPC-he"] = 'her'
|
|
|
+ $Call4Date["NPC-He"] = 'Her'
|
|
|
+ $Call4Date["NPC-his"] = 'hers'
|
|
|
+ $Call4Date["NPC-His"] = 'Hers'
|
|
|
+ end
|
|
|
+
|
|
|
!!Pick a nickname that caller will use for Sveta
|
|
|
$DateNickName[0] = 'cutie'
|
|
|
$DateNickName[1] = 'honey'
|
|
@@ -514,13 +545,34 @@ if $ARGS[0] = 'NPCCallsForDate':
|
|
|
act 'Hang up': gt 'telefon', 'fin'
|
|
|
end
|
|
|
|
|
|
- act 'I think we should break up...':
|
|
|
- cla
|
|
|
- 'He sounds hurt, but you insist it is for the best. You both say goodbye and part ways.'
|
|
|
- gs 'telefon', 'DeleteContact', $Call4Date["NPC"]
|
|
|
|
|
|
- act 'Hang up': gt 'telefon', 'fin'
|
|
|
+ !!Willpower checks for resistance
|
|
|
+ if npc_rel[$Call4Date["NPC"]] <= 25:
|
|
|
+ $Call4Date["loverResist"] = 'easy'
|
|
|
+ elseif npc_rel[$Call4Date["NPC"]] <= 50:
|
|
|
+ $Call4Date["loverResist"] = 'medium'
|
|
|
+ else
|
|
|
+ $Call4Date["loverResist"] = 'hard'
|
|
|
+ end
|
|
|
+ gs 'willpower', 'misc', 'self', $Call4Date["loverResist"]
|
|
|
+
|
|
|
+ if will_cost <= pcs_willpwr:
|
|
|
+ act 'I think we should break up... (<<will_cost>> Willpower)':
|
|
|
+ *clr & cla
|
|
|
+ gs 'willpower', 'pay', 'self'
|
|
|
+ gs 'stat'
|
|
|
+
|
|
|
+ '<<$Call4Date["NPC-He"]>> sounds hurt, but you insist it is for the best. You both say goodbye and part ways.'
|
|
|
+ gs 'telefon', 'DeleteContact', $Call4Date["NPC"]
|
|
|
+
|
|
|
+ act 'Hang up': gt 'telefon', 'fin'
|
|
|
+ end
|
|
|
+ else
|
|
|
+ act 'I think we should break up... (<font color="red"><<will_cost>> Willpower</font>)':
|
|
|
+ '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
|
+ end
|
|
|
end
|
|
|
+
|
|
|
end
|
|
|
|
|
|
act 'Hang up (end relationship)':
|