[added] timer to prevent the interview event from firing too often

locations/foto.qsrc

@@ -146,9 +146,9 @@ if $ARGS[0] = 'studio':
 	*clr & cla
 	killvar '$modelopt'
 
-	if special_model < min(city_modelling, 700) and modelfoto_topless > 0 and hour < 15 and fame_model_event < daystart:gt 'foto_events','fame'
-	if special_skill_model < pcs_mdlng and modelfoto_nip > 0 and skill_model_event < daystart:gt 'foto_events','skill'
-	if foto['documentary'] >= 95 and $pantyworntype = 'none':gt'foto_model_documentary','1st_documentary'
+	if special_model < min(city_modelling, 700) and modelfoto_topless > 0 and hour < 15 and fame_model_event ! daystart:gt 'foto_events','fame'
+	if special_skill_model < pcs_mdlng and modelfoto_nip > 0 and skill_model_event ! daystart:gt 'foto_events','skill'
+	if foto['documentary'] >= 95 and $pantyworntype = 'none' and modelfoto >= foto['documentary_timer']:gt'foto_model_documentary','1st_documentary'
 	minut += 5
 	gs 'stat'
 	gs 'themes', 'indoors'

locations/foto_model_documentary.qsrc

@@ -151,6 +151,7 @@ if $ARGS[0] = '1st_documentary':
 end
 
 if $ARGS[0] = 'documentary_1':
+	foto['documentary_timer'] = modelfoto + 6
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 	'You head over to where you were directed and see a group of people standing around several video cameras set up with lights shining on an empty set.'