[added] cheat to block random robbers, rapist and hijackers in the streets

locations/Cheatmenu_din.qsrc

@@ -418,6 +418,16 @@ $cheatmenu['random_bf_gf'] = {
 	end
 }
 
+$cheatmenu['street_events'] = {
+	if cheat_street_events = 0:
+		cheat_street_events = 1
+		dynamic $cheatmenu['permanent']
+	elseif cheat_street_events = 1:
+		cheat_street_events = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
 $cheatmenu['permanent'] = {
 	gs'stat'
 	*clr & cla
@@ -474,6 +484,8 @@ $cheatmenu['permanent'] = {
 	if cheatTime = 1:$cheatTime = 'Enabled'
 	if random_bf_gf_cheat = 0: $random_bf_gf_cheat = 'Enabled'
 	if random_bf_gf_cheat = 1: $random_bf_gf_cheat = 'Disabled'
+	if cheat_street_events = 0: $cheat_street_events = 'Enabled'
+	if cheat_street_events = 1: $cheat_street_events = 'Disabled'
 
 	'<center><h1>Cheat Menu - Recurrent Cheats</h1></center>'
 	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
@@ -494,7 +506,11 @@ $cheatmenu['permanent'] = {
 	else
 		'Allow any clothing for school: <a href="exec:Enable_sforma = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
 	end
+	
+	*nl
+	
 	'Random boyfriend/girlfriend events: <a href="exec:dynamic $cheatmenu[''random_bf_gf'']"><<$random_bf_gf_cheat>></a>'
+	'Random rapist/robbers in the streets: <a href="exec:dynamic $cheatmenu[''street_events'']"><<$cheat_street_events>></a>'
 
 	*nl
 

locations/street_event.qsrc

@@ -227,7 +227,7 @@ if $ARGS[1] = 'main':
 		end
 	end
 
-	if streetrand < streetev_rape and hour <= 3 and streetev_day ! daystart:
+	if streetrand < streetev_rape and hour <= 3 and streetev_day ! daystart and cheat_street_events = 0:
 		*clr & cla
 		menu_off = 1
 		streetev_day = daystart
@@ -389,7 +389,7 @@ if $ARGS[1] = 'main':
 	end
 
 	streetrand = rand(0, 100)
-	if streetrand < streetev_rob and daystart >= 10 and (hour < 6 or hour >= 20) and streetev_day ! daystart and bag = 1 and streetev_rob_day ! daystart:
+	if streetrand < streetev_rob and daystart >= 10 and (hour < 6 or hour >= 20) and streetev_day ! daystart and bag = 1 and streetev_rob_day ! daystart and cheat_street_events = 0:
 		*clr & cla
 		menu_off = 1
 		streetev_day = daystart
@@ -504,15 +504,13 @@ if $ARGS[1] = 'main':
 
 	streetrand = rand(0, 100)
 
-	if streetrand < streetev_hijack and daystart >= 10 and hour >= 6 and hour < 20 and streetev_day ! daystart and bag = 1 and streetev_hijack_day ! daystart:
+	if streetrand < streetev_hijack and daystart >= 10 and hour >= 6 and hour < 20 and streetev_day ! daystart and bag = 1 and streetev_hijack_day ! daystart and cheat_street_events = 0:
 		*clr & cla
 		menu_off = 1
 		gs'stat'
 		streetev_day = daystart
 		'<<$streetev_title>>'
 		'<center><img src="images/locations/shared/street/pursesnatch.jpg"></center>'
-		'As you are walking down the street minding your own business, you are suddenly jerked sideways and nearly pulled off your feet. As you stumble to regain your balance you realize a man has just snatched your purse from you and is running away with it.'
-		
 		if rand(0,300) < (pcs_agil + pcs_stren):
 			'As you are walking down the street minding your own business, you are suddenly jerked sideways and nearly pulled off your feet. You quickly regain your balance and instinctively your fingers hold your purse tighter as you feel something tugging on it. A man is trying to snatch your purse, but he runs away, when you don''t let go of it immediately.'
 			act 'Continue': gt $loc