Browse Source

[fixed] I threw the mentioning of the sauna into it's own args and it is now called with gs 'belgang', 'saunamention'.
paying off your remaining debt was using the exact same code twice so I made an args for that as well.
Fixed some grammar/spelling that caught my eye.

CroWke 5 years ago
parent
commit
ab946cab78
1 changed files with 37 additions and 62 deletions
  1. 37 62
      locations/belgang.qsrc

+ 37 - 62
locations/belgang.qsrc

@@ -16,28 +16,7 @@ if $ARGS[0] = 'workofdebt':
 	end
 	
 	if money >= belgangPay: 
-		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)':
-			cla & *clr
-			minut += 5
-			money -= belgangPay
-			belgangPay = 0
-			belgangPayWeek = 0
-			belgangPayWeekAmount = 0
-			belgangProstitute = 0
-			npc_QW['A113'] = 2
-			
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
-			'No, today you won''t work for him, you will never work for him again, today you will finally be free. "Here is everything. May debts are payed." You handing it over to Vadim while his henchmen keep a look out. Once again, he gives you an awkward smile, very pleased how things have turned out. "It''s all there, right? I would hate to have to come back for the rest."'
-			'You nod at him, reassuring him. "It''s all there, mister Bely. Count them if you don''t believe me."'
-			'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount. Pleasure doing business with you, <<$pcs_nickname>>. Take care of yourself."'
-			if slutty >= 20 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"Since you were such an obedient whore, <<$pcs_nickname>>, I''ll give you a small parting gift. If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-			end
-			'He signals his crew to get back in the jeep. You barely manage to dodge the spray of pebbles and dirt the spinning tires spew your way, as they drive off as fast as they can, probably on their way to another ''business appointment''.'
-			
-			act 'Move on': gt $loc
-		end
+		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)': gt 'belgang', 'payremaining'
 	end
 	
 	if money >= belgangPayWeek and money < belgangPay:
@@ -97,28 +76,7 @@ elseif $ARGS[0] = 'payday':
 	end
 	
 	if money >= belgangPay: 
-		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)':
-			cla & *clr
-			minut += 5
-			money -= belgangPay
-			belgangPayWeek = 0
-			belgangPayWeekAmount = 0
-			belgangPay = 0
-			belgangProstitute = 0
-			npc_QW['A113'] = 2
-			
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
-			'No, today you won''t work for him, you will never work for him again, today you will finally be free. "Here is everything. May debts are payed." You handing it over to Vadim while his henchmen keep a look out. Once again, he gives you an awkward smile, very pleased how things have turned out. "It''s all there, right? I would hate to have to come back for the rest."'
-			'You nod at him, reassuring him. "It''s all there, mister Bely. Count them if you don''t believe me."'
-			'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount. Pleasure doing business with you, <<$pcs_nickname>>. Take care of yourself."'
-			if slutty >= 20 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"Since you were such an obedient whore, <<$pcs_nickname>>, I''ll give you a small parting gift. If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-			end
-			'He signals his crew to get back in the jeep. You barely manage to dodge the spray of pebbles and dirt the spinning tires spew your way, as they drive off as fast as they can, probably on their way to another ''business appointment''.'
-			
-			act 'Move on': gt $loc
-		end
+		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)': gt 'belgang', 'payremaining'
 	elseif money >= belgangPayWeek and money < belgangPay and belgangPayWeek > 0:
 		act 'Pay for this week (<<belgangPayWeek>> <b>₽</b>)':
 			cla & *clr
@@ -130,10 +88,7 @@ elseif $ARGS[0] = 'payday':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
 			'You hand over the payment for this week. "That''s it, everything for this week."'
 			'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount."'
-			if slutty >= 10 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-			end
+			gs 'belgang', 'saunamention'
 			
 			act 'Continue':
 				cla & *clr
@@ -156,14 +111,11 @@ elseif $ARGS[0] = 'payday':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 		if belfirstweek = 1:
 			belfirstweek = 0
-			'Vadim Bely steps out, along with several of his henchmen. He gives you a smile that you know is 100% fake and behaves amicably while he says: "Long time no see, <<$pcs_nickname>>! Remember next sunday you need to start paying us," he says.'
+			'Vadim Bely steps out, along with several of his henchmen. He gives you a smile that you know is 100% fake and behaves amicably while he says: "Long time no see, <<$pcs_nickname>>! Remember next Sunday you need to start paying us," he says.'
 		else
 			'Vadim Bely steps out, along with several of his henchmen. He gives you a smile that you know is 100% fake and behaves amicably while he says: "Long time no see, <<$pcs_nickname>>! You are doing good. If you keep paying early, this will work out for the both of us," he says.' 
 		end
-		if slutty >= 10 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-		end
+		gs 'belgang', 'saunamention'
 		act 'Continue':
 			cla & *clr
 			minut += 5
@@ -195,12 +147,9 @@ elseif $ARGS[0] = 'payday':
 				'He frowns, abruptly cutting you off. You can see the disapproval in his eyes when you glance up. "That is very unfortunate, <<$pcs_nickname>>," he says. "You can pay me next week, but I expect 2000 <b>₽</b> extra."'
 				if belgangProstitute = 0:
 					belgangProstitute = 1
-					'"And don''t worry, <<$pcs_nickname>>. I''ll give you some opportunities to help you pay down your debts," he says with a dangerous smile.'
-				end
-				if slutty >= 20 and SaunaWhore = 0:
-					SaunaWhore = 1
-					'"But since you are such an obedient whore, <<$pcs_nickname>>, I''ll help you out. If you need more money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
+					'"And don''t worry, <<$pcs_nickname>>. I''ll give you some opportunities to help you pay your debts," he says with a dangerous smile.'
 				end
+				gs 'belgang', 'saunamention'
 				*nl
 				'You owe him: <<belgangPay>> <b>₽</b>'
 				'Next week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
@@ -214,10 +163,7 @@ elseif $ARGS[0] = 'payday':
 					belgangPayWeek = belgangPay
 				end
 				'He frowns, abruptly cutting you off. You can see the disapproval in his eyes when you glance up. "That is the last time, <<$pcs_nickname>>," he says. "You can pay me next week, but I expect 5000 <b>₽</b> extra.'
-				if slutty >= 20 and SaunaWhore = 0:
-					SaunaWhore = 1
-					'"But since you are such an obedient whore, <<$pcs_nickname>>, I''ll help you out. If you need more money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-				end
+				gs 'belgang', 'saunamention'
 				*nl
 				'You owe him: <<belgangPay>> <b>₽</b>'
 				'Next week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
@@ -251,6 +197,35 @@ elseif $ARGS[0] = 'payday':
 	end
 end
 
+if $ARGS[0] = 'payremaining':
+	cla & *clr
+	minut += 5
+	money -= belgangPay
+	belgangPay = 0
+	belgangPayWeek = 0
+	belgangPayWeekAmount = 0
+	belgangProstitute = 0
+	npc_QW['A113'] = 2
+	
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
+	'No, today you won''t work for him, you will never work for him again, today you will finally be free. "Here is everything. May debts are payed." You hand it over to Vadim while his henchmen keep a lookout. Once again, he gives you an awkward smile, very pleased how things have turned out. "It''s all there, right? I would hate to have to come back for the rest."'
+	'You nod at him, reassuring him. "It''s all there, mister Bely. Count it if you don''t believe me."'
+	'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount. Pleasure doing business with you, <<$pcs_nickname>>. Take care of yourself."'
+	gs 'belgang', 'saunamention'
+	'He signals his crew to get back in the jeep. You barely manage to dodge the spray of pebbles and dirt the spinning tires spew your way, as they drive off as fast as they can, probably on their way to another ''business appointment''.'
+	
+	act 'Move on': gt $loc
+end
+
+if $ARGS[0] = 'saunamention':
+	if slutty >= 20 and SaunaWhore = 0:
+		SaunaWhore = 1
+		'"Since you were such an obedient whore, <<$pcs_nickname>>, I''ll give you a small parting gift. If you ever need money, go to the sauna in the city and tell them Mr. Bely sent you. You will have plenty of opportunities to use your ''talents'' there."'
+	elseif slutty >= 10 and SaunaWhore = 0:
+		SaunaWhore = 1
+		'"If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
+	end
+end
 
 --- belgang ---------------------------------