Created traits file and added cumeater as the first trait. Just proof of concept atm but will help with futher trait creation.

glife.qproj

@@ -79,6 +79,7 @@
       <Location name="stat_display"/>
       <Location name="stat_sklattrib"/>
       <Location name="fame"/>
+      <Location name="traits"/>
       <Location name="din_bad"/>
       <Location name="din_van"/>
       <Location name="statBat"/>
@@ -903,6 +904,7 @@
       <Location name="$menu_statistika"/>
       <Location name="$menu_calendar"/>
       <Location name="$menu_reputation"/>
+      <Location name="$menu_traits"/>
       <Location name="$menu_mobila"/>
       <Location name="$menu_magic"/>
       <Location name="$menu_pain"/>

locations/_menu_traits

@@ -0,0 +1,5 @@
+# $menu_traits
+gs 'traits', 'menu'
+
+--- $menu_traits ---------------------------------
+

locations/cikl

@@ -703,6 +703,10 @@ end
 !!Fame degradation
 gs 'fame', 'deg'
 
+!!Traits
+gs 'traits', 'overnight'
+
+
 !!------------------------------------------------------------------------------------------------------------
 !!	Maruda hair mod
 !!------------------------------------------------------------------------------------------------------------

locations/obj_din

@@ -181,7 +181,7 @@ end
 if $ARGS[0] = 'sex_skills':
 	clr
 	pl'<center><img src="images/system/icon/stats.png"><br></center>'
-	pl'<a href="exec:gs ''obj_din'', ''stats''">Return to skills main page</a>'
+	pl'<a href="exec:gs ''obj_din'', ''stats''">To skills main page</a><right><a href="exec:gs ''obj_din'', ''skills''">To characteristics page</a></right>'
 	nl
 	pl '<b>Sexual characteristics</b>'
 	nl
@@ -249,6 +249,7 @@ if $ARGS[0] = 'stats':
 	nl
 	pl' <a href="exec:gs ''obj_din'', ''stats_gen''">View general statistics</a>'
 	pl' <a href="exec:gs ''obj_din'', ''stats_achievements''">View achievements</a>'
+	pl' <a href="exec:gs ''obj_din'', ''skills''">View characteristics page</a>'
 	pl' <a href="exec:gs ''obj_din'', ''stats_sex''">View sex statistics</a>'
 	nl
 	nl
@@ -1828,6 +1829,7 @@ if $ARGS[0] = 'old':
 	addobj 'Skills'
 	addobj 'Statistics'
 	addobj 'Pain'
+	addobj 'Traits'
 	addobj 'Fame'
 	if pcs_magik > 0:addobj 'Magic'
 	addobj 'Face'

locations/onobjsel

@@ -5,11 +5,12 @@ killvar 'menu_character'
 $menu_character[0] = 'Description:$menu_descrip'
 $menu_character[1] = 'Skills:$menu_skills'
 $menu_character[2] = 'Statistics:$menu_statistika'
-$menu_character[3] = 'Fame:$menu_reputation'
-$menu_character[4] = 'Pain:$menu_pain'
-$menu_character[5] = 'Calendar:$menu_calendar'
+$menu_character[3] = 'Traits:$menu_traits'
+$menu_character[4] = 'Fame:$menu_reputation'
+$menu_character[5] = 'Pain:$menu_pain'
+$menu_character[6] = 'Calendar:$menu_calendar'
 
-if pcs_magik > 0:$menu_character[5] = 'Magic:$menu_magic'
+if pcs_magik > 0:$menu_character[7] = 'Magic:$menu_magic'
 
 killvar 'menu_lookon'
 $menu_lookon[0] = 'Face:$menu_face'
@@ -42,6 +43,7 @@ if $selobj = '<font color = green>Character</font>':gs 'obj_din', 'descrip'
 if $selobj = 'Skills':gs 'obj_din', 'skills'
 if $selobj = 'Statistics':gs 'obj_din', 'stats'
 if $selobj = 'Pain':gs 'obj_din', 'pain'
+if $selobj = 'Traits':gs 'traits', 'menu'
 if $selobj = 'Fame':gs 'obj_din', 'reputation'
 if pcs_magik > 0:if $selobj = 'Magic':gs 'obj_din', 'magic'
 if $selobj = 'Face':gs 'obj_din', 'menuface'

locations/stat

@@ -546,6 +546,8 @@ if minut >= 60:
 	if mira_go_blok > 0: mira_go_blok -= 1
 	if mira_no_home > 0: mira_no_home -= 1
 
+	gs 'traits', 'hourly'
+
 	gs 'outdoors', 'weather'
 
 	if minut >= 60:jump 'loopmin'

locations/stat_display

@@ -940,7 +940,7 @@ i = 0
 					end
 				end
 			end
-			if j <= 4 and swallow >= 10 and $txtiscum = 'cum':$txtiscum = '<a href="exec:gs ''cum_manage'', ''cumeater'', <<i>>"><font color="blue">' + $txtiscum + '</font></a>'
+			if j <= 4 and trt_cumeater = 1 and $txtiscum = 'cum':$txtiscum = '<a href="exec:gs ''cum_manage'', ''cumeater'', <<i>>"><font color="blue">' + $txtiscum + '</font></a>'
 			$txtiscum += ' from '
 			if i = 0 and j = 4 and vibratorIN = 0 and pcs_vag*10 < cumvolume['<<i>>:<<j>>'] and cumvolume['<<i>>:<<j>>'] >= 20:
 				if $pantyworntype ! 'none':

locations/traits

@@ -0,0 +1,34 @@
+# traits
+
+if $ARGS[0] = 'menu':
+	clr
+	pl '<center>Traits Menu</center>'
+	pl'<a href="exec:gs ''stat''">Leave</a>'
+	nl
+!!	pl '<b>Bimbo</b>'
+
+	pl '<b>Cumeater</b>'
+	if cumeater = 0:
+		pl 'You do not have this trait.'
+		pl 'To gain this trait you must swallow cum 10 times.'
+		pl 'You have swallowed cum <<swallow>> times.'
+	else
+		pl 'You have this trait.'
+		pl 'This trait cannot be lost.'
+	end
+end
+
+if $ARGS[0] = 'hourly':
+	if swallow >= 10 and trt_cumeater = 0:
+		trt_cumeater = 1
+		msg 'You have gained the trait "Cumeater"'
+	end	
+end
+
+if $ARGS[0] = 'overnight':
+	
+	
+end
+
+--- traits ---------------------------------
+