[changed] rewrite of `flash.qsrc` reduces repeated content and cleans up variables

locations/flash.qsrc

@@ -8,528 +8,240 @@
 !!Available options as follows
 !![type] - bra, butt, full, panties, pussy, tits
 !![location] - indoors, outdoors
-!![option] - Noting or 0 will clear the screen and give a standard text and randome picture, if you set $flash_image to image string this image will be used instead of a random one. 
-!! - 1 will only advance time and set the diferent variables but not clear the screen, print text or picture. - 2 will add the variabels an advance time and set the random picture, but not clear screen and print text. 
+!![option]
+!!		- Nothing or 0 will clear the screen and give a standard text and randome picture, if you set $flash_image to image string this image will be used instead of a random one. 
+!!		- 1 will only advance time and set the diferent variables but not clear the screen, print text or picture.
+!!		- 2 will add the variabels an advance time and set the random picture, but not clear screen and print text.
 !!eg. gs 'flash', 'tits', 'outdoors', 15, 0
 !!There is no continue action so you must add this as required
 !!You should add checks for underwear before allowing the player to flash them but a non-event contingency is included
 
-if $ARGS[0] = 'flashtotals':
-	dress_ind_bra = 3
-	dress_ind_tits = 12
-	dress_ind_panties = 4
-	dress_ind_pussy = 8
-	dress_ind_pussy_hairy = 9
-	dress_ind_pantyrear = 12
-	dress_ind_butt = 7
-	dress_ind_full = 5
-	dress_ind_full_hairy = 7
+if $ARGS[0] = 'panties': $ARGS[0] = 'panty'
+if $ARGS[0] = 'panties_rear': $ARGS[0] = 'pantyrear'
+if $ARGS[0] = 'butt' and analplugin = 1: $ARGS[0] = 'butt_plug'
+
+
+if $ARGS[0] = 'get_image' and $flash_image = '':
+	flashVars['dress_ind_bra'] = 3
+	flashVars['dress_ind_tits'] = 12
+	flashVars['dress_ind_panty'] = 4
+	flashVars['dress_ind_pantyrear'] = 12
+	flashVars['dress_ind_pussy'] = 8
+	flashVars['dress_ind_pussy_hairy'] = 9
+	flashVars['dress_ind_butt'] = 7
+	flashVars['dress_ind_full'] = 5
+	flashVars['dress_ind_full_hairy'] = 7
 	
-	dress_out_bra = 4
-	dress_out_tits = 20
-	dress_out_panties = 18
-	dress_out_pussy = 19
-	dress_out_pussy_hairy = 9
-	dress_out_pantyrear = 8
-	dress_out_butt = 9
-	dress_out_butt_plug = 8
-	dress_out_full = 13
-	dress_out_full_hairy = 11
+	flashVars['dress_out_bra'] = 4
+	flashVars['dress_out_tits'] = 20
+	flashVars['dress_out_panty'] = 18
+	flashVars['dress_out_pantyrear'] = 8
+	flashVars['dress_out_pussy'] = 19
+	flashVars['dress_out_pussy_hairy'] = 9
+	flashVars['dress_out_butt'] = 9
+	flashVars['dress_out_butt_plug'] = 8
+	flashVars['dress_out_full'] = 13
+	flashVars['dress_out_full_hairy'] = 11
 	
-	pants_ind_bra = 6
-	pants_ind_tits = 19
-	pants_ind_panties = 1
-	pants_ind_pussy = 4
-	pants_ind_pussy_hairy = 3
-	pants_ind_pantyrear = 1
-	pants_ind_butt = 6
-	pants_ind_full = 1
-	pants_ind_full_hairy = 1
+	flashVars['pants_ind_bra'] = 6
+	flashVars['pants_ind_tits'] = 19
+	flashVars['pants_ind_panty'] = 1
+	flashVars['pants_ind_pantyrear'] = 1
+	flashVars['pants_ind_pussy'] = 4
+	flashVars['pants_ind_pussy_hairy'] = 3
+	flashVars['pants_ind_butt'] = 6
+	flashVars['pants_ind_full'] = 1
+	flashVars['pants_ind_full_hairy'] = 1
 	
-	pants_out_bra = 5
-	pants_out_tits = 19
-	pants_out_panties = 6
-	pants_out_pussy = 11
-	pants_out_pussy_hairy = 8
-	pants_out_pantyrear = 10
-	pants_out_butt = 19
-	pants_out_butt_plug = 6
-	pants_out_full = 9
-	pants_out_full_hairy = 6
+	flashVars['pants_out_bra'] = 5
+	flashVars['pants_out_tits'] = 19
+	flashVars['pants_out_panty'] = 6
+	flashVars['pants_out_pantyrear'] = 10
+	flashVars['pants_out_pussy'] = 11
+	flashVars['pants_out_pussy_hairy'] = 8
+	flashVars['pants_out_butt'] = 19
+	flashVars['pants_out_butt_plug'] = 6
+	flashVars['pants_out_full'] = 9
+	flashVars['pants_out_full_hairy'] = 6
+
+
+	$flash_image = 'images/pc/activities/flashing/'
+	$temp_id_text = ''
+
+	if PCloSkirt > 0:
+		$temp_id_text += 'dress_'
+		$flash_image += 'dress/'
+	else
+		$temp_id_text += 'pants_'
+		$flash_image += 'pants/'
+	end
+	if $ARGS[2] = 'inside' or $ARGS[2] = 'indoors':
+		$temp_id_text += 'ins_'
+		$flash_image += 'inside/'
+	else
+		$temp_id_text += 'out_'
+		$flash_image += 'outside/'
+	end
+	$temp_id_text += $ARGS[1]
+	$flash_image += $ARGS[1]
+	$flash_image += '/'
+
+	if ($ARGS[1] = 'pussy' or $ARGS[1] = 'full') and pcs_pubes > 20:
+		$temp_id_text += '_hairy'
+		$flash_image += 'hairy'
+	end
+
+	flashVars['rand'] = rand(1, flashVars[$temp_id_text])
+	$flash_image += flashVars['rand']
+	$flashVars['image'] = $flash_image
+
+	killvar 'temp_id_text'
 end
 
+
+
 if $ARGS[0] = 'bra':
 	if Exhibitionist_lvl < 1 or pcs_inhib < 40: gs 'flash', 'exhibitionism', 1
 	gs 'arousal', 'flashlite', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/bra/' + rand(1,dress_ind_bra) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bra clad breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/bra/' + rand(1,dress_out_bra) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bra clad breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/bra/' + rand(1,pants_ind_bra) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bra clad breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/bra/' + rand(1,pants_out_bra) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bra clad breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'You glance around to see who all is in the area, then you pull up your top and expose your bra clad breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You pull your top back down, feeling the thrill of excitement running down your spine.'
+
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/bra/' + rand(1,dress_ind_bra) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/bra/' + rand(1,dress_out_bra) + '.jpg"></center>'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/bra/' + rand(1,pants_ind_bra) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/bra/' + rand(1,pants_out_bra) + '.jpg"></center>'
-			end
-		end	
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
 if $ARGS[0] = 'tits':
 	gs 'flash', 'exhibitionism', 1
 	gs 'arousal', 'flashlite', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/tits/' + rand(1,dress_ind_tits) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bare breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/tits/' + rand(1,dress_out_tits) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bare breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/tits/' + rand(1,pants_ind_tits) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bare breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/tits/' + rand(1,pants_out_tits) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your top and expose your bare breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your top back down, feeling the thrill of excitement running down your spine.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'You glance around to see who all is in the area, then you pull up your top and expose your bare breasts to the world. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You pull your top back down, feeling the thrill of excitement running down your spine.'
+		$flash_text
+
+		$flash_text
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/tits/' + rand(1,dress_ind_tits) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/tits/' + rand(1,dress_out_tits) + '.jpg"></center>'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/tits/' + rand(1,pants_ind_tits) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/tits/' + rand(1,pants_out_tits) + '.jpg"></center>'
-			end
-		end	
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
-if $ARGS[0] = 'panties':
+if $ARGS[0] = 'panty' or $ARGS[0] = 'panties':
 	gs 'flash', 'exhibitionism', 2
 	gs 'arousal', 'flash', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/panty/' + rand(1,dress_ind_panties) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you lift the front of your skirt to show off your panties. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back and place, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/panty/' + rand(1,dress_out_panties) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you lift the front of your skirt to show off your panties. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back and place, feeling the thrill of excitement running down your spine.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/panty/' + rand(1,pants_ind_panties) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull down the front of your pants to show off your panties. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/panty/' + rand(1,pants_out_panties) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull down the front of your pants to show off your panties. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'You glance around to see who all is in the area, then you ' + iif(PCloSkirt > 0, 'lift the front of your skirt', 'pull down the front of your pants') + ' to show off your panties. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You ' + iif(PCloSkirt > 0, 'lower the skirt back in place', 'pull your pants back up') + ', feeling the thrill of excitement running down your spine.'
+
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/panty/' + rand(1,dress_ind_panties) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/panty/' + rand(1,dress_out_panties) + '.jpg"></center>'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/panty/' + rand(1,pants_ind_panties) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/panty/' + rand(1,pants_out_panties) + '.jpg"></center>'
-			end
-		end	
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
-if $ARGS[0] = 'pussy':
-	gs 'flash', 'exhibitionism', 3
+if $ARGS[0] = 'pantyrear' or $ARGS[0] = 'panties_rear':
+	gs 'flash', 'exhibitionism', 2
 	gs 'arousal', 'flash', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pussy/' + rand(1,dress_ind_pussy) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pussy/hairy' + rand(1,dress_ind_pussy_hairy) + '.jpg"></center>'
-					end
-				end
-				'You glance around to see who all is in the area, then you pull up the front of your skirt to show off your pussy. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back and place, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/pussy/' + rand(1,dress_out_pussy) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/pussy/hairy' + rand(1,dress_out_pussy_hairy) + '.jpg"></center>'
-					end
-				end
-				'You glance around to see who all is in the area, then you pull up the front of your skirt to show off your pussy. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back and place, feeling the thrill of excitement running down your spine.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pussy/' + rand(1,pants_ind_pussy) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pussy/hairy' + rand(1,pants_ind_pussy_hairy) + '.jpg"></center>'
-					end
-				end
-				'You glance around to see who all is in the area, then you pull down the front of your pants to show off your pussy. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/pussy/' + rand(1,pants_out_pussy) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/pussy/hairy' + rand(1,pants_out_pussy_hairy) + '.jpg"></center>'
-					end
-				end
-				'You glance around to see who all is in the area, then you pull down the front of your pants to show off your pussy. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'You glance around to see who all is in the area, then you pull ' + iif(PCloSkirt > 0, 'up your skirt', 'down the back of your pants') + ' to show off your panty clad butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You ' + iif(PCloSkirt > 0, 'lower the skirt back in place', 'pull your pants back up') + ', feeling the thrill of excitement running down your spine.'
+
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pussy/' + rand(1,pants_ind_pussy) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pussy/hairy' + rand(1,pants_ind_pussy_hairy) + '.jpg"></center>'
-				end
-			else
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/pussy/' + rand(1,pants_out_pussy) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/pussy/hairy' + rand(1,pants_out_pussy_hairy) + '.jpg"></center>'
-				end
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pussy/' + rand(1,pants_ind_pussy) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pussy/hairy' + rand(1,pants_ind_pussy_hairy) + '.jpg"></center>'
-				end
-			else
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/pussy/' + rand(1,pants_out_pussy) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/pussy/hairy' + rand(1,pants_out_pussy_hairy) + '.jpg"></center>'
-				end
-			end
-		end	
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
-if $ARGS[0] = 'panties_rear':
-	gs 'flash', 'exhibitionism', 2
+if $ARGS[0] = 'pussy':
+	gs 'flash', 'exhibitionism', 3
 	gs 'arousal', 'flash', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pantyrear/' + rand(1,dress_ind_pantyrear) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your skirt to show off your pantied butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back and place, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/pantyrear/' + rand(1,dress_out_pantyrear) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up your skirt to show off your panties. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back and place, feeling the thrill of excitement running down your spine.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pantyrear/' + rand(1,pants_ind_pantyrear) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull down the back of your pants to show off your panty clad butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/pantyrear/' + rand(1,pants_out_pantyrear) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull down the back of your pants to show off your panty clad butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'You glance around to see who all is in the area, then you pull ' + iif(PCloSkirt > 0, 'up the front of your skirt', 'down the front of your pants') + ' to show off your pussy. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You ' + iif(PCloSkirt > 0, 'lower the skirt back in place', 'pull your pants back up') + ', feeling the thrill of excitement running down your spine.'
+
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pantyrear/' + rand(1,dress_ind_pantyrear) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/pantyrear/' + rand(1,dress_out_pantyrear) + '.jpg"></center>'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pantyrear/' + rand(1,pants_ind_pantyrear) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/pantyrear/' + rand(1,pants_out_pantyrear) + '.jpg"></center>'
-			end
-		end	
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
-if $ARGS[0] = 'butt':
+
+
+if $ARGS[0] = 'butt' or $ARGS[0] = 'butt_plug':
 	gs 'flash', 'exhibitionism', 2
 	gs 'arousal', 'flash', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/butt/' + rand(1,dress_ind_butt) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up the back of your skirt to show off your butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back in place, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				elseif analplugin = 1:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/butt_plug/' + rand(1,dress_out_butt_plug) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/butt/' + rand(1,dress_out_butt) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull up the back of your skirt to show off your butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You lower the skirt back in place, feeling the thrill of excitement running down your spine.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/butt/' + rand(1,pants_ind_butt) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull down the back of your pants to show off your butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				elseif analplugin = 1:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/butt_plug/' + rand(1,pants_out_butt_plug) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/butt/' + rand(1,pants_out_butt) + '.jpg"></center>'
-				end
-				'You glance around to see who all is in the area, then you pull down the back of your pants to show off your butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust. You pull your pants back up, feeling the thrill of excitement running down your spine.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'You glance around to see who all is in the area, then you pull ' + iif(PCloSkirt > 0, 'up the back of your skirt', 'down the back of your pants') + ' to show off your butt. Most people don''t notice but a few do, some smile, others frown or shake their head in disgust.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You ' + iif(PCloSkirt > 0, 'lower the skirt back in place', 'pull your pants back up') + ', feeling the thrill of excitement running down your spine.'
+
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/butt/' + rand(1,dress_ind_butt) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/butt/' + rand(1,dress_out_butt) + '.jpg"></center>'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/butt/' + rand(1,pants_ind_butt) + '.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/butt/' + rand(1,pants_out_butt) + '.jpg"></center>'
-			end
-		end	
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
 if $ARGS[0] = 'full':
 	gs 'flash', 'exhibitionism', 3
 	gs 'arousal', 'flash', ARGS[2]
 	gs 'arousal', 'end'
-	gs 'flash', 'flashtotals'
+	gs 'flash', 'get_image', $ARGS[0], $ARGS[1]
 	if ARGS[3] < 1:
 		*clr
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/full/' + rand(1,dress_ind_full) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/full/hairy' + rand(1,dress_ind_full_hairy) + '.jpg"></center>'
-					end
-				end
-				'Making sure there are no children around and it''s not too busy you lift your skirt and top to expose both your pussy and breasts. Most people who see you are shocked but some look at you admiringly. You quickly cover up again enjoying a buzz of excitement.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/full/' + rand(1,dress_out_full) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/full/hairy' + rand(1,dress_out_full_hairy) + '.jpg"></center>'
-					end
-				end
-				'Making sure there are no children around and it''s not too busy you lift your skirt and top to expose both your pussy and breasts. Most people who see you are shocked but some look at you admiringly. You quickly cover up again enjoying a buzz of excitement.'
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/full/' + rand(1,pants_ind_full) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/full/hairy' + rand(1,pants_ind_full_hairy) + '.jpg"></center>'
-					end
-				end
-				'Making sure there are no children around and it''s not too busy you lower your pants and lift your top to expose both your pussy and breasts. Most people who see you are shocked but some look at you admiringly. You quickly cover up again enjoying a buzz of excitement.'
-			else
-				if $flash_image ! '':
-					'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
-				else
-					if pcs_pubes <= 20:
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/full/' + rand(1,pants_out_full) + '.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/full/hairy' + rand(1,pants_out_full_hairy) + '.jpg"></center>'
-					end
-				end
-				'Making sure there are no children around and it''s not too busy you lower your pants and lift your top to expose both your pussy and breasts. Most people who see you are shocked but some look at you admiringly. You quickly cover up again enjoying a buzz of excitement.'
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
+		'Making sure there are no children around and it''s not too busy you ' + iif(PCloSkirt > 0, 'lift your skirt and top', 'lower your pants and lift your top') + ' to expose both your pussy and breasts. Most people who see you are shocked but some look at you admiringly.'
+		gs 'blackmailer', 'init_check', $ARGS[0], $ARGS[1]
+		'You quickly cover up again enjoying a buzz of excitement.'
+
 		$flash_image = ''
 	elseif ARGS[3] = 2:
-		if PCloSkirt > 0:
-			if $ARGS[1] = 'inside':
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/full/' + rand(1,dress_ind_full) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/full/hairy' + rand(1,dress_ind_full_hairy) + '.jpg"></center>'
-				end
-			else
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/full/' + rand(1,dress_out_full) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/outside/full/hairy' + rand(1,dress_out_full_hairy) + '.jpg"></center>'
-				end
-			end
-		else
-			if $ARGS[1] = 'inside':
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/full/' + rand(1,pants_ind_full) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/full/hairy' + rand(1,pants_ind_full_hairy) + '.jpg"></center>'
-				end	
-			else
-				if pcs_pubes <= 20:
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/full/' + rand(1,pants_out_full) + '.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/outside/full/hairy' + rand(1,pants_out_full_hairy) + '.jpg"></center>'
-				end
-			end
-		end
+		'<center><img <<$set_imgh>> src="<<$flash_image>>.jpg"></center>'
 	end
+
+	if ARGS[3] ! 1: killvar 'flashVars'
 end
 
 !!For us only when Sveta chooses to flash

locations/saveupdater.qsrc

@@ -2761,6 +2761,52 @@ if temp_current_save_version < 00090300:
 	if LocalRun		> 0:	runnerQW['pav_stage']		= LocalRun		& killvar 'LocalRun'
 	if swinbeg		> 0:	runnerQW['pav_wins1']		= swinbeg		& killvar 'swinbeg'
 	if swinbeggor	> 0:	runnerQW['pav_wins2']		= swinbeggor	& killvar 'swinbeggor'
+ 
+ 
+	!! Flash variable migration to singular array (which is killvared on site)
+	if dress_ind_bra			> 0:	killvar 'dress_ind_bra'
+	if dress_ind_tits			> 0:	killvar 'dress_ind_tits'
+	if dress_ind_panties		> 0:	killvar 'dress_ind_panties'
+	if dress_ind_pussy			> 0:	killvar 'dress_ind_pussy'
+	if dress_ind_pussy_hairy	> 0:	killvar 'dress_ind_pussy_hairy'
+	if dress_ind_pantyrear		> 0:	killvar 'dress_ind_pantyrear'
+	if dress_ind_butt			> 0:	killvar 'dress_ind_butt'
+	if dress_ind_full			> 0:	killvar 'dress_ind_full'
+	if dress_ind_full_hairy		> 0:	killvar 'dress_ind_full_hairy'
+
+	if dress_out_bra			> 0:	killvar 'dress_out_bra'
+	if dress_out_tits			> 0:	killvar 'dress_out_tits'
+	if dress_out_panties		> 0:	killvar 'dress_out_panties'
+	if dress_out_pussy			> 0:	killvar 'dress_out_pussy'
+	if dress_out_pussy_hairy	> 0:	killvar 'dress_out_pussy_hairy'
+	if dress_out_pantyrear		> 0:	killvar 'dress_out_pantyrear'
+	if dress_out_butt			> 0:	killvar 'dress_out_butt'
+	if dress_out_butt_plug		> 0:	killvar 'dress_out_butt_plug'
+	if dress_out_full			> 0:	killvar 'dress_out_full'
+	if dress_out_full_hairy		> 0:	killvar 'dress_out_full_hairy'
+
+	if pants_ind_bra			> 0:	killvar 'pants_ind_bra'
+	if pants_ind_tits			> 0:	killvar 'pants_ind_tits'
+	if pants_ind_panties		> 0:	killvar 'pants_ind_panties'
+	if pants_ind_pussy			> 0:	killvar 'pants_ind_pussy'
+	if pants_ind_pussy_hairy	> 0:	killvar 'pants_ind_pussy_hairy'
+	if pants_ind_pantyrear		> 0:	killvar 'pants_ind_pantyrear'
+	if pants_ind_butt			> 0:	killvar 'pants_ind_butt'
+	if pants_ind_full			> 0:	killvar 'pants_ind_full'
+	if pants_ind_full_hairy		> 0:	killvar 'pants_ind_full_hairy'
+
+	if pants_out_bra			> 0:	killvar 'pants_out_bra'
+	if pants_out_tits			> 0:	killvar 'pants_out_tits'
+	if pants_out_panties		> 0:	killvar 'pants_out_panties'
+	if pants_out_pussy			> 0:	killvar 'pants_out_pussy'
+	if pants_out_pussy_hairy	> 0:	killvar 'pants_out_pussy_hairy'
+	if pants_out_pantyrear		> 0:	killvar 'pants_out_pantyrear'
+	if pants_out_butt			> 0:	killvar 'pants_out_butt'
+	if pants_out_butt_plug		> 0:	killvar 'pants_out_butt_plug'
+	if pants_out_full			> 0:	killvar 'pants_out_full'
+	if pants_out_full_hairy		> 0:	killvar 'pants_out_full_hairy'
+
+
 
 end