glife/locations/booty_call_sms.qsrc

# booty_call_sms

!=====   Reply example here ==================================================================================!

!	gs 'SMStext_builder', 'add_reply', [$text], [$location], [$args0], [$args1], [$args2], ...
!	examples:
!		gs 'SMStext_builder', 'add_reply', 'No, I do''t want to come over', 'booty_call_sms', 'Choice_a', $ARGS[1], $ARGS[2]
!		gs 'SMStext_builder', 'add_reply', 'Good luck!', 'band_tour_anushka_SMS', 'Week1', 'Choice_a'

!=============================================================================================================!


!=====   Adding Images to SMS ================================================================================!

!	You can add images at the end of the text by using:
!	gs 'SMStext_builder', 'add_sms', $npc_code, $imagepath1, $imagepath2, $imagepath3, $imagepath4
!	gs 'SMStext_builder', 'add_sms', SMSid, $imagepath1, $imagepath2, $imagepath3, $imagepath4
!			SMSid is the final ARGS passed to this file (here ARGS[3])

! You can also always add a picture to the text, scaling is an issue though

!=============================================================================================================!




if $ARGS[0] = 'start':
	$booty_call_daily_id[i] = $ARGS[1]

	if npc_booty_call[$ARGS[1]] = daystart:
		gs 'booty_call_sms', 'Add SMS2', 'pre_planned_booty_call', $ARGS[1]
	elseif sugar_daddy_call[$ARGS[1]] = 1:
		gs 'booty_call_sms', 'Add SMS', 'sugar_daddy_booty_call', $ARGS[1]
	elseif npc_std_test[$ARGS[1]] = 1:
		gs 'booty_call_sms', 'Add SMS', 'std_free', $ARGS[1]
	else
		gs 'booty_call_sms', 'Add SMS', 'default_booty_call', $ARGS[1]
	end
end

if $ARGS[0] = 'default_booty_call':
	!! boy
	$SMSTree['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')

		!! player
		$SMSTree['1'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')

			!! boy
			$SMSTree['2'] = 'ive been thinking about you'

				!! player response 1 option 1
				$SMSTree['a3'] = 'what were you thinking about?'

					!! boy response 1
					if npc_finance[$ARGS[1]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[1]] >= 3:
						$SMSTree['a4'] = 'i booked a hotel room in Pav. why dont you come by?'
					else
						if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0,2) = 1:
							$SMSTree['a4'] = 'your mouth around my cock'
						elseif npc_know_virgin[$ARGS[1]] ! 1:
							if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0,2) = 1:
								$SMSTree['a4'] = 'your pussy filled with my cum'
							elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0,2) = 1:
								$SMSTree['a4'] = 'fucking you bowlegged'
							elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0,2) = 1:
								$SMSTree['a4'] = 'your pretty face covered in my cum'
							elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0,2) = 1:
								$SMSTree['a4'] = 'watching you swallow my cum'
							elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0,2) = 1:
								$SMSTree['a4'] = 'my cum all over your tits'
							elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0,2) = 1:
								$SMSTree['a4'] = 'pounding you on all fours'
							elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0,2) = 1:
								$SMSTree['a4'] = 'you riding my cock like crazy'
							else
								if rand(0,1) = 1:
									$SMSTree['a4'] = 'you naked on my bed'
								else
									$SMSTree['a4'] = 'want to come over and have some fun?'
								end
							end
						end
					end

				!! player response 1 option 2
				$SMSTree['b3'] = 'me too'

					!! boy response 2
					if npc_finance[$ARGS[1]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[1]] >= 3: 
						$SMSTree['b4'] = 'i booked a hotel room in Pav. why dont you come by?'
					else
						if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0,2) = 1:
							$SMSTree['b4'] = 'i want to feel your mouth around my cock'
						elseif npc_know_virgin[$ARGS[1]] ! 1:
							if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0,2) = 1:
								$SMSTree['b4'] = 'i want to pump you full of cum'
							elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0,2) = 1:
								$SMSTree['b4'] = 'come over i want to hear you screaming my name'
							elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0,2) = 1:
								$SMSTree['b4'] = 'i want to cum all over your face'
							elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0,2) = 1:
								$SMSTree['b4'] = 'i want to watch you swallow my cum'
							elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0,2) = 1:
								$SMSTree['b4'] = 'let me glaze your tits with my cum'
							elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0,2) = 1:
								$SMSTree['b4'] = 'i want to pound you on all fours'
							elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0,2) = 1:
								$SMSTree['b4'] = 'i want you to ride my cock like theres no tomorrow'
							else
								if rand(0,1) = 1:
									$SMSTree['b4'] = 'lets fuck like bunnies today'
								else
									$SMSTree['b4'] = 'come over lets have some fun today'
								end
							end
						end
					end

						!! player response 2 option 1
						if hour < 21:
							$SMSTree['aa5'] = 'sorry, i cant. i have stuff to do'
							$SMSTree['ba5'] = $SMSTree['aa5']
						else
							$SMSTree['aa5'] = 'its late. text me sooner if you want me to come over.'
							$SMSTree['ba5'] = $SMSTree['aa5']
						end

							!! boy response 2 option 1
							$SMSTree['aa6'] = 'shit, maybe next time then'
							$SMSTree['ba6'] = $SMSTree['aa6']


						!! player response 2 option 2
						$SMSTree['ab5'] = 'ill come right now ;)'
						$SMSTree['bb5'] = $SMSTree['ab5']

							!! boy response 2 option 2
							if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
								$SMSTRee['ab6'] = 'im already hard'
								$SMSTree['bb6'] = $SMSTree['ab6']
							elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
								if rand(0,1) = 1:
									$SMSTRee['ab6'] = 'in the street?? damn! keep it in your pants till you get here!'
									$SMSTree['bb6'] = $SMSTree['ab6']
								else
									$SMSTRee['ab6'] = 'as long as you make me cum later'
									$SMSTree['bb6'] = $SMSTree['ab6']
								end
							elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
								$SMSTRee['ab6'] = 'phrasing'
								$SMSTree['bb6'] = $SMSTree['a66']
							else
								$SMSTRee['ab6'] = 'cant wait'
								$SMSTree['bb6'] = $SMSTree['ab6']
							end
end


if $ARGS[0] = 'pre_planned_booty_call':
	! boy
	$SMSTree['0'] = dyneval('$result=''hey <<$pcs_nickname>>, you coming over?'' ')

		! player choice 1 option 1
		$SMSTree['a1'] = 'sorry, something came up'

		! player choice 1 option 2
		$SMSTree['b1'] = 'on my way now'

			! boy
			temp_rand = rand(0, 2)
			if temp_rand = 0:
				$SMSTree['b2'] = 'come over to my place lets fuck like bunnies'
			elseif temp_rand = 1:
				$SMSTree['b2'] = 'come over to my place i want to hear you screaming my name'
			else
				$SMSTree['b2'] = 'come over to my place lets have some fun today'
			end
			killvar 'temp_rand'

				! player choice 2 option 1
				$SMSTree['ba3'] = 'sorry, i cant. i have stuff to do'

					! boy
					$SMSTree['ba4'] = 'shit, maybe next time then'


				! player choice 2 opiton 2
				$SMSTree['bb3'] = 'ill come right now ;)'

					! boy
					if npc_humor[$ARGS[1]] <= 1:
						$SMSTree['bb4'] = 'im already hard'
					elseif npc_humor[$ARGS[1]] = 2:
						if rand(0,1) = 1:
							$SMSTree['bb4'] = 'in the street?? damn! keep it in your pants till you get here!'
						else
							$SMSTree['bb4'] = 'as long as you make me cum later'
						end
					elseif npc_humor[$ARGS[1]] = 3:
						if rand(0,1) = 1:
							$SMSTree['bb4'] = 'phrasing'
						else
							$SMSTree['bb4'] = 'as long as you make me cum later'
						end
					end
end


if $ARGS[0] = 'std_free':
	!! boy
	$SMSTree['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')

		!! player
		$SMSTree['1'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')

			!! boy
			$SMSTree['2'] = 'got some good news'

				!! player response 1 option 1
				$SMSTree['a3'] = 'oh?'

					!! boy response 1
					$SMSTree['a4'] = 'my std test came back clean. why dont we celebrate tog'

				!! player response 1 option 2
				$SMSTree['b3'] = 'what is it?'

					!! boy response 2
					$SMSTree['b4'] = 'my std test came back clean'


						!! player response 2 option 1
						if hour < 21:
							$SMSTree['aa5'] = 'sorry, i cant. i have stuff to do'
							$SMSTree['ba5'] = $SMSTree['aa5']
						else
							$SMSTree['aa5'] = 'its late. text me sooner if you want me to come over.'
							$SMSTree['ba5'] = $SMSTree['aa5']
						end

							!! boy response 2 option 1
							$SMSTree['aa6'] = 'shit, maybe next time then'
							$SMSTree['ba6'] = $SMSTree['aa6']

						!! player response 2 option 2
						$SMSTree['ab5'] = 'ill come right now ;)'
						$SMSTree['bb5'] = $SMSTree['ab5']

							!! boy response 2 option 2
							if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
								$SMSTree['ab6'] = 'im already hard'
								$SMSTree['bb6'] = $SMSTree['ab6']
							elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
								if rand(0,1) = 1:
									$SMSTree['ab6'] = 'in the street?? damn! keep it in your pants till you get here!'
									$SMSTree['bb6'] = $SMSTree['ab6']
								else
									$SMSTree['ab6'] = 'as long as you make me cum later'
									$SMSTree['bb6'] = $SMSTree['ab6']
								end
							elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
								$SMSTree['ab6'] = 'phrasing'
								$SMSTree['bb6'] = $SMSTree['ab6']
							else
								$SMSTree['ab6'] = 'cant wait'
								$SMSTree['bb6'] = $SMSTree['ab6']
							end
end


if $ARGS[0] = 'sugar_daddy_booty_call':
	!! boy
	$SMSTree['0'] = dyneval('$result=''hey <<$pcs_nickname>>'' ')

		!! player
		$SMSTree['1'] = dyneval('$result=''hey <<$npc_nickname[$ARGS[1]]>>'' ')

			!! boy
			$SMSTree['2'] = 'ive been thinking about you'

				!! player response 1 option 1
				$SMSTree['a3'] = 'what were you thinking about?'


				!! player response 1 option 2
				$SMSTree['b3'] = 'me too'
	
					!! boy response 1 option 1
					if ($home['current'] ! 'city_apartment' and $home['current'] ! 'niko_apartment' and $home['current'] ! 'university_dorm' and $home['current'] ! 'city_house' and $home['current'] ! 'maid_bedroom') and npc_residence[$ARGS[1]] >= 3:
						$SMSTree['a4'] = 'i booked a hotel room in Pav. why dont you come by?'
						$SMSTree['b4'] = $SMSTree['a4']
					else
						$SMSTree['a4'] = 'i want to see you. why dont you come by my apartment?'
						$SMSTree['b4'] = $SMSTree['a4']
					end

						!! player response 2 option 1
						if hour < 21:
							$SMSTree['aa5'] = 'sorry, i cant. i have stuff to do'
							$SMSTree['ba5'] = $SMSTree['aa5']
						else
							$SMSTree['aa5'] = 'its late. text me sooner if you want me to come over.'
							$SMSTree['ba5'] = $SMSTree['aa5']
						end

							!! boy response 2 option 1
							$SMSTRee['aa6'] = 'damn scheduling conflicts'
							$SMSTree['ba6'] = $SMSTree['aa6']


						!! player response 2 option 2
						$SMSTree['ab5'] = 'ill come right now ;)'
						$SMSTree['bb5'] = $SMSTree['ab5']

							!! boy response 2 option 2
							if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$ARGS[1]] >= 3:
								$SMSTree['ab6'] = 'room <<rand(1,3)>><<rand(10,19)>>'
								$SMSTree['bb6'] = $SMSTree['ab6']
							else
								if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
									$SMSTree['ab6'] = 'im already hard'
									$SMSTree['bb6'] = $SMSTree['ab6']
								elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
									$SMSTree['ab6'] = 'as long as you make me cum later'
									$SMSTree['bb6'] = $SMSTree['ab6']
								elseif npc_humor[$ARGS[1]] = 3 and rand(0,1) = 1:
									$SMSTree['ab6'] = 'phrasing'
									$SMSTree['bb6'] = $SMSTree['ab6']
								else
									$SMSTree['ab6'] = 'cant wait'
									$SMSTree['bb6'] = $SMSTree['ab6']
								end
							end
end


!Does not work with pre-planned?
if $ARGS[0] = 'Add SMS':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'add_reply', $SMSTree['1'], 'booty_call_sms', 'SMS_Base', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_sms', $ARGS[2]
	gs 'SMStext_builder', 'end'
end


if $ARGS[0] = 'SMS_Base':
!if $ARGS[0] = 'V0':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'add_reply', $SMSTree['a3'], 'booty_call_sms', 'Choice_a', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_reply', $SMSTree['b3'], 'booty_call_sms', 'Choice_b', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'
end


if $ARGS[0] = 'Choice_a':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'send', $SMSTree['a3']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['a4']
		gs 'SMStext_builder', 'add_reply', $SMSTree['aa5'], 'booty_call_sms', 'Choice_aa', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_reply', $SMSTree['ab5'], 'booty_call_sms', 'Choice_ab', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

elseif $ARGS[0] = 'Choice_aa':
	!! booty call is declined
	
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'send', $SMSTree['a3']
		gs 'SMStext_builder', 'receive', $SMSTree['a4']
		gs 'SMStext_builder', 'send', $SMSTree['aa5']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		if sugar_daddy_call[$ARGS[2]] = 1:
			npc_rel[$ARGS[2]] -= 2
			sugar_daddy_call[$ARGS[2]] = 0
		end

		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['aa6']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

elseif $ARGS[0] = 'Choice_ab':
	!! booty call is accepted

	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'send', $SMSTree['a3']
		gs 'SMStext_builder', 'receive', $SMSTree['a4']
		gs 'SMStext_builder', 'send', $SMSTree['ab5']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['ab6']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

	booty_call_invite[$ARGS[2]] = daystart
	if npc_finance[$ARGS[2]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[2]] >= 3:
		$booty_call_hotel[$ARGS[2]] = 'pav'
	else
		$booty_call_hotel[$ARGS[2]] = 'city'
	end
end




if $ARGS[0] = 'Choice_b':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'send', $SMSTree['b3']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['b4']
		gs 'SMStext_builder', 'add_reply', $SMSTree['ba5'], 'booty_call_sms', 'Choice_ba', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_reply', $SMSTree['bb5'], 'booty_call_sms', 'Choice_bb', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

elseif $ARGS[0] = 'Choice_ba':
	!! booty call is declined

	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'send', $SMSTree['b3']
		gs 'SMStext_builder', 'receive', $SMSTree['b4']
		gs 'SMStext_builder', 'send', $SMSTree['ba5']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		if sugar_daddy_call[$ARGS[2]] = 1:
			npc_rel[$ARGS[2]] -= 2
			sugar_daddy_call[$ARGS[2]] = 0
		end

		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['ba6']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

elseif $ARGS[0] = 'Choice_bb':
	!! booty call is accepted

	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['1']
		gs 'SMStext_builder', 'receive', $SMSTree['2']
		gs 'SMStext_builder', 'send', $SMSTree['b3']
		gs 'SMStext_builder', 'receive', $SMSTree['b4']
		gs 'SMStext_builder', 'send', $SMSTree['bb5']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['bb6']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

	booty_call_invite[$ARGS[2]] = daystart
!!	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$SMSContact[ARGS[1]]] >= 3: 
	if npc_finance[$ARGS[2]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[2]] >= 3:
		$booty_call_hotel[$ARGS[2]] = 'pav'
	else
		$booty_call_hotel[$ARGS[2]] = 'city'
	end
end





! For pre-planned
if $ARGS[0] = 'Add SMS2':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'add_reply', $SMSTree['a1'], 'booty_call_sms', 'Choice2_a', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_reply', $SMSTree['b1'], 'booty_call_sms', 'Choice2_b', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_sms', $ARGS[2]
	gs 'SMStext_builder', 'end'
end


if $ARGS[0] = 'Choice2_a':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['a1']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'
end



if $ARGS[0] = 'Choice2_b':
	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['b1']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['b2']
		gs 'SMStext_builder', 'add_reply', $SMSTree['ba3'], 'booty_call_sms', 'Choice2_ba', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'add_reply', $SMSTree['bb3'], 'booty_call_sms', 'Choice2_bb', $ARGS[1], $ARGS[2]
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

elseif $ARGS[0] = 'Choice2_ba':
	!! booty call is declined

	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['b1']
		gs 'SMStext_builder', 'receive', $SMSTree['b2']
		gs 'SMStext_builder', 'send', $SMSTree['ba3']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		if sugar_daddy_call[$ARGS[2]] = 1:
			npc_rel[$ARGS[2]] -= 2
			sugar_daddy_call[$ARGS[2]] = 0
		end
		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['ba4']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

elseif $ARGS[0] = 'Choice2_bb':
	!! booty call is accepted

	gs 'booty_call_sms', $ARGS[1], $ARGS[2]

	gs 'SMStext_builder', 'start'
		gs 'SMStext_builder', 'receive', $SMSTree['0']
		gs 'SMStext_builder', 'send', $SMSTree['b1']
		gs 'SMStext_builder', 'receive', $SMSTree['b2']
		gs 'SMStext_builder', 'send', $SMSTree['bb3']
		gs 'SMStext_builder', 'show_sms', ARGS[3]

		if sugar_daddy_call[$ARGS[2]] = 1:
			npc_rel[$ARGS[2]] -= 2
			sugar_daddy_call[$ARGS[2]] = 0
		end
		wait 500

		gs 'SMStext_builder', 'receive', $SMSTree['bb4']
		gs 'SMStext_builder', 'show_sms', ARGS[3]
	gs 'SMStext_builder', 'end'

	booty_call_invite[$ARGS[2]] = daystart
!!	if ($home['current'] = 'parents_home' or $home['current'] = 'meynold_household' or $home['current'] = 'shared_apartment') and npc_residence[$SMSContact[ARGS[1]]] >= 3: 
	if npc_finance[$ARGS[2]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[2]] >= 3:
		$booty_call_hotel[$ARGS[2]] = 'pav'
	else
		$booty_call_hotel[$ARGS[2]] = 'city'
	end
end



if $ARGS[0] ! 'default_booty_call' and $ARGS[0] ! 'pre_planned_booty_call' and $ARGS[0] ! 'std_free' and $ARGS[0] ! 'sugar_daddy_booty_call':
	killvar '$SMSTree'
end

--- hookup_sms ---------------------------------