Merge branch 'CourtOverhaul'

glife.qproj

@@ -908,8 +908,11 @@
 		<Location name="model_mari"/>
 	</Folder>
 	<Folder name="Crime and Punishment">
+		<Location name="court_functions"/>
 		<Location name="police_station"/>
+		<Location name="court_arrest_events"/>
 		<Location name="sentence"/>
+		<Location name="court_sentence_events"/>
 		<Location name="courtletter"/>
 		<Location name="shoplifting"/>
 	</Folder>

locations/court_arrest_events.qsrc

@@ -0,0 +1,590 @@
+# court_arrest_events
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                            PRE-BOOKING                            !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'booking_start':
+	if $ARGS[1] = 'shplft' or $ARGS[1] = 'shoplift':
+		gs 'court_functions', 'arrest_for', 'shoplift'
+		temp_tot_arrests = func('court_functions', 'get_total_arrests')
+
+		if temp_tot_arrests = 1:
+			!!a gosub on purpose!!
+			gs 'court_arrest_events', 'first_shoplift'
+		elseif temp_tot_arrests < 6:
+			gt 'court_arrest_events', 'repeat'
+		elseif temp_tot_arrests < 11:
+			gt 'court_arrest_events', 'multiple'
+		else
+			gt 'court_arrest_events', 'regular'
+		end
+
+	elseif $ARGS[1] = 'prst' or $ARGS[1] = 'prostitution':
+		gs 'court_functions', 'arrest_for', 'prostitution'
+		temp_tot_arrests = func('court_functions', 'get_total_arrests')
+
+		if temp_tot_arrests = 1:
+			!!a gosub on purpose!!
+			gs 'court_arrest_events', 'first_prostitution'
+		elseif temp_tot_arrests < 6:
+			gt 'court_arrest_events', 'repeat'
+		elseif temp_tot_arrests < 11:
+			gt 'court_arrest_events', 'multiple'
+		else
+			gt 'court_arrest_events', 'regular'
+		end
+	end
+end
+
+if $ARGS[0] = 'booking_end':
+	gt 'police_station', 'booking'
+end
+
+
+	!!-------------------------------------------------------------------!!
+	!!                         PRE-BOOKING EVENTS                        !!
+	!!-------------------------------------------------------------------!!
+
+
+if $ARGS[0] = 'first_shoplift':
+	cla
+	minut += 2
+	gs 'pain', 2, 'armR', 'pinch'
+	gs 'stat'
+
+	if policeQW['toldonguard'] = 2:
+		!! if had sex with the security guard but still got arrested
+		'"I''m not lying, that security guard forced me to have sex with him! Why won''t you believe me?" you plead, but it does you no good.'
+		'The officer sighs, "You think you''re the first to try that? I''ve heard it all from you thieving little whores. You''re not the victim here!"'
+		*nl
+		'With a dejected whimper, you look down to the floor as you''re led further into the station to be booked.'
+
+	elseif grupTipe = 4:
+		'"Security over at the mall caught a wild one today. This little bitch tried to bite me as I was bringing her in!"'
+		'The others shake their head as he leads you further inside the police station.'
+		*nl
+		'"Wow, you''re real tough, manhandling a girl barely half your size," you hiss.'
+		'"You think this is being too rough? I can show you a thing or two about real pain," he threatens.'
+
+	elseif pcs_hotcat >= 7:
+		'"Look who was caught stealing by the security guys at the mall! I guess being pretty can''t get you everything you want," he says with a cruel laugh.'
+		'Most of officers just grin and laugh, but you hear a few make crude comments as you''re led further inside the police station.'
+		*nl
+		'"Hey, you''re hurting my arm!" you whine. "Could you please loosen up? It''s not like I''m going to try to run!"'
+		'"Being pretty isn''t going to get you any special treatment, girly. You''re a criminal, just like everyone else brought through here," he spits back.'
+
+	elseif pcs_hotcat <= 3:
+		'"You''ll never guess what she was brought in for!" he laughs. "Security at the mall caught this one trying to steal beauty products. You can put makeup on a pig but it''ll still be a pig!"'
+		'The others laugh loudly as he leads you further inside the police station.'
+		*nl
+		'"Hey, you''re hurting my arm!" you whine. "Could you please loosen up? It''s not like I''m going to try to run!"'
+		'"What were you thinking stealing make-up?" he asks, ignoring your pleas. "It wouldn''t do you a damn bit of good. You''d still look like you were hit with a brick!"'
+
+	else
+		!if plain looking
+		'"The security guys over at the mall caught this little mouse trying to steal some stuff. I guess looks can be deceiving; I would have never thought she''d be the type."'
+		'Some of the other officers just shrug or click their tongue disapprovingly before he leads you deeper inside the police station.'
+		*nl
+		'"Hey, you''re hurting my arm!" you whine. "Could you please loosen up? It''s not like I''m going to try to run!"'
+		'"Oh, don''t like the way I''m treating you, little mouse? Well, you should have thought about that before trying to play thief!" he spits back.'
+	end
+
+	act 'Continue further in': gt 'court_arrest_events', 'booking_end'
+end
+
+
+if $ARGS[0] = 'first_prostitution':
+	minut += 2
+	gs 'pain', 2, 'armR', 'pinch'
+	gs 'stat'
+
+	if policeQW['prostitution_bribe'] = 1:
+		if pcs_hotcat <= 3:
+			!else if ugly and bribed the officer with sex
+			'"I caught this one whoring herself out and you know what she tried to do? She tried to bribe me with sex!"'
+			'The others shake their head, "What was she thinking? No one would fuck someone as ugly as her!"'
+			'You hang your head in shame as you''re led further into the station for booking.'
+
+		elseif pcs_hotcat >= 7:
+			!else if beautiful and bribed the officer with sex
+			'"I caught this one whoring herself out and you know what she tried to do? She tried to bribe me with sex!"'
+			'The other officers eye you hungrily, "You''re a better man than me!" one of them exclaim. "Just look at her, how often do you get a chance like that? I would have said yes!"'
+			'A small smile plays across your face, feeling a tiny bit flattered as you''re led further into the station to get booked.'
+
+		else
+			!else if plain and bribed the officer with sex
+			'"I caught this one whoring herself out and you know what she tried to do? She tried to bribe me with sex!"'
+			'The others jokingly say, "Well, she doesn''t look that bad. I wouldn''t have agreed, but I can see it working on someone else..."'
+			'You frown at their rude remarks, but remain silent as you''re led further into the station to be booked.'
+		end
+
+	else
+		if pcs_hotcat <= 3:
+			!Prostitute event, this will be an continuation to the prostitute events that happened earlier
+			!if ugly
+			'"I caught this one whoring herself out. Can you believe that? Who would ever want to fuck this pig?!" he exclaims, and the staff erupt with laughter.'
+			'"What was she thinking? Honestly, you''ve done everyone a favor getting her off the streets," says one of the officers before you''re led further into the station.'
+
+		elseif pcs_hotcat >= 7:
+			!else if beautiful
+			'"I caught this one whoring herself out on the street corner. Such a waste," he turns to you and shakes his head. "A hot thing like you could shack up with some rich guy and leech off him, but I guess that''s not enough for a cock hungry whore like you, huh? One just ain''t enough."'
+			*nl
+			'The other officers laugh cruelly. "It really is a shame, just look at her-- she''s damn gorgeous. You must have some real issues to be selling yourself to strangers."'
+			*nl
+			'"I''m sure the money is great!" The officer holding you laughs loudly as he leads you further inside the police station.'
+
+		else
+			!else if plain
+			'"I caught this one whoring herself out. She ain''t bad looking, but you know she''s not making money like those other girls," he says with a disappointing click of the tongue'
+			'The other officers shrug and shake their heads. "Probably some cheap bastards out there that can''t afford to be picky," one speaks up as you''re led further into the station.'
+		end
+	end
+
+	act 'Continue further in': gt 'court_arrest_events', 'booking_end'
+end
+
+
+
+if $ARGS[0] = 'repeat':
+	minut += 2
+	gs 'pain', 2, 'armR', 'pinch'
+	gs 'stat'
+
+	police_event = rand(1, 5)
+	!else repeat offender, the looks doesn''t matter only the variable that you''re being booked again
+	!randomized events
+	if police_event = 1:
+		'"Look who''s back! She just couldn''t stay out of trouble."'
+		'The others smile and shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 2:
+		'"She really likes getting in trouble! Must be the good food that is served here."'
+		'The others laugh and shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 3:
+		'"Look who I brought back with me. She just can''t keep away from here!"'
+		'The others smile and shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 4:
+		'"Time to book <<$pcs_lastname>> again. She just can''t keep out of trouble."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 5:
+		'"You really like to get in trouble, don''t you?"'
+		'The others shake their heads as he leads you further inside the police station.'
+	end
+	killvar 'police_event'
+
+	act 'Continue further in': gt 'court_arrest_events', 'booking_end'
+end
+
+if $ARGS[0] = 'multiple':
+	minut += 2
+	gs 'pain', 2, 'armR', 'pinch'
+	gs 'stat'
+
+	police_event = rand(1,5)
+	!triggered more than 5 times, randomized
+	if police_event = 1:
+		'"You''re getting a bit familiar with this place, aren''t you?"'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 2:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs, "Why won''t you learn? You know doing this will only lead to worse things..."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 3:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs, "I''m getting tired of seeing you around here, <<$pcs_lastname>>..."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 4:
+		'The staff sitting at the reception desk glance at you while the officer sighs tiredly, "You''re flushing your life straight down the shitter if you keep this up, <<$pcs_lastname>>."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 5:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs, "Here we go again. You know the drill, <<$pcs_lastname>>..."'
+		'The others shake their heads as he leads you further inside the police station.'
+	end
+	killvar 'police_event'
+
+	act 'Continue further in': gt 'court_arrest_events', 'booking_end'
+end
+
+if $ARGS[0] = 'regular':
+	minut += 2
+	gs 'pain', 2, 'armR', 'pinch'
+	gs 'stat'
+
+	police_event = rand(1, 8)
+	!triggered more than 10 times, randomized
+	if police_event = 1:
+		'The staff sitting at the reception desk glance your way as the arresting officer glares down at you, "I''m sick and tired of processing you, <<$pcs_lastname>>! I hope they lock you away for a long time!"'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 2:
+		'The staff sitting at the reception desk glance your way as the arresting officer smirks, "Well, if it isn''t our favorite customer. How long will you be staying this time?"'
+		'The others laugh loudly as he leads you further inside the police station.'
+
+	elseif police_event = 3:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "Why do you continue doing this, <<$pcs_lastname>>? Aren''t you getting tired of this life?"'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 4:
+		'The staff sitting at the reception desk glance at you as the arresting officer smiles sarcastically, "What a surprise, it''s our favorite little criminal!"'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 5:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "May they lock you up for a long time..."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 6:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "There''s really no saving you, <<$pcs_lastname>>..."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 7:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "I hope they give you a long sentence this time..."'
+		'The others shake their heads as he leads you further inside the police station.'
+
+	elseif police_event = 8:
+		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "I don''t know what to say anymore, <<$pcs_lastname>>... You''re really a lost case..."'
+		'The others shake their heads as he leads you further inside the police station.'
+	end
+	killvar 'police_event'
+
+	act 'Continue further in': gt 'court_arrest_events', 'booking_end'
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                           INTERROGATION                           !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'interrogation_start':
+	if $policeQW['crime_flag'] = 'shoplift':
+		if $ARGS[1] = 'easy':
+			gt 'court_arrest_events', 'shoplift_easy'
+		elseif $ARGS[1] = 'norm':
+			gt 'court_arrest_events', 'shoplift_norm'
+		else
+			gt 'court_arrest_events', 'shoplift_hard'
+		end
+
+	elseif $policeQW['crime_flag'] = 'prostitution':
+		if $ARGS[1] = 'easy':
+			gt 'court_arrest_events', 'prostitution_easy'
+		elseif $ARGS[1] = 'norm':
+			gt 'court_arrest_events', 'prostitution_norm'
+		else
+			gt 'court_arrest_events', 'prostitution_hard'
+		end
+	end
+end
+
+if $ARGS[0] = 'interrogation_end':
+	 gt 'police_station', 'returncell'
+end
+
+
+	!!-------------------------------------------------------------------!!
+	!!                        INTERROGATION EVENTS                       !!
+	!!-------------------------------------------------------------------!!
+
+
+if $ARGS[0] = 'shoplift_easy':
+	!easy going detective
+	minut += 20
+	gs 'stat'
+
+	picrand = rand(1, 2)
+	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+	'He takes a seat at the table opposite of you, "So caught stealing, eh?" he asks.'
+	'You nervously look around trying to avoid eye-contact...'
+	'He''s quick to notice your nervousness and tells you to relax, he only wants to know what happened. "Now start from the beginning..."'
+	'You take a deep breath and begin confessing your crime as the detective listens attentively.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'stat'
+
+		if policeQW['toldonguard'] = 2:
+			policeQW['toldonguard'] = 1
+
+			picrand = rand(1, 2)
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+			'You tear up, "So in the end the security guard forced me to have sex with him..."'
+			'The detective looks up, "Sounds awful! I''ll send some officers over to have a talk with him and we''ll take actions against him... assuming you''re telling the truth."'
+			'You nod your head, "I am, I promise!" You say before continuing to admit to everything while the detective writes down some notes.'
+			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and as you''ve made my job easy by admitting to everything, I can get you in front of him today. Don''t worry I''ll put in a good word for you," he reassures gently.'
+
+		else
+			picrand = rand(1, 2)
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+			'As you finish you see the detective write down one last thing before looking at you, "Good, that''s everything I need."'
+			'"What will happen to me?" you ask.'
+			'"Don''t worry, it was a petty crime and you''ve been more than cooperative with me and the booking officer, so I''ll put in a good word for you to the civil court judge," he reassures you.'
+		end
+
+		act 'Return to the holding cell': gt 'court_arrest_events', 'interrogation_end'
+	end
+end
+
+
+if $ARGS[0] = 'shoplift_norm':
+!normal detective
+	minut += 20
+	gs 'stat'
+
+	picrand = rand(1, 2)
+	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+	'He takes a seat opposite of you, "So caught stealing, eh?" he asks.'
+	'You nervously look around trying to avoid eye-contact...'
+	'"Look here <<$pcs_firstname>>, I''m just trying to do my job so lets make this quick and easy: tell the truth and confess to everything."'
+	'You take a deep breath and begin to talk.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'stat'
+
+		if policeQW['toldonguard'] = 2:
+			policeQW['toldonguard'] = 1
+
+			picrand = rand(1, 2)
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+			'You tear up, "So in the end the security guard forced me to have sex with him..."'
+			'The detective really isn''t paying attention to you as he scribbles things down, "I''ll see if there are any free officers to head over and interrogate the security guard about it."'
+			'You nod your head before continuing the confession. The officer looks bored, but he continues writing everything down.'
+			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything... we might as well take you in front of him and see how it goes," he says tiredly.'
+
+		else
+			picrand = rand(1, 2)
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+			'As you finish you confessing, the detective looks at you with an unreadable expression. "Well, you''ve pretty much confessed to everything, <<$pcs_firstname>>. It''s an open and shut case."'
+			'"What will happen to me?" you ask.'
+			'"Who knows, I''m not the civil court judge," he shrugs.'
+		end
+
+		act 'Return to the holding cell': gt 'court_arrest_events', 'interrogation_end'
+	end
+end
+
+
+if $ARGS[0] = 'shoplift_hard':
+!rough detective
+	minut += 20
+	gs 'stat'
+
+	picrand = rand(1, 2)
+	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+	'He takes a seat opposite of you, "So caught stealing, eh?" he asks.'
+	'You shrug your shoulders nonchalantly, not really caring what might happen.'
+	'"Don''t waste my time, <<$pcs_firstname>>," he threatens. "If you won''t take this seriously, then I won''t put in the effort to give a shit what happens to you. Now, stop fucking around and tell me everything you did."'
+	'You stutter as you begin confessing.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'stat'
+
+		if policeQW['toldonguard'] = 2:
+			policeQW['toldonguard'] = 1
+
+			picrand = rand(1, 2)
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+			'You tear up, "So in the end the security guard forced me to have sex with him..."'
+			'The detective''s scowl deepens as he glares at you. "You think you can just say shit like that and get away with everything? Stop lying, or I''ll throw you back in that cell with that crazy woman."'
+			'You shake your head, "I''m telling the truth! Why won''t you believe me?"'
+			'The detective lets out a loud sigh, "Sticking to your lies, huh? Fine but let me be clear: lying about a hard working security officer like this just to get away with stealing is going to make you an enemy to a lot of people around here, including the judge you''re about to see. I''m sure he''ll love to hear your swan song."'
+
+		else
+			picrand = rand(1, 2)
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
+			'As you finish, the detective looks up at you, "Good, that''s everything I need from you. Makes my job easier, y''know."'
+			'"What will happen to me?" you ask.'
+			'"Hopefully the civil court judge will give be going for a long and hard sentence. Criminals need to be taught a lesson," he says coldly.'
+		end
+
+		act 'Return to the holding cell': gt 'court_arrest_events', 'interrogation_end'
+	end
+end
+
+
+if $ARGS[0] = 'prostitution_easy':
+	!easy going detective
+	minut += 20
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+	'He takes a seat opposite of you, "So caught prostituting, eh?" he asks.'
+	'You nervously look around trying to avoid eye-contact...'
+	'He''s quick to notice your nervousness and tells you to relax, he only wants to know what happened. "Now start from the beginning..."'
+	'You take a deep breath and begin confessing your crime as the detective listens attentively.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'stat'
+
+		if policeQW['prostitution_bribe'] = 2:
+		!if tried to bribe the officer with sex
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'After a while listening to your story the detective clears his throat, "And this was when you tried to offer the officer sex?"'
+			'You stop and nod your head, "Yes, I... I thought it would get me off the hook..." You continue to confess while the detective writes down some notes.'
+			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him. I''ll try to put in a good word for you," he says.'
+
+		elseif policeQW['prostitution_bribe'] = 1:
+		!else if tried to bribe the officer with money
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'After a while listening to your story the detective clears his throat, "And this was when you tried to offer the officer money?"'
+			'You stop and nod your head, "Yes, I... I thought it would get me off the hook..." You continue to confess while the detective writes down some notes.'
+			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him. I''ll try to put in a good word for you," he says.'
+
+		else
+			!this will show up otherwise
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'As you finish, you see the detective write down one last thing before looking at you, "Good, that''s everything I need."'
+			'"What will happen to me?" you ask.'
+			'"Don''t worry, the civil court judge probably won''t care too much about the crime and both the booking officer and I will put in a good word for you since you made our job easy and confessed to everything. The punishment, if there is one, shouldn''t be too bad," he reassures you.'
+		end
+
+		act 'Return to the holding cell': gt 'court_arrest_events', 'interrogation_end'
+	end
+end
+
+
+if $ARGS[0] = 'prostitution_norm':
+!normal detective
+	minut += 20
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+	'He takes a seat opposite of you, "So caught prostituting, eh?" he asks.'
+	'You nervously look around trying to avoid eye-contact...'
+	'"Look here <<$pcs_firstname>>, I''m just trying to do my job here so how about you confess and we''ll take it from there..."'
+	'You take a deep breath and begin to talk.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'stat'
+
+		if policeQW['prostitution_bribe'] = 2:
+		!if tried to bribe the officer with sex
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'You tear up, "And this is where I thought I could bribe the officer with sex..."'
+			'The detective, not really paying attention, scribbles it down, "Attempted to bribe the officer with sex," he repeats.'
+			'You nod your head before continuing to confess to the bored looking officer.'
+			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him and we''ll see how it goes..." he says tiredly.'
+
+		elseif policeQW['prostitution_bribe'] = 1:
+		!if tried to bribe the officer with money
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'You tear up, "And this is where I thought I could bribe the officer with money..."'
+			'The detective, not really paying attention, scribbles it down, "Attempted to bribe the officer with money," he repeats.'
+			'You nod your head before continuing to confess to the bored looking officer.'
+			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him and we''ll see how it goes..." he says tiredly.'
+
+		else
+		!this will show up otherwise
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'As you finish, you see the detective write down one last thing before looking at you, "Well, you''ve pretty much confessed to everything, <<$pcs_firstname>>. It''s an open and shut case."'
+			'"What will happen to me?" you ask.'
+			'"Truth be told, I don''t really know what kind of sentence the judge will be going for..." he tells you.'
+		end
+
+		act 'Return to the holding cell': gt 'court_arrest_events', 'interrogation_end'
+	end
+end
+
+
+if $ARGS[0] = 'prostitution_hard':
+!rough detective
+	minut += 20
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+	'He takes a seat opposite of you, "So caught prostituting, eh?" he asks.'
+	'You shrug your shoulders nonchalantly not really caring what might happened.'
+	'"Don''t waste my time, <<$pcs_firstname>>," he threatens. "If you won''t take this seriously, then I won''t put in the effort to give a shit what happens to you. Now, stop fucking around and tell me everything you did."'
+	'You stutter as you begin confessing.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'stat'
+
+		if policeQW['prostitution_bribe'] = 2:
+		!if tried to bribe the officer with sex
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'You tear up, "And this is where I thought I could bribe the officer with sex..."'
+			'The detective''s face twists into a scowl. "You think you can get away with this by accusing someone of rape?!"'
+			'You shake your head, "Not at all! I''ve heard from the other girls that they''ve gotten away by doing that, so I thought--"'
+			'He slams his fist down on the table. "You think you can get away with telling these kind of lies against our fine police force?! You''re in deep shit now, <<$pcs_firstname>>. I''m taking you to see the judge, and we''ll see how he likes hearing you make a mockery of our justice system."'
+
+		elseif policeQW['prostitution_bribe'] = 1:
+		!if tried to bribe the officer with money
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'You tear up, "And this is where I thought I could bribe the officer with money..."'
+			'The detective''s face twists into a scowl. "You thought you could just buy your way out of this? That''s not how the world works, your actions have consequences!"'
+			'You shake your head, "Not at all! I''ve heard from the other girls that they''ve gotten away by doing that, so I thought--"'
+			'He slams his fist down on the table. "You think you can get away with telling these kind of lies against our fine police force?! You''re in deep shit now, <<$pcs_firstname>>. I''m taking you to see the judge, and we''ll see how he likes hearing you make a mockery of our justice system."'
+
+		else
+		!this will show up otherwise
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
+			'As you finish you see the detective looks at you, "Good just what I was looking for. You''ve confessed everything. Makes my and the prosecutors job easier."'
+			'"What will happen to me?" you ask.'
+			'"Hopefully the judge will give you a long and hard sentence." he angrily answers you.'
+		end
+
+		act 'Return to the holding cell': gt 'court_arrest_events', 'interrogation_end'
+	end
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                          CELLMATE STORY                           !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'cellmate_story':
+	if $policeQW['crime_flag'] = 'shoplift':
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityhold.jpg"></center>'
+		'"I got caught while I was stealing stuff," you answer nonchalantly.'
+		'The woman smirks, "A petty crime, you''ll be fine."'
+		'"What are you in for?" you ask her.'
+		'She starts laughing, "I refused to bribe one of these fuckers while I was prostituting so they brought me in as a punishment."'
+		'"I see..." you answer a bit taken back by her openness.'
+
+	elseif $policeQW['crime_flag'] = 'prostitution':
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityhold.jpg"></center>'
+		'"I got caught while I was prostituting," you answer nonchalantly.'
+		'She smiles surprisingly, "You too?!" The two of you start to laugh loudly.'
+		'"I refused to bribe one of these fuckers while I was prostituting so they brought me in as a punishment," she tells you, "So where do you usually work I haven''t seen you around?" she asks.'
+		'"Yeah same thing happened to me," you answer, "Here and there. I try to keep myself away from the usual spots." you explain.'
+	end
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                         VARIABLE CLEANUP                          !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+killvar 'temp_tot_arrested'
+
+
+--- court_arrest_events ---------------------------------

locations/court_functions.qsrc

@@ -0,0 +1,30 @@
+# court_functions
+
+if $ARGS[0] = 'get_total_arrests':
+	result = policeQW['shoplift_booked'] + policeQW['prostitution_booked']
+end
+
+if $ARGS[0] = 'arrest_for':
+	policeQW['<<$ARGS[1]>>_booked'] += 1
+	$policeQW['crime_flag'] = $ARGS[1]
+end
+
+!! gs 'add_fine', fine
+if $ARGS[0] = 'add_fine':
+	policeQW['legal_fine'] += ARGS[1]
+
+	temp_tot_missed = max(0, policeQW['tot_court_dates_missed'] + policeQW['tot_fines_deadlines_missed'])
+	temp_current_missed = max(0, policeQW['missed_fine_deadlines'] + policeQW['missed_court_dates'] - 1)
+
+	if policeQW['fine_deadline'] = 0:
+		policeQW['fine_deadline'] = daystart + 28 - min(14, temp_tot_missed / 4)
+	else
+		policeQW['fine_deadline'] = max(daystart, policeQW['fine_deadline']) + 14 - min(7, 2 * temp_current_missed + temp_tot_missed / 4)
+	end
+
+	killvar 'temp_current_missed'
+	killvar 'temp_tot_missed'
+end
+
+
+--- court_functions ---------------------------------

locations/court_sentence_events.qsrc

@@ -0,0 +1,500 @@
+# court_sentence_events
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                               JUDGE                               !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'judge_start':
+	if $mid($ARGS[1], 1, 8) = 'shoplift':
+		gt 'court_sentence_events', 'judge_shoplift', $mid($ARGS[1], 10)
+
+	elseif $mid($ARGS[1], 1, 12) = 'prostitution':
+		gt 'court_sentence_events', 'judge_prostitution', $mid($ARGS[1], 14)
+
+	else
+		gs 'LOCA', 'mod_sentenceevents', 'hearing'
+	end
+end
+
+if $ARGS[0] = 'judge_end':
+	gt 'sentence', 'punishment'
+end
+
+
+	!!-------------------------------------------------------------------!!
+	!!                            JUDGE EVENTS                           !!
+	!!-------------------------------------------------------------------!!
+
+
+if $ARGS[0] = 'judge_shoplift':
+	'<center><img <<$set_imgh>> src="images/locations/city/shared/court/judge.jpg"></center>'
+	'The judge speaks up with a stern voice, "So I see that you''re here because of you''ve gotten caught stealing."'
+	'You sink your glance in shame and nod meekly.'
+	'The judge continues on, "Let''s see what the detectives concluded during their investigation."'
+
+	if $mid($ARGS[1], 1, 4) = 'easy':
+		'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, the detective seem to be quite positive in the report."'
+		'Suddenly, you feel a bit emboldened as the detective seems to have come through for you. You even manage to let out a little smirk.'
+		'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
+		'"Yes your honor." you respectfully answer.'
+
+!!do a check if the player missed any earlier sentencing
+		if policeQW['missed_court_dates'] > 0:
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
+			'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
+			'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
+			'You try your best to hold back the tears as you nod that you understand.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+
+		else
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
+			'You nod and take a deep breath as you await your punishment.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+		end
+
+	elseif $mid($ARGS[1], 1, 4) = 'norm':
+		'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, the detective has only written neutral comments in the report."'
+		'Suddenly, you feel a bit looser as you can probably expect a lighter sentencing than usual. You let out a relieving sigh.'
+		'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
+		'"Yes your honor." you respectfully answer.'
+
+!!do a check if the player missed any earlier sentencing
+		if policeQW['missed_court_dates'] > 0:
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
+			'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
+			'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
+			'You try your best to hold back the tears as you nod that you understand.'
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+
+		else
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
+			'You nod and take a deep breath as you await your punishment.'
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+		end
+
+	else
+		'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, what is wrong with you? The report written by the detective is quite damaging and you will be getting a harsher sentencing."'
+		'You look nonchalantly at the judge, almost ignoring what he has to say.'
+		'"Well as you''ve already admitted being guilty, no need listening to your pleading," he sternly looks at you.'
+		'"Whatever." you shrug your shoulders.'
+
+!!do a check if the player missed any earlier sentencing
+		if policeQW['missed_court_dates'] > 0:
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
+			'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
+			'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
+			'You try your best to hold back the tears as you nod that you understand.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+
+		else
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
+			'You nod and take a deep breath as you await your punishment.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'judge_prostitution':
+	'<center><img <<$set_imgh>> src="images/locations/city/shared/court/judge.jpg"></center>'
+	'The judge speaks up with a stern voice, "So I see that you''re here because of you''ve gotten caught prostituting."'
+	'You sink your glance in shame and nod meekly.'
+	'The judge continues on, "Let''s see what the detectives concluded during their investigation."'
+
+	if $mid($ARGS[1], 1, 4) = 'easy':
+		'Suddenly, you feel a bit emboldened as the detective seems to have come through for you. You even manage to let out a little smirk.'
+		'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
+		'"Yes your honor." you respectfully answer.'
+
+!!do a check if the player missed any earlier sentencing
+		if policeQW['missed_court_dates'] > 0:
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
+			'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
+			'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
+			'You try your best to hold back the tears as you nod that you understand.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+
+		else
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
+			'You nod and take a deep breath as you await your punishment.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+		end
+
+	elseif $mid($ARGS[1], 1, 4) = 'norm':
+		'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, the detective has only written neutral comments in the report."'
+		'Suddenly, you feel a bit looser as you can probably expect a lighter sentencing than usual. You let out a relieving sigh.'
+		'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
+		'"Yes your honor." you respectfully answer.'
+
+!!do a check if the player missed any earlier sentencing
+		if policeQW['missed_court_dates'] > 0:
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
+			'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
+			'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
+			'You try your best to hold back the tears as you nod that you understand.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+
+		else
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
+			'You nod and take a deep breath as you await your punishment.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+		end
+
+	else
+		'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, what is wrong with you? The report written by the detective is quite damaging and you will be getting a harsher sentencing."'
+		'You look nonchalantly at the judge, almost ignoring what he has to say.'
+		'"Well as you''ve already admitted being guilty, no need listening to your pleading," he sternly looks at you.'
+		'"Whatever." you shrug your shoulders.'
+
+!!do a check if the player missed any earlier sentencing
+		if policeQW['missed_court_dates'] > 0:
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
+			'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
+			'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
+			'You try your best to hold back the tears as you nod that you understand.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+
+		else
+			'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
+			'You nod and take a deep breath as you await your punishment.'
+
+			act 'Await punishment': gt 'court_sentence_events', 'judge_end'
+		end
+	end
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                            PUNISHMENT                             !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'punishment_start':
+	if $mid($ARGS[1], 1, 8) = 'shoplift':
+		policeQW['shoplift_counter'] += 1
+		gs 'court_sentence_events', 'punishment_shoplift', $mid($ARGS[1], 10)
+
+	elseif $mid($ARGS[1], 1, 12) = 'prostitution':
+		policeQW['prostitution_counter'] += 1
+		gs 'court_sentence_events', 'punishment_shoplift', $mid($ARGS[1], 14)
+
+	else
+		gs 'LOCA', 'mod_sentenceevents', 'punishment', $ARGS[1]
+	end
+end
+
+
+	!!-------------------------------------------------------------------!!
+	!!                         PUNISHMENT EVENTS                         !!
+	!!-------------------------------------------------------------------!!
+
+if $ARGS[0] = 'punishment_shoplift':
+	if policeQW['shoplift_counter'] <= 5:
+	!Stage 1
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 5000 + (policeQW['shoplift_value'] / 2)
+
+			'"I hereby sentence you to a fine of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office. You''ve been lucky this time Miss <<$pcs_lastname>>." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 5000 + policeQW['shoplift_value']
+
+			'"I hereby sentence you to a fine of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 5000 + (3 * policeQW['shoplift_value'] / 2)
+
+			'"I hereby sentence you to a fine of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office. And if it happens that you appear in front of this court again, check your attitude." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['shoplift_counter'] <= 10:
+	!Stage 2
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 7500 + (3 * policeQW['shoplift_value'] / 4)
+
+			'"Seems that I need to increase the fine for you to pay back to a sum of <<temp_fine>> <b>₽</b>. Hopefully, this will teach you a lesson." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 7500 + (3 * policeQW['shoplift_value'] / 2)
+
+			'"Seems that I need to increase the fine for you to pay back to a sum of <<temp_fine>> <b>₽</b>. Hopefully, this will teach you a lesson." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 7500 + (9 * policeQW['shoplift_value'] / 4)
+
+			'"I sentence you hereby to pay back a sum of <<temp_fine>> <b>₽</b> and I''ll also sentence you to some community service at the Mercy Clinic to 20 hours, hopefully this will help." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic? I see you''ve still got an attitude issue." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['shoplift_counter'] <= 15:
+	!Stage 3
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 10000 + policeQW['shoplift_value']
+
+			'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 10000 + (2 * policeQW['shoplift_value'])
+
+			'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and sentence you to community service at the Mercy Clinic to 20 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 10000 + (5 * policeQW['shoplift_value'] / 2)
+
+			'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['shoplift_counter'] <= 20:
+	!Stage 4
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 15000 + (5 * policeQW['shoplift_value'] / 4)
+
+			'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and sentence you to community service at the Mercy Clinic to 20 hours." the judge reads out your sentence.'
+			'"You already know what you need to do." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 15000 + (5 * policeQW['shoplift_value'] / 2)
+
+			'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
+			'"You already know what you need to do." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 15000 + (3 * policeQW['shoplift_value'])
+
+			'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and increase the community service at the Mercy Clinic to 80 hours." the judge reads out your sentence.'
+			'"You already know what you need to do." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['shoplift_counter'] <= 25:
+	!Stage 5
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 25000 + (3 * policeQW['shoplift_value'] / 2)
+
+			'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay this fine of <<temp_fine>> <b>₽</b> and enjoy your community service at the Mercy Clinic for 40 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 25000 + (3 * policeQW['shoplift_value'])
+
+			'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of <<temp_fine>> <b>₽</b> and enjoy your community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 25000 + (4 * policeQW['shoplift_value'])
+
+			'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of <<temp_fine>> <b>₽</b> and enjoy your community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	else
+	!Stage 6
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 50000 + (2 * policeQW['shoplift_value'])
+
+			'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to <<temp_fine>> <b>₽</b> and the community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
+			'"You already know what you need to do. I hope you will think about your actions before stealing again." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 50000 + (4 * policeQW['shoplift_value'])
+
+			'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to <<temp_fine>> <b>₽</b> and the community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
+			'"You already know what you need to do. I hope you will think about your actions before stealing again." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 50000 + (5 * policeQW['shoplift_value'])
+			'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to <<temp_fine>> <b>₽</b> and the community service at the Mercy Clinic for 160 hours." the judge reads out your sentence.'
+			'"You already know what you need to do. I hope you will think about your actions before stealing again." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+	end
+end
+
+if $ARGS[0] = 'punishment_prostitution':
+	if policeQW['prostitution_counter'] <= 5:
+	!Stage 1
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 6000
+
+			'"I hereby sentence you to a fine of 6000 <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office. You''ve been lucky this time Miss <<$pcs_lastname>>." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 7000
+
+			'"I hereby sentence you to a fine of 7000 <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 8000
+
+			'"I hereby sentence you to a fine of 8000 <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office. And if it happens that you appear in front of this court again, check your attitude." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['prostitution_counter'] <= 10:
+	!Stage 2
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 9000
+
+			'"I need to increase the fine to 9000 <b>₽</b>. Hopefully, this will get you to reconsider your actions." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 10500
+
+			'"I need to increase the fine to 10,500 <b>₽</b>. Hopefully, this will get you to reconsider your actions." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 11500
+
+			'"I sentence you hereby to pay a fine of 11,500 <b>₽</b> and I''ll also add some community service at the Mercy Clinic to 20 hours, hopefully this will help you reconsider your actions." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic? I see you''ve still got an attitude issue." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['prostitution_counter'] <= 15:
+	!Stage 3
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 12000
+
+			'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to 12000 <b>₽</b>." the judge reads out your sentence.'
+			'"You can pay your fine at the post office." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 14000
+
+			'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to 14000 <b>₽</b> and sentence you to community service at the Mercy Clinic for 20 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 15000
+
+			'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to 15000 <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['prostitution_counter'] <= 20:
+	!Stage 4
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 17500
+
+			'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to 17500 <b>₽</b> and sentence you to community service at the Mercy Clinic to 20 hours." the judge reads out your sentence.'
+			'"You already know what you need to do." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 20000
+
+			'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to 20000 <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
+			'"You already know what you need to do." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 21000
+
+			'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to 21000 <b>₽</b> and increase the community service at the Mercy Clinic to 80 hours." the judge reads out your sentence.'
+			'"You already know what you need to do." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	elseif policeQW['prostitution_counter'] <= 25:
+	!Stage 5
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 28000
+
+			'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay this fine of 28000 <b>₽</b> and enjoy your community service at the Mercy Clinic for 40 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 21000
+
+			'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of 31000 <b>₽</b> and enjoy your community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 32000
+
+			'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of 32000 <b>₽</b> and enjoy your community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
+			'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+
+	else
+	!Stage 6
+		if $mid($ARGS[1], 1, 4) = 'easy':
+			gs 'court_functions', 'add_fine', 55000
+
+			'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to 55000 <b>₽</b> and the community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
+			'"You already know what you need to do. I hope you will think about your actions before prostituting yourself again." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		elseif $mid($ARGS[1], 1, 4) = 'norm':
+			gs 'court_functions', 'add_fine', 57500
+
+			'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to 57500 <b>₽</b> and the community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
+			'"You already know what you need to do. I hope you will think about your actions before prostituting yourself again." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+
+		else
+			gs 'court_functions', 'add_fine', 60000
+
+			'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to 60000 <b>₽</b> and the community service at the Mercy Clinic for 160 hours." the judge reads out your sentence.'
+			'"You already know what you need to do. I hope you will think about your actions before prostituting yourself again." the judge finishes.'
+			'You nod and quickly make your way out of courtroom.'
+		end
+	end
+end
+
+--- court_sentence_events ---------------------------------

locations/courtletter.qsrc

@@ -149,7 +149,7 @@ if $ARGS[0] = 'letter':
 		end
 
 
-	elseif mid($policeQW_courtletter_subjects[0], 1, 12) = 'missed_court':
+	elseif $mid($policeQW_courtletter_subjects[0], 1, 12) = 'missed_court':
 		if week = 6:
 			policeQW_courthearing_dates[] = daystart + 9
 		elseif week = 7:
@@ -158,7 +158,7 @@ if $ARGS[0] = 'letter':
 			policeQW_courthearing_dates[] = daystart + 7
 		end
 
-		$policeQW_courthearing_subjects[] = mid($policeQW_courtletter_subjects[0], 14)
+		$policeQW_courthearing_subjects[] = $mid($policeQW_courtletter_subjects[0], 14)
 
 		if policeQW['courtletter_hearing_counter'] < 10:
 			policeQW['courtletter_hearing_counter'] += 1

locations/police_station.qsrc

@@ -1,10 +1,9 @@
 # police_station
 
 if $ARGS[0] = 'start':
-	$menu_loc = 'police_station'
-	$menu_arg = 'start'
-	$region = 'city'
 	menu_off = 0
+	$region = 'city'
+	gs 'shortgs', 'setloc', 'police_station', 'start'
 
 	'<center><h1><font color="maroon">Police station Entrance</font></h1></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityext.jpg"></center>'
@@ -16,280 +15,154 @@ end
 
 
 if $ARGS[0] = 'reception':
-	$menu_loc = 'police_station'
-	$menu_arg = 'reception'
-	$region = 'city'
 	menu_off = 0
+	$region = 'city'
+	gs 'shortgs', 'setloc', 'police_station', 'reception'
 
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityrec.jpg"></center>'
 	'Upon entering the station you''re welcomed by a reception desk. The officers sitting here are protected by thick glass and you see several monitors and computers keeping an eye on everything that''s happening inside and outside the building.'
 
-	if rape_count > 0 and rape_day+2 > daystart: act 'Report a rape': gt 'police_station', 'rape_report'
+	if rape_count > 0 and daystart < rape_day + 2: act 'Report a rape': gt 'police_station', 'rape_report'
 	gs 'blackmailer', 'set_police_act'
 	act 'Return to the center': gt 'city_center'
 end
 
 
-temp_tot_booked = policeQW['shoplift_booked'] + policeQW['prostitution_booked']
-
-if $ARGS[0] = 'entrance':
-	menu_off = 1
-
-	'<center><h1><font color="maroon">Reception area</font></h1></center>'
+if $ARGS[0] = 'rape_report':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityrec.jpg"></center>'
-	'The officer drags you in by the arm, his grip tightening whenever he feels the slightest bit of resistance from you. You expect him to take you straight in to be booked, but to your dismay he stops at the front desk to put you on display to the other officers as he gloats.'
-	*nl
-
-	!first time offender, event where Sveta gets caught stealing
-	!need to add a variable to store that Sveta has been brought into the police station
-	if $ARGS[1] = 'shplft' or $ARGS[1] = 'shoplift':
-		policeQW['shoplift_booked'] += 1
-		$policeQW['crime_flag'] = 'shoplift'
-		temp_tot_booked = policeQW['shoplift_booked'] + policeQW['prostitution_booked']
-
-		if temp_tot_booked = 1:
-			!!a gosub on purpose!!
-			gs 'police_station', 'first_shoplift'
-		elseif temp_tot_booked < 6:
-			gt 'police_station', 'repeat'
-		elseif temp_tot_booked < 11:
-			gt 'police_station', 'repeat'
-		else
-			gt 'police_station', 'regular'
-		end
-
-	else
-		policeQW['prostitution_booked'] += 1
-		$policeQW['crime_flag'] = 'prostitution'
-		temp_tot_booked = policeQW['shoplift_booked'] + policeQW['prostitution_booked']
-
-		if temp_tot_booked = 1:
-			!!a gosub on purpose!!
-			gs 'police_station', 'first_prostitution'
-		elseif temp_tot_booked < 6:
-			gt 'police_station', 'repeat'
-		elseif temp_tot_booked < 11:
-			gt 'police_station', 'repeat'
-		else
-			gt 'police_station', 'regular'
-		end
-	end
-end
-
-
-if $ARGS[0] = 'first_shoplift':
-	cla
-	minut += 2
-	gs 'pain', 2, 'armR', 'pinch'
-	gs 'stat'
-
-	if policeQW['toldonguard'] = 2:
-		!! if had sex with the security guard but still got arrested
-		'"I''m not lying, that security guard forced me to have sex with him! Why won''t you believe me?" you plead, but it does you no good.'
-		'The officer sighs, "You think you''re the first to try that? I''ve heard it all from you thieving little whores. You''re not the victim here!"'
-		*nl
-		'With a dejected whimper, you look down to the floor as you''re led further into the station to be booked.'
-
-	elseif grupTipe = 4:
-		'"Security over at the mall caught a wild one today. This little bitch tried to bite me as I was bringing her in!"'
-		'The others shake their head as he leads you further inside the police station.'
-		*nl
-		'"Wow, you''re real tough, manhandling a girl barely half your size," you hiss.'
-		'"You think this is being too rough? I can show you a thing or two about real pain," he threatens.'
-
-	elseif pcs_hotcat >= 7:
-		'"Look who was caught stealing by the security guys at the mall! I guess being pretty can''t get you everything you want," he says with a cruel laugh.'
-		'Most of officers just grin and laugh, but you hear a few make crude comments as you''re led further inside the police station.'
-		*nl
-		'"Hey, you''re hurting my arm!" you whine. "Could you please loosen up? It''s not like I''m going to try to run!"'
-		'"Being pretty isn''t going to get you any special treatment, girly. You''re a criminal, just like everyone else brought through here," he spits back.'
-
-	elseif pcs_hotcat =< 3:
-		'"You''ll never guess what she was brought in for!" he laughs. "Security at the mall caught this one trying to steal beauty products. You can put makeup on a pig but it''ll still be a pig!"'
-		'The others laugh loudly as he leads you further inside the police station.'
-		*nl
-		'"Hey, you''re hurting my arm!" you whine. "Could you please loosen up? It''s not like I''m going to try to run!"'
-		'"What were you thinking stealing make-up?" he asks, ignoring your pleas. "It wouldn''t do you a damn bit of good. You''d still look like you were hit with a brick!"'
-
-	else
-		!if plain looking
-		'"The security guys over at the mall caught this little mouse trying to steal some stuff. I guess looks can be deceiving; I would have never thought she''d be the type."'
-		'Some of the other officers just shrug or click their tongue disapprovingly before he leads you deeper inside the police station.'
-		*nl
-		'"Hey, you''re hurting my arm!" you whine. "Could you please loosen up? It''s not like I''m going to try to run!"'
-		'"Oh, don''t like the way I''m treating you, little mouse? Well, you should have thought about that before trying to play thief!" he spits back.'
-	end
-
-	act 'Continue further in': gt 'police_station', 'booking'
-end
-
-
-if $ARGS[0] = 'first_prostitution':
-	minut += 2
-	gs 'pain', 2, 'armR', 'pinch'
-	gs 'stat'
+	'One step after another, you trudge through town until you suddenly find yourself standing inside the police station. On the other side of a plexiglass reception, you can see several officers milling about, though none pay attention to you. Stepping up to the window, you pick up the phone and hear a buzzer sound on the other side. One of the officers picks it up without hesitation and looks at you.'
+	'"Can I help you?"'
+	'"I- I''d like t-to report a r-rape..." you stammer out. The officer nods but his expression doesn''t change in the slightest.'
+	'"Someone will come out to meet you. Follow them and they''ll take your statement in the back."'
 
-	if policeQW['prostitution_bribe'] = 1:
-		if pcs_hotcat =< 3:
-			!else if ugly and bribed the officer with sex
-			'"I caught this one whoring herself out and you know what she tried to do? She tried to bribe me with sex!"'
-			'The others shake their head, "What was she thinking? No one would fuck someone as ugly as her!"'
-			'You hang your head in shame as you''re led further into the station for booking.'
-
-		elseif pcs_hotcat >= 7:
-			!else if beautiful and bribed the officer with sex
-			'"I caught this one whoring herself out and you know what she tried to do? She tried to bribe me with sex!"'
-			'The other officers eye you hungrily, "You''re a better man than me!" one of them exclaim. "Just look at her, how often do you get a chance like that? I would have said yes!"'
-			'A small smile plays across your face, feeling a tiny bit flattered as you''re led further into the station to get booked.'
-
-		else
-			!else if plain and bribed the officer with sex
-			'"I caught this one whoring herself out and you know what she tried to do? She tried to bribe me with sex!"'
-			'The others jokingly say, "Well, she doesn''t look that bad. I wouldn''t have agreed, but I can see it working on someone else..."'
-			'You frown at their rude remarks, but remain silent as you''re led further into the station to be booked.'
-		end
+	act 'Continue':
+		cla & *clr
+		minut += rand(2,5)
+		gs'stat'
 
-	else
-		if pcs_hotcat =< 3:
-			!Prostitute event, this will be an continuation to the prostitute events that happened earlier
-			!if ugly
-			'"I caught this one whoring herself out. Can you believe that? Who would ever want to fuck this pig?!" he exclaims, and the staff erupt with laughter.'
-			'"What was she thinking? Honestly, you''ve done everyone a favor getting her off the streets," says one of the officers before you''re led further into the station.'
-
-		elseif pcs_hotcat >= 7:
-			!else if beautiful
-			'"I caught this one whoring herself out on the street corner. Such a waste," he turns to you and shakes his head. "A hot thing like you could shack up with some rich guy and leech off him, but I guess that''s not enough for a cock hungry whore like you, huh? One just ain''t enough."'
-			*nl
-			'The other officers laugh cruelly. "It really is a shame, just look at her-- she''s damn gorgeous. You must have some real issues to be selling yourself to strangers."'
-			*nl
-			'"I''m sure the money is great!" The officer holding you laughs loudly as he leads you further inside the police station.'
-
-		else
-			!else if plain
-			'"I caught this one whoring herself out. She ain''t bad looking, but you know she''s not making money like those other girls," he says with a disappointing click of the tongue'
-			'The other officers shrug and shake their heads. "Probably some cheap bastards out there that can''t afford to be picky," one speaks up as you''re led further into the station.'
-		end
-	end
+		'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation1.jpg"></center>'
+		'As promised, someone comes out and takes you into their office space behind. You sit down at a shoddy looking desk and the officer takes his place on the other side of it.'
+		'"Alright ma''am, tell me what happened to you."'
+		'You explain to the officer as best as you can what happened to you while he takes notes. How you were randomly attacked, how you were violated.'
 
-	act 'Continue further in': gt 'police_station', 'booking'
-end
+		act 'Continue':
+			cla & *clr
+			minut += rand(2,5)
+			gs'stat'
 
+			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation2.jpg"></center>'
+			'"And where did the attack occur?"'
 
-if $ARGS[0] = 'repeat':
-	minut += 2
-	gs 'pain', 2, 'armR', 'pinch'
-	gs 'stat'
+			if $loc = 'city_center':
+				'"Here, i-in the city center. But he pulled me away. I... I don''t remember how far..."'
 
-	police_event = rand(1,5)
-	!else repeat offender, the looks doesn''t matter only the variable that you''re being booked again
-	!randomized events
-	if police_event = 1:
-		'"Look who''s back! She just couldn''t stay out of trouble."'
-		'The others smile and shake their heads as he leads you further inside the police station.'
+			elseif $loc = 'city_residential':
+				'"In th-the residential district. But he pulled me away. I... I don''t remember how far..."'
 
-	elseif police_event = 2:
-		'"She really likes getting in trouble! Must be the good food that is served here."'
-		'The others laugh and shake their heads as he leads you further inside the police station.'
+			elseif $loc = 'city_industrial':
+				'"In th-the industrial district. But he pulled me away. I... I don''t remember how far..."'
 
-	elseif police_event = 3:
-		'"Look who I brought back with me. She just can''t keep away from here!"'
-		'The others smile and shake their heads as he leads you further inside the police station.'
+			elseif $loc = 'city_island':
+				'"On th-the island, Vasilyevsky Island. But he pulled me away. I... I don''t remember how far..."'
 
-	elseif police_event = 4:
-		'"Time to book <<$pcs_lastname>> again. She just can''t keep out of trouble."'
-		'The others shake their heads as he leads you further inside the police station.'
+			elseif $loc = 'city_park':
+				'"In th-the park. But he pulled me away. I... I don''t remember how far..."'
+			end
 
-	elseif police_event = 5:
-		'"You really like to get in trouble, don''t you?"'
-		'The others shake their heads as he leads you further inside the police station.'
-	end
+			'"Can you describe what he looked like?"'
+			'The blood drains from your face. "I... I-!"'
+			'"Anything about him will be helpful. Height? Build? Hair color? Eye color?"'
 
-	killvar 'police_event'
+			act 'I... can''t...':
+				cla
+				*nl
+				'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation1.jpg"></center>'
+				'"He was... I don''t remember how tall he was... And... he was wearing a nondescript hoody, I couldn''t tell what his body type was... And-! And... I don''t know what he looks like... he was behind me during... the event..."'
+				'The officer doesn''t say anything but you see him slightly shake his head. You realize that the information you gave him is going to be of little to no use at all. A rape in town and nothing else to go off of? You might as well have told him you a pidgeon did it.'
+				*nl
+				'For a moment, you wonder how many other girls like you have sat at this desk filing a report just like this one only for it to go nowhere. You wonder if any of them were been raped by the same man who raped you...'
 
-	act 'Continue further in': gt 'police_station', 'booking'
-end
+				act'Finish the interview':
+					cla & *clr
+					minut += rand(2,5)
+					gs'stat'
 
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityrec.jpg"></center>'
+					'With that, you conclude the interview and are led to the front door.'
+					'"We''ll take this information into consideration. Again, we''re very sorry for what happened to you."'
+					'And then he walks away. Leaving you so very alone...'
 
-if $ARGS[0] = 'multiple':
-	minut += 2
-	gs 'pain', 2, 'armR', 'pinch'
-	gs 'stat'
+					act'Leave': gt 'city_center'
+				end
 
-	police_event = rand(1,5)
-	!triggered more than 5 times, randomized
-	if police_event = 1:
-		'"You''re getting a bit familiar with this place, aren''t you?"'
-		'The others shake their heads as he leads you further inside the police station.'
+				if cumsumvag+cumsumass > 0:
+					act 'Can I get a rape kit?':
+						cla & *clr
+						minut += 2
+						gs'stat'
 
-	elseif police_event = 2:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs, "Why won''t you learn? You know doing this will only lead to worse things..."'
-		'The others shake their heads as he leads you further inside the police station.'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cubicle.jpg"></center>'
+						'"C-can I get a... a rape kit...?" you mumble.'
+						'The officer nods at you and pulls a small box out of a drawer in his desk.'
+						'"If you just come this way ma''am." The two of you get up and he leads you through the office area to the bathroom where he hands you the box. Looking down at it, you read the label on it.'
+						*nl
+						'<i><b>SEXUAL ASSAULT EVIDENCE COLLECTION KIT</b></i>'
+						*nl
+						'You take it from him, cradling it in your hands.'
+						'"This will let you catch him right?" The officer shrugs in return.'
+						'"It depends. DNA evidence is only useful if we can match it to the person it came from."'
+						'"So you''re saying this might not do anything?"'
+						'He shrugs again. "It''s better than nothing."'
 
-	elseif police_event = 3:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs, "I''m getting tired of seeing you around here, <<$pcs_lastname>>..."'
-		'The others shake their heads as he leads you further inside the police station.'
+						act 'Use the rape kit':
+							cla & *clr
+							minut += 20
+							gs'stat'
 
-	elseif police_event = 4:
-		'The staff sitting at the reception desk glance at you while the officer sighs tiredly, "You''re flushing your life straight down the shitter if you keep this up, <<$pcs_lastname>>."'
-		'The others shake their heads as he leads you further inside the police station.'
+							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityext.jpg"></center>'
+							'Closing the bathroom door, you open the kit and you swab your insides, feeling humiliated and disgusted when it comes back covered in semen. Packaging it up, you re-open the door and hand the evidence to the officer.'
+							'With that, you conclude the interview and are led to the front door.'
+							'"We''ll take this information into consideration. Again, we''re very sorry for what happened to you." And then he walks away.'
+							*nl
+							'Leaving you alone with your thoughts and memories of your rape...'
 
-	elseif police_event = 5:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs, "Here we go again. You know the drill, <<$pcs_lastname>>..."'
-		'The others shake their heads as he leads you further inside the police station.'
+							act 'Leave': gt 'city_center'
+						end
+					end
+				end
+			end
+		end
 	end
-
-	killvar 'police_event'
-	act 'Continue further in': gt 'police_station', 'booking'
 end
 
-if $ARGS[0] = 'regular':
-	minut += 2
-	gs 'pain', 2, 'armR', 'pinch'
-	gs 'stat'
-
-	police_event = rand(1,8)
-	!triggered more than 10 times, randomized
-	if police_event = 1:
-		'The staff sitting at the reception desk glance your way as the arresting officer glares down at you, "I''m sick and tired of processing you, <<$pcs_lastname>>! I hope they lock you away for a long time!"'
-		'The others shake their heads as he leads you further inside the police station.'
 
-	elseif police_event = 2:
-		'The staff sitting at the reception desk glance your way as the arresting officer smirks, "Well, if it isn''t our favorite customer. How long will you be staying this time?"'
-		'The others laugh loudly as he leads you further inside the police station.'
 
-	elseif police_event = 3:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "Why do you continue doing this, <<$pcs_lastname>>? Aren''t you getting tired of this life?"'
-		'The others shake their heads as he leads you further inside the police station.'
 
-	elseif police_event = 4:
-		'The staff sitting at the reception desk glance at you as the arresting officer smiles sarcastically, "What a surprise, it''s our favorite little criminal!"'
-		'The others shake their heads as he leads you further inside the police station.'
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                              ARRESTS                              !!
+	!!                                                                   !!
+	!!===================================================================!!
 
-	elseif police_event = 5:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "May they lock you up for a long time..."'
-		'The others shake their heads as he leads you further inside the police station.'
 
-	elseif police_event = 6:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "There''s really no saving you, <<$pcs_lastname>>..."'
-		'The others shake their heads as he leads you further inside the police station.'
+if $ARGS[0] = 'entrance':
+	menu_off = 1
 
-	elseif police_event = 7:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "I hope they give you a long sentence this time..."'
-		'The others shake their heads as he leads you further inside the police station.'
+	'<center><h1><font color="maroon">Reception area</font></h1></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityrec.jpg"></center>'
+	'The officer drags you in by the arm, his grip tightening whenever he feels the slightest bit of resistance from you. You expect him to take you straight in to be booked, but to your dismay he stops at the front desk to put you on display to the other officers as he gloats.'
+	*nl
 
-	elseif police_event = 8:
-		'The staff sitting at the reception desk glance at you as the arresting officer sighs heavily, "I don''t know what to say anymore, <<$pcs_lastname>>... You''re really a lost case..."'
-		'The others shake their heads as he leads you further inside the police station.'
-	end
+	!first time offender, event where Sveta gets caught stealing
+	!need to add a variable to store that Sveta has been brought into the police station
 
-	killvar 'police_event'
-	act 'Continue further in': gt 'police_station', 'booking'
+	gs 'court_arrest_events', 'booking_start', $ARGS[1]
 end
 
 
 !Goes through the process of getting booked, pretty straight forward, an event when Sveta gets booked the first time (three ways how this goes) and repeatable bookings
 if $ARGS[0] = 'booking':
-	if temp_tot_booked = 1:
+	if func('court_functions', 'get_total_arrests') = 1:
 		gt 'police_station', 'booking1'
 	else
 		gt 'police_station', 'booking2'
@@ -309,9 +182,7 @@ if $ARGS[0] = 'booking1':
 	'The other officer looks you up and down, evaluating you at a glance. "<<$pcs_lastname>> was it, right?"'
 
 	act 'Play along': gt 'police_station', 'booking1_play_along'
-
 	act 'Answer brashly': gt 'police_station', 'booking1_brash'
-
 	act 'Try to weasel your way out': gt 'police_station', 'booking1_weasel'
 end
 
@@ -924,375 +795,91 @@ if $ARGS[0] = 'interrogation':
 	minut += 10
 	gs 'stat'
 
-	detecrand = rand (1,100)
+	detecrand = rand (1, 100)
 
 	!Then we add a bonus or penalty to the roll, depending on his relationship with you:
-	if policeQW['bookingofficer_rel'] >= 90:
-		detecrand += 10
-	elseif policeQW['bookingofficer_rel'] >= 80:
-		detecrand += 8
-	elseif policeQW['bookingofficer_rel'] >= 70:
-		detecrand += 6
-	elseif policeQW['bookingofficer_rel'] >= 60:
-		detecrand += 4
-	elseif policeQW['bookingofficer_rel'] >= 50:
-		detecrand += 2
-	elseif policeQW['bookingofficer_rel'] >= 25:
+	if policeQW['bookingofficer_rel'] < 25:
+		detecrand -= 10
+	elseif policeQW['bookingofficer_rel'] < 50:
 		detecrand += 0
+	elseif policeQW['bookingofficer_rel'] < 60:
+		detecrand += 2
+	elseif policeQW['bookingofficer_rel'] < 70:
+		detecrand += 4
+	elseif policeQW['bookingofficer_rel'] < 80:
+		detecrand += 6
+	elseif policeQW['bookingofficer_rel'] < 90:
+		detecrand += 8
 	else
-		detecrand -= 10
+		detecrand += 10
 	end
 
-
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/interrogationroom.jpg"></center>'
 	'The detective leads you to a small private room with only some chairs and a table. He shoves you in and closes the door behind him.'
 	'He tells you to take a seat and you quietly comply. "I''ll be right back I need to get something..." he says.'
 	'You take a seat on the chair and look around anxiously while waiting for the detective to return. As he returns you see him holding a paper.'
 
-	if $policeQW['crime_flag'] = 'shoplift':
-	!if caught stealing
-		if book_response = 5: gt 'police_station', 'shoplift_hard'
-
-		if book_response = 4: gt 'police_station', 'shoplift_easy'
-
-		!Normal response
+	act 'Continue':
 		if book_response = 1:
 			if detecrand >= 86:
-				gt 'police_station', 'shoplift_easy'
+				$policeQW['detective_type'] = 'easy'
+				gt 'court_arrest_events', 'interrogation_start', 'easy'
 
 			elseif detecrand >= 16:
-				gt 'police_station', 'shoplift_norm'
-
-			else
-				gt 'police_station', 'shoplift_hard'
-			end
-
-		!Bribe the booking officer
-		elseif book_response = 2:
-			if detecrand >= 31:
-				gt 'police_station', 'shoplift_easy'
-
-			elseif detecrand >= 11:
-				gt 'police_station', 'shoplift_norm'
+				$policeQW['detective_type'] = 'norm'
+				gt 'court_arrest_events', 'interrogation_start', 'norm'
 
 			else
-				gt 'police_station', 'shoplift_hard'
+				$policeQW['detective_type'] = 'hard'
+				gt 'court_arrest_events', 'interrogation_start', 'hard'
 			end
 
 		!Give the officer a hard time
-		elseif book_response = 3:
+		elseif book_response = 2:
 			if detecrand >= 91:
-				gt 'police_station', 'shoplift_easy'
+				$policeQW['detective_type'] = 'easy'
+				gt 'court_arrest_events', 'interrogation_start', 'easy'
 
 			elseif detecrand >= 71:
-				gt 'police_station', 'shoplift_norm'
+				$policeQW['detective_type'] = 'norm'
+				gt 'court_arrest_events', 'interrogation_start', 'norm'
 
 			else
-				gt 'police_station', 'shoplift_hard'
-			end
-		end
-
-	elseif $policeQW['crime_flag'] = 'prostitution':
-	!if caught whoring
-		if book_response = 5: gt 'police_station', 'prostitution_hard'
-
-		if book_response = 4: gt 'police_station', 'prostitution_easy'
-
-		!Normal response
-		if book_response = 1:
-			if detecrand >= 86:
-				gt 'police_station', 'prostitution_easy'
-
-			elseif detecrand >= 16:
-				gt 'police_station', 'prostitution_norm'
-
-			else
-				gt 'police_station', 'prostitution_hard'
+				$policeQW['detective_type'] = 'hard'
+				gt 'court_arrest_events', 'interrogation_start', 'hard'
 			end
 
 		!Bribe the booking officer
-		elseif book_response = 2:
+		elseif book_response = 3:
 			if detecrand >= 31:
-				gt 'police_station', 'prostitution_easy'
+				$policeQW['detective_type'] = 'easy'
+				gt 'court_arrest_events', 'interrogation_start', 'easy'
 
 			elseif detecrand >= 11:
-				gt 'police_station', 'prostitution_norm'
+				$policeQW['detective_type'] = 'norm'
+				gt 'court_arrest_events', 'interrogation_start', 'norm'
 
 			else
-				gt 'police_station', 'prostitution_hard'
+				$policeQW['detective_type'] = 'hard'
+				gt 'court_arrest_events', 'interrogation_start', 'hard'
 			end
 
-		!Give the officer a hard time
-		elseif book_response = 3:
-			if detecrand >= 91:
-				gt 'police_station', 'prostitution_easy'
-
-			elseif detecrand >= 71:
-				gt 'police_station', 'prostitution_norm'
-
-			else
-				gt 'police_station', 'prostitution_hard'
-			end
-		end
-	end
-end
-
-
-if $ARGS[0] = 'shoplift_easy':
-!easy going detective
-	minut += 20
-	$policeQW['detective_type'] = 'easy'
-	gs 'stat'
-
-	picrand = rand(1, 2)
-	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-	'He takes a seat at the table opposite of you, "So caught stealing, eh?" he asks.'
-	'You nervously look around trying to avoid eye-contact...'
-	'He''s quick to notice your nervousness and tells you to relax, he only wants to know what happened. "Now start from the beginning..."'
-	'You take a deep breath and begin confessing your crime as the detective listens attentively.'
-
-	act 'Continue':
-		*clr & cla
-		gs 'stat'
-
-		if policeQW['toldonguard'] = 2:
-			policeQW['toldonguard'] = 1
-
-			picrand = rand(1, 2)
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-			'You tear up, "So in the end the security guard forced me to have sex with him..."'
-			'The detective looks up, "Sounds awful! I''ll send some officers over to have a talk with him and we''ll take actions against him... assuming you''re telling the truth."'
-			'You nod your head, "I am, I promise!" You say before continuing to admit to everything while the detective writes down some notes.'
-			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and as you''ve made my job easy by admitting to everything, I can get you in front of him today. Don''t worry I''ll put in a good word for you," he reassures gently.'
-
-		else
-			picrand = rand(1, 2)
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-			'As you finish you see the detective write down one last thing before looking at you, "Good, that''s everything I need."'
-			'"What will happen to me?" you ask.'
-			'"Don''t worry, it was a petty crime and you''ve been more than cooperative with me and the booking officer, so I''ll put in a good word for you to the civil court judge," he reassures you.'
-		end
-
-		act 'Return to the holding cell': gt 'police_station', 'returncell'
-	end
-end
-
-
-if $ARGS[0] = 'shoplift_norm':
-!normal detective
-	minut += 20
-	$policeQW['detective_type'] = 'norm'
-	gs 'stat'
-
-	picrand = rand(1, 2)
-	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-	'He takes a seat opposite of you, "So caught stealing, eh?" he asks.'
-	'You nervously look around trying to avoid eye-contact...'
-	'"Look here <<$pcs_firstname>>, I''m just trying to do my job so lets make this quick and easy: tell the truth and confess to everything."'
-	'You take a deep breath and begin to talk.'
-
-	act 'Continue':
-		*clr & cla
-		gs 'stat'
-
-		if policeQW['toldonguard'] = 2:
-			policeQW['toldonguard'] = 1
-
-			picrand = rand(1, 2)
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-			'You tear up, "So in the end the security guard forced me to have sex with him..."'
-			'The detective really isn''t paying attention to you as he scribbles things down, "I''ll see if there are any free officers to head over and interrogate the security guard about it."'
-			'You nod your head before continuing the confession. The officer looks bored, but he continues writing everything down.'
-			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything... we might as well take you in front of him and see how it goes," he says tiredly.'
-
-		else
-			picrand = rand(1, 2)
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-			'As you finish you confessing, the detective looks at you with an unreadable expression. "Well, you''ve pretty much confessed to everything, <<$pcs_firstname>>. It''s an open and shut case."'
-			'"What will happen to me?" you ask.'
-			'"Who knows, I''m not the civil court judge," he shrugs.'
-		end
-
-		act 'Return to the holding cell': gt 'police_station', 'returncell'
-	end
-end
-
-
-if $ARGS[0] = 'shoplift_hard':
-!rough detective
-	minut += 20
-	$policeQW['detective_type'] = 'hard'
-	gs 'stat'
-
-	picrand = rand(1, 2)
-	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-	'He takes a seat opposite of you, "So caught stealing, eh?" he asks.'
-	'You shrug your shoulders nonchalantly, not really caring what might happen.'
-	'"Don''t waste my time, <<$pcs_firstname>>," he threatens. "If you won''t take this seriously, then I won''t put in the effort to give a shit what happens to you. Now, stop fucking around and tell me everything you did."'
-	'You stutter as you begin confessing.'
-
-	act 'Continue':
-		*clr & cla
-		gs 'stat'
+		!! Flirt and comply
+		elseif book_response = 4:
+			$policeQW['detective_type'] = 'easy'
+			gt 'court_arrest_events', 'interrogation_start', 'easy'
 
-		if policeQW['toldonguard'] = 2:
-			policeQW['toldonguard'] = 1
-
-			picrand = rand(1, 2)
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-			'You tear up, "So in the end the security guard forced me to have sex with him..."'
-			'The detective''s scowl deepens as he glares at you. "You think you can just say shit like that and get away with everything? Stop lying, or I''ll throw you back in that cell with that crazy woman."'
-			'You shake your head, "I''m telling the truth! Why won''t you believe me?"'
-			'The detective lets out a loud sigh, "Sticking to your lies, huh? Fine but let me be clear: lying about a hard working security officer like this just to get away with stealing is going to make you an enemy to a lot of people around here, including the judge you''re about to see. I''m sure he''ll love to hear your swan song."'
-
-		else
-			picrand = rand(1, 2)
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation<<picrand>>.jpg"></center>'
-			'As you finish, the detective looks up at you, "Good, that''s everything I need from you. Makes my job easier, y''know."'
-			'"What will happen to me?" you ask.'
-			'"Hopefully the civil court judge will give be going for a long and hard sentence. Criminals need to be taught a lesson," he says coldly.'
+		!! Flirt then refuse
+		elseif book_response = 5:
+			$policeQW['detective_type'] = 'hard'
+			gt 'court_arrest_events', 'interrogation_start', 'hard'
 		end
-
-		act 'Return to the holding cell': gt 'police_station', 'returncell'
 	end
 end
 
 
-if $ARGS[0] = 'prostitution_easy':
-	!easy going detective
-	minut += 20
-	$policeQW['detective_type'] = 'easy'
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-	'He takes a seat opposite of you, "So caught prostituting, eh?" he asks.'
-	'You nervously look around trying to avoid eye-contact...'
-	'He''s quick to notice your nervousness and tells you to relax, he only wants to know what happened. "Now start from the beginning..."'
-	'You take a deep breath and begin confessing your crime as the detective listens attentively.'
-
-	act 'Continue':
-		*clr & cla
-		gs 'stat'
-
-		if policeQW['prostitution_bribe'] = 2:
-		!if tried to bribe the officer with sex
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'After a while listening to your story the detective clears his throat, "And this was when you tried to offer the officer sex?"'
-			'You stop and nod your head, "Yes, I... I thought it would get me off the hook..." You continue to confess while the detective writes down some notes.'
-			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him. I''ll try to put in a good word for you," he says.'
-
-		elseif policeQW['prostitution_bribe'] = 1:
-		!else if tried to bribe the officer with money
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'After a while listening to your story the detective clears his throat, "And this was when you tried to offer the officer money?"'
-			'You stop and nod your head, "Yes, I... I thought it would get me off the hook..." You continue to confess while the detective writes down some notes.'
-			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him. I''ll try to put in a good word for you," he says.'
-
-		else
-			!this will show up otherwise
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'As you finish, you see the detective write down one last thing before looking at you, "Good, that''s everything I need."'
-			'"What will happen to me?" you ask.'
-			'"Don''t worry, the civil court judge probably won''t care too much about the crime and both the booking officer and I will put in a good word for you since you made our job easy and confessed to everything. The punishment, if there is one, shouldn''t be too bad," he reassures you.'
-		end
-
-		act 'Return to the holding cell': gt 'police_station', 'returncell'
-	end
-end
-
-
-if $ARGS[0] = 'prostitution_norm':
-!normal detective
-	minut += 20
-	$policeQW['detective_type'] = 'norm'
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-	'He takes a seat opposite of you, "So caught prostituting, eh?" he asks.'
-	'You nervously look around trying to avoid eye-contact...'
-	'"Look here <<$pcs_firstname>>, I''m just trying to do my job here so how about you confess and we''ll take it from there..."'
-	'You take a deep breath and begin to talk.'
-
-	act 'Continue':
-		*clr & cla
-		gs 'stat'
-
-		if policeQW['prostitution_bribe'] = 2:
-		!if tried to bribe the officer with sex
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'You tear up, "And this is where I thought I could bribe the officer with sex..."'
-			'The detective, not really paying attention, scribbles it down, "Attempted to bribe the officer with sex," he repeats.'
-			'You nod your head before continuing to confess to the bored looking officer.'
-			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him and we''ll see how it goes..." he says tiredly.'
-
-		elseif policeQW['prostitution_bribe'] = 1:
-		!if tried to bribe the officer with money
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'You tear up, "And this is where I thought I could bribe the officer with money..."'
-			'The detective, not really paying attention, scribbles it down, "Attempted to bribe the officer with money," he repeats.'
-			'You nod your head before continuing to confess to the bored looking officer.'
-			'"Okay <<$pcs_firstname>>, we have a civil court judge for these kind of cases and since you''ve already admitted to everything, we might as well take you in front of him and we''ll see how it goes..." he says tiredly.'
-
-		else
-		!this will show up otherwise
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'As you finish, you see the detective write down one last thing before looking at you, "Well, you''ve pretty much confessed to everything, <<$pcs_firstname>>. It''s an open and shut case."'
-			'"What will happen to me?" you ask.'
-			'"Truth be told, I don''t really know what kind of sentence the judge will be going for..." he tells you.'
-		end
-
-		act 'Return to the holding cell': gt 'police_station', 'returncell'
-	end
-end
-
-
-if $ARGS[0] = 'prostitution_hard':
-!rough detective
-	minut += 20
-	$policeQW['detective_type'] = 'hard'
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-	'He takes a seat opposite of you, "So caught prostituting, eh?" he asks.'
-	'You shrug your shoulders nonchalantly not really caring what might happened.'
-	'"Don''t waste my time, <<$pcs_firstname>>," he threatens. "If you won''t take this seriously, then I won''t put in the effort to give a shit what happens to you. Now, stop fucking around and tell me everything you did."'
-	'You stutter as you begin confessing.'
-
-	act 'Continue':
-		*clr & cla
-		gs 'stat'
-
-		if policeQW['prostitution_bribe'] = 2:
-		!if tried to bribe the officer with sex
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'You tear up, "And this is where I thought I could bribe the officer with sex..."'
-			'The detective''s face twists into a scowl. "You think you can get away with this by accusing someone of rape?!"'
-			'You shake your head, "Not at all! I''ve heard from the other girls that they''ve gotten away by doing that, so I thought--"'
-			'He slams his fist down on the table. "You think you can get away with telling these kind of lies against our fine police force?! You''re in deep shit now, <<$pcs_firstname>>. I''m taking you to see the judge, and we''ll see how he likes hearing you make a mockery of our justice system."'
-
-		elseif policeQW['prostitution_bribe'] = 1:
-		!if tried to bribe the officer with money
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'You tear up, "And this is where I thought I could bribe the officer with money..."'
-			'The detective''s face twists into a scowl. "You thought you could just buy your way out of this? That''s not how the world works, your actions have consequences!"'
-			'You shake your head, "Not at all! I''ve heard from the other girls that they''ve gotten away by doing that, so I thought--"'
-			'He slams his fist down on the table. "You think you can get away with telling these kind of lies against our fine police force?! You''re in deep shit now, <<$pcs_firstname>>. I''m taking you to see the judge, and we''ll see how he likes hearing you make a mockery of our justice system."'
-
-		else
-		!this will show up otherwise
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogationpro.jpg"></center>'
-			'As you finish you see the detective looks at you, "Good just what I was looking for. You''ve confessed everything. Makes my and the prosecutors job easier."'
-			'"What will happen to me?" you ask.'
-			'"Hopefully the judge will give you a long and hard sentence." he angrily answers you.'
-		end
-
-		act 'Return to the holding cell': gt 'police_station', 'returncell'
-	end
-end
-
 
 if $ARGS[0] = 'returncell':
-	killvar 'book_response'
 	minut += 180
 	!! add the letter to be sent
 	policeQW_courtletter_dates[] = daystart + 7
@@ -1308,21 +895,7 @@ if $ARGS[0] = 'returncell':
 		*clr & cla
 		gs 'stat'
 
-		if $policeQW['crime_flag'] = 'shoplift':
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityhold.jpg"></center>'
-			'"I got caught while I was stealing stuff," you answer nonchalantly.'
-			'The woman smirks, "A petty crime, you''ll be fine."'
-			'"What are you in for?" you ask her.'
-			'She starts laughing, "I refused to bribe one of these fuckers while I was prostituting so they brought me in as a punishment."'
-			'"I see..." you answer a bit taken back by her openness.'
-
-		elseif $policeQW['crime_flag'] = 'prostitution':
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityhold.jpg"></center>'
-			'"I got caught while I was prostituting," you answer nonchalantly.'
-			'She smiles surprisingly, "You too?!" The two of you start to laugh loudly.'
-			'"I refused to bribe one of these fuckers while I was prostituting so they brought me in as a punishment," she tells you, "So where do you usually work I haven''t seen you around?" she asks.'
-			'"Yeah same thing happened to me," you answer, "Here and there. I try to keep myself away from the usual spots." you explain.'
-		end
+		gs 'court_arrest_events', 'cellmate_story'
 
 		act 'Keep talking':
 			*clr & cla
@@ -1335,7 +908,7 @@ if $ARGS[0] = 'returncell':
 			'"Go on before they change their mind," she smiles.'
 			'You say goodbye to each other and the officer leads you towards the entrance and as the police station doors open you can feel the fresh wind breeze against your face.'
 
-			act 'Walk outside':gt 'city_center'
+			act 'Walk outside': gt 'city_center'
 		end
 	end
 
@@ -1350,121 +923,9 @@ if $ARGS[0] = 'returncell':
 		'Some time passes by and the cell door opens, "<<$pcs_lastname>>, it''s your time to get released."'
 		'You quickly jump up and hurry out from the holding cell. The officer leads you towards the entrance and as the police station doors open you can feel the fresh wind breeze against your face.'
 
-		act 'Walk outside':gt 'city_center'
+		act 'Walk outside': gt 'city_center'
 	end
 end
 
 
-if $ARGS[0] = 'rape_report':
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityrec.jpg"></center>'
-	'One step after another, you trudge through town until you suddenly find yourself standing inside the police station. On the other side of a plexiglass reception, you can see several officers milling about, though none pay attention to you. Stepping up to the window, you pick up the phone and hear a buzzer sound on the other side. One of the officers picks it up without hesitation and looks at you.'
-	'"Can I help you?"'
-	'"I- I''d like t-to report a r-rape..." you stammer out. The officer nods but his expression doesn''t change in the slightest.'
-	'"Someone will come out to meet you. Follow them and they''ll take your statement in the back."'
-
-	act 'Continue':
-		cla & *clr
-		minut += rand(2,5)
-		gs'stat'
-
-		'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation1.jpg"></center>'
-		'As promised, someone comes out and takes you into their office space behind. You sit down at a shoddy looking desk and the officer takes his place on the other side of it.'
-		'"Alright ma''am, tell me what happened to you."'
-		'You explain to the officer as best as you can what happened to you while he takes notes. How you were randomly attacked, how you were violated.'
-
-		act 'Continue':
-			cla & *clr
-			minut += rand(2,5)
-			gs'stat'
-
-			'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation2.jpg"></center>'
-			'"And where did the attack occur?"'
-
-			if $loc = 'city_center':
-				'"Here, i-in the city center. But he pulled me away. I... I don''t remember how far..."'
-
-			elseif $loc = 'city_residential':
-				'"In th-the residential district. But he pulled me away. I... I don''t remember how far..."'
-
-			elseif $loc = 'city_industrial':
-				'"In th-the industrial district. But he pulled me away. I... I don''t remember how far..."'
-
-			elseif $loc = 'city_island':
-				'"On th-the island, Vasilyevsky Island. But he pulled me away. I... I don''t remember how far..."'
-
-			elseif $loc = 'city_park':
-				'"In th-the park. But he pulled me away. I... I don''t remember how far..."'
-			end
-
-			'"Can you describe what he looked like?"'
-			'The blood drains from your face. "I... I-!"'
-			'"Anything about him will be helpful. Height? Build? Hair color? Eye color?"'
-
-			act 'I... can''t...':
-				cla
-				*nl
-				'<center><img <<$set_imgh>> src="images/locations/shared/police/interrogation1.jpg"></center>'
-				'"He was... I don''t remember how tall he was... And... he was wearing a nondescript hoody, I couldn''t tell what his body type was... And-! And... I don''t know what he looks like... he was behind me during... the event..."'
-				'The officer doesn''t say anything but you see him slightly shake his head. You realize that the information you gave him is going to be of little to no use at all. A rape in town and nothing else to go off of? You might as well have told him you a pidgeon did it.'
-				*nl
-				'For a moment, you wonder how many other girls like you have sat at this desk filing a report just like this one only for it to go nowhere. You wonder if any of them were been raped by the same man who raped you...'
-
-				act'Finish the interview':
-					cla & *clr
-					minut += rand(2,5)
-					gs'stat'
-
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityrec.jpg"></center>'
-					'With that, you conclude the interview and are led to the front door.'
-					'"We''ll take this information into consideration. Again, we''re very sorry for what happened to you."'
-					'And then he walks away. Leaving you so very alone...'
-
-					act'Leave': gt 'city_center'
-				end
-
-				if cumsumvag+cumsumass > 0:
-					act 'Can I get a rape kit?':
-						cla & *clr
-						minut += 2
-						gs'stat'
-
-						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cubicle.jpg"></center>'
-						'"C-can I get a... a rape kit...?" you mumble.'
-						'The officer nods at you and pulls a small box out of a drawer in his desk.'
-						'"If you just come this way ma''am." The two of you get up and he leads you through the office area to the bathroom where he hands you the box. Looking down at it, you read the label on it.'
-						*nl
-						'<i><b>SEXUAL ASSAULT EVIDENCE COLLECTION KIT</b></i>'
-						*nl
-						'You take it from him, cradling it in your hands.'
-						'"This will let you catch him right?" The officer shrugs in return.'
-						'"It depends. DNA evidence is only useful if we can match it to the person it came from."'
-						'"So you''re saying this might not do anything?"'
-						'He shrugs again. "It''s better than nothing."'
-
-						act 'Use the rape kit':
-							cla & *clr
-							minut += 20
-							gs'stat'
-
-							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/police/cityext.jpg"></center>'
-							'Closing the bathroom door, you open the kit and you swab your insides, feeling humiliated and disgusted when it comes back covered in semen. Packaging it up, you re-open the door and hand the evidence to the officer.'
-							'With that, you conclude the interview and are led to the front door.'
-							'"We''ll take this information into consideration. Again, we''re very sorry for what happened to you." And then he walks away.'
-							*nl
-							'Leaving you alone with your thoughts and memories of your rape...'
-
-							act 'Leave': gt 'city_center'
-						end
-					end
-				end
-			end
-		end
-	end
-end
-
-
-killvar 'temp_tot_booked'
-
-
 --- police_station ---------------------------------
-

locations/sentence.qsrc

@@ -5,28 +5,10 @@
 !!adding a version if Sveta has gone to court and not paid the fine within 30 days
 
 
-!! gs 'add_fine', fine
-if $ARGS[0] = 'add_fine':
-	policeQW['legal_fine'] += ARGS[1]
-
-	temp_tot_missed = max(0, policeQW['tot_court_dates_missed'] + policeQW['tot_fines_deadlines_missed'])
-	temp_current_missed = max(0, policeQW['missed_fine_deadlines'] + policeQW['missed_court_dates'] - 1)
-
-	if policeQW['fine_deadline'] = 0:
-		policeQW['fine_deadline'] = daystart + 28 - min(14, temp_tot_missed / 4)
-	else
-		policeQW['fine_deadline'] = max(daystart, policeQW['fine_deadline']) + 14 - min(7, 2 * temp_current_missed + temp_tot_missed / 4)
-	end
-
-	killvar 'temp_current_missed'
-	killvar 'temp_tot_missed'
-end
-
-
 if $ARGS[0] = 'start':
 	*clr & cla
 	minut += 2
-	gs'stat'
+	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/court/courthouse.jpg"></center>'
 	'You are standing in the middle of the Greco-Roman inspired main courthouse for the whole city of St. Petersburg.'
@@ -74,162 +56,11 @@ if $ARGS[0] = 'hearing':
 			'You try your best to listen to some of the defenses maybe you can pick up something useful before seeing the judge but it doesn''t take long before you lose focus and dream yourself away not really focusing on what''s happening around you.'
 			'All of a sudden you''re interrupted as you hear your name being called out. Startled, you quickly let the whole room know that you''re here as you hear some people quietly let out a laugh.'
 
-			if mid($policeQW_courthearing_subjects[0], 1, 8) = 'shoplift':
-				act 'Stand in front of the judge':
-					*clr & cla
-					minut += 20
-					gs 'stat'
-
-					'<center><img <<$set_imgh>> src="images/locations/city/shared/court/judge.jpg"></center>'
-					'The judge speaks up with a stern voice, "So I see that you''re here because of you''ve gotten caught stealing."'
-					'You sink your glance in shame and nod meekly.'
-					'The judge continues on, "Let''s see what the detectives concluded during their investigation."'
-
-					if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-						'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, the detective seem to be quite positive in the report."'
-						'Suddenly, you feel a bit emboldened as the detective seems to have come through for you. You even manage to let out a little smirk.'
-						'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
-						'"Yes your honor." you respectfully answer.'
-
-!!do a check if the player missed any earlier sentencing
-						if policeQW['missed_court_dates'] > 0:
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
-							'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
-							'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
-							'You try your best to hold back the tears as you nod that you understand.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-
-						else
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
-							'You nod and take a deep breath as you await your punishment.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-						end
-
-					elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-						'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, the detective has only written neutral comments in the report."'
-						'Suddenly, you feel a bit looser as you can probably expect a lighter sentencing than usual. You let out a relieving sigh.'
-						'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
-						'"Yes your honor." you respectfully answer.'
-
-!!do a check if the player missed any earlier sentencing
-						if policeQW['missed_court_dates'] > 0:
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
-							'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
-							'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
-							'You try your best to hold back the tears as you nod that you understand.'
-							act 'Await punishment': gt 'sentence', 'punishment'
-
-						else
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
-							'You nod and take a deep breath as you await your punishment.'
-							act 'Await punishment': gt 'sentence', 'punishment'
-						end
-
-					else
-						'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, what is wrong with you? The report written by the detective is quite damaging and you will be getting a harsher sentencing."'
-						'You look nonchalantly at the judge, almost ignoring what he has to say.'
-						'"Well as you''ve already admitted being guilty, no need listening to your pleading," he sternly looks at you.'
-						'"Whatever." you shrug your shoulders.'
-
-!!do a check if the player missed any earlier sentencing
-						if policeQW['missed_court_dates'] > 0:
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
-							'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
-							'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
-							'You try your best to hold back the tears as you nod that you understand.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-
-						else
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
-							'You nod and take a deep breath as you await your punishment.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-						end
-					end
-				end
-
-			elseif mid($policeQW_courthearing_subjects[0], 1, 12) = 'prostitution':
-				act 'Stand in front of the judge':
-					*clr & cla
-					minut += 20
-					gs 'stat'
-
-					'<center><img <<$set_imgh>> src="images/locations/city/shared/court/judge.jpg"></center>'
-					'The judge speaks up with a stern voice, "So I see that you''re here because of you''ve gotten caught prostituting."'
-					'You sink your glance in shame and nod meekly.'
-					'The judge continues on, "Let''s see what the detectives concluded during their investigation."'
-
-					if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-						'Suddenly, you feel a bit emboldened as the detective seems to have come through for you. You even manage to let out a little smirk.'
-						'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
-						'"Yes your honor." you respectfully answer.'
-
-!!do a check if the player missed any earlier sentencing
-						if policeQW['missed_court_dates'] > 0:
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
-							'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
-							'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
-							'You try your best to hold back the tears as you nod that you understand.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-
-						else
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
-							'You nod and take a deep breath as you await your punishment.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-						end
-
-					elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-						'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, the detective has only written neutral comments in the report."'
-						'Suddenly, you feel a bit looser as you can probably expect a lighter sentencing than usual. You let out a relieving sigh.'
-						'"Well as you''ve already admitted being guilty I guess we don''t need to listen to your pleading," he sternly looks at you.'
-						'"Yes your honor." you respectfully answer.'
-
-!!do a check if the player missed any earlier sentencing
-						if policeQW['missed_court_dates'] > 0:
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
-							'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
-							'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
-							'You try your best to hold back the tears as you nod that you understand.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-
-						else
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
-							'You nod and take a deep breath as you await your punishment.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-						end
-
-					else
-						'The judge sits and quietly glances through the report, looking towards you from time to time, "Miss <<$pcs_lastname>>, what is wrong with you? The report written by the detective is quite damaging and you will be getting a harsher sentencing."'
-						'You look nonchalantly at the judge, almost ignoring what he has to say.'
-						'"Well as you''ve already admitted being guilty, no need listening to your pleading," he sternly looks at you.'
-						'"Whatever." you shrug your shoulders.'
-
-!!do a check if the player missed any earlier sentencing
-						if policeQW['missed_court_dates'] > 0:
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>," and just as he''s about to close it, he stops at the last page, "Wait! What is this? Have you missed a sentencing?" he inquirers.'
-							'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "Yes..." you meekly answer.'
-							'With the judges eyes piercing through you, they clear their throat, "Well then this will affect your punishment. This is a serious thing Miss <<$pcs_lastname>>. The court can''t turn a blind eye to this. We''ll have to take this into the consideration when deciding your punishment."'
-							'You try your best to hold back the tears as you nod that you understand.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-
-						else
-							'The judge continues on flipping throughout the report, "Well everything seems to check out <<$pcs_lastname>>, shall we proceed to the punishment?" the judge asks.'
-							'You nod and take a deep breath as you await your punishment.'
-
-							act 'Await punishment': gt 'sentence', 'punishment'
-						end
-					end
-				end
-			else
-				gs 'LOCA', 'hearing', 'mod_sentenceevents'
+			act 'Stand in front of the judge':
+				minut += 20
+				gs 'stat'
+
+				gt 'court_sentence_events', 'judge_start', $policeQW_courthearing_subjects[0]
 			end
 		end
 	end
@@ -245,308 +76,9 @@ if $ARGS[0] = 'punishment':
 	'You tremble a bit in fear as he keeps on talking, "With that said, I believe in a more soft approach and that you can improve yourself by learning from your mistakes."'
 	'You meekly nod and feel a bit relieved as you hear that.'
 
-	temp_fine = 0
-	if mid($policeQW_courthearing_subjects[0], 1, 8) = 'shoplift':
-		policeQW['shoplift_counter'] += 1
-
-		if policeQW['shoplift_counter'] <= 5:
-		!Stage 1
-			if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-				temp_fine += 5000 + (policeQW['shoplift_value'] / 2)
-
-				'"I hereby sentence you to a fine of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office. You''ve been lucky this time Miss <<$pcs_lastname>>." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-				temp_fine += 5000 + policeQW['shoplift_value']
-
-				'"I hereby sentence you to a fine of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 5000 + (3 * policeQW['shoplift_value'] / 2)
-
-				'"I hereby sentence you to a fine of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office. And if it happens that you appear in front of this court again, check your attitude." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['shoplift_counter'] <= 10:
-		!Stage 2
-			if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-				temp_fine += 7500 + (3 * policeQW['shoplift_value'] / 4)
-
-				'"Seems that I need to increase the fine for you to pay back to a sum of <<temp_fine>> <b>₽</b>. Hopefully, this will teach you a lesson." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-				temp_fine += 7500 + (3 * policeQW['shoplift_value'] / 2)
-
-				'"Seems that I need to increase the fine for you to pay back to a sum of <<temp_fine>> <b>₽</b>. Hopefully, this will teach you a lesson." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 7500 + (9 * policeQW['shoplift_value'] / 4)
-
-				'"I sentence you hereby to pay back a sum of <<temp_fine>> <b>₽</b> and I''ll also sentence you to some community service at the Mercy Clinic to 20 hours, hopefully this will help." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic? I see you''ve still got an attitude issue." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['shoplift_counter'] <= 15:
-		!Stage 3
-			if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-				temp_fine += 10000 + policeQW['shoplift_value']
-
-				'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-				temp_fine += 10000 + (2 * policeQW['shoplift_value'])
-
-				'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and sentence you to community service at the Mercy Clinic to 20 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 10000 + (5 * policeQW['shoplift_value'] / 2)
-
-				'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['shoplift_counter'] <= 20:
-		!Stage 4
-			if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-				temp_fine += 15000 + (5 * policeQW['shoplift_value'] / 4)
-
-				'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and sentence you to community service at the Mercy Clinic to 20 hours." the judge reads out your sentence.'
-				'"You already know what you need to do." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-				temp_fine += 15000 + (5 * policeQW['shoplift_value'] / 2)
-
-				'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
-				'"You already know what you need to do." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 15000 + (3 * policeQW['shoplift_value'])
-
-				'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to a sum of <<temp_fine>> <b>₽</b> and increase the community service at the Mercy Clinic to 80 hours." the judge reads out your sentence.'
-				'"You already know what you need to do." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['shoplift_counter'] <= 25:
-		!Stage 5
-			if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-				temp_fine += 25000 + (3 * policeQW['shoplift_value'] / 2)
-
-				'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay this fine of <<temp_fine>> <b>₽</b> and enjoy your community service at the Mercy Clinic for 40 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-				temp_fine += 25000 + (3 * policeQW['shoplift_value'])
-
-				'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of <<temp_fine>> <b>₽</b> and enjoy your community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 25000 + (4 * policeQW['shoplift_value'])
-
-				'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of <<temp_fine>> <b>₽</b> and enjoy your community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		else
-		!Stage 6
-			if mid($policeQW_courthearing_subjects[0], 10, 4) = 'easy':
-				temp_fine += 50000 + (2 * policeQW['shoplift_value'])
-
-				'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to <<temp_fine>> <b>₽</b> and the community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
-				'"You already know what you need to do. I hope you will think about your actions before stealing again." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 10, 4) = 'norm':
-				temp_fine += 50000 + (4 * policeQW['shoplift_value'])
-
-				'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to <<temp_fine>> <b>₽</b> and the community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
-				'"You already know what you need to do. I hope you will think about your actions before stealing again." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 50000 + (5 * policeQW['shoplift_value'])
-				'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to <<temp_fine>> <b>₽</b> and the community service at the Mercy Clinic for 160 hours." the judge reads out your sentence.'
-				'"You already know what you need to do. I hope you will think about your actions before stealing again." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-		end
-
-	elseif mid($policeQW_courthearing_subjects[0], 1, 12) = 'prostitution':
-		policeQW['prostitution_counter'] += 1
-
-		if policeQW['prostitution_counter'] <= 5:
-		!Stage 1
-			if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-				temp_fine += 6000
-
-				'"I hereby sentence you to a fine of 6000 <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office. You''ve been lucky this time Miss <<$pcs_lastname>>." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-				temp_fine += 7000
-
-				'"I hereby sentence you to a fine of 7000 <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 8000
-
-				'"I hereby sentence you to a fine of 8000 <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office. And if it happens that you appear in front of this court again, check your attitude." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['prostitution_counter'] <= 10:
-		!Stage 2
-			if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-				temp_fine += 9000
-
-				'"I need to increase the fine to 9000 <b>₽</b>. Hopefully, this will get you to reconsider your actions." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-				temp_fine += 10500
-
-				'"I need to increase the fine to 10,500 <b>₽</b>. Hopefully, this will get you to reconsider your actions." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 11500
-
-				'"I sentence you hereby to pay a fine of 11,500 <b>₽</b> and I''ll also add some community service at the Mercy Clinic to 20 hours, hopefully this will help you reconsider your actions." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic? I see you''ve still got an attitude issue." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['prostitution_counter'] <= 15:
-		!Stage 3
-			if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-				temp_fine += 12000
-
-				'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to 12000 <b>₽</b>." the judge reads out your sentence.'
-				'"You can pay your fine at the post office." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-				temp_fine += 14000
-
-				'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to 14000 <b>₽</b> and sentence you to community service at the Mercy Clinic for 20 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 15000
-
-				'"<<$pcs_lastname>> I see that name come up quite often here. Seems like I need to increase the fine even further to 15000 <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and by now you should know where to find the Mercy Clinic." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
+	gs 'court_sentence_events', 'punishment_start', $policeQW_courthearing_subjects[0]
 
-		elseif policeQW['prostitution_counter'] <= 20:
-		!Stage 4
-			if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-				temp_fine += 17500
-
-				'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to 17500 <b>₽</b> and sentence you to community service at the Mercy Clinic to 20 hours." the judge reads out your sentence.'
-				'"You already know what you need to do." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-				temp_fine += 20000
-
-				'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to 20000 <b>₽</b> and increase the community service at the Mercy Clinic to 40 hours." the judge reads out your sentence.'
-				'"You already know what you need to do." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 21000
-
-				'"This is starting to get out of hand, <<$pcs_lastname>>! Seems like I need to increase the fine even further to 21000 <b>₽</b> and increase the community service at the Mercy Clinic to 80 hours." the judge reads out your sentence.'
-				'"You already know what you need to do." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		elseif policeQW['prostitution_counter'] <= 25:
-		!Stage 5
-			if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-				temp_fine += 28000
-
-				'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay this fine of 28000 <b>₽</b> and enjoy your community service at the Mercy Clinic for 40 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-				temp_fine += 21000
-
-				'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of 31000 <b>₽</b> and enjoy your community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine +=32000
-
-				'"Well well, what a surprise, <<$pcs_lastname>> stands in front of me again. You''re starting to annoy me! Are you doing this on purpose? Don''t answer and instead pay the fine of 32000 <b>₽</b> and enjoy your community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
-				'"You can pay your fine at the post office and I suppose you know where to find the Mercy Clinic?" the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-
-		else
-		!Stage 6
-			if mid($policeQW_courthearing_subjects[0], 14, 4) = 'easy':
-				temp_fine += 55000
-
-				'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to 55000 <b>₽</b> and the community service at the Mercy Clinic for 80 hours." the judge reads out your sentence.'
-				'"You already know what you need to do. I hope you will think about your actions before prostituting yourself again." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			elseif mid($policeQW_courthearing_subjects[0], 14, 4) = 'norm':
-				temp_fine += 57500
-
-				'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to 57500 <b>₽</b> and the community service at the Mercy Clinic for 120 hours." the judge reads out your sentence.'
-				'"You already know what you need to do. I hope you will think about your actions before prostituting yourself again." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-
-			else
-				temp_fine += 60000
-
-				'The judge sighs, "Here we are again <<$pcs_lastname>>! I''m getting tired of being lenient so you''re getting the maximum sentence. The fine will be set to 60000 <b>₽</b> and the community service at the Mercy Clinic for 160 hours." the judge reads out your sentence.'
-				'"You already know what you need to do. I hope you will think about your actions before prostituting yourself again." the judge finishes.'
-				'You nod and quickly make your way out of courtroom.'
-			end
-		end
-	else
-		gs 'LOCA', 'punishment', 'mod_sentenceevents'
-	end
-
-	gs 'sentence', 'add_fine', temp_fine
 	policeQW['fine_deadline'] += 14
-	killvar 'temp_fine'
 	killvar 'policeQW_courthearing_dates', 0
 	killvar '$policeQW_courthearing_subjects', 0
 	act 'Leave the court': gt 'city_center', 'mom_check'
@@ -589,7 +121,7 @@ if $ARGS[0] = 'police_arrest1':
 	'You are taken out of holding and over to the courthouse to await your hearing. The judge reviews your case, "It seems you have missed your hearings, Miss <<$pcs_lastname>>, what do you have to say for yourself?"'
 	'You begin to look around, trying to come up with an excuse. But in the end you decide it''s best to admit, "I have no excuse your honor." you meekly answer.'
 
-	$policeQW_courthearing_subjects[] = mid($policeQW_courtletter_subjects[0], 14)
+	$policeQW_courthearing_subjects[] = $mid($policeQW_courtletter_subjects[0], 14)
 	policeQW_courthearing_dates[] = -1
 	gs 'shortgs', 'coupled_array_sort', 'policeQW_courthearing_dates', '$policeQW_courthearing_subjects'
 
@@ -635,4 +167,3 @@ end
 
 
 --- sentence ---------------------------------
-