Merge remote-tracking branch 'CroWke/master'

locations/obj_din.qsrc

@@ -2500,7 +2500,29 @@ if $ARGS[0] = 'records':
 	if haraklover[2] = 1 and loverrelation[2] > 1:'<<$obj_loverpron>> has a cheerful and sociable personality.'
 	if haraklover[2] = 2 and loverrelation[2] > 1:'<<$obj_loverpron>>''s short-tempered and strict.'
 	*nl
-
+	
+!! Could someone move this is it''s in the wrong location?
+	if firstvag ! 0:
+		'Your hymen is broken:'
+		'<<$firstvagstat>>'
+	else
+		'Your vaginal virginity is intact'
+	end
+	
+	if firstanal ! 0:
+		'Your anal virginity has been taken:'
+		'<<$firstanalstat>>'
+	else
+		'Your anal virginity is intact'
+	end
+	
+	if firstoral ! 0:
+		'Your mouth has been used:'
+		'<<$firstoralstat>>'
+	else
+		'Your oral virginity is intact'
+	end
+	
 	*nl
 	gs'Menu.Create','zapisMenu'
 	gs'Menu.Add','zapisMenu','Make a note with current date','','MenuLoc','zapisosn'

locations/virginity_call.qsrc

@@ -124,7 +124,7 @@ if ($ARGS[0] = 'vaginal' and firstvag ! 1) or ($ARGS[0] = 'anal' and firstanal !
 				if $firstvagobj = '':
 					$firstvagmsg1 = '"I-I was raped when I was <<firstvagage>> by <<$firstvagwho>>. It all happened <<$firstvagloc>>."'
 				else
-					$firstvagmsg1 = '"I-I was raped when I was <<firstvagage>> by <<$firstvagwho>>. It happened with <<$firstvagobj>> in <<$firstvagloc>>."'
+					$firstvagmsg1 = '"I-I was raped when I was <<firstvagage>> by <<$firstvagwho>>. It happened with <<$firstvagobj>> <<$firstvagloc>>."'
 				end
 				if $firstvagrough = 'gentle':
 					$firstvagmsg2 = '"It hurt when my hymen broke but I guess I should be thankful I wasn''t just used the second my pussy was bared. I-I was played with to prepare me first."'
@@ -312,6 +312,277 @@ if ($ARGS[0] = 'vaginal' and firstvag ! 1) or ($ARGS[0] = 'anal' and firstanal !
 			end
 		end
 	end
+	
+!! Generate message for description
+	
+	if $ARGS[2] = 'unaware':
+		if $ARGS[0] = 'vaginal':
+			if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
+				if $firstvagobj = '':
+					$firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
+				else
+					$firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
+				end
+			elseif firstvagrough = 'rough':
+				if $firstvagobj = '':
+					$firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
+				else
+					$firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
+				end
+			end
+		elseif $ARGS[0] = 'anal':
+			if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
+				if $firstanalobj = '':
+					$firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
+				else
+					$firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
+				end
+			elseif firstanalrough = 'rough':
+				if $firstanalobj = '':
+					$firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
+				else
+					$firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
+				end
+			end
+		elseif $ARGS[0] = 'oral':
+			if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
+				if $firstoralobj = '':
+						$firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
+				else
+					$firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
+				end
+			elseif firstoralrough = 'rough':
+				if $firstoralobj = '':
+					$firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
+				else
+					$firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
+				end
+			end
+		end
+		if $firstvagstate = 'sober':
+			$firstvagstat += ' You don''t have any recollection of it happening even though you were <<$firstvagstate>>.'
+		elseif $firstvagstate = 'tipsy'
+			$firstvagstat += ' You don''t have any recollection of it happening even though you were only <<$firstvagstate>>.'
+		elseif $firstvagstate = 'verydrunk':
+			$firstvagstat += ' You don''t have any recollection of it happening, probably because you were <<$firstvagstate>>.'
+		elseif $firstvagstate = 'hornyfromdrugs':
+			$firstvagstat += ' You don''t have any recollection of it happening, probably a side effect of the drugs that made you horny.'
+		elseif $firstvagstate = 'unabletomove':
+			$firstvagstat += ' You don''t have any recollection of it happening, probably a side effect of the drugs that made you unable to move.'
+		end
+	elseif $ARGS2 ! 'unaware':
+		if $ARGS[0] = 'vaginal':
+			if $firstvagconsent = 'rape':
+				if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
+					if $firstvagobj = '':
+						$firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
+					else
+						$firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
+					end
+				elseif $firstvagrough = 'rough':
+					if $firstvagobj = '':
+						$firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
+					else
+						$firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
+					end
+				end
+				if $firstvagstate = 'sober':
+					$firstvagstat += ' You remember every moment of it as you were <<$firstvagstate>>.'
+				elseif $firstvagstate = 'tipsy'
+					$firstvagstat += ' You remember every moment of it as you were only <<$firstvagstate>>.'
+				elseif $firstvagstate = 'verydrunk':
+					$firstvagstat += ' You don''t remember every moment of it happening, probably because you were <<$firstvagstate>>.'
+				elseif $firstvagstate = 'hornyfromdrugs':
+					$firstvagstat += ' You still don''t like to think about how horny you were from the drugs despite knowing deep down that you didn''t want it to happen.'
+				elseif $firstvagstate = 'unabletomove':
+					$firstvagstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			elseif $firstvagconsent = 'consensual':
+				if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
+					if $firstvagobj = '':
+						$firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time was with <<$firstvagwho>> <<$firstvagloc>>.'
+					else
+						$firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time was with <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
+					end
+				elseif $firstvagrough = 'rough':
+					if $firstvagobj = '':
+						$firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time you had rough sex with <<$firstvagwho>> <<$firstvagloc>>.'
+					else
+						$firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time you had rough sex with <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
+					end
+				end
+				if $firstvagstate = 'sober':
+					$firstvagstat += ' You remember every moment of it as you were <<$firstvagstate>>.'
+				elseif $firstvagstate = 'tipsy'
+					$firstvagstat += ' You remember every moment of it as you were only <<$firstvagstate>>.'
+				elseif $firstvagstate = 'verydrunk':
+					$firstvagstat += ' You don''t remember every moment of it happening, probably because you were <<$firstvagstate>>.'
+				elseif $firstvagstate = 'hornyfromdrugs':
+					$firstvagstat += ' You still remember how horny you were from the drugs.'
+				elseif $firstvagstate = 'unabletomove':
+					$firstvagstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			elseif $firstvagconsent = 'self':
+				if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
+					$firstvagstat = 'You broke your own hymen when you were <<firstvagage>>. You did it <<$firstvagloc>> using <<$firstvagobj>>.'
+				elseif $firstvagrough = 'rough':
+					$firstvagstat = 'You broke your own hymen when you were <<firstvagage>>. You fucked yourself rougly <<$firstvagloc>> using <<$firstvagobj>>.'
+				end
+				if $firstvagstate = 'sober':
+					$firstvagstat += ' You remember every moment of it as you were <<$firstvagstate>>.'
+				elseif $firstvagstate = 'tipsy'
+					$firstvagstat += ' You remember every moment of it as you were only <<$firstvagstate>>.'
+				elseif $firstvagstate = 'verydrunk':
+					$firstvagstat += ' You don''t remember every moment of it happening, probably because you were <<$firstvagstate>>.'
+				elseif $firstvagstate = 'hornyfromdrugs':
+					$firstvagstat += ' You still remember how horny you were from the drugs.'
+				!! This should be an impossibiliy - If this shows up someone passed the wrong parameters
+				elseif $firstvagstate = 'unabletomove':
+					$firstvagstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			end
+		elseif $ARGS[0] = 'anal':
+			if $firstanalconsent = 'rape':
+				if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
+					if $firstanalobj = '':
+						$firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
+					else
+						$firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
+					end
+				elseif firstanalrough = 'rough':
+					if $firstanalobj = '':
+						$firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
+					else
+						$firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
+					end
+				end
+				if $firstanalstate = 'sober':
+					$firstanalstat += ' You remember every moment of it as you were <<$firstanalstate>>.'
+				elseif $firstanalstate = 'tipsy'
+					$firstanalstat += ' You remember every moment of it as you were only <<$firstanalstate>>.'
+				elseif $firstanalstate = 'verydrunk':
+					$firstanalstat += ' You don''t remember every moment of it happening, probably because you were <<$firstanalstate>>.'
+				elseif $firstanalstate = 'hornyfromdrugs':
+					$firstanalstat += ' You still don''t like to think about how horny you were from the drugs despite knowing deep down that you didn''t want it to happen.'
+				elseif $firstanalstate = 'unabletomove':
+					$firstanalstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			elseif $firstanalconsent = 'consensual':
+				if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
+					if $firstanalobj = '':
+						$firstanalstat = 'You lost your anal virginity when you were <<firstanalage>> to <<$firstanalwho>> <<$firstanalloc>>.'
+					else
+						$firstanalstat = 'You lost your anal virginity when you were <<firstanalage>> to <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
+					end
+				elseif firstanalrough = 'rough':
+					if $firstanalobj = '':
+						$firstanalstat = 'You lost your anal virginity when you were <<firstanalage>>. You had rough anal sex with <<$firstanalwho>> <<$firstanalloc>>.'
+					else
+						$firstanalstat = 'You lost your anal virginity when you were <<firstanalage>>. You had rough anal sex with <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
+					end
+				end
+				if $firstanalstate = 'sober':
+					$firstanalstat += ' You remember every moment of it as you were <<$firstanalstate>>.'
+				elseif $firstanalstate = 'tipsy'
+					$firstanalstat += ' You remember every moment of it as you were only <<$firstanalstate>>.'
+				elseif $firstanalstate = 'verydrunk':
+					$firstanalstat += ' You don''t remember every moment of it happening, probably because you were <<$firstanalstate>>.'
+				elseif $firstanalstate = 'hornyfromdrugs':
+					$firstanalstat += ' You still remember how horny you were from the drugs.'
+				elseif $firstanalstate = 'unabletomove':
+					$firstanalstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			elseif $firstanalconsent = 'self':
+				if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
+					$firstanalstat = 'You popped your own anal cherry when you were <<firstanalage>>. You did it <<$firstanalloc>> using <<$firstanalobj>>.'
+				elseif $firstanalrough = 'rough':
+					$firstanalstat = 'You popped your own anal cherry when you were <<firstanalage>>. You fucked yourself rougly <<$firstanalloc>> using <<$firstanalobj>>.'
+				end
+				if $firstanalstate = 'sober':
+					$firstanalstat += ' You remember every moment of it as you were <<$firstanalstate>>.'
+				elseif $firstanalstate = 'tipsy'
+					$firstanalstat += ' You remember every moment of it as you were only <<$firstanalstate>>.'
+				elseif $firstanalstate = 'verydrunk':
+					$firstanalstat += ' You don''t remember every moment of it happening, probably because you were <<$firstanalstate>>.'
+				elseif $firstanalstate = 'hornyfromdrugs':
+					$firstanalstat += ' You still remember how horny you were from the drugs.'
+				!! This should be an impossibiliy - If this shows up someone passed the wrong parameters
+				elseif $firstanalstate = 'unabletomove':
+					$firstanalstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			end
+		elseif $ARGS[0] = 'oral':
+			if $firstoralconsent = 'rape':
+				if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
+					if $firstoralobj = '':
+						$firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
+					else
+						$firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
+					end
+				elseif firstoralrough = 'rough':
+					if $firstoralobj = '':
+						$firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
+					else
+						$firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
+					end
+				end
+				if $firstoralstate = 'sober':
+					$firstoralstat += ' You remember every moment of it as you were <<$firstoralstate>>.'
+				elseif $firstoralstate = 'tipsy'
+					$firstoralstat += ' You remember every moment of it as you were only <<$firstoralstate>>.'
+				elseif $firstoralstate = 'verydrunk':
+					$firstoralstat += ' You don''t remember every moment of it happening, probably because you were <<$firstoralstate>>.'
+				elseif $firstoralstate = 'hornyfromdrugs':
+					$firstoralstat += ' You still don''t like to think about how horny you were from the drugs despite knowing deep down that you didn''t want it to happen.'
+				elseif $firstoralstate = 'unabletomove':
+					$firstoralstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			elseif $firstoralconsent = 'consensual':
+				if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
+					if $firstoralobj = '':
+						$firstoralstat = 'You lost your anal virginity when you were <<firstoralage>> to <<$firstoralwho>> <<$firstoralloc>>.'
+					else
+						$firstoralstat = 'You lost your anal virginity when you were <<firstoralage>> to <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
+					end
+				elseif firstoralrough = 'rough':
+					if $firstoralobj = '':
+						$firstoralstat = 'You lost your anal virginity when you were <<firstoralage>>. You had rough anal sex with <<$firstoralwho>> <<$firstoralloc>>.'
+					else
+						$firstoralstat = 'You lost your anal virginity when you were <<firstoralage>>. You had rough anal sex with <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
+					end
+				end
+				if $firstoralstate = 'sober':
+					$firstoralstat += ' You remember every moment of it as you were <<$firstoralstate>>.'
+				elseif $firstoralstate = 'tipsy'
+					$firstoralstat += ' You remember every moment of it as you were only <<$firstoralstate>>.'
+				elseif $firstoralstate = 'verydrunk':
+					$firstoralstat += ' You don''t remember every moment of it happening, probably because you were <<$firstoralstate>>.'
+				elseif $firstoralstate = 'hornyfromdrugs':
+					$firstoralstat += ' You still remember how horny you were from the drugs.'
+				elseif $firstoralstate = 'unabletomove':
+					$firstoralstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			elseif $firstoralconsent = 'self':
+				if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
+					$firstoralstat = 'You popped your own anal cherry when you were <<firstoralage>>. You did it <<$firstoralloc>> using <<$firstoralobj>>.'
+				elseif $firstoralrough = 'rough':
+					$firstoralstat = 'You popped your own anal cherry when you were <<firstoralage>>. You fucked yourself rougly <<$firstoralloc>> using <<$firstoralobj>>.'
+				end
+				if $firstoralstate = 'sober':
+					$firstoralstat += ' You remember every moment of it as you were <<$firstoralstate>>.'
+				elseif $firstoralstate = 'tipsy'
+					$firstoralstat += ' You remember every moment of it as you were only <<$firstoralstate>>.'
+				elseif $firstoralstate = 'verydrunk':
+					$firstoralstat += ' You don''t remember every moment of it happening, probably because you were <<$firstoralstate>>.'
+				elseif $firstoralstate = 'hornyfromdrugs':
+					$firstoralstat += ' You still remember how horny you were from the drugs.'
+				!! This should be an impossibiliy - If this shows up someone passed the wrong parameters
+				elseif $firstoralstate = 'unabletomove':
+					$firstoralstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
+				end
+			end
+		end
+	end	
 end
 
 --- virginity_call ---------------------------------