[added] Option to set some potential homes as your default added to those homes as actions

locations/HotelRoom.qsrc

@@ -35,6 +35,9 @@ if $ARGS[0] = 'normal':
 	dynamic $fatdel
 	dynamic $lekarstvo
 	dynamic $vitamin
+	if curr_home ! 6:
+		act 'Set this hotel room as your main home':gs 'set_home', 6 & gt 'HotelRoom', 'normal'
+	end
 end
 
 if $ARGS[0] = 'better':
@@ -71,6 +74,9 @@ if $ARGS[0] = 'better':
 	dynamic $fatdel
 	dynamic $lekarstvo
 	dynamic $vitamin
+	if curr_home ! 6:
+		act 'Set this hotel room as your main home':gs 'set_home', 6 & gt 'HotelRoom', 'better'
+	end
 end
 
 if $ARGS[0] = 'best':
@@ -108,6 +114,9 @@ if $ARGS[0] = 'best':
 	dynamic $fatdel
 	dynamic $lekarstvo
 	dynamic $vitamin
+	if curr_home ! 6:
+		act 'Set this hotel room as your main home':gs 'set_home', 6 & gt 'HotelRoom', 'best'
+	end
 end
 
 if $ARGS[0] = 'shower1':

locations/city_mansion_residence_1.qsrc

@@ -55,6 +55,9 @@ if $ARGS[0] = 'yfoyer':
 	end
 	if bassMansion = 1:act 'Go to your pool': minut += 1 & gt 'city_mansion_residence_3', 'ypool'
 	if banaMansion >= 1:act 'Go to your sauna': minut += 1 & gt 'city_mansion_residence_3', 'ysauna'
+	if curr_home ! 5:
+		act 'Set this apartment as your main home':gs 'set_home', 5 & gt 'city_mansion_residence_1', 'yfoyer'
+	end
 end
 
 if $ARGS[0] = 'ybedroom':

locations/dachain.qsrc

@@ -180,6 +180,10 @@ if $args[0] = '':
 			gt 'dachain'
 		end
 	end
+
+	if curr_home ! 3:
+		act 'Set this cottage as your main home':gs 'set_home', 3 & gt 'dachain'
+	end
 end
 
 if $args[0] = 'dachakit':

locations/dom_gor.qsrc

@@ -185,5 +185,9 @@ act 'Go out onto the street':
 
 end
 
+if curr_home ! 10:
+	act 'Set the this small room as your main home':gs 'set_home', 10 & gt 'dom_gor'
+end
+
 --- dom_gor ---------------------------------
 

locations/dorm.qsrc

@@ -679,8 +679,7 @@ if $ARGS[0] = 'dorm_room':
 		if ARRSIZE('class_list_institution') >= i: jump 'study_loop'
 		killvar 'i'
 	end
-	
-	
+
 	act 'Read the course literature (2:00)':
 		cla
 		menu_off = 1
@@ -694,8 +693,12 @@ if $ARGS[0] = 'dorm_room':
 
 	gs 'unicoursework', 'start', $loc, $loc_arg
 
-dynamic $wearpan
-dynamic $removepan
+	dynamic $wearpan
+	dynamic $removepan
+
+	if curr_home ! 11:
+		act 'Set the this dorm room as your main home':gs 'set_home', 11 & gt 'dorm', 'dorm_room'
+	end
 end
 
 if $args[0] = 'studying':

locations/korr.qsrc

@@ -54,6 +54,9 @@ act 'Go to the bedroom':gt 'bedr'
 act 'Go to the bathroom':gt 'vanr'
 act 'Go to the kitchen':gt 'kuhr'
 act 'Go to the living room':gt 'sitr'
+if curr_home ! 1:
+	act 'Set this apartment as your main home':gs 'set_home', 1 & gt 'korr'
+end
 
 popolaini = 0
 saunaYouRoom = 0

locations/korr2x.qsrc

@@ -91,6 +91,11 @@ if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
 		end
 	end
 end
+
+if curr_home ! 4:
+	act 'Set this apartment as your main home':gs 'set_home', 4 & gt 'korr2x'
+end
+
 if BurgerQW['IlyQW']  = 3 and hour >= 9 and hour <= 20:
 	cls
 	BurgerQW['IlyQW']  = 4

locations/korrPar.qsrc

@@ -152,6 +152,10 @@ if NatbelQW['QWstage'] >= 4 and week < 6 and (hour = 6 or hour = 7) and kanikuli
 	act 'Go to Natasha''s apartment':gt 'natbelEv', 'carrybooks'
 end
 
+if curr_home ! 2:
+	act 'Set this apartment as your main home':gs 'set_home', 2 & gt 'korrPar'
+end
+
 $korrParMomHeader = '<center><h1><font color="maroon"><<$npc_nickname[''A29'']>></font></h1></center><center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center><br />'
 
 if hour >= 16 and hour <= 20 and indorf = 0:

locations/nichBedroomServant.qsrc

@@ -147,6 +147,10 @@ if $ARGS[0] = '' or $ARGS[0] = 'start' or $ARGS[0] = 'return':
 		gs 'nichChore','inspect','servant'
 	
 	end
+
+	if curr_home ! 7:
+		act 'Set the Nicholas house as your main home':gs 'set_home', 7 & gt 'nichBedroomServant'
+	end
 	
 elseif $ARGS[0] = 'evtBodyguardIntim1':
 	*clr & cla

locations/uni_admin.qsrc

@@ -93,6 +93,7 @@ if $ARGS[0] = 'enrollment':
 					university['student'] = 1
 					$university['enrolled_in']= 'teaching_studies'
 					university['enrolled_in_semester'] = 1
+					home_owned[11] = 1
 					!!This creates the classes for the first semester of the teaching program to be used by the grade system, and gives the player a starting grade value (which is a failing grade, the player have to study if they want to pass)
 					gs 'grades', 'createclass', 'uni_teaching_studies_semester_1', 'general education', 3, 2, 'no', 'no', 1, 12
 					gs 'grades', 'createclass', 'uni_teaching_studies_semester_1', 'teaching methods', 3, 2, 'no', 'no', 1, 12