Ver código fonte

[added] more `blackmailer` content. This will probably be it for now though

anjuna krokus 7 meses atrás
pai
commit
0f24a49948
1 arquivos alterados com 279 adições e 74 exclusões
  1. 279 74
      locations/blackmailer.qsrc

+ 279 - 74
locations/blackmailer.qsrc

@@ -143,6 +143,10 @@ if $ARGS[0] = 'cikl':
 		elseif daystart >= blackmailQW['smsday']:
 			if blackmailQW['stage'] = 3:
 				gs 'telefon', 'SetSMSSchedule', 'Blackmailer', "", "0", "gs 'blackmailer', 'Add_SMS1'", "(hour >= 14 and hour <= 19 and rand(0, 100) = 0 or hour = 19 and minut >= 22 or hour = 20)"
+			elseif blackmailQW['stage'] = 8:
+				gs 'telefon', 'SetSMSSchedule', 'Blackmailer', "", "0", "gs 'blackmailer', 'Add_SMS_package'", "(hour >= 8 and hour <= 12 and rand(0, 100) = 0 or hour = 13 and minut >= 22 or hour = 14)"
+			elseif blackmailQW['stage'] = 9:
+				gs 'telefon', 'SetSMSSchedule', 'Blackmailer', "", "0", "gs 'blackmailer', 'Add_SMS_failure'", "(hour >= 14 and hour <= 19 and rand(0, 100) = 0 or hour = 19 and minut >= 22 or hour = 20)"
 			elseif blackmailQW['stage'] >= 5:
 				gs 'telefon', 'SetSMSSchedule', 'Blackmailer', "", "0", "gs 'blackmailer', 'Add_SMS_repeat'", "(hour >= 14 and hour <= 19 and rand(0, 100) = 0 or hour = 19 and minut >= 22 or hour = 20)"
 			end
@@ -344,6 +348,7 @@ if $ARGS[0] = 'Add_SMS1_reminder':
 
 	if blackmailQW['next_payment'] > 0:
 		if blackmailQW['escape'] = -1: blackmailQW['escape'] = 0
+
 		$SMSTree['0'] = '<<$pcs_firstname>> don''t forget, if you don''t leave <<blackmailQW[''next_payment'']>> <b>₽</b> beneath the fourth park bench, you will regret it'
 
 		gs 'SMStext_builder', 'start'
@@ -359,7 +364,7 @@ if $ARGS[0] = 'Add_SMS_failure':
 	gs 'telefon', 'ClearSMSSchedule', 'Blackmailer'
 	blackmailQW['smsday'] = 0
 
-	if blackmailQW['next_payment'] > 0:
+	if blackmailQW['next_payment'] > 0 or blackmailQW['stage'] = 9:
 		if blackmailQW['escape'] = -1: blackmailQW['escape'] = 0
 		blackmailQW['next_payment'] = 0
 
@@ -374,7 +379,7 @@ if $ARGS[0] = 'Add_SMS_failure':
 			gs 'SMStext_builder', 'add_sms', 'Blackmailer'
 		gs 'SMStext_builder', 'end'
 
-		if blackmailQW['stage'] < 6:
+		if blackmailQW['stage'] < 9:
 			if blackmailQW['init_flashregion'] = 'city':
 				fame['city_sex'] += 2 * blackmailQW['total_material']
 			elseif blackmailQW['init_flashregion'] = 'gad':
@@ -388,6 +393,26 @@ if $ARGS[0] = 'Add_SMS_failure':
 end
 
 
+if $ARGS[0] = 'Add_SMS_package':
+	gs 'telefon', 'ClearSMSSchedule', 'Blackmailer'
+	if blackmailQW['stage'] < 9: blackmailQW['stage'] = 9
+	blackmailQW['smsday'] = daystart + 2
+	mail['city'] += 1
+
+	$SMSTree['0'] = 'The package has arrived at the St. Petersburg post office'
+		$SMSTree['1'] = 'Pick it up in the next 2 days, or you know what will happen'
+
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'receive', $SMSTree['0']
+		gs 'SMStext_builder', 'receive', $SMSTree['1']
+
+		gs 'SMStext_builder', 'add_sms', 'Blackmailer'
+	gs 'SMStext_builder', 'end'
+end
+
+
+
+
 
 	!!=============================================!!
 	!!                                             !!
@@ -398,7 +423,9 @@ end
 if $ARGS[0] = 'set_park_act':
 	if blackmailQW['next_payment'] > 0:
 		act 'Walk to the fourth bench to pay your blackmailer':
+			menu_off = 1
 			minut += 3
+			gs 'stat'
 			if blackmailQW['stage'] = 4:
 				gt 'blackmailer', 'park1'
 			else
@@ -410,9 +437,6 @@ end
 
 
 if $ARGS[0] = 'park1':
-	menu_off = 1
-	gs 'stat'
-
 	'<center><img src="images/locations/shared/park/bench_6.jpg"></center>'
 	'You spot the bench that your blackmailer is talking about, and take a seat at the edge of it.'
 
@@ -576,20 +600,58 @@ end
 
 	!!=============================================!!
 	!!                                             !!
-	!!                  REPEATING                  !!
+	!!                 POST OFFICE                 !!
 	!!                                             !!
 	!!=============================================!!
 
 
-if $ARGS[0] = 'Add_SMS_repeat':
-	gs 'telefon', 'ClearSMSSchedule', 'Blackmailer'
-	blackmailQW['smsday'] = daystart + 2
-	if blackmailQW['escape'] = -1: blackmailQW['escape'] = 0
-	blackmailQW['next_payment'] = (rand(50, 100) + (blackmailQW['total_payment'] / 50 ) / (1 + blackmailQW['total_payment'] / 20000)) * 10
-	$blackmailQW['blackmail_image_chosen'] = func('blackmailer', 'choose_blackmail_image')
+if $ARGS[0] = 'set_post_act':
+	if blackmailQW['stage'] = 9 and $region = 'city':
+		act 'Pick up the package':
+			menu_off = 1
+			minut += 5
+			gs 'stat'
+			gt 'blackmailer', 'post_office1'
+		end
+	end
+end
 
-	$SMSTree['0'] = 'You know what we want'
+if $ARGS[0] = 'post_office1':
+	blackmailQW['stage'] = 10
+	mail['city'] -= 1
+
+	'<center><img src="images/locations/shared/postoffice/worker.jpg"></center>'
+	'The postal worker hands you a medium sized non-descript package. It has no return adress.'
+
+	act 'Ask who send the package':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+		'<center><img src="images/locations/shared/postoffice/worker.jpg"></center>'
+		'He looks at you and raises an eyebrow. "Why are you picking up a package if you don''t know who send it?"'
+		'After a few seconds of silence, the postal worker sighs and looks at something out of your view.'
+		if year = 2016 or year = 2017 and month < 9:
+			'"It says here that the package was collected from a public post box in Pavlovsk."'
+		else
+			'"It says here that the package was collected from a public post box in the University district."'
+		end
+		'"Not much more to go on I''m afraid."'
 
+		act 'Thank him and leave': minut += 1 & gt 'post_office', 'pickup_mail'
+	end
+end
+
+
+
+	!!=============================================!!
+	!!                                             !!
+	!!                  REPEATING                  !!
+	!!                                             !!
+	!!=============================================!!
+
+
+if $ARGS[0] = 'set_SMSTree':
+	$SMSTree['0'] = 'You know what we want'
 		if motherKnowWhore = 0 and npc_rel['A29'] > 0:
 			$SMSTree['1'] = 'If you don''t want your mother to see this image you will do exactly as I say'
 		elseif $start_type['loc'] = 'sg' and gruptipe ! 5:
@@ -610,8 +672,61 @@ if $ARGS[0] = 'Add_SMS_repeat':
 						else
 							$SMSTree['b4'] = 'How much do you want before it stops?'
 						end
+	
+	$SMSTree['5'] = 'Just drop off the money'
+		$SMSTree['6'] = 'or else'
+
+	$SMSTree['10a'] = 'Work as a stripper, it''s what you were clearly born to do'
+		$SMSTree['11a'] = 'How about this. Send us a picture of your tits and we''ll lower it'
+
+	$SMSTree['10b'] = 'Send a nude like the slut you are'
+		$SMSTree['11b'] = 'or you could do something special for us'
+
+			$SMSTree['a12'] = 'fuck you'
+			$SMSTree['b12'] = 'Send a selfie from your galleray'
+			$SMSTree['c12'] = 'what?'
+			$SMSTree['d12'] = 'yes sir'
+
+
+		$SMSTree['a20'] = 'WTF! i said a pic of your tits, not this boring shit'
+			$SMSTree['a21'] = 'you better bring an additional 500 <b>₽</b>!'
+				$SMSTree['a22'] = 'drop <<blackmailQW[''next_payment''] + 500>> <b>₽</b> off in the park, or else!'
+		$SMSTree['b20'] = 'nice'
+			$SMSTree['b21'] = 'that''s worth about 500 <b>₽</b>'
+				$SMSTree['b22'] = 'don''t forget to drop <<blackmailQW[''next_payment''] - 500>> <b>₽</b> off in the park'
+		$SMSTree['c20'] = 'WOW'
+			$SMSTree['c21'] = 'that''s worth about 1000 <b>₽</b>'
+				$SMSTree['c22'] = 'don''t forget to drop <<blackmailQW[''next_payment''] - 1000>> <b>₽</b> off in the park'
+		$SMSTree['d20'] = 'DAMN! you really are a slut aren''t you'
+			$SMSTree['d21'] = 'definitely worth 2000 <b>₽</b>'
+				$SMSTree['d22'] = 'now you only need to drop <<blackmailQW[''next_payment''] - 2000>> <b>₽</b> off in the park'
+
+
+				$SMSTree['x22'] = 'you''re all settled for now'
 
 
+	$SMSTree['30'] = 'We''ll send you a package with instructions, it''ll take a while though'
+		$SMSTree['31'] = 'we''ll clear your debt for this week, do not make us regret this!'
+
+			$SMSTree['a32'] = 'fuck you'
+
+			$SMSTree['b32'] = 'ok'
+				$SMSTree['b33'] = 'we''ll work on your tone'
+			$SMSTree['c32'] = 'yes sir'
+				$SMSTree['c33'] = 'good girl'
+
+end
+
+
+
+if $ARGS[0] = 'Add_SMS_repeat':
+	gs 'telefon', 'ClearSMSSchedule', 'Blackmailer'
+	blackmailQW['smsday'] = daystart + 2
+	if blackmailQW['escape'] = -1: blackmailQW['escape'] = 0
+	blackmailQW['next_payment'] = (rand(50, 100) + (blackmailQW['total_payment'] / 50 ) / (1 + blackmailQW['total_payment'] / 20000)) * 10
+	$blackmailQW['blackmail_image_chosen'] = func('blackmailer', 'choose_blackmail_image')
+
+	gs 'blackmailer', 'set_SMSTree'
 
 	gs 'SMStext_builder', 'start'
 		gs 'SMStext_builder', 'receive', $SMSTree['0']
@@ -620,26 +735,39 @@ if $ARGS[0] = 'Add_SMS_repeat':
 		gs 'SMStext_builder', 'receive', $SMSTree['2']
 		gs 'SMStext_builder', 'receive', $SMSTree['3']
 		if blackmailQW['next_payment'] < 2000 and blackmailQW['total_payment'] < 5000:
-			gs 'SMStext_builder', 'add_reply', $SMSTree['a4'], 'blackmailer', 'sms_repeat_switch1', '1', $SMSTree['a4']
-		else
-			gs 'SMStext_builder', 'add_reply', $SMSTree['b4'], 'blackmailer', 'sms_repeat_switch1', '2', $SMSTree['a4']
+			gs 'SMStext_builder', 'add_reply', $SMSTree['a4'], 'blackmailer', 'sms_repeat_end1', $SMSTree['a4']
+		elseif blackmailQW['stage'] < 8 and blackmailQW['next_payment'] < 3000:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b4'], 'blackmailer', 'sms_repeat_switch1', 'a', $SMSTree['b4']
+		elseif blackmailQW['stage'] = 7:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b4'], 'blackmailer', 'sms_repeat_switch1', 'b', $SMSTree['b4']
+		elseif blackmailQW['stage'] >= 10:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b4'], 'blackmailer', 'sms_repeat_switch1', 'c', $SMSTree['b4']
 		end
 		gs 'SMStext_builder', 'add_sms', 'Blackmailer'
 	gs 'SMStext_builder', 'end'
-	killvar '$SMSTree'
 end
 
-if $ARGS[0] = 'sms_repeat_switch1':
-	if $ARGS[1] = '1':
-		$SMSTree['10'] = 'Just drop off the money'
-			$SMSTree['11'] = 'or else'
-	else
-		$SMSTree['10'] = 'Work as a stripper, it''s what you were clearly born to do'
-			$SMSTree['11'] = 'How about this. Send us a picture of your tits and we''ll call it even'
-	end
+if $ARGS[0] = 'sms_repeat_end1':
+	gs 'blackmailer', 'set_SMSTree'
+
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[1]]
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 250
 
-				$SMSTree['a12'] = 'fuck you'
-				$SMSTree['b12'] = 'Send a selfie from your galleray'
+		gs 'SMStext_builder', 'receive', $SMSTree['5']
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 250
+
+		gs 'SMStext_builder', 'receive', $SMSTree['6']
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+	gs 'SMStext_builder', 'end'
+end
+
+if $ARGS[0] = 'sms_repeat_switch1':
+	gs 'blackmailer', 'set_SMSTree'
 
 	gs 'SMStext_builder', 'start'
 		gs 'SMStext_builder', 'send', $ARGS[2]
@@ -647,24 +775,27 @@ if $ARGS[0] = 'sms_repeat_switch1':
 
 		wait 250
 
-		gs 'SMStext_builder', 'receive', $SMSTree['10']
+		gs 'SMStext_builder', 'receive', $SMSTree['10' + $ARGS[1]]
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
 
 		wait 250
 
-		gs 'SMStext_builder', 'receive', $SMSTree['11']
+		gs 'SMStext_builder', 'receive', $SMSTree['11' + $ARGS[1]]
 
-		if $ARGS[1] = '2':
-			gs 'SMStext_builder', 'add_reply', $SMSTree['a12'], 'blackmailer', 'sms_repeat_switch1', '1', $SMSTree['a12']
-			gs 'SMStext_builder', 'send_selfie', $SMSTree['b12'], iif(blackmailQW['stage'] < 6, 'c|sw|u|ft|fa', 'c|sw|u|n|b|sh|ft|fa|fp'), 'blackmailer', 'sms_repeat_switch2'
+		gs 'SMStext_builder', 'add_reply', $SMSTree['a12'], 'blackmailer', 'sms_repeat_end1', 'a12'
+		gs 'SMStext_builder', 'send_selfie', $SMSTree['b12'], iif(blackmailQW['stage'] < 6, 'c|sw|u|ft|fa', 'c|sw|u|n|b|sh|ft|fa|fp'), 'blackmailer', 'sms_repeat_switch2'
+		if $ARGS[1] = 'b': 
+			gs 'SMStext_builder', 'add_reply', $SMSTree['c12'], 'blackmailer', 'sms_repeat_switch3', 'c12'
+		elseif $ARGS[1] = 'c':
+			gs 'SMStext_builder', 'add_reply', $SMSTree['c12'], 'blackmailer', 'sms_repeat_switch5', 'd12'
 		end
 
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
 	gs 'SMStext_builder', 'end'
-	killvar '$SMSTree'
 end
 
 
+
 !  ARGS[1] = npc_code
 ! $ARGS[2] = image
 ! $ARGS[3] = location
@@ -672,18 +803,7 @@ end
 !  ARGS[5] = self loc index
 !  ARGS[6] = selfie code
 if $ARGS[0] = 'sms_repeat_switch2':
-
-	$SMSTree['a20'] = 'WTF! i said a pic of your tits, not this boring shit'
-		$SMSTree['a21'] = 'you better bring an additional 500 <b>₽</b>!'
-
-	$SMSTree['b20'] = 'nice'
-		$SMSTree['b21'] = 'that''s worth about 500 <b>₽</b>'
-
-	$SMSTree['c20'] = 'WOW'
-		$SMSTree['c21'] = 'that''s worth about 1000 <b>₽</b>'
-
-	$SMSTree['d20'] = 'DAMN! you really are a slut aren''t you'
-		$SMSTree['d21'] = 'definitely worth 2000 <b>₽</b>'
+	gs 'blackmailer', 'set_SMSTree', $ARGS[4]
 
 	gs 'SMStext_builder', 'start'
 		gs 'SMStext_builder', 'send_img', $ARGS[2]
@@ -693,63 +813,148 @@ if $ARGS[0] = 'sms_repeat_switch2':
 
 		if $ARGS[4] = 'clothed':
 			blackmailQW['next_payment'] += 500
-			gs 'SMStext_builder', 'receive', $SMSTree['a20']
-			gs 'SMStext_builder', 'show_sms', ARGS[1]
-			wait 250
-			gs 'SMStext_builder', 'receive', $SMSTree['a21']
+			$temp_path = 'a'
 
 		elseif strpos('bikini|underwear', $ARGS[4]) > 0:
 			blackmailQW['next_payment'] -= 500
-			gs 'SMStext_builder', 'receive', $SMSTree['b20']
-			gs 'SMStext_builder', 'show_sms', ARGS[1]
-			wait 250
-			gs 'SMStext_builder', 'receive', $SMSTree['b21']
+			$temp_path = 'b'
 
 		elseif strpos('bath|shower|titflash|assflash', $ARGS[4]) > 0:
 			blackmailQW['next_payment'] -= 1000
 			if blackmailQW['stage'] = 5: blackmailQW['stage'] = 6
 			gs 'blackmailer', 'add_blackmail_selfie', $ARGS[2], $ARGS[3], $ARGS[4], ARGS[5], ARGS[6]
+			$temp_path = 'c'
 
-			gs 'SMStext_builder', 'receive', $SMSTree['b20']
-			gs 'SMStext_builder', 'show_sms', ARGS[1]
-			wait 250
-			gs 'SMStext_builder', 'receive', $SMSTree['b21']
 		elseif strpos('nude|pussyflash', $ARGS[4]) > 0:
 			blackmailQW['next_payment'] -= 2000
 			if blackmailQW['stage'] = 6: blackmailQW['stage'] = 7
 			gs 'blackmailer', 'add_blackmail_selfie', $ARGS[2], $ARGS[3], $ARGS[4], ARGS[5], ARGS[6]
+			$temp_path = 'd'
 
-			gs 'SMStext_builder', 'receive', $SMSTree['b20']
-			gs 'SMStext_builder', 'show_sms', ARGS[1]
-			wait 250
-			gs 'SMStext_builder', 'receive', $SMSTree['b21']
 		end
+
+		gs 'SMStext_builder', 'receive', $SMSTree[$temp_path + '20']
 		gs 'SMStext_builder', 'show_sms', ARGS[1]
-		if blackmailQW['next_payment'] < 0:
-			blackmailQW['next_payment'] = 0
-			blackmailQW['smsday'] = 0
-		end
 
 		wait 250
 
+		gs 'SMStext_builder', 'receive', $SMSTree[$temp_path + '21']
+		gs 'SMStext_builder', 'show_sms', ARGS[1]
+
+		wait 250
+	
 		if blackmailQW['next_payment'] > 0:
-			$SMSTree['22'] = 'don''t forget to drop ' + blackmailQW['next_payment'] + ' <b>₽</b> of in the park'
+			gs 'SMStext_builder', 'receive', $SMSTree[$temp_path + '22']
 		else
-			$SMSTree['22'] = 'you''re all settled.... for now'
+			blackmailQW['next_payment'] = 0
+			blackmailQW['smsday'] = 0
+			gs 'SMStext_builder', 'receive', $SMSTree['x22']
 		end
-	
-		gs 'SMStext_builder', 'receive', $SMSTree['22']
 		gs 'SMStext_builder', 'show_sms', ARGS[1]
 	gs 'SMStext_builder', 'end'
-	killvar '$SMSTree'
+
+	killvar 'temp_path'
 end
 
+if $ARGS[0] = 'sms_repeat_switch3':
+	gs 'blackmailer', 'set_SMSTree'
 
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[1]]
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
 
-if $ARGS[0] = 'park_repeat':
-	menu_off = 1
-	gs 'stat'
+		wait 250
+
+		gs 'SMStext_builder', 'receive', $SMSTree['30']
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 250
+
+		gs 'SMStext_builder', 'receive', $SMSTree['31']
+		gs 'SMStext_builder', 'add_reply', $SMSTree['a31'], 'blackmailer', 'sms_repeat_end1', 'a31'
+		gs 'SMStext_builder', 'add_reply', $SMSTree['b31'], 'blackmailer', 'sms_repeat_switch4', 'b'
+		gs 'SMStext_builder', 'add_reply', $SMSTree['c31'], 'blackmailer', 'sms_repeat_switch4', 'c'
+
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+	gs 'SMStext_builder', 'end'
+end
+
+if $ARGS[0] = 'sms_repeat_switch4':
+	gs 'blackmailer', 'set_SMSTree'
+
+	if blackmailQW['stage'] < 8: blackmailQW['stage'] = 8
+	blackmailQW['smsday'] = daystart + 14
+	blackmailQW['next_payment'] = 0
 
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[1] + '31']
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 250
+
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[1] + '32']
+
+		if $ARGS[1] = 'b':
+			!! penalty in the future when not using the proper speech
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+	gs 'SMStext_builder', 'end'
+end
+
+if $ARGS[0] = 'sms_repeat_switch4':
+	gs 'blackmailer', 'set_SMSTree'
+
+	if blackmailQW['stage'] < 8: blackmailQW['stage'] = 8
+	blackmailQW['smsday'] = daystart + 14
+	blackmailQW['next_payment'] = 0
+
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[1] + '31']
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 250
+
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[1] + '32']
+
+		if $ARGS[1] = 'b':
+			!! penalty in the future when not using the proper speech
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+	gs 'SMStext_builder', 'end'
+end
+
+
+!! END OF CONTENT MESSAGE
+if $ARGS[0] = 'sms_repeat_switch5':
+	gs 'blackmailer', 'set_SMSTree'
+	blackmailQW['next_payment'] = 0
+
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[1]]
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 250
+
+		!! END OF CONTENT MESSAGE
+		gs 'SMStext_builder', 'receive', '<i>This content is not ready yet.</i>'
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+		wait 250
+		gs 'SMStext_builder', 'receive', '<i>As a freebie your debt will be set to 0!</i>'
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+		wait 250
+		gs 'SMStext_builder', 'receive', '<i>Thank you for enjoying the Blackmailer''s content</i>'
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+		wait 250
+		gs 'SMStext_builder', 'receive', '<i>Love, Anjuna</i>'
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+	gs 'SMStext_builder', 'end'
+end
+
+
+
+
+
+if $ARGS[0] = 'park_repeat':
 	'<center><img src="images/locations/shared/park/bench_6.jpg"></center>'
 	'You walk to the familiar bench and take a seat at the edge of it.'
 
@@ -778,6 +983,6 @@ if $ARGS[0] = 'park_repeat':
 end
 
 
-
+if $ARGS[0] ! 'set_SMSTree': killvar 'SMSTree'
 
 --- blackmailer ---------------------------------