glife/locations/booty_call_sms.qsrc

# booty_call_sms

!!=====   Layout stuff   =====================================================================================!!
!! Open and close receiving text
$SMS_open_receiving = '<table width=80%><tr><td collspan=2 bgcolor="#D4CEF9"><font color=black>'
$SMS_close_receiving = '</font></td><td width=10%></td></tr></table>'

!! Open and close sending text
$SMS_open_sending = '<table width=80%><tr><td width=10%></td><td collspan=2 bgcolor=pink><font color=black>'
$SMS_close_sending = '</font></td></tr></table>'

!! Start reply
$SMS_open_replies = '<table><tr><th> Reply</th></tr><tr><td>'
$SMS_next_reply = '</td></tr><tr><td>'
$SMS_close_replies = '</td></tr></table>'
!!=====   END Layout stuff   =====================================================================================!!




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

!!  $temp_SMStext += $SMS_open_replies
!!  	$temp_SMStext += '<a href="exec: gs ''>>Name of the location<<'', ''>>Name of the SMS Branch<<'', ''>>Name of the Choice<<'', telefon[''SMSid'']">' + 'TEXT' + '</a>'
!!  	$temp_SMStext += $SMS_next_reply
!!  	$temp_SMStext += '<a href="exec: gs ''>>Name of the location<<'', ''>>Name of the SMS Branch<<'', ''>>Name of the Choice<<'', telefon[''SMSid'']">' + 'TEXT' + '</a>'
!!  	....
!!  $temp_SMStext += $SMS_close_replies

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


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

!!    You can add images at the end by manually setting:
!!    $SMSPicture1[telefon['SMSid']] = Path to picture 1
!!    $SMSPicture2[telefon['SMSid']] = Path to picture 2
!!    $SMSPicture3[telefon['SMSid']] = Path to picture 3
!!    $SMSPicture4[telefon['SMSid']] = Path to picture 4

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


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




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]

	$temp_SMStext += $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_replies
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''SMS_Base'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['1'] + '</a>'
	$temp_SMStext += $SMS_close_replies

	gs 'telefon', 'add_sms', $ARGS[1], $temp_SMStext
end


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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500

	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_replies
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice_a'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['a3'] + '</a>'
		$temp_SMStext += $SMS_next_reply
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice_b'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['b3'] + '</a>'
	$temp_SMStext += $SMS_close_replies

	$SMSMessage[ARGS[3]] = $temp_SMStext
	gs 'telefon', 'show_sms', ARGS[3]
end


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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['a3'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500

	$temp_SMStext += $SMS_open_receiving + $SMSTree['a4'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_replies
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice_aa'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['aa5'] + '</a>'
		$temp_SMStext += $SMS_next_reply
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice_ab'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['ab5'] + '</a>'
	$temp_SMStext += $SMS_close_replies
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end

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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['a3'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['a4'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['aa5'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', '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

	$temp_SMStext += $SMS_open_receiving + $SMSTree['aa6'] + $SMS_close_receiving
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end

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

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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['a3'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['a4'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['ab5'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500

	$temp_SMStext += $SMS_open_receiving + $SMSTree['ab6'] + $SMS_close_receiving
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]

	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]

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['b3'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500

	$temp_SMStext += $SMS_open_receiving + $SMSTree['b4'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_replies
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice_ba'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['ba5'] + '</a>'
		$temp_SMStext += $SMS_next_reply
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice_bb'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['bb5'] + '</a>'
	$temp_SMStext += $SMS_close_replies
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end



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

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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['b3'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['b4'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['ba5'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', '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


	$temp_SMStext += $SMS_open_receiving + $SMSTree['ba6'] + $SMS_close_receiving
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end

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

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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['b3'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['b4'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['bb5'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500
	
	$temp_SMStext += $SMS_open_receiving + $SMSTree['bb6'] + $SMS_close_receiving
	$SMSMessage[ARGS[3]] = $temp_SMStext


	gs 'telefon', 'show_sms', ARGS[3]
	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]

	$temp_SMStext += $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_replies
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice2_a'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['a1'] + '</a>'
		$temp_SMStext += $SMS_next_reply
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice2_b'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['b1'] + '</a>'
	$temp_SMStext += $SMS_close_replies

	gs 'telefon', 'add_sms', $ARGS[1], $temp_SMStext
end


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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['a1'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end



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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['b1'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500

	$temp_SMStext += $SMS_open_receiving + $SMSTree['b2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_replies
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice2_ba'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['ba3'] + '</a>'
		$temp_SMStext += $SMS_next_reply
		$temp_SMStext += '<a href="exec: gs ''booty_call_sms'', ''Choice2_bb'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', telefon[''SMSid'']">' + $SMSTree['bb3'] + '</a>'
	$temp_SMStext += $SMS_close_replies
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end



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

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

	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['b1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['b2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['ba3'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', '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


	$temp_SMStext += $SMS_open_receiving + $SMSTree['ba4'] + $SMS_close_receiving
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
end

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

	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
	$temp_SMStext  = $SMS_open_receiving + $SMSTree['0'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['b1'] + $SMS_close_sending
	$temp_SMStext += $SMS_open_receiving + $SMSTree['b2'] + $SMS_close_receiving
	$temp_SMStext += $SMS_open_sending + $SMSTree['bb3'] + $SMS_close_sending
	$SMSMessage[ARGS[3]] = $temp_SMStext

	gs 'telefon', 'show_sms', ARGS[3]
	wait 500
	
	$temp_SMStext += $SMS_open_receiving + $SMSTree['bb4'] + $SMS_close_receiving
	$SMSMessage[ARGS[3]] = $temp_SMStext


	gs 'telefon', 'show_sms', ARGS[3]
	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



killvar '$trialSMS'
killvar '$SMSTree'
killvar '$temp_SMStext'


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