Accueil Explorer Aide
S'inscrire Connexion
Christine
/
glife
forké depuis Kevin_Smarts/glife
1
0
Fork 0
Fichiers Wiki
Parcourir la source

Merge remote-tracking branch 'glife/master' into dev

Christine il y a 5 ans
Parent
cb8d2a36f6 efb3b8e25c
commit
a0455923a4
7 fichiers modifiés avec 600 ajouts et 374 suppressions
Vue séparée Afficher les stats Diff
  1. 6 16
      locations/IgorHunter.qsrc
  2. 253 205
      locations/body.qsrc
  3. 2 1
      locations/cikl.qsrc
  4. 116 0
      locations/hunter_favors.qsrc
  5. 201 123
      locations/hunter_interactions.qsrc
  6. 10 17
      locations/lact_lib.qsrc
  7. 12 12
      locations/obj_din.qsrc

+ 6 - 16
locations/IgorHunter.qsrc
Voir le fichier 

@@ -24,29 +24,19 @@ gs 'stat'
 
 '<center><b><font color = maroon>Igor Anisimov</font></b></center>'
 
 '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
 
 'Igor is a hunter along with the Sergei and Andrei and is here visiting Andrei. He''s <<boyage>> years old. He is not married and lives in the City Center..'
 
-if huntersIgorQw < 0:'You and him have a bad relationship, because you offended him in the past.'
 
-if huntersIgorQw >= 0 and huntersIgorQw < 10:'You have a normal relationship with him.'
 
-if huntersIgorQw >= 10 and huntersIgorQw < 20:'You have friendly relations with him.'
 
-if huntersIgorQw >= 20 and huntersIgorQw < 25:'You''re good friends.'
 
-if huntersIgorQw >= 25 and huntersIgorQw < 30:'It seems he has a crush on you.'
 
-if huntersIgorQw >= 30 and huntersIgorQw <= 35:'You have a mutual crush on each other.'
 
-if huntersIgorQw > 35 :'You love him.'
 
-if huntersIgorLove = 1:'You two have fallen in love.'
 
-if huntersIgorLove = 2:'<<$boydesc>> is your boyfriend.'
 
-if huntersIgorLove = 3:'<<$boydesc>> is your husband.'
 
 
 act 'Chat':
 
     *clr & cla
 
     minut += 60
 
 	menu_off = 1
 
-    if huntersIgorQw < 10:huntersIgorQw += 1
 
-    gs 'stat'
 
+    
+    igor_base_opinion += 1
 
 
-    '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/talk1.'+rand(1,3)+'.jpg"></center>'
 
-    if huntersIgorQw >= 0:'You have a chat with Igor, swapping stories about life and love.'
 
-    if huntersIgorQw < 0:'You talk to Igor. He wears his heart on his sleeve, so you can tell he doesn''t like you.'
 
+    act 'Continue': gt $loc
 
+end
 
 
-    act'Continue':gt $loc, $metka
 
+if $ARGS[0] = 'check_opinion':
 
+    huntersIgorQw = igor_base_opinion + hunter_collective_opinion / 2 - hunter_sexual_comfort / 4
 
 end
 
 
 --- Igorhunter ---------------------------------

+ 253 - 205
locations/body.qsrc
Voir le fichier 

@@ -10,56 +10,49 @@
 
 if pcs_throat = 0:
 
 	thpic = 0
 
 	$pcs_throat = 'You have a chaste <a href="exec:view''images/pc/body/throat/th0.jpg''">mouth</a>.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'virgin'
 
+	$pcdesc_throatrandom = 'virgin'
 
 	$pcdesc_throat = 'virgin'
 
 	$pcdesc_throatwordy = 'virginal, unused'
 
 	$throattipe = 'virgin'
 
 elseif pcs_throat <= 5:
 
 	thpic = 1
 
 	$pcs_throat = 'You have an extremely inexperienced <a href="exec:view''images/pc/body/throat/th1.jpg''">mouth</a>.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'narrow'
 
+	$pcdesc_throatrandom = 'narrow'
 
 	$pcdesc_throat = 'narrow'
 
 	$pcdesc_throatwordy = 'reluctant, gag-prone'
 
 	$throattipe = 'narrow'
 
 elseif pcs_throat <= 10:
 
 	thpic = 2
 
 	$pcs_throat = 'Your slightly-experienced mouth leads to a sensitive <a href="exec:view''images/pc/body/throat/th2.jpg''">throat</a> with an easily-triggered gag reflex.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'delicate'
 
+	$pcdesc_throatrandom = 'delicate'
 
 	$pcdesc_throat = 'delicate'
 
 	$pcdesc_throatwordy = 'delicate, barely-experienced'
 
 	$throattipe = 'delicate'
 
 elseif pcs_throat <= 15:
 
 	thpic = 3
 
 	$pcs_throat = 'You have an experienced mouth and fairly practiced <a href="exec:view''images/pc/body/throat/th3.jpg''">throat</a>.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'fairly practiced'
 
+	$pcdesc_throatrandom = 'fairly practiced'
 
 	$pcdesc_throat = 'fairly practiced'
 
 	$pcdesc_throatwordy = 'fairly practiced'
 
 	$throattipe = 'fairly practiced'
 
 elseif pcs_throat <= 25:
 
 	thpic = 4
 
 	$pcs_throat = 'You have a willing mouth and trained <a href="exec:view''images/pc/body/throat/th4.jpg''">throat</a>.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'well-trained'
 
+	$pcdesc_throatrandom = 'well-trained'
 
 	$pcdesc_throat = 'well-trained'
 
 	$pcdesc_throatwordy = 'experienced, well-trained and eager'
 
 	$throattipe = 'well-trained'
 
 elseif pcs_throat <= 35:
 
 	thpic = 5
 
 	$pcs_throat = 'Your deep tunnel of a <a href="exec:view''images/pc/body/throat/th5.jpg''">throat</a> may adopt any member.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'capacious'
 
+	$pcdesc_throatrandom = 'capacious'
 
 	$pcdesc_throat = 'capacious'
 
 	$pcdesc_throatwordy = 'seasoned, effortlessly-plumbed'
 
 	$throattipe = 'capacious'
 
 else
 
 	thpic = 6
 
 	$pcs_throat = 'Your gag reflex is completely absent and your <a href="exec:view''images/pc/body/throat/th6.jpg''">throat</a> has seen nearly as much cock as it has food.'
 
-	rand_throat = rand(0)
 
-	if rand_throat = 0:$pcdesc_throatrandom = 'bottomless'
 
+	$pcdesc_throatrandom = 'bottomless'
 
 	$pcdesc_throat = 'bottomless'
 
 	$pcdesc_throatwordy = 'elastic, oft-fucked'
 
 	$throattipe = 'bottomless'
 
@@ -71,8 +64,7 @@ if pcs_breath = 1:$pcs_throat += ' Last you checked, your breath smelled fresh a
 
 if pcs_vag = 0:
 
 	puspic = 0
 
 	$pcs_vag = 'Your virgin <a href="exec:view''images/pc/body/pussy/vag0.jpg''">pussy</a> still has its hymen intact.'
 
-	rand_pussy = rand(0)
 
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'virgin'
 
+	$pcdesc_pussyrandom = 'virgin'
 
 	$pcdesc_pussy = 'virgin'
 
 	$pcdesc_pussywordy = 'virgin'
 
 	$vaginatipe = 'virgin'
 
@@ -80,9 +72,13 @@ elseif pcs_vag <= 5:
 
 	puspic = 1
 
 	$pcs_vag = 'You have an inexperienced <a href="exec:view''images/pc/body/pussy/vag1.jpg''">pussy</a>.'
 
 	rand_pussy = rand(0,2)
 
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'narrow'
 
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'vice-like'
 
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'inexperienced'
 
+	if rand_pussy = 0:
 
+		$pcdesc_pussyrandom = 'narrow'
 
+	elseif rand_pussy = 1:
 
+		$pcdesc_pussyrandom = 'vice-like'
 
+	elseif rand_pussy = 2:
 
+		$pcdesc_pussyrandom = 'inexperienced'
 
+	end
 
 	$pcdesc_pussy = 'narrow'
 
 	$pcdesc_pussywordy = 'squeezingly tight and narrow'
 
 	$vaginatipe = 'narrow'
 
@@ -90,8 +86,11 @@ elseif pcs_vag <= 10:
 
 	puspic = 2
 
 	$pcs_vag = 'You have a tight <a href="exec:view''images/pc/body/pussy/vag1.jpg''">pussy</a>.'
 
 	rand_pussy = rand(0,1)
 
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'snug'
 
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'tight'
 
+	if rand_pussy = 0:
 
+		$pcdesc_pussyrandom = 'snug'
 
+	elseif rand_pussy = 1:
 
+		$pcdesc_pussyrandom = 'tight'
 
+	end
 
 	$pcdesc_pussy = 'tight'
 
 	$pcdesc_pussywordy = 'youthfully tight'
 
 	$vaginatipe = 'tight'
 
@@ -99,9 +98,13 @@ elseif pcs_vag <= 15:
 
 	puspic = 3
 
 	$pcs_vag = 'Your <a href="exec:view''images/pc/body/pussy/vag1.jpg''">vagina</a> is used to taking normal sized insertions.'
 
 	rand_pussy = rand(0,2)
 
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'elastic'
 
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'practiced'
 
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'snug, if easily pliable'
 
+	if rand_pussy = 0:
 
+		$pcdesc_pussyrandom = 'elastic'
 
+	elseif rand_pussy = 1:
 
+		$pcdesc_pussyrandom = 'practiced'
 
+	elseif rand_pussy = 2:
 
+		$pcdesc_pussyrandom = 'snug, if easily pliable'
 
+	end
 
 	$pcdesc_pussy = 'pliable'
 
 	$pcdesc_pussywordy = 'seasoned, pliable and tight'
 
 	$vaginatipe = 'pliable'
 
@@ -109,10 +112,15 @@ elseif pcs_vag <= 25:
 
 	puspic = 4
 
 	$pcs_vag = 'You have a well-developed <a href="exec:view''images/pc/body/pussy/vag1.jpg''">vagina</a>.'
 
 	rand_pussy = rand(0,3)
 
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'welcoming'
 
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'invitingly ready'
 
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'amply-practiced'
 
-	if rand_pussy = 3:$pcdesc_pussyrandom = 'plenty experienced'
 
+	if rand_pussy = 0:
 
+		$pcdesc_pussyrandom = 'welcoming'
 
+	elseif rand_pussy = 1:
 
+		$pcdesc_pussyrandom = 'invitingly ready'
 
+	elseif rand_pussy = 2:
 
+		$pcdesc_pussyrandom = 'amply-practiced'
 
+	elseif rand_pussy = 3:
 
+		$pcdesc_pussyrandom = 'plenty experienced'
 
+	end
 
 	$pcdesc_pussy = 'experienced'
 
 	$pcdesc_pussywordy = 'experienced, welcoming'
 
 	$vaginatipe = 'experienced'
 
@@ -120,10 +128,15 @@ elseif pcs_vag <= 35:
 
 	puspic = 5
 
 	$pcs_vag = 'Your regularly-fucked <a href="exec:view''images/pc/body/pussy/vag2.jpg''">playground</a> can take most things you force up there.'
 
 	rand_pussy = rand(0,3)
 
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'eager and hungry'
 
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'routinely-fucked'
 
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'cock-starved'
 
-	if rand_pussy = 3:$pcdesc_pussyrandom = 'seemingly constantly-fucked'
 
+	if rand_pussy = 0:
 
+		$pcdesc_pussyrandom = 'eager and hungry'
 
+	elseif rand_pussy = 1:
 
+		$pcdesc_pussyrandom = 'routinely-fucked'
 
+	elseif rand_pussy = 2:
 
+		$pcdesc_pussyrandom = 'cock-starved'
 
+	elseif rand_pussy = 3:
 
+		$pcdesc_pussyrandom = 'seemingly constantly-fucked'
 
+	end
 
 	$pcdesc_pussy = 'oft-fucked'
 
 	$pcdesc_pussywordy = 'well-trained, oft-fucked'
 
 	$vaginatipe = 'oft-fucked'
 
@@ -132,8 +145,11 @@ else
 
 	$pcs_vag = 'Your poor little <a href="exec:view''images/pc/body/pussy/vag2.jpg''">pussy</a> is so used to being over-stuffed that it takes a huge member just to get off.'
 
 	rand_pussy = rand(0,2)
 
 	if rand_pussy = 0:$pcdesc_pussyrandom = 'always-ready'
 
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'near daily-stuffed'
 
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'overeager, ever-popular'
 
+	elseif rand_pussy = 1:
 
+		$pcdesc_pussyrandom = 'near daily-stuffed'
 
+	elseif rand_pussy = 2:
 
+		$pcdesc_pussyrandom = 'overeager, ever-popular'
 
+	end
 
 	$pcdesc_pussy = 'overeager'
 
 	$pcdesc_pussywordy = 'cock-tamed and ever-ready'
 
 	$vaginatipe = 'overeager'
 
@@ -144,8 +160,7 @@ if analplugIN = 0:
 
 	if pcs_ass = 0:
 
 		anpic = 0
 
 		$pcs_ass = 'You have a virgin <a href="exec:view''images/pc/body/anus/0.jpg''">anus</a>.'
 
-		rand_anus = rand(0)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'virgin'
 
+		$pcdesc_anusrandom = 'virgin'
 
 		$pcdesc_anus = 'virgin'
 
 		$pcdesc_anuswordy = 'virgin'
 
 		$anustipe = 'virgin'
 
@@ -153,9 +168,13 @@ if analplugIN = 0:
 
 		anpic = 1
 
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/1.jpg''">anus</a> is barely used, and looking at it none would know it was used for sex.'
 
 		rand_anus = rand(0,2)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'tight'
 
-		if rand_anus = 1:$pcdesc_anusrandom = 'snug'
 
-		if rand_anus = 2:$pcdesc_anusrandom = 'tightly-clenching'
 
+		if rand_anus = 0:
 
+			$pcdesc_anusrandom = 'tight'
 
+		elseif rand_anus = 1:
 
+			$pcdesc_anusrandom = 'snug'
 
+		elseif rand_anus = 2:
 
+			$pcdesc_anusrandom = 'tightly-clenching'
 
+		end
 
 		$pcdesc_anus = 'tight'
 
 		$pcdesc_anuswordy = 'tight, scarcely-used'
 
 		$anustipe = 'tight'
 
@@ -163,9 +182,13 @@ if analplugIN = 0:
 
 		anpic = 2
 
 		$pcs_ass = 'Your pliable <a href="exec:view''images/pc/body/anus/2.jpg''">anus</a> has the shape of an asterisk.'
 
 		rand_anus = rand(0,2)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'flexible'
 
-		if rand_anus = 1:$pcdesc_anusrandom = 'slightly experienced'
 
-		if rand_anus = 2:$pcdesc_anusrandom = 'pliable'
 
+		if rand_anus = 0:
 
+			$pcdesc_anusrandom = 'flexible'
 
+		elseif rand_anus = 1:
 
+			$pcdesc_anusrandom = 'slightly experienced'
 
+		elseif rand_anus = 2:
 
+			$pcdesc_anusrandom = 'pliable'
 
+		end
 
 		$pcdesc_anus = 'flexible'
 
 		$pcdesc_anuswordy = 'flexible, still-snug'
 
 		$anustipe = 'flexible'
 
@@ -173,9 +196,13 @@ if analplugIN = 0:
 
 		anpic = 3
 
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/3.jpg''">anus</a> is usually slightly parted, it has been used quite often.'
 
 		rand_anus = rand(0,2)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'stretchy'
 
-		if rand_anus = 1:$pcdesc_anusrandom = 'experienced'
 
-		if rand_anus = 2:$pcdesc_anusrandom = 'welcomingly ready'
 
+		if rand_anus = 0:
 
+			$pcdesc_anusrandom = 'stretchy'
 
+		elseif rand_anus = 1:
 
+			$pcdesc_anusrandom = 'experienced'
 
+		elseif rand_anus = 2:
 
+			$pcdesc_anusrandom = 'welcomingly ready'
 
+		end
 
 		$pcdesc_anus = 'stretchy'
 
 		$pcdesc_anuswordy = 'stretchy, regularly-fucked'
 
 		$anustipe = 'stretchy'
 
@@ -183,9 +210,13 @@ if analplugIN = 0:
 
 		anpic = 4
 
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/4.jpg''">anus</a> often looks like a wide hole; anyone would think that the only thing you do is anal sex.'
 
 		rand_anus = rand(0,2)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'loose'
 
-		if rand_anus = 1:$pcdesc_anusrandom = 'casually open'
 
-		if rand_anus = 2:$pcdesc_anusrandom = 'routinely-fucked'
 
+		if rand_anus = 0:
 
+			$pcdesc_anusrandom = 'loose'
 
+		elseif rand_anus = 1:
 
+			$pcdesc_anusrandom = 'casually open'
 
+		elseif rand_anus = 2:
 
+			$pcdesc_anusrandom = 'routinely-fucked'
 
+		end
 
 		$pcdesc_anus = 'loose'
 
 		$pcdesc_anuswordy = 'loose, open'
 
 		$anustipe = 'loose'
 
@@ -193,9 +224,13 @@ if analplugIN = 0:
 
 		anpic = 5
 
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/5.jpg''">anus</a> genuinely doesn''t fully close on its own anymore. You could put a fist through it and it would scarcely stretch at all.'
 
 		rand_anus = rand(0,2)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'gaping'
 
-		if rand_anus = 1:$pcdesc_anusrandom = 'yawning'
 
-		if rand_anus = 2:$pcdesc_anusrandom = 'obscenely yawning'
 
+		if rand_anus = 0:
 
+			$pcdesc_anusrandom = 'gaping'
 
+		elseif rand_anus = 1:
 
+			$pcdesc_anusrandom = 'yawning'
 
+		elseif rand_anus = 2:
 
+			$pcdesc_anusrandom = 'obscenely yawning'
 
+		end
 
 		$pcdesc_anus = 'gaping'
 
 		$pcdesc_anuswordy = 'gaping, seemingly constantly-fucked'
 
 		$anustipe = 'gaping'
 
@@ -203,52 +238,39 @@ if analplugIN = 0:
 
 		anpic = 6
 
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/6.jpg''">anus</a> is almost completely wrecked. Even with conscious effort it''s hard to close it.'
 
 		rand_anus = rand(0,4)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'destroyed'
 
-		if rand_anus = 1:$pcdesc_anusrandom = 'demolished'
 
-		if rand_anus = 2:$pcdesc_anusrandom = 'uselessly loose'
 
-		if rand_anus = 3:$pcdesc_anusrandom = 'ruined'
 
-		if rand_anus = 4:$pcdesc_anusrandom = 'wrecked'
 
+		if rand_anus = 0:
 
+			$pcdesc_anusrandom = 'destroyed'
 
+		elseif rand_anus = 1:
 
+			$pcdesc_anusrandom = 'demolished'
 
+		elseif rand_anus = 2:
 
+			$pcdesc_anusrandom = 'uselessly loose'
 
+		elseif rand_anus = 3:
 
+			$pcdesc_anusrandom = 'ruined'
 
+		elseif rand_anus = 4:
 
+			$pcdesc_anusrandom = 'wrecked'
 
+		end
 
 		$pcdesc_anus = 'destroyed'
 
 		$pcdesc_anuswordy = 'absolutely fuck-wrecked'
 
 		$anustipe = 'destroyed'
 
 	end
 
 !! This below was originally missing even the original reference for $anustipe, so I added it in simplistically. Also, tanga means panties, or more specifically, a thong. A lot of duplication on descriptions, but not much to change, the logic is for images.
 
-	elseif analplugIN = 1 and $pantyworntype ! 'none':
 
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/analplug.jpg''">anus</a> is currently filled with your butt plug.'
 
-		rand_anus = rand(0)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
 
-		$pcdesc_anus = 'plugged'
 
-		$pcdesc_anuswordy = 'plug-stuffed'
 
-		$anustipe = 'plugged'
 
-elseif analplugIN = 1 and $pantyworntype = 'none':
 
-	if pirsG = 1 and pirsGL = 1:
 
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirscligub.jpg''">anus</a> is currently filled with your butt plug.'
 
-		rand_anus = rand(0)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
 
-		$pcdesc_anus = 'plugged'
 
-		$pcdesc_anuswordy = 'plug-stuffed'
 
-		$anustipe = 'plugged'
 
-	elseif pirsG ! 1 and pirsGL = 1:
 
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsclit.jpg''">anus</a> is currently filled with your butt plug.'
 
-		rand_anus = rand(0)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
 
-		$pcdesc_anus = 'plugged'
 
-		$pcdesc_anuswordy = 'plug-stuffed'
 
-		$anustipe = 'plugged'
 
-	elseif pirsG = 1 and pirsGL ! 1:
 
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsring.jpg''">anus</a> is currently filled with your butt plug.'
 
-		rand_anus = rand(0)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
 
-		$pcdesc_anus = 'plugged'
 
-		$pcdesc_anuswordy = 'plug-stuffed'
 
-		$anustipe = 'plugged'
 
+else
 
+	$pcdesc_anusrandom = 'plugged'
 
+	$pcdesc_anus = 'plugged'
 
+	$pcdesc_anuswordy = 'plug-stuffed'
 
+	$anustipe = 'plugged'
 
+	if $pantyworntype ! 'none':
 
+		$pcs_ass = 'Your <a href="exec:view''images/pc/body/analplug.jpg''">anus</a> is currently filled with your butt plug.'	
 	else
 
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugnotanga.jpg''">anus</a> is currently filled with your butt plug.'
 
-		rand_anus = rand(0)
 
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
 
-		$pcdesc_anus = 'plugged'
 
-		$pcdesc_anuswordy = 'plug-stuffed'
 
-		$anustipe = 'plugged'
 
+		if pirsG = 1 and pirsGL = 1:
 
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirscligub.jpg''">anus</a> is currently filled with your butt plug.'
 
+		elseif pirsG ! 1 and pirsGL = 1:
 
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsclit.jpg''">anus</a> is currently filled with your butt plug.'
 
+		elseif pirsG = 1 and pirsGL ! 1:
 
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsring.jpg''">anus</a> is currently filled with your butt plug.'
 
+		else
 
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugnotanga.jpg''">anus</a> is currently filled with your butt plug.'
 
+		end
 
 	end
 
 end
 
 
@@ -313,8 +335,11 @@ if dounspell = 0:
 
 		pcdesc_breastimplantcheck = 1
 
 	!! This triggers if they have fake breasts, but they are not obviously, blatantly fake breasts. In fact, this should be what triggers most of the time with a PC who has implants, given average cases.
 
 	elseif pcs_bustdisparity < 1 and silicone > 0:
 
-		if pcs_cupsize <= 30:$pcdesc_breastsword = 'breasts'
 
-		if pcs_cupsize > 30:$pcdesc_breastsword = 'tits'
 
+		if pcs_cupsize <= 30:
 
+			$pcdesc_breastsword = 'breasts'
 
+		else
 
+			$pcdesc_breastsword = 'tits'
 
+		end
 
 		$pcdesc_breastsqualifier = ''
 
 		$pcdesc_breastsqualifierinsertive = ''
 
 		pcdesc_breastimplantcheck = 1
 
@@ -328,85 +353,136 @@ if dounspell = 0:
 
 	end
 
 	
 !! These will not be used below, but can be referenced by descriptive writers in case they want to be able to quickly reference whether or not the PC has implants, as in "He reaches up and cups your<<$pcdesc_breastsfakeinsertive>> breasts."
 
-	if pcdesc_breastimplantcheck = 1:$pcdesc_breastsfakeinsertive = ' fake'
 
-	if pcdesc_breastimplantcheck = 0:$pcdesc_breastsfakeinsertive = ''
 
-	
+	if pcdesc_breastimplantcheck = 1:
 
+		$pcdesc_breastsfakeinsertive = ' fake'
 
+	else
 
+		$pcdesc_breastsfakeinsertive = ''
 
+	end
 
 
 	if pcs_cupsize <= 5:
 
 		tits = 0
 
 		$titsize = 'AA cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'tiny'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'barely-there'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'tiny'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'barely-there'
 
+		end
 
 		!! Honestly, I am not even sure it is possible to have silicone and be this small. But just in case...
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'scarcely-augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'tiny, mosquito-bite <<$pcdesc_breastsword>>'
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'scarcely-augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'tiny, mosquito-bite <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'tiny'
 
 	elseif pcs_cupsize <= 10:
 
 		tits = 1
 
 		$titsize = 'A cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'petite'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'smaller than a handful'
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'barely modified<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'petite, puffy little <<$pcdesc_breastsword>>'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'petite'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'smaller than a handful'
 
+		end
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'barely modified<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'petite, puffy little <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'petite'
 
 	elseif pcs_cupsize <= 15:
 
 		tits = 2
 
 		$titsize = 'B cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'small'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'sporty'
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'small, subtly augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'small, handful-sized <<$pcdesc_breastsword>>'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'small'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'sporty'
 
+		end
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'small, subtly augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'small, handful-sized <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'small'
 
 	elseif pcs_cupsize <= 20:
 
 		tits = 3
 
 		$titsize = 'C cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'ample'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'average-sized'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'ample'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'average-sized'
 
+		end
 
 		!! At this point PCs should now be able to get the bolted-on look, so we need to be a bit more careful to avoid contradictions in descriptive phrasing. It is OK to have some repetition here for a cup size or two.
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'ample, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'ample, handful-sized <<$pcdesc_breastsword>>'
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'ample, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'ample, handful-sized <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'ample'
 
 	elseif pcs_cupsize <= 25:
 
 		tits = 4
 
 		$titsize = 'D cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'full'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'hefty'
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'full, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'jiggly, womanly full <<$pcdesc_breastsword>>'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'full'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'hefty'
 
+		end
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'full, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'jiggly, womanly full <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'full'
 
 	elseif pcs_cupsize <= 30:
 
 		tits = 5
 
 		$titsize = 'E cup'
 
 		rand_breasts = rand(0,2)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'generous'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'heavy'
 
-		if rand_breasts = 2:$pcdesc_breastsrandom = 'fairly large'
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'heavy, fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'soft, generously-sized <<$pcdesc_breastsword>>'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'generous'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'heavy'
 
+		elseif rand_breasts = 2:
 
+			$pcdesc_breastsrandom = 'fairly large'
 
+		end
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'heavy, fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'soft, generously-sized <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'generous'
 
 	elseif pcs_cupsize <= 35:
 
 		!! From F cup and onward, breasts are now automatically referred to as tits, since that is how most others will see them. It is a subtle sexualisation, but it should be one that matches with the pre-generated descriptions from here on out.
 
 		tits = 6
 
 		$titsize = 'F cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'big'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'large'
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'big, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'big, jiggly and sizeable <<$pcdesc_breastsword>>'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'big'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'large'
 
+		end
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'big, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'big, jiggly and sizeable <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'big'
 
 	elseif pcs_cupsize <= 40:
 
 		tits = 7
 
 		$titsize = 'G cup'
 
 		rand_breasts = rand(0,1)
 
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'considerably large'
 
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'quite large'
 
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'considerably large, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'quite large and jiggly <<$pcdesc_breastsword>>'
 
+		if rand_breasts = 0:
 
+			$pcdesc_breastsrandom = 'considerably large'
 
+		elseif rand_breasts = 1:
 
+			$pcdesc_breastsrandom = 'quite large'
 
+		end
 
+		if pcdesc_breastimplantcheck = 1:
 
+			$pcdesc_breastswordy = 'considerably large, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
 
+		else
 
+			$pcdesc_breastswordy = 'quite large and jiggly <<$pcdesc_breastsword>>'
 
+		end
 
 		$pcdesc_breasts = 'considerably large'
 
 	elseif pcs_cupsize <= 45:
 
 		tits = 8
 
@@ -550,19 +626,16 @@ end
 
 if curly <= 0:
 
 	$curly = 'straight, slightly wavy '
 
 	!! Not a lot of variety here, I know -- it is for future compatibility, so everything can have be reached in the same fashion.
 
-	rand_hairtexture = rand(0)
 
-	rand_hairword = rand(0)
 
-	if rand_hairtexture = 0:$pcdesc_hairtexturerandom = 'straight'
 
-	if rand_hairword = 0:$pcdesc_hairwordrandom = 'locks'
 
+	$pcdesc_hairtexturerandom = 'straight'
 
+	$pcdesc_hairwordrandom = 'locks'
 
 	$pcdesc_hairtexturewordy = 'straight, slightly wavy'
 
 	$pcdesc_hairwordwordy = 'locks'
 
 	$pcdesc_hairtexture = 'straight'
 
 	$pcdesc_hairword = 'locks'
 
 else
 
 	$curly = 'curly '
 
-	rand_hairtexture = rand(0)
 
 	rand_hairword = rand(0,1)
 
-	if rand_hairtexture = 0:$pcdesc_hairtexturerandom = 'curly'
 
+	$pcdesc_hairtexturerandom = 'curly'
 
 	if rand_hairword = 0:$pcdesc_hairwordrandom = 'curls'
 
 	if rand_hairword = 1:$pcdesc_hairwordrandom = 'ringlets'
 
 	$pcdesc_hairtexturewordy = 'playfully curly'
 
@@ -574,8 +647,7 @@ end
 
 !! If you are baffled by the need for a forehead descriptor here, it is primarily just for writing about cumshots. I honestly cannot think of another use case. Other variables largely just for compatibility.
 
 if hbangs <= 0:
 
 	$hbangs = ''
 
-	rand_bangs = rand(0)
 
-	if rand_bangs = 0:$pcdesc_foreheadrandom = 'forehead'
 
+	$pcdesc_foreheadrandom = 'forehead'
 
 	$pcdesc_foreheadwordy = 'forehead'
 
 	$pcdesc_forehead = 'forehead'
 
 else
 
@@ -665,8 +737,7 @@ elseif pcs_haircol = 7:
 
 elseif pcs_haircol = 8:
 
 	$pcs_haircol = 'dark green'
 
 	$pcdesc_haircolour = 'dark green'
 
-	rand_hair = rand(0)
 
-	if rand_hair = 0:$pcdesc_hairrandom = 'dark green'
 
+	$pcdesc_hairrandom = 'dark green'
 
 	!! Emerald green is actually a lighter colour, but with the specific qualifier of deep, it can be used here for lack of a better one.
 
 	$pcdesc_haircolourwordy = 'deep, emerald-green'
 
 elseif pcs_haircol = 9:
 
@@ -778,20 +849,16 @@ end
 
 if hscrunchw <= 0:
 
 	$hscrunch = ''
 
 	$hpigtail = ''
 
-	rand_hairstyle = rand(0)
 
-	rand_hairobject = rand(0)
 
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'loose'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'hair'
 
+	$pcdesc_hairstylerandom = 'loose'
 
+	$pcdesc_hairobjectrandom = 'hair'
 
 	$pcdesc_hairstyle = 'loose'
 
 	$pcdesc_hairobject = 'hair'
 
 	$pcdesc_hairobjectwordy = 'loose and free <<$pcs_haircol>> hair'
 
 elseif hscrunchw = 1:
 
 	$hscrunch = 'A hair-tie holds your hair in place with a ponytail.'
 
 	$hpigtail = ''
 
-	rand_hairstyle = rand(0)
 
-	rand_hairobject = rand(0)
 
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'ponytailed'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'ponytail'
 
+	$pcdesc_hairstylerandom = 'ponytailed'
 
+	$pcdesc_hairobjectrandom = 'ponytail'
 
 	$pcdesc_hairstyle = 'ponytailed'
 
 	$pcdesc_hairobject = 'ponytail'
 
 	$pcdesc_hairobjectwordy = 'tight, high-set <<$pcs_haircol>> ponytail'
 
@@ -799,10 +866,8 @@ else
 
 	!! The actual, specific setting for hscrunchw when pigtails are desired is 2, but it is better to have a catch-all. Adjust the else above into an elseif set for 2 if more styles involving scrunchies are added.
 
 	$hscrunch = ''
 
 	$hpigtail = 'Two scrunchies hold your hair up into two cute, playful twin tails.'
 
-	rand_hairstyle = rand(0)
 
-	rand_hairobject = rand(0)
 
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'pigtailed'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'pigtails'
 
+	$pcdesc_hairstylerandom = 'pigtailed'
 
+	$pcdesc_hairobjectrandom = 'pigtails'
 
 	$pcdesc_hairstyle = 'pigtailed'
 
 	$pcdesc_hairobject = 'pigtails'
 
 	$pcdesc_hairobjectwordy = 'youthful, playful and flirty <<$pcs_haircol>> pigtails'
 
@@ -810,20 +875,17 @@ end
 
 
 if hpingripw <= 0:
 
 	$hpingrip = ''
 
-	rand_hairstyle = rand(0)
 
-	rand_hairobject = rand(0)
 
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'loose'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'hair'
 
+	$pcdesc_hairstylerandom = 'loose'
 
+	$pcdesc_hairobjectrandom = 'hair'
 
 	$pcdesc_hairstyle = 'loose'
 
 	$pcdesc_hairobject = 'hair'
 
 	$pcdesc_hairobjectwordy = 'loose and free <<$pcs_haircol>> hair'
 
 else
 
 	$hpingrip = 'Hair-pins hold your hair in place in a stylish updo.'
 
 	rand_hairstyle = rand(0,1)
 
-	rand_hairobject = rand(0)
 
 	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'upswept'
 
 	if rand_hairstyle = 1:$pcdesc_hairstylerandom = 'ornately-pinned'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'updo'
 
+	$pcdesc_hairobjectrandom = 'updo'
 
 	$pcdesc_hairstyle = 'upswept'
 
 	$pcdesc_hairobject = 'updo'
 
 	$pcdesc_hairobjectwordy = 'ornate, intricately-pinned <<$pcs_haircol>> updo'
 
@@ -831,10 +893,8 @@ end
 
 
 if hbraids <= 0:
 
 	$hbraids = ''
 
-	rand_hairstyle = rand(0)
 
-	rand_hairobject = rand(0)
 
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'loose'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'hair'
 
+	$pcdesc_hairstylerandom = 'loose'
 
+	$pcdesc_hairobjectrandom = 'hair'
 
 	$pcdesc_hairstyle = 'loose'
 
 	$pcdesc_hairobject = 'hair'
 
 	$pcdesc_hairobjectwordy = 'loose and free <<$pcs_haircol>> hair'
 
@@ -843,9 +903,9 @@ else
 
 	rand_hairstyle = rand(0,1)
 
 	rand_hairobject = rand(0,1)
 
 	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'braided'
 
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'plaited'
 
+	if rand_hairstyle = 1:$pcdesc_hairstylerandom = 'plaited'
 
 	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'braids'
 
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'plaits'
 
+	if rand_hairobject = 1:$pcdesc_hairobjectrandom = 'plaits'
 
 	$pcdesc_hairstyle = 'braided'
 
 	$pcdesc_hairobject = 'braid'
 
 	$pcdesc_hairobjectwordy = 'delicately-wound <<$pcs_haircol>> braid'
 
@@ -881,8 +941,7 @@ else
 
 		$pcdesc_hairlengthwordy = 'medium-length'
 
 	elseif pcs_hairlng > 160 and pcs_hairlng <= 260:
 
 		$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. Your hair reaches your shoulders with several strands going just beyond. Currently your hair is <<$pcs_hairbsh>>. <<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
 
-		rand_hairlength = rand(0)
 
-		if rand_hairlength = 0:$pcdesc_hairlengthrandom = 'moderate'
 
+		$pcdesc_hairlengthrandom = 'moderate'
 
 		$pcdesc_hairlength = 'moderate'
 
 		$pcdesc_hairlengthwordy = 'shoulder-length'
 
 	elseif pcs_hairlng > 260 and pcs_hairlng <= 400:
 
@@ -930,45 +989,47 @@ $pcdesc_fullhairwordy = '<<$pcdesc_hairmess>>, <<$pcdesc_hairlengthwordy>> <<$pc
 
 if pirsA > 0 and pirsA < 10000:
 
 	$pirsA = 'When you talk to people, they can sometimes get a glimpse of your tongue piercing.'
 
 	rand_tongue = rand(0,1)
 
-	if rand_tongue = 0:$pcdesc_tonguerandom = 'pierced tongue'
 
-	if rand_tongue = 1:$pcdesc_tonguerandom = 'pierced licker'
 
+	if rand_tongue = 0:
 
+		$pcdesc_tonguerandom = 'pierced tongue'
 
+	elseif rand_tongue = 1:
 
+		$pcdesc_tonguerandom = 'pierced licker'
 
+	end
 
 	$pcdesc_tonguewordy = 'barbell-pierced tongue'
 
 	$pcdesc_tongue = 'pierced tongue'
 
 else
 
 	$pirsA = ''
 
 	rand_tongue = rand(0,1)
 
-	if rand_tongue = 0:$pcdesc_tonguerandom = 'tongue'
 
-	if rand_tongue = 1:$pcdesc_tonguerandom = 'licker'
 
+	if rand_tongue = 0:
 
+		$pcdesc_tonguerandom = 'tongue'
 
+	elseif rand_tongue = 1:
 
+		$pcdesc_tonguerandom = 'licker'
 
+	end
 
 	$pcdesc_tonguewordy = 'tongue'
 
 	$pcdesc_tongue = 'tongue'
 
 end
 
 
 if pirsB > 0 and pirsB < 10000:
 
 	$pirsB = 'Your lip is pierced.'
 
-	rand_lowerlip = rand(0)
 
-	if rand_lowerlip = 0:$pcdesc_lowerliprandom = 'pierced lower lip'
 
+	$pcdesc_lowerliprandom = 'pierced lower lip'
 
 	$pcdesc_lowerlipwordy = 'jewelry-studded lower lip'
 
 	$pcdesc_lowerlip = 'pierced lower lip'
 
 else
 
 	$pirsB = ''
 
-	rand_lowerlip = rand(0)
 
-	if rand_lowerlip = 0:$pcdesc_lowerliprandom = 'lower lip'
 
+	$pcdesc_lowerliprandom = 'lower lip'
 
 	$pcdesc_lowerlipwordy = 'lower lip'
 
 	$pcdesc_lowerlip = 'lower lip'
 
 end
 
 
 if pirsC > 0 and pirsC < 10000:
 
 	$pirsC = 'You are wearing earrings.'
 
-	rand_ears = rand(0)
 
-	if rand_ears = 0:$pcdesc_earsrandom = 'pierced ears' & $pcdesc_earrandom = 'pierced ear'
 
+	$pcdesc_earsrandom = 'pierced ears' & $pcdesc_earrandom = 'pierced ear'
 
 	$pcdesc_earswordy = 'pierced ears'
 
 	$pcdesc_ears = 'pierced ears'
 
 	$pcdesc_earwordy = 'pierced ear'
 
 	$pcdesc_ear = 'pierced ear'
 
 else
 
 	$pirsC = ''
 
-	rand_ears = rand(0)
 
-	if rand_ears = 0:$pcdesc_earsrandom = 'ears' & $pcdesc_earrandom = 'ear'
 
+	$pcdesc_earsrandom = 'ears' & $pcdesc_earrandom = 'ear'
 
 	$pcdesc_earswordy = 'ears'
 
 	$pcdesc_ears = 'ears'
 
 	$pcdesc_earwordy = 'ear'
 
@@ -978,42 +1039,36 @@ end
 
 !! Unfortunately there is no real way to tell if it is a pierced septum or a pierced nostril without overhauling the jewelry and other piercing references for now.
 
 if pirsD > 0 and pirsD < 10000:
 
 	$pirsD = 'You have a piercing inserted in your nose.'
 
-	rand_nose = rand(0)
 
-	if rand_nose = 0:$pcdesc_noserandom = 'pierced nose'
 
+	$pcdesc_noserandom = 'pierced nose'
 
 	$pcdesc_nosewordy = 'jewelry-studded nose'
 
 	$pcdesc_nose = 'pierced nose'
 
 else
 
 	$pirsD = ''
 
-	rand_nose = rand(0)
 
-	if rand_nose = 0:$pcdesc_noserandom = 'nose'
 
+	$pcdesc_noserandom = 'nose'
 
 	$pcdesc_nosewordy = 'nose'
 
 	$pcdesc_nose = 'nose'
 
 end
 
 
 if pirsE > 0 and pirsE < 10000:
 
 	$pirsE = 'Your eyebrow is pierced.'
 
-	rand_eyebrow = rand(0)
 
-	if rand_eyebrow = 0:$pcdesc_eyebrowrandom = 'pierced eyebrow'
 
+	$pcdesc_eyebrowrandom = 'pierced eyebrow'
 
 	$pcdesc_eyebrowwordy = 'pierced eyebrow'
 
 	$pcdesc_eyebrow = 'pierced eyebrow'
 
 else
 
 	$pirsE = ''
 
-	rand_eyebrow = rand(0)
 
-	if rand_eyebrow = 0:$pcdesc_eyebrowrandom = 'eyebrow'
 
+	$pcdesc_eyebrowrandom = 'eyebrow'
 
 	$pcdesc_eyebrowwordy = 'eyebrow'
 
 	$pcdesc_eyebrow = 'eyebrow'
 
 end
 
 
 if pirsN > 0 and pirsN < 10000:
 
 	$pirsN = 'You are wearing a navel piercing.'
 
-	rand_navel = rand(0)
 
-	if rand_navel = 0:$pcdesc_navelrandom = 'pierced navel'
 
+	$pcdesc_navelrandom = 'pierced navel'
 
 	$pcdesc_navelwordy = 'pierced navel'
 
 	$pcdesc_navel = 'pierced navel'
 
 else
 
 	$pirsN = ''
 
-	rand_navel = rand(0)
 
-	if rand_navel = 0:$pcdesc_navelrandom = 'navel'
 
+	$pcdesc_navelrandom = 'navel'
 
 	$pcdesc_navelwordy = 'navel'
 
 	$pcdesc_navel = 'navel'
 
 end
 
@@ -1021,14 +1076,12 @@ end
 
 !! Some of these are labial rings, some of them are hood piercings. No good way to tell without an overhaul.
 
 if pirsG  > 0 and pirsG < 10000:
 
 	$pirspiz = 'You are wearing a pubic piercing.'
 
-	rand_genitals = rand(0)
 
-	if rand_genitals = 0:$pcdesc_genitalsrandom = 'pierced pussy'
 
+	$pcdesc_genitalsrandom = 'pierced pussy'
 
 	$pcdesc_genitalswordy = 'jewelry-adorned pussy'
 
 	$pcdesc_genitals = 'pierced pussy'
 
 else
 
 	$pirspiz = ''
 
-	rand_genitals = rand(0)
 
-	if rand_genitals = 0:$pcdesc_genitalsrandom = 'pussy'
 
+	$pcdesc_genitalsrandom = 'pussy'
 
 	$pcdesc_genitalswordy = 'pussy'
 
 	$pcdesc_genitals = 'pussy'
 
 end
 
@@ -1153,8 +1206,7 @@ if pcs_lipbalm > 0:
 
 		$lip = 'You have pillowy, <<$pcdesc_lipgloss>>, suggestively full lips. <<$pirsB>> <<$pirsA>>'
 
 	else
 
 		!! Lip size 0
 
-		rand_lipgloss = rand(0)
 
-		if rand_lipgloss = 0:$pcdesc_lipglossrandom = 'shiny'
 
+		$pcdesc_lipglossrandom = 'shiny'
 
 		$pcs_lipbalm = 'shiny'
 
 		$pcdesc_lipgloss = 'shiny'
 
 		$pcdesc_lipglossinsertive = ', shiny'
 
@@ -1164,8 +1216,7 @@ if pcs_lipbalm > 0:
 
 	end
 
 else
 
 	!! No gloss
 
-	rand_lipgloss = rand(0)
 
-	if rand_lipgloss = 0:$pcdesc_lipglossrandom = 'soft'
 
+	$pcdesc_lipglossrandom = 'soft'
 
 	$pcs_lipbalm = 'soft'
 
 	$pcdesc_lipgloss = 'soft'
 
 	$pcdesc_lipglossinsertive = ''
 
@@ -1320,8 +1371,7 @@ elseif pcs_eyecol = 3:
 
 	$pcdesc_eyecolourwordy = 'vibrant, crystal blue'
 
 	$pcs_eyecol = 'blue'
 
 else
 
-	rand_eyecol = rand(0)
 
-	if rand_eyecol = 0:$pcdesc_eyecolourrandom = 'attractive'
 
+	$pcdesc_eyecolourrandom = 'attractive'
 
 	$pcdesc_eyecolour = 'attractive'
 
 	$pcdesc_eyecolourwordy = 'attractive'
 
 	$pcs_eyecol = 'attractive'
 
@@ -1386,8 +1436,7 @@ elseif pcs_lashes = 2:
 
 	$pcdesc_lasheswordy = 'long, fluttery'
 
 	$pcs_lashes = 'with long eyelashes'
 
 elseif pcs_lashes = 1:
 
-	rand_lashes = rand(0)
 
-	if rand_lashes = 0:$pcdesc_lashesrandom = 'average'
 
+	$pcdesc_lashesrandom = 'average'
 
 	$pcdesc_lashes = 'average'
 
 	$pcdesc_lasheswordy = 'average'
 
 	$pcs_lashes = 'with average eyelashes'
 
@@ -1437,16 +1486,15 @@ end
 
 
 !! Most of these sound really terrible. Would REALLY recommend only using the insertive context, as the less-flowery versions will simply not return anything at all.
 
 if pcs_eyesize = 0:
 
-	rand_eyesize = rand(0)
 
-	if rand_eyesize = 0:$pcdesc_eyesizerandom = 'tiny'
 
+	$pcdesc_eyesizerandom = 'tiny'
 
 	$pcdesc_eyesize = 'small'
 
 	$pcdesc_eyesizeinsertive = ''
 
 	$pcdesc_eyesizewordy = 'little'
 
 	$glaza = 'You have little <<$pcs_eyecol>> eyes <<$pcs_lashes>>.<<$glass>>'
 
 elseif pcs_eyesize = 1:
 
-	rand_eyesize = rand(0)
 
+	rand_eyesize = rand(0,1)
 
 	if rand_eyesize = 0:$pcdesc_eyesizerandom = 'medium'
 
-	if rand_eyesize = 0:$pcdesc_eyesizerandom = 'average-sized'
 
+	if rand_eyesize = 1:$pcdesc_eyesizerandom = 'average-sized'
 
 	$pcdesc_eyesize = 'medium-sized'
 
 	$pcdesc_eyesizeinsertive = ''
 
 	$pcdesc_eyesizewordy = 'medium-sized'

+ 2 - 1
locations/cikl.qsrc
Voir le fichier 

@@ -45,6 +45,8 @@ if week > 7:
 
 	if week > 7:jump 'loopweek'
 
 end
 
 
+gs 'daystart'
 
+
 
 !!----------------------------------------------------------------------------
 
 
 !!Fame call to update all the fame variables
 
@@ -68,7 +70,6 @@ if casting = 1:
 
 	acting_string2 = rand(10000000000,199999999999)
 
 end
 
 
-gs 'daystart'
 
 dynamic $hypnoDaychange
 
 
 !!phone reset for bf

+ 116 - 0
locations/hunter_favors.qsrc
Voir le fichier 

@@ -788,4 +788,120 @@ if $ARGS[0] = 'yard_bondage':
 
 		!minut -= 720
 
 end	
 
+if $ARGS[0] = 'nighttime_entertainment':
 
+
 
+	*clr & cla
 
+	if hunter_collective_opinion < 15: 	
+		hunter_collective_opinion += 3
 
+		hunter_sexual_comfort += 8
 
+	else
 
+		hunter_collective_opinion -= 4
 
+		hunter_sexual_comfort += 12
 
+	end
 
+
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/bj_1.jpg"></center>'
 
+	'The boys immediately encircle you, pulling out their cocks. You can''t help but giggle a little at how quickly they are ready for you.'
 
+	
+	act 'Grab Igor and Sergei':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'hj', 7, 'gangbang'
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/bj_2.jpg"></center>'
 
+	'You grab Igor and Sergei''s cocks, jerking them off. You can feel both their dicks engorge, filling out your hands more firmly.'
 
+
 
+	act 'Suck Sergei':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'bj', 10, 'gangbang'
 
+	minut -= 7
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/bj_3.jpg"></center>'
 
+	'You take Sergei''s head in your mouth, slowly making your way down his shaft.'
 
+
 
+	act '...':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'bj', 7, 'gangbang'
 
+	gs 'arousal', 'breasts', 2, 'gangbang'
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/bj_3.5.jpg"></center>'
 
+	'Meanwhile you feel Igor reaching under your shirt, tweaking and playing with your nipple as you bob up and down Sergei''s cock.'
 
+
 
+	act 'Suck Igor':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'bj', 8, 'gangbang', 'deepthroat'
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/bj_4.jpg"></center>'
 
+	'You let Sergei''s dick pop out of your mouth and switch to sucking Igor instead. You suck all the way down to the hilt, letting his diamond hard pulsing cock fill your throat.'
 
+
 
+	act '...':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'bj', 8, 'gangbang', 'deepthroat'
 
+	gs 'arousal', 'flash', 3
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/buk_tit_expose_3.jpg"></center>'
 
+	'As you pick up your pace with Igor, Andrei reaches under your shirt, pulling out your tit. You feel your nipple slightly harden at the breeze.'
 
+	'Meanwhile Igor calls out he is going to cum soon. On cue, you suck him all the way down, milking his violently pulsing cock with your throat.'
 
+
 
+	gs  'cum_call', 'mouth', 'A173', 1    
+
 
+	act '...':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'breasts', 4
 
+	gs 'arousal', 'flash', 3
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/buk_tit_expose_4.jpg"></center>'
 
+	'Satisfied, Igor idly plays with your exposed breast as Andrei pulls out the other one, letting both of your tits air out as he keeps jerking himself off.'
 
+
 
+	act '...':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'flash', 8
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/buk_1.jpg"></center>'
 
+	'It does not take long before Andrei reaches his climax, ejaculating all over your face and hair.'
 
+	gs  'cum_call', 'face', 'A172', 1    
+
 
+	act '...':
 
+
 
+	*clr & cla
 
+	gs 'arousal', 'flash', 7
 
+	minut -= 5
 
+	gs 'stat'
 
+
 
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/nighttime_entertainment/buk_2.jpg"></center>'
 
+	'Seeing this, Sergei makes his way right next to you and picks up his pace for a hot moment before also jizzing all over the other side of your face, a couple drops finding their way to your exposed chest.'
 
+	gs  'cum_call', 'mouth', 'A174', 1
 
+	
+	act 'Further': gt 'swamp_yard', 'fireside'
 
+
 
+	end
 
+	end
 
+	end
 
+	end
 
+	end
 
+	end
 
+	end
 
+	end
 
+end
 
+
 
 --- hunter_favors ---------------------------------

+ 201 - 123
locations/hunter_interactions.qsrc
Voir le fichier 

@@ -223,13 +223,17 @@ if $ARGS[0] = 'chat_with_hunters':
 
     act 'Finish chatting': gt 'swamp_yard'
 
 
     if $ARGS[1] = '':
 
+        if hunter_sexual_comfort > 40 and alko > 4 and $clothingworntype ! 'nude' and rand(1,5) = 1:
 
+            gt 'hunter_interactions', 'chat_with_hunters', 'entertainment'
 
+        end
 
+
 
         if boy_talk = 0 and hunters_drink = 1 and rand(1,10) = 1:
 
             gs 'hunter_interactions', 'chat_with_hunters', 'boy_talk'
 
         elseif boy_talk = 1 and virginity_talk = 0 and hunters_drink = 1 and rand(1,10) = 1:
 
             gs 'hunter_interactions', 'chat_with_hunters', 'virginity_talk'
 
-        elseif CloSkirtShortness > 0 and $pantyworntype = 'none' and rand(1,12) = 1:
 
+        elseif CloSkirtShortness > 0 and $pantyworntype = 'none' and rand(1,9) = 1:
 
             gs 'hunter_interactions', 'chat_with_hunters', 'pantiless_flash'
 
-        elseif $clothingworntype = 'nude' and $pantyworntype = 'none' and rand(1,5) = 1:
 
+        elseif $clothingworntype = 'nude' and $pantyworntype = 'none' and rand(1,3) = 1:
 
             gs 'hunter_interactions', 'chat_with_hunters', 'nude'
 
         else
 
             gs 'hunter_interactions', 'chat_with_hunters', 'generic'
 
@@ -244,13 +248,22 @@ if $ARGS[0] = 'chat_with_hunters':
 
     end    
 
     if $ARGS[1] = 'pantiless_flash':
 
-        *clr
 
-        hunter_sexual_comfort += 5
 
-        hunter_collective_opinion -= 4
 
-    
+        
+        act 'Further': gt 'swamp_yard', 'fireside'
 
+       
+        *clr & cla
 
+        if hunter_sexual_comfort > 30:
 
+            hunter_collective_opinion += 1
 
+            hunter_sexual_comfort += 3
 
+        else
 
+            hunter_collective_opinion -= 2
 
+            hunter_sexual_comfort += 5
 
+        end
 
+
 
         '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hantersnotanga1.jpg"></center>'
 
         'You are sitting in front of the men, not wearing any panties, so the stories you tell are mostly ignored by the men throwing not-so-subtle glances at your exposed pussy.'
 
         gs 'arousal', 5, 'flashlite'
 
+        gs 'arousal', 'end'
 
         gs 'stat'
 
     end  
     
@@ -264,7 +277,7 @@ if $ARGS[0] = 'chat_with_hunters':
 
         
         act 'Yes, actually':
 
             cla 
-            act 'Finish chatting': gt 'swamp_yard'
 
+            act 'Finish chatting': gt 'swamp_yard', 'fireside'
 
             hunter_sexual_comfort -= 5
 
             hunter_collective_opinion += 3
 
             '"Yeah I have been seeing someone for a while", you answer'
 
@@ -272,25 +285,26 @@ if $ARGS[0] = 'chat_with_hunters':
 
                 '"Now that''s a lucky guy heh." says Andrei. "Let us know if he dares upset you though, we will show him"'
 
             elseif hunter_sexual_comfort > 50:
 
                 cla
 
-                '"Bet he is not as fun as us" says Andrei'
 
-                '"Can he fuck you in all your holes at the same time like we can?" asks Sergey before the hunters get up and approach you'
 
-                if hunter_collective_opinion > 40 and alko < 4: act 'Maybe another time boys, not feeling it now': gt 'swamp_yard'
 
-                act 'You freeze in place, anticipating what is coming': gt 'hunter_interactions', 'fireside_gangbang'    
+                '"Bet he is not as fun as us" says Andrei. "Also bet he is not as fun to suck off as us" he says, his eyes stripping you already.'
 
+                if hunter_collective_opinion > 40 or alko < 5: 
+                    act 'Maybe another time boys, not feeling it now': gt 'swamp_yard', 'fireside'
 
+                end
 
+                if $clothingworntype ! 'nude': 
+                    act 'Approach the hunters to find out': gt 'hunter_favors', 'nighttime_entertainment'    
+                end
 
             end    
         end    
         act 'No, not really': 
             cla
 
-            act 'Finish chatting': gt 'swamp_yard'
 
+            act 'Finish chatting': gt 'swamp_yard', 'fireside'
 
             hunter_sexual_comfort += 1
 
             hunter_collective_opinion += 1
 
             '"No, I do not really have someone. At least no one special.", you answer'
 
-            if hunter_sexual_comfort < 35 or hunter_collective_opinion > 40:
 
+            if hunter_sexual_comfort < 25 or hunter_collective_opinion > 40:
 
                 '"How come?" says Igor. "Those... uh... boys in your class musssss... be stipud" drunkenly slurs Igor'
 
-            elseif hunter_sexual_comfort > 45 and hunter_collective_opinion > 30:
 
+            else
 
                 cla
 
-                '"Well guess it is better that way. You do not have someone to think about while having some fun" says Andrei'
 
-                '"Talking about fun, why don''t you get up and give us a little show" says Sergey before taking out his radio and putting on some music.'
 
-                gt 'hunter_interactions', 'dance_show'    
+                '"Well guess it is better that way. You do not have someone to think about while we are having some fun" says Andrei'
 
             end 
         end
 
     end
 
@@ -310,7 +324,7 @@ if $ARGS[0] = 'chat_with_hunters':
 
             '"Huh...what? No I have not!" you answer, blushing to your ears'
 
             if hunter_sexual_comfort < 35 and hunter_collective_opinion > 40:
 
                 '"Stop embarrassing the little lady" says Sergey. "She is our guest, we have to be polite"'
 
-				act 'Continue': gt 'swamp_yard', 'start'
 
+				act 'Continue': gt 'swamp_yard', 'fireside'
 
             elseif hunter_sexual_comfort > 50:
 
                 '"Wow so you really are a full on tease." says Igor'
 
                 '"Since you are such an innocent young lady why don''t you give us a little show without clothes blocking your innocence'
 
@@ -326,19 +340,83 @@ if $ARGS[0] = 'chat_with_hunters':
 
             'You blurt out a small "yeah!" before going all red in the face. Why are you even telling these men that you have had sex? You look down embarrassed.'
 
             if hunter_sexual_comfort < 35 or hunter_collective_opinion > 40:
 
                 '"Well uhhh... it is normal at your age. You are not a little kid anymore" says Sergey'
 
-				act 'Continue': gt 'swamp_yard', 'start'
 
+				act 'Continue': gt 'swamp_yard', 'fireside'
 
             elseif hunter_sexual_comfort > 50:
 
                 '"That means you know how to have fun. Say, how about we play together a bit?" says Andrei before the hunters get up and start approaching you'
 
                 !TODO: Implement event
 
-                !if hunter_collective_opinion > 30 and alko < 4: act 'Maybe another time boys, not feeling it now': gt 'swamp_yard'
 
-                !act 'You oblige, feeling your pussy already getting wet': gs 'hunter_interactions', 'fireside_gangbang'    
-                act 'Maybe another time boys, not feeling it now': gt 'swamp_yard', 'start'
 
+                !if hunter_collective_opinion > 30 or alko < 4:
 
+                     act 'Maybe another time boys, not feeling it now': gt 'swamp_yard'
 
+                !end
 
+
 
+                !act 'You oblige, feeling your pussy already getting wet': gs 'hunter_interactions', 'nighttime_entertainment'    
             end  
         end
 
     end
 
 
     if $ARGS[1] = 'nude':
 
-        !TODO: Fill this in
 
+        *clr & cla
 
+        
+        if hunter_sexual_comfort > 30:
 
+            hunter_collective_opinion += 1
 
+            hunter_sexual_comfort += 5
 
+        else
 
+            hunter_collective_opinion -= 3
 
+            hunter_sexual_comfort += 7
 
+        end
 
+
 
+
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/fireside_night/nude.jpg"></center>'
 
+        'You stand by the fire to chat up a bit with the men. Although you feel like the men are simply nodding along with whatever you are saying, staring at your bared ass and tits, devouring your exposed body with their eyes instead.'
 
+        gs 'arousal', 15, 'flash'
 
+        minut -= 10
 
+        gs 'arousal', 'end'
 
+        gs 'stat'
 
+    end
 
+
 
+    if $ARGS[1] = 'entertainment':
 
+        *clr & cla
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanters1.jpg"></center>'
 
+        '"Hey, Sveta, can you do us a favor?" says Andrei, seeing you approach them. "We are in desperate need of some entertainment. Say, why don''t you help us with that?"'
 
+        '"And I mean that as in sucking us all off of course." He adds.'
 
+
 
+        act 'Kneel down to oblige the boys': gt 'hunter_favors', 'nighttime_entertainment'
 
+        if alko < 7:
 
+            act 'Refuse the perverts. You are not their personal fucktoy':
 
+                *clr & cla
 
+                '"Do I look like your private whore? Suck each other off if you are that desperate" you say, stomping off to the roar of laughter that erupts in response'
 
+
 
+                if hunter_collective_opinion > 20:
 
+                    hunter_collective_opinion += 5
 
+                    hunter_sexual_comfort -= 10
 
+                else
 
+                    hunter_collective_opinion -= 3
 
+                    hunter_sexual_comfort -= 5
 
+                end
 
+            end
 
+        end
 
+    end
 
+
 
+    if $ARGS[1] = 'entertainment':
 
+        *clr & cla
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/hanters1.jpg"></center>'
 
+        '"Hey, Sveta, can you do us a favor?" says Andrei, seeing you approach them. "We are in desperate need of some entertainment. Say, why don''t you help us with that?"'
 
+        '"And I mean that as in sucking us all off of course." He adds.'
 
+
 
+        act 'Kneel down to oblige the boys': gt 'hunter_favors', 'nighttime_entertainment'
 
+        if alko < 7:
 
+            act 'Refuse the perverts. You are not their personal fucktoy':
 
+                *clr & cla
 
+                '"Do I look like your private whore? Suck each other off if you are that desperate" you say, stomping off to the roar of laughter in response'
 
+
 
+                if hunter_collective_opinion > 20:
 
+                    hunter_collective_opinion += 5
 
+                    hunter_sexual_comfort -= 10
 
+                else
 
+                    hunter_collective_opinion -= 3
 
+                    hunter_sexual_comfort -= 5
 
+                end
 
+            end
 
+        end
 
     end
 
 end
 
 
@@ -1385,116 +1463,116 @@ if $ARGS[0] = 'nighttime_gangbang':
 
 
     if $ARGS[1] = '':
 
         if alko > 5: alko = 5
 
-            hunter_sexual_comfort += 20
 
-            hunter_collective_opinion -= 15
 
-            gs 'arousal', 'massage', 3
 
-            gs 'stat'
 
-
 
-            'You slowly start coming back to your senses with a feeling you cannot exactly place. It is a good feeling though, some kind of warmth reverberating through your body.'
 
-            
-            act 'Try to place the feeling':
 
-            
-            *clr & cla
 
-            gs 'arousal', 'vaginal', 7, 'sub'
 
-            minut -= 5
 
-            gs 'stat'
 
-
 
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_pen.jpg"></center>'
 
-            'In a dreamy haze, you realize the feeling is like your pussy getting fucked. You think you are having a wet dream, dreaming you are being used as a cocksleeve, your little pussy getting drilled by someone you do not even see.'
 
-        
-            act 'Wake up':
 
-            
-            *clr & cla
 
-            gs 'arousal', 'vaginal', 5, 'gangbang', 'rough'
 
-            gs 'arousal', 'bj', 5, 'sub', 'gangbang'
 
-            minut -= 6
 
-            gs 'stat'
 
-
 
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_mis_bj.jpg"></center>'
 
-            'Opening your eyes, you see Andrei kneeling in front of you. Without thinking, you grab his cock and take it into your mouth. You taste a couple drops of his precum coming out.'
 
-            'You also notice the rest of the guys are all naked and circling you. Seems like all the drinking got everyone in the yard pretty horny, although it might have had to do with you strutting your stuff completely naked for some time.'
 
-                
-            act '...':
 
-        
-            *clr & cla
 
-            gs 'arousal', 'vaginal', 5, 'gangbang', 'rough'
 
-            gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 
-            minut += 3
 
-            gs  'cum_call', 'mouth', 'A172', 1    
-            gs 'stat'
 
+        hunter_sexual_comfort += 20
 
+        hunter_collective_opinion -= 15
 
+        gs 'arousal', 'massage', 3
 
+        gs 'stat'
 
 
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_mis_2.jpg"></center>'
 
-            'You are getting fucked from both ends, Sergei pumping your pussy while you are blowing Andrei. You feel Andrei''s cock twitching for a moment before he cums down your throat without warning.'
 
+        'You slowly start coming back to your senses with a feeling you cannot exactly place. It is a good feeling though, some kind of warmth reverberating through your body.'
 
         
-            act 'Swallow and try to get up':
 
+        act 'Try to place the feeling':
 
         
-            *clr & cla
 
-            gs 'arousal', 'vaginal', 5, 'gangbang', 'exhibitionism', 'sub'
 
-            minut -= 1
 
-            gs 'stat'
 
+        *clr & cla
 
+        gs 'arousal', 'vaginal', 7, 'sub'
 
+        minut -= 5
 
+        gs 'stat'
 
 
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_mis_1.jpg"></center>'
 
-            'Wanting to take a more active part, you try getting up. Sergei pumps your pussy for a couple more minutes before pulling out, letting you stand up.'
 
-        
-            act 'Get up on your feet':
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_pen.jpg"></center>'
 
+        'In a dreamy haze, you realize the feeling is like your pussy getting fucked. You think you are having a wet dream, dreaming you are being used as a cocksleeve, your little pussy getting drilled by someone you do not even see.'
 
+    
+        act 'Wake up':
 
         
-            *clr & cla
 
-            gs 'arousal', 'bj', 5, 'gangbang', 'exhibitionism', 'sub'
 
-            gs 'arousal', 'vaginal', 5, 'gangbang', 'exhibitionism', 'sub'
 
-            minut -= 2
 
-            gs 'stat'
 
+        *clr & cla
 
+        gs 'arousal', 'vaginal', 5, 'gangbang', 'rough'
 
+        gs 'arousal', 'bj', 5, 'sub', 'gangbang'
 
+        minut -= 6
 
+        gs 'stat'
 
 
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_bj.jpg"></center>'
 
-            'You spring up and immediately bend down to suck Sergei''s dick. You can taste your juices, lots of it covering his cock.'
 
-            'Meanwhile you feel another dick rubbing against your crack and folds before you feel the head part them apart, slowly sinking in your soaking wet pussy. It is Igor taking you from behind.'
 
-        
-            act '...':
 
-        
-            *clr & cla
 
-            gs 'arousal', 'bj', 5, 'gangbang', 'exhibitionism', 'sub', 'deepthroat'
 
-            gs 'arousal', 'vaginal', 5, 'gangbang', 'exhibitionism', 'sub'
 
-            gs 'stat'
 
-        
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_1.jpg"></center>'
 
-            'Sergei grabs you by the hair, lightly pushing you down his cock. You take him deeper in your throat, your gag reflex suppressed by all the booze you have drank.'
 
-            'You feel Igor picking up his pace, his dick hitting just the right spot faster and faster.'
 
-        
-            act '...':
 
-        
-            *clr & cla
 
-            gs 'arousal', 'hj', 5, 'gangbang', 'exhibitionism', 'sub'
 
-            gs 'arousal', 'vaginal', 10, 'gangbang', 'exhibitionism', 'sub'
 
-            gs 'stat'
 
-            minut -= 8
 
-        
-            '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_2.jpg"></center>'
 
-            'Igor''s cock in your pussy feels so good! You cannot even concentrate on sucking Sergei''s dick, letting it go to brace yourself.'
 
-            'Sergei starts stroking himself while Igor keeps drilling your cunt. After a few minutes he grunts "Sveta I''m going to cum"'
 
-                act 'Cum inside me, Igor!':
 
-                    cla
 
-                    'Hearing your cry, Igor buries his dick all the way inside your pussy in one motion, eliciting a loud gasp from you as he cums deep inside your womanhood.'
 
-                    gs 'cum_call', 'right_in_the_babymaker', 'A173', 1 
-                    gs 'stat'
 
-        
-                    act 'Take care of Sergei': gt 'hunter_interactions', 'nighttime_gangbang', 'finish'
 
-                end
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_mis_bj.jpg"></center>'
 
+        'Opening your eyes, you see Andrei kneeling in front of you. Without thinking, you grab his cock and take it into your mouth. You taste a couple drops of his precum coming out.'
 
+        'You also notice the rest of the guys are all naked and circling you. Seems like all the drinking got everyone in the yard pretty horny, although it might have had to do with you strutting your stuff completely naked for some time.'
 
             
-                act 'No, pull out! No!':
 
-                    cla
 
-                    'Igor pulls out the last moment, spraying his jism all over your labia. Phew! That was close'
 
-                    gs 'cum_call', 'labia', 'A173', 1
 
-                    gs 'stat'
 
+        act '...':
 
+    
+        *clr & cla
 
+        gs 'arousal', 'vaginal', 5, 'gangbang', 'rough'
 
+        gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 
+        minut += 3
 
+        gs  'cum_call', 'mouth', 'A172', 1    
+        gs 'stat'
 
 
-                    act 'Take care of Sergei': gt 'hunter_interactions', 'nighttime_gangbang', 'finish'
 
-                end
 
-        
-            end
 
-            end
 
-            end
 
-            end
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_mis_2.jpg"></center>'
 
+        'You are getting fucked from both ends, Sergei pumping your pussy while you are blowing Andrei. You feel Andrei''s cock twitching for a moment before he cums down your throat without warning.'
 
+    
+        act 'Swallow and try to get up':
 
+    
+        *clr & cla
 
+        gs 'arousal', 'vaginal', 5, 'gangbang', 'exhibitionism', 'sub'
 
+        minut -= 1
 
+        gs 'stat'
 
+
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_mis_1.jpg"></center>'
 
+        'Wanting to take a more active part, you try getting up. Sergei pumps your pussy for a couple more minutes before pulling out, letting you stand up.'
 
+    
+        act 'Get up on your feet':
 
+    
+        *clr & cla
 
+        gs 'arousal', 'bj', 5, 'gangbang', 'exhibitionism', 'sub'
 
+        gs 'arousal', 'vaginal', 5, 'gangbang', 'exhibitionism', 'sub'
 
+        minut -= 2
 
+        gs 'stat'
 
+
 
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_bj.jpg"></center>'
 
+        'You spring up and immediately bend down to suck Sergei''s dick. You can taste your juices, lots of it covering his cock.'
 
+        'Meanwhile you feel another dick rubbing against your crack and folds before you feel the head part them apart, slowly sinking in your soaking wet pussy. It is Igor taking you from behind.'
 
+    
+        act '...':
 
+    
+        *clr & cla
 
+        gs 'arousal', 'bj', 5, 'gangbang', 'exhibitionism', 'sub', 'deepthroat'
 
+        gs 'arousal', 'vaginal', 5, 'gangbang', 'exhibitionism', 'sub'
 
+        gs 'stat'
 
+    
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_1.jpg"></center>'
 
+        'Sergei grabs you by the hair, lightly pushing you down his cock. You take him deeper in your throat, your gag reflex suppressed by all the booze you have drank.'
 
+        'You feel Igor picking up his pace, his dick hitting just the right spot faster and faster.'
 
+    
+        act '...':
 
+    
+        *clr & cla
 
+        gs 'arousal', 'hj', 5, 'gangbang', 'exhibitionism', 'sub'
 
+        gs 'arousal', 'vaginal', 10, 'gangbang', 'exhibitionism', 'sub'
 
+        gs 'stat'
 
+        minut -= 8
 
+    
+        '<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/gangbang_night/gangbang_2.jpg"></center>'
 
+        'Igor''s cock in your pussy feels so good! You cannot even concentrate on sucking Sergei''s dick, letting it go to brace yourself.'
 
+        'Sergei starts stroking himself while Igor keeps drilling your cunt. After a few minutes he grunts "Sveta I''m going to cum"'
 
+            act 'Cum inside me, Igor!':
 
+                cla
 
+                'Hearing your cry, Igor buries his dick all the way inside your pussy in one motion, eliciting a loud gasp from you as he cums deep inside your womanhood.'
 
+                gs 'cum_call', 'right_in_the_babymaker', 'A173', 1 
+                gs 'stat'
 
+    
+                act 'Take care of Sergei': gt 'hunter_interactions', 'nighttime_gangbang', 'finish'
 
             end
 
+        
+            act 'No, pull out! No!':
 
+                cla
 
+                'Igor pulls out the last moment, spraying his jism all over your labia. Phew! That was close'
 
+                gs 'cum_call', 'labia', 'A173', 1
 
+                gs 'stat'
 
+
 
+                act 'Take care of Sergei': gt 'hunter_interactions', 'nighttime_gangbang', 'finish'
 
             end
 
-            end    
+    
+        end
 
+        end
 
+        end
 
+        end
 
+        end
 
+        end
 
+        end    
     end
 
     if $ARGS[1] = 'finish':
 
             *clr & cla

+ 10 - 17
locations/lact_lib.qsrc
Voir le fichier 

@@ -69,6 +69,14 @@ if $ARGS[0] = 'init_breasttissue' and lactation['breasttissueinitiated'] <= 0:
 
 			lactation['breastdensitytype'] = 1
 
 		end
 
 	end
 
+	!!	setting breastdensitypercent (y) with y = -0,95x + 112 with x being svetas salo
 
+	if salo <= 20:
 
+		lactation['breastdensitypercent'] = 93
 
+	elseif salo > 100:
 
+		lactation['breastdensitypercent'] = 17
 
+	else
 
+		lactation['breastdensitypercent'] = 112 - ((95*salo)/100)
 
+	end
 
 	!!	breast tissue that can have mammary glands is nbsize + magicf2b
 
 	!!	Silicone is obviously not a good material to grow milkglands in
 
 	!!	full breastccm would be nbsize + magicf2b + silicone.
 
@@ -86,23 +94,8 @@ if $ARGS[0] = 'init_breasttissue' and lactation['breasttissueinitiated'] <= 0:
 
 	!!	Getting the usuable amount of breast tissue which can actually have mammary glands (in ccm)
 
 	lactation['breastuseabletissue'] = ((lactation['nbsizepercent'] + lactation['magicf2bpercent'])*lactation['breastccm'])/100
 
 	lactation['breastsiliconeccm'] = (lactation['siliconepercent']*lactation['breastccm'])/100
 
-	!!	Getting mammary gland tissue per breast, based on the breastdensitytype. Explaination on the percentages is in the head of the function.
 
-	if lactation['breastdensitytype'] = 1:
 
-		lactation['breastglandtissue'] = (lactation['breastuseabletissue']*17)/100
 
-		lactation['breastdensitypercent'] = 17
 
-	elseif lactation['breastdensitytype'] = 2:
 
-		lactation['breastglandtissue'] = (lactation['breastuseabletissue']*36)/100
 
-		lactation['breastdensitypercent'] = 36
 
-	elseif lactation['breastdensitytype'] = 3:
 
-		lactation['breastglandtissue'] = (lactation['breastuseabletissue']*55)/100
 
-		lactation['breastdensitypercent'] = 55
 
-	elseif lactation['breastdensitytype'] = 4:
 
-		lactation['breastglandtissue'] = (lactation['breastuseabletissue']*74)/100
 
-		lactation['breastdensitypercent'] = 74
 
-	elseif lactation['breastdensitytype'] = 5:
 
-		lactation['breastglandtissue'] = (lactation['breastuseabletissue']*93)/100
 
-		lactation['breastdensitypercent'] = 93
 
-	end
 
+	!!	Getting mammary gland tissue per breast, based on the breastdensitytype/breastdensitypercent. Explaination on the percentages is in the head of the function.
 
+	lactation['breastglandtissue'] = (lactation['breastuseabletissue']*lactation['breastdensitypercent'])/100
 
 	!!	calculating breast fat per breast
 
 	lactation['breastfat'] = lactation['breastuseabletissue'] - lactation['breastglandtissue']
 
 	!!	calculating alveolicount per breast Alveoli volume 2.18mm² (flat), milk volume 0.18mm³ (flat) and 4mm³ (inflated), milk volume 2mm³ (inflated) 1000 mm³ = 1 cm³

+ 12 - 12
locations/obj_din.qsrc
Voir le fichier 

@@ -370,11 +370,11 @@ if $ARGS[0] = 'husb_cheat_count':
 
 		end
 
 	end
 
 	if before_h_girl > 0 and before_h_guy > 0:
 
-		'During your marriage you have cheated with your husband with <<guy_cheat>> guys and <<girl_cheat>> girls.'
 
+		'During your marriage you have cheated on your husband with <<guy_cheat>> guys and <<girl_cheat>> girls.'
 
 	elseif before_h_guy > 0:
 
-		'During your marriage you have cheated with your husband with <<guy_cheat>> guys.'
 
+		'During your marriage you have cheated on your husband with <<guy_cheat>> guys.'
 
 	elseif before_h_girl > 0:
 
-		'During your marriage you have cheated with your husband with <<girl_cheat>> girls.'
 
+		'During your marriage you have cheated on your husband with <<girl_cheat>> girls.'
 
 	end
 
 end
 
 
@@ -2236,49 +2236,49 @@ if $ARGS[0] = 'piercing':
 
 	'<center>'
 
 	if pirsA = 0 and pirsB = 0 and pirsC = 0 and pirsD = 0 and pirsE = 0 and pirsF = 0 and pirsN = 0 and pirsG = 0 and pirsGL = 0:
 
 		'You have no piercings.'
 
-	elseif pirsA = 10000 and pirsB = 10000 and pirsC = 10000 and pirsD = 10000 and pirsE = 10000 and pirsF = 10000 and pirsN = 10000 and pirsG = 10000 and pirsGL = 10000:
 
+	elseif (pirsA = 10000 or pirsA = 0) and (pirsB = 10000 or pirsB = 0) and (pirsC = 10000 or pirsC = 0) and (pirsD = 10000 or pirsD = 0) and (pirsE = 10000 or pirsE = 0) and (pirsF = 10000 or pirsF = 0) and (pirsN = 10000 or pirsN = 0) and (pirsG = 10000 or pirsG = 0) and (pirsGL = 10000 or pirsGL = 0):
 
 		'You are not wearing any piercings'
 
 	else
 
 		*pl
 
 		if pirsA > 0 and pirsA < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsA''">Tongue</a> | '
 
 		else
 
-		*p 'Tongue | '
 
+			*p 'Tongue | '
 
 		end
 
 		if pirsB > 0 and pirsB < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsB''">Lips</a> | '
 
 		else
 
-		*p 'lips | '
 
+			*p 'lips | '
 
 		end
 
 		if pirsC > 0 and pirsC < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsC''">Ears</a> | '
 
 		else
 
-		*p 'Ears | '
 
+			*p 'Ears | '
 
 		end
 
 		if pirsD > 0 and pirsD < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsD''">Nose</a> | '
 
 		else
 
-		*p 'Nose | '
 
+			*p 'Nose | '
 
 		end
 
 		if pirsE > 0 and pirsE < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsE''">Eyebrows</a> | '
 
 		else
 
-		*p 'Eyebrows | '
 
+			*p 'Eyebrows | '
 
 		end
 
 		if pirsF > 0 and pirsF < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsF''">Nipples</a> | '
 
 		else
 
-		*p 'Nipples | '
 
+			*p 'Nipples | '
 
 		end
 
 		if pirsN > 0 and pirsN < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsN''">Navel</a> | '
 
 		else
 
-		*p 'Navel | '
 
+			*p 'Navel | '
 
 		end
 
 		if pirsG > 0 and pirsG < 10000:
 
 			*p '<a href="exec:gs ''obj_din'', ''pirsG''">Pussy</a>'
 
 		else
 
-		*p 'Pussy'
 
+			*p 'Pussy'
 
 		end
 
 	end
 
 	'</center>'