Browse Source

[fixed] npc_din was in dynamic format when it didn't need to be so changed to $ARGS[0] format

KevinSmarts 4 years ago
parent
commit
38c3bb01e9

+ 21 - 20
locations/din_npc.qsrc

@@ -5,26 +5,27 @@
 ! 2 = Grandparents House
 ! 3 = St. Petersburg Apt
 
-$go_home = {
-		if curr_home = 12:
-			gt 'swampyard', 'start'		
-		elseif $home_location = 'pav_complex':
-			gt 'pav_complex', 'start'
-		else
-			gt $home_location				
-		end
-}
+if $ARGS[0] = 'go_home':
+	if curr_home = 12:
+		gt 'swampyard', 'start'		
+	elseif $home_location = 'pav_complex':
+		gt 'pav_complex', 'start'
+	else
+		gt $home_location				
+	end
+end
+
+if $ARGS[0] = 'go_straight_home':
+	if curr_home = 10:
+		gt 'etoexhib', 'pos40'
+	elseif curr_home = 11:
+		gt 'obroom', 'start'
+	elseif curr_home = 12:
+		gt 'swamphouse', 'start'
+	else
+		gt $home_entrance
+	end
+end
 
-$go_straight_home = {
-		if curr_home = 10:
-			gt 'etoexhib', 'pos40'
-		elseif curr_home = 11:
-			gt 'obroom', 'start'
-		elseif curr_home = 12:
-			gt 'swamphouse', 'start'
-		else
-			gt $home_entrance
-		end
-}
 --- din_npc ---------------------------------
 

+ 1 - 1
locations/ender.qsrc

@@ -375,7 +375,7 @@ if $ARGS[0] = 'win':
 
 		'You''ve managed to batter one of your attackers face while you broke the others nose. As he spits you can see that his spit is mixed with blood as he can barely hold his hand up to surrender. You quickly run over to them and empty the cash from their pockets and mock them that this should cover you expenses. The attacker quickly rise up and run away in fear.'
 
-		act 'Go home':	dynamic $go_home
+		act 'Go home':	gt 'din_npc', 'go_home'
 
 	elseif fightEnding = 12:
 		zverSlutQW = 1

+ 2 - 2
locations/lezbsex.qsrc

@@ -28,7 +28,7 @@ if $ARGS[0] = 'startloverhome':
 	act 'Stop her and say goodbye':	
 		loverrelation[lover_number] -= 4
 		killvar 'lezbsexhome'
-		dynamic $go_straight_home
+		gt 'din_npc', 'go_straight_home'
 	end
 end
 
@@ -298,7 +298,7 @@ if $ARGS[0] = 'end':
 		end
 		if lezbsexhome = 1:
 			killvar 'lezbsexhome'
-			dynamic $go_straight_home
+			gt 'din_npc', 'go_straight_home'
 		end
 		if $sexloc = 'stwork': gt 'stwork', 'start'
 		if picrand = 22:gt 'city_center'

+ 13 - 13
locations/lover_change.qsrc

@@ -22,7 +22,7 @@ if $ARGS[0] = 'Hair':
 				'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 				'You then leave the salon and head home.'
 				loverscompliance[lover_number] += 1
-				act 'Continue': dynamic $go_home
+				act 'Continue': gt 'din_npc', 'go_home'
 			exit
 			end
 			
@@ -35,7 +35,7 @@ if $ARGS[0] = 'Make':
 	minut += 60
 	if makeupSetting ! makePrefTmp: makeupSetting = makePrefTmp
 	loverscompliance[lover_number] += 1
-	act 'Continue': dynamic $go_home
+	act 'Continue': gt 'din_npc', 'go_home'
 exit
 end
 
@@ -117,7 +117,7 @@ if $ARGS[0] = 'Pier':
 					'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 					loverscompliance[lover_number] += 1
 					minut += 60
-					act 'Continue': dynamic $go_home
+					act 'Continue': gt 'din_npc', 'go_home'
 					exit
 				end
 			end
@@ -180,7 +180,7 @@ if $ARGS[0] = 'Pier':
 				'After this you guys talk for an hour about various things, before <<$tXe>> gets up and says <<$tXe>> has to go.'
 				'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 				loverscompliance[lover_number] += 1
-				act 'Continue': dynamic $go_home
+				act 'Continue': gt 'din_npc', 'go_home'
 				exit
 			end
 		end
@@ -371,7 +371,7 @@ if $ARGS[0] = 'Pier':
 									'After getting the piercings, you both part ways and head home.'
 									'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 									minut += 20
-									act 'Continue': dynamic $go_home
+									act 'Continue': gt 'din_npc', 'go_home'
 									exit
 								end							
 							elseif pierWearCount >= pierPrefTmpMin:
@@ -398,7 +398,7 @@ if $ARGS[0] = 'Pier':
 									'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 									loverscompliance[lover_number] += 1
 									minut += 20
-									act 'Continue': dynamic $go_home
+									act 'Continue': gt 'din_npc', 'go_home'
 									exit
 								end		
 							else
@@ -421,7 +421,7 @@ if $ARGS[0] = 'Pier':
 									'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 									loverscompliance[lover_number] += 1
 									minut += 20
-									act 'Continue': dynamic $go_home
+									act 'Continue': gt 'din_npc', 'go_home'
 									exit
 								end		
 							end
@@ -636,7 +636,7 @@ if $ARGS[0] = 'Tatt':
 							'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 							loverscompliance[lover_number] += 1
 							minut += 20
-							act 'Continue': dynamic $go_home
+							act 'Continue': gt 'din_npc', 'go_home'
 							exit
 						end		
 					
@@ -808,7 +808,7 @@ if $ARGS[0] = 'Tatt':
 							'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 							loverscompliance[lover_number] += 1
 							minut += 20
-							act 'Continue': dynamic $go_home
+							act 'Continue': gt 'din_npc', 'go_home'
 							exit
 						end		
 					end
@@ -879,7 +879,7 @@ if $ARGS[0] = 'Lips':
 						'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 						loverscompliance[lover_number] += 1
 						minut += 20
-						act 'Continue': dynamic $go_home
+						act 'Continue': gt 'din_npc', 'go_home'
 						exit
 					end	
 				
@@ -971,7 +971,7 @@ if $ARGS[0] = 'Tits':
 								'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 								loverscompliance[lover_number] += 1
 								minut += 20
-								act 'Continue': dynamic $go_home
+								act 'Continue': gt 'din_npc', 'go_home'
 							end
 							exit
 						end		
@@ -1043,7 +1043,7 @@ if $ARGS[0] = 'Tits':
 								'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 								loverscompliance[lover_number] += 1
 								minut += 20
-								act 'Continue': dynamic $go_home
+								act 'Continue': gt 'din_npc', 'go_home'
 							end
 							exit
 						end		
@@ -1139,7 +1139,7 @@ if $ARGS[0] = 'Figure':
 								'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
 								loverscompliance[lover_number] += 1
 								minut += 20
-								act 'Continue': dynamic $go_home
+								act 'Continue': gt 'din_npc', 'go_home'
 							end
 							exit
 							

+ 2 - 2
locations/lover_love.qsrc

@@ -40,7 +40,7 @@ elseif loverlove[lover_number] = 2:
 		minut += 60
 		gs 'lover', 'remove', lover_number
 		pregtalk = 0
-		dynamic $go_home
+		gt 'din_npc', 'go_home'
 		
 	end
 
@@ -55,7 +55,7 @@ elseif loverlove[lover_number] = 2:
 			loverlove[lover_number] = 3
 			'You get into a taxi with your soon to be husband and go to the store to choose a dress. You choose an expensive and luxurious dress. <<$loverdesc[lover_number]>> pays for the purchase.'
 			'After a long day you feel tired and ask <<$loverdesc[lover_number]>> to drive you home, warning him that the next time you''ll meet you will get married.'
-			dynamic $go_home
+			gt 'din_npc', 'go_home'
 		end
 	end
 

+ 18 - 18
locations/lover_meet.qsrc

@@ -165,7 +165,7 @@ if $ARGS[0] = 'start':
 					gs 'lover', 'remove', lover_number
 					'<<$loverdesc[lover_number]>> takes a closer look at you and says, "What is wrong with your lips? They are very sore. Is that genital herpes? I better go, I do not want to get infected. I''m sorry, goodbye."'
 					pcs_mood -= 20
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 					exit
 				elseif venera < 4 and cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
 					if haraklover[lover_number] = 0:
@@ -213,13 +213,13 @@ if $ARGS[0] = 'start':
 						gs 'lover', 'remove', lover_number
 						'<<$tXec>> notices the sperm on your face, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you out of <<$tXyr>> face. "We are through, I don''t want to see your face again!'
 						pcs_mood -= 20
-						dynamic $go_home
+						gt 'din_npc', 'go_home'
 						exit
 					elseif (cumloc[6] = 1 or cumloc[7] = 1):
 						loverrelation[lover_number] += 2
 						'<<$tXec>> notices the sperm on your ass, "<<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
 						pcs_mood -= 20
-						dynamic $go_home
+						gt 'din_npc', 'go_home'
 						exit
 					end
 				end
@@ -300,13 +300,13 @@ if $ARGS[0] = 'start':
 							gs 'lover', 'remove', lover_number
 							'<<$tXec>> notices the sperm on your face, "<<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you out of <<$tXyr>> face. "We are through, I don''t want to see your face again!'
 							pcs_mood -= 20
-							dynamic $go_home
+							gt 'din_npc', 'go_home'
 							exit
 						elseif (cumloc[6] = 1 or cumloc[7] = 1):
 							gs 'lover', 'remove', lover_number
 							'<<$tXec>> notices the sperm on your ass, "<<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
 							pcs_mood -= 20
-							dynamic $go_home
+							gt 'din_npc', 'go_home'
 							exit
 						end
 					end
@@ -372,19 +372,19 @@ if $ARGS[0] = 'start':
 						gs 'lover', 'remove', lover_number
 						'<<$tXec>> notices the sperm on your face, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you out of <<$tXyr>> face. "We are through, I don''t want to see your face again!'
 						pcs_mood -= 20
-						dynamic $go_home
+						gt 'din_npc', 'go_home'
 						exit
 					elseif (cumloc[6] = 1 or cumloc[7] = 1):
 						gs 'lover', 'remove', lover_number
 						'<<$tXec>> notices the sperm on your ass, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
 						pcs_mood -= 20
-						dynamic $go_home
+						gt 'din_npc', 'go_home'
 						exit
 					elseif (cumloc[6] = 1 or cumloc[7] = 1):
 						gs 'lover', 'remove', lover_number
 						'<<$tXec>> realizes your mouth smells like sperm, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!"'
 						pcs_mood -= 20
-						dynamic $go_home
+						gt 'din_npc', 'go_home'
 						exit
 					end
 				end
@@ -481,7 +481,7 @@ if $ARGS[0] = 'actions':
 					loverrelation[lover_number] -=3
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 					'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 			else
 				act 'I like my <<$lover_meet["ChangeName"]>> just the way it is (<font color="red"><<will_cost>> Willpower</font>)':'<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -602,7 +602,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 				act 'Go with <<$tXem>>':gt 'podezdM', 'start'
 			elseif randchan = 2 or loverGender[lover_number] = 1:
@@ -612,7 +612,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -760,7 +760,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -775,7 +775,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -790,7 +790,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -960,7 +960,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to leave':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -976,7 +976,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to leave':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -993,7 +993,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home
+					gt 'din_npc', 'go_home'
 				end
 
 				act 'Go with <<$tXem>>':
@@ -1036,7 +1036,7 @@ if $ARGS[0] = 'actions':
 		'<<$tXec>> looks hurt, but you insist it is for the best. You both say goodbye and part ways.'
 		gs 'lover', 'remove', lover_number
 		act 'Continue':
-			dynamic $go_home
+			gt 'din_npc', 'go_home'
 			exit
 		end
 	end

+ 4 - 4
locations/podezdM.qsrc

@@ -115,13 +115,13 @@ if $ARGS[0] = 'kiosk2':
 		'<<$loverdesc[lover_number]>> drinks his beer and wraps his arm around you. "<<$pcs_nickname>> why don''t we go back to your place?"'
 		act 'Invite him in':gt 'sexm', 'start'
 		act 'Turn him down':gt 'podezdM', 'Walk'
-		act 'I have to go, call you later':dynamic $go_home
+		act 'I have to go, call you later':gt 'din_npc', 'go_home'
 
 	else
 		'<<$loverdesc[lover_number]>> drinks his beer and wraps his arm around you. "<<$pcs_nickname>> why don''t you come back to my place?"'
 		act 'Agree':gt 'sexm', 'start'
 		act 'Turn him down':gt 'podezdM', 'Walk'
-		act 'I have to go, call you later':dynamic $go_home
+		act 'I have to go, call you later':gt 'din_npc', 'go_home'
 	end
 end
 
@@ -138,7 +138,7 @@ if $ARGS[0] = 'Walk':
 			loverrelation[lover_number] -= 1
 			gs 'stat'
 			'You push against him, hard, and finally manage to push him off you, making him stumble back a step. He seems confused that you pushed him away. "What the fuck?! Don''t think you can treat me like you please, I''m not as easy as you think!" With that, you turn and walk away.'
-			act 'I have to go, maybe I''ll call you later':dynamic $go_home
+			act 'I have to go, maybe I''ll call you later':gt 'din_npc', 'go_home'
 		end
 	else
 		act 'Break away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -336,7 +336,7 @@ if $ARGS[0] = 'alleyway':
 		gs 'cum_call', 'butt', $boy, 1
 		gs 'stat'
 
-		act 'Return':dynamic $go_home
+		act 'Return':gt 'din_npc', 'go_home'
 	end
 end
 

+ 23 - 23
locations/sexm.qsrc

@@ -73,7 +73,7 @@ if $ARGS[0] = 'start':
 		gs 'arousal', 'end'
 		gs 'stat'
 		
-		dynamic $go_home
+		gt 'din_npc', 'go_home'
 	end
 
 	act 'Say goodnight':
@@ -132,7 +132,7 @@ if $ARGS[0] = 'start':
 			end
 		end
 
-		dynamic $go_home
+		gt 'din_npc', 'go_home'
 	end
 
 	if husband = 0:
@@ -150,19 +150,19 @@ if $ARGS[0] = 'start':
 					gs 'lover', 'remove', lover_number
 					'"What, you are married! You didn''t think to say anything earlier? I thought I loved you, you bitch!" he shouts and then runs away in tears.'
 
-					act 'Go to your apartment': dynamic $go_straight_home
+					act 'Go to your apartment': gt 'din_npc', 'go_straight_home'
 
 				elseif haraklover[lover_number] = 1:
 					'"Well then, see you, I''ll call you," he said quietly and left.'
 
-					act 'Go to your apartment': dynamic $go_straight_home
+					act 'Go to your apartment': gt 'din_npc', 'go_straight_home'
 
 				elseif haraklover[lover_number] = 2:
 					'"If your husband is in the apartment, maybe you can climb a little higher, perhaps up to the attic?" he says, with a sly grin.'
 
 					act 'Refuse':
 						loverrelation[lover_number] -= 1
-						dynamic $go_straight_home
+						gt 'din_npc', 'go_straight_home'
 					end
 					act 'Agree':
 						loverrelation[lover_number] += 1
@@ -460,7 +460,7 @@ if $ARGS[0] = 'strapon':
 	act 'Wipe your hands and walk him to the door':
 		cla
 		gs 'arousal', 'end'
-		dynamic $go_straight_home
+		gt 'din_npc', 'go_straight_home'
 	end
 end
 
@@ -627,7 +627,7 @@ if $ARGS[0] = 'startPod':
 				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
 				gs 'lover', 'remove', lover_number
-				dynamic $go_straight_home		
+				gt 'din_npc', 'go_straight_home'		
 			end
 		else
 			act 'Fuck off! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -644,7 +644,7 @@ if $ARGS[0] = 'startPod':
 				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
 				gs 'lover', 'remove', lover_number
-				dynamic $go_straight_home
+				gt 'din_npc', 'go_straight_home'
 			end
 		else
 			act 'Fuck off! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -672,7 +672,7 @@ if $ARGS[0] = 'doggy':
 
 	act 'Collect clothes and leave':
 		cla
-		dynamic $go_straight_home
+		gt 'din_npc', 'go_straight_home'
 	end
 end
 
@@ -709,7 +709,7 @@ if $ARGS[0] = 'blow':
 			act 'Leave':
 				cla
 				gs 'arousal', 'end'
-				dynamic $go_straight_home
+				gt 'din_npc', 'go_straight_home'
 			end
 		end
 		gs 'willpower', 'swallow', 'resist', 'medium'
@@ -749,7 +749,7 @@ if $ARGS[0] = 'blow':
 				act 'Leave':
 					cla
 					gs 'arousal', 'end'
-					dynamic $go_straight_home
+					gt 'din_npc', 'go_straight_home'
 				end
 			end
 		else
@@ -778,7 +778,7 @@ if $ARGS[0] = 'blow':
 		act 'Wipe your hands and walk away':
 			cla
 			gs 'arousal', 'end'
-			dynamic $go_straight_home
+			gt 'din_npc', 'go_straight_home'
 		end
 	end
 end
@@ -886,7 +886,7 @@ if $ARGS[0] = 'gangbang':
 			act 'Leave':
 				cla
 				gs 'arousal', 'end'
-				dynamic $go_straight_home
+				gt 'din_npc', 'go_straight_home'
 			end
 		end
 	end
@@ -929,12 +929,12 @@ if $ARGS[0] = 'popala':
 				gs 'lover', 'remove', lover_number
 				'"Wait,you''re married! You deceived me even though I loved you. Goodbye!" your guy shouts at you and runs after your husband.'
 
-				act 'Leave':  dynamic $go_straight_home
+				act 'Leave':  gt 'din_npc', 'go_straight_home'
 
 			elseif haraklover[lover_number] = 1:
 				'"Well, I see you are not only for me, so perhaps I''ll go, but if you want I can stay and comfort you " said <<$loverdesc[lover_number]>>'
 
-				act 'Let him go': dynamic $go_straight_home
+				act 'Let him go': gt 'din_npc', 'go_straight_home'
 
 
 				act 'Let him stay':
@@ -950,7 +950,7 @@ if $ARGS[0] = 'popala':
 
 				act 'Refuse':
 					loverrelation[lover_number] -= 1
-					dynamic $go_straight_home
+					gt 'din_npc', 'go_straight_home'
 				end
 
 				act 'Continue':
@@ -976,7 +976,7 @@ if $ARGS[0] = 'popala':
 				'"So you''re married! you deceived me even though I loved you. You are a despicable liar. Goodbye!" your guy shouted and ran out of the room.'
 				'"He''s right, you''re a liar, and you do not deserve me, you''re a fallen woman, I don''t want to see you again" You husband burst into tears and ran out to follow the guy.'
 
-				act 'Leave': dynamic $go_straight_home
+				act 'Leave': gt 'din_npc', 'go_straight_home'
 
 			elseif haraklover[lover_number] = 1:
 				'<<$loverdesc[lover_number]>> stood by you and watched as you fucked your husband, "Wow, you seem to really enjoy sex with your husband. This really can''t compare to what we did. Well maybe you can use your mouth and I can still be useful" he said.'
@@ -1046,12 +1046,12 @@ if $ARGS[0] = 'popala':
 				gs 'lover', 'remove', lover_number
 				'"Wait,you''re married!, you deceived me even though I loved you. Goodbye!" your guy shouted and ran out of the room.'
 
-				act 'Leave': dynamic $go_straight_home
+				act 'Leave': gt 'din_npc', 'go_straight_home'
 				
 			elseif haraklover[lover_number] = 1:
 				'"Well, I see am not the only one for you, so perhaps I''ll go. But if you want I can stay and comfort you " said <<$loverdesc[lover_number]>>'
 
-				act 'Let him go': dynamic $go_straight_home
+				act 'Let him go': gt 'din_npc', 'go_straight_home'
 
 				act 'Let him stay':
 					loverrelation[lover_number] += 1
@@ -1066,7 +1066,7 @@ if $ARGS[0] = 'popala':
 
 				act 'Refuse':
 					loverrelation[lover_number] -= 1
-					dynamic $go_straight_home
+					gt 'din_npc', 'go_straight_home'
 				end
 
 				act 'Continue':
@@ -1098,7 +1098,7 @@ if $ARGS[0] = 'popala':
 					
 					act 'Leave':
 						gs 'arousal', 'end'
-						dynamic $go_straight_home
+						gt 'din_npc', 'go_straight_home'
 					end
 				end
 			elseif haraklover[lover_number] = 1:
@@ -1171,7 +1171,7 @@ if $ARGS[0] = 'popala':
 			'while getting up you could see in the corner of the room your husband giving blow after blow to your lover, and <<$loverdesc[lover_number]>> was trying hard to escape out the door, finally he succeeds and he runs out of the apartment at a breakneck pace.'
 			'<<$husName>> looked at you, "Here ... you ... whore ... cock ... and pussy ... and ass ... and in your mouth." he says putting a strong emphasis on every word. At the end of the last word, he kicks you in the face, rendering you unconscious. You woke up two hours later. Your husband was gone and so was all of his stuff. Some of your stuff was missing too'
 
-			act 'Leave': dynamic $go_straight_home
+			act 'Leave': gt 'din_npc', 'go_straight_home'
 
 		elseif izvratH = 1:
 			gs 'lover', 'remove', lover_number
@@ -1198,7 +1198,7 @@ if $ARGS[0] = 'endsex':
 
 	boycherdaksex = 0
 	gs 'arousal', 'end'
-	dynamic $go_straight_home
+	gt 'din_npc', 'go_straight_home'
 end
 
 --- sexm ---------------------------------