changes, cleaning spaces and fixing bugs reported by analyzer

locations/DNA.qsrc

@@ -670,7 +670,7 @@ npc_spermpot['A<<npctemp>>'] = 15000
 
 
 npctemp = 218
-$npc_dna['A<<npctemp>>'] = '5202110092 7845565703 6464348916 9732666365 5079835231 5694584637 6691107840'	
+$npc_dna['A<<npctemp>>'] = '5202110092 7845565703 6464348916 9732666365 5079835231 5694584637 6691107840'
 !! Her dads DNA: 6464348916 5694584637 6691107840 5573828639 2708900987 2978548641 1067638646
 $npc_firstname['A<<npctemp>>'] = 'Tanya'
 $npc_nickname['A<<npctemp>>'] = 'Tanya'

locations/comands.qsrc

@@ -13,7 +13,7 @@ iif
 	if pcs_humint <= 40 or pcs_intel <= 50:
 		act 'Oh, I will do':
 			slova -= 3
-			if slova < 0: 
+			if slova < 0:
 				gt 'mod_public_WC_kara', '0sliv'
 			else
 				gt 'mod_public_WC_rab_Task','taskdo'
@@ -23,7 +23,7 @@ iif
 	if pcs_humint <= 60 or pcs_intel <= 70:
 		act 'Ok, I''ll do':
 			slova -= 3
-			if slova < 0: 
+			if slova < 0:
 				gt 'mod_public_WC_kara', '0sliv'
 			else
 				gt 'mod_public_WC_rab_Task','taskdo'
@@ -33,17 +33,17 @@ iif
 	if pcs_humint <= 80 or pcs_intel <= 90:
 		act 'Ok':
 			slova -= 1
-			if slova < 0: 
+			if slova < 0:
 				gt 'mod_public_WC_kara', '0sliv'
 			else
 				gt 'mod_public_WC_rab_Task','taskdo'
 			end
 		end
 	end
-	if pcs_humint > 80 or pcs_intel > 90: 
+	if pcs_humint > 80 or pcs_intel > 90:
 		act 'Nod "yes"':
 			slova -= 0
-			if slova < 0: 
+			if slova < 0:
 				gt 'mod_public_WC_kara', '0sliv'
 			else
 				gt 'mod_public_WC_rab_Task','taskdo'

locations/cum manage.qsrc

@@ -440,7 +440,7 @@ if $ARGS[0] = '':
 					else
 						pcs_cp_safe_known += 1
 					end
-				!! pretty safe creampie (if cycle = 3 or cycle = 0):	
+				!! pretty safe creampie (if cycle = 3 or cycle = 0):
 				elseif cycle = 0 or cycle = 3:
 					if sexunaware = 1 or sexcontra = 6:
 						pcs_cp_notsafe_unknown += 1
@@ -455,8 +455,8 @@ if $ARGS[0] = '':
 						pcs_cp_risky_known += 1
 					end
 				end
-			end	
-			
+			end
+
 !!{	If you arent getting it in the vagina, and the boy isnt pumping it into a condom, a spatter is made and applied.
 !!	If you arent wearing any panties and it was called to hit your panties, it goes directly to your groin.
 !!	If you are naked and it calls for a clothing strike, it will go to your body instead.}

locations/hint2.qsrc

@@ -74,7 +74,7 @@ finally
 'foreplay_give' - giving other stuff
 All acts are from Sveta''s perspective and in cases of both giving and receiving, receiving should be used.
 ARGS[1] for time taken in minutes - it is use partly for arousal calculation and partly for moving time ahead. If you want to calculate just the arousal and do not move time (simultaneous stimulation), use negative value.
-$ARGS[2] can be used for passing the name of boys dick variable .. 'dick' is default, which belong to $boy, else can be passed 'dick1' .. 'dick4' or 'dick[i]' along the boys parameters activation 
+$ARGS[2] can be used for passing the name of boys dick variable .. 'dick' is default, which belong to $boy, else can be passed 'dick1' .. 'dick4' or 'dick[i]' along the boys parameters activation
 $ARGS[2] - [8] Are optional but can be upto 7 fetishes involved in the act and can be any of the following:
 'maso' 'bound' 'beast' 'exhibitionism' 'rough' 'prostitution' 'dom' 'sub' 'incest' 'feet' 'lesbian' 'group' 'gangbang' 'humiliation' 'deepthroat' 'unknown' 'gloryhole' 'rape' 'futa'
 Format to use: gs 'arousal', 'act', 'duration', 'fetish', 'fetish', 'fetish', 'fetish', 'fetish', 'fetish', 'fetish'

locations/hints.qsrc

@@ -138,9 +138,9 @@ if water_heated > 5 and (inhibition < 85 or hunter_sexual_comfort > 25):
 			*clr & cla
 			gs 'willpower', 'pay', 'self'
 			gs 'stat'
-			
+
 			'Event text'
-			
+
 			act 'Next action': gt 'farawayistan'
 		end
 	else
@@ -184,7 +184,7 @@ if water_heated > 5 and (inhibition < 85 or hunter_sexual_comfort > 25):
 		if pcs_ftbll > 0: gs 'show_table', '<<pcs_ftbll>> Football', '2'
 		if pcs_wrstlng > 0: gs 'show_table', '<<pcs_wrstlng>> Wrestling', '2'
 		if pcs_shoot > 0: gs 'show_table', '<<pcs_shoot>> Marksmanship', '2'
-		if pcs_bushcraft > 0: gs 'show_table', '<<pcs_bushcraft>> Bushcraft', '2'	
+		if pcs_bushcraft > 0: gs 'show_table', '<<pcs_bushcraft>> Bushcraft', '2'
 		if pcs_chess > 0: gs 'show_table', '<<pcs_chess>> Chess', '2'
 		if pcs_icesktng > 0: gs 'show_table', '<<pcs_icesktng>> Ice Skating', '2'
 		if pcs_gaming > 0: gs 'show_table', '<<pcs_gaming>> Gaming', '2'
@@ -268,14 +268,14 @@ if car > 0 and cardrive = 24:
 
 !!To use it call it with gs 'willpower', 'action', 'type'
 !!Action: Determines what action sveta is resisting, forcing somebody to do or forcing herself to do
-!!List of actions: 
+!!List of actions:
 !!		'voyeur', 'flash', 'mast', 'hj', 'bj', 'cuni', 'sex', 'anal', 'group', 'gangbang', 'prostitution', 'swallow', 'cum_inside', 'cum_inside_anal', 'rape',
 !!		'kiss', 'humiliation', 'footjob', 'titjob', 'trib', 'rimming', 'BDSM', 'pee', 'cum_outside', 'drink', 'drugs', 'crime', 'exhib', 'sleep'
 !!		there is also 'foreplay' for things like touching and fondling
-!!		and two special cases 'misc' and 'skill' 
-!!Type: Determines what kind of willpower check sveta needs to do ('resist', 'force', 'self'). 
-!!		-'resist' is used if sveta is resisting to do the 'action' somebody else wants her to do. 
-!!		-'force' is used if sveta forces somebody else to do the 'action'. 
+!!		and two special cases 'misc' and 'skill'
+!!Type: Determines what kind of willpower check sveta needs to do ('resist', 'force', 'self').
+!!		-'resist' is used if sveta is resisting to do the 'action' somebody else wants her to do.
+!!		-'force' is used if sveta forces somebody else to do the 'action'.
 !!		-'self' should be used if sveta forces herself to do the 'action' (this should be used only in rare occasions)
 
 !!Example 1: Sveta is forcing somebody to perform a blowjob: gs 'willpower', 'bj', 'force'

locations/mod_public_WC.qsrc

@@ -308,6 +308,7 @@ elseif $loc = 'city_park' and menu_off = 0:
 	end
 end
 
+
 if $loc = 'gadforest' and zustrich > 90:
 	if Vania = 2 or Tolik = 2 or Artem = 2:
 		'( ◣∀◢)ψ'
@@ -319,6 +320,7 @@ if $loc = 'gadforest' and zustrich > 90:
 	end
 end
 
+
 if ($loc = 'mod_public_WC_rab' and $menu_loc ! 'bed2') or ($loc = 'mod_public_WC_rab_DVIR' and $menu_loc ! 'bed2'):
 	if Vania = 2 or Tolik = 2 or Artem = 2:
 		'( ◣∀◢)ψ'
@@ -355,6 +357,8 @@ if $loc = 'mod_public_WC_rab' or $loc = 'mod_public_WC_rab_DVIR':
 	end
 end
 
+
+
 if zashmorg = 1:
 	pl '<font color="red">I have Whore collar on my neck.</font>'
 	pl 'I can <a href="exec:gt ''mod_public_WC_rab_zashmorg'', ''start''">dress off</a> a <a href="exec:gs ''mod_public_WC_rab'',''img msg'',''mod/public_WC/lisrab/Vania/items/zashmorg.jpg''">Whore collar</a>.'
@@ -379,6 +383,7 @@ if zashmorg = 3:
 		temp = rand (1,50) - VaniaMayster
 		if temp <= 1:
 			VaniaMayster += rand(0,1)
+			'"Nice look, my pet" - Vania said'
 		end
 	end
 end
@@ -424,6 +429,7 @@ if ($loc = 'mod_public_WC_rab' or $loc = 'mod_public_WC_rab_DVIR') and ttemp ! 2
 	end
 end
 
+
 if gun = 1:
 	pl 'There''s a <a href="exec:gt ''mod_public_WC_rab_gun'', ''start''">gun</a> in my purse.'
 end
@@ -439,8 +445,9 @@ if ogirok = 1:
 end
 
 if zucchini = 1:
+	if $curloc = 'selfplay': act 'play with the cucumber': gt 'mod_public_WC_rab_zashmorg', 'zucchini'
 	if Artem ! 1 and Tolik ! 1 and Vania ! 1:
-		if $location_type = 'secluded':
+		if $location_type = 'secluded' or $curloc = 'selfplay':
 			pl 'I can <a href="exec:gt ''mod_public_WC_rab_zashmorg'', ''zucchini''">use</a> zucchini for my pleasure.'
 		else
 			pl 'If I find secluded place, I can have some pleasure time with the zucchini.'
@@ -448,8 +455,9 @@ if zucchini = 1:
 	end
 end
 if apple = 1:
+	if $curloc = 'selfplay': act 'play with the cucumber': gt 'mod_public_WC_rab_zashmorg', 'apple'
 	if Artem ! 1 and Tolik ! 1 and Vania ! 1:
-		if $location_type = 'secluded':
+		if $location_type = 'secluded' or $curloc = 'selfplay':
 			pl 'I can <a href="exec:gt ''mod_public_WC_rab_zashmorg'', ''apple''">use</a> apple for my pleasure.'
 		else
 			pl 'If I find secluded place, I can have some pleasure time with the apple.'
@@ -457,8 +465,9 @@ if apple = 1:
 	end
 end
 if ogirok = 1:
+	if $curloc = 'selfplay': act 'play with the cucumber': gt 'mod_public_WC_rab_zashmorg', 'ogirok'
 	if Artem ! 1 and Tolik ! 1 and Vania ! 1:
-		if $location_type = 'secluded':
+		if $location_type = 'secluded' or $curloc = 'selfplay':
 			pl 'I can <a href="exec:gt ''mod_public_WC_rab_zashmorg'', ''ogirok''">use</a> cucumber for my pleasure.'
 		else
 			pl 'If I find secluded place, I can have some pleasure time with the cucumber.'
@@ -487,6 +496,7 @@ end
 
 pl '<a href="exec:gt ''mod_public_WC_options2''">Public_WC Options</a>.'
 
+
 if $curloc = 'miroslava' and mirapimp = 1 and miraprost > 0:
 	if getmoney = 1 and getmoneyd ! day:
 		act 'What about my percentage?':
@@ -507,6 +517,7 @@ if $curloc = 'miroslava' and mirapimp = 1 and miraprost > 0:
 			getmoneyd = day
 			getmoneym = month
 			getmoney = 1
+			gs 'stat'
 			cla
 			gt 'miroslava'
 		end
@@ -517,6 +528,9 @@ if crime >= rand(50,1000):
 	gt 'mod_public_WC_cabine_crime', 'start'
 end
 
+
+
+
 if fightEnding > 0 and gun = 1 and ammo > 0:
 	act 'shoot in air':
 		ztemp = 0
@@ -556,12 +570,30 @@ if $menu_arg = 'viranda' and week ! 6 and Vurok >= 1 and hour >= 15 and hour <=
 	act 'Go to the master''s Vania lesson': gt 'mod_public_WC_rab_Mayster', 'enter'
 elseif $menu_arg = 'viranda' and week = 6 and Vurok >= 1 and hour >= 15 and hour <= 18 and vday > 0:
 	'It''s Saturday, no lesson for me.'
+	if vday - daystart > 1: vday = daystart + 1
+	if vday - daystart = 0: vday = daystart + 1
 end
 if Vurok >= 1 and vday = daystart and week = 6:
 	vday += 1
 end
 
+if pierc = 1 and rand(1,100) >= 65 and Vania = 1 and $clothingworntype ! 'nude':
+	gt 'mod_public_WC_rab_Mayster5', 'piercing'
+elseif pierc = 2 and rand(1,100) >= 65 and Vania = 1 and $clothingworntype ! 'nude':
+	gt 'mod_public_WC_rab_Mayster5', 'piercing'
+end
+
 if month = 8 and day = 24:
+	pl '<b>ПТН ПНХ</b>'
+	pl '<b>PTN PNH</b>'
+	pl '<b>Путін - хуйло!</b>'
+	pl '<b>Putin – khuylo! (commonly translated as "Putin is a dickhead")</b>'
+elseif month = 9 and day = 17:
+	pl'<b>today in 1939 russia invasion Poland to support their ally Nazi Germany</b>'
+elseif month = 11 and day >= 24 and week = 6:
+	pl '<b>Remembrance Day for the victims of the Holodomor-genocide created by russia.</b>'
+else
+	''
 end
 
 if Vania = 1 and vaniaplag = 1 and rand(1,10) <= 3:
@@ -576,4 +608,18 @@ if Vania = 1 and vaniaplag = 1 and rand(1,10) <= 3:
 	gs 'stat'
 end
 
+
+if VaniaMayster >= 1 and vtecha ! 1:
+	if VaniaMayster >= 120: $vm = '<font color = red	> Vania is my MASTER! </font> '
+	if VaniaMayster >= 100 and VaniaMayster < 120: $vm = '<font color = red	> █████ </font> '
+	if VaniaMayster >= 80 and VaniaMayster < 100: $vm = '<font color = yellow	> ████_ </font> '
+	if VaniaMayster >= 60 and VaniaMayster < 80: $vm = '<font color = yellow	> ███__ </font> '
+	if VaniaMayster >= 40 and VaniaMayster < 60: $vm = '<font color = green	> ██___ </font> '
+	if VaniaMayster >= 20 and VaniaMayster < 40: $vm = '<font color = blue	> █____ </font> '
+	if VaniaMayster < 20: $vm = '<font color = red	> Pff, he tries to control me, but he is NOT!</font> '
+	pl '<center>I see Vania as my master: <<$vm>></center>'
+end
+
+
+
 --- mod_public_WC ---------------------------------

locations/mod_public_WC_cabine.qsrc

@@ -1,5 +1,4 @@
 # mod_public_WC_cabine
-
 if $ARGS[0] = 'start':
 	CLOSE ALL
 	$location_type = 'public_indoors'
@@ -22,6 +21,7 @@ if $ARGS[0] = 'start':
 	odianadveriah = 0
 	gandon = 0
 
+
 	ghnow = 0
 	gs 'themes', 'indoors'
 	'<center><b><font color="maroon">Public toilet</font></b></center>'
@@ -50,6 +50,8 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
+
 if $ARGS[0] = 'mod_public_WC_cabine_WORK':
 	*clr & cla
 	minut +=5
@@ -61,6 +63,7 @@ if $ARGS[0] = 'mod_public_WC_cabine_WORK':
 		colir = 1
 	end
 	dick = rand(14,30)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 	'<center><b><font color="maroon">Toilet cabine</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sitting.jpg"></center>'
@@ -137,6 +140,8 @@ if $ARGS[0] = 'mod_public_WC_cabine_WORK':
 		end
 	end
 
+
+
 	if siga > 0:
 		act 'smoke':
 			if rand(1,4) = 1:
@@ -204,6 +209,16 @@ if $ARGS[0] = 'mod_public_WC_cabine_WORK':
  	if rand (1,100) <= 15 and odianadveriah = 3:
 		*clr & cla
 		'I see my clothes being pulled from the door to that side.'
+
+		dynamic $clothingworntype + '_h[<<clothingwornnumber>>] -= 100'
+		!add remove clothes if worn out
+		if dyneval('RESULT = <<$clothingworntype>>_h[<<clothingwornnumber>>]') <= 0:
+
+			gadforest_clothestorn = 1
+			gs 'mod_public_WC_cabine', 'strip', 'gadforest'
+			gs 'stat'
+		end
+
 		'I hear someone laughing running out of the toilet.'
 		'OMG!!! I have no clothes'
 		odianadveriah = 0
@@ -344,10 +359,12 @@ if $ARGS[0] = 'hole':
 						'<center><video autoplay loop src="mod/public_WC/wc/gh/ch/start/startv (2).mp4"></video></center>'
 					end
 
+
 					'The man slips few <b>₽</b> banknots into the hole near your head.'
 					act 'Blow Him': gt 'mod_public_WC_cabine', 'blowjob'
 				elseif gloryhole > 0:
 					dick = rand (10,40)
+					npc_dick[$npclastgenerated] = dick
 					if colir = 1:
 						'White <<dick>> cm dick comes through the hole'
 						if 25 >= rand(1,100):
@@ -521,6 +538,7 @@ if $ARGS[0] = 'hole':
 								'few banknots slips through the hole'
 								'I see his dick comes throught the hole'
 
+
 								$dodatkovi = rand(1,5) * 50
 								$GROSHI = 150 + $dodatkovi
 								money += $GROSHI
@@ -528,6 +546,8 @@ if $ARGS[0] = 'hole':
 
 								gs 'stat'
 
+
+
 								if colir = 1:
 									'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/wait/walldick1.jpg"></center>'
 								else
@@ -755,6 +775,7 @@ if $ARGS[0] = 'blowjob':
 								'Fuck you! Bitch!!!'
 								'The jerk go away'
 
+
 								ghnow -= rand(0,2)
 								if ghnow < 0: ghnow = 0
 
@@ -854,6 +875,8 @@ if $ARGS[0] = 'blowjob':
 		minut += 3
 		gs 'stat'
 
+
+
 		gs 'willpower', 'exhib', 'self', 'hard'
 		if will_cost <= pcs_willpwr:
 			act 'make a stories on ВКонтакте (<<will_cost>> Willpower)':
@@ -885,6 +908,8 @@ if $ARGS[0] = 'blowjob':
 			act 'make a stories on ВКонтакте (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
+
+
 		if bfa >= 1:
 			gs 'willpower', 'exhib', 'self', 'hard'
 			if will_cost <= pcs_willpwr:
@@ -941,6 +966,7 @@ if $ARGS[0] = 'blowjob':
 			gs 'arousal', 'end'
 			gs 'stat'
 
+
 			if colir = 1:
 				temp = rand(1,2)
 				if temp = 1:
@@ -957,6 +983,7 @@ if $ARGS[0] = 'blowjob':
 				end
 			end
 
+
 			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -985,6 +1012,7 @@ if $ARGS[0] = 'blowjob':
 				end
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1003,6 +1031,8 @@ if $ARGS[0] = 'blowjob':
 				gs 'stat'
 			end
 
+
+
 			if colir = 1:
 				temp = rand(1,2)
 				if temp = 1:
@@ -1016,6 +1046,7 @@ if $ARGS[0] = 'blowjob':
 
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1083,6 +1114,7 @@ if $ARGS[0] = 'blowjob':
 						spafinloc = 11
 						gs 'cum_manage'
 
+
 						spafinloc = 12
 						gs 'cum_manage'
 
@@ -1138,6 +1170,7 @@ if $ARGS[0] = 'blowjob':
 						spafinloc = 11
 						gs 'cum_manage'
 
+
 						spafinloc = 12
 						gs 'cum_manage'
 
@@ -1158,6 +1191,7 @@ if $ARGS[0] = 'blowjob':
 							gs 'stat'
 						end
 
+
 						act 'Get up':
 							gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 						end
@@ -1174,6 +1208,8 @@ if $ARGS[0] = 'blowjob':
 	end
 end
 
+
+
 if $ARGS[0] = 'hj':
 	*clr & cla
 	if temp ! 3004:
@@ -1275,6 +1311,7 @@ if $ARGS[0] = 'hj':
 								'Fuck you! Bitch!!!'
 								'The jerk go away'
 
+
 								ghnow -= rand(0,2)
 								if ghnow < 0: ghnow = 0
 
@@ -1319,6 +1356,7 @@ if $ARGS[0] = 'hj':
 		end
 	end
 
+
 	if gandon = 0:
 		if colir = 1:
 			'<center><video autoplay loop src="mod/public_WC/wc/gh/b/hj/hjv ('+rand(1,4)+').mp4"></video></center>'
@@ -1356,6 +1394,7 @@ if $ARGS[0] = 'hj':
 		act 'Grab 2nd Dick':gt 'mod_public_WC_cabine', '2D'
  	end
 
+
 	act 'Blow Him':
 		money += 25*rand(0,4)
 		gt 'mod_public_WC_cabine', 'blowjob'
@@ -1409,6 +1448,7 @@ if $ARGS[0] = 'hj':
 			act 'make a stories on ВКонтакте (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
+
 		if bfa >= 1:
 			gs 'willpower', 'exhib', 'self', 'hard'
 			if will_cost <= pcs_willpwr:
@@ -1445,6 +1485,7 @@ if $ARGS[0] = 'hj':
 		gs 'arousal', 'hj', 5, 'unknown', 'sub'
 		gs 'stat'
 
+
 		act 'point on my face':
 			*clr & cla
 			facial += 1
@@ -1469,6 +1510,7 @@ if $ARGS[0] = 'hj':
 				end
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1477,6 +1519,8 @@ if $ARGS[0] = 'hj':
 			*clr & cla
 			facial += 1
 
+
+
 			gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 			gs 'stat'
 			gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -1487,6 +1531,8 @@ if $ARGS[0] = 'hj':
 				gs 'stat'
 			end
 
+
+
 			if colir = 1:
 				temp = rand(1, 7)
 				if temp <= 3:
@@ -1500,6 +1546,7 @@ if $ARGS[0] = 'hj':
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 			end
 
+
 			'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1521,10 +1568,12 @@ if $ARGS[0] = 'hj':
 					'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/gandon/ch/cum/anal1.jpg"></center>'
 				end
 
+
 				gs 'cum_call', 'internalcondom'
 				gs 'arousal', 'end'
 				gs 'stat'
 
+
 				'I see how his cum fill up his condom'
 
 				if trt_cumeater = 1:
@@ -1547,6 +1596,7 @@ if $ARGS[0] = 'hj':
 						spafinloc = 11
 						gs 'cum_manage'
 
+
 						spafinloc = 12
 						gs 'cum_manage'
 
@@ -1602,6 +1652,7 @@ if $ARGS[0] = 'hj':
 						spafinloc = 11
 						gs 'cum_manage'
 
+
 						spafinloc = 12
 						gs 'cum_manage'
 
@@ -1622,6 +1673,7 @@ if $ARGS[0] = 'hj':
 							gs 'stat'
 						end
 
+
 						act 'Get up':
 							gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 						end
@@ -1654,6 +1706,7 @@ if $ARGS[0] = 'hj':
 					gs 'stat'
 				end
 
+
 				if colir = 1:
 					'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/b/cum/tilo/tiloc ('+rand(1,2)+').jpg"></center>'
 
@@ -1676,6 +1729,8 @@ if $ARGS[0] = 'hj':
 	end
 end
 
+
+
 if $ARGS[0] = 'lj':
 	*clr & cla
 	guy += 1
@@ -1721,6 +1776,7 @@ if $ARGS[0] = 'lj':
 		act 'Grab 2nd Dick':gt 'mod_public_WC_cabine', '2D'
  	end
 
+
 	act 'Blow Him':
 		money += 25*rand(0,4)
 		gt 'mod_public_WC_cabine', 'blowjob'
@@ -1734,6 +1790,7 @@ if $ARGS[0] = 'lj':
 		end
 	end
 
+
 	act 'Continue to masturbate':
 		*clr & cla
 
@@ -1754,9 +1811,13 @@ if $ARGS[0] = 'lj':
 		gs 'arousal', 'footjob', 5, 'unknown', 'sub'
 		gs 'stat'
 
+
 		act 'he cums':
 			*clr & cla
 
+
+
+
 			gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 			gs 'stat'
 			gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -1769,18 +1830,23 @@ if $ARGS[0] = 'lj':
 				gs 'stat'
 			end
 
+
+
 			if colir = 1:
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/cumtilo/ct ('+rand(1,4)+').jpg"></center>'
 			else
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/cumtilo/ct ('+rand(1,4)+').jpg"></center>'
 			end
 
+
 			'He is sprinking cum all over me.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
 	end
 end
 
+
+
 if $ARGS[0] = 'ghsex':
 	*clr & cla
 	money += 25*rand(0,7)
@@ -1803,12 +1869,14 @@ if $ARGS[0] = 'ghsex':
 			gs 'arousal', 'foreplay', 5, 'unknown', 'sub'
 			gs 'stat'
 
+
 			if ghnow >= 4 and gandon = 0:
 				ztemp = 1
 				temp = 100
 				act '"I want your dics together!"':gt 'mod_public_WC_cabine', '2D'
 			end
 
+
 		end
 	end
 	gs 'stat'
@@ -1915,6 +1983,7 @@ if $ARGS[0] = 'anal':
 								'Fuck you! Bitch!!!'
 								'The jerk go away'
 
+
 								ghnow -= rand(0,2)
 								if ghnow < 0: ghnow = 0
 
@@ -1985,6 +2054,8 @@ if $ARGS[0] = 'anal':
 		act 'Grab 2nd Dick':gt 'mod_public_WC_cabine', '2D_vag'
  	end
 
+
+
 	'You rub your wet pussy and get your fingers nice and wet and then rub it on your asshole, you do the same to his dick, then you guide his <<npc_dick[$npclastgenerated]>>cm <<$npc_thdick[$npclastgenerated]>> cock into your ass. You feel his dick enter your tight ass, feelings of pain and pleasure rush through you.'
 	gs 'arousal', 'masturbate', 5, 'unknown', 'sub'
 	gs 'arousal', 'anal', 5, 'unknown', 'sub'
@@ -2055,6 +2126,7 @@ if $ARGS[0] = 'anal':
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/asscum/asscum ('+rand(1,12)+').jpg"></center>'
 			end
 
+
 			'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
 
 			act 'Get up': gt'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
@@ -2065,6 +2137,7 @@ if $ARGS[0] = 'anal':
 			swallow += 1
 			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
 
+
 			if colir = 1:
 				temp = rand(1,2)
 				if temp = 1:
@@ -2124,6 +2197,7 @@ if $ARGS[0] = 'anal':
 		if gandon = 1:
 			*clr & cla
 
+
 			if gandon = 0:
 				if colir = 1:
 					'<center><video autoplay loop src="mod/public_WC/wc/gh/b/anal/analv.mp4"></video></center>'
@@ -2179,6 +2253,7 @@ if $ARGS[0] = 'anal':
 						spafinloc = 11
 						gs 'cum_manage'
 
+
 						spafinloc = 12
 						gs 'cum_manage'
 
@@ -2234,6 +2309,7 @@ if $ARGS[0] = 'anal':
 						spafinloc = 11
 						gs 'cum_manage'
 
+
 						spafinloc = 12
 						gs 'cum_manage'
 
@@ -2254,6 +2330,7 @@ if $ARGS[0] = 'anal':
 							gs 'stat'
 						end
 
+
 						act 'Get up':
 							gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 						end
@@ -2309,6 +2386,7 @@ if $ARGS[0] = 'pussy2':
 
 	gs 'stat'
 
+
 	if gandon = 1 and temp ! 3004:
 		act 'remove condom':
 			*clr & cla
@@ -2401,6 +2479,7 @@ if $ARGS[0] = 'pussy2':
 								'Fuck you! Bitch!!!'
 								'The jerk go away'
 
+
 								ghnow -= rand(0,2)
 								if ghnow < 0: ghnow = 0
 
@@ -2445,6 +2524,9 @@ if $ARGS[0] = 'pussy2':
 		end
 	end
 
+
+
+
 	if gandon = 0:
 		if colir = 1:
 			'<center><video autoplay loop src="mod/public_WC/wc/gh/b/vag/vag ('+rand(1,4)+').mp4"></video></center>'
@@ -2471,8 +2553,11 @@ if $ARGS[0] = 'pussy2':
 		end
 	end
 
+
 	gs 'mod_public_WC_cabine', 'pussy'
 
+
+
 	if ghnow >= 4 and gandon = 0:
 		'<center><video autoplay loop src="mod/public_WC/wc/gh/d2/show/2D_anal.mp4"></video></center>'
 		'You see a new dick comes from the another hole, which you didn''t notice before.'
@@ -2481,6 +2566,10 @@ if $ARGS[0] = 'pussy2':
 		act 'Grab 2nd Dick': gt 'mod_public_WC_cabine', '2D_vag'
  	end
 
+
+
+
+
 	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly.'
 	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
 	gs 'stat'
@@ -2489,6 +2578,7 @@ if $ARGS[0] = 'pussy2':
 			*clr & cla
 			gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
 
+
 			if gandon = 0:
 				if colir = 1:
 					if rand(1,7) <= 5:
@@ -2505,6 +2595,8 @@ if $ARGS[0] = 'pussy2':
 				end
 			end
 
+
+
 			'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
 			gs 'cuminsidereact', 'an unknown guy from the gloryhole'
 			gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
@@ -2515,6 +2607,8 @@ if $ARGS[0] = 'pussy2':
 			act 'Get dressed': gt'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
 
+
+
 		act 'Quickly turn around and get on your knees':
 			*clr & cla
 
@@ -2525,6 +2619,7 @@ if $ARGS[0] = 'pussy2':
 				gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
 				temp = rand(1,11)
 
+
 				if colir = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -2541,6 +2636,8 @@ if $ARGS[0] = 'pussy2':
 					end
 				end
 
+
+
 				'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 				gs 'arousal', 'bj', 10, 'unknown', 'sub'
 				minut -= 9
@@ -2550,6 +2647,7 @@ if $ARGS[0] = 'pussy2':
 			end
 		end
 
+
 		act 'Let him cum on your face':
 			*clr & cla
 			gs 'willpower', 'swallow', 'resist'
@@ -2562,6 +2660,7 @@ if $ARGS[0] = 'pussy2':
 			gs 'stat'
 			temp = rand(1,2)
 
+
 			if colir = 1:
 				temp = rand(1,5)
 				if temp = 1:
@@ -2578,11 +2677,17 @@ if $ARGS[0] = 'pussy2':
 				end
 			end
 
+
 			'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
 			act 'Get dressed': gt'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
 
+
+
+
+
+
 	else
 		act 'Let him cum':
 			if sexcontra = 4:
@@ -2598,6 +2703,7 @@ if $ARGS[0] = 'pussy2':
 			sexcontra = 0
 			protect = 0
 
+
 			if gandon = 0:
 				if colir = 1:
 					'<center><video autoplay loop src="mod/public_WC/wc/gh/b/vag/vag ('+rand(1,4)+').mp4"></video></center>'
@@ -2624,6 +2730,8 @@ if $ARGS[0] = 'pussy2':
 				end
 			end
 
+
+
 			if trt_cumeater = 1:
 				cla
 				act 'I didn''t want to waste it':
@@ -2644,6 +2752,7 @@ if $ARGS[0] = 'pussy2':
 					spafinloc = 11
 					gs 'cum_manage'
 
+
 					spafinloc = 12
 					gs 'cum_manage'
 
@@ -2699,6 +2808,7 @@ if $ARGS[0] = 'pussy2':
 					spafinloc = 11
 					gs 'cum_manage'
 
+
 					spafinloc = 12
 					gs 'cum_manage'
 
@@ -2719,6 +2829,7 @@ if $ARGS[0] = 'pussy2':
 						gs 'stat'
 					end
 
+
 					act 'Get up':
 						gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 					end
@@ -2739,6 +2850,7 @@ if $ARGS[0] = 'rape':
 	menu_off = 0
 	gs 'stat'
 	dick = rand(9, 25)
+	npc_dick[$npclastgenerated] = dick
 	temp = rand(0,3)
 	if temp = 0: temp = 1
 	if pcs_ftbll >= (1 + (rand(0,100) / temp)) or pcs_run >= (1 + (rand(0,100) / temp)) or pcs_agil >= (10 + rand(0,100)):
@@ -2810,9 +2922,13 @@ if $ARGS[0] = '2D':
 		end
 	end
 
+
+
+
 	if ztemp = 3:
 		'Continuing to suck <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock I think what to do with the newly arrived member'
 
+
 		if colir = 1:
 			temp = rand(1,5)
 			if temp = 1:
@@ -2829,12 +2945,15 @@ if $ARGS[0] = '2D':
 			end
 		end
 
+
 		'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/d2/show/2D_bj.jpg"></center>'
 		gs 'arousal', 'bj', 5, 'unknown', 'sub'
 
+
 	elseif ztemp = 2:
 		'Continuing to jerk <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock I think what to do with the newly arrived member'
 
+
 		if colir = 1:
 			'<center><video autoplay loop src="mod/public_WC/wc/gh/b/hj/hjv ('+rand(1,4)+').mp4"></video></center>'
 		else
@@ -2845,6 +2964,7 @@ if $ARGS[0] = '2D':
 			end
 		end
 
+
 		'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/d2/show/2D.jpg"></center>'
 		gs 'arousal', 'hj', 5, 'unknown', 'sub'
 
@@ -2863,6 +2983,8 @@ if $ARGS[0] = '2D':
 	end
 	gs 'stat'
 
+
+
 	act 'Suck two dicks':
 		*clr & cla
 		$dodatkovo = rand(1,5) * 50
@@ -2893,6 +3015,7 @@ if $ARGS[0] = '2D':
 		end
 	end
 
+
 	act 'spit roasted':
 		*clr & cla
 		$dodatkovo = rand(1,5) * 50
@@ -2948,8 +3071,11 @@ if $ARGS[0] = '2D_vag':
 		gs 'arousal', 'anal', 10, 'unknown', 'sub'
 	end
 
+
 	gs 'stat'
 
+
+
 	act 'Suck two dicks':
 		*clr & cla
 		$dodatkovo = rand(1,4) * 40
@@ -2980,6 +3106,7 @@ if $ARGS[0] = '2D_vag':
 		end
 	end
 
+
 	act 'spit roasted':
 		*clr & cla
 		$dodatkovo = rand(1,5) * 50
@@ -2996,15 +3123,18 @@ if $ARGS[0] = '2D_vag':
 	end
 end
 
+
+
 if $ARGS[0] = 'rape2':
 
 	*clr & cla
 	gs 'fame', 'pav', 'prostitute', 3
 	menu_off = 0
 	gs 'stat'
-	dick = rand(9, 25)
 	gs 'npcgeneratec', 0, 'their leader', rand(21,55)
 	gs 'boyStat', $npclastgenerated
+	dick = rand(9, 25)
+	npc_dick[$npclastgenerated] = dick
 	if ghnow <= 6:
 		if rand(1,2) = 1:
 			rape += 1
@@ -3153,6 +3283,7 @@ if $ARGS[0] = 'cherga':
 		gs 'stat'
 	end
 
+
 	if Atemp = 1:
 		'<<$Nomer>> man in line bent me, and without ceremony, inserted his penis into my vagina'
 
@@ -3163,7 +3294,7 @@ if $ARGS[0] = 'cherga':
 			minut += rand(3,10)
 			gs 'arousal', 'vaginal', -1, 'rough', 'sub', 'group', 'unknown', 'gangbang'
 			gs 'stat'
-			*clr & cla
+			cla
 			gs 'willpower', 'misc', 'self', 'easy'
 			if will_cost <= pcs_willpwr:
 				act 'Please don''t cum in me (<<will_cost>> Willpower)':
@@ -3184,7 +3315,7 @@ if $ARGS[0] = 'cherga':
 
 					else
 						'"Shut up bitch" he sad, and punch you'
-						'<center><video autoplay loop src="mod/public_WC/wc/events/90/fin_vag'+rand(1,2)+'.mp4"></video></center>'
+						'<center><video autoplay loop src="mod/public_WC/wc/events/90/fin_vag_'+rand(1,1)+'.mp4"></video></center>'
 						'OMG, he cumed inside!'
 						gs 'pain', 1, 'asscheeks', 'slap'
 						gs 'cum_call', 'vaginal', 'an unknown guy from the toilet'
@@ -3806,9 +3937,9 @@ if $ARGS[0] = '1gopevent':
 							'After the boys ended up raping me, they invited a black man with a healthy <<npc_dick[$npclastgenerated]>>cm long dick. He started fucking me.'
 							'<center><video autoplay loop src="mod/public_WC/wc/events/90/1gopevent/friend.mp4"></video></center>'
 							gs 'arousal', 'vaginal', rand(35,40), 'sub', 'bound', 'unknown', 'rough', 'rape'
-							gs 'cum_call', 'vaginal', '$boy'
+							gs 'cum_call', 'vaginal', 'black'
 							gs 'cum_manage'
-							gs 'cuminsidereact', '$boy'
+							gs 'cuminsidereact', 'black'
 							gs 'stat'
 							'After filling my womb with semen, the black then went away. The other guys were shooting it on camera. Again, I was put on a bandage, gagged and carried somewhere.'
 							act 'Within minutes, I was brought somewhere':
@@ -3872,6 +4003,7 @@ if $ARGS[0] = 'end1gop1event':
 	'I ended up in <<$tut>>'
 end
 
+
 if $ARGS[0] = '2fotoevent':
 	*clr & cla
 	menu_off = 1
@@ -4054,6 +4186,7 @@ if $ARGS[0] = 'cargo':
 	end
 end
 
+
 if $ARGS[0] = 'carwork':
 	gt 'mod_public_WC_cabine_carwork', 'start'
 end
@@ -4141,6 +4274,89 @@ if $ARGS[0] = 'motuzka':
 	'<center>The rope shackles me by: <<$sylamotuzky>></center>'
 end
 
+if $ARGS[0] = 'strip':
+	!$strip_loc = location when stripping outdoors
+	$strip_loc = $ARGS[1]
+
+	gs 'clothing', 'wear_last_worn'
+	gs 'underwear', 'wear'
+	gs 'stat'
+
+	cumspclnt = 6
+	gs 'cum_cleanup'
+	if cloth_vid = 1:
+		last_vid = 1
+	else
+		last_vid = 0
+	end
+
+
+
+
+	if PCloStyle2 = 4:
+		$schbrand = $clothingworntype
+		schtype = clothingwornnumber
+	end
+
+	if $strip_loc ! '' :
+		DYNAMIC '$CloLos<<$clothingworntype>>[<<clothingwornnumber>>]=<<$strip_loc>>'
+		$CloLosLoc[] = $strip_loc
+		$CloLosTyp[$strip_loc] = $clothingworntype
+		CloLosNum[$strip_loc] = clothingwornnumber
+		CloLosDay[$strip_loc] = daystart
+		KILLVAR '$lastwornclothingtype'
+		KILLVAR 'lastwornclothingnumber'
+	else
+		$lastwornclothingtype = $clothingworntype
+		lastwornclothingnumber = clothingwornnumber
+	end
+
+	killvar '$strip_loc'
+
+	$clothingworntype = 'nude'
+	clothingwornnumber = 0
+	CloQuality = 0
+	CloThinness = 0
+	CloTopCut = 0
+	CloBra = 0
+	CloPantsShortness = 0
+	CloSkirtShortness = 0
+	CloPanties = 0
+	CloStyle = 0
+	CloStyle2 = 0
+	CloBimbo = 0
+	CloOnePiece = 0
+	PShoQuaility = 0
+	PShoCut = 0
+	PShoHeels = 0
+	PShoStyle = 0
+	PCloPanties = 0
+	PCloQuality = 0
+	PCloThinness = 0
+	PCloTopCut = 0
+	PCloPants = 0
+	PCloSkirt = 0
+	PCloStyle = 0
+	PCloStyle2 = 0
+	PCloBimbo = 0
+	PCloInhibit = 0
+	PCloOnePiece = 0
+	PCloswimwear = 0
+	PXCloThinness = 0
+	PXCloTopCut = 0
+	PXCloBottomShortness = 0
+	glamur = 0
+	sport = 0
+	ski = 0
+	ofclo = 0
+	sexual = 0
+	odevnesh = 0
+	! WD: Bimbo look
+	cloth_vid = 0
+	exhibiHideNewCloth = 0
+end
+
+
 killvar '$dodatkovi'
 killvar '$GROSHI'
 killvar 'Atemp'

locations/mod_public_WC_cabine_carwork.qsrc

@@ -34,6 +34,7 @@ if $ARGS[0] = 'start':
 					'Here''s a sign for you, it can help '
 					'He gives me a "cum on my tits" sign'
 
+
 					gs 'willpower', 'prostitution', 'self', 'hard'
 					if will_cost <= pcs_willpwr:
 						act 'I will be good whore, I want 10% (<<will_cost>> Willpower)':
@@ -41,6 +42,7 @@ if $ARGS[0] = 'start':
 							gs 'willpower', 'pay', 'self'
 							gs 'stat'
 
+
 							persuas_exp += rand(1,3)
 							humint_exp += rand(1,3)
 							Carslut = 1
@@ -89,6 +91,7 @@ if $ARGS[0] = 'start':
 			$vidoma = 'village'
 		end
 
+
 		'Hey, Are you that famos <<$vidoma>> slut?'
 
 		killvar '$vidoma'
@@ -126,6 +129,7 @@ if $ARGS[0] = 'start':
 						end
 					end
 
+
 					act 'yes, and 20% is mine':
 						persuas_exp += rand(1,3)
 						humint_exp += rand(1,3)
@@ -153,6 +157,8 @@ if $ARGS[0] = 'start':
 	act 'I am too stoned and can do nothing...': gt 'mod_public_WC_cabine_carwork', 'work'
 end
 
+
+
 if $ARGS[0] = 'work':
 	*clr & cla
 	'Thief came out and I heard that in a few minutes all the doors of the car opened'
@@ -202,6 +208,8 @@ if $ARGS[0] = 'work':
 	end
 end
 
+
+
 if $ARGS[0] = 'cherga':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/wait/wait ('+rand(1,10)+').jpg"></center>'
@@ -249,6 +257,8 @@ if $ARGS[0] = 'cherga':
 		end
 	end
 
+
+
 	act 'wait for a client':
 		cla
 		'He comes to me'
@@ -261,9 +271,9 @@ if $ARGS[0] = 'cherga':
 				'In a shor time he say he want to cum'
 				temp = rand (1,61)
 				if temp <= 39:
-					'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv ('+rand(1,39)+').mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag/vagv ('+rand(1,39)+').mp4"></video></center>'
 				else
-					'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag ('+rand(1,22)+').jpg"></center>'
+					'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag/vag ('+rand(1,22)+').jpg"></center>'
 				end
 				gs 'arousal', 'vaginal', 5, 'unknown', 'prostitution'
 				gs 'stat'
@@ -980,6 +990,7 @@ if $ARGS[0] = 'cherga':
 		end
 	end
 
+
 	if nomer >= 3:
 		gs 'willpower', 'prostitution', 'self', 'hard'
 		if will_cost <= pcs_willpwr:
@@ -988,6 +999,7 @@ if $ARGS[0] = 'cherga':
 				gs 'willpower', 'pay', 'self'
 				gs 'stat'
 
+
 				if strapnumber ! 0:
 					act 'use a <<(strapnumber +1)*5>>cm dildo':
 						*clr & cla
@@ -1041,6 +1053,7 @@ if $ARGS[0] = 'cherga':
 		end
 	end
 
+
 	if nomer >= 10 and rand(1,5) = 1:
 		'I see a car stoppes not far. and the guy look at me with shocked eyes...'
 		act 'Come to that car and ask guy to join':
@@ -1147,6 +1160,7 @@ if $ARGS[0] = 'next':
 	'Next man in a line come to my "manager" pay, and now is going to me...'
 	act 'next':	 gt 'mod_public_WC_cabine_carwork', 'cherga'
 
+
 	if clienty <= 0:
 		*clr & cla
 		'There are no more clients here...'
@@ -1157,6 +1171,7 @@ if $ARGS[0] = 'next':
 			'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/cum/all/all ('+rand(1,4)+').jpg"></center>'
 		end
 
+
 		if $clothingworntype = 'nude':
 			act 'Get dressed':
 				minut+=3
@@ -1167,6 +1182,8 @@ if $ARGS[0] = 'next':
 			end
 		end
 
+
+
 		if Carslut >= 10:
 			act 'ask for money':
 				cla
@@ -1179,6 +1196,7 @@ if $ARGS[0] = 'next':
 				killvar 'nomer'
 				killvar 'clienty'
 
+
 				act 'ask for a ride':
 					cla
 					'Ok girl, lets go'
@@ -1302,6 +1320,7 @@ if $ARGS[0] = 'chergabind':
 		aphrodisiac_have += 1
 		gs 'stat'
 
+
 		if bimbolevel > 0:
 			'The Fuckparade is over. The guys were aggressive, but it''s always nice to please the man.'
 			mood += 10 * bimbolevel
@@ -1345,6 +1364,7 @@ if $ARGS[0] = 'orgiya':
 		minut -= 20
 		gs 'stat'
 
+
 		temp = rand(1,3)
 		if temp = 1:
 			gs 'npcgeneratec', 0, 'rapist', rand(10,30)
@@ -1418,6 +1438,7 @@ if $ARGS[0] = 'orgiya':
 			minut -= 20
 			gs 'stat'
 
+
 			temp = rand(1,3)
 			if temp = 1:
 				gs 'npcgeneratec', 0, 'rapist', rand(10,30)
@@ -1492,6 +1513,7 @@ if $ARGS[0] = 'orgiya':
 				minut -= 20
 				gs 'stat'
 
+
 				temp = rand(1,3)
 				if temp = 1:
 					gs 'npcgeneratec', 0, 'rapist', rand(10,30)

locations/mod_public_WC_cabine_carwork_blurred.qsrc

@@ -222,6 +222,7 @@ if $ARGS[0] = 'start':
 				end
 			end
 
+
 			wait 800
 			if dpussy = 1 and atemp = 1:
 				temp = rand(1,12)
@@ -250,6 +251,8 @@ if $ARGS[0] = 'start':
 				end
 			end
 
+
+
 			act 'blurred memories':
 				clr & cla
 				killvar 'atemp'

locations/mod_public_WC_cabine_ch.qsrc

@@ -7,6 +7,7 @@ if $ARGS[0] = 'start':
 	gs 'npcgeneratec', 0, 'Black Cat', rand(20,40)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,40)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 
 	if agreech = 1:
@@ -35,6 +36,7 @@ if $ARGS[0] = 'start':
 					gs 'arousal', 'bj', 10, 'gloryhole', 'sub'
 					gs 'stat'
 
+
 					if pcs_vag = 0:
 						act 'please, sir, I am a virgin, I want to save myself':
 							cla
@@ -82,6 +84,7 @@ if $ARGS[0] = 'start':
 											spafinloc = 12
 											gs 'cum_manage'
 
+
 											if $clothingworntype = 'nude' and odianadveriah ! 0:
 												act 'Get dressed':
 													minut+=3
@@ -92,6 +95,8 @@ if $ARGS[0] = 'start':
 												end
 											end
 
+
+
 											if temp = 3:
 												act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 											else
@@ -112,6 +117,7 @@ if $ARGS[0] = 'start':
 													gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,40)
 													gs 'boyStat', $npclastgenerated
 													dick = rand(20,40)
+													npc_dick[$npclastgenerated] = dick
 													gs 'stat'
 													'I go out from cabine and ready to met the guys'
 													'Ow, there they are.'
@@ -244,6 +250,7 @@ if $ARGS[0] = 'start':
 												spafinloc = 12
 												gs 'cum_manage'
 
+
 												if $clothingworntype = 'nude' and odianadveriah ! 0:
 													act 'Get dressed':
 														minut+=3
@@ -254,6 +261,8 @@ if $ARGS[0] = 'start':
 													end
 												end
 
+
+
 												if temp = 3:
 													act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 												else
@@ -274,6 +283,7 @@ if $ARGS[0] = 'start':
 														gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,40)
 														gs 'boyStat', $npclastgenerated
 														dick = rand(20,40)
+														npc_dick[$npclastgenerated] = dick
 														gs 'stat'
 														'I go out from cabine and ready to met the guys'
 														'Ow, there they are.'
@@ -382,6 +392,7 @@ if $ARGS[0] = 'start':
 												spafinloc = 12
 												gs 'cum_manage'
 
+
 												if $clothingworntype = 'nude' and odianadveriah ! 0:
 													act 'Get dressed':
 														minut+=3
@@ -392,6 +403,8 @@ if $ARGS[0] = 'start':
 													end
 												end
 
+
+
 												if temp = 3:
 													act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 												else
@@ -412,6 +425,7 @@ if $ARGS[0] = 'start':
 														gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,40)
 														gs 'boyStat', $npclastgenerated
 														dick = rand(20,40)
+														npc_dick[$npclastgenerated] = dick
 														gs 'stat'
 														'I go out from cabine and ready to met the guys'
 														'Ow, there they are.'
@@ -526,6 +540,7 @@ if $ARGS[0] = 'start':
 								spafinloc = 12
 								gs 'cum_manage'
 
+
 								if $clothingworntype = 'nude' and odianadveriah ! 0:
 									act 'Get dressed':
 										minut+=3
@@ -536,6 +551,8 @@ if $ARGS[0] = 'start':
 									end
 								end
 
+
+
 								if temp = 3:
 									act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 								else
@@ -556,6 +573,7 @@ if $ARGS[0] = 'start':
 										gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,40)
 										gs 'boyStat', $npclastgenerated
 										dick = rand(20,40)
+										npc_dick[$npclastgenerated] = dick
 										gs 'stat'
 										'I go out from cabine and ready to met the guys'
 										'Ow, there they are.'
@@ -633,6 +651,7 @@ if $ARGS[0] = 'start':
 		if ytemp ! 27654: 'I hear screams of quarrel for a while, and then silence...'
 		ytemp = 27654
 
+
 		if ztemp = 2:
 			*clr
 			'<center><img <<$set_imgh>> src="mod/public_WC/WC/GH/wait/work_puss.jpg"></center>'
@@ -644,6 +663,7 @@ if $ARGS[0] = 'start':
 		end
 		ztemp = 0
 
+
 		act 'Look at the Hole':
 			*clr & cla
 			gs 'stat'
@@ -681,6 +701,7 @@ if $ARGS[0] = 'start':
 			end
 		end
 
+
 		if $clothingworntype ! 'nude' and gloryhole >= 10:
 			act 'undress':
 				'<center><video autoplay loop src="mod/public_WC/wc/gh/undress.mp4"></video></center>'
@@ -702,6 +723,8 @@ if $ARGS[0] = 'start':
 			end
 		end
 
+
+
 		if $clothingworntype = 'nude' and odianadveriah ! 0:
 			act 'Get dressed':
 				minut+=3
@@ -746,6 +769,7 @@ if $ARGS[0] = 'startrape':
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,40)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,40)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 	'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/1 start/1 meet/grab 1.mp4"></video></center>'
 	act 'try to resist':
@@ -881,6 +905,7 @@ if $ARGS[0] = '2':
 	gs 'npcgeneratec', 0, 'Black Cat', rand(40,50)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(40,50)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 	'OMG!!! This <<dick>> cm dong penetrates me!!!'
 	'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/2 bind/1/vag0 ('+rand(1,2)+').mp4"></video></center>'
@@ -901,6 +926,7 @@ if $ARGS[0] = '2':
 			gs 'npcgeneratec', 0, 'Black Cat', rand(20,40)
 			gs 'boyStat', $npclastgenerated
 			dick = rand(20,40)
+			npc_dick[$npclastgenerated] = dick
 			gs 'stat'
 			'In shor time other guys join'
 			'Time to time they change each other acording to queue or smth...'
@@ -967,6 +993,7 @@ if $ARGS[0] = '2':
 						gs 'npcgeneratec', 0, 'Black Cat', rand(40,50)
 						gs 'boyStat', $npclastgenerated
 						dick = rand(40,50)
+						npc_dick[$npclastgenerated] = dick
 						gs 'stat'
 						'The boys parted. And the monsterdong guy come again'
 						'He puts it in my ass!'
@@ -989,10 +1016,13 @@ if $ARGS[0] = '2':
 								gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 								gs 'boyStat', $npclastgenerated
 								dick = rand(20,30)
+								npc_dick[$npclastgenerated] = dick
 								gs 'stat'
 								'Time to time they change the dicks in my ass'
 								'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/2 bind/2/101/101 ('+rand(1,7)+').mp4"></video></center>'
 
+
+
 								gs 'arousal', 'bj', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 								gs 'stat'
 								minut -= 15
@@ -1005,9 +1035,11 @@ if $ARGS[0] = '2':
 									gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 									gs 'boyStat', $npclastgenerated
 									dick = rand(20,30)
+									npc_dick[$npclastgenerated] = dick
 									gs 'stat'
 									'Time to time they change the dicks in my ass'
 
+
 									'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/2 bind/2/next ass/next ass ('+rand(1,3)+').mp4"></video></center>'
 
 									gs 'arousal', 'bj', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
@@ -1030,6 +1062,7 @@ if $ARGS[0] = '2':
 											'Time to time they change each other'
 											'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/2 bind/3/111/111 ('+rand(1,13)+').mp4"></video></center>'
 
+
 											minut -= 25
 											gs 'arousal', 'anal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 											gs 'arousal', 'bj', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
@@ -1040,6 +1073,7 @@ if $ARGS[0] = '2':
 												'All my holes filled...'
 												'Time to time they change each other'
 
+
 												'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/2 bind/3/next 111/next 111 ('+rand(1,8)+').mp4"></video></center>'
 												minut -= 25
 												gs 'arousal', 'anal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
@@ -1078,6 +1112,7 @@ if $ARGS[0] = '3':
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,30)
+	npc_dick[$npclastgenerated] = dick
 	clienty = rand(5,9)
 	gs 'stat'
 	'They relocate me to the urinal...'
@@ -1103,6 +1138,7 @@ if $ARGS[0] = '4':
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,30)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 	'They make a queue and come to me for blow'
 	clienty -= 1
@@ -1118,10 +1154,12 @@ if $ARGS[0] = '4':
 			spafinloc = 12
 			gs 'cum_manage'
 
+
 			act 'swallow':
 				*clr & cla
 				'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/4 fin/cum/end_swallow.mp4"></video></center>'
 
+
 				act 'wait':
 					*clr & cla
 					'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/4 fin/5 wait'+rand(1,3)+'.mp4"></video></center>'
@@ -1163,6 +1201,7 @@ if $ARGS[0] = '4':
 			spafinloc = 15
 			gs 'cum_manage'
 
+
 			act 'wait':
 				*clr & cla
 				'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/4 fin/5 wait'+rand(1,3)+'.mp4"></video></center>'
@@ -1183,18 +1222,24 @@ if $ARGS[0] = '4':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = '5':
 
 	gs 'stat'
 	gs 'npcgeneratec', 0, 'Black Cat', rand(40,50)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(40,50)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 	gs 'arousal', 'vaginal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 	minut -= 9
 	gs 'pain', rand(0,7), 'vaginal', 'stretch'
 	gs 'stat'
 
+
 	gs 'arousal', 'vaginal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 	minut -= 5
 	gs 'pain', rand(1,4), 'vaginal', 'stretch'
@@ -1203,6 +1248,7 @@ if $ARGS[0] = '5':
 	gs 'npcgeneratec', 0, 'Black Cat', rand(20,40)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,40)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 
 	gs 'arousal', 'bj', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
@@ -1236,6 +1282,7 @@ if $ARGS[0] = '5':
 	gs 'npcgeneratec', 0, 'Black Cat', rand(40,50)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(40,50)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 
 	minut -= 9
@@ -1251,17 +1298,21 @@ if $ARGS[0] = '5':
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,30)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 
+
 	gs 'arousal', 'bj', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 	gs 'stat'
 	minut -= 15
 	gs 'arousal', 'anal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 	gs 'stat'
 
+
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,30)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 
 	gs 'arousal', 'bj', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
@@ -1293,16 +1344,20 @@ if $ARGS[0] = '5':
 	gs 'arousal', 'vaginal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 	gs 'stat'
 
+
+
 	gs 'stat'
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,30)
+	npc_dick[$npclastgenerated] = dick
 	clienty = rand(5,9)
 	gs 'stat'
 
 	gs 'npcgeneratec', 0, 'Black Cat''s gangster', rand(20,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(20,30)
+	npc_dick[$npclastgenerated] = dick
 	gs 'stat'
 
 	'THROUGH A STRONG FEELING OF THE COLD FROM THE URINATOR, I regained consciousness...'
@@ -1321,10 +1376,12 @@ if $ARGS[0] = '5':
 			spafinloc = 12
 			gs 'cum_manage'
 
+
 			act 'swallow':
 				*clr & cla
 				'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/4 fin/cum/end_swallow.mp4"></video></center>'
 
+
 				act 'wait':
 					*clr & cla
 					'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/4 fin/5 wait'+rand(1,3)+'.mp4"></video></center>'
@@ -1366,6 +1423,7 @@ if $ARGS[0] = '5':
 			spafinloc = 15
 			gs 'cum_manage'
 
+
 			act 'wait':
 				*clr & cla
 				'<center><video autoplay loop src="mod/public_WC/WC/events/90/106 If black dick and out/if no/4 fin/5 wait'+rand(1,3)+'.mp4"></video></center>'

locations/mod_public_WC_cabine_crime.qsrc

@@ -145,10 +145,13 @@ if $ARGS[0] = 'start':
 		gt 'mod_public_WC_rab_gun_rob', 'surrender'
 	end
 
+
+
 	temp3 = 50000 / pcs_persuas
 	temp2 = 250000 / pcs_persuas
 	temp1 = 500000 / pcs_persuas
 
+
 	if money >= temp3:
 		act 'offer money':
 

locations/mod_public_WC_cabine_d2.qsrc

@@ -20,6 +20,7 @@ if $ARGS[0] = 'jerk':
 		'<center><video autoplay loop src="mod/public_WC/wc/gh/d2/hj/hjhjv ('+rand(1,7)+').mp4"></video></center>'
 	end
 
+
 	if $cum2 ! -100 and $cum1 ! -100:
 		act 'continue jerking':
 			gt 'mod_public_WC_cabine_d2', 'jerk'
@@ -50,9 +51,12 @@ if $ARGS[0] = 'jerk':
 		end
 	end
 
+
+
 	if $cum1 < 20 and $cum2 < 20 and $cum1 > -100 and $cum2 > -100:
 		*clr & cla
 		temp = rand(1,12)
+		'They both cumed simultaniously.'
 		if temp <= 2:
 			'<center><video autoplay loop src="mod/public_WC/wc/gh/d2/2cum/hjv ('+rand(1,2)+').mp4"></video></center>'
 		elseif temp <= 6:
@@ -61,6 +65,7 @@ if $ARGS[0] = 'jerk':
 			'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/d2/2cum/after ('+rand(1,6)+').jpg"></center>'
 		end
 
+
 		gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 		gs 'stat'
 		gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -105,6 +110,7 @@ if $ARGS[0] = 'jerk':
 				end
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 			act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 		end
@@ -113,6 +119,8 @@ if $ARGS[0] = 'jerk':
 			*clr & cla
 			facial += 1
 
+
+
 			gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 			gs 'stat'
 			gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -123,6 +131,8 @@ if $ARGS[0] = 'jerk':
 				gs 'stat'
 			end
 
+
+
 			if colir = 1:
 				temp = rand(1, 7)
 				if temp <= 3:
@@ -136,6 +146,7 @@ if $ARGS[0] = 'jerk':
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 			end
 
+
 			'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 			act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 		end
@@ -167,6 +178,7 @@ if $ARGS[0] = 'jerk':
 				end
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 			act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 		end
@@ -175,6 +187,8 @@ if $ARGS[0] = 'jerk':
 			*clr & cla
 			facial += 1
 
+
+
 			gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 			gs 'stat'
 			gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -185,6 +199,8 @@ if $ARGS[0] = 'jerk':
 				gs 'stat'
 			end
 
+
+
 			if colir2 = 1:
 				temp = rand(1, 7)
 				if temp <= 3:
@@ -198,6 +214,7 @@ if $ARGS[0] = 'jerk':
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 			end
 
+
 			'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 			act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 		end
@@ -229,6 +246,7 @@ if $ARGS[0] = 'suck':
 
 	'<center><video autoplay loop src="mod/public_WC/wc/gh/d2/bj/hjbjv ('+rand(1,10)+').mp4"></video></center>'
 
+
 	if $cum2 ! -100 and $cum1 ! -100:
 		act 'blow them in turns':
 			temp = 10 + ( ( stat['bj'] + stat['hj'] ) / 2 ) / 10
@@ -243,6 +261,8 @@ if $ARGS[0] = 'suck':
 			gs 'mod_public_WC_cabine_d2', 'man2'
 			gs 'stat'
 
+
+
 			if $cum1 < 20 and $cum2 < 20 and $cum1 > -100 and $cum2 > -100:
 				*clr & cla
 				temp = rand (1,11)
@@ -254,6 +274,7 @@ if $ARGS[0] = 'suck':
 					'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/d2/2cum/after ('+rand(1,6)+').jpg"></center>'
 				end
 
+
 				gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 				gs 'stat'
 				gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -282,6 +303,7 @@ if $ARGS[0] = 'suck':
 						gs 'arousal', 'end'
 						gs 'stat'
 
+
 						if colir = 1:
 							temp = rand(1,2)
 							if temp = 1:
@@ -298,6 +320,7 @@ if $ARGS[0] = 'suck':
 							end
 						end
 
+
 						'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -326,6 +349,7 @@ if $ARGS[0] = 'suck':
 							end
 						end
 
+
 						'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -344,6 +368,8 @@ if $ARGS[0] = 'suck':
 							gs 'stat'
 						end
 
+
+
 						if colir = 1:
 							temp = rand(1,2)
 							if temp = 1:
@@ -357,12 +383,15 @@ if $ARGS[0] = 'suck':
 
 						end
 
+
 						'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
 
+
 				else
 
+
 					act 'point on my face':
 						*clr & cla
 						facial += 1
@@ -387,6 +416,7 @@ if $ARGS[0] = 'suck':
 							end
 						end
 
+
 						'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -395,6 +425,8 @@ if $ARGS[0] = 'suck':
 						*clr & cla
 						facial += 1
 
+
+
 						gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 						gs 'stat'
 						gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -405,6 +437,8 @@ if $ARGS[0] = 'suck':
 							gs 'stat'
 						end
 
+
+
 						if colir = 1:
 							temp = rand(1, 7)
 							if temp <= 3:
@@ -418,6 +452,7 @@ if $ARGS[0] = 'suck':
 							'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 						end
 
+
 						'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -433,6 +468,7 @@ if $ARGS[0] = 'suck':
 						gs 'arousal', 'end'
 						gs 'stat'
 
+
 						if colir2 = 1:
 							temp = rand(1,2)
 							if temp = 1:
@@ -449,6 +485,7 @@ if $ARGS[0] = 'suck':
 							end
 						end
 
+
 						'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -477,6 +514,7 @@ if $ARGS[0] = 'suck':
 							end
 						end
 
+
 						'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -495,6 +533,8 @@ if $ARGS[0] = 'suck':
 							gs 'stat'
 						end
 
+
+
 						if colir2 = 1:
 							temp = rand(1,2)
 							if temp = 1:
@@ -508,12 +548,15 @@ if $ARGS[0] = 'suck':
 
 						end
 
+
 						'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
 
+
 				else
 
+
 					act 'point on my face':
 						*clr & cla
 						facial += 1
@@ -538,6 +581,7 @@ if $ARGS[0] = 'suck':
 							end
 						end
 
+
 						'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -546,6 +590,8 @@ if $ARGS[0] = 'suck':
 						*clr & cla
 						facial += 1
 
+
+
 						gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 						gs 'stat'
 						gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -556,6 +602,8 @@ if $ARGS[0] = 'suck':
 							gs 'stat'
 						end
 
+
+
 						if colir2 = 1:
 							temp = rand(1, 7)
 							if temp <= 3:
@@ -569,6 +617,7 @@ if $ARGS[0] = 'suck':
 							'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 						end
 
+
 						'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 						act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 					end
@@ -605,6 +654,7 @@ if $ARGS[0] = 'suck':
 		end
 	end
 
+
 	if $cum1 < 20 and $cum2 < 20 and $cum1 > -100 and $cum2 > -100:
 		*clr & cla
 		temp = rand(1,11)
@@ -616,6 +666,7 @@ if $ARGS[0] = 'suck':
 			'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/d2/2cum/after ('+rand(1,6)+').jpg"></center>'
 		end
 
+
 		gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 		gs 'stat'
 		gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -644,6 +695,7 @@ if $ARGS[0] = 'suck':
 				gs 'arousal', 'end'
 				gs 'stat'
 
+
 				if colir = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -660,6 +712,7 @@ if $ARGS[0] = 'suck':
 					end
 				end
 
+
 				'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -688,6 +741,7 @@ if $ARGS[0] = 'suck':
 					end
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -706,6 +760,8 @@ if $ARGS[0] = 'suck':
 					gs 'stat'
 				end
 
+
+
 				if colir = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -719,12 +775,15 @@ if $ARGS[0] = 'suck':
 
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
 
+
 		else
 
+
 			act 'point on my face':
 				*clr & cla
 				facial += 1
@@ -749,6 +808,7 @@ if $ARGS[0] = 'suck':
 					end
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -757,6 +817,8 @@ if $ARGS[0] = 'suck':
 				*clr & cla
 				facial += 1
 
+
+
 				gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 				gs 'stat'
 				gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -767,6 +829,8 @@ if $ARGS[0] = 'suck':
 					gs 'stat'
 				end
 
+
+
 				if colir = 1:
 					temp = rand(1, 7)
 					if temp <= 3:
@@ -780,6 +844,7 @@ if $ARGS[0] = 'suck':
 					'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 				end
 
+
 				'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -795,6 +860,7 @@ if $ARGS[0] = 'suck':
 				gs 'arousal', 'end'
 				gs 'stat'
 
+
 				if colir2 = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -811,6 +877,7 @@ if $ARGS[0] = 'suck':
 					end
 				end
 
+
 				'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -839,6 +906,7 @@ if $ARGS[0] = 'suck':
 					end
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -857,6 +925,8 @@ if $ARGS[0] = 'suck':
 					gs 'stat'
 				end
 
+
+
 				if colir2 = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -870,12 +940,15 @@ if $ARGS[0] = 'suck':
 
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
 
+
 		else
 
+
 			act 'point on my face':
 				*clr & cla
 				facial += 1
@@ -900,6 +973,7 @@ if $ARGS[0] = 'suck':
 					end
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -908,6 +982,8 @@ if $ARGS[0] = 'suck':
 				*clr & cla
 				facial += 1
 
+
+
 				gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 				gs 'stat'
 				gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -918,6 +994,8 @@ if $ARGS[0] = 'suck':
 					gs 'stat'
 				end
 
+
+
 				if colir2 = 1:
 					temp = rand(1, 7)
 					if temp <= 3:
@@ -931,6 +1009,7 @@ if $ARGS[0] = 'suck':
 					'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 				end
 
+
 				'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -963,6 +1042,7 @@ if $ARGS[0] = 'spitroasted':
 
 	'<center><video autoplay loop src="mod/public_WC/wc/gh/d2/split/splitv ('+rand(1,12)+').mp4"></video></center>'
 
+
 	if $cum2 ! -100 and $cum1 ! -100:
 		act 'jerk them':
 			gt 'mod_public_WC_cabine_d2', 'jerk'
@@ -993,6 +1073,7 @@ if $ARGS[0] = 'spitroasted':
 		end
 	end
 
+
 	if $cum1 < 20 and $cum2 < 20 and $cum1 > -100 and $cum2 > -100:
 		*clr & cla
 		temp = rand(1,10)
@@ -1002,6 +1083,7 @@ if $ARGS[0] = 'spitroasted':
 			'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/d2/2cum/after ('+rand(1,6)+').jpg"></center>'
 		end
 
+
 		gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 		gs 'stat'
 		gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -1033,6 +1115,7 @@ if $ARGS[0] = 'spitroasted':
 					*clr & cla
 					gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
 
+
 					if gandon = 0:
 						if colir = 1:
 							if rand(1,7) <= 5:
@@ -1049,6 +1132,7 @@ if $ARGS[0] = 'spitroasted':
 						end
 					end
 
+
 					'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
 					gs 'cuminsidereact', 'an unknown guy from the gloryhole'
 					gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
@@ -1069,6 +1153,7 @@ if $ARGS[0] = 'spitroasted':
 						gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
 						temp = rand(1,11)
 
+
 						if colir = 1:
 							temp = rand(1,2)
 							if temp = 1:
@@ -1085,6 +1170,8 @@ if $ARGS[0] = 'spitroasted':
 							end
 						end
 
+
+
 						'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 						gs 'arousal', 'bj', 10, 'unknown', 'sub'
 						minut -= 9
@@ -1105,6 +1192,8 @@ if $ARGS[0] = 'spitroasted':
 					gs 'arousal', 'end'
 					gs 'stat'
 
+
+
 					if colir = 1:
 						temp = rand(1,5)
 						if temp = 1:
@@ -1121,6 +1210,7 @@ if $ARGS[0] = 'spitroasted':
 						end
 					end
 
+
 					'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
 					act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
@@ -1130,6 +1220,7 @@ if $ARGS[0] = 'spitroasted':
 					*clr & cla
 					gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
 
+
 					if gandon = 0:
 						if colir = 1:
 							'<center><video autoplay loop src="mod/public_WC/wc/gh/b/vag/vag ('+rand(1,4)+').mp4"></video></center>'
@@ -1156,6 +1247,7 @@ if $ARGS[0] = 'spitroasted':
 						end
 					end
 
+
 					'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
 					gs 'cuminsidereact', 'an unknown guy from the gloryhole'
 					gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
@@ -1167,8 +1259,10 @@ if $ARGS[0] = 'spitroasted':
 				end
 			end
 
+
 		else
 
+
 			act 'Swallow':
 				*clr & cla
 				swallow += 1
@@ -1176,6 +1270,7 @@ if $ARGS[0] = 'spitroasted':
 				gs 'arousal', 'end'
 				gs 'stat'
 
+
 				if colir = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -1192,6 +1287,7 @@ if $ARGS[0] = 'spitroasted':
 					end
 				end
 
+
 				'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -1220,6 +1316,7 @@ if $ARGS[0] = 'spitroasted':
 					end
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -1238,6 +1335,8 @@ if $ARGS[0] = 'spitroasted':
 					gs 'stat'
 				end
 
+
+
 				if colir = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -1251,6 +1350,7 @@ if $ARGS[0] = 'spitroasted':
 
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -1269,6 +1369,7 @@ if $ARGS[0] = 'spitroasted':
 					*clr & cla
 					gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
 
+
 					if gandon = 0:
 						if colir = 1:
 							if rand(1,7) <= 5:
@@ -1285,6 +1386,7 @@ if $ARGS[0] = 'spitroasted':
 						end
 					end
 
+
 					'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
 					gs 'cuminsidereact', 'an unknown guy from the gloryhole'
 					gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
@@ -1305,6 +1407,7 @@ if $ARGS[0] = 'spitroasted':
 						gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
 						temp = rand(1,11)
 
+
 						if colir2 = 1:
 							temp = rand(1,2)
 							if temp = 1:
@@ -1321,6 +1424,8 @@ if $ARGS[0] = 'spitroasted':
 							end
 						end
 
+
+
 						'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 						gs 'arousal', 'bj', 10, 'unknown', 'sub'
 						minut -= 9
@@ -1341,6 +1446,8 @@ if $ARGS[0] = 'spitroasted':
 					gs 'arousal', 'end'
 					gs 'stat'
 
+
+
 					if colir2 = 1:
 						temp = rand(1,5)
 						if temp = 1:
@@ -1357,6 +1464,7 @@ if $ARGS[0] = 'spitroasted':
 						end
 					end
 
+
 					'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
 					act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
@@ -1366,6 +1474,7 @@ if $ARGS[0] = 'spitroasted':
 					*clr & cla
 					gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
 
+
 					if gandon = 0:
 						if colir = 1:
 							'<center><video autoplay loop src="mod/public_WC/wc/gh/b/vag/vag ('+rand(1,4)+').mp4"></video></center>'
@@ -1392,6 +1501,7 @@ if $ARGS[0] = 'spitroasted':
 						end
 					end
 
+
 					'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
 					gs 'cuminsidereact', 'an unknown guy from the gloryhole'
 					gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
@@ -1403,8 +1513,10 @@ if $ARGS[0] = 'spitroasted':
 				end
 			end
 
+
 		else
 
+
 			act 'Swallow':
 				*clr & cla
 				swallow += 1
@@ -1412,6 +1524,7 @@ if $ARGS[0] = 'spitroasted':
 				gs 'arousal', 'end'
 				gs 'stat'
 
+
 				if colir2 = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -1428,6 +1541,7 @@ if $ARGS[0] = 'spitroasted':
 					end
 				end
 
+
 				'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -1456,6 +1570,7 @@ if $ARGS[0] = 'spitroasted':
 					end
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -1474,6 +1589,8 @@ if $ARGS[0] = 'spitroasted':
 					gs 'stat'
 				end
 
+
+
 				if colir2 = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -1485,6 +1602,7 @@ if $ARGS[0] = 'spitroasted':
 					'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 				end
 
+
 				'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 				act 'work on next dick': gt 'mod_public_WC_cabine_d2', 'oneleft'
 			end
@@ -1492,6 +1610,8 @@ if $ARGS[0] = 'spitroasted':
 	end
 end
 
+
+
 if $ARGS[0] = 'oneleft':
 	cla
 	if $cum1 = -100:
@@ -1509,6 +1629,10 @@ if $ARGS[0] = 'oneleft':
 	if stat['vaginal'] > 0: act 'Pussy':gt 'mod_public_WC_cabine_d2', 'vag'
 end
 
+
+
+
+
 if $ARGS[0] = 'hj':
 	*clr & cla
 	if $cum1 = -100:
@@ -1537,13 +1661,16 @@ if $ARGS[0] = 'hj':
 			'<center><video autoplay loop src="mod/public_WC/wc/gh/ch/hj/hjv'+rand(1,2)+'.mp4"></video></center>'
 		end
 	end
+	'I stroke his dick'
 
-	'I jerk his dick sometimes using hands massage his balls. Before to long I hear the guy moan in pleasure, "I''m cuming."'
 	gs 'arousal', 'hj', 5, 'unknown', 'sub'
 	gs 'stat'
 
+
+
 	if ( $cum1 < 20 and $cum1 ! -100 ) or ( $cum2 < 20 and $cum2 ! -100 ):
 		cla
+		'I jerk his dick sometimes using hands massage his balls. Before to long I hear the guy moan in pleasure, "I''m cuming."'
 		act 'point on my face':
 			*clr & cla
 			facial += 1
@@ -1568,6 +1695,7 @@ if $ARGS[0] = 'hj':
 				end
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1576,6 +1704,8 @@ if $ARGS[0] = 'hj':
 			*clr & cla
 			facial += 1
 
+
+
 			gs 'cum_call', 'stomach', 'an unknown guy from the gloryhole'
 			gs 'stat'
 			gs 'cum_call', 'breasts', 'an unknown guy from the gloryhole'
@@ -1586,6 +1716,8 @@ if $ARGS[0] = 'hj':
 				gs 'stat'
 			end
 
+
+
 			if colir = 1:
 				temp = rand(1, 7)
 				if temp <= 3:
@@ -1599,12 +1731,17 @@ if $ARGS[0] = 'hj':
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/ch/cum/tilo/tilo ('+rand(1,3)+').jpg"></center>'
 			end
 
+
 			'My hands feel his sperm rapidly moving in his dick, I point it on me, shortly later, hot spurts of cum start flying and showering me.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'bj':
 	*clr & cla
 	if $cum1 = -100:
@@ -1624,6 +1761,7 @@ if $ARGS[0] = 'bj':
 	if stat['anal'] > 0: act 'Ass':gt 'mod_public_WC_cabine_d2', 'anal'
 	if stat['vaginal'] > 0: act 'Pussy':gt 'mod_public_WC_cabine_d2', 'vag'
 
+
 	if gandon = 0:
 		if colir = 1:
 			temp = rand(1,5)
@@ -1651,6 +1789,7 @@ if $ARGS[0] = 'bj':
 	gs 'arousal', 'bj', 5, 'unknown', 'sub'
 	gs 'stat'
 
+
 	if ( $cum1 < 20 and $cum1 ! -100 ) or ( $cum2 < 20 and $cum2 ! -100 ):
 		cla
 		act 'Swallow':
@@ -1660,6 +1799,7 @@ if $ARGS[0] = 'bj':
 			gs 'arousal', 'end'
 			gs 'stat'
 
+
 			if colir = 1:
 				temp = rand(1,2)
 				if temp = 1:
@@ -1676,6 +1816,7 @@ if $ARGS[0] = 'bj':
 				end
 			end
 
+
 			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1704,6 +1845,7 @@ if $ARGS[0] = 'bj':
 				end
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and covering my face.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
@@ -1722,6 +1864,8 @@ if $ARGS[0] = 'bj':
 				gs 'stat'
 			end
 
+
+
 			if colir = 1:
 				temp = rand(1,2)
 				if temp = 1:
@@ -1735,12 +1879,15 @@ if $ARGS[0] = 'bj':
 
 			end
 
+
 			'I feel his sperm rapidly moving in his dick, I pull my mouth off his dick, shortly later, hot spurts of cum start flying and showering me.'
 			act 'Get up': gt 'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
 	end
 end
 
+
+
 if $ARGS[0] = 'anal':
 	*clr & cla
 	if $cum1 = -100:
@@ -1776,6 +1923,7 @@ if $ARGS[0] = 'anal':
 		end
 	end
 
+
 	gs 'arousal', 'anal', 5, 'unknown', 'sub'
 	gs 'stat'
 
@@ -1815,6 +1963,7 @@ if $ARGS[0] = 'anal':
 				'<center><img <<$set_imgh>> src="mod/public_WC/wc/gh/asscum/asscum ('+rand(1,12)+').jpg"></center>'
 			end
 
+
 			'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
 
 			act 'Get up': gt'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
@@ -1825,6 +1974,7 @@ if $ARGS[0] = 'anal':
 			swallow += 1
 			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
 
+
 			if colir = 1:
 				temp = rand(1,2)
 				if temp = 1:
@@ -1883,6 +2033,8 @@ if $ARGS[0] = 'anal':
 	end
 end
 
+
+
 if $ARGS[0] = 'vag':
 	*clr & cla
 	sexcontra = 0
@@ -1902,6 +2054,7 @@ if $ARGS[0] = 'vag':
 	if stat['anal'] > 0: act 'Ass':gt 'mod_public_WC_cabine_d2', 'anal'
 	if stat['vaginal'] > 0: act 'Pussy':gt 'mod_public_WC_cabine_d2', 'vag'
 
+
 	if gandon = 0:
 		if colir = 1:
 			'<center><video autoplay loop src="mod/public_WC/wc/gh/b/vag/vag ('+rand(1,4)+').mp4"></video></center>'
@@ -1928,18 +2081,21 @@ if $ARGS[0] = 'vag':
 		end
 	end
 
+
 	gs 'mod_public_WC_cabine', 'pussy'
 
 	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly.'
 	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
 	gs 'stat'
 
+
 	if ( $cum1 < 20 and $cum1 ! -100 ) or ( $cum2 < 20 and $cum2 ! -100 ):
 		cla
 		act 'Allow him to cum inside':
 			*clr & cla
 			gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
 
+
 			if gandon = 0:
 				if colir = 1:
 					if rand(1,7) <= 5:
@@ -1956,6 +2112,7 @@ if $ARGS[0] = 'vag':
 				end
 			end
 
+
 			'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
 			gs 'cuminsidereact', 'an unknown guy from the gloryhole'
 			gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
@@ -1966,6 +2123,8 @@ if $ARGS[0] = 'vag':
 			act 'Get dressed': gt'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
 		end
 
+
+
 		act 'Quickly turn around and get on your knees':
 			*clr & cla
 
@@ -1976,6 +2135,7 @@ if $ARGS[0] = 'vag':
 				gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
 				temp = rand(1,11)
 
+
 				if colir = 1:
 					temp = rand(1,2)
 					if temp = 1:
@@ -1992,6 +2152,8 @@ if $ARGS[0] = 'vag':
 					end
 				end
 
+
+
 				'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 				gs 'arousal', 'bj', 10, 'unknown', 'sub'
 				minut -= 9
@@ -2001,6 +2163,7 @@ if $ARGS[0] = 'vag':
 			end
 		end
 
+
 		act 'Let him cum on your face':
 			*clr & cla
 			gs 'willpower', 'swallow', 'resist'
@@ -2013,6 +2176,7 @@ if $ARGS[0] = 'vag':
 			gs 'stat'
 			temp = rand(1,2)
 
+
 			if colir = 1:
 				temp = rand(1,5)
 				if temp = 1:
@@ -2029,6 +2193,7 @@ if $ARGS[0] = 'vag':
 				end
 			end
 
+
 			'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
 			act 'Get dressed': gt'mod_public_WC_cabine', 'mod_public_WC_cabine_WORK'
@@ -2036,6 +2201,8 @@ if $ARGS[0] = 'vag':
 	end
 end
 
+
+
 if $ARGS[0] = 'man1':
 	if $cum1 >= 100: $zadovolennia1 = '<font color = green	> █████ </font> '
 	if $cum1 >= 80 and $cum1 < 100: $zadovolennia1 = '<font color = blue	> ████_ </font> '

locations/mod_public_WC_cabine_rapisttoy.qsrc

@@ -6,6 +6,7 @@ if $ARGS[0] = 'start':
 	gs 'npcgeneratec', 0, 'maniac', rand(5,20)
 	gs 'boyStat', $npclastgenerated
 
+
 	if pcs_sleep <= 20:
 		'I''m tired and fall asleep hanging on the door.'
 		wait 500
@@ -50,6 +51,8 @@ if $ARGS[0] = 'start':
 				gs 'arousal', 'foreplay', 3, 'bound', 'sub', 'rape', 'gloryhole'
 				gs 'stat'
 
+
+
 				gs 'stat'
 				act 'continue':
 					*clr & cla
@@ -88,6 +91,8 @@ if $ARGS[0] = 'start':
 
 end
 
+
+
 if $ARGS[0] = '2':
 	*clr & cla
 	gs 'stat'
@@ -98,6 +103,7 @@ if $ARGS[0] = '2':
 	gs 'arousal', 'BDSM', 3, 'bound', 'sub', 'rape'
 	gs 'stat'
 
+
 	act 'blow him':
 		*clr & cla
 		'I do my best to make him feel good'
@@ -106,6 +112,7 @@ if $ARGS[0] = '2':
 		gs 'arousal', 'bj', 3, 'bound', 'sub', 'rape', 'gloryhole'
 		gs 'stat'
 
+
 		act 'continue':
 			*clr & cla
 			'mmmGmmh'
@@ -125,6 +132,8 @@ if $ARGS[0] = '2':
 				gs 'pain', rand(0,1), 'tongue', 'slap'
 				gs 'stat'
 
+
+
 				gs 'stat'
 				act 'continue':
 					*clr & cla
@@ -148,6 +157,7 @@ if $ARGS[0] = '2':
 	end
 end
 
+
 if $ARGS[0] = '3':
 	*clr & cla
 	gs 'stat'
@@ -156,6 +166,7 @@ if $ARGS[0] = '3':
 	minut += 2
 	gs 'stat'
 
+
 	act 'wait on the cold floor':
 		*clr & cla
 		'He bind me with the rope... and starts to slap me'
@@ -163,6 +174,7 @@ if $ARGS[0] = '3':
 		gs 'arousal', 'BDSM', 10, 'bound', 'sub', 'rape'
 		gs 'stat'
 
+
 		act 'continue':
 			*clr & cla
 			'soon he laught a little - "Ow, now I am ready!"'
@@ -211,6 +223,7 @@ if $ARGS[0] = '4':
 	gs 'arousal', 'BDSM', 8, 'bound', 'sub', 'rape'
 	gs 'stat'
 
+
 	act 'continue':
 		*clr & cla
 		'"Ow, yeeees", now he sounds crazy!..'
@@ -224,6 +237,7 @@ if $ARGS[0] = '4':
 	end
 end
 
+
 if $ARGS[0] = '5':
 	*clr & cla
 	gs 'stat'
@@ -245,6 +259,7 @@ if $ARGS[0] = '5':
 	gs 'cum_manage'
 	gs 'stat'
 
+
 	act 'wait on the cold floor':
 		*clr & cla
 		'Now, smile!'
@@ -252,6 +267,7 @@ if $ARGS[0] = '5':
 		gs 'arousal', 'BDSM', 3, 'bound', 'sub', 'rape', 'humiliation'
 		gs 'stat'
 
+
 		act 'keep smiling':
 			*clr & cla
 			'Smile!'
@@ -297,4 +313,5 @@ if $ARGS[0] = '5':
 	end
 end
 
+
 --- mod_public_WC_cabine_rapisttoy ---------------------------------

locations/mod_public_WC_cabine_street.qsrc

@@ -18,6 +18,7 @@ if $ARGS[0] = 'start':
 	gs 'npcgeneratec', 0, 'unknown man from the toilet', rand(10,30)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(10,30)
+	npc_dick[$npclastgenerated] = dick
 	gs 'arousal', 'anal', 10, 'rough', 'sub', 'group', 'gangbang', 'rape'
 	gs 'stat'
 	act 'continue':
@@ -65,6 +66,7 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
 if $ARGS[0] = '1':
 	*clr & cla
 	gs 'stat'
@@ -114,6 +116,8 @@ if $ARGS[0] = '1':
 	end
 end
 
+
+
 if $ARGS[0] = 'slava':
 	*clr & cla
 	gs 'stat'
@@ -174,6 +178,7 @@ if $ARGS[0] = 'slava':
 					gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
 					gs 'boyStat', $npclastgenerated
 					dick = rand(18,40)
+					npc_dick[$npclastgenerated] = dick
 					act 'Fight him':
 						$loc = 'pav_park'
 						$loc_arg = 'start'
@@ -217,6 +222,10 @@ if $ARGS[0] = 'slava':
 					gs 'themes', 'indoors'
 					gs 'boyStat', 'A54'
 
+
+
+
+
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/rape.jpg"></center>'
 					'Uncle Misha takes me by the binded hands and pulls me to his flat and to his bedroom, locking the door with a key behind him and unbind me. Roughly grabbing me by my hair, he pulls me down to my knees and unbuttons his pants with his other hand.'
 					act 'Continue':
@@ -235,6 +244,7 @@ if $ARGS[0] = 'slava':
 							'<center><video autoplay loop src="images/characters/pavlovsk/resident/misha/sex/sex.mp4"></video></center>'
 							'I am no longer resisting, having lost all hope of getting myself out of this situation. Lying wearily on the bed, he quickly takes my clothes off and sits down at my feet, examining my pussy with his fingers as much as his eyes.'
 
+
 							cumprecheck = 1
 							gs 'cum_manage'
 							'"No longer a virgin, eh? No need for me to take it slow, then!"'
@@ -246,6 +256,7 @@ if $ARGS[0] = 'slava':
 
 							'After raping my pussy for a few minutes, he pulls his dick out and forcibly thrusts it down my throat. I no longer have the strength to even fight it and just go along with whatever he wants to do, trying to appease him so he doesn''t think of anything worse to try instead. When he cums he pulls back just a bit, and I can feel it spasm as a warm liquid hits my tongue.'
 
+
 							act 'Swallow his cum':
 								*clr & cla
 								gs 'cum_call', 'mouth_swallow', 'A54'
@@ -308,6 +319,7 @@ if $ARGS[0] = 'slava':
 						*clr & cla
 						'My sister finds me...'
 
+
 						if sisterknowslut = 0:
 							sisterknowslut = 1
 							'OMG! OMG!'
@@ -327,6 +339,9 @@ if $ARGS[0] = 'slava':
 						*clr & cla
 						'My mother finds me...'
 
+
+
+
 						if motherKnowWhore = 0 and motherKnowSpravka = 0 and npc_QW['A29'] = 0:
 							gs 'npc_relationship', 'set', 'A29', 0
 							motherKnowWhore = 1
@@ -374,6 +389,7 @@ if $ARGS[0] = 'slava':
 								act 'stand up': gt 'pod_ezd','etaj_2'
 							end
 
+
 						else
 							gs 'npc_relationship', 'modify', 'A29', -20
 
@@ -392,12 +408,14 @@ if $ARGS[0] = 'slava':
 						*clr & cla
 						'My father finds me...'
 
+
 						if npc_sex['A28'] = 0 and stepdadqw < 5:
 							'OMG!!!'
 							stepdadqw = 5
 							'"Don''t worry, we will not tell your mother, he mumbles"'
 							act 'stand up': gt 'pod_ezd','etaj_2'
 
+
 						else
 							*clr & cla
 							'He is standing shocked, devouring your naked body with his eyes. In that instant, all the little moments the two of you have shared flash through your mind, while it dawns on you that your <<$npc_nickname[''A29'']>> is at work... .'
@@ -412,6 +430,9 @@ if $ARGS[0] = 'slava':
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_5.jpg"></center>'
 								'I quickly wash myself removing all marks from my adventure.'
 
+
+
+
 								'My father steps inside - crossing the line that''s always separated me up until now - and locks the door behind him.'
 								'Because he''s a large man and the bathroom is quite small, the room suddenly feels crowded, but the obvious size difference between the two of you makes you feel excited.'
 								'"You drive me crazy," he mutters, voice rough and a manic look in his eyes. Then he''s frantically undressing.'
@@ -493,6 +514,7 @@ if $ARGS[0] = 'slava':
 	end
 end
 
+
 if $ARGS[0] = '2':
 	*clr & cla
 	gs 'stat'
@@ -500,6 +522,8 @@ if $ARGS[0] = '2':
 	rape += 1
 	'They brought me to some forsaken garage or smth...'
 
+
+
 	'they fucks me in all ways'
 
 	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/107 took to the street/sex/1 ('+rand(1,3)+').jpg"></center>'

locations/mod_public_WC_citybasement.qsrc

@@ -1,137 +1,200 @@
 # mod_public_WC_citybasement
 if $ARGS[0] = '101':
- gt 'mod_public_WC_citybasement_100', '101'
+
+gt 'mod_public_WC_citybasement_100', '101'
 end
 
 if $ARGS[0] = '102':
- gt 'mod_public_WC_citybasement_100', '102'
+
+gt 'mod_public_WC_citybasement_100', '102'
 end
 
 if $ARGS[0] = '103':
+
  gt 'mod_public_WC_citybasement_100', '103'
 end
 
+
 if $ARGS[0] = '104':
+
  gt 'mod_public_WC_citybasement_100', '104'
 end
 
+
 if $ARGS[0] = '105':
+
  gt 'mod_public_WC_citybasement_100', '105'
 end
 
+
 if $ARGS[0] = '106':
+
  gt 'mod_public_WC_citybasement_100', '106'
 end
 
+
 if $ARGS[0] = '107':
+
  gt 'mod_public_WC_citybasement_100', '107'
 end
 
+
 if $ARGS[0] = '108':
+
  gt 'mod_public_WC_citybasement_100', '108'
 end
 
+
 if $ARGS[0] = '109':
+
  gt 'mod_public_WC_citybasement_100', '109'
 end
 
+
 if $ARGS[0] = '110':
+
  gt 'mod_public_WC_citybasement_110', '110'
 end
 
 if $ARGS[0] = '111':
+
  gt 'mod_public_WC_citybasement_110', '111'
 end
 
 if $ARGS[0] = '112':
+
  gt 'mod_public_WC_citybasement_110', '112'
 end
 
+
 if $ARGS[0] = '113':
+
  gt 'mod_public_WC_citybasement_110', '113'
 end
 
+
 if $ARGS[0] = '114':
+
  gt 'mod_public_WC_citybasement_110', '114'
 end
 
+
 if $ARGS[0] = '115':
+
  gt 'mod_public_WC_citybasement_110', '115'
 end
 
+
 if $ARGS[0] = '116':
+
  gt 'mod_public_WC_citybasement_110', '116'
 end
 
+
 if $ARGS[0] = '117':
+
  gt 'mod_public_WC_citybasement_110', '117'
 end
 
+
 if $ARGS[0] = '118':
+
  gt 'mod_public_WC_citybasement_110', '118'
 end
 
+
 if $ARGS[0] = '119':
+
  gt 'mod_public_WC_citybasement_110', '119'
 end
 
+
+
 if $ARGS[0] = '120':
+
  gt 'mod_public_WC_citybasement_120', '120'
 end
 
+
 if $ARGS[0] = '121':
+
  gt 'mod_public_WC_citybasement_120', '121'
 end
 
 if $ARGS[0] = '122':
+
  gt 'mod_public_WC_citybasement_120', '122'
 end
 
+
 if $ARGS[0] = '123':
+
  gt 'mod_public_WC_citybasement_120', '123'
 end
 
+
 if $ARGS[0] = '124':
+
  gt 'mod_public_WC_citybasement_120', '124'
 end
 
+
 if $ARGS[0] = '125':
+
  gt 'mod_public_WC_citybasement_120', '125'
 end
 
+
 if $ARGS[0] = '126':
+
  gt 'mod_public_WC_citybasement_120', '126'
 end
 
+
 if $ARGS[0] = '127':
+
  gt 'mod_public_WC_citybasement_120', '127'
 end
 
+
 if $ARGS[0] = '128':
+
  gt 'mod_public_WC_citybasement_120', '128'
 end
 
+
 if $ARGS[0] = '129':
+
  gt 'mod_public_WC_citybasement_120', '129'
 end
 
+
 if $ARGS[0] = '130':
+
  gt 'mod_public_WC_citybasement_130', '130'
 end
 
+
 if $ARGS[0] = '131':
+
  gt 'mod_public_WC_citybasement_130', '131'
 end
 
+
 if $ARGS[0] = '132':
+
  gt 'mod_public_WC_citybasement_130', '132'
 end
 
+
 if $ARGS[0] = '133':
+
  gt 'mod_public_WC_citybasement_130', '133'
 end
 
+
 if $ARGS[0] = '134':
+
  gt 'mod_public_WC_citybasement_130', '134'
 end
 

locations/mod_public_WC_citybasement_100.qsrc

@@ -6,9 +6,13 @@ end
 
 if $ARGS[0] = '102':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	$loc_arg = '102'
 	zt = 102
 	atemp = 0
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '102'
 	minut += rand(0,3)
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
@@ -45,6 +49,7 @@ if $ARGS[0] = '102':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -93,8 +98,11 @@ end
 
 if $ARGS[0] = '103':
 	*clr & cla
+	CLOSE ALL
 	minut += rand(0,3)
 	$loc_arg = '103'
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '103'
 	gs 'stat'
 	'<center><b><font color="maroon">"КОЛЯ" dead end </font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p3.jpg"></center>'
@@ -200,7 +208,7 @@ if $ARGS[0] = '103':
 						'I may look like a bum, but I am a King of a bums, and has a lot of influence levers.'
 						'ask me what you want and I''ll name my price.'
 						act 'No thanks, go back': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
-						act 'mod_public_WC_citybasement_100', 'kolia': pr = 103 & gt 'mod_public_WC_citybasement_100', 'kolia'
+						act 'hmm, and prices is?', 'kolia': pr = 103 & gt 'mod_public_WC_citybasement_100', 'kolia'
 					end
 				end
 
@@ -268,11 +276,14 @@ if $ARGS[0] = '103':
 							gs 'drugs', 'alcohol', 'vodka', 4
 							gs 'stat'
 
+
 							workDolg += 20000
 							'I am at the sauna. The brutes drag you into a room and start to explain. "You''re going to live here and work until you have cleared your debt. Got it? Try to contact the authorities or escape, we''ll put a bullet in your head and bury you in the woods, understand?"'
 							'You become frightened as they''re convincing, so you just nod.'
 							act 'Look around': gt 'city_sauna', 'saunaroom'
 
+
+
 						end
 						act 'No':
 							cla
@@ -322,6 +333,7 @@ if $ARGS[0] = '103':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -368,6 +380,7 @@ if $ARGS[0] = '103':
 	end
 end
 
+
 if $ARGS[0] = 'sauna':
 	*clr & cla
 	'When I go out from Kolia room, few big guys twisted me and poured with vodka'
@@ -379,12 +392,14 @@ if $ARGS[0] = 'sauna':
 	act 'Look around': gt 'city_sauna', 'saunaroom'
 end
 
+
+
 if $ARGS[0] = 'kolia':
 	*clr & cla
 	*nl
 	'Kolia prices for me is <<koliaprice>>%'
 	*nl
-	'my relationship with kolia <<bum_kolia>>'
+	'my relationship with Kolia <<bum_kolia>>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/kolia.jpg"></center>'
 	if koliaday <= daystart:
 		act 'I don''t want to be known as a "whore"':
@@ -520,6 +535,7 @@ if $ARGS[0] = 'kolia':
 				act 'agree':
 					cla
 					money -= temp
+					minut += 20
 
 					'Good deal, see you next time, in a week or something'
 					koliaday = daystart + rand(5,10)
@@ -537,8 +553,67 @@ if $ARGS[0] = 'kolia':
 			act 'go out': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
 		end
 
+		act 'I need fake passport':
+			cla
+			minut += 5
+			gs 'stat'
+			'well I can do that.'
+
+			temp = rand(200,300) * koliaprice
+			'it costs <<temp>>'
+			if money >= temp:
+				act 'agree':
+					cla
+					money -= temp
+					minut += 60
+					fakepassport = 1
+
+					'Good deal, see you next time, in a week or something'
+					koliaday = daystart + rand(5,10)
+					bum_kolia += 1
+
+					act 'go out': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
+				end
+			end
+
+			act 'ask other': gt 'mod_public_WC_citybasement_100', 'kolia'
+
+			act 'go out': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
+		end
+
+		act 'I need fake diploma':
+			cla
+			minut += 5
+			gs 'stat'
+			'well I can do that.'
+
+			temp = rand(950,1000) * koliaprice
+			'it costs <<temp>>'
+			if money >= temp:
+				act 'agree':
+					cla
+					money -= temp
+					minut += 60
+					gs 'uniutil', 'fake_diploma', 'set_obtained'
+					gs 'stat'
+
+					'Good deal, see you next time, in a week or something'
+					koliaday = daystart + rand(5,10)
+					bum_kolia += 1
+
+					act 'go out': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
+				end
+			end
+
+			act 'ask other': gt 'mod_public_WC_citybasement_100', 'kolia'
+
+			act 'go out': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
+		end
+
+
 		'Інша підтримка? -=wip=-'
 
+
 	else
 		'Ow, wait.'
 		'No, no, no... I don''t work like that. You are not my only client.'
@@ -556,10 +631,16 @@ if $ARGS[0] = 'kolia':
 	act 'go out': pr = 103 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
 end
 
+
+
 if $ARGS[0] = '104':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '104'
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '104'
 	zt = 104
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
@@ -577,6 +658,7 @@ if $ARGS[0] = '104':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 102:
 		act 'go further': pr = 104 & urape += 18 & ubomj += 15 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '105'
 		act 'go back': pr = 104 & urape += 0 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '102'
@@ -603,6 +685,7 @@ if $ARGS[0] = '104':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -651,14 +734,19 @@ end
 
 if $ARGS[0] = '105':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	gs 'stat'
 	$loc_arg = '105'
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '105'
 	zt = 105
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p23.jpg"></center>'
 	'There is a small text "up" near "КОЛЯ"'
 
+
 	act'Go to "КОЛЯ-up" way':
 		pr = 105
 		urape += 21 & ubomj += 31 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '106'
@@ -674,6 +762,7 @@ if $ARGS[0] = '105':
 		act 'go back': pr = 105 & urape += 15 & ubomj += 25 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '110'
 	end
 
+
 	urape += 18
 	ubomj += 15
 	ubomj2 = 0
@@ -690,6 +779,7 @@ if $ARGS[0] = '105':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -738,9 +828,13 @@ end
 
 if $ARGS[0] = '106':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '106'
 	zt = 106
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '106'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p8.jpg"></center>'
@@ -757,6 +851,7 @@ if $ARGS[0] = '106':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 105:
 		act 'go further': pr = 106 & urape += 24 & ubomj += 7 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '107'
 		act 'go back': pr = 106 & urape += 18 & ubomj += 15 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '105'
@@ -781,6 +876,7 @@ if $ARGS[0] = '106':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -831,7 +927,11 @@ if $ARGS[0] = '107':
 	*clr & cla
 	minut += rand(0,3)
 	$loc_arg = '107'
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '107'
 	zt = 107
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	gs 'stat'
 	'<center><b><font color="maroon">Ladder</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p17.jpg"></center>'
@@ -862,6 +962,7 @@ if $ARGS[0] = '107':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -913,6 +1014,11 @@ if $ARGS[0] = '108':
 	minut += rand(0,3)
 	$loc_arg = '108'
 	zt = 108
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '108'
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/park.wav',30
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p16.jpg"></center>'
@@ -926,6 +1032,7 @@ if $ARGS[0] = '108':
 		act 'go back': pr = 108 & urape += 33 & ubomj += -20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '109'
 	end
 
+
 	urape += 27
 	ubomj += 4
 	ubomj2 = 0
@@ -942,6 +1049,7 @@ if $ARGS[0] = '108':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -992,6 +1100,8 @@ end
 if $ARGS[0] = '109':
 	*clr & cla
 	pr = 109
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '109'
 	minut += rand(0,3)
 	$loc_arg = '109'
 	zt = 109
@@ -1000,6 +1110,9 @@ if $ARGS[0] = '109':
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p15.jpg"></center>'
 	'the stream becomes more powerfull.'
 	'I see the end of tunnel and light'
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/park.wav',30
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 
 	if vhid5 = 1:
 		''
@@ -1015,10 +1128,13 @@ if $ARGS[0] = '109':
 	end
 	act 'exit to the street': vhid5 = 1 & gt 'mod_public_WC_citybasement_enter', 'vhid5'
 
+
 	urape = +33
 	ubomj = -20
 	ubomj2 = 0
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -1032,6 +1148,7 @@ if $ARGS[0] = '109':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:

locations/mod_public_WC_citybasement_100_1.qsrc

@@ -3,9 +3,14 @@ if $ARGS[0] = '101':
 	*clr & cla
 	pr = 101
 	$loc = 'mod_public_WC_citybasement'
+	$menu_loc = 'mod_public_WC_citybasement'
 	$loc_arg = '101'
+	$menu_arg = '101'
 	zr = 101
 	minut += rand(0,3)
+	CLOSE ALL
+
+
 	gs 'stat'
 	'<center><b><font color="maroon">room</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p4.jpg"></center>'
@@ -104,6 +109,8 @@ if $ARGS[0] = '101':
 		gs 'stat'
 	end
 
+
+
 	gs 'stat'
 	if bumevent = 0:
 		eventtemp = rand (1,300)
@@ -118,6 +125,7 @@ if $ARGS[0] = '101':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:

locations/mod_public_WC_citybasement_110.qsrc

@@ -1,9 +1,13 @@
 # mod_public_WC_citybasement_110
 if $ARGS[0] = '110':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '110'
 	zt = 110
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '110'
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p23.jpg"></center>'
@@ -23,6 +27,7 @@ if $ARGS[0] = '110':
 		act 'go back': pr = 110 & urape += 5 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '112'
 	end
 
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -36,6 +41,7 @@ if $ARGS[0] = '110':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -82,18 +88,24 @@ if $ARGS[0] = '110':
 	end
 end
 
+
 if $ARGS[0] = '111':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '111'
 	pr = 111
 	zt = 111
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '111'
 
 	gs 'stat'
 	'<center><b><font color="maroon">Dead end with a table and some boxes</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p1.jpg"></center>'
 	'I see some cigarets on the table'
 
+
 	act 'Go to the tunnel':
 		urape += 15 & ubomj += 25 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '110'
 	end
@@ -177,6 +189,8 @@ if $ARGS[0] = '111':
 		act 'Get up': urape += -50 & ubomj += 20 & ubomj2 =150 & gt 'mod_public_WC_citybasement', '111'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -190,6 +204,7 @@ if $ARGS[0] = '111':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -238,13 +253,18 @@ end
 
 if $ARGS[0] = '112':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '112'
 	zt = 112
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '112'
 	gs 'stat'
 	'<center><b><font color="maroon">Manhole</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p13.jpg"></center>'
 
+
 	if pr = 110:
 		act 'go up throught manhole': pr = 112 & urape += 5 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '113'
 		act 'go back': pr = 112 & urape += 15 & ubomj += 25 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '110'
@@ -253,6 +273,8 @@ if $ARGS[0] = '112':
 		act 'go back': pr = 112 & urape += 5 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '113'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -266,6 +288,7 @@ if $ARGS[0] = '112':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -314,9 +337,13 @@ end
 
 if $ARGS[0] = '113':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '113'
 	zt = 113
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '113'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p9.jpg"></center>'
@@ -333,6 +360,7 @@ if $ARGS[0] = '113':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 112:
 		act 'go further': pr = 113 & urape += -20 & ubomj += 5 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '114'
 		act 'go back': pr = 113 & urape += 5 & ubomj += 10 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '112'
@@ -341,6 +369,9 @@ if $ARGS[0] = '113':
 		act 'go back': pr = 113 & urape += -20 & ubomj += 5 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '114'
 	end
 
+
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -354,6 +385,7 @@ if $ARGS[0] = '113':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -402,9 +434,13 @@ end
 
 if $ARGS[0] = '114':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '114'
 	zt = 114
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '114'
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p22.jpg"></center>'
@@ -425,6 +461,7 @@ if $ARGS[0] = '114':
 		act 'go back': pr = 114 & urape += 35 & ubomj += 45 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '122'
 	end
 
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -438,6 +475,7 @@ if $ARGS[0] = '114':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -486,9 +524,13 @@ end
 
 if $ARGS[0] = '115':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '115'
 	zt = 115
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '115'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p26.jpg"></center>'
@@ -505,6 +547,7 @@ if $ARGS[0] = '115':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 114:
 		act 'go further': pr = 115 & urape += 35 & ubomj += -20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '116'
 		act 'go back': pr = 115 & urape += -20 & ubomj += 5 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '114'
@@ -513,6 +556,7 @@ if $ARGS[0] = '115':
 		act 'go back': pr = 115 & urape += 35 & ubomj += -20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '116'
 	end
 
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -526,6 +570,7 @@ if $ARGS[0] = '115':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -574,9 +619,13 @@ end
 
 if $ARGS[0] = '116':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '116'
 	zt = 116
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '116'
 	gs 'stat'
 	'<center><b><font color="maroon">Dark korridor with a lot of dark rooms</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p25.jpg"></center>'
@@ -589,6 +638,8 @@ if $ARGS[0] = '116':
 		act 'go back': pr = 116 & urape += 40 & ubomj += -20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '117'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -602,6 +653,7 @@ if $ARGS[0] = '116':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -650,9 +702,13 @@ end
 
 if $ARGS[0] = '117':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '117'
 	zt = 117
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '117'
 	gs 'stat'
 	'<center><b><font color="maroon">Dark korridor with a lot of dark rooms</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p25.jpg"></center>'
@@ -678,6 +734,7 @@ if $ARGS[0] = '117':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -726,9 +783,13 @@ end
 
 if $ARGS[0] = '118':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '118'
 	zt = 118
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '118'
 	gs 'stat'
 	'<center><b><font color="maroon">Dark korridor with a lot of dark rooms</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p25.jpg"></center>'
@@ -742,6 +803,8 @@ if $ARGS[0] = '118':
 		act 'go back': pr = 118 & urape += 15 & ubomj += 20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '119'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -755,6 +818,7 @@ if $ARGS[0] = '118':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -803,9 +867,13 @@ end
 
 if $ARGS[0] = '119':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '119'
 	zt = 119
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '119'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p2.jpg"></center>'
@@ -822,6 +890,7 @@ if $ARGS[0] = '119':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 118:
 		act 'go further': pr = 119 & urape += -30 & ubomj += 35 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '120'
 		act 'go back': pr = 119 & urape += 35 & ubomj += -20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '118'
@@ -830,6 +899,9 @@ if $ARGS[0] = '119':
 		act 'go back': pr = 119 & urape += -30 & ubomj += 35 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '120'
 	end
 
+
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -843,6 +915,7 @@ if $ARGS[0] = '119':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:

locations/mod_public_WC_citybasement_120.qsrc

@@ -2,9 +2,13 @@
 
 if $ARGS[0] = '120':
 	*clr & cla
+	CLOSE ALL
+
 	minut += rand(0,3)
 	$loc_arg = '120'
 	zt = 120
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '120'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p23.jpg"></center>'
@@ -73,6 +77,9 @@ if $ARGS[0] = '120':
 		act 'go right to the light': pr = 120 & urape += -30 & ubomj += 35 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '120'
 	end
 
+
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -86,6 +93,7 @@ if $ARGS[0] = '120':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -134,12 +142,16 @@ end
 
 if $ARGS[0] = '121':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	$loc = 'mod_public_WC_citybasement'
 	$loc_arg = '121'
 	zt = 121
 	pr = 121
 	minut += rand(0,3)
 	$loc_arg = '121'
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '121'
 	gs 'stat'
 	'<center><b><font color="maroon">Nice room</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p21.jpg"></center>'
@@ -191,6 +203,8 @@ if $ARGS[0] = '121':
 	dynamic $basin
 	dynamic $publicpan
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -204,6 +218,7 @@ if $ARGS[0] = '121':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -252,9 +267,13 @@ end
 
 if $ARGS[0] = '122':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '122'
 	zt = 122
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '122'
 	gs 'stat'
 	'<center><b><font color="maroon">Manhole</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p14.jpg"></center>'
@@ -267,6 +286,8 @@ if $ARGS[0] = '122':
 		act 'go back': pr = 122 & urape += 35 & ubomj += 45 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '123'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -280,6 +301,7 @@ if $ARGS[0] = '122':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -328,9 +350,13 @@ end
 
 if $ARGS[0] = '123':
 	*clr & cla
+	CLOSE ALL
+
 	minut += rand(0,3)
 	$loc_arg = '123'
 	zt = 123
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '123'
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p23.jpg"></center>'
@@ -399,6 +425,7 @@ if $ARGS[0] = '123':
 		act 'go right': pr = 123 & urape += 35 & ubomj += 45 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '122'
 	end
 
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -412,6 +439,7 @@ if $ARGS[0] = '123':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -460,9 +488,13 @@ end
 
 if $ARGS[0] = '124':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '124'
 	zt = 124
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '124'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p5.jpg"></center>'
@@ -479,6 +511,7 @@ if $ARGS[0] = '124':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 123:
 		act 'go further': pr = 124 & urape += -20 & ubomj += 40 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '125'
 		act 'go back': pr = 124 & urape += 35 & ubomj += 45 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '123'
@@ -487,6 +520,8 @@ if $ARGS[0] = '124':
 		act 'go back': pr = 124 & urape += -20 & ubomj += 40 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '125'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -500,6 +535,7 @@ if $ARGS[0] = '124':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -548,9 +584,13 @@ end
 
 if $ARGS[0] = '125':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '125'
 	zt = 125
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '125'
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p23.jpg"></center>'
@@ -570,6 +610,8 @@ if $ARGS[0] = '125':
 		act 'go back': pr = 125 & urape += -20 & ubomj += 50 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '127'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -583,6 +625,7 @@ if $ARGS[0] = '125':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -631,9 +674,13 @@ end
 
 if $ARGS[0] = '126':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '126'
 	zt = 126
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '126'
 	gs 'stat'
 	'<center><b><font color="maroon">"КОЛЯ" dead end </font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p3.jpg"></center>'
@@ -708,6 +755,8 @@ if $ARGS[0] = '126':
 		end
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -721,6 +770,7 @@ if $ARGS[0] = '126':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -767,8 +817,10 @@ if $ARGS[0] = '126':
 	end
 end
 
+
 if $ARGS[0] = 'karroom':
 	*clr & cla
+	$loc = 'mod_public_WC_citybasement_120'
 	$loc_arg = 'karroom'
 	'I entered a room with shine light. I become blind for a moment.'
 	'There are bed, some metal pole and a ladder in the room.'
@@ -809,11 +861,16 @@ if $ARGS[0] = 'karroom':
 	end
 end
 
+
 if $ARGS[0] = '127':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '127'
 	zt = 127
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '127'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p12.jpg"></center>'
@@ -830,6 +887,7 @@ if $ARGS[0] = '127':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 125:
 		act 'go further': pr = 127 & urape += 10 & ubomj += 20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '128'
 		act 'go back': pr = 127 & urape += -20 & ubomj += 40 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '125'
@@ -838,6 +896,8 @@ if $ARGS[0] = '127':
 		act 'go back': pr = 127 & urape += 10 & ubomj += 20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '128'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -851,6 +911,7 @@ if $ARGS[0] = '127':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -899,9 +960,13 @@ end
 
 if $ARGS[0] = '128':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '128'
 	zt = 128
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '128'
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p23.jpg"></center>'
@@ -921,6 +986,8 @@ if $ARGS[0] = '128':
 		act 'go back': pr = 128 & urape += 16 & ubomj += 26 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '130'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -934,6 +1001,7 @@ if $ARGS[0] = '128':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -982,10 +1050,14 @@ end
 
 if $ARGS[0] = '129':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	$loc = 'mod_public_WC_citybasement'
 	$loc_arg = '129'
 	zt = 129
 	minut += rand(0,3)
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '129'
 	gs 'stat'
 	'<center><b><font color="maroon">Dead end</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p6.jpg"></center>'
@@ -1035,6 +1107,8 @@ if $ARGS[0] = '129':
 		gs 'stat'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -1048,6 +1122,7 @@ if $ARGS[0] = '129':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:

locations/mod_public_WC_citybasement_130.qsrc

@@ -1,9 +1,13 @@
 # mod_public_WC_citybasement_130
 if $ARGS[0] = '130':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '130'
 	zt = 130
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '130'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p7.jpg"></center>'
@@ -20,6 +24,7 @@ if $ARGS[0] = '130':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 128:
 		act 'go further': pr = 130 & urape += 22 & ubomj += 32 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '131'
 		act 'go back': pr = 130 & urape += 10 & ubomj += 20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '128'
@@ -28,6 +33,8 @@ if $ARGS[0] = '130':
 		act 'go back': pr = 130 & urape += 22 & ubomj += 32 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '131'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -41,6 +48,7 @@ if $ARGS[0] = '130':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -89,9 +97,13 @@ end
 
 if $ARGS[0] = '131':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '131'
 	zt = 131
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '131'
 	gs 'stat'
 	'<center><b><font color="maroon">Undercity tunnels</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p8.jpg"></center>'
@@ -108,6 +120,7 @@ if $ARGS[0] = '131':
 		'Have this tunnels been used during the War?'
 	end
 
+
 	if pr = 130:
 		act 'go further': pr = 131 & urape += 28 & ubomj += 38 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '132'
 		act 'go back': pr = 131 & urape += 16 & ubomj += 26 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '130'
@@ -116,6 +129,8 @@ if $ARGS[0] = '131':
 		act 'go back': pr = 131 & urape += 28 & ubomj += 38 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '132'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -129,6 +144,7 @@ if $ARGS[0] = '131':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -177,9 +193,13 @@ end
 
 if $ARGS[0] = '132':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	minut += rand(0,3)
 	$loc_arg = '132'
 	zt = 132
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '132'
 	gs 'stat'
 	'<center><b><font color="maroon">fork in the tunnel</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p22.jpg"></center>'
@@ -200,6 +220,8 @@ if $ARGS[0] = '132':
 		act 'go back': pr = 132 & urape += 40 & ubomj += -20 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '134'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -213,6 +235,7 @@ if $ARGS[0] = '132':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -261,10 +284,14 @@ end
 
 if $ARGS[0] = '133':
 	*clr & cla
+	CLOSE ALL
+	if sound = 0: PLAY 'mod/public_WC/sound/walk.wav',60
 	pr = 133
 	minut += rand(0,3)
 	$loc_arg = '133'
 	zt = 133
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '133'
 	gs 'stat'
 	'<center><b><font color="maroon">room</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p19.jpg"></center>'
@@ -312,6 +339,8 @@ if $ARGS[0] = '133':
 		gs 'stat'
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -325,6 +354,7 @@ if $ARGS[0] = '133':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:
@@ -373,11 +403,16 @@ end
 
 if $ARGS[0] = '134':
 	*clr & cla
+	CLOSE ALL
+
 	minut += rand(0,3)
 	$loc_arg = '134'
+	$menu_loc = 'mod_public_WC_citybasement'
+	$menu_arg = '134'
 	gs 'stat'
 	pr = 134
 	zt = 134
+
 	'<center><b><font color="maroon">Dead end</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/pidzem/p9.jpg"></center>'
 	'I see stairs'
@@ -385,6 +420,8 @@ if $ARGS[0] = '134':
 		urape += 28 & ubomj += 38 & ubomj2 =0 & gt 'mod_public_WC_citybasement', '132'
 	end
 
+
+
 	act 'go up the stairs':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/vhid/3redlihtari.jpg"></center>'
@@ -437,6 +474,8 @@ if $ARGS[0] = '134':
 		end
 	end
 
+
+
 	if bumevent = 0:
 		eventtemp = rand (1,300)
 		if hour >= 5 and hour <= 21:
@@ -450,6 +489,7 @@ if $ARGS[0] = '134':
 		end
 		ubomj2 -= bumfriend
 
+
 		if urape >= eventtemp:
 			gs 'mod_public_WC_citybasement_bumsex', 'rape'
 		elseif ubomj >= eventtemp:

locations/mod_public_WC_citybasement_bumsex.qsrc

@@ -1,6 +1,9 @@
 # mod_public_WC_citybasement_bumsex
 
 if $ARGS[0] = 'rape':
+	CLOSE ALL
+
+
 
 	if urape >= eventtemp:
 		*clr & cla
@@ -29,8 +32,10 @@ if $ARGS[0] = 'rape':
 	end
 end
 
+
 if $ARGS[0] = 'rape_do':
 	*clr & cla
+	CLOSE ALL
 	bumevent = 1
 	gs 'npcgeneratec', 0, 'rapist', rand(10,30)
 	gs 'boyStat', $npclastgenerated
@@ -44,6 +49,7 @@ if $ARGS[0] = 'rape_do':
 		'OMG, the rapist becomes beast!'
 		'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/beast.mp4"></video></center>'
 		dick = 40
+		npc_dick[$npclastgenerated] = dick
 		pcs_vag += 4
 
 		stat['vaginal'] += 1
@@ -102,8 +108,12 @@ if $ARGS[0] = 'rape_do':
 	end
 end
 
-if $ARGS[0] = 'bomj':
 
+
+
+
+if $ARGS[0] = 'bomj':
+	CLOSE ALL
 	if ubomj >= eventtemp:
 		bumevent = 1
 		urape -= 50
@@ -112,6 +122,7 @@ if $ARGS[0] = 'bomj':
 		ubomj2 = 0
 		temp = rand(1,100)
 
+
 		if temp <=  ( 15 + bumfriend ):
 			'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/bezhatko ('+rand(1,8)+').jpg"></center>'
 			'Ow girl... I need ... give me some blow for 100'
@@ -140,6 +151,7 @@ if $ARGS[0] = 'bomj':
 			'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/drink.jpg"></center>'
 			'Some drunk bum point on the bottle and asks "Will you be the third?"'
 
+
 			temp = rand(1,7)
 			if temp = 1: $namebum = 'Koliamba'
 			if temp = 2: $namebum = 'Suhoy'
@@ -163,6 +175,7 @@ if $ARGS[0] = 'bomj':
 					'Cool, let''s go to <<$namebum>>'
 					'in a few minutes we come to some sort of a bum''s room-camp.'
 
+
 					temp = rand(1,4)
 
 					if pr = 101: temp = 5
@@ -301,6 +314,7 @@ end
 
 if $ARGS[0] = 'bomjsex':
 	*clr & cla
+	CLOSE ALL
 	bumevent = 1
 	gs 'npcgeneratec', 0, '<<$namebum>>', rand(10,30)
 	gs 'boyStat', $npclastgenerated
@@ -310,6 +324,7 @@ if $ARGS[0] = 'bomjsex':
 	if trahobomj <= 1:
 		'This is the best day for <<$namebum>> life, the bum said...'
 		trahobomj = 0
+		bjbum = 1
 	else
 		temp = rand(1,10)
 		if temp = 1: $namebum = 'Koliamba'
@@ -338,6 +353,7 @@ if $ARGS[0] = 'bomjsex':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/bj_start'+rand(1,2)+'.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(3,7) * bimbolevel
 				'His dick smells bad but it tastes so manly... I am happy to make this man happy!'
@@ -402,6 +418,7 @@ if $ARGS[0] = 'bomjsex':
 		killvar 'bjbum'
 		'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/vag_start'+rand(1,2)+'.mp4"></video></center>'
 
+
 		if bimbolevel >= 2:
 			pcs_mood += rand(5,10) * bimbolevel
 			'This smelly bum entered my pussy... I am happy to make <<$namebum>> happy!'
@@ -449,6 +466,7 @@ if $ARGS[0] = 'bomjsex':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/bj_start'+rand(1,2)+'.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(3,7) * bimbolevel
 				'His dick smells bad but it tastes so manly... I am happy to make this man happy!'
@@ -516,6 +534,7 @@ if $ARGS[0] = 'bomjsex':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/vag_start'+rand(1,2)+'.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(5,10) * bimbolevel
 				'This smelly bum entered my pussy... I am happy to make this man happy!'
@@ -568,6 +587,7 @@ if $ARGS[0] = 'bomjsex':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/anal.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(5,10) * bimbolevel
 				'This smelly bum entered my ass... I am happy to make this man happy!'
@@ -609,9 +629,12 @@ if $ARGS[0] = 'bomjsex':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'bomj2':
 	bumevent = 1
-
+	CLOSE ALL
 	if ubomj2 >= eventtemp:
 		*clr & cla
 		urape -= 100
@@ -642,6 +665,7 @@ if $ARGS[0] = 'bomj2':
 			end
 			'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
 
+
 			act 'agree to drink':
 				cla
 				'They are very happy and joking about awkward pause wich as a moment ago'
@@ -691,6 +715,7 @@ if $ARGS[0] = 'bomj2':
 							urape = 120
 							bumevent = 1
 
+
 							if rand(1,2) = 1:
 								pr = 106
 								temp = 107
@@ -701,6 +726,7 @@ if $ARGS[0] = 'bomj2':
 								$loc_arg = '113'
 							end
 
+
 							act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'rape'
 						end
 					end
@@ -726,9 +752,11 @@ if $ARGS[0] = 'bomj2':
 							urape = 120
 							bumevent = 1
 
+
 							pr = 106
 							$loc_arg = '107'
 
+
 							act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'rape'
 						end
 					else
@@ -760,6 +788,7 @@ if $ARGS[0] = 'bomj2':
 							urape = 120
 							bumevent = 1
 
+
 							if rand(1,2) = 1:
 								pr = 106
 								$loc_arg = '107'
@@ -768,6 +797,7 @@ if $ARGS[0] = 'bomj2':
 								$loc_arg = '117'
 							end
 
+
 							act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'rape'
 						end
 					end
@@ -807,6 +837,7 @@ if $ARGS[0] = 'bomj2':
 							urape = 120
 							bumevent = 1
 
+
 							if rand(1,2) = 1:
 								pr = 119
 								temp = 118
@@ -817,6 +848,7 @@ if $ARGS[0] = 'bomj2':
 								$loc_arg = '116'
 							end
 
+
 							act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'rape'
 						end
 					end
@@ -842,6 +874,7 @@ if $ARGS[0] = 'bomj2':
 							pr = 132
 							$loc_arg = '134'
 
+
 							act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'rape'
 						end
 					else
@@ -873,6 +906,7 @@ if $ARGS[0] = 'bomj2':
 							urape = 120
 							bumevent = 1
 
+
 							if rand(1,2) = 1:
 								pr = 131
 								temp = 130
@@ -883,6 +917,7 @@ if $ARGS[0] = 'bomj2':
 								$loc_arg = '124'
 							end
 
+
 							act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'rape'
 						end
 					end
@@ -907,6 +942,10 @@ if $ARGS[0] = 'bomj2':
 						act 'continue': gt 'mod_public_WC_citybasement_bumsex', 'bomjsex'
 					end
 
+
+
+
+
 					act 'Pay me 100 and only for you':
 						cla
 						if pcs_humint <= rand(15,75) or pcs_intel <= rand(35,85):
@@ -955,6 +994,7 @@ if $ARGS[0] = 'bomj2':
 						end
 					end
 
+
 					act 'Pay me 100 each':
 						cla
 						if pcs_humint <= rand(15,75) or pcs_intel <= rand(35,85):
@@ -1009,6 +1049,7 @@ if $ARGS[0] = 'bomj2':
 						end
 					end
 
+
 					act 'Pay me 1000 and I''ll do you all':
 						cla
 						if pcs_humint <= rand(35,75) or pcs_intel <= rand(55,85):
@@ -1028,6 +1069,7 @@ if $ARGS[0] = 'bomj2':
 
 					end
 
+
 					temp = rand(1,10)
 					if temp <= 3:
 						'...just a quick blowie and you are free'
@@ -1164,8 +1206,11 @@ if $ARGS[0] = 'bomj2':
 	end
 end
 
+
+
 if $ARGS[0] = 'bomjfight':
 	cla
+	CLOSE ALL
 	trahobomj = ubomj2
 	'I see the situation...'
 
@@ -1613,6 +1658,7 @@ if $ARGS[0] = 'bomjfight':
 			gs 'exercise', 'tier3', 0, 'def_exp', 'agil_exp'
 			gs 'stat'
 
+
 			gs 'pain', rand(0,2), 'tummy', 'kick'
 			gs 'pain', rand(0,2), 'cheeks', 'hit'
 			gs 'pain', rand(0,2), 'thighs', 'kick'
@@ -1634,6 +1680,7 @@ if $ARGS[0] = 'bomjfight':
 			gs 'exercise', 'tier3', 0, 'def_exp', 'agil_exp'
 			gs 'stat'
 
+
 			gs 'pain', rand(2,3), 'tummy', 'kick'
 			gs 'pain', rand(2,2), 'cheeks', 'hit'
 			gs 'pain', rand(2,4), 'thighs', 'kick'
@@ -1653,6 +1700,7 @@ end
 
 if $ARGS[0] = 'shoot':
 	*clr & cla
+	CLOSE ALL
 	if ammo > 0:
 		act 'kill the next one':
 			*clr & cla
@@ -1806,10 +1854,12 @@ if $ARGS[0] = 'shoot':
 							gt 'street_event', 'fight_rape'
 						end
 
+
 						act 'Surrender':
 							*clr & cla
 							'He hit me with something heavy and I lost consciousness...'
 
+
 							gs 'pain', 9, 'tummy', 'kick'
 							gs 'pain', 8, 'cheeks', 'hit'
 							gs 'pain', 8, 'thighs', 'kick'
@@ -1872,6 +1922,7 @@ if $ARGS[0] = 'shoot':
 							*clr & cla
 							'They hit me with something heavy and I lost consciousness...'
 
+
 							gs 'pain', 9, 'tummy', 'kick'
 							gs 'pain', 8, 'cheeks', 'hit'
 							gs 'pain', 8, 'thighs', 'kick'
@@ -1937,6 +1988,7 @@ if $ARGS[0] = 'shoot':
 			*clr & cla
 			'They hit me with something heavy and I lost consciousness...'
 
+
 			gs 'pain', 9, 'tummy', 'kick'
 			gs 'pain', 8, 'cheeks', 'hit'
 			gs 'pain', 8, 'thighs', 'kick'
@@ -1996,8 +2048,11 @@ if $ARGS[0] = 'shoot':
 	end
 end
 
+
+
 if $ARGS[0] = 'bomj2drink':
 	*clr & cla
+	CLOSE ALL
 	urape = 0
 	ubomj = 0
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
@@ -2024,8 +2079,11 @@ if $ARGS[0] = 'bomj2drink':
 	act 'drink more': gt 'mod_public_WC_citybasement_bumsex', 'drink2'
 end
 
+
+
 if $ARGS[0] = 'drink2':
 	*clr & cla
+	CLOSE ALL
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
 	if rand(1,2) = 1:
 		'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/drink.mp4"></video></center>'
@@ -2043,6 +2101,8 @@ if $ARGS[0] = 'drink2':
 
 	if kazenka >= 3: 'I feel bum''s hand on my butt...'
 
+
+
 	act 'drink more':
 		gt 'mod_public_WC_citybasement_bumsex', 'drink2'
 	end
@@ -2058,6 +2118,7 @@ if $ARGS[0] = 'drink2':
 		'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/smoke.mp4"></video></center>'
 	end
 
+
 	if siga > 0:
 		act 'smoke':
 			minut += 5

locations/mod_public_WC_citybasement_enter.qsrc

@@ -222,6 +222,11 @@ if $ARGS[0] = 'vhid0':
 	end
 end
 
+
+
+
+
+
 if $ARGS[0] = 'vhid1':
 	*clr & cla
 	urape = 0

locations/mod_public_WC_citybasement_lose.qsrc

@@ -2,6 +2,7 @@
 
 if $ARGS[0] = 'lose':
 	*clr & cla
+	CLOSE ALL
 	if trahobomj = 1:
 		'A bum broke me down.'
 	else
@@ -18,6 +19,7 @@ if $ARGS[0] = 'lose':
 		end
 	end
 
+
 	temp = rand(1,3)
 	if grape = 1: temp = 2
 	if temp ! 1:
@@ -38,6 +40,7 @@ if $ARGS[0] = 'lose':
 		'I stopped resisting...'
 		'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomj_more/rape/pogroza.jpg"></center>'
 
+
 	else
 		'I was tied up with duct tape'
 		'The bum took everything I have and throw me out!'
@@ -76,8 +79,10 @@ if $ARGS[0] = 'lose':
 	end
 end
 
+
 if $ARGS[0] = 'bomjisex':
 	*clr & cla
+	CLOSE ALL
 	bumevent = 1
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
 	trahobomj = ubomj2
@@ -122,6 +127,7 @@ if $ARGS[0] = 'bomjisex':
 			end
 		end
 
+
 		temp1 = pcs_persuas * 8
 		temp2 = pcs_persuas * 10
 		temp3 = pcs_persuas * 15
@@ -197,15 +203,20 @@ if $ARGS[0] = 'bomjisex':
 		end
 	end
 
+
 	if kazenka >= ktemp:
 		*clr & cla
 		killvar 'kazenka'
 		killvar	'ktemp'
 
+
+
 		minut += rand (180, 360)
 		pcs_sleep += rand (26,60)
 		gs 'stat'
 
+
+
 		'I wake up...'
 		*nl
 		'I have headache.'
@@ -268,9 +279,11 @@ if $ARGS[0] = 'bomjisex':
 				money = 0
 				gs 'stat'
 
+
+
 				if rand (1,3) = 3:
 					'Ow, wait, I remember some humiliating jokes'
-					'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomj_more/sex/sleep/fun sleep.jpg"></center>'
+					'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomj_more/sex/sleep/fun sleep'+rand(1,2)+'.jpg"></center>'
 					'but nothing more'
 					pcs_mood -= 15
 					gs 'stat'
@@ -378,6 +391,7 @@ if $ARGS[0] = 'bomjisex':
 			end
 			gs 'stat'
 
+
 			if $loc_arg = '101':
 				gt 'city_residential'
 			elseif $loc_arg = '111':
@@ -398,8 +412,11 @@ if $ARGS[0] = 'bomjisex':
 	end
 end
 
+
+
 if $ARGS[0] = '2b':
 	*clr & cla
+	CLOSE ALL
 
 	if rand(1,2) = 1:
 		'I start to stroke their smelly dicks first'
@@ -416,6 +433,8 @@ if $ARGS[0] = '2b':
 			gs 'arousal', 'bj', 10, 'sub', 'group'
 			gs 'stat'
 
+
+
 			act 'continue':
 				*clr & cla
 				'One of the Bums starts fuck my pussy while I blow another'
@@ -671,6 +690,8 @@ if $ARGS[0] = '2b':
 					gs 'stat'
 				end
 
+
+
 				act 'continue':
 					*clr & cla
 					'At the end they decided to cum...'
@@ -864,8 +885,11 @@ if $ARGS[0] = '2b':
 	end
 end
 
+
+
 if $ARGS[0] = 'sold':
 	*clr & cla
+	CLOSE ALL
 
 	'They grin and they hungry look on me...'
 
@@ -903,6 +927,7 @@ end
 
 if $ARGS[0] = 'sold2':
 	*clr & cla
+	CLOSE ALL
 	if ubomj2 >= 2:
 		'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/drink.jpg"></center>'
 
@@ -986,6 +1011,8 @@ if $ARGS[0] = 'sold2':
 					gs 'pain', 4, 'vaginal', 'stretch'
 					gs 'stat'
 
+
+
 				elseif atemp <= 4:
 					'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/130/p.jpg"></center>'
 					'OMG, they want to rip my pussy!'
@@ -1002,6 +1029,7 @@ if $ARGS[0] = 'sold2':
 					gs 'pain', 8, 'vaginal', 'stretch'
 					gs 'stat'
 
+
 				elseif atemp <= 6:
 					'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/202/a.jpg"></center>'
 					'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/202/b.jpg"></center>'
@@ -1043,8 +1071,6 @@ if $ARGS[0] = 'sold2':
 					gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
 					gs 'stat'
 					gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'prostitution', 'gangbang'
-					gs 'mod_public_WC_citybasement_bumsex', 'rape'
-					gs 'arousal', 'bj', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
 					gs 'stat'
 					gs 'arousal', 'bj', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
 					gs 'stat'
@@ -1060,6 +1086,7 @@ if $ARGS[0] = 'sold2':
 						'first guy penetrates my pussy, the next one put it in my ass...'
 						'other two just want a hand job'
 
+
 						gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
 						gs 'stat'
 						gs 'arousal', 'anal', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
@@ -1071,6 +1098,8 @@ if $ARGS[0] = 'sold2':
 						minut -= 30
 						gs 'stat'
 
+
+
 					elseif htemp = 2:
 						'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/h/0121/v.mp4"></video></center>'
 						'OMG, they want to rip my ass!'
@@ -1088,6 +1117,8 @@ if $ARGS[0] = 'sold2':
 						gs 'pain', 4, 'asshole', 'stretch'
 						gs 'stat'
 
+
+
 					elseif htemp = 3:
 						'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/h/1021/p ('+rand(1,2)+').jpg"></center>'
 						'OMG, they want to rip my ass!'
@@ -1164,6 +1195,8 @@ if $ARGS[0] = 'sold2':
 							gs 'pain', 4, 'vaginal', 'stretch'
 							gs 'stat'
 
+
+
 						elseif atemp <= 4:
 							'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/130/p.jpg"></center>'
 							'OMG, they want to rip my pussy!'
@@ -1180,6 +1213,7 @@ if $ARGS[0] = 'sold2':
 							gs 'pain', 8, 'vaginal', 'stretch'
 							gs 'stat'
 
+
 						elseif atemp <= 6:
 							'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/202/a.jpg"></center>'
 							'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/202/b.jpg"></center>'
@@ -1214,6 +1248,7 @@ if $ARGS[0] = 'sold2':
 							gs 'pain', 4, 'mouth', 'stretch'
 							gs 'stat'
 
+
 						elseif atemp <= 10:
 							'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/220/p.jpg"></center>'
 							'OMG, they want to rip ME!'
@@ -1238,6 +1273,7 @@ if $ARGS[0] = 'sold2':
 								'first guy penetrates my pussy, the next one put it in my ass...'
 								'other two just want a hand job'
 
+
 								gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
 								gs 'stat'
 								gs 'arousal', 'anal', 10, 'sub', 'rough', 'prostitution', 'gangbang', 'humiliation'
@@ -1249,6 +1285,8 @@ if $ARGS[0] = 'sold2':
 								minut -= 30
 								gs 'stat'
 
+
+
 							elseif htemp = 2:
 								'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/h/0121/v.mp4"></video></center>'
 								'OMG, they want to rip my ass!'
@@ -1266,6 +1304,8 @@ if $ARGS[0] = 'sold2':
 								gs 'pain', 4, 'asshole', 'stretch'
 								gs 'stat'
 
+
+
 							elseif htemp = 3:
 								'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/4/h/1021/p ('+rand(1,2)+').jpg"></center>'
 								'OMG, they want to rip my ass!'
@@ -1340,6 +1380,7 @@ if $ARGS[0] = 'sold2':
 
 							'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/cum/onmev ('+rand(1,8)+').mp4"></video></center>'
 
+
 							spafinloc = 1
 							gs 'cum_manage'
 							spafinloc = 2
@@ -1369,6 +1410,7 @@ if $ARGS[0] = 'sold2':
 							spafinloc = 16
 							gs 'cum_manage'
 
+
 							gs 'stat'
 
 							act 'continue':
@@ -1429,6 +1471,8 @@ if $ARGS[0] = 'sold2':
 			*nl
 			'No turns and lets use her on hard mode!'
 
+
+
 			atemp = rand (1,6)
 
 			if atemp <= 1:
@@ -1686,6 +1730,7 @@ if $ARGS[0] = 'sold2':
 
 							'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/sex/bomji_platyly/cum/onmev ('+rand(1,8)+').mp4"></video></center>'
 
+
 							spafinloc = 1
 							gs 'cum_manage'
 							spafinloc = 2
@@ -1715,6 +1760,7 @@ if $ARGS[0] = 'sold2':
 							spafinloc = 16
 							gs 'cum_manage'
 
+
 							gs 'stat'
 
 							act 'continue':
@@ -1775,6 +1821,8 @@ if $ARGS[0] = 'sold2':
 			*nl
 			'"Lets use her on hard mode!"'
 
+
+
 			atemp = rand (1,6)
 
 			if atemp <= 1:
@@ -1870,6 +1918,7 @@ if $ARGS[0] = 'sold2':
 					gs 'stat'
 				end
 
+
 				act 'continue':
 					*clr & cla
 
@@ -2068,8 +2117,10 @@ if $ARGS[0] = 'sold2':
 	end
 end
 
+
 if $ARGS[0] = 'grape':
 	*clr & cla
+	CLOSE ALL
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
 
 	gs 'npcgeneratec', 0, 'a bum', rand(10,25)
@@ -2085,6 +2136,7 @@ if $ARGS[0] = 'grape':
 	if trahobomj = 1:
 		*clr & cla
 
+
 		act 'resist':
 			dratue += 1
 			'be silent, cunt!'
@@ -2132,6 +2184,7 @@ if $ARGS[0] = 'grape':
 				gs 'stat'
 			end
 
+
 			if atemp <= 2:
 				'I am crying by continue blowing him'
 				if rand (1,2) = 1:
@@ -2172,6 +2225,7 @@ if $ARGS[0] = 'grape':
 					gs 'stat'
 				end
 
+
 				if atemp <= 2:
 					'at last ...'
 					if rand (1,2) = 1:
@@ -2243,9 +2297,12 @@ if $ARGS[0] = 'grape':
 					spafinloc = 9
 					gs 'cum_manage'
 
+
 					gs 'stat'
 				end
 
+
+
 				if dratue < 3:
 					if doggvalt = 1:
 						act 'continue':
@@ -2290,6 +2347,7 @@ if $ARGS[0] = 'grape':
 								gs 'stat'
 							end
 
+
 							act 'agree?': gt 'mod_public_WC_citybasement_rug', 'bottle'
 
 						end
@@ -2385,6 +2443,7 @@ if $ARGS[0] = 'grape':
 			gs 'arousal', 'bj', 10, 'sub', 'rough', 'rape'
 			gs 'stat'
 
+
 			act 'resist':
 				dratue += 1
 				'be silent, cunt!'
@@ -2398,11 +2457,16 @@ if $ARGS[0] = 'grape':
 				gs 'stat'
 			end
 
+
+
+
 			act 'continue':
 				*clr & cla
 
 				'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/rape/2/bj (1).jpg"></center>'
 
+
+
 				act 'resist':
 					dratue += 1
 					'be silent, cunt!'
@@ -2416,6 +2480,8 @@ if $ARGS[0] = 'grape':
 					gs 'stat'
 				end
 
+
+
 				act 'continue':
 					*clr & cla
 					'While one of them restrains me the other penetrates'
@@ -2423,6 +2489,8 @@ if $ARGS[0] = 'grape':
 					gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'rape'
 					gs 'stat'
 
+
+
 					act 'resist':
 						dratue += 1
 						'be silent, cunt!'
@@ -2436,6 +2504,7 @@ if $ARGS[0] = 'grape':
 						gs 'stat'
 					end
 
+
 					act 'continue':
 						*clr & cla
 						'While one of them restrains me the other fucks'
@@ -2448,6 +2517,8 @@ if $ARGS[0] = 'grape':
 						gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'rape'
 						gs 'stat'
 
+
+
 						act 'resist':
 							dratue += 1
 							'be silent, cunt!'
@@ -2484,6 +2555,7 @@ if $ARGS[0] = 'grape':
 								gs 'stat'
 							end
 
+
 							act 'continue':
 								*clr & cla
 								'A bum made a creampie...'
@@ -2517,8 +2589,11 @@ if $ARGS[0] = 'grape':
 								spafinloc = 9
 								gs 'cum_manage'
 
+
 								gs 'stat'
 
+
+
 								if dratue < 6:
 									if doggvalt = 1:
 										act 'continue':
@@ -2563,6 +2638,7 @@ if $ARGS[0] = 'grape':
 												gs 'stat'
 											end
 
+
 											act 'agree?': gt 'mod_public_WC_citybasement_rug', 'bottle'
 
 										end
@@ -2652,6 +2728,7 @@ if $ARGS[0] = 'grape':
 			gs 'stat'
 		end
 
+
 		'They undress and rip my clothes'
 		'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/rape/3/1 rape_start.mp4"></video></center>'
 		gs 'clothing', 'strip'
@@ -2680,6 +2757,7 @@ if $ARGS[0] = 'grape':
 				gs 'stat'
 			end
 
+
 			act 'continue':
 				*clr & cla
 				'Other bum put his smelly dick in my mouth!'
@@ -2859,6 +2937,7 @@ if $ARGS[0] = 'grape':
 
 											'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/rape/3/11 3cum.mp4"></video></center>'
 
+
 											spafinloc = 7
 											gs 'cum_manage'
 											spafinloc = 11
@@ -2878,6 +2957,8 @@ if $ARGS[0] = 'grape':
 
 												'<center><video autoplay loop src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/rape/3/12 leave.mp4"></video></center>'
 
+
+
 												if dratue < 9:
 													if doggvalt = 1:
 														act 'continue':
@@ -2922,6 +3003,7 @@ if $ARGS[0] = 'grape':
 																gs 'stat'
 															end
 
+
 															act 'agree?': gt 'mod_public_WC_citybasement_rug', 'bottle'
 														end
 													end
@@ -2945,4 +3027,5 @@ if $ARGS[0] = 'grape':
 	end
 end
 
+
 --- mod_public_WC_citybasement_lose ---------------------------------

locations/mod_public_WC_citybasement_rug.qsrc

@@ -2,6 +2,7 @@
 
 if $ARGS[0] = 'dog':
 	*clr & cla
+	CLOSE ALL
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
 	'I have no choice...I need to fuck with <<dogimya>>...'
 	killvar 'doggvalt'
@@ -18,6 +19,7 @@ if $ARGS[0] = 'dog':
 		gs 'sweat', 'add', 10
 		'I stand on my four'
 
+
 		act 'wait':
 			*clr & cla
 			'The guy helps the dog. And all begins'
@@ -36,14 +38,16 @@ if $ARGS[0] = 'dog':
 				'The <<dogimya>> starts to penetrates me!'
 				temp = rand (1,2)
 				if temp = 1:
-					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/pussV.mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/pussv ('+rand(1,3)+').mp4"></video></center>'
 				else
 					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/puss ('+rand(1,14)+').jpg"></center>'
 				end
 
+
 				if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
 				DogVag += 1
 
+
 				gs 'stat'
 
 				gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
@@ -65,6 +69,7 @@ if $ARGS[0] = 'dog':
 						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
 					end
 
+
 					gs 'arousal', 'vaginal', 15, 'sub', 'beast', 'rough'
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -203,8 +208,11 @@ if $ARGS[0] = 'dog':
 	end
 end
 
+
+
 if $ARGS[0] = 'bottle':
 	*clr & cla
+	CLOSE ALL
 	'<center><img <<$set_imgh>> src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/tabir (<<tabir>>).jpg"></center>'
 	'I have no choice...'
 	gs 'npcgeneratec', 0, 'bottle', rand(8,15)
@@ -311,8 +319,10 @@ if $ARGS[0] = 'bottle':
 	end
 end
 
+
 if $ARGS[0] = 'endrape':
 	*clr & cla
+	CLOSE ALL
 	temp = rand(1,3)
 	if pliashka = 1: temp = 2
 	$rope = 100
@@ -348,6 +358,7 @@ if $ARGS[0] = 'endrape':
 		znaydut = 0
 		act 'try to untie myself': gt 'mod_public_WC_citybasement_rug', 'rope'
 
+
 	elseif temp = 2:
 
 		*clr & cla
@@ -405,8 +416,11 @@ if $ARGS[0] = 'endrape':
 	end
 end
 
+
+
 if $ARGS[0] = 'rope':
 	cla
+	CLOSE ALL
 	if pliashka = 1:
 		'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/101gopotamista/pidval/bomj_more/fin/rape/freeuse (1).jpg"></center>'
 	else
@@ -446,6 +460,7 @@ if $ARGS[0] = 'rope':
 				'With the loud sound of the rope, it finally bursts.'
 				wait 500
 
+
 				act 'look around':
 					killvar 'pliashka'
 					if $loc_arg = '101':
@@ -595,6 +610,7 @@ if $ARGS[0] = 'rope':
 		end
 	end
 
+
 	if znaydut >= rand (2,5):
 		cla
 		killvar 'pliashka'
@@ -613,6 +629,7 @@ end
 
 if $ARGS[0] = 'find':
 	*clr & cla
+	CLOSE ALL
 
 	temp = rand(1,10)
 	if temp = 1: $namebum = 'Koliamba'
@@ -652,6 +669,7 @@ if $ARGS[0] = 'find':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista//pidval//bomji/sex/bj_start'+rand(1,2)+'.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(3,7) * bimbolevel
 				'His dick smells bad but it tastes so manly... I am happy to make this man happy!'
@@ -725,6 +743,7 @@ if $ARGS[0] = 'find':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/vag_start'+rand(1,2)+'.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(5,10) * bimbolevel
 				'This smelly bum entered my pussy... I am happy to make this man happy!'
@@ -782,6 +801,7 @@ if $ARGS[0] = 'find':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/wc/events/90/101gopotamista/pidval/bomji/sex/anal.mp4"></video></center>'
 
+
 			if bimbolevel >= 2:
 				pcs_mood += rand(5,10) * bimbolevel
 				'This smelly bum entered my ass... I am happy to make this man happy!'

locations/mod_public_WC_kara.qsrc

@@ -359,10 +359,11 @@ if $ARGS[0] = 'kara4':
 		temp = 1
 	end
 	if temp = 1:
-		minut += rand(45,120)
 		'Simple methods do not cure, let''s try this one'
 		temp = rand (1,4)
 		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/4/uv<<temp>>.mp4"></video></center>'
+		stat['BDSM'] += 1
+		gs 'arousal', 'BDSM', rand(45,120), 'bound', 'sub'
 		gs 'pain', rand(0,2), 'back', 'spank'
 		gs 'pain', rand(0,2), 'asscheeks', 'spank'
 		gs 'pain', rand(0,2), 'hips', 'spank'
@@ -383,6 +384,7 @@ if $ARGS[0] = 'kara4':
 	else
 		'Hold the bottle. You now have a choice. Either you jump on it, or or I''ll shove 3 of those in you'
 		temp = rand(1,3)
+		stat['BDSM'] += 1
 		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/4/pv<<temp>>.mp4"></video></center>'
 		'I have no choice, I agreed.'
 		willpowermax -= rand(0,2)
@@ -564,6 +566,7 @@ if $ARGS[0] = 'gandon':
 				minut += rand(15,20)
 				gs 'stat'
 
+
 				act 'It is finally over': gt 'mod_public_WC_rab', 'dvir'
 			end
 		else

locations/mod_public_WC_kara7.qsrc

@@ -40,6 +40,7 @@ if $ARGS[0] = 'kara7':
 	gs 'panties', 'remove'
 	gs 'stat'
 
+
 	if hour < 16:
 		endhour = hour + 6
 	else
@@ -51,6 +52,7 @@ if $ARGS[0] = 'kara7':
 		end
 	end
 
+
 	if hour >= 5 and hour < 22:
 		'<<hour>> den'
 		ztemp = 0
@@ -83,6 +85,7 @@ if $ARGS[0] = 'kara7':
 			gs 'pain', 2, 'toes', 'cramp'
 			gs 'stat'
 
+
 			wait 1000
 			minut += rand(15,45)
 			*nl
@@ -151,6 +154,8 @@ if $ARGS[0] = 'waitnight':
 	gs 'pain', 2, 'toes', 'cramp'
 	gs 'stat'
 
+
+
 	temp = rand(1,25)
 	if hour <= 4: temp += hour
 
@@ -178,6 +183,8 @@ if $ARGS[0] = 'waitnight':
 			'I see some man sneaks up'
 			act 'wait in silence':
 
+
+
 				temp = rand(1,6)
 				if temp = 1:
 					ztemp += 1
@@ -201,6 +208,8 @@ if $ARGS[0] = 'waitnight':
 				ztemp += 1
 				gt 'mod_public_WC_kara7', 'maniak'
 
+
+
 				temp = rand(1,6)
 				if temp = 1:
 					ztemp += 1
@@ -246,6 +255,7 @@ if $ARGS[0] = 'sexbjn':
 		temp = rand(1,2)
 		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/sex<<temp>>.mp4"></video></center>'
 
+
 		gs 'npcgeneratec', 0, 'a random man', rand(35,60)
 		gs 'boyStat', $npclastgenerated
 		stat['vaginal'] += 1
@@ -296,6 +306,7 @@ if $ARGS[0] = 'sexbjn':
 			gs 'npcgeneratec', 0, 'Some man', rand(19,40)
 			gs 'boyStat', $npclastgenerated
 
+
 			stat['bj'] += 2
 			gs 'arousal', 'bj', rand(10,25), 'sub', 'humiliation', 'rough', 'rape'
 			gs 'stat'
@@ -334,6 +345,7 @@ if $ARGS[0] = 'sexbjn':
 	end
 end
 
+
 if $ARGS[0] = 'bdsmn':
 	*clr & cla
 	$loc = 'mod_public_WC_kara7'
@@ -402,6 +414,7 @@ if $ARGS[0] = 'beast':
 		gs 'npcgeneratec', 0, 'le beast', 113
 		gs 'boyStat', $npclastgenerated
 
+
 		cumarrdel = 0
 		cumarrcon = 0
 		spafinloc = 0
@@ -439,6 +452,7 @@ if $ARGS[0] = 'beasthentai':
 	'A lot of squishy tentacles covers my body and fills my ass and pussy!'
 	'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/hbeast/hsex.mp4"></video></center>'
 
+
 	aphrodisiac_have += 1
 	gs 'drugs', 'aphrodisiac'
 	gs 'stat'
@@ -450,6 +464,7 @@ if $ARGS[0] = 'beasthentai':
 	stat['vaginal'] += 6
 	stat['anal'] += 6
 
+
 	aphrodisiac_have += 1
 	gs 'drugs', 'aphrodisiac'
 	gs 'stat'
@@ -458,6 +473,7 @@ if $ARGS[0] = 'beasthentai':
 	gs 'pain', 6, 'vaginal', 'stretch'
 	gs 'stat'
 
+
 	gs 'arousal', 'vaginal', 15, 'rape', 'futa', 'beast'
 	gs 'arousal', 'anal', 15, 'rape', 'futa', 'beast'
 	gs 'stat'
@@ -601,6 +617,7 @@ if $ARGS[0] = 'beasthentai':
 		cumarrcpt = 600
 		gs 'cum_manage'
 
+
 		if beast = 1:
 			'I can control this beast'
 			act 'Order: carry me from this forest!':
@@ -626,6 +643,7 @@ if $ARGS[0] = 'maniak':
 	'Man approches me.'
 	if pcs_magik > 0: 'I see something unhuman in his eyes...'
 
+
 	temp = rand (1,2)
 	if temp = 1:
 		'Stranger takes some branch and grins'
@@ -725,10 +743,12 @@ if $ARGS[0] = 'maniak2':
 						gs 'boyStat', $npclastgenerated
 					end
 
+
 					guy += 1
 					rape += 1
 					pcs_vag += 2
 
+
 					cumarrdel = 0
 					cumarrcon = 0
 					spafinloc = 0
@@ -800,6 +820,10 @@ if $ARGS[0] = 'maniak2':
 										pcs_magik += 500
 										ztemp = 0
 
+
+
+
+
 										if mesec ! 0: mesec = 0
 										if FocH ! 0: FocH = 0
 										if EggRH ! 0: EggRH = 0
@@ -835,6 +859,7 @@ if $ARGS[0] = 'maniak2':
 											knowpregloss = 2
 											if FertEgg > 0: FertEgg = 0
 
+
 											Nextbaby = arrsize('$ChildFath')
 											Temppolkid = rand(0,1)
 											polkid[nextbaby] = Temppolkid
@@ -885,6 +910,9 @@ if $ARGS[0] = 'maniak2':
 								'Hmm, it looks like you have intresting life. And I think you have money. I can make you free, if you pays me 15000 <b>₽</b>'
 								mood += 5
 
+
+
+
 								if karta + bankDebtLimit >= 15000:
 									act 'agree to pay':
 										'I have money on my card, is it enought for you?'
@@ -959,6 +987,9 @@ if $ARGS[0] = 'ztemp':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'ztemp3':
 	$loc = 'mod_public_WC_kara7'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/horror.jpg"></center>'
@@ -1008,6 +1039,7 @@ if $ARGS[0] = 'death':
 	act 'Go out': pcs_health += 5 & gt 'pav_commercial'
 end
 
+
 if $ARGS[0] = 'kara7den':
 	CLOSE ALL
 	menu_off = 0
@@ -1136,6 +1168,7 @@ if $ARGS[0] = 'beastd':
 		gs 'npcgeneratec', 0, 'le beast', 113
 		gs 'boyStat', $npclastgenerated
 
+
 		cumarrdel = 0
 		cumarrcon = 0
 		spafinloc = 0
@@ -1155,10 +1188,9 @@ if $ARGS[0] = 'beastd':
 				vtecha = 1
 				Artem = 0 & Tolik = 0 & Vania = 0
 				gt 'mod_public_WC_kara7', 'beastd2'
-
 			end
 		end
-		act 'take a breath' :
+		act 'take a breath':
 			killvar 'beast'
 			gt 'mod_public_WC_kara7','kara7den'
 		end
@@ -1197,6 +1229,7 @@ if $ARGS[0] = 'beastd2':
 		end
 	end
 
+
 	act 'continue running':
 		if pcs_agil >= 90 or pcs_run >= 70:
 			cla
@@ -1324,6 +1357,7 @@ if $ARGS[0] = '2sex2':
 		facial += 2
 		gs 'stat'
 
+
 		gs 'npcgeneratec', 0, 'a random man', rand(18,45)
 		gs 'boyStat', $npclastgenerated
 		spafinloc = 9
@@ -1381,6 +1415,7 @@ if $ARGS[0] = '2sex2':
 	end
 end
 
+
 if $ARGS[0] = 'bdsm':
 	CLOSE ALL
 	menu_off = 0
@@ -1423,6 +1458,7 @@ if $ARGS[0] = 'bdsm':
 	end
 end
 
+
 if $ARGS[0] = 'bjsex':
 	CLOSE ALL
 	menu_off = 0
@@ -1442,10 +1478,12 @@ if $ARGS[0] = 'bjsex':
 		gs 'npcgeneratec', 0, 'Some man', rand(19,40)
 		gs 'boyStat', $npclastgenerated
 
+
 		stat['bj'] += 2
 		gs 'arousal', 'bj', rand(10,25), 'sub', 'humiliation', 'rough', 'rape'
 		gs 'stat'
 
+
 		act 'Continue to suck':
 			*clr & cla
 			'Soon guy groans and cums in my mouth'
@@ -1475,9 +1513,11 @@ if $ARGS[0] = 'bjsex':
 		end
 	else
 
+
 		gs 'npcgeneratec', 0, 'a random man', rand(35,60)
 		gs 'boyStat', $npclastgenerated
 
+
 		'Guy starts to fuck me'
 		temp = rand(1,2)
 		if temp = 1:
@@ -1488,6 +1528,9 @@ if $ARGS[0] = 'bjsex':
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/kara/7/sex/sexp<<temp>>.jpg"></center>'
 		end
 
+
+
+
 		stat['vaginal'] += 1
 
 		guy += 1
@@ -1534,6 +1577,7 @@ if $ARGS[0] = 'maniakd':
 	'Man approches me.'
 	if pcs_magik > 0: 'I see something unhuman in his eyes...'
 
+
 	temp = rand (1,2)
 	if temp = 1:
 		'Stranger takes some branch and grins'
@@ -1577,6 +1621,7 @@ if $ARGS[0] = 'maniakd':
 	end
 end
 
+
 if $ARGS[0] = 'maniakd2':
 	CLOSE ALL
 	menu_off = 0
@@ -1637,10 +1682,12 @@ if $ARGS[0] = 'maniakd2':
 						gs 'boyStat', $npclastgenerated
 					end
 
+
 					guy += 1
 					rape += 1
 					pcs_vag += 2
 
+
 					cumarrdel = 0
 					cumarrcon = 0
 					spafinloc = 0

locations/mod_public_WC_kara71.qsrc

@@ -23,6 +23,7 @@ if $ARGS[0] = 'runrun':
 			gs 'stat'
 			gt 'mod_public_WC_kara71', 'run2'
 
+
 		end
 		act 'go South':
 			Y -= 1

locations/mod_public_WC_options2.qsrc

@@ -1,8 +1,11 @@
 # mod_public_WC_options2
 *clr & cla
 
+
+
 '<center><h2>Public WC mod Settings</h2></center>'
 
+
 if WCzoo > 0:
 	cla
 	'Beasts interactions On'

locations/mod_public_WC_play_the_piano.qsrc

@@ -22,18 +22,18 @@ if $ARGS[0] = 'Play_the_piano':
 	pcs_mood += 5
 	minut += rand(15,35)
 
-	if  pcs_instrmusic <= 100:
+	if  pcs_instrmusic >= 100:
 		'Music fascinated me and took me to another world, music conveyed harmony to everyone around'
 		pcs_mood += 10
 		brak -= 3
-	elseif pcs_instrmusic <= 70:
+	elseif pcs_instrmusic >= 70:
 		'Music comforted my hearing and pleasantly pleased my soul'
 		pcs_mood += 5
 		brak -= 2
-	elseif pcs_instrmusic <= 40:
+	elseif pcs_instrmusic >= 40:
 		'The music is quite entertaining'
 		brak -= 1
-	elseif pcs_instrmusic <= 20:
+	elseif pcs_instrmusic >= 20:
 		'I can call it music'
 	else
 		'The cacophony of sounds is cheered me up a little bit.'

locations/mod_public_WC_rab.qsrc

@@ -13,19 +13,28 @@ if $ARGS[0] = 'lis_start':
 	if WCzoooff = 1: WCzoo = 0
 	if newodiag ! 1: newodiag = 0
 	posud = 0
+	willdec = 0
 	beast = 1
 	killed = 0
+	vbrak = 0
+	ryba_cooked = 0
+	ryba = 0
 	zucchini = 0
 	apple = 0
 	ogirok = 0
+	turok = 0
+	vbike = 100
+	stime = 0
 	firstclean = 0
 	nkolo = 0
 	gun = 0
+	bdsmurok = 0
 	Avirgin = 1
 	dvirbrud = 16
 	vtecha = 0
 	askTolik = 0
-	zvit = week
+	zvit = week + 1
+	if zvit = 8: zvit = 1
 	Alove = 0
 	Tlove = 0
 	Vlove = 0
@@ -64,8 +73,23 @@ if $ARGS[0] = 'lis_start':
 		if slova < 0: gt 'mod_public_WC_kara', '0sliv'
 	end
 	act 'wait':
-		cla
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
 		'Betsy. Now that''s your name. I saved you from your terrible previous life worthless whore. From today your past is forgotten forever. Now you will live with us. You will not know hunger and sorrow, but you will have to obey our laws.'
+		*nl
+		'You have no right to speak. You are stupid and we are not interested in your words, they will just take our time. But we know that you cannot survive without them, so we will reward you with them. You now have <<slova>> words.'
+		'You have no right to refuse us anything.'
+		'You have no right to move away from your home further than to a well in one direction, shiter into the other and bushes.'
+		'Everyday at 21:00 you must come to Me to report your day work. I''ll wait you on the first floor of main house. Artem will be with us to learn. If you would be a good girl during day, you will have some words as a reward, otherwise you will be punished.'
+		'<b>Our first meet are going to be tomorrow.</b>'
+		*nl
+		'Each evening I will give you a task for next day... or you can ask for task during day.'
+		'I want you be sure, you must not be afraid. We need women hands here. If you manage all stuff we need, no one will hurt you, and everyone will be happy.'
+		*nl
+		'<b>Just for you to know: I hate lie.</b>'
+		*nl
+		'First, to untied you, we need to make sure you understand everything. Did you understand everything?'
+
 		act 'They will look for me and you will regret!':
 			'I understand that you do not yet know our laws, so you act like that, but this is the last warning now'
 			slova -= 1
@@ -80,19 +104,6 @@ if $ARGS[0] = 'lis_start':
 				gt 'mod_public_WC_kara', '0sliv'
 			end
 		end
-		wait 900
-		*clr
-		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
-		'You have no right to speak. You are stupid and we are not interested in your words, they will just take our time. But we know that you cannot survive without them, so we will reward you with them. You now have <<slova>> words.'
-		'You have no right to refuse us anything.'
-		'You have no right to move away from your home further than to a well in one direction, shiter into the other and bushes.'
-		'Everyday at 21:00 you must come to Me to report your day work. I''ll wait you on the first floor of main house. Artem will be with us to learn. If you would be a good girl during day, you will have some words as a reward, otherwise you will be punished.'
-		'Each evening I will give you a task for next day... or you can ask for task during day.'
-		'I want you be sure, you must not be afraid. We need women hands here. If you manage all stuff we need, no one will hurt you, and everyone will be happy.'
-		*nl
-		'Just for you to know: I hate lie.'
-		*nl
-		'First, to untied you, we need to make sure you understand everything. Did you understand everything?'
 		act 'Turn around and run into the woods.':
 			if pcs_agil >= rand(80,100) and pcs_sprt >= rand(20,50):
 				cla
@@ -133,6 +144,9 @@ if $ARGS[0] = 'lis_start':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'sama2':
 	CLOSE ALL
 	menu_off = 0
@@ -154,8 +168,23 @@ if $ARGS[0] = 'sama2':
 		if slova < 0: gt 'mod_public_WC_kara', '0sliv'
 	end
 	act 'wait':
-		cla
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
 		'Betsy. Now that''s your name. I saved you from your terrible previous life worthless whore. From today your past is forgotten forever. Now you will live with us. You will not know hunger and sorrow, but you will have to obey our laws.'
+		*nl
+		'You have no right to speak. You are stupid and we are not interested in your words, they will just take our time. But we know that you cannot survive without them, so we will reward you with them. You now have <<slova>> words.'
+		'You have no right to refuse us anything.'
+		'You have no right to move away from your home further than to a well in one direction, shiter into the other and bushes.'
+		'Everyday at 21:00 you must come to Me to report your day work. I''ll wait you on the first floor of main house. Artem will be with us to learn. If you would be a good girl during day, you will have some words as a reward, otherwise you will be punished.'
+		'<b>Our first meet are going to be tomorrow.</b>'
+		*nl
+		'Each evening I will give you a task for next day... or you can ask for task during day.'
+		'I want you be sure, you must not be afraid. We need women hands here. If you manage all stuff we need, no one will hurt you, and everyone will be happy.'
+		*nl
+		'<b>Just for you to know: I hate lie.</b>'
+		*nl
+		'First, to untied you, we need to make sure you understand everything. Did you understand everything?'
+
 		act 'They will look for me and you will regret!':
 			'I understand that you do not yet know our laws, so you act like that, but this is the last warning now'
 			slova -= 1
@@ -166,21 +195,10 @@ if $ARGS[0] = 'sama2':
 			'We ask questions here, and you have to listen to us and our rules'
 			slova -= 1
 			brak += 1
-			if slova < 0: gt 'mod_public_WC_kara', '0sliv'
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			end
 		end
-		wait 900
-		*clr
-		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
-		'You have no right to speak. You are stupid and we are not interested in your words, they will just take our time. But we know that you cannot survive without them, so we will reward you with them. You now have <<slova>> words.'
-		'You have no right to refuse us anything.'
-		'You have no right to move away from your home further than to a well in one direction, shiter into the other and bushes.'
-		'Everyday at 21:00 you must come to Me to report your day work. I''ll wait you on the first floor of main house. Artem will be with us to learn. If you would be a good girl during day, you will have some words as a reward, otherwise you will be punished.'
-		'Each evening I will give you a task for next day... or you can ask for task during day.'
-		'I want you be sure, you must not be afraid. We need women hands here. If you manage all stuff we need, no one will hurt you, and everyone will be happy.'
-		*nl
-		'Just for you to know: I hate lie.'
-		*nl
-		'First, to untied you, we need to make sure you understand everything. Did you understand everything?'
 		act 'Turn around and run into the woods.':
 			if pcs_agil >= rand(80,100) and pcs_sprt >= rand(20,50):
 				cla
@@ -221,6 +239,10 @@ if $ARGS[0] = 'sama2':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'first_rakom':
 	CLOSE ALL
 	$loc = 'mod_public_WC_rab'
@@ -231,9 +253,12 @@ if $ARGS[0] = 'first_rakom':
 	*clr & cla
 	gs 'stat'
 	dick = 25
+	npc_dick[$npclastgenerated] = dick
 	slova += 7
 	willpowermax -= rand(0,2)
 	dick = 25
+	npc_dick[$npclastgenerated] = dick
+
 
 	guy += 1
 	rape += 1
@@ -260,10 +285,17 @@ if $ARGS[0] = 'first_rakom':
 	end
 end
 
+
+
+
+
+
 if $ARGS[0] = 'dvir':
 	gt 'mod_public_WC_rab_DVIR', 'dvir'
 end
 
+
+
 if $ARGS[0] = 'campfire':
 	CLOSE ALL
 	$loc = 'mod_public_WC_rab'
@@ -436,6 +468,7 @@ if $ARGS[0] = 'lisnyk':
 	*clr & cla
 	menu_off = 0
 
+
 	gs 'mod_public_WC_rab_Vania', 'start'
 	if Vania = 1:
 		act 'Talk with Vania': gt 'mod_public_WC_rab_talk', 'Vania'
@@ -694,6 +727,7 @@ if $ARGS[0] = 'lisnyk_wood':
 	act 'Go out': gt 'mod_public_WC_rab', 'lisnyk'
 end
 
+
 if $ARGS[0] = 'lisnyk_dah':
 	CLOSE ALL
 	menu_off = 0
@@ -933,6 +967,9 @@ if $ARGS[0] = 'lisnyk_dim':
 		end
 	end
 
+
+
+
 	if $clothingworntype = 'nude':
 		If Tolik = 1:
 			gt 'mod_public_WC_rab_zashmorg', 'gola'
@@ -1155,6 +1192,7 @@ if $ARGS[0] = 'lisnyk_dim':
 						'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/brud.mp4"></video></center>'
 						act 'continue':
 
+
 							temp = rand(1,9)
 							'Tolik bends me!'
 							'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/vk<<temp>>.mp4"></video></center>'
@@ -1186,8 +1224,80 @@ if $ARGS[0] = 'lisnyk_dim':
 			end
 		end
 	end
+
+
+	if Cumsluttrain = 1 and rand(0,9) >= 8 and week ! 6 and (hour = 6 or hour =15 or hour = 16 or hour = 17 or hour = 18 or hour = 19):
+		*clr & cla
+		'"Here, Betsi, Bon appetite"'
+		'Vania puts a cumed cookies on the table'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet (2).jpg"></center>'
+
+		act 'eat it':
+			*clr & cla
+			VaniaMayster += 1
+			minut += rand(10,30)
+			if bimbolevel >= 2:
+				pcs_mood += 40
+				'Owww, yamy it''s good one and really tasty!!'
+			end
+			pcs_mood -= 20
+			spafinloc = 12
+			gs 'cum_manage'
+			swallow += 1
+			gs 'stat'
+			pcs_health += 10
+			fat += 3
+			pcs_energy += 40
+			if pcs_hydra >= 100:
+				pcs_hydra += 20
+			else
+				pcs_hydra += 30
+			end
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet (1).jpg"></center>'
+			act 'Get up': gt 'mod_public_WC_rab', 'lisnyk_dim'
+		end
+
+		act 'No!':
+			cla
+			slova -= 1
+			brak += 1
+			if slova < 0: gt 'mod_public_WC_kara', '0sliv'
+			act 'Get up': gt 'mod_public_WC_rab', 'lisnyk_dim'
+		end
+
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+			act 'eat it':
+				*clr & cla
+				minut += rand(10,30)
+				if bimbolevel >= 2:
+					pcs_mood += 40
+					'Owww, yamy it''s good one and really tasty!!'
+				end
+				pcs_mood -= 20
+				spafinloc = 12
+				gs 'cum_manage'
+				swallow += 1
+				gs 'stat'
+				pcs_health += 10
+				fat += 3
+				pcs_energy += 40
+				if pcs_hydra >= 100:
+					pcs_hydra += 20
+				else
+					pcs_hydra += 30
+				end
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet ('+rand(1,1)+').jpg"></center>'
+				act 'Get up': gt 'mod_public_WC_rab', 'lisnyk_dim'
+			end
+		end
+	end
 end
 
+
 if $ARGS[0] = 'stove':
 	*clr & cla
 	menu_off = 0
@@ -1255,6 +1365,8 @@ if $ARGS[0] = 'stove':
 		end
 	end
 
+
+
 	if bucket > 0 and raw_meat > 0 and meat_stew = 0 and stovefire = 1:
 		act 'Cook some meat stew (1:00)':
 			kuhniabrud += rand(2,6)
@@ -1279,6 +1391,9 @@ if $ARGS[0] = 'stove':
 		end
 	end
 
+
+
+
 	if bucket >= 5 and hotwater = 0 and stovefire = 1:
 		act 'Heat up water (0:30)':
 			kuhniabrud += rand(0,1)
@@ -1317,6 +1432,53 @@ if $ARGS[0] = 'food':
 			else
 				'You have finished the last of the stew, the pot is empty.'
 			end
+
+			if Cumsluttrain = 1 and rand(0,9) >= 6 and week ! 6 and (hour = 6 or hour =15 or hour = 16 or hour = 17 or hour = 18 or hour = 19):
+				*clr & cla
+
+				'I sit at the table and start to eat'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/1.mp4"></video></center>'
+
+				act 'continue':
+					*clr & cla
+					'Vania comes to me and starts to jerk'
+					'Ow, my lovely cumslut-student! let''s make an outofturn lesson))'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/2.mp4"></video></center>'
+					gs 'arousal', 'voyeur', 5, 'sub'
+					gs 'stat'
+					act 'continue':
+						*clr & cla
+						'Hey! Don''t be lazy! hElp me!'
+						'I help him'
+						gs 'arousal', 'bj', 5, 'sub'
+						gs 'stat'
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/3.mp4"></video></center>'
+						act 'continue':
+							*clr & cla
+							'With my help, he welthy cums in my food'
+							'"Bon appetite"'
+							gs 'arousal', 'voyeur', 5, 'sub'
+							gs 'stat'
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/4.mp4"></video></center>'
+							act 'eat':
+								*clr & cla
+								if bimbolevel >= 2:
+									pcs_mood += 40
+									'Owww, yamy it''s good one!'
+								end
+								pcs_mood -= 20
+								spafinloc = 12
+								gs 'cum_manage'
+								swallow += 1
+								gs 'stat'
+
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/5 ('+rand(1,2)+').mp4"></video></center>'
+								act 'Get up': gt 'mod_public_WC_rab', 'lisnyk_dim'
+							end
+						end
+					end
+				end
+			end
 		end
 	end
 	if mushroom_soup > 0:
@@ -1329,6 +1491,53 @@ if $ARGS[0] = 'food':
 				'You have finished the last of the soup, the pot is empty.'
 			end
 			gs 'stat'
+
+			if Cumsluttrain = 1 and rand(0,9) >= 6 and week ! 6 and (hour = 6 or hour =15 or hour = 16 or hour = 17 or hour = 18 or hour = 19):
+				*clr & cla
+
+				'I sit at the table and start to eat'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/1.mp4"></video></center>'
+
+				act 'continue':
+					*clr & cla
+					'Vania comes to me and starts to jerk'
+					'Ow, my lovely cumslut-student! let''s make an outofturn lesson))'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/2.mp4"></video></center>'
+					gs 'arousal', 'voyeur', 5, 'sub'
+					gs 'stat'
+					act 'continue':
+						*clr & cla
+						'Hey! Don''t be lazy! hElp me!'
+						'I help him'
+						gs 'arousal', 'bj', 5, 'sub'
+						gs 'stat'
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/3.mp4"></video></center>'
+						act 'continue':
+							*clr & cla
+							'With my help, he welthy cums in my food'
+							'"Bon appetite"'
+							gs 'arousal', 'voyeur', 5, 'sub'
+							gs 'stat'
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/4.mp4"></video></center>'
+							act 'eat':
+								*clr & cla
+								if bimbolevel >= 2:
+									pcs_mood += 40
+									'Owww, yamy it''s good one!'
+								end
+								pcs_mood -= 20
+								spafinloc = 12
+								gs 'cum_manage'
+								swallow += 1
+								gs 'stat'
+
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/breakfast/5 ('+rand(1,2)+').mp4"></video></center>'
+								act 'Get up': gt 'mod_public_WC_rab', 'lisnyk_dim'
+							end
+						end
+					end
+				end
+			end
 		end
 	end
 	if bilberry > 0:
@@ -1408,7 +1617,7 @@ if $ARGS[0] = 'washstand':
 	end
 	if hour = 11: dirtt = 0
 
-	if dirtt > 0:
+	if dirtt > 0 or task2 = 1:
 		'The washstand has <b><<dirtt>></b> pieces of dirty dishes.'
 		act 'Wash the dirty dishes':
 			cla
@@ -1679,6 +1888,9 @@ if $ARGS[0] = 'Tolikvana':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'vhid':
 	CLOSE ALL
 	$location_type = 'indoors'
@@ -1706,8 +1918,12 @@ if $ARGS[0] = 'vhid':
 		act 'Talk with Tolik': gt 'mod_public_WC_rab_talk', 'Tolik'
 	end
 
+
+
+
 	If week = 7 and hour >= 8 and hour <= 10 and vana = 0: gt 'mod_public_WC_rab', 'Tolikvana'
 
+
 	if $clothingworntype = 'nude':
 		If Tolik = 1:
 			gt 'mod_public_WC_rab_zashmorg', 'gola'
@@ -1725,6 +1941,8 @@ if $ARGS[0] = 'vhid':
 		end
 	end
 
+
+
 	gs 'stat'
 
 	'<center><b><font color="maroon">Big room</font></b></center>'
@@ -1860,6 +2078,7 @@ if $ARGS[0] = 'toilet1':
 	$locM_arg = 'toilet1'
 	menu_off = 0
 
+
 	*clr & cla
 
 	gs 'mod_public_WC_rab_Vania', 'start'
@@ -1881,6 +2100,7 @@ if $ARGS[0] = 'toilet1':
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/toilet1.jpg"></center>'
 	gs 'stat'
 
+
 	if cumgame = 0: toiletstakan = 0
 
 	if cumgame = 1:
@@ -1958,6 +2178,7 @@ if $ARGS[0] = 'toilet1':
 		end
 	end
 
+
 	if $clothingworntype = 'nude':
 		act 'Go outside naked':
 			minut += 1
@@ -1977,6 +2198,7 @@ if $ARGS[0] = 'toilet1':
 		end
 	end
 
+
 	dynamic $bteeth
 	gs 'din_van', 'prvt_pee'
 	dynamic $tampon
@@ -2075,6 +2297,7 @@ if $ARGS[0] = 'vana2':
 	$locM_arg = 'vana2'
 	menu_off = 0
 
+
 	gs 'mod_public_WC_rab_Vania', 'start'
 	if Vania = 1:
 		act 'Talk with Vania': gt 'mod_public_WC_rab_talk', 'Vania'
@@ -2090,10 +2313,13 @@ if $ARGS[0] = 'vana2':
 		act 'Talk with Tolik': gt 'mod_public_WC_rab_talk', 'Tolik'
 	end
 
+
+
 	'<center><b><font color="maroon">!!!Bath room</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/vana2.jpg"></center>'
 	gs 'stat'
 
+
 	if cumgame = 0: vanastakan = 0
 
 	if cumgame = 1:
@@ -2158,6 +2384,7 @@ if $ARGS[0] = 'vana2':
 	$locM_arg = 'vana2'
 	'<br>Hanging on the wall is a dirty <a href="exec:gt ''mirror'', ''start''">mirror</a>.'
 
+
 	if vanastakan = 3:
 		act 'Drink it and take empty glass':
 			*clr & cla
@@ -2198,6 +2425,7 @@ if $ARGS[0] = 'vana2':
 		end
 	end
 
+
 	if $clothingworntype = 'nude':
 		act 'Go outside naked':
 			minut += 1
@@ -2219,6 +2447,7 @@ if $ARGS[0] = 'vana2':
 	if hotwater = 1 and $clothingworntype = 'nude': act '<b>Bathe in the tub</b>': gt 'mod_public_WC_rab', 'tub1'
 	if $clothingworntype ! 'nude': '<b>You need to be naked to take the bath</b>'
 
+
 	dynamic $bteeth
 	gs 'din_van', 'prvt_pee'
 	dynamic $tampon
@@ -2429,6 +2658,7 @@ if $ARGS[0] = 'tub1':
 
 							guy += 1
 							dick = 17
+							npc_dick[$npclastgenerated] = dick
 
 							stat['vaginal'] += 1
 
@@ -2474,10 +2704,12 @@ if $ARGS[0] = 'tub1':
 	end
 end
 
+
 if $ARGS[0] = 'tubsex':
 	cla
 	If Artem = 1:
 		dick = 18
+		npc_dick[$npclastgenerated] = dick
 		gs 'npcgeneratec', 0, 'Artem', 26
 		$boy[0] = $npclastgenerated
 		$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -2485,6 +2717,7 @@ if $ARGS[0] = 'tubsex':
 	end
 	If Vania = 1:
 		dick = 17
+		npc_dick[$npclastgenerated] = dick
 		gs 'npcgeneratec', 0, 'Vania', 33
 		$boy[0] = $npclastgenerated
 		$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -2495,6 +2728,7 @@ if $ARGS[0] = 'tubsex':
 			*clr & cla
 			Alove += rand(4,7)
 			dick = 18
+			npc_dick[$npclastgenerated] = dick
 			gs 'npcgeneratec', 0, 'Artem', 26
 			$boy[0] = $npclastgenerated
 			$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -2533,6 +2767,7 @@ if $ARGS[0] = 'tubsex':
 			Avirgin = 0
 			Alove += rand(4,7)
 			dick = 18
+			npc_dick[$npclastgenerated] = dick
 			gs 'npcgeneratec', 0, 'Artem', 26
 			$boy[0] = $npclastgenerated
 			$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -2572,6 +2807,7 @@ if $ARGS[0] = 'tubsex':
 
 			guy += 1
 			dick = 18
+			npc_dick[$npclastgenerated] = dick
 
 			gs 'arousal', 'vaginal', rand(10,20)
 			gs 'stat'
@@ -2833,6 +3069,7 @@ if $ARGS[0] = 'spat2':
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/spat2.jpg"></center>'
 	act 'Go out': minut += 1 & gt 'mod_public_WC_rab', 'kordor2'
 
+
 	'Your <a href="exec:gt ''budilnik'', ''start''">alarm clock</a> is set to <b>'+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+'</b> during the week and <b>'+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b> during the weekend.'
 
 	if sewing_kit = 1:
@@ -2948,6 +3185,7 @@ if $ARGS[0] = 'spat1':
 		act 'Talk with Tolik': gt 'mod_public_WC_rab_talk', 'Tolik'
 	end
 
+
 	If Tolik = 3:
 		if hour = 23 or hour = 5:
 			temp = rand(1,10)
@@ -3009,12 +3247,12 @@ if $ARGS[0] = 'spat1':
 		'Also I see dirty clothes dumped in a pile'
 	end
 
-	act 'Go to the big room':
+	act '<b>Go to the big room</b>':
 		minut += 1
 		gs 'stat'
 		gt 'mod_public_WC_rab', 'vhid'
 	end
-	act 'Go outside through the door':
+	act '<b>Go outside through the door</b>':
 		minut += 1
 		gs 'stat'
 		gt 'mod_public_WC_rab', 'viranda'
@@ -3064,6 +3302,10 @@ if $ARGS[0] = 'spat1':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'viranda':
 	CLOSE ALL
 	$location_type = 'indoors'
@@ -3109,6 +3351,7 @@ if $ARGS[0] = 'viranda':
 
 	gs 'stat'
 
+
 	if month >= 5 and month <= 9:
 		act 'Eat grapes':
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tasks/clean'+rand(31,32)+'.jpg"></center>'
@@ -3157,6 +3400,7 @@ if $ARGS[0] = 'viranda':
 				task70 = 1
 			end
 
+
 			act 'continue': gt 'mod_public_WC_rab', 'viranda'
 		end
 	elseif task7 = 3 and hour >= dc:
@@ -3175,7 +3419,7 @@ if $ARGS[0] = 'viranda':
 		'the clothes are still wet'
 	end
 
-	if month >= 5 and month <= 9:
+	if month >= 5 and month <= 9 and ( bilberry <= 10 or task5 ! 0):
 		act 'Gather grapes':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tasks/clean'+rand(31,32)+'.jpg"></center>'
@@ -3200,7 +3444,7 @@ if $ARGS[0] = 'viranda':
 					task5 = 2
 					'I gather enought and put basket of berries near storage.'
 				end
-			end 
+			end
 			bilberry += rand(1,2)
 			minut += rand(10,25)
 			observ_exp += 1
@@ -3211,7 +3455,7 @@ if $ARGS[0] = 'viranda':
 
 	'<center><b><font color="maroon">Veranda</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/viranda.jpg"></center>'
-	act 'Go back':
+	act '<b>Go back</b>':
 		minut += 1
 		gt 'mod_public_WC_rab', 'spat1'
 	end
@@ -3262,7 +3506,7 @@ if $ARGS[0] = 'viranda':
 		end
 	end
 
-	if siga < 0 and Vania = 1:
+	if siga <= 0 and Vania = 1:
 		act 'Ask Vania for a cigarette':
 			cla
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
@@ -3361,7 +3605,91 @@ if $ARGS[0] = 'viranda':
 				cla
 				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
 				'Vania comes to me: "Hello my student! I have extra lesson for you."'
-				'-=Додати навчання ванею прищепки -=WIP=-'
+				'"You need to train your nipples..."'
+				'if you succeed, I''ll even give you 5 extra words.'
+
+				if pcs_humint <= 60 or pcs_intel <= 70:
+					act 'I willn''t do':
+						cla
+						slova -= 2
+						if slova < 0:
+							gt 'mod_public_WC_kara', '0sliv'
+						else
+							'"Okey, no problem." vania go away wishpering something for himself'
+							act 'Continue': gt 'mod_public_WC_rab','viranda'
+						end
+					end
+				end
+				if pcs_humint <= 80 or pcs_intel <= 90:
+					act 'No':
+						cla
+						slova -= 1
+						if slova < 0:
+							gt 'mod_public_WC_kara', '0sliv'
+						else
+							'"Okey, no problem." vania go away wishpering something for himself'
+							act 'Continue': gt 'mod_public_WC_rab','viranda'
+						end
+					end
+				end
+				if pcs_humint > 80 or pcs_intel > 90:
+					act 'nod "no"':
+						cla
+						slova -= 0
+						if slova < 0:
+							gt 'mod_public_WC_kara', '0sliv'
+						else
+							'"Okey, no problem." vania go away wishpering something for himself'
+							act 'Continue': gt 'mod_public_WC_rab','viranda'
+						end
+					end
+				end
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+				end
+
+
+
+				if pcs_humint <= 60 or pcs_intel <= 70:
+					act 'let''s do':
+						cla
+						slova -= 2
+						if slova < 0:
+							gt 'mod_public_WC_kara', 'viranda'
+						else
+							ztemp = 0
+							gt 'mod_public_WC_rab','shipka2'
+						end
+					end
+				end
+				if pcs_humint <= 80 or pcs_intel <= 90:
+					act 'Ok':
+						cla
+						slova -= 1
+						if slova < 0:
+							gt 'mod_public_WC_kara', '0sliv'
+						else
+							ztemp = 0
+							gt 'mod_public_WC_rab','shipka2'
+						end
+					end
+				end
+				if pcs_humint > 80 or pcs_intel > 90:
+					act 'I need more reward':
+						cla
+						slova -= 3
+						if slova < 0:
+							gt 'mod_public_WC_kara', '0sliv'
+						else
+							'Ha, you are risky... Well, ok. I''ll give you 20 words but only if you succeed!'
+							ztemp = 1
+							act 'Ok, what is the task?': gt 'mod_public_WC_rab','shipka2'
+						end
+					end
+				end
 			end
 		end
 	elseif (dc = 4 and task7 ! 3 and task7 ! 2) or (task7 = 3 and hour >= dc):
@@ -3450,6 +3778,9 @@ if $ARGS[0] = 'viranda':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'shipka':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
@@ -3494,6 +3825,8 @@ if $ARGS[0] = 'shipka':
 		end
 	end
 
+
+
 	if stat['BDSM'] >= 10:
 		gs 'willpower', 'BDSM', 'self', 'easy'
 		if will_cost <= pcs_willpwr:
@@ -3541,6 +3874,10 @@ if $ARGS[0] = 'shipka':
 						task70 = 1
 					end
 
+
+
+
+
 					act 'continue': gt 'mod_public_WC_rab', 'viranda'
 				elseif task7 = 3 and hour >= dc:
 					'I took the clothes from the rope. And i unpinch my toungue when put last shorts to the basket. Vania pet my head and go to the warehouse.'
@@ -3679,6 +4016,11 @@ if $ARGS[0] = 'shipka':
 	end
 end
 
+
+
+
+
+
 if $ARGS[0] = 'sklad':
 	CLOSE ALL
 	$location_type = 'secluded'
@@ -3799,15 +4141,20 @@ if $ARGS[0] = 'sklad':
 					*clr & cla
 
 					dick = 18
+					npc_dick[$npclastgenerated] = dick
 					gs 'npcgeneratec', 0, 'Artem', 26
 					$boy[0] = $npclastgenerated
 					$boydesc[0] = $npc_usedname[$npclastgenerated]
 
+
+
+
 					'Artem joins me'
 					'<center><video autoplay loop src="mod/public_WC/lisrab/alove/razom_sklad/razom ('+rand(1,3)+').mp4"></video></center>'
 
 					Alove += rand(0,1)
 
+
 					gs 'flash', 'exhibitionism', 1
 
 					if pcs_mood >= 20:
@@ -3853,6 +4200,7 @@ if $ARGS[0] = 'sklad':
 						gs 'cum_manage'
 						gs 'stat'
 
+
 						selfplaytime = 0
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -3886,6 +4234,7 @@ if $ARGS[0] = 'sklad':
 						gs 'cum_manage'
 						gs 'stat'
 
+
 						selfplaytime = 0
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -4007,4 +4356,395 @@ if $ARGS[0] = 'mushroom_soup':
 	act 'Continue': gt $loc, $loc_arg
 end
 
+
+
+if $ARGS[0] = 'shipka2':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'Take this clothes pin and pinch your tongue'
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+
+
+	if VaniaMayster < 100 and ( pcs_humint <= 60 or pcs_intel <= 70 ):
+		act 'I willn''t do it':
+			cla
+			slova -= 2
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			else
+				'"Looser, you faild." Vania go away wishpering something for himself'
+				mood -= 10
+				act 'Continue': gt 'mod_public_WC_rab','viranda'
+			end
+		end
+	end
+	if VaniaMayster < 100 and ( pcs_humint <= 80 or pcs_intel <= 90 ):
+		act 'No':
+			cla
+			slova -= 1
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			else
+				'"Looser, you faild." Vania go away wishpering something for himself'
+				mood -= 10
+				act 'Continue': gt 'mod_public_WC_rab','viranda'
+			end
+		end
+	end
+	if VaniaMayster < 100 and ( pcs_humint > 80 or pcs_intel > 90 ):
+		act 'nod "no"':
+			cla
+			slova -= 0
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			else
+				'"Looser, you faild." Vania go away wishpering something for himself'
+				mood -= 10
+				act 'Continue': gt 'mod_public_WC_rab','viranda'
+			end
+		end
+	end
+
+
+
+	if stat['BDSM'] >= 10:
+		gs 'willpower', 'BDSM', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'pinch my tongue (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				stat['BDSM'] += 1
+				gs 'pain', rand(2,5), 'tongue', 'pinch'
+
+
+				ztemp = 0
+				VaniaMayster += rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash_train1.jpg"></center>'
+				'With my BDSM experience it was nothing, but Vania seems to enjoy it very much'
+
+				vlada += 1
+				act 'wait': gt 'mod_public_WC_rab', 'shipka3'
+			end
+		else
+			act 'pinch my tongue (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	elseif stat['BDSM'] > 0:
+		gs 'willpower', 'BDSM', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'pinch my tongue (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				stat['BDSM'] += 1
+				gs 'pain', rand(2,5), 'tongue', 'pinch'
+
+
+				ztemp = 0
+				VaniaMayster += rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash_train1.jpg"></center>'
+				'I had some BDSM experience... It hurts, but I can handle it, also Vania seems to enjoy it very much'
+				vlada += 1
+				act 'wait': gt 'mod_public_WC_rab', 'shipka3'
+			end
+		else
+			act 'pinch my tongue (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		gs 'willpower', 'BDSM', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'pinch my tongue (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				temp = rand(1,4)
+				if temp = 1: stat['BDSM'] += 1
+				gs 'pain', rand(2,5), 'tongue', 'pinch'
+
+				ztemp = 0
+				VaniaMayster += rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash_train1.jpg"></center>'
+				'It hurts, it hurts, it HURTS!!! I cry but but I can handle it! Vania looks at me and enjoing it very much!'
+				mood -= 50
+				vlada += 1
+				act 'wait': gt 'mod_public_WC_rab', 'shipka3'
+			end
+		else
+			act 'pinch my tongue (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
+
+if $ARGS[0] = 'shipka3':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'"Nice.. now take this 2 pins..."'
+	'"And pinch your nipples"'
+
+
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	if VaniaMayster < 100 and ( pcs_humint <= 60 or pcs_intel <= 70 ):
+		act 'I willn''t do it':
+			cla
+			slova -= 2
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			else
+				'"Looser, you faild." Vania go away wishpering something for himself'
+				mood -= 10
+				act 'Continue': gt 'mod_public_WC_rab','viranda'
+			end
+		end
+	end
+	if VaniaMayster < 100 and ( pcs_humint <= 80 or pcs_intel <= 90 ):
+		act 'No':
+			cla
+			slova -= 1
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			else
+				'"Looser, you faild." Vania go away wishpering something for himself'
+				mood -= 10
+				act 'Continue': gt 'mod_public_WC_rab','viranda'
+			end
+		end
+	end
+	if VaniaMayster < 100 and ( pcs_humint > 80 or pcs_intel > 90 ):
+		act 'nod "no"':
+			cla
+			slova -= 0
+			if slova < 0:
+				gt 'mod_public_WC_kara', '0sliv'
+			else
+				'"Looser, you faild." Vania go away wishpering something for himself'
+				mood -= 10
+				act 'Continue': gt 'mod_public_WC_rab','viranda'
+			end
+		end
+	end
+
+
+
+	if stat['BDSM'] >= 10:
+		gs 'willpower', 'BDSM', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'pinch my nipples (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				stat['BDSM'] += 1
+				gs 'pain', rand(2,5), 'tongue', 'pinch'
+
+
+				ztemp = 0
+				VaniaMayster += rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash_train2.jpg"></center>'
+				'With my BDSM experience it was nothing, but Vania seems to enjoy it very much'
+				vlada += 1
+				if Vurok >= 25: vurok += 1
+				slova += 5
+				if dc = 4 and task7 ! 3 and task7 ! 2:
+					'I finished with clothes and use my tounge''s pinch on the rope last one. Vania pet my head and go to the warehouse.'
+					task7 = 3
+					minut += rand(15,45)
+					gs 'stat'
+					'All clothes starts to dry.'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash.jpg"></center>'
+					if $temperature >= 25 or $temperature <= -10:
+						dc = hour + rand(2,4)
+					else
+						dc = hour + rand(5,8)
+					end
+					if dc >= 24: 'The clothes definitelly will be dry only tommorow'
+					if pcs_cleaning <= 30:
+						temp = rand(-2,3) + dc
+						if temp = hour:
+							temp = dc + 3
+						end
+					elseif pcs_cleaning <= 60:
+						temp = rand(-2,2) + dc
+					else
+						temp = dc
+					end
+					'it looks like clothes will be dry at <<temp>> hour'
+
+					if dc >= 24:
+						dc -= 24
+						task70 = 1
+					end
+
+
+
+
+
+					act 'continue': gt 'mod_public_WC_rab', 'viranda'
+				elseif task7 = 3 and hour >= dc:
+					'I took the clothes from the rope. And i unpinch my toungue when put last shorts to the basket. Vania pet my head and go to the warehouse.'
+					act 'take the basket and carry it to the redneck''s room':
+						*clr & cla
+						minut += rand(15,25)
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash.jpg"></center>'
+						task7 = 2
+						dc = 100
+						act 'сontinue': gt 'mod_public_WC_rab', 'spat1'
+					end
+				end
+			end
+		else
+			act 'pinch my nipples (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	elseif stat['BDSM'] > 0:
+		gs 'willpower', 'BDSM', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'pinch my nipples (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				stat['BDSM'] += 1
+				gs 'pain', rand(2,5), 'tongue', 'pinch'
+
+
+				ztemp = 0
+				VaniaMayster += rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash_train2.jpg"></center>'
+				'I had some BDSM experience... It hurts, but I can handle it, also Vania seems to enjoy it very much'
+				vlada += 1
+				if Vurok >= 25: vurok += 1
+				slova += 5
+				if dc = 4 and task7 ! 3 and task7 ! 2:
+					'I finished with clothes and use my tounge''s pinch on the rope last one. Vania pet my head and go to the warehouse.'
+					task7 = 3
+					minut += rand(15,45)
+					gs 'stat'
+					'All clothes starts to dry.'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash.jpg"></center>'
+					if $temperature >= 25 or $temperature <= -10:
+						dc = hour + rand(2,4)
+					else
+						dc = hour + rand(5,8)
+					end
+					if dc >= 24: 'The clothes definitelly will be dry only tommorow'
+					if pcs_cleaning <= 30:
+						temp = rand(-2,3) + dc
+						if temp = hour:
+							temp = dc + 3
+						end
+					elseif pcs_cleaning <= 60:
+						temp = rand(-2,2) + dc
+					else
+						temp = dc
+					end
+					'it looks like clothes will be dry at <<temp>> hour'
+
+					if dc >= 24:
+						dc -= 24
+						task70 = 1
+					end
+
+
+
+
+
+					act 'continue': gt 'mod_public_WC_rab', 'viranda'
+				elseif task7 = 3 and hour >= dc:
+					'I took the clothes from the rope. And i unpinch my toungue when put last shorts to the basket. Vania pet my head and go to the warehouse.'
+					act 'take the basket and carry it to the redneck''s room':
+						*clr & cla
+						minut += rand(15,25)
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash.jpg"></center>'
+						task7 = 2
+						dc = 100
+						act 'сontinue': gt 'mod_public_WC_rab', 'spat1'
+					end
+				end
+			end
+		else
+			act 'pinch my nipples (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		gs 'willpower', 'BDSM', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'pinch my nipples (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				temp = rand(1,4)
+				if temp = 1: stat['BDSM'] += 1
+				gs 'pain', rand(2,5), 'tongue', 'pinch'
+
+				ztemp = 0
+				VaniaMayster += rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash_train2.jpg"></center>'
+				'It hurts, it hurts, it HURTS!!! I cry but but I can handle it! Vania looks at me and enjoing it very much!'
+				mood -= 50
+				vlada += 1
+				if Vurok >= 25: vurok += 1
+				slova += 5
+				if dc = 4 and task7 ! 3 and task7 ! 2:
+					'I finished with clothes and use my tounge''s pinch on the rope last one. Vania pet my head and go to the warehouse.'
+					task7 = 3
+					minut += rand(15,45)
+					gs 'stat'
+					'All clothes starts to dry.'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash.jpg"></center>'
+					if $temperature >= 25 or $temperature <= -10:
+						dc = hour + rand(2,4)
+					else
+						dc = hour + rand(5,8)
+					end
+					if dc >= 24: 'The clothes definitelly will be dry only tommorow'
+					if pcs_cleaning <= 30:
+						temp = rand(-2,3) + dc
+						if temp = hour:
+							temp = dc + 3
+						end
+					elseif pcs_cleaning <= 60:
+						temp = rand(-2,2) + dc
+					else
+						temp = dc
+					end
+					'it looks like clothes will be dry at <<temp>> hour'
+
+					if dc >= 24:
+						dc -= 24
+						task70 = 1
+					end
+
+
+
+
+
+					act 'continue': gt 'mod_public_WC_rab', 'viranda'
+				elseif task7 = 3 and hour >= dc:
+					'I took the clothes from the rope. And i unpinch my toungue when put last shorts to the basket. Vania pet my head and go to the warehouse.'
+					act 'take the basket and carry it to the redneck''s room':
+						*clr & cla
+						minut += rand(15,25)
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/wash.jpg"></center>'
+						task7 = 2
+						dc = 100
+						act 'сontinue': gt 'mod_public_WC_rab', 'spat1'
+					end
+				end
+			end
+		else
+			act 'pinch my nipples (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
 --- mod_public_WC_rab ---------------------------------

locations/mod_public_WC_rab_Artem.qsrc

@@ -171,6 +171,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
+
 	if week = 7 and Artem ! 2:
 		Artem = 0
 		if hour >= 0 and hour <= 5:

locations/mod_public_WC_rab_DVIR.qsrc

@@ -13,6 +13,7 @@ if $ARGS[0] = 'dvir':
 	'<center><b><font color="maroon">The yard where I''m being held</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/dim.jpg"></center>'
 
+
 	if vtecha = 2: gt 'mod_public_WC_rab_DVIR', 'rulesr'
 	menu_off = 0
 
@@ -28,6 +29,13 @@ if $ARGS[0] = 'dvir':
 
 	gs 'mod_public_WC_rab_Vania', 'start'
 	if Vania = 1:
+		if ktemp = 3657753:
+			'Vania come to me and take off the colar''s lock'
+			'"Betsi, nice ride. I hopes you appreciate it"'
+			vlada += 5
+			killvar 'ktemp'
+			zashmorg = 1
+		end
 		act 'Talk with Vania': gt 'mod_public_WC_rab_talk', 'Vania'
 	end
 
@@ -171,6 +179,7 @@ if $ARGS[0] = 'dvir':
 							minut += 10
 							Alove += rand(4,7)
 							dick = 18
+							npc_dick[$npclastgenerated] = dick
 							gs 'npcgeneratec', 0, 'Artem', 26
 							$boy[0] = $npclastgenerated
 							$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -182,6 +191,7 @@ if $ARGS[0] = 'dvir':
 
 							guy += 1
 							dick = 18
+							npc_dick[$npclastgenerated] = dick
 
 							gs 'arousal', 'vaginal', rand(10,20)
 							gs 'stat'
@@ -227,6 +237,76 @@ if $ARGS[0] = 'dvir':
 					act 'continue': gt 'mod_public_WC_rab_sex', 'Vaniasex'
 				end
 			end
+
+			if Cumsluttrain = 1 and rand(0,9) >= 8:
+				*clr & cla
+				'"Here, Betsi, Bon appetite"'
+				'Vania puts a cumed cookies on the table'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet (2).jpg"></center>'
+
+				act 'eat it':
+					*clr & cla
+					VaniaMayster += 1
+					minut += rand(10,30)
+					if bimbolevel >= 2:
+						pcs_mood += 40
+						'Owww, yamy it''s good one and really tasty!!'
+					end
+					pcs_mood -= 20
+					spafinloc = 12
+					gs 'cum_manage'
+					swallow += 1
+					gs 'stat'
+					pcs_health += 10
+					fat += 3
+					pcs_energy += 40
+					if pcs_hydra >= 100:
+						pcs_hydra += 20
+					else
+						pcs_hydra += 30
+					end
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet (1).jpg"></center>'
+					act 'Get up': gt 'mod_public_WC_rab', 'dvir'
+				end
+
+				act 'No!':
+					cla
+					slova -= 1
+					brak += 1
+					if slova < 0: gt 'mod_public_WC_kara', '0sliv'
+					act 'Get up': gt 'mod_public_WC_rab', 'dvir'
+				end
+
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+					act 'eat it':
+						*clr & cla
+						minut += rand(10,30)
+						if bimbolevel >= 2:
+							pcs_mood += 40
+							'Owww, yamy it''s good one and really tasty!!'
+						end
+						pcs_mood -= 20
+						spafinloc = 12
+						gs 'cum_manage'
+						swallow += 1
+						gs 'stat'
+						pcs_health += 10
+						fat += 3
+						pcs_energy += 40
+						if pcs_hydra >= 100:
+							pcs_hydra += 20
+						else
+							pcs_hydra += 30
+						end
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet ('+rand(1,1)+').jpg"></center>'
+						act 'Get up': gt 'mod_public_WC_rab', 'dvir'
+					end
+				end
+			end
 		end
 
 		if siga > 0:
@@ -242,7 +322,7 @@ if $ARGS[0] = 'dvir':
 			end
 		end
 
-		if siga < 0 and Vania = 1:
+		if siga <= 0 and Vania = 1:
 			act 'Ask Vanya for a cigarette':
 				cla
 				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
@@ -285,6 +365,11 @@ if $ARGS[0] = 'dvir':
 			end
 		end
 
+
+
+
+
+
 		if joint > 0 and jointhigh = 0:
 			act 'Smoke a joint':
 				*clr & cla
@@ -393,6 +478,7 @@ if $ARGS[0] = 'dvir':
 	end
 	act 'Go to WC': minut += 1 & gt 'mod_public_WC_rab', 'wc'
 
+
 	if drabyna = 2:
 		act 'Climb the ladder to the window': minut += 1 & gt 'mod_public_WC_rab', 'vana2'
 		if pcs_intel >= rand(40,100):
@@ -635,6 +721,7 @@ if $ARGS[0] = 'dvir':
 	end
 end
 
+
 if $ARGS[0] = 'clean':
 	CLOSE ALL
 	$loc = 'mod_public_WC_rab_DVIR'
@@ -645,6 +732,7 @@ if $ARGS[0] = 'clean':
 	$loc_arg = $ARGS[0]
 	*clr & cla
 
+
 	if task6 = 1: task6 = 2
 
 	vlada += 2
@@ -655,6 +743,8 @@ if $ARGS[0] = 'clean':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tasks/yardclean1.jpg"></center>'
 
+
+
 	if dvirbrud < 10:
 		cleaning_exp += 1
 		minut += 60
@@ -685,16 +775,7 @@ if $ARGS[0] = 'clean':
 		if temp <= 18:
 			*clr & cla
 			'Vania comes to me, push me on the ground... "Take this and fuck yourself!". He gives me the broom'
-			act 'take the broom and start to fuck myself':
-				cla
-				VaniaMayster += rand(0,1)
-				willpowermax -= rand(0,1)
-				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/clean_broom.jpg"></center>'
-				gs 'arousal', 'vaginal_dildo', 15, 'sub', 'rough'
-				gs 'stat'
-				'In 10 minutes Vanias'' eyes becomes crazy, he threw out the broom and starts to fuck me'
-				act 'continue': gt  'mod_public_WC_rab_sex', 'Vaniasex'
-			end
+
 			if pcs_humint <= 40 or pcs_intel <= 50:
 				act 'NO, I willn''t do':
 					slova -= 3
@@ -736,6 +817,23 @@ if $ARGS[0] = 'clean':
 				end
 			end
 
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+			act 'take the broom and start to fuck myself':
+				cla
+				VaniaMayster += rand(0,1)
+				willpowermax -= rand(0,1)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/12/clean_broom.jpg"></center>'
+				gs 'arousal', 'vaginal_dildo', 15, 'sub', 'rough'
+				gs 'stat'
+				'In 10 minutes Vanias'' eyes becomes crazy, he threw out the broom and starts to fuck me'
+				act 'continue': gt  'mod_public_WC_rab_sex', 'Vaniasex'
+			end
+
 		elseif temp <= 50:
 			'I noticed Vania''s hungry look'
 		end

locations/mod_public_WC_rab_Mayster2.qsrc

@@ -1,20 +1,20 @@
 # mod_public_WC_rab_Mayster2
-!! '-=wip=-'
 if $ARGS[0] = 'holetrain':
 	menu_off = 0
 	$location_type = 'secluded'
 
 	*clr & cla
 	dick = 17
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Vania', 33
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
 	gs 'boyStat', $npclastgenerated
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
-	'First you need to develop your holes. Without that, there is no point in continuing at all.'
-	'Now, show me your holes!'
-	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'Lets train your holes, but first.'
+	'Holescheck!'
+
 
 	act 'Show him my holes':
 		*clr & cla
@@ -22,78 +22,42 @@ if $ARGS[0] = 'holetrain':
 		gs 'stat'
 		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/holescheck.mp4"></video></center>'
 
-		if pcs_throat >= 11:
-			if murok = 1 and mdurok ! 1:
-				'This is your first hole! You need a deep test'
-				if rand(1,2) = 1:
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourfirsthole2 (1).jpg"></center>'
-				else
-					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourfirsthole2 ('+rand(1,2)+').mp4"></video></center>'
-				end
-				act 'I need the deep mouth lesson (deep test)': gt 'mod_public_WC_rab_Mayster', 'mdurok'
-				act 'I want more mouth practice': gt 'mod_public_WC_rab_Mayster', 'murok'
-			end
 
-			if murok ! 1:
-				murok = 1
-				Vurok += 1
-				'This is your first hole! And this one is a ready one, you need just deep test'
-				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourfirsthole ('+rand(1,2)+').mp4"></video></center>'
-			end
-			if murok = 1 and mdurok = 1:
-				'Well trained mouth - good'
-			end
+
+		if pcs_throat >= 7:
+			'Well trained mouth - good'
+			act 'I need the deep mouth lesson (deep test)': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+			act 'I want more mouth practice': gt 'mod_public_WC_rab_Mayster', 'murok'
+
+			act '<b>I am ready for the mouth developing!</b>': gt 'mod_public_WC_rab_Mayster2', 'm'
 		else
-			if murok = 1 and mdurok = 1:
-				'I know, You had a well trained mouth. Think about mouth train lesson'
-				act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
-				act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
-			else
-				'Your mouth needs a train lesson'
-				if murok = 1:
-					act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
-					act 'I want more mouth practice': gt 'mod_public_WC_rab_Mayster', 'murok'
-				end
-				act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
-			end
+			'I know, You had a well trained mouth. Think about mouth train lesson'
+			act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+			act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
 		end
 
-		if pcs_vag >= 16:
-			'This is your second hole. Well-well, It''s good one.'
-			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyoursexondhole.jpg"></center>'
 
-			if vagurok ! 1:
-				vagurok = 1
-				Vurok += 1
-			end
+
+		if pcs_vag >= 12:
+			'Well trained pussy - good'
 			act 'I want pussy practice': gt 'mod_public_WC_rab_Mayster', 'vagurok'
+
+			act '<b>I am ready for the pussy developing!</b>': gt 'mod_public_WC_rab_Mayster2', 'p'
 		else
-			if vagurok = 1:
-				'I know, You had a well trained pussy. Think about pussy train lesson'
-				act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
-			else
-				'Your pussy needs a train lesson'
-				act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
-			end
+			'Your pussy needs a train lesson'
+			act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
 		end
 
-		if pcs_ass >= 11:
-			'This is your third hole. I see it''s good trained one'
-			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourlasthole ('+rand(1,2)+').jpg"></center>'
 
-			if analurok ! 1:
-				analurok = 1
-				Vurok += 1
-			end
+
+		if pcs_ass >= 7:
+			'Well trained butthole - good'
 			act 'I want anal practice': gt 'mod_public_WC_rab_Mayster', 'analurok'
+
+			act '<b>I am ready for the ass developing!</b>': gt 'mod_public_WC_rab_Mayster2', 'a'
 		else
-			if analurok = 1:
-				'I know, You had a well trained ass. Think about ass train lesson'
-				act 'I need the ass train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
-			else
-				'Your asshole needs a train lesson'
-				act 'I need the asshole train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
-			end
+			'Your asshole needs a train lesson'
+			act 'I need the asshole train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
 		end
 
 		if analplugIN = 1:
@@ -125,75 +89,44 @@ if $ARGS[0] = 'holetrain':
 				gs 'stat'
 				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/holescheck.mp4"></video></center>'
 
-				if pcs_throat >= 11:
-					if murok = 1 and mdurok ! 1:
-						'This is your first hole! You need a deep test'
-						if rand(1,2) = 1:
-							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourfirsthole2 (1).jpg"></center>'
-						else
-							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourfirsthole2 ('+rand(1,2)+').mp4"></video></center>'
-						end
-						act 'I need the deep mouth lesson (deep test)': gt 'mod_public_WC_rab_Mayster', 'mdurok'
-					end
 
-					if murok ! 1:
-						murok = 1
-						Vurok += 1
-						'This is your first hole! And this one is a ready one, you need just deep test'
-						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourfirsthole ('+rand(1,2)+').mp4"></video></center>'
-					end
-					if murok = 1 and mdurok = 1:
-						'Well trained mouth - good'
-					end
+
+				if pcs_throat >= 7:
+					'Well trained mouth - good'
+					act 'I need the deep mouth lesson (deep test)': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+					act 'I want more mouth practice': gt 'mod_public_WC_rab_Mayster', 'murok'
+
+					act '<b>I am ready for the mouth developing!</b>': gt 'mod_public_WC_rab_Mayster2', 'm'
 				else
-					if murok = 1 and mdurok = 1:
-						'I know, You had a well trained mouth. Think about mouth train lesson'
-						act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
-						act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
-					else
-						'Your mouth needs a train lesson'
-						if murok = 1:
-							act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
-						end
-						act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
-					end
+					'I know, You had a well trained mouth. Think about mouth train lesson'
+					act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+					act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
 				end
 
-				if pcs_vag >= 16:
-					'This is your second hole. Well-well, It''s good one.'
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyoursexondhole.jpg"></center>'
 
-					if vagurok ! 1:
-						vagurok = 1
-						Vurok += 1
-					end
+
+				if pcs_vag >= 12:
+					'Well trained pussy - good'
+					act 'I want pussy practice': gt 'mod_public_WC_rab_Mayster', 'vagurok'
+
+					act '<b>I am ready for the pussy developing!</b>': gt 'mod_public_WC_rab_Mayster2', 'p'
 				else
-					if vagurok = 1:
-						'I know, You had a well trained pussy. Think about pussy train lesson'
-						act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
-					else
-						'Your pussy needs a train lesson'
-						act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
-					end
+					'Your pussy needs a train lesson'
+					act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
 				end
 
-				if pcs_ass >= 11:
-					'This is your third hole. I see it''s good trained one'
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/itsyourlasthole ('+rand(1,2)+').jpg"></center>'
 
-					if analurok ! 1:
-						analurok = 1
-						Vurok += 1
-					end
+
+				if pcs_ass >= 7:
+					'Well trained butthole - good'
+					act 'I want anal practice': gt 'mod_public_WC_rab_Mayster', 'analurok'
+
+					act '<b>I am ready for the ass developing!</b>': gt 'mod_public_WC_rab_Mayster2', 'a'
 				else
-					if analurok = 1:
-						'I know, You had a well trained ass. Think about ass train lesson'
-						act 'I need the ass train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
-					else
-						'Your asshole needs a train lesson'
-						act 'I need the asshole train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
-					end
+					'Your asshole needs a train lesson'
+					act 'I need the asshole train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
 				end
+
 				if analplugIN = 1:
 					'"Give it to me"'
 					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/plug/outv (2).mp4"></video></center>'
@@ -226,7 +159,7 @@ if $ARGS[0] = 'holetrain':
 						*clr & cla
 						'We came to the end of the warehouse, where the barn begins.'
 
-						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,5)+').jpg"></center>'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
 						act 'continue':
 							*clr & cla
 							'I feel the animals smells here...'
@@ -259,4 +192,799 @@ if $ARGS[0] = 'holetrain':
 	end
 end
 
+
+
+if $ARGS[0] = 'm':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'Vania opens a bookcase filled with differrent dildos... He spends some time to find some certain one.'
+	dick = pcs_throat + rand(3,5)
+	npc_dick[$npclastgenerated] = dick
+	minut += 5
+	gs 'stat'
+	'Vania took off the blanket from some box...'
+	'He fixes the <<pcs_throat>> cm long dildo to the rod, which stick out the box'
+	'"Here you go!"'
+	'"Lie down in front of it and open your mouth."'
+	wait 1000
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/m/machine/sex_machine.jpg"></center>'
+	stat['bj'] += rand(0,1)
+
+	act 'do as he said':
+		*clr & cla
+		vurok += 1
+		'He starts the machine and the mouth development lesson starts'
+		gs 'stat'
+		gs 'arousal', 'bj', rand(10,20), 'sub'
+		gs 'stat'
+
+		'"Betsi, you are doing well. Need More speed?"'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/machine/Mashine ('+rand(1,2)+').mp4"></video></center>'
+
+		act 'thumb up':
+			*clr & cla
+			stat['bj'] += 1
+			temp = rand(1,3)
+			if temp = 3: vurok += 1
+			'Vania increased the speed of the sex machine and it starts to punching me deep in my throat'
+			'I try to catch my breathe with a rythm of the machine'
+			'tears began to appear and it''s really hard!'
+			'In some time Vania turn down the machine'
+			dick += rand (2,5)
+			gs 'stat'
+
+
+			gs 'stat'
+			gs 'arousal', 'bj', rand(10,20), 'sub'
+			gs 'stat'
+
+			'"Nice work, Betsi."'
+			'"The lesson is end, you are very good"'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			'"Betsi sit here..."'
+
+
+			ztemp = rand(1,2)
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/deep/machine/deep ('+rand(1,2)+').mp4"></video></center>'
+		end
+
+		act 'thumb down':
+			*clr & cla
+
+			'I am training some more time and Vania turn down the machine.'
+			gs 'stat'
+			gs 'arousal', 'bj', rand(10,20), 'sub'
+			gs 'stat'
+
+			'"Good, Betsi."'
+			'"The lesson is end."'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			'"Betsi sit here..."'
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/machine/Mashine ('+rand(1,2)+').mp4"></video></center>'
+		end
+	end
+end
+
+if $ARGS[0] = 'p':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	stat['vaginal'] += rand(0,1)
+	temp = rand (1,3)
+	vurok += 1
+
+	if temp <= 2:
+		'Vania opens a bookcase filled with differrent dildos... He spends some time to find some certain one.'
+		dick = pcs_throat + rand(3,5)
+		npc_dick[$npclastgenerated] = dick
+		minut += 5
+		gs 'stat'
+
+		if temp = 1:
+			ztemp = 1
+			'Vania took off the blanket from some box...'
+			'He fixes the <<pcs_throat>> cm long dildo to the rod, which stick out the box'
+			'"Here you go!"'
+			'"sit down in front of it and spread your legs."'
+			wait 1000
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/m/machine/sex_machine.jpg"></center>'
+		else
+			ztemp = 2
+			dick += rand(10,15)
+			'OMG! It''s monstrosity BIG dildo!'
+			'"Here you go!"'
+			'"Please yourself"'
+			wait 1000
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/monster/dildo.jpg"></center>'
+		end
+	else
+		ztemp = 3
+		'Vania finished his beer bottle with one last swallow, twisted it a little in his hands.'
+		'Put it on the floor and push it. The bottle starts to rotate...'
+		temp = rand (1,2)
+		if temp = 1:
+			$bt = 'bottom'
+			dick += rand(8,11)
+		end
+		if temp = 2:
+			$bt = 'top'
+		end
+		'the <<$bt>> of the bottle points on me'
+		'"Here you go!"'
+		'"Please yourself"'
+		wait 1000
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/pyvo.jpg"></center>'
+	end
+
+	act 'do as he said':
+		*clr & cla
+		if ztemp = 1:
+			$orgasm_txt = '<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/mashine/Mashine_orgasm.mp4"></video></center>'
+			gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+			gs 'stat'
+			gs 'pain', rand(0,1), 'vaginal', 'pierce'
+			gs 'stat'
+			'The machine fucks me!'
+
+			killvar '$orgasm_txt'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/mashine/Mashine (1).mp4"></video></center>'
+			'"Good, Betsi."'
+			'"The lesson is end."'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+			'"Betsi sit here..."'
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		elseif ztemp = 2:
+			gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+			gs 'stat'
+			gs 'pain', rand(2,4), 'vaginal', 'pierce'
+			gs 'stat'
+
+			'<i>OMG! The whole thing can fit inside me! I am impressed about myself.</i>'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/monster/monsterv (1).mp4"></video></center>'
+
+			act 'Continue to fuck myself with monstr dick!':
+				*clr & cla
+				$orgasm_or = 'yes'
+				gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+				gs 'stat'
+				gs 'pain', rand(2,4), 'vaginal', 'pierce'
+				gs 'stat'
+
+				'<i>Dildo cums! And I am cum with it too.</i>'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/monster/monstercum ('+rand(1,2)+').mp4"></video></center>'
+				ztemp = 4
+				'"Good, Betsi."'
+				'"The lesson is end."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+
+				'"Betsi sit here..."'
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		else
+			if $bt = 'bottom':
+				gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+				gs 'stat'
+				stat['vaginal'] += 1
+				gs 'pain', rand(2,4), 'vaginal', 'pierce'
+				gs 'stat'
+				killvar '$bt'
+				'It was hard at first to fit the bottle''s bottom in me, but I did it.'
+
+				'Vania drinks another beer and is looking at me.'
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/popka ('+rand(1,4)+').jpg"></center>'
+
+				act 'continue to fuck myself':
+					*clr & cla
+					gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+					gs 'stat'
+					gs 'pain', rand(2,4), 'vaginal', 'pierce'
+					gs 'stat'
+
+					'Vania finishes the beer and stops me.'
+
+					'"Well done, Betsi."'
+					'"The lesson is end."'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/popka ('+rand(1,4)+').jpg"></center>'
+
+					pcs_mood += rand(0,20)
+					gs 'stat'
+					ztemp = rand(1,2)
+					'"Betsi, sit here..."'
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			else
+				gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+				gs 'stat'
+				gs 'pain', rand(0,2), 'vaginal', 'pierce'
+				gs 'stat'
+				killvar '$bt'
+				'It was not hard to fuck myself with the bottle neck'
+
+				'Vania drinks another beer and is looking at me.'
+
+				temp = rand (1,9)
+				if temp < 9:
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/gorlo ('+rand(1,8)+').jpg"></center>'
+				else
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/gorlov.mp4"></video></center>'
+				end
+
+				act 'continue to fuck myself':
+					*clr & cla
+					gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+					gs 'stat'
+
+					'Vania finishes the beer and stops me.'
+
+					'"Ok, Betsi."'
+					'"The lesson is end."'
+
+					temp = rand (1,9)
+					if temp < 9:
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/gorlo ('+rand(1,8)+').jpg"></center>'
+					else
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/gorlov.mp4"></video></center>'
+					end
+
+					pcs_mood += rand(0,20)
+					gs 'stat'
+					ztemp = 4
+					'"Betsi, sit here..."'
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+
+				act 'ask to drink the beer':
+					*clr & cla
+
+					'Vania gigle a little and gives me the bottle.'
+
+					'<i>It is pretty bad beer, but at least I can drink this one.</i>'
+					'When I finished the bottle, Vania says.'
+					'"Ok, Betsi."'
+					'"The lesson is end."'
+
+					gs 'drugs', 'alcohol', 'beer', 2
+					gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/bottle/drink.jpg"></center>'
+					pcs_mood += rand(0,20)
+					gs 'stat'
+					ztemp = 4
+					'"Betsi, sit here..."'
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'a':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	temp = rand (1,3)
+	vurok += 1
+	stat['anal'] += rand(0,1)
+
+	if temp <= 2:
+		'Vania opens a bookcase filled with differrent dildos... He spends some time to find some certain one.'
+		dick = pcs_throat + rand(3,5)
+		npc_dick[$npclastgenerated] = dick
+		minut += 5
+		gs 'stat'
+
+		if temp = 1:
+			ztemp = 1
+			'Vania took off the blanket from some box...'
+			'He fixes the <<pcs_throat>> cm long dildo to the rod, which stick out the box'
+			'"Here you go!"'
+			'"bend down in front of it."'
+			wait 1000
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/m/machine/sex_machine.jpg"></center>'
+		else
+			ztemp = 2
+			dick += rand(10,15)
+			'OMG! It''s monstrosity BIG dildo!'
+			'"Here you go!"'
+			'"Please your ass"'
+			wait 1000
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/monster/dildo.jpg"></center>'
+		end
+	else
+		ztemp = 3
+		'Vania finished his beer bottle with one last swallow, twisted it a little in his hands.'
+		temp = rand (1,2)
+		if temp = 1:
+			$bt = 'apple'
+			dick += rand(8,11)
+		end
+		if temp = 2:
+			$bt = 'zucchini'
+			dick += rand(8,11)
+		end
+		'Vania takes a <<$bt>> from his pocket and give it to me'
+		'"Here you go!"'
+		'"Fill your ass with this"'
+	end
+
+	act 'do as he said':
+		*clr & cla
+		if ztemp = 1:
+
+			gs 'arousal', 'anal_dildo', rand (10,20), 'sub'
+			gs 'stat'
+			gs 'pain', rand(0,1), 'asshole', 'pierce'
+			gs 'stat'
+			'The machine fucks me!'
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/machine/assv ('+rand(1,4)+').mp4"></video></center>'
+			'"Good, Betsi."'
+			'"The lesson is end."'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+			'"Betsi sit here..."'
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		elseif ztemp = 2:
+			gs 'arousal', 'anal_dildo', rand (10,20), 'sub'
+			gs 'stat'
+			gs 'pain', rand(2,4), 'asshole', 'pierce'
+			gs 'stat'
+
+			'<i>OMG! The whole thing can fit inside me! I am impressed about myself.</i>'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/monster/horse ('+rand(1,4)+').mp4"></video></center>'
+
+			act 'Continue to fuck myself with monstr dick!':
+				*clr & cla
+				$orgasm_or = 'yes'
+				gs 'arousal', 'anal_dildo', rand (10,20), 'sub'
+				gs 'stat'
+				gs 'pain', rand(2,4), 'asshole', 'pierce'
+				gs 'stat'
+
+				'<i>Dildo cums! And I am cum with it too.</i>'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/monster/horsecum (1).mp4"></video></center>'
+				ztemp = 4
+				'"Good, Betsi."'
+				'"The lesson is end."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+
+				'"Betsi sit here..."'
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		else
+			gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+			gs 'stat'
+			gs 'pain', rand(2,4), 'asshole', 'pierce'
+			gs 'stat'
+
+			'It was hard at first to fit the <<$bt>> in me, but I did it.'
+
+			'Vania drinks another beer and is looking at me.'
+
+			if $bt = 'zucchini':
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/food/kabachok ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/food/apple.mp4"></video></center>'
+			end
+
+
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal_dildo', rand (2,5), 'sub'
+				gs 'stat'
+				gs 'pain', rand(2,4), 'asshole', 'pierce'
+				gs 'stat'
+
+				'When I fit the <<$bt>> Vania stops me.'
+				'"Well done, Betsi."'
+				'"The lesson is end."'
+
+				if $bt = 'zucchini':
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/food/kabachok ('+rand(1,2)+').jpg"></center>'
+				else
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/food/apple.mp4"></video></center>'
+				end
+
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = rand(1,2)
+				'"Betsi, sit here..."'
+				killvar '$bt'
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'shoe1':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	if $shoec = 'eroto':
+		'<center><img <<$set_imgh>> src="images/pc/items/eroto/shoes/<<shoeid>>.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/pc/items/moncheri/shoes/<<shoeid>>.jpg"></center>'
+	end
+
+	vurok += 1
+
+	'I take the shoe and start to masturbate myself with a heel.'
+	'"Well, this is intresting" - vania said.'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/heelv.mp4"></video></center>'
+	gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+	gs 'stat'
+
+	act 'push the shoe in my pussy':
+		*clr & cla
+		gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+		gs 'stat'
+		'I am pleasing myself with the shoe!'
+		if rand(1,6) >= 5:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/vagv ('+rand(1,2)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/vag ('+rand(1,4)+').jpg"></center>'
+		end
+		$orgasm_or = 'yes'
+		gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+		gs 'stat'
+		'When I cum, the Vania'' eyes are fully impressed.'
+		'"Good show, Betsi, you deserve this heels."'
+
+		if $shoec = 'eroto':
+			eroto_shoe[shoeid] = 1
+			killvar '$shoec'
+			killvar 'shoeid'
+		else
+			moncheri_shoe[shoeid] = 1
+			killvar '$shoec'
+			killvar 'shoeid'
+		end
+		gs 'shoes', 'wear', $shoec, shoeid
+
+		ztemp = rand(1,2)
+		act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+	end
+end
+
+if $ARGS[0] = 'shoe2':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	if $shoec = 'eroto':
+		'<center><img <<$set_imgh>> src="images/pc/items/eroto/shoes/<<shoeid>>.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/pc/items/moncheri/shoes/<<shoeid>>.jpg"></center>'
+	end
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'"Well, Betsi, now I want more!"'
+
+	act 'repeat the previous show':
+		*clr & cla
+		'I take the shoe and start to masturbate myself with a heel.'
+		'"Well, nice start" - Vania said.'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/heelv.mp4"></video></center>'
+		gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+		gs 'stat'
+
+		act 'push the shoe in my pussy':
+			*clr & cla
+			gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+			gs 'stat'
+			'I am pleasing myself with the shoe!'
+			if rand(1,6) >= 5:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/vagv ('+rand(1,2)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/vag ('+rand(1,4)+').jpg"></center>'
+			end
+			$orgasm_or = 'yes'
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+			'When I cum, the Vania'' eyes are happy but not impressed.'
+			'"Good show, Betsi, but I have already seen this. You need to impruve the show."'
+			'"No heels for you today."'
+
+			ztemp = 4
+			act 'continue': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+	end
+
+	act 'put the heel in my ass':
+		*clr & cla
+		vurok += 1
+		stime += 1000
+		'I take the shoe and please my asshole with its heel.'
+		'"Well, this is intresting" - Vania said.'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/ass/assv.mp4"></video></center>'
+		gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+		gs 'stat'
+		gs 'pain', rand(0,0), 'asshole', 'pierce'
+		gs 'stat'
+
+		act 'push the shoe in my ass':
+			*clr & cla
+			gs 'arousal', 'anal_dildo', rand (10,25), 'sub'
+			gs 'stat'
+			gs 'pain', rand(1,2), 'asshole', 'pierce'
+			gs 'stat'
+
+			'I am pleasing myself with the shoe!'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/ass/ass.jpg"></center>'
+
+			$orgasm_or = 'yes'
+			gs 'arousal', 'anal_dildo', rand (10,25), 'sub'
+			gs 'stat'
+			'When I cum, the Vania'' eyes are fully impressed.'
+			'"Good show, Betsi, you deserve this heels."'
+
+			if $shoec = 'eroto':
+				eroto_shoe[shoeid] = 1
+				killvar '$shoec'
+				killvar 'shoeid'
+			else
+				moncheri_shoe[shoeid] = 1
+				killvar '$shoec'
+				killvar 'shoeid'
+			end
+			gs 'shoes', 'wear', $shoec, shoeid
+
+			ztemp = rand(1,2)
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+	end
+end
+
+if $ARGS[0] = 'shoe3':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	if $shoec = 'eroto':
+		'<center><img <<$set_imgh>> src="images/pc/items/eroto/shoes/<<shoeid>>.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/pc/items/moncheri/shoes/<<shoeid>>.jpg"></center>'
+	end
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	if stime < 100000:
+		'"Well, Betsi, now I see everything, you just can''t impress me more!"'
+	else
+		'"Betsi! show me the two-holes show! he-he-he!"'
+	end
+
+	act 'play with my pussy':
+		*clr & cla
+		'I take the shoe and start to masturbate myself with a heel.'
+		'"Pfff" - Vania said.'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/heelv.mp4"></video></center>'
+		gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+		gs 'stat'
+
+		act 'push the shoe in my pussy':
+			*clr & cla
+			gs 'arousal', 'vaginal_dildo', rand (10,20), 'sub'
+			gs 'stat'
+			'I am pleasing myself with the shoe!'
+			if rand(1,6) >= 5:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/vagv ('+rand(1,2)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/vag/vag ('+rand(1,4)+').jpg"></center>'
+			end
+			$orgasm_or = 'yes'
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+			'When I cum, the Vania said "As I said, nothing new - not impressed".'
+			'"No heels for you today."'
+			ztemp = 4
+			act 'continue': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+		act 'take second shoe and use it on other hole':
+			*clr & cla
+			'"Hah, I thought you can''t do it" - Vania said.'
+			gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+			gs 'stat'
+			gs 'pain', rand(0,0), 'asshole', 'pierce'
+			gs 'stat'
+			minut -= 5
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/2/2 ('+rand(1,2)+').jpg"></center>'
+
+
+			act 'use shoeses'' frontside but heels!':
+				*clr & cla
+				'"Wow, She did it! XD" - Vania laughly said.'
+				dick += rand(4,8)
+				$orgasm_or = 'yes'
+				gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+				gs 'stat'
+				gs 'pain', rand(1,2), 'asshole', 'pierce'
+				gs 'stat'
+				minut -= 10
+				gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+				gs 'stat'
+				gs 'pain', rand(1,2), 'vaginal', 'pierce'
+				gs 'stat'
+				stime += 100000
+
+				'When I cum, the Vania'' eyes are fully impressed.'
+				'"Good show, Betsi, you deserve this heels."'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/2/2v.mp4"></video></center>'
+
+				if $shoec = 'eroto':
+					eroto_shoe[shoeid] = 1
+					killvar '$shoec'
+					killvar 'shoeid'
+				else
+					moncheri_shoe[shoeid] = 1
+					killvar '$shoec'
+					killvar 'shoeid'
+				end
+				gs 'shoes', 'wear', $shoec, shoeid
+
+				ztemp = rand(1,2)
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+
+	end
+	act 'put the heel in my ass':
+		*clr & cla
+		vurok += 1
+		stime += 100000
+		'I take the shoe and please my asshole with its heel.'
+		'"Pfff" - Vania said.'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/ass/assv.mp4"></video></center>'
+		gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+		gs 'stat'
+		gs 'pain', rand(0,0), 'asshole', 'pierce'
+		gs 'stat'
+
+		act 'push the shoe in my ass':
+			*clr & cla
+			gs 'arousal', 'anal_dildo', rand (10,25), 'sub'
+			gs 'stat'
+			gs 'pain', rand(1,2), 'asshole', 'pierce'
+			gs 'stat'
+
+			'I am pleasing myself with the shoe!'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/ass/ass.jpg"></center>'
+
+			$orgasm_or = 'yes'
+			gs 'arousal', 'anal_dildo', rand (10,25), 'sub'
+			gs 'stat'
+			'When I cum, the Vania said "As I said, nothing new - not impressed".'
+			'"No heels for you today."'
+
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+		act 'take second shoe and use it on other hole':
+			*clr & cla
+			'"Hah, I thought you can''t do it" - Vania said.'
+			gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+			gs 'stat'
+			gs 'pain', rand(0,0), 'asshole', 'pierce'
+			gs 'stat'
+			minut -= 5
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/2/2 ('+rand(1,2)+').jpg"></center>'
+
+
+			act 'use shoeses'' frontside but heels!':
+				*clr & cla
+				'"Wow, She did it! XD" - Vania laughly said.'
+				dick += rand(4,8)
+				$orgasm_or = 'yes'
+				gs 'arousal', 'anal_dildo', rand (5,15), 'sub'
+				gs 'stat'
+				gs 'pain', rand(1,2), 'asshole', 'pierce'
+				gs 'stat'
+				minut -= 10
+				gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+				gs 'stat'
+				gs 'pain', rand(1,2), 'vaginal', 'pierce'
+				gs 'stat'
+				stime += 100000
+
+				'When I cum, the Vania'' eyes are fully impressed.'
+				'"Good show, Betsi, you deserve this heels."'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/shoe/2/2v.mp4"></video></center>'
+
+				if $shoec = 'eroto':
+					eroto_shoe[shoeid] = 1
+					killvar '$shoec'
+					killvar 'shoeid'
+				else
+					moncheri_shoe[shoeid] = 1
+					killvar '$shoec'
+					killvar 'shoeid'
+				end
+				gs 'shoes', 'wear', $shoec, shoeid
+
+				ztemp = rand(1,2)
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	end
+end
+
 --- mod_public_WC_rab_Mayster2 ---------------------------------

locations/mod_public_WC_rab_Mayster3.qsrc

@@ -0,0 +1,675 @@
+# mod_public_WC_rab_Mayster3
+if $ARGS[0] = 'holetrain':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+
+	h1 = 0
+	h2 = 0
+	h3 = 0
+
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'Lets train your holes, but first.'
+	'Holescheck!'
+
+
+	act 'Show him my holes':
+		*clr & cla
+		willpowermax -= rand(1,2)
+		gs 'stat'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/holescheck.mp4"></video></center>'
+
+
+
+		if pcs_throat >= 7:
+			'Well trained mouth - good'
+			act 'I need the deep mouth lesson (deep test)': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+			act 'I want more mouth practice': gt 'mod_public_WC_rab_Mayster', 'murok'
+
+			act '<b>I am ready for the mouth developing!</b>':
+				h1 = 1
+				gt 'mod_public_WC_rab_Mayster3', 'start'
+			end
+		else
+			'I know, You had a well trained mouth. Think about mouth train lesson'
+			act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+			act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
+		end
+
+
+
+		if pcs_vag >= 12:
+			'Well trained pussy - good'
+			act 'I want pussy practice': gt 'mod_public_WC_rab_Mayster', 'vagurok'
+
+			act '<b>I am ready for the pussy developing!</b>':
+				h2 = 1
+				gt 'mod_public_WC_rab_Mayster3', 'start'
+			end
+		else
+			'Your pussy needs a train lesson'
+			act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
+		end
+
+
+
+		if pcs_ass >= 7:
+			'Well trained butthole - good'
+			act 'I want anal practice': gt 'mod_public_WC_rab_Mayster', 'analurok'
+
+			act '<b>I am ready for the ass developing!</b>':
+				h3 = 1
+				gt 'mod_public_WC_rab_Mayster3', 'start'
+			end
+		else
+			'Your asshole needs a train lesson'
+			act 'I need the asshole train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
+		end
+
+		if analplugIN = 1:
+			'"Give it to me"'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/plug/outv (2).mp4"></video></center>'
+			'I strained and give IT to him'
+			vaniaplag = 0
+			analplugIN = 0
+		end
+	end
+
+	gs 'willpower', 'exhib', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'disagree (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			willpowermax += rand(0,1)
+			gs 'stat'
+
+			'You are not my first puppet. And I know what tot do. '
+			'You know, there are always to options to make you obey.'
+			'The easy one and the hard one.'
+			'Now, I give you few minutes to think, than you need to start undressing or we will go to hard option.'
+			wait 1500
+			act 'Undress and show him my holes':
+				*clr & cla
+				willpowermax -= rand(0,2)
+				gs 'stat'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/0start/holescheck.mp4"></video></center>'
+
+
+
+				if pcs_throat >= 7:
+					'Well trained mouth - good'
+					act 'I need the deep mouth lesson (deep test)': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+					act 'I want more mouth practice': gt 'mod_public_WC_rab_Mayster', 'murok'
+
+					act '<b>I am ready for the mouth developing!</b>':  h1 = 1 & gt 'mod_public_WC_rab_Mayster3', 'start'
+				else
+					'I know, You had a well trained mouth. Think about mouth train lesson'
+					act 'I need the deep mouth lesson': gt 'mod_public_WC_rab_Mayster', 'mdurok'
+					act 'I need the mouth lesson': gt 'mod_public_WC_rab_Mayster', 'murok'
+				end
+
+
+
+				if pcs_vag >= 12:
+					'Well trained pussy - good'
+					act 'I want pussy practice': gt 'mod_public_WC_rab_Mayster', 'vagurok'
+
+					act '<b>I am ready for the pussy developing!</b>': gt  h2 = 1 & gt 'mod_public_WC_rab_Mayster3', 'start'
+				else
+					'Your pussy needs a train lesson'
+					act 'I need the pussy train lesson': gt 'mod_public_WC_rab_Mayster', 'vagurok'
+				end
+
+
+
+				if pcs_ass >= 7:
+					'Well trained butthole - good'
+					act 'I want anal practice': gt 'mod_public_WC_rab_Mayster', 'analurok'
+
+					act '<b>I am ready for the ass developing!</b>':  h3 = 1 & gt 'mod_public_WC_rab_Mayster3', 'start'
+				else
+					'Your asshole needs a train lesson'
+					act 'I need the asshole train lesson': gt 'mod_public_WC_rab_Mayster', 'analurok'
+				end
+
+				if analplugIN = 1:
+					'"Give it to me"'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/ass/plug/outv (2).mp4"></video></center>'
+					'I strained and give IT to him'
+					vaniaplag = 0
+					analplugIN = 0
+				end
+			end
+
+			act 'disagree':
+				cla
+				willpowermax += 2
+				gs 'stat'
+				'Vania starts to laughts!..'
+
+				'...Suddenly he slaps me'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/slap.mp4"></video></center>'
+				gs 'pain', rand(4,5), 'cheeks', 'slap'
+				gs 'stat'
+				'I fell on my knees. He pulls out a collar and locked it on me'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+				zashmorg = 3
+				gs 'stat'
+				act 'continue':
+					*clr & cla
+					'Now, you are my slut, my slave, my pet and anything else "my" I want! And you must listen me carefully, cuz if you wouldn''t you are going to be punished!'
+					'He locks the leash to my collar, stands up and goes. The leash pulls me and I am needed to go'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/colar.mp4"></video></center>'
+					act 'go':
+						*clr & cla
+						'We came to the end of the warehouse, where the barn begins.'
+
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+						act 'continue':
+							*clr & cla
+							'I feel the animals smells here...'
+							'There is a bed with chains'
+							'Until I''ll see the consent in your eyes you will live here'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/bed.jpg"></center>'
+
+							act 'Shock':
+								*clr & cla
+								'I am so shocked, that I am not notice how he chained me to the bed and rips my clothes...'
+								$clothingworntype = 'nude'
+								'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/live_sklad'+rand(1,6)+'.jpg"></center>'
+								zgoda = 0
+								skladlive = daystart
+								Vcumglass = 0
+
+								act 'live here':
+									lsday = day
+									$rope = 100
+									gt 'mod_public_WC_rab_livesklad', 'start'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	else
+		act 'disagree (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+end
+
+
+if $ARGS[0] = 'start':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'Good, I like the spirit!'
+	'I will choose the second hole...'
+
+	temp = rand (1,2)
+	if h1 = 1:
+		if temp = 1: h2 = 1
+		if temp = 2: h3 = 1
+		'...the second hole would be... hmm...'
+		if h2 = 1: '...pussy'
+		if h3 = 1: '...ass'
+	elseif h2 = 1:
+		if temp = 1: h1 = 1
+		if temp = 2: h3 = 1
+		'...the second hole would be... hmm...'
+		if h1 = 1: '...mouth'
+		if h3 = 1: '...ass'
+	elseif h3 = 1:
+		if temp = 1: h1 = 1
+		if temp = 2: h2 = 1
+		'...the second hole would be... hmm...'
+		if h2 = 1: '...pussy'
+		if h1 = 1: '...mouth'
+	end
+
+	act 'lets start the lesson':
+		if h1 = 1 and h2 = 1:
+			gt 'mod_public_WC_rab_Mayster3', '12'
+		elseif h1 = 1 and h3 = 1:
+			gt 'mod_public_WC_rab_Mayster3', '13'
+		elseif h2 = 1 and h3 = 1:
+			gt 'mod_public_WC_rab_Mayster3', '23'
+		end
+	end
+end
+
+
+if $ARGS[0] = '12':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	dick += rand (3,5)
+
+	'Vania throws me few dildos - "Don''t be lasy!"'
+
+	act 'start':
+		vurok += 2
+		*clr & cla
+
+		gs 'arousal', 'bj', rand(5,10), 'sub'
+		gs 'stat'
+		gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+		gs 'stat'
+
+		'I use one dildo on my pussy and suck the other one...'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/mp/mpv ('+rand(1,4)+').mp4"></video></center>'
+
+		act 'continue the lesson':
+			*clr & cla
+			gs 'arousal', 'bj', rand(5,10), 'sub'
+			gs 'stat'
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+
+			'I use one dildo on my pussy and suck the other one...'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/mp/mpv ('+rand(1,4)+').mp4"></video></center>'
+
+			'After some time Vania stops me'
+			'"Nice work, Betsi."'
+			'"The lesson is end"'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			'"Betsi sit here..."'
+
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+
+		if rand (1,10) >= 6:
+			'Betsi more! more! don''t be lazy!!!'
+			gs 'arousal', 'bj', rand(5,10), 'sub'
+			gs 'stat'
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelpv.mp4"></video></center>'
+		end
+
+		if rand (1,20) >= 15:
+			*clr & cla
+			'"Ok, Betsi, I want some fun too, let me help you XD"'
+
+			if rand (1,2) = 1:
+				'Vania grabs my head and put his dick in my mouth.'
+				'He starts to fuck my mouth'
+
+				ztemp = dick
+				gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+				gs 'stat'
+				dick = 17
+				npc_dick[$npclastgenerated] = dick
+				gs 'arousal', 'bj', rand(5,10), 'sub'
+				gs 'stat'
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp bj.mp4"></video></center>'
+
+				act 'continue':
+					*clr & cla
+
+					dick = 17
+					npc_dick[$npclastgenerated] = dick
+					'In some time Vania filled my mouth with his hot cum'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/sex/cum.mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp bj.mp4"></video></center>'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+
+					gs 'stat'
+
+					'"Nice work, Betsi."'
+					'"The lesson is end"'
+					pcs_mood += rand(0,20)
+					gs 'stat'
+
+					'"Betsi sit here..."'
+
+					ztemp = rand(1,2)
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			else
+				'Vania grabs my ass and put his dick in my pussy.'
+				'He starts to fuck me'
+				ztemp = dick
+				gs 'arousal', 'bj', rand(5,10), 'sub'
+				gs 'stat'
+				dick = 17
+				npc_dick[$npclastgenerated] = dick
+				gs 'arousal', 'vaginal', rand (10,15), 'sub'
+				gs 'stat'
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp penetration.mp4"></video></center>'
+
+				act 'continue':
+					*clr & cla
+					dick = 17
+					npc_dick[$npclastgenerated] = dick
+					'In some time Vania filled me with his hot cum'
+					spafinloc = 1
+					gs 'cum_manage'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/sex/cumv ('+rand(1,3)+').mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp penetration.mp4"></video></center>'
+
+					gs 'stat'
+
+					'"Nice work, Betsi."'
+					'"The lesson is end"'
+					pcs_mood += rand(0,20)
+					gs 'stat'
+
+					'"Betsi sit here..."'
+
+					ztemp = rand(1,2)
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = '13':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	dick += rand (3,5)
+
+	'Vania throws me few dildos - "Don''t be lasy!"'
+
+	act 'start':
+		vurok += 2
+		*clr & cla
+
+		gs 'arousal', 'bj', rand(5,10), 'sub'
+		gs 'stat'
+		gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+		gs 'stat'
+
+		'I use one dildo on my butthole and suck the other one...'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/2/ma/ma.jpg"></center>'
+
+		act 'continue the lesson':
+			*clr & cla
+			gs 'arousal', 'bj', rand(5,10), 'sub'
+			gs 'stat'
+			gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+			gs 'stat'
+
+			'I use one dildo on my butthole and suck the other one...'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/holestrain/2/ma/ma.jpg"></center>'
+
+			'After some time Vania stops me'
+			'"Nice work, Betsi."'
+			'"The lesson is end"'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			'"Betsi sit here..."'
+
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+
+		if rand (1,10) >= 6:
+			'Betsi more! more! don''t be lazy!!!'
+			gs 'arousal', 'bj', rand(5,10), 'sub'
+			gs 'stat'
+			gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+			gs 'stat'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelpv.mp4"></video></center>'
+		end
+
+		if rand (1,20) >= 15:
+			*clr & cla
+			'"Ok, Betsi, I want some fun too, let me help you XD"'
+
+			if rand (1,2) = 1:
+				'Vania grabs my head and put his dick in my mouth.'
+				'He starts to fuck my mouth'
+
+				ztemp = dick
+				gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+				gs 'stat'
+				dick = 17
+				npc_dick[$npclastgenerated] = dick
+				gs 'arousal', 'bj', rand(5,10), 'sub'
+				gs 'stat'
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp bj.mp4"></video></center>'
+
+				act 'continue':
+					*clr & cla
+
+					dick = 17
+					npc_dick[$npclastgenerated] = dick
+					'In some time Vania filled my mouth with his hot cum'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/sex/cum.mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp bj.mp4"></video></center>'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+
+					gs 'stat'
+
+					'"Nice work, Betsi."'
+					'"The lesson is end"'
+					pcs_mood += rand(0,20)
+					gs 'stat'
+
+					'"Betsi sit here..."'
+
+					ztemp = rand(1,2)
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			else
+				'Vania grabs my ass and put his dick in my pussy.'
+				'He starts to fuck me'
+				ztemp = dick
+				gs 'arousal', 'bj', rand(5,10), 'sub'
+				gs 'stat'
+				dick = 17
+				npc_dick[$npclastgenerated] = dick
+				gs 'arousal', 'vaginal', rand (10,15), 'sub'
+				gs 'stat'
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp penetration.mp4"></video></center>'
+
+				act 'continue':
+					*clr & cla
+					dick = 17
+					npc_dick[$npclastgenerated] = dick
+					'In some time Vania filled me with his hot cum'
+					spafinloc = 1
+					gs 'cum_manage'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/vag/sex/cumv ('+rand(1,3)+').mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/Vaniahelp penetration.mp4"></video></center>'
+
+					gs 'stat'
+
+					'"Nice work, Betsi."'
+					'"The lesson is end"'
+					pcs_mood += rand(0,20)
+					gs 'stat'
+
+					'"Betsi sit here..."'
+
+					ztemp = rand(1,2)
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = '23':
+	menu_off = 0
+	$location_type = 'secluded'
+
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	dick += rand (3,5)
+
+	'Vania throws me few dildos - "Don''t be lasy!"'
+
+	act 'start':
+		vurok += 2
+		*clr & cla
+
+		gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+		gs 'stat'
+		gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+		gs 'stat'
+
+		'I use one dildo on my butthole and other for my pussy'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/pa/pav ('+rand(1,5)+').mp4"></video></center>'
+
+		act 'continue the lesson':
+			*clr & cla
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+			gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+			gs 'stat'
+
+			'I use one dildo on my butthole and other for my pussy'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/2/pa/pav ('+rand(1,5)+').mp4"></video></center>'
+
+			'After some time Vania stops me'
+			'"Nice work, Betsi."'
+			'"The lesson is end"'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			'"Betsi sit here..."'
+
+			ztemp = 4
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+
+		if rand(0,9) >= 7:
+			*clr & cla
+			'"Nah, boring, Betsi, let''s make it more fun!"'
+
+			'Vania takes the dildos from me... and took off the blanket from the 2 sex boxes...'
+			'He quickly fixes rhe dildos - "Now, try it!"'
+
+			'I sit in front of the machines and Vania turns them on...'
+			'The machines starts to fuck my mouth and pussy...'
+			gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+			gs 'stat'
+			gs 'arousal', 'bj', rand(5,10), 'sub'
+			gs 'stat'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/3/mp machine.mp4"></video></center>'
+
+			act 'continue the lesson':
+				*clr & cla
+				'While I was concentrated on the 2 dildos Vania do something with the machines...'
+				gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+				gs 'stat'
+				gs 'arousal', 'bj', rand(5,10), 'sub'
+				gs 'stat'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/3/mp machine.mp4"></video></center>'
+
+				act 'continue the lesson':
+					*clr & cla
+					'Suddenly, something filled my ass!'
+					'Vania have a wide grin on his face!'
+					gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+					gs 'stat'
+					gs 'arousal', 'bj', rand(5,10), 'sub'
+					gs 'stat'
+					minut -= 10
+					gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+					gs 'stat'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/3/pa machine.mp4"></video></center>'
+
+					act 'continue the lesson':
+						*clr & cla
+						'I am in the sea of pleasure!!'
+
+						gs 'arousal', 'vaginal_dildo', rand (5,10), 'sub'
+						gs 'stat'
+						gs 'arousal', 'bj', rand(5,10), 'sub'
+						gs 'stat'
+						minut -= 10
+						$orgasm_or = 'yes'
+						gs 'arousal', 'anal_dildo', rand(5,10), 'sub'
+						gs 'stat'
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/3/3v.mp4"></video></center>'
+
+						'After my orgasm Vania stops the machines'
+						'"Very nice work, Betsi."'
+						'"The lesson is end"'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						'"Betsi sit here..."'
+
+						ztemp = rand(1,2)
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				end
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster3 ---------------------------------

locations/mod_public_WC_rab_Mayster4.qsrc

@@ -0,0 +1,141 @@
+# mod_public_WC_rab_Mayster4
+if $ARGS[0] = 'start':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	Cumsluttrain = 1
+
+	'"Ok, this is an easy one train"'
+	'"You just need to eat food"'
+	minut += 5
+	gs 'stat'
+	act 'wait':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'Vania puts some food on the table in front of me.'
+		'Then he strats to strock his dick'
+
+		'In a short time he flooded everything with his cum.'
+
+		'With wide grin Vania says "Bon appetite, Betsi!"'
+		gs 'arousal', 'voyeur', 10, 'sub'
+		gs 'stat'
+
+		act 'eat the main dish':
+			*clr & cla
+			minut += rand(60,90)
+			if bimbolevel >= 2:
+				pcs_mood += 40
+				'Owww, yamy it''s good one!'
+			end
+			pcs_mood -= 20
+			spafinloc = 12
+			gs 'cum_manage'
+			swallow += 1
+			gs 'stat'
+			pcs_health += 10
+			fat += 3
+			pcs_energy += 40
+			if pcs_hydra >= 100:
+				pcs_hydra += 20
+			else
+				pcs_hydra += 30
+			end
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/food/food ('+rand(1,4)+').jpg"></center>'
+
+			act 'eat the dessert':
+				*clr & cla
+				minut += rand(10,30)
+				if bimbolevel >= 2:
+					pcs_mood += 40
+					'Owww, yamy it''s good one and really tasty!!'
+				end
+				pcs_mood -= 20
+				spafinloc = 12
+				gs 'cum_manage'
+				swallow += 1
+				gs 'stat'
+				pcs_health += 10
+				fat += 3
+				pcs_energy += 40
+				if pcs_hydra >= 100:
+					pcs_hydra += 20
+				else
+					pcs_hydra += 30
+				end
+
+				if rand (1,7) >= 6:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweetv ('+rand(1,2)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/sweet/sweet ('+rand(1,5)+').jpg"></center>'
+				end
+
+				act 'end with a great coffe.':
+					*clr & cla
+					minut += rand(2,10)
+					if bimbolevel >= 2:
+						pcs_mood += 40
+						'Owww, yamy it''s good one and really tasty!!'
+					end
+					pcs_mood -= 20
+					spafinloc = 12
+					gs 'cum_manage'
+					swallow += 1
+					gs 'stat'
+					pcs_health += 10
+					fat += 3
+					pcs_energy += 40
+					if pcs_hydra >= 100:
+						pcs_hydra += 20
+					else
+						pcs_hydra += 30
+					end
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/food/tea/tea ('+rand(1,4)+').jpg"></center>'
+
+					act 'Thank you master':
+						cla
+						vurok += rand(0,1)
+						VaniaMayster += 1
+						vlove += 1
+
+						'"Nice work, Betsi."'
+						'"The lesson is end"'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						'"Betsi sit here..."'
+
+						ztemp = rand(1,2)
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+
+					act 'wait':
+						cla
+						vurok += rand(0,1)
+
+						'"Nice work, Betsi."'
+						'"The lesson is end"'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						'"Betsi sit here..."'
+
+						ztemp = 4
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				end
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster4 ---------------------------------

locations/mod_public_WC_rab_Mayster5.qsrc

@@ -0,0 +1,1777 @@
+# mod_public_WC_rab_Mayster5
+if $ARGS[0] = 'start':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'"BDSM trainings is one of my favorite."'
+	'"This is final part of our trainings"'
+	'"If you succeed in this part, you''ll becam perfect woman, Betsi."'
+
+	'Let''s start'
+
+	act 'wait': gt 'mod_public_WC_rab_Mayster5', 'mp'
+end
+
+
+
+if $ARGS[0] = 'mp':
+	*clr & cla
+	if bdsmurok <= 3:
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"We will start from easy steps"'
+		'"Wear this..."'
+		'He gives me a mouth ball gag.'
+
+
+		act 'No':
+			cla
+			'Betsi I would not be patient in this training'
+			'"Wear this..." - with frozen cold in voice Vania said'
+
+			act 'No':
+				willpowermax += rand(1,2)
+				gs 'stat'
+
+				gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+			act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg'
+
+			act 'Yes, master':
+				willpowermax -= 1
+				vurok += rand(0,1)
+				VaniaMayster += 1
+				gt 'mod_public_WC_rab_Mayster5', 'mbg'
+			end
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg'
+
+		act 'Yes, master':
+			willpowermax -= 1
+			vurok += rand(0,1)
+			VaniaMayster += 1
+			gt 'mod_public_WC_rab_Mayster5', 'mbg'
+		end
+	elseif bdsmurok <= 5:
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"We will start from easy steps"'
+		'"Wear this..."'
+		'He gives me a mouth ball gag.'
+
+
+		act 'No':
+			cla
+			'Betsi I would not be patient in this training'
+			'"Wear this..." - with frozen cold in voice said vania'
+
+			act 'No':
+				willpowermax += rand(1,2)
+				gs 'stat'
+
+				gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+			act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg2'
+
+			act 'Yes, master':
+				willpowermax -= 1
+				vurok += rand(0,1)
+				VaniaMayster += 1
+				gt 'mod_public_WC_rab_Mayster5', 'mbg2'
+			end
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg2'
+
+		act 'Yes, master':
+			willpowermax -= 1
+			vurok += rand(0,1)
+			VaniaMayster += 1
+			gt 'mod_public_WC_rab_Mayster5', 'mbg2'
+		end
+	elseif bdsmurok <= 7:
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"I like the way you train"'
+		'"Wear this..."'
+		'He gives me a mouth ball gag.'
+
+
+		act 'No':
+			cla
+			'Betsi I would not be patient in this training'
+			'"Wear this..." - with frozen cold in voice said vania'
+
+			act 'No':
+				willpowermax += rand(1,2)
+				gs 'stat'
+
+				gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+			act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg3'
+
+			act 'Yes, master':
+				willpowermax -= 1
+				vurok += rand(0,1)
+				VaniaMayster += 1
+				gt 'mod_public_WC_rab_Mayster5', 'mbg3'
+			end
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg3'
+
+		act 'Yes, master':
+			willpowermax -= 1
+			vurok += rand(0,1)
+			VaniaMayster += 1
+			gt 'mod_public_WC_rab_Mayster5', 'mbg3'
+		end
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"You are a good pet"'
+		'"Wear this..."'
+		'He gives me a mouth ball gag.'
+
+
+		act 'No':
+			cla
+			'Betsi I would not be patient in this training'
+			'"Wear this..." - with frozen cold in voice said vania'
+
+			act 'No':
+				willpowermax += rand(1,2)
+				gs 'stat'
+
+				gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+			act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg4'
+
+			act 'Yes, master':
+				willpowermax -= 1
+				vurok += rand(0,1)
+				VaniaMayster += 1
+				gt 'mod_public_WC_rab_Mayster5', 'mbg4'
+			end
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'Yes': vurok += rand(0,1) & gt 'mod_public_WC_rab_Mayster5', 'mbg4'
+
+		act 'Yes, master':
+			willpowermax -= 1
+			vurok += rand(0,1)
+			VaniaMayster += 1
+			gt 'mod_public_WC_rab_Mayster5', 'mbg4'
+		end
+	end
+end
+
+if $ARGS[0] = 'mbg':
+	*clr & cla
+	'I wear the ball gag'
+
+
+	if rand (1,7) > 3:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+	end
+	'Nice, Betsi... just take some time, you need to used to it'
+
+
+	minut += 15
+	if stat['BDSM'] <= 15 and stat['BDSM'] ! 0:
+		'<i>I had some BDSM experience... It start to hurt in 15 minutes, but I can handle it</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(1,3), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] > 15:
+		'<i>With my BDSM experience it was casual waiting, even boring!</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(0,1), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] = 0:
+		'<i>In few minutes it starts to hurt, it''s very unpleasant feel</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(3,5), 'mouth', 'freeze'
+		gs 'stat'
+	end
+
+	'In some time the Vania stand up in front of me.'
+	'"Fine, let''s do next step"'
+	act 'wait':
+		*clr & cla
+
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+			'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+			gs 'pain', rand(1,3), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			gs 'pain', rand(0,1), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] <= 10:
+			'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+			gs 'pain', rand(3,5), 'mouth', 'freeze'
+			gs 'stat'
+		end
+
+
+
+
+		if zashmorg = 3 or zashmorg  = 1:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+		else
+			'Vania comes to me with a collar and locks it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start ('+rand(1,2)+').mp4"></video></center>'
+			stat['BDSM'] += rand(0,1)
+			gs 'stat'
+		end
+		zashmorg = 3
+
+		'Vania takes a leash and lock it to the collar.'
+
+		'"Now, Betsi, sit like a dog"'
+
+		if rand (1,7) > 3:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+		end
+
+
+		act 'Mghght (try to protest)':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 2
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+
+
+		act 'sit like a dog':
+			*clr & cla
+			stat['BDSM'] += rand(0,1)
+			vurok += rand(0,1)
+			bdsmurok += 1
+			gs 'stat'
+
+			minut += 30
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				gs 'pain', rand(0,1), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] <= 10:
+				'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+				gs 'pain', rand(3,5), 'mouth', 'freeze'
+				gs 'stat'
+			end
+
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitv (1).mp4"></video></center>'
+
+			if rand (1,7) > 3:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+			end
+
+			act 'wait':
+				*clr & cla
+				stat['BDSM'] += rand(0,1)
+				minut += 30
+				gs 'stat'
+
+				if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+					'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+					gs 'pain', rand(1,3), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] > 25:
+					gs 'pain', rand(0,1), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] <= 10:
+					'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+					gs 'pain', rand(3,5), 'mouth', 'freeze'
+					gs 'stat'
+				end
+
+				'"Ok, Betsi, good. It''s enought for now"'
+				'"Show me your saliva!"'
+				'"perfect! XD"'
+				'He unlocks the collar'
+				zashmorg = 2
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/openmv ('+rand(1,2)+').mp4"></video></center>'
+
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = rand(1,2)
+				'"Betsi, sit here..."'
+
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'mbg2':
+	*clr & cla
+	'I wear the ball gag'
+
+
+	if rand (1,7) > 3:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+	end
+	'Nice, Betsi...'
+
+
+	minut += 15
+	if stat['BDSM'] <= 15 and stat['BDSM'] ! 0:
+		'<i>I had some BDSM experience... It start to hurt in 15 minutes, but I can handle it</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(1,3), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] > 15:
+		'<i>With my BDSM experience it was casual waiting, even boring!</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(0,1), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] = 0:
+		'<i>In few minutes it starts to hurt, it''s very unpleasant feel</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(3,5), 'mouth', 'freeze'
+		gs 'stat'
+	end
+
+	act 'wait':
+		*clr & cla
+		minut += 5
+		willpowermax -= rand(0,1)
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+			'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+			gs 'pain', rand(1,3), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			gs 'pain', rand(0,1), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] <= 10:
+			'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+			gs 'pain', rand(3,5), 'mouth', 'freeze'
+			gs 'stat'
+		end
+
+
+		if zashmorg = 3 or zashmorg  = 1:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+		else
+			'Vania takes the collar and locks it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start ('+rand(1,2)+').mp4"></video></center>'
+			stat['BDSM'] += rand(0,1)
+			gs 'stat'
+		end
+		zashmorg = 3
+
+		'Vania takes a leash and lock it to the collar.'
+
+		'"Now, Betsi, sit like a dog"'
+
+		if rand (1,7) > 3:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+		end
+
+
+		act 'Mghght (try to protest)':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+
+
+		act 'sit like a dog':
+			*clr & cla
+			stat['BDSM'] += rand(0,1)
+			vurok += rand(0,1)
+			bdsmurok += 1
+			gs 'stat'
+
+			minut += 30
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				gs 'pain', rand(0,1), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] <= 10:
+				'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+				gs 'pain', rand(3,5), 'mouth', 'freeze'
+				gs 'stat'
+			end
+
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitv (1).mp4"></video></center>'
+
+			if rand (1,7) > 3:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+			end
+
+			'"Nice pet, let''s go for a walk"'
+
+
+			act 'Mghght (try to protest)':
+				*clr & cla
+				willpowermax += 1
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+
+
+			act 'go for a walk':
+				*clr & cla
+
+				minut += 30
+				if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+					'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+					gs 'pain', rand(1,3), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] > 25:
+					gs 'pain', rand(0,1), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] <= 10:
+					'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+					gs 'pain', rand(3,5), 'mouth', 'freeze'
+					gs 'stat'
+				end
+
+				'It''s so humiliating, I go with Vania like a pet...'
+
+				if rand (1,5) > 4:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/gov.mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+				end
+
+				'"My doggy, ask! ask!"'
+
+				act 'Mghght (try to protest)':
+					*clr & cla
+					willpowermax += 1
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi.'
+					act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+				end
+
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+				end
+
+				act 'ask like a dog':
+					*clr & cla
+
+
+					'"Good girl, Vania pets me..."'
+					"Very good! let''s go back"
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/waitv (1).mp4"></video></center>'
+
+					minut += 30
+					if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+						'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+						gs 'pain', rand(1,3), 'mouth', 'freeze'
+						gs 'stat'
+					elseif stat['BDSM'] > 25:
+						gs 'pain', rand(0,1), 'mouth', 'freeze'
+						gs 'stat'
+					elseif stat['BDSM'] <= 10:
+						'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+						gs 'pain', rand(3,5), 'mouth', 'freeze'
+						gs 'stat'
+					end
+
+					act 'go with Vania':
+						*clr & cla
+						stat['BDSM'] += rand(0,1)
+						minut += 30
+						bdsmurok += 1
+						gs 'stat'
+
+						if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+							'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+							gs 'pain', rand(1,3), 'mouth', 'freeze'
+							gs 'stat'
+						elseif stat['BDSM'] > 25:
+							gs 'pain', rand(0,1), 'mouth', 'freeze'
+							gs 'stat'
+						elseif stat['BDSM'] <= 10:
+							'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+							gs 'pain', rand(3,5), 'mouth', 'freeze'
+							gs 'stat'
+						end
+
+
+						'"Ok, Betsi, good. It''s enought for now"'
+						'"Show me your saliva!"'
+						'"perfect! XD"'
+						'He unlocks the collar'
+						zashmorg = 2
+
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/openmv ('+rand(1,2)+').mp4"></video></center>'
+
+						pcs_mood += rand(0,20)
+						gs 'stat'
+						ztemp = rand(1,2)
+						'"Betsi, sit here..."'
+
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'mbg3':
+	*clr & cla
+	'I wear the ball gag'
+
+
+	if rand (1,7) > 3:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+	end
+	'Nice, Betsi... now take off all your clothes'
+
+
+	minut += 15
+	if stat['BDSM'] <= 15 and stat['BDSM'] ! 0:
+		'<i>I had some BDSM experience... It start to hurt in 15 minutes, but I can handle it</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(1,3), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] > 15:
+		'<i>With my BDSM experience it was casual waiting, even boring!</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(0,1), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] = 0:
+		'<i>In few minutes it starts to hurt, it''s very unpleasant feel</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(3,5), 'mouth', 'freeze'
+		gs 'stat'
+	end
+
+	act 'No':
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'undress':
+		*clr & cla
+		inhib_exp += rand(0,1)
+
+		minut += 5
+		willpowermax -= rand(0,1)
+
+		gs 'clothing', 'strip'
+		gs 'underwear', 'remove'
+		gs 'stat'
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+			'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+			gs 'pain', rand(1,3), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			gs 'pain', rand(0,1), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] <= 10:
+			'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+			gs 'pain', rand(3,5), 'mouth', 'freeze'
+			gs 'stat'
+		end
+
+
+		if zashmorg = 3 or zashmorg  = 1:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+		else
+			'Vania takes the collar and locks it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start ('+rand(1,2)+').mp4"></video></center>'
+			stat['BDSM'] += rand(0,1)
+			gs 'stat'
+		end
+		zashmorg = 3
+
+		'Vania takes a leash and lock it to the collar.'
+
+		'"Now, Betsi, sit like a dog"'
+
+		if rand (1,7) > 3:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+		end
+
+
+		act 'Mghght (try to protest)':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+
+
+
+		act 'sit like a dog':
+			*clr & cla
+			stat['BDSM'] += rand(0,1)
+			vurok += rand(0,1)
+			bdsmurok += 1
+			gs 'stat'
+
+			minut += 30
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				gs 'pain', rand(0,1), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] <= 10:
+				'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+				gs 'pain', rand(3,5), 'mouth', 'freeze'
+				gs 'stat'
+			end
+
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+
+			if rand (1,7) > 3:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+			end
+
+			'"Nice pet, let''s go for a walk"'
+
+
+			act 'Mghght (try to protest)':
+				*clr & cla
+				willpowermax += 1
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+
+
+			act 'go for a walk':
+				*clr & cla
+
+				minut += 30
+				if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+					'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+					gs 'pain', rand(1,3), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] > 25:
+					gs 'pain', rand(0,1), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] <= 10:
+					'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+					gs 'pain', rand(3,5), 'mouth', 'freeze'
+					gs 'stat'
+				end
+
+				'It''s so humiliating, I go with Vania like a pet...'
+
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/gonaked ('+rand(1,5)+').jpg"></center>'
+
+
+				'"My doggy, ask! ask!"'
+
+				act 'Mghght (try to protest)':
+					*clr & cla
+					willpowermax += 1
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi.'
+					act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+				end
+
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+				end
+
+				act 'ask like a dog':
+					*clr & cla
+
+
+					'"Good girl, Vania pets me..."'
+					"Very good! let''s go back"
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+
+					minut += 30
+					if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+						'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+						gs 'pain', rand(1,3), 'mouth', 'freeze'
+						gs 'stat'
+					elseif stat['BDSM'] > 25:
+						gs 'pain', rand(0,1), 'mouth', 'freeze'
+						gs 'stat'
+					elseif stat['BDSM'] <= 10:
+						'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+						gs 'pain', rand(3,5), 'mouth', 'freeze'
+						gs 'stat'
+					end
+
+					act 'go with Vania':
+						*clr & cla
+						stat['BDSM'] += rand(0,1)
+						minut += 30
+						bdsmurok += 1
+						gs 'stat'
+
+						if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+							'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+							gs 'pain', rand(1,3), 'mouth', 'freeze'
+							gs 'stat'
+						elseif stat['BDSM'] > 25:
+							gs 'pain', rand(0,1), 'mouth', 'freeze'
+							gs 'stat'
+						elseif stat['BDSM'] <= 10:
+							'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+							gs 'pain', rand(3,5), 'mouth', 'freeze'
+							gs 'stat'
+						end
+
+
+						'"Ok, Betsi, good. It''s enought for now"'
+						'"Show me your saliva!"'
+						'"perfect! XD"'
+						'He unlocks the collar'
+						zashmorg = 2
+
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/openmv ('+rand(1,2)+').mp4"></video></center>'
+
+						pcs_mood += rand(0,20)
+						gs 'stat'
+						ztemp = rand(1,2)
+						'"Betsi, sit here..."'
+
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'mbg4':
+	*clr & cla
+	'I wear the ball gag'
+
+
+	if rand (1,7) > 3:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+	end
+	'Nice, Betsi... now take off all your clothes'
+
+
+	minut += 15
+	if stat['BDSM'] <= 15 and stat['BDSM'] ! 0:
+		'<i>I had some BDSM experience... It start to hurt in 15 minutes, but I can handle it</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(1,3), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] > 15:
+		'<i>With my BDSM experience it was casual waiting, even boring!</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(0,1), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] = 0:
+		'<i>In few minutes it starts to hurt, it''s very unpleasant feel</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(3,5), 'mouth', 'freeze'
+		gs 'stat'
+	end
+
+	act 'No':
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'undress':
+		*clr & cla
+		inhib_exp += rand(0,1)
+
+		minut += 5
+		willpowermax -= rand(0,1)
+
+		gs 'clothing', 'strip'
+		gs 'underwear', 'remove'
+		gs 'stat'
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+			'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+			gs 'pain', rand(1,3), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			gs 'pain', rand(0,1), 'mouth', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] <= 10:
+			'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+			gs 'pain', rand(3,5), 'mouth', 'freeze'
+			gs 'stat'
+		end
+
+
+		if zashmorg = 3 or zashmorg  = 1:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+		else
+			'Vania takes the collar and locks it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start ('+rand(1,2)+').mp4"></video></center>'
+			stat['BDSM'] += rand(0,1)
+			gs 'stat'
+		end
+		zashmorg = 3
+
+		'Vania takes a leash and lock it to the collar while I was undressing.'
+
+		'"Now, Betsi, sit like a dog"'
+
+		if rand (1,7) > 3:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+		end
+
+
+		act 'Mghght (try to protest)':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+
+
+
+		act 'sit like a dog':
+			*clr & cla
+			stat['BDSM'] += rand(0,1)
+			vurok += rand(0,1)
+			bdsmurok += 1
+			gs 'stat'
+
+			minut += 30
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				gs 'pain', rand(0,1), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] <= 10:
+				'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+				gs 'pain', rand(3,5), 'mouth', 'freeze'
+				gs 'stat'
+			end
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+
+			if rand (1,7) > 3:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+			end
+
+
+
+			if pirsf = 0:
+				act 'wait': gt 'mod_public_WC_rab_Mayster5', 'shipka'
+			else
+				act 'wait': gt 'mod_public_WC_rab_Mayster5', 'piercetrain'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'shipka':
+	gt 'mod_public_WC_rab_Mayster5_shipka', 'shipka'
+end
+
+if $ARGS[0] = 'piercetrain':
+	gt 'mod_public_WC_rab_Mayster5_piercetrain', 'start'
+end
+
+
+
+
+
+if $ARGS[0] = 'tied':
+	*clr & cla
+	'"Now we will use more intresting BDSM practices"'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	temp = rand(1,3)
+	if temp = 1:
+		'Vania takes a handcuff - "Show me your hands"'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'stretch out my hands':
+			*clr & cla
+			'Vania locks the handcuff on my hands.'
+			miut += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/naruchi/naruchi ('+rand(1,5)+').jpg"></center>'
+
+
+			vtide = 1
+			act 'wait': gt 'mod_public_WC_rab_Mayster5', 'sex'
+
+		end
+	elseif temp = 2:
+		'Vania takes a rope - "turn around"'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'turn around':
+			*clr & cla
+			'I feel how Vania tied my hands behind my back.'
+			miut += 5
+			gs 'stat'
+
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/hands behind/hb ('+rand(1,7)+').jpg"></center>'
+
+			vtide = 2
+			act 'wait': gt 'mod_public_WC_rab_Mayster5', 'sex'
+		end
+	elseif temp = 3:
+		'Vania takes a rope - "lie down"'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'lie down':
+			*clr & cla
+			'I feel how Vania tied my hands, legs, everything!..'
+			miut += 5
+			gs 'stat'
+
+			if rand(1,16) <= 5:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/all/allv ('+rand(1,5)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/all/all ('+rand(1,11)+').jpg"></center>'
+			end
+
+
+			vtide = 3
+			act 'wait': gt 'mod_public_WC_rab_Mayster5', 'sex'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'sex':
+	*clr & cla
+	if ( pin1 + pin2 + pin3 > 0 ) and bdsmurok < 27:
+		pin1 = 0 and pin2 = 0 and pin3 = 0
+		'Vania removes all the pins from me'
+	end
+
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	if vtide = 1:
+		temp = rand(1,3)
+		if temp = 1:
+			'Vania undressed his pants, he stands in between my face and the handcuffs'
+			'I start to blow him'
+			'I can''t control the process, vania uses my hands to controlls me'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bj_n (1).jpg"></center>'
+			gs 'arousal', 'bj', 15, 'rough', 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue sucking':
+				*clr & cla
+				gs 'arousal', 'bj', 10, 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'I feel Vanias'' dick becomes hotter and hotter, Vania pulled my hands and cums deeply in my throat, I can do nothing in this position except swallow everything!'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/facein/faceinv ('+rand(6,7)+').mp4"></video></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 12
+				gs 'cum_manage'
+				gs 'stat'
+
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 2:
+			'Vania pulls the handcuffs and stands me in the comfy pose for him...'
+			'Vania is fucking me'
+			if rand(1,3) = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag_n (1).jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv_n ('+rand(1,2)+').mp4"></video></center>'
+			end
+			gs 'arousal', 'vaginal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'vaginal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/vag/vag.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 3:
+			'Vania pulls the handcuffs and stands me in the comfy pose for him...'
+			'Vania is fucking my ass'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/assv_n (1).mp4"></video></center>'
+			gs 'arousal', 'anal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/ass/tied/ass.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 3
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	elseif vtide = 2:
+		temp = rand(1,3)
+		if temp = 1:
+			'Vania undressed his pants, grab my head and penetrates it'
+			'My hands tied behind me and I can''t push him when he is too deep'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bjv_b ('+rand(1,3)+').mp4"></video></center>'
+			gs 'arousal', 'bj', 15, 'rough', 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue sucking':
+				*clr & cla
+				gs 'arousal', 'bj', 10, 'rough', 'sub', 'humiliation'
+				gs 'stat'
+
+				if rand (1,2) = 1:
+					'Vania fills my whole mouth with his hot cum'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/facein/faceinv ('+rand(1,7)+').mp4"></video></center>'
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+				else
+					'When Vania starts to cum he pulls out his dick and sprays over me'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/faceon/faceon ('+rand(1,3)+').jpg"></center>'
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 11
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 14
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 15
+					gs 'cum_manage'
+					gs 'stat'
+				end
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 2:
+			'Vania use me as a sex doll...'
+
+			if rand(1,2) = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag_b (1).jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv_b (1).mp4"></video></center>'
+			end
+			gs 'arousal', 'vaginal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'vaginal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/vag/vag.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 3:
+			'Vania push me to the floor and starts to fuck my ass'
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/assv_b (1).mp4"></video></center>'
+			gs 'arousal', 'anal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/ass/tied/ass.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 3
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	elseif vtide = 3:
+		temp = rand(1,3)
+		if temp = 1:
+			'I tottaly tied and can do no resistance '
+			'Vania is fucking my head'
+			if rand (1,5) = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bj (1).jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bjv ('+rand(1,4)+').mp4"></video></center>'
+			end
+			gs 'arousal', 'bj', 15, 'rough', 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue sucking':
+				*clr & cla
+				gs 'arousal', 'bj', 10, 'rough', 'sub', 'humiliation'
+				gs 'stat'
+
+				if rand (1,2) = 1:
+					'Vania fills my whole mouth with his hot cum'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/facein/faceinv ('+rand(1,7)+').mp4"></video></center>'
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+				else
+					'When Vania starts to cum he pulls out his dick and sprays over me'
+
+					if rand (1,5) <= 3:
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/faceon/tied/facon ('+rand(1,3)+').jpg"></center>'
+					else
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/faceon/tied/faceonv ('+rand(1,2)+').mp4"></video></center>'
+					end
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 11
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 14
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 15
+					gs 'cum_manage'
+					gs 'stat'
+				end
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 2:
+			'Vania use me as a sex doll...'
+
+			if rand(1,9) <= 4:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag ('+rand(1,4)+').jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv ('+rand(1,5)+').mp4"></video></center>'
+			end
+			gs 'arousal', 'vaginal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'vaginal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/vag/tied/vag.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 3:
+			'Vania push me to the floor and starts to fuck my ass'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/ass.jpg"></center>'
+			gs 'arousal', 'anal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/ass/tied/ass.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 3
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'kara':
+	*clr & cla
+
+	'Vania ties me.'
+	'Betsi, this lesson is about discipline. You ned to remember your place'
+
+	if rand(1,16) <= 5:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/all/allv ('+rand(1,5)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/all/all ('+rand(1,11)+').jpg"></center>'
+	end
+
+	act 'wait':
+		*clr & cla
+
+		'"You are a good pet. Let''s give you a warning at first"'
+		'"I''ll make you a mark... which will remind you are Master''s pet!"'
+
+		if pin2 > 0: pin2 = 0 & 'Vania removes pins from my tits.'
+		if pin3 > 0: pin2 = 0 & 'Vania removes pins from my pussy.'
+
+		if pirsf + pirsg = 0:
+			'The Vania pours the vodka on the tits, pierces my nipples and inserts rings.'
+			'<i>It''s my first piercing... never though it would be like that(((</i>'
+			pierc = 1
+
+			i = 2
+			minut += 30
+			pirsF = i
+
+			dynamic 'pirsF<<i>>_owned = 1'
+			pierWearCount += 1
+			gs 'pain', 7, 'nipples', 'pierce'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/add_pirc/pierce.mp4"></video></center>'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/add_pirc/ready_tits.mp4"></video></center>'
+			gs 'stat'
+
+			'"Everytime you feel or see this slave ring remember who you are. You are the pet of your Master!"'
+			act 'wait': ztemp = 3 & gt 'mod_public_WC_rab_Mayster', 'end'
+		elseif pirsf = 0:
+			'The Vania pours the vodka on the tits, pierces my nipples and inserts ring or something.'
+			pierc = 1
+
+			i = 2
+			minut += 30
+			pirsF = i
+
+			dynamic 'pirsF<<i>>_owned = 1'
+			pierWearCount += 1
+			gs 'pain', 7, 'nipples', 'pierce'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/add_pirc/pierce.mp4"></video></center>'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/add_pirc/ready_tits.mp4"></video></center>'
+			gs 'stat'
+
+			'"Everytime you feel or see this slave ring remember who you are. You are the pet of your Master!"'
+			act 'wait': ztemp = 3 & gt 'mod_public_WC_rab_Mayster', 'end'
+		elseif pirsg = 0:
+			'The Vania pours the vodka on my pussy, pierces my clitoris and inserts ring or something.'
+			pierc = 2
+
+			i = 10
+			minut += 30
+			pirsg = i
+			dynamic 'pirsG<<i>>_owned = 1'
+			pierWearCount += 1
+			gs 'pain', 7, 'clitoris', 'pierce'
+			'<center><img src="images/pc/body/piercings/g<<i>>.jpg"></center>'
+			gs 'stat'
+
+			'"Everytime you feel or see this slave ring remember who you are. You are the pet of your Master!"'
+			act 'wait': ztemp = 3 & gt 'mod_public_WC_rab_Mayster', 'end'
+		else
+			*clr & cla
+			willpowermax += 2
+			gs 'stat'
+			'Vania slaps me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/slap.mp4"></video></center>'
+			gs 'pain', rand(4,5), 'cheeks', 'slap'
+			gs 'stat'
+			'I fell on my knees.'
+			if zashmorg ! 1 or ashmorg ! 3 :
+				'He pulls out a collar and locked it on me'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+			end
+
+			zashmorg = 3
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'"Now, you are my slut, my slave, my pet and anything else "my" I want! And you must listen me carefully, cuz if you wouldn''t you are going to be punished!"'
+				'"He locks the leash to my collar, stands up and goes. The leash pulls me and I am needed to go"'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/colar.mp4"></video></center>'
+				act 'go':
+					*clr & cla
+					'We came to the end of the warehouse, where the barn begins.'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+					act 'continue':
+						*clr & cla
+						'I feel the animals smells here...'
+						'There is a bed with chains'
+						'"Until I''ll see the consent in your eyes you will live here"'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/bed.jpg"></center>'
+
+						act 'Shock':
+							*clr & cla
+							'I am so shocked, that I am not notice how he chained me to the bed'
+							if $clothingworntype ! 'nude': 'and rips my clothes...'
+							$clothingworntype = 'nude'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/live_sklad'+rand(1,6)+'.jpg"></center>'
+							zgoda = 0
+							skladlive = daystart
+							Vcumglass = 0
+
+							act 'live here':
+								lsday = day
+								$rope = 100
+								gt 'mod_public_WC_rab_livesklad', 'start'
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'piercing':
+	*clr & cla
+	'"Hey-hey, my lovely pet! Show me your pet mark"'
+	if pierc = 1 and Vania = 1:
+		'I pull up my top clothes to show my tits to Vania'
+		if pirsF = 10000:
+			$RESULT = 'images/pc/body/tits/t<<tits>>.jpg'
+			'"Where is the mark?... Betsi, Betsi... you need to listen me carefully"'
+			willpowermax += 2
+			gs 'stat'
+			'Vania starts to laughts!..'
+
+			'...Suddenly he slaps me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/slap.mp4"></video></center>'
+			gs 'pain', rand(4,5), 'cheeks', 'slap'
+			gs 'stat'
+			'I fell on my knees. He pulls out a collar and locked it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+			zashmorg = 3
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'Now, you are my slut, my slave, my pet and anything else "my" I want! And you must listen me carefully, cuz if you wouldn''t you are going to be punished!'
+				'He locks the leash to my collar, stands up and goes. The leash pulls me and I am needed to go'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/colar.mp4"></video></center>'
+				act 'go':
+					*clr & cla
+					'We came to the end of the warehouse, where the barn begins.'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+					act 'continue':
+						*clr & cla
+						'I feel the animals smells here...'
+						'There is a bed with chains'
+						'Until I''ll see the consent in your eyes you will live here'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/bed.jpg"></center>'
+
+						act 'Shock':
+							*clr & cla
+							'I am so shocked, that I am not notice how he chained me to the bed and rips my clothes...'
+							$clothingworntype = 'nude'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/live_sklad'+rand(1,6)+'.jpg"></center>'
+							zgoda = 0
+							skladlive = daystart
+							Vcumglass = 0
+
+							act 'live here':
+								lsday = day
+								$rope = 100
+								gt 'mod_public_WC_rab_livesklad', 'start'
+							end
+						end
+					end
+				end
+			end
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits.jpg"></center>'
+			VaniaMayster += rand(0,1)
+			'"Good girl"'
+			act 'continue': gt $loc, $loc_arg
+		end
+	elseif pierc = 2 and Vania = 1:
+		'I undresses to show my tits & pussy to Vania'
+		if pirsF = 10000:
+			$RESULT = 'images/pc/body/tits/t<<tits>>.jpg'
+			if pirsg ! 10000: '<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/puss.jpg"></center>'
+			'"Where is the mark?... Betsi, Betsi... you need to listen me carefully'
+
+			willpowermax += 2
+			gs 'stat'
+			'Vania starts to laughts!..'
+
+			'...Suddenly he slaps me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/slap.mp4"></video></center>'
+			gs 'pain', rand(4,5), 'cheeks', 'slap'
+			gs 'stat'
+			'I fell on my knees. He pulls out a collar and locked it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+			zashmorg = 3
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'Now, you are my slut, my slave, my pet and anything else "my" I want! And you must listen me carefully, cuz if you wouldn''t you are going to be punished!'
+				'He locks the leash to my collar, stands up and goes. The leash pulls me and I am needed to go'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/colar.mp4"></video></center>'
+				act 'go':
+					*clr & cla
+					'We came to the end of the warehouse, where the barn begins.'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+					act 'continue':
+						*clr & cla
+						'I feel the animals smells here...'
+						'There is a bed with chains'
+						'Until I''ll see the consent in your eyes you will live here'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/bed.jpg"></center>'
+
+						act 'Shock':
+							*clr & cla
+							'I am so shocked, that I am not notice how he chained me to the bed and rips my clothes...'
+							$clothingworntype = 'nude'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/live_sklad'+rand(1,6)+'.jpg"></center>'
+							zgoda = 0
+							skladlive = daystart
+							Vcumglass = 0
+
+							act 'live here':
+								lsday = day
+								$rope = 100
+								gt 'mod_public_WC_rab_livesklad', 'start'
+							end
+						end
+					end
+				end
+			end
+		elseif pirsG = 10000:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits.jpg"></center>'
+			$RESULT = FUNC('$pube_image')
+			'"Where is the mark?... Betsi, Betsi... you need to listen me carefully'
+
+			willpowermax += 2
+			gs 'stat'
+			'Vania starts to laughts!..'
+
+			'...Suddenly he slaps me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/slap.mp4"></video></center>'
+			gs 'pain', rand(4,5), 'cheeks', 'slap'
+			gs 'stat'
+			'I fell on my knees. He pulls out a collar and locked it on me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+			zashmorg = 3
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'Now, you are my slut, my slave, my pet and anything else "my" I want! And you must listen me carefully, cuz if you wouldn''t you are going to be punished!'
+				'He locks the leash to my collar, stands up and goes. The leash pulls me and I am needed to go'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/colar.mp4"></video></center>'
+				act 'go':
+					*clr & cla
+					'We came to the end of the warehouse, where the barn begins.'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+					act 'continue':
+						*clr & cla
+						'I feel the animals smells here...'
+						'There is a bed with chains'
+						'Until I''ll see the consent in your eyes you will live here'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/bed.jpg"></center>'
+
+						act 'Shock':
+							*clr & cla
+							'I am so shocked, that I am not notice how he chained me to the bed and rips my clothes...'
+							$clothingworntype = 'nude'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/live_sklad'+rand(1,6)+'.jpg"></center>'
+							zgoda = 0
+							skladlive = daystart
+							Vcumglass = 0
+
+							act 'live here':
+								lsday = day
+								$rope = 100
+								gt 'mod_public_WC_rab_livesklad', 'start'
+							end
+						end
+					end
+				end
+			end
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/all pirced.jpg"></center>'
+			VaniaMayster += rand(0,1)
+			'"Good girl"'
+			act 'continue': gt $loc, $loc_arg
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster5 ---------------------------------

locations/mod_public_WC_rab_Mayster51.qsrc

@@ -0,0 +1,65 @@
+# mod_public_WC_rab_Mayster51
+if $ARGS[0] = 'start':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'"Hmm, if you feel, you couldn''t handle the pain in the BDSM training... well that is good idea"'
+	if stat['BDSM'] <= 40: '"I see your progress, I think you could find the pleasure waves in a pain"'
+
+	act 'wait': gt 'mod_public_WC_rab_Mayster51', '2'
+end
+
+
+
+if $ARGS[0] = '2':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	'Vania tied me and starts the lesson!'
+
+	temp = rand (1,4)
+	'<center><video autoplay loop src="mod/public_WC/lisrab/kara/4/uv<<temp>>.mp4"></video></center>'
+	stat['BDSM'] += rand(2,3)
+	gs 'arousal', 'BDSM', rand(45,120), 'bound', 'sub'
+	gs 'pain', rand(0,2), 'back', 'spank'
+	gs 'pain', rand(0,2), 'asscheeks', 'spank'
+	gs 'pain', rand(0,2), 'hips', 'spank'
+	gs 'pain', rand(0,2), 'legL', 'spank'
+	gs 'pain', rand(0,2), 'legR', 'spank'
+	gs 'pain', rand(0,2), 'shoulders', 'spank'
+	gs 'pain', rand(0,2), 'armL', 'spank'
+	gs 'pain', rand(0,2), 'armR', 'spank'
+	gs 'pain', rand(0,2), 'chest', 'spank'
+	gs 'pain', rand(0,2), 'breasts', 'spank'
+	gs 'pain', rand(0,2), 'nipples', 'spank'
+	gs 'pain', rand(0,2), 'ribs', 'spank'
+	gs 'pain', rand(0,2), 'tummy', 'spank'
+	gs 'pain', rand(0,2), 'pubic', 'spank'
+	gs 'pain', rand(0,2), 'labia', 'spank'
+	gs 'stat'
+
+	'After the lesson he untied me and say'
+	'"Betsi, it''s nice to see your desire to study!"'
+	pcs_mood += rand(0,20)
+	gs 'stat'
+	ztemp = rand(1,2)
+	act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+end
+--- mod_public_WC_rab_Mayster51 ---------------------------------

locations/mod_public_WC_rab_Mayster5_piercetrain.qsrc

@@ -0,0 +1,718 @@
+# mod_public_WC_rab_Mayster5_piercetrain
+if $ARGS[0] = 'start':
+	*clr & cla
+	'Vania unlockes the gag ball'
+
+	if bdsmurok >= 8 and bdsmurok < 17:
+		'"Pain... i think you afraid this word"'
+		'"But it''s just a feel, and if you discavered it for yourself, you will live this world absoluly another."'
+		'"To do so you just need to totallt trust your master. Your master never make you feel bad or hurt, Your master only gives you all specter of live feelings"'
+		'"It cold be not so easy... at first... but I am a good teacher and you are a good pet..."'
+	else
+		temp = rand(1,3)
+		if temp = 1: '"Pain is not so bad, pain is different and pain is intresting"'
+		if temp = 2: '"If you feel the pain - you are alive and can feel pleasure too. You just need to combine it"'
+		if temp = 3: '"Just talk with your body"'
+	end
+
+	if bdsmurok <= 9:
+		gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+	elseif bdsmurok <=11:
+		gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+	elseif bdsmurok <=12:
+		gt 'mod_public_WC_rab_Mayster5_piercetrain', 'piano'
+	elseif bdsmurok <=16:
+		if rand(1,2) = 1:
+			if pirsg ! 0:
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'piercwalk'
+			else
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'ttrain'
+			end
+		else
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+		end
+	elseif bdsmurok <=23:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_piercetrain', 'piano'
+		else
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+		end
+	elseif bdsmurok >=24:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_piercetrain', 'ttrain'
+		else
+			if pirsg ! 0:
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'piercwalk'
+			else
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'ttrain'
+			end
+		end
+	end
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+end
+
+
+
+if $ARGS[0] = 'piano':
+	*clr & cla
+
+	'"Betsi, good pet can entertain his master without his body."'
+	'"Let''s go"'
+	'during his speach Vania locked the chains to each my nipple pircing.'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/odiagnuv ('+rand(1,3)+').jpg"></center>'
+
+	act 'walk with Vania':
+		*clr & cla
+		'<center><b><font color="maroon">Redneck''s bedroom</font></b></center>'
+		*nl
+		'Vania walks me as a pet, uses the chains as a leash'
+
+		'Well, Betsi, show me how good you with the piano.'
+
+		minut += rand(5,10)
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/go.mp4"></video></center>'
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+			'<i>I had some BDSM experience... nipple hurts, but I can handle it</i>'
+			gs 'pain', rand(1,2), 'nipples', 'stretch'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			gs 'pain', rand(0,1), 'nipples', 'stretch'
+			gs 'stat'
+		elseif stat['BDSM'] <= 10:
+			'<i><b>AAAAAAAAAAAAAA sharp pain! nipple hurts!</b></i>'
+			gs 'pain', rand(2,4), 'nipples', 'stretch'
+			gs 'stat'
+		end
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/spat1.jpg"></center>'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/hata/piano.jpg"></center>'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+		act 'play the piano':
+			*clr & cla
+			'It was hard to play, time to time Vania pulled the chains and I loose the rhythm in the pain'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/piano.mp4"></video></center>'
+
+			act 'continue playing':
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'piano2'
+			end
+
+			instrmusic_exp += rand(0,3)
+			pcs_mood += 5
+			minut += rand(15,35)
+
+			if  pcs_instrmusic >= 100:
+				'despite everything I played wonderful melody!'
+				pcs_mood += 10
+				brak -= 3
+			elseif pcs_instrmusic >= 70:
+				'The melody I have played is good'
+				pcs_mood += 5
+				brak -= 2
+			elseif pcs_instrmusic >= 40:
+				'I yelled in pain more often than made a music'
+				brak -= 1
+			elseif pcs_instrmusic >= 20:
+				'That was a cacophony of sounds combined with my crying'
+			else
+				'that was not a music... Vania not looks very happy'
+				pcs_mood -= 3
+				brak += 1
+			end
+
+			if stat['BDSM'] <= 45 and stat['BDSM'] > 30:
+				'<i>I had some BDSM experience... nipple hurts, but I can handle it</i>'
+				gs 'pain', rand(3,4), 'nipples', 'stretch'
+				gs 'stat'
+			elseif stat['BDSM'] > 45:
+				gs 'pain', rand(2,3), 'nipples', 'stretch'
+				gs 'stat'
+			elseif stat['BDSM'] <= 30:
+				'<i><b>AAAAAAAAAAAAAA sharp pain! nipple hurts!</b></i>'
+				gs 'pain', rand(4,6), 'nipples', 'stretch'
+				gs 'stat'
+				'I can''t continue... I can only cry!'
+				cla
+				act 'beg to stop!':
+					ztemp = 3
+					gt 'mod_public_WC_rab_Mayster', 'end'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'piano2':
+	*clr & cla
+	'It was hard to play, time to time Vania pulled the chains and I loose the rhythm in the pain'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/piano.mp4"></video></center>'
+
+	act 'wait':
+		bdsmurok += 1
+		vurok += 1
+		if bdsmurok > 16:
+			gt 'mod_public_WC_rab_Mayster5', 'tied'
+		else
+			gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+	end
+
+	ztemp = 0
+	instrmusic_exp += rand(0,3)
+	pcs_mood += 5
+	minut += rand(15,35)
+
+	if  pcs_instrmusic >= 100:
+		'despite everything I played wonderful melody!'
+		pcs_mood += 10
+		brak -= 3
+		ztemp = rand(1,2)
+	elseif pcs_instrmusic >= 70:
+		'The melody I have played is good'
+		pcs_mood += 5
+		brak -= 2
+		ztemp = rand(1,2)
+	elseif pcs_instrmusic >= 40:
+		'I yelled in pain more often than made a music'
+		brak -= 1
+		ztemp = 4
+	elseif pcs_instrmusic >= 20:
+		'That was a cacophony of sounds combined with my crying'
+		ztemp = 3
+	else
+		'that was not a music... Vania not looks very happy'
+		pcs_mood -= 3
+		brak += 1
+		ztemp = 3
+	end
+
+	'After some time Vania stops me.'
+
+	if stat['BDSM'] <= 50 and stat['BDSM'] > 35:
+		'<i>I had some BDSM experience... nipple hurts, but I can handle it</i>'
+		gs 'pain', rand(3,4), 'nipples', 'stretch'
+		gs 'stat'
+	elseif stat['BDSM'] > 50:
+		gs 'pain', rand(2,3), 'nipples', 'stretch'
+		gs 'stat'
+	elseif stat['BDSM'] <= 35:
+		'<i><b>AAAAAAAAAAAAAA sharp pain! nipple hurts!</b></i>'
+		gs 'pain', rand(4,6), 'nipples', 'stretch'
+		gs 'stat'
+		'I can''t continue... I can only cry!'
+		cla
+		act 'beg to stop!':
+			ztemp = 3
+			gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'piercwalk':
+	*clr & cla
+
+	'"Today lesson we will do on a fresh air..."'
+	'"Betsi, let''s walk you out."'
+
+	'Vania locked the chains to each my nipple pircing, to my pussy pircing... also he pinch a chain to my nose.'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/pussy/train_walk.jpg"></center>'
+
+
+	if stat['BDSM'] <= 85 and stat['BDSM'] > 70:
+		gs 'pain', rand(4,5), 'clitoris', 'stretch'
+		gs 'stat'
+	elseif stat['BDSM'] > 85:
+		gs 'pain', rand(1,4), 'clitoris', 'stretch'
+		gs 'stat'
+	elseif stat['BDSM'] <= 70:
+		gs 'pain', rand(5,6), 'clitoris', 'stretch'
+		gs 'stat'
+	end
+
+	pin3 = 1
+
+
+	act 'AAA, I refuse to go anywhere!':
+		*clr & cla
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,2)
+	if stat['BDSM'] <= 75 and stat['BDSM'] > 50:
+		'<i>I had some BDSM experience... nipples and pussy hurt, but I can handle it</i>'
+		gs 'pain', rand(4,5), 'nipples', 'stretch'
+		gs 'stat'
+		gs 'pain', rand(1,3), 'nose', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] > 75:
+		'<i>Yeeees, it feels great!!!</i>'
+		gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+		gs 'stat'
+		gs 'pain', rand(1,3), 'nipples', 'stretch'
+		gs 'stat'
+		gs 'pain', rand(0,1), 'nose', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] <= rand (30,50):
+		cla
+		'<i><b>AAAAAAAAAAAAAA PAIN! I can''t handle it more!</b></i>'
+		gs 'pain', rand(6,8), 'nipples', 'stretch'
+		gs 'stat'
+		gs 'pain', rand(3,5), 'nose', 'pinch'
+		gs 'stat'
+
+		'AAA, I take off the nose pin and grab the chains to make it inpossible for Vania to pull the chains!'
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi, you just need to do what I said!'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	act 'go for a walk':
+		*clr & cla
+		minut += 30
+		gs 'stat'
+
+		'<i>It''s so humiliating, I go with Vania like a pet...</i>'
+		'<i>Each few steps Vania pulls the chain stretching my pussy and nipples... I try to walks faster, but Vania walk is quick and I can''t keep up with him</i>'
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/pussy/train_walk.jpg"></center>'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/gonaked ('+rand(1,5)+').jpg"></center>'
+
+
+
+
+
+		minut += rand(10,20)
+		stat['BDSM'] += rand(1,2)
+
+		if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+			'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+			'We walk like half an hour and Vania happly said'
+			'"Perfect!!! Betsi, it''s enought for the lesson, let''s go back"'
+			Vlove += 1
+
+			pcs_mood += rand(10,30)
+			gs 'stat'
+
+			if bdsmurok > 16:
+				act 'go back': gt 'mod_public_WC_rab_Mayster5', 'tied'
+			elseif bdsmurok >= 27:
+				act 'go back': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+			else
+				act 'go back': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+
+
+			VaniaMayster += 1
+			gs 'pain', rand(4,5), 'nipples', 'stretch'
+			gs 'stat'
+			gs 'pain', rand(1,3), 'nose', 'pinch'
+			gs 'stat'
+			gs 'pain', rand(4,5), 'clitoris', 'stretch'
+			gs 'stat'
+		elseif stat['BDSM'] > 99:
+			'<i>Yeeees, it feels great!!!</i>'
+			$orgasm_or = 'custom'
+			$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+			'We walk like half an hour and vania happly said'
+			'"Perfect!!! Betsi, it''s enought for the lesson, let''s go back"'
+			Vlove += 1
+
+			pcs_mood += rand(10,30)
+			gs 'stat'
+
+			if bdsmurok > 16:
+				act 'go back': gt 'mod_public_WC_rab_Mayster5', 'tied'
+			elseif bdsmurok >= 27:
+				act 'go back': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+			else
+				act 'go back': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+
+			VaniaMayster += 1
+
+			gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+			gs 'stat'
+			gs 'pain', rand(1,3), 'nipples', 'stretch'
+			gs 'stat'
+			gs 'pain', rand(0,1), 'nose', 'pinch'
+			gs 'stat'
+			gs 'pain', rand(1,4), 'clitoris', 'stretch'
+			gs 'stat'
+		elseif stat['BDSM'] <= rand (39,69):
+			cla
+			'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+			'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+			'AAA, I lie down and can only cry!'
+			pin1 = 0
+			pin2 = 0
+			pin3 = 0
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi, you just need to do what I said!'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			gs 'pain', rand(6,8), 'nipples', 'stretch'
+			gs 'stat'
+			gs 'pain', rand(3,5), 'nose', 'pinch'
+			gs 'stat'
+			gs 'pain', rand(5,6), 'clitoris', 'stretch'
+			gs 'stat'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'ttrain':
+	*clr & cla
+	'Vania connects each my nipple pircing with a chain'
+	'then he connects the chains...'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/odiagnuv ('+rand(1,3)+').jpg"></center>'
+
+	if turok = 0:
+		'This is a top level train, Betsi. It could be hard, but after this your tits will be ready for any mater''s requirment. And you will ready to make happy master with any desires.'
+	end
+
+	act 'wait':
+		*clr & cla
+		if turok <= 3:
+			temp = rand(1,1)
+			if temp = 1:
+				'Vania grabs the chain and pulls it up...'
+
+				'I stood on tiptoe by he is pulling higher and higher...'
+
+				if rand (1,5) = 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vtv (2).mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vt ('+rand(1,13)+').jpg"></center>'
+				end
+
+				act 'Try to explore the pain':
+					cla
+					'Vania releases the chain and pain go away...'
+					'<i>I feel nothing, there is no pain in the nipples, I feel no tension...just heat</i>'
+					stat['BDSM'] += rand(1,3)
+					gs 'stat'
+
+					if rand (1,5) = 1:
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vtv (2).mp4"></video></center>'
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vt ('+rand(1,13)+').jpg"></center>'
+					end
+
+					'I see Vania took something from his bookcase and turn back to me'
+					'"Betsi, I am impressed, each day you are closer to the perfect woman."'
+					pcs_mood += rand(20,40)
+					gs 'stat'
+					turok += 1
+					act 'wait...': gt 'mod_public_WC_rab_Mayster5', 'tied'
+				end
+
+				minut += rand(10,20)
+				if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+					'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+					gs 'pain', rand(5,8), 'nipples', 'stretch'
+					gs 'stat'
+				elseif stat['BDSM'] > 99:
+					'<i>Yeeees, it feels great!!!</i>'
+					$orgasm_or = 'custom'
+					$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+					gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+					gs 'stat'
+					gs 'pain', rand(0,5), 'nipples', 'stretch'
+					gs 'stat'
+				elseif stat['BDSM'] <= rand (39,69):
+					cla
+					'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+					'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+					'AAA, I grab the chain to stop this!'
+					pin1 = 0
+					pin2 = 0
+					pin3 = 0
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi, you just need to do what I said!'
+					act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+					gs 'pain', rand(6,9), 'nipples', 'stretch'
+					gs 'stat'
+				end
+			end
+		elseif turok <= 5:
+			temp = rand(1,1)
+			if temp = 1:
+				'Vania grabs the chain and pulls it up...'
+
+				'I stood on tiptoe by he is pulling higher and higher...'
+
+				if rand (1,5) = 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vtv (2).mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vt ('+rand(1,13)+').jpg"></center>'
+				end
+
+				act 'Try to explore the pain':
+					cla
+					'Vania releases the chain and pain go away...'
+					'<i>I feel nothing, there is no pain in the nipples, I feel no pins...just heat</i>'
+					stat['BDSM'] += rand(1,3)
+					gs 'stat'
+
+					if rand (1,5) = 1:
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vtv (2).mp4"></video></center>'
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/vt ('+rand(1,13)+').jpg"></center>'
+					end
+
+					'"Betsi, now you must do the train by your own."'
+					'"You need to train, and I don''t want to hear any refuses"'
+					'"He puts the chain in my mouth... Here you go... now, pull!!!"'
+
+
+					act 'I don''t want it! I spit out the chain!':
+						*clr & cla
+						pin1 = 0
+						pin2 = 0
+						pin3 = 0
+						willpowermax += 2
+						VaniaMayster -= 3
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+						'I tierd of this shit, Betsi.'
+						act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+					end
+
+					if VaniaMayster >= 100:
+						cla
+						'<i>I obey Vania for so long...</i>'
+						'<i>I can''t say "no" to Vania anymore</i>'
+					end
+
+					if stat['BDSM'] >= 85:
+
+
+						act 'pull the chain up':
+							*clr & cla
+							perfecttits = 1
+							turok += 1
+
+
+
+
+							if rand (1,2) = 1:
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/stv.mp4"></video></center>'
+							else
+								'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/st.jpg"></center>'
+							end
+
+
+
+							'"Perfect!!! Betsi, it''s enought for the lesson."'
+							Vlove += 1
+
+							pcs_mood += rand(10,30)
+							gs 'stat'
+
+							act 'wait': gt 'mod_public_WC_rab_Mayster5', 'tied'
+							VaniaMayster += 1
+							minut += rand(10,20)
+							stat['BDSM'] += rand(1,2)
+							if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+								'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+								gs 'pain', rand(5,8), 'nipples', 'stretch'
+								gs 'stat'
+							elseif stat['BDSM'] > 99:
+								'<i>Yeeees, it feels great!!!</i>'
+								$orgasm_or = 'custom'
+								$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+								gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+								gs 'stat'
+								gs 'pain', rand(0,5), 'nipples', 'stretch'
+								gs 'stat'
+							elseif stat['BDSM'] <= rand (39,69):
+								cla
+								'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+								'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+								'AAA, I take off all the pins!'
+								pin1 = 0
+								pin2 = 0
+								pin3 = 0
+								VaniaMayster -= 3
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+								'I tierd of this shit, Betsi, you just need to do what I said!'
+								act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+								gs 'pain', rand(6,9), 'nipples', 'stretch'
+								gs 'stat'
+							end
+						end
+					else
+						temp = stat['BDSM']
+						act 'train myself  (<font color="red"><<temp>> BDSM expirience</font>)': '<br><font color="red">I don''t have enough BDSM expirience to use this action.</font>'
+
+					end
+				end
+
+				minut += rand(10,20)
+				if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+					'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+					gs 'pain', rand(5,8), 'nipples', 'stretch'
+					gs 'stat'
+				elseif stat['BDSM'] > 99:
+					'<i>Yeeees, it feels great!!!</i>'
+					$orgasm_or = 'custom'
+					$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+					gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+					gs 'stat'
+					gs 'pain', rand(0,5), 'nipples', 'stretch'
+					gs 'stat'
+				elseif stat['BDSM'] <= rand (39,69):
+					cla
+					'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+					'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+					'AAA, I grab the chain to stop this!'
+					pin1 = 0
+					pin2 = 0
+					pin3 = 0
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi, you just need to do what I said!'
+					act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+					gs 'pain', rand(6,9), 'nipples', 'stretch'
+					gs 'stat'
+				end
+			end
+		else
+			temp = rand(1,1)
+			if temp = 1:
+				'"Betsi, now you must do the train by your own."'
+				'"You need to train, and I don''t want to hear any refuses"'
+				'"He puts the chain in my mouth... Here you go... now, pull!!!"'
+
+				act 'I don''t want it! I spit out the chain!':
+					*clr & cla
+					pin1 = 0
+					pin2 = 0
+					pin3 = 0
+					willpowermax += 2
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi.'
+					act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+				end
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+				end
+
+				act 'pull the chain up':
+					*clr & cla
+					perfecttits = 1
+					turok += 1
+
+					if rand (1,2) = 1:
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/stv.mp4"></video></center>'
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/train/st.jpg"></center>'
+					end
+
+
+
+					'"Perfect!!! Betsi, it''s enought for the lesson."'
+					Vlove += 1
+
+					pcs_mood += rand(10,30)
+					gs 'stat'
+
+
+					if bdsmurok >= 27:
+						act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+					else
+						act 'wait': gt 'mod_public_WC_rab_Mayster5', 'tied'
+					end
+
+					VaniaMayster += 1
+					minut += rand(10,20)
+					stat['BDSM'] += rand(1,2)
+					if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+						'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+						gs 'pain', rand(5,8), 'nipples', 'stretch'
+						gs 'stat'
+					elseif stat['BDSM'] > 99:
+						'<i>Yeeees, it feels great!!!</i>'
+						$orgasm_or = 'custom'
+						$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+						gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+						gs 'stat'
+						gs 'pain', rand(0,5), 'nipples', 'stretch'
+						gs 'stat'
+					elseif stat['BDSM'] <= rand (39,69):
+						cla
+						'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+						'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+						'AAA, I take off all the pins!'
+						pin1 = 0
+						pin2 = 0
+						pin3 = 0
+						VaniaMayster -= 3
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+						'I tierd of this shit, Betsi, you just need to do what I said!'
+						act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+						gs 'pain', rand(6,9), 'nipples', 'stretch'
+						gs 'stat'
+					end
+				end
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster5_piercetrain ---------------------------------

locations/mod_public_WC_rab_Mayster5_shipka.qsrc

@@ -0,0 +1,1646 @@
+# mod_public_WC_rab_Mayster5_shipka
+if $ARGS[0] = 'shipka':
+	*clr & cla
+	'Vania unlockes the gag ball'
+
+	if bdsmurok >= 8 and bdsmurok < 17:
+		'"Pain... i think you afraid this word"'
+		'"But it''s just a feel, and if you discavered it for yourself, you will live this world absoluly another."'
+		'"To do so you just need to totallt trust your master. Your master never make you feel bad or hurt, Your master only gives you all specter of live feelings"'
+		'"It cold be not so easy... at first... but I am a good teacher and you are a good pet..."'
+	else
+		temp = rand(1,3)
+		if temp = 1: '"Pain is not so bad, pain is different and pain is intresting"'
+		if temp = 2: '"If you feel the pain - you are alive and can feel pleasure too. You just need to combine it"'
+		if temp = 3: '"Just talk with your body"'
+	end
+
+	if bdsmurok <= 9:
+		gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+	elseif bdsmurok <=11:
+		gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+	elseif bdsmurok <=12:
+		gt 'mod_public_WC_rab_Mayster5_shipka', 't1'
+	elseif bdsmurok <=16:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_shipka', 't1'
+		else
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+		end
+	elseif bdsmurok <=23:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_shipka', 't1'
+		else
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya1'
+		end
+	elseif bdsmurok >=24:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_shipka', 't2'
+		else
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya2'
+		end
+	end
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+end
+
+
+if $ARGS[0] = 'ya1':
+	*clr & cla
+	'Vania takes a pin from his pocket... "Open your mouth, Betsi"'
+
+
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+
+	act 'No, go few steps back from Vania':
+		*clr & cla
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+
+
+	act 'open my mouth':
+		*clr & cla
+		if bdsmurok >= 10 and bdsmurok < 24:
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya2'
+		else
+			'Vania pins my toungue'
+
+			stat['BDSM'] += rand(0,1)
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... tongue hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'tongue', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				'<i>Yeeees, it feels great!</i>'
+
+				'"Ow, Betsi I see you are pretty open for the new feelings"'
+				gs 'pain', rand(0,1), 'tongue', 'freeze'
+				gs 'stat'
+				if bdsmurok < 10: bdsmurok = 10
+			elseif stat['BDSM'] <= 10:
+				'<i><b>AAAAAAAAAAAAAA sharp pain! Tongue hurts!</b></i>'
+				gs 'pain', rand(3,5), 'tongue', 'freeze'
+				gs 'stat'
+			end
+
+
+			if rand (1,3) > 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tongue/tongue1v ('+rand(1,2)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tongue/tongue1.jpg"></center>'
+			end
+
+			pin1 = 1
+			act 'wait':
+				*clr & cla
+
+				minut += rand(30,45)
+				gs 'stat'
+
+				stat['BDSM'] += rand(0,1)
+				if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+					'<i>I had some BDSM experience... tongue hurts, but I can handle it</i>'
+					gs 'pain', rand(1,3), 'tongue', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] > 25:
+					'<i>Yeeees, it feels great!</i>'
+
+					'"Ow, Betsi I see you are pretty open for the new feelings"'
+					gs 'pain', rand(0,1), 'tongue', 'freeze'
+					gs 'stat'
+					if bdsmurok < 10: bdsmurok = 10
+				elseif stat['BDSM'] <= 10:
+					'<i><b>AAAAAAAAAAAAAA sharp pain! Tongue hurts!</b></i>'
+					gs 'pain', rand(3,5), 'tongue', 'freeze'
+					gs 'stat'
+				end
+
+
+
+				if rand (1,3) > 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tongue/tongue1v ('+rand(1,2)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tongue/tongue1.jpg"></center>'
+				end
+
+
+				vurok += rand(0,1)
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+
+				pcs_mood += rand(0,20)
+				gs 'stat'
+
+				'"Betsi sit here..."'
+
+				ztemp = rand(1,2)
+				act 'sit and wait': bdsmurok += 1 & gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+
+
+
+
+			if bdsmurok >= 10:
+				cla
+				act 'wait': gt 'mod_public_WC_rab_Mayster5_shipka', 'ya2'
+			end
+			if bdsmurok > 16 and bdsmurok <=23:
+				cla
+				if rand (1,2) = 1:
+					act 'wait': gt 'mod_public_WC_rab_Mayster5_shipka', 'ya2'
+				else
+					act 'wait': gt 'mod_public_WC_rab_Mayster5_shipka', 'tya'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'ya2':
+	*clr & cla
+	'With quick moves Vania pins my toungue, and now I have 2 pins on my tongue'
+
+
+	bdsmurok += 1
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,1)
+	if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+		'<i>I had some BDSM experience... tongue hurts, but I can handle it</i>'
+		gs 'pain', rand(2,4), 'tongue', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] > 25:
+		'<i>Yeeees, it feels great!</i>'
+
+		'"Ow, Betsi I see you are pretty open for the new feelings"'
+		gs 'pain', rand(0,2), 'tongue', 'freeze'
+		gs 'stat'
+		if bdsmurok < 12: bdsmurok = 12
+	elseif stat['BDSM'] <= 10:
+		'<i><b>AAAAAAAAAAAAAA sharp pain! Tongue hurts!</b></i>'
+		gs 'pain', rand(4,7), 'tongue', 'freeze'
+		gs 'stat'
+	end
+
+	pin1 = 2
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tongue/tongue2.jpg"></center>'
+
+	vurok += rand(0,1)
+
+	if bdsmurok >= 13 and bdsmurok <= 16:
+		cla
+
+		act 'AAA, I take off all the pins!':
+			*clr & cla
+			pin1 = 0
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'wait':
+			*clr & cla
+			ztemp = 4001
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'p1'
+		end
+	elseif bdsmurok > 16 and bdsmurok <=23:
+		cla
+
+		act 'AAA, I take off all the pins!':
+			*clr & cla
+			pin1 = 0
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'wait':
+			*clr & cla
+			ztemp = 4001
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'p2'
+		end
+	elseif bdsmurok > 23:
+		cla
+
+		act 'AAA, I take off all the pins!':
+			*clr & cla
+			pin1 = 0
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'wait':
+			*clr & cla
+			ztemp = 4001
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'p2'
+		end
+
+
+
+	else
+		'"Nice, Betsi, it''s enought for the lesson."'
+
+		pcs_mood += rand(0,20)
+		gs 'stat'
+
+		'"Betsi sit here..."'
+
+		ztemp = rand(1,2)
+		act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+	end
+end
+
+if $ARGS[0] = 't1':
+	*clr & cla
+
+	'and takes a pin from his pocket... He pets me like a dog few times then gently takes my nipple and twists it slowly...'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/start.jpg"></center>'
+	'...and pins it with the pin!'
+	pin2 = 1
+
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/tits/start.mp4"></video></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/tits/1 ('+rand(1,2)+').jpg"></center>'
+
+	act 'AAA, I take off the pin!':
+		*clr & cla
+		pin2 = 0
+		pin1 = 0
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,1)
+	if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+		'<i>I had some BDSM experience... nipple hurts, but I can handle it</i>'
+		gs 'pain', rand(1,2), 'nipples', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] > 25:
+		'<i>Yeeees, it feels great!</i>'
+
+		'"Ow, Betsi I see you are pretty open for the new feelings"'
+		gs 'pain', rand(0,1), 'nipples', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] <= 10:
+		'<i><b>AAAAAAAAAAAAAA sharp pain! nipple hurts!</b></i>'
+		gs 'pain', rand(2,4), 'nipples', 'pinch'
+		gs 'stat'
+	end
+
+	act 'wait':
+		*clr & cla
+		ztemp = 1004
+		gt 'mod_public_WC_rab_Mayster5_shipka', 't2'
+	end
+end
+
+if $ARGS[0] = 't2':
+	*clr & cla
+	if ztemp = 1004:
+		'Vania gently grab other breast, cares a nipple a little ...'
+		'... and pins it too!'
+		ztemp = 0
+	else
+		'Vania gently grab breast, stretches both nipples a little ...'
+		'... and pins them!'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/start.jpg"></center>'
+	end
+	pin2 = 2
+
+	bdsmurok += 1
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,1)
+	if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+		'<i>I had some BDSM experience... nipples hurts, but I can handle it</i>'
+		gs 'pain', rand(2,4), 'nipples', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] > 25:
+		'<i>Yeeees, it feels great!</i>'
+
+		'"Ow, Betsi I see you are pretty open for the new feelings"'
+		gs 'pain', rand(0,2), 'nipples', 'pinch'
+		gs 'stat'
+
+	elseif stat['BDSM'] <= 10:
+		'<i><b>AAAAAAAAAAAAAA sharp pain! nipples hurts!</b></i>'
+		gs 'pain', rand(4,7), 'nipples', 'pinch'
+		gs 'stat'
+	end
+
+	if rand (1,3) > 1:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/tits/2v ('+rand(1,4)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/tits/2 ('+rand(1,16)+').jpg"></center>'
+	end
+
+	vurok += rand(0,1)
+
+
+
+	if bdsmurok >= 13 and bdsmurok <= 16:
+		cla
+
+		act 'AAA, I take off all the pins!':
+			*clr & cla
+			pin1 = 0
+			pin2 = 0
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'wait':
+			*clr & cla
+			ztemp = 4002
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'p1'
+		end
+
+
+	elseif bdsmurok > 16 and bdsmurok <=23:
+		cla
+
+		act 'AAA, I take off all the pins!':
+			*clr & cla
+			pin1 = 0
+			pin2 = 0
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		if rand (1,2) = 1:
+			act 'wait': gt 'mod_public_WC_rab_Mayster5_shipka', 't3'
+		else
+			act 'wait': gt 'mod_public_WC_rab_Mayster5_shipka', 'tya'
+		end
+	elseif bdsmurok > 23:
+		cla
+
+		act 'AAA, I take off all the pins!':
+			*clr & cla
+			pin1 = 0
+			pin2 = 0
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		ztemp = 4002
+		act 'wait': gt 'mod_public_WC_rab_Mayster5_shipka', 'ttrain'
+	else
+		'"Nice, Betsi, it''s enought for the lesson."'
+
+		pcs_mood += rand(0,20)
+		gs 'stat'
+
+		'"Betsi sit here..."'
+
+		ztemp = rand(1,2)
+		act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+	end
+end
+
+if $ARGS[0] = 'p1':
+	*clr & cla
+
+	'Vania takes one more pin from his pocket...'
+	temp = rand(1,3)
+	if temp = 1: '"Pain is not so bad, pain is different and pain is intresting"'
+	if temp = 2: '"If you feel the pain - you are alive and can feel pleasure too. You just need to combine it"'
+	if temp = 3: '"Just talk with your body"'
+
+	'Vania push me on my back, I can look only on that pin...'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/puss/start.jpg"></center>'
+
+	if ztemp = 4001:
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+			gs 'pain', rand(2,4), 'tongue', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			'<i>Yeeees, it feels great!</i>'
+
+
+			gs 'pain', rand(0,2), 'tongue', 'freeze'
+			gs 'stat'
+			if bdsmurok < 12: bdsmurok = 12
+		elseif stat['BDSM'] <= 10:
+
+			gs 'pain', rand(4,7), 'tongue', 'freeze'
+			gs 'stat'
+		end
+	elseif ztemp = 4002:
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+			gs 'pain', rand(2,4), 'nipples', 'pinch'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			'<i>Yeeees, it feels great!</i>'
+
+
+			gs 'pain', rand(0,2), 'nipples', 'pinch'
+			gs 'stat'
+
+		elseif stat['BDSM'] <= 10:
+
+			gs 'pain', rand(4,7), 'nipples', 'pinch'
+			gs 'stat'
+		end
+	end
+
+	act 'wait...':
+		*clr & cla
+		'Vania pins my clitoris!'
+		pin3 = 1
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/puss/1 ('+rand(1,2)+').jpg"></center>'
+
+		if ztemp = 4001:
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+				gs 'pain', rand(2,4), 'tongue', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				'<i>Yeeees, it feels great!</i>'
+
+
+				gs 'pain', rand(0,2), 'tongue', 'freeze'
+				gs 'stat'
+				if bdsmurok < 12: bdsmurok = 12
+			elseif stat['BDSM'] <= 10:
+
+				gs 'pain', rand(4,7), 'tongue', 'freeze'
+				gs 'stat'
+			end
+		elseif ztemp = 4002:
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+				gs 'pain', rand(2,4), 'nipples', 'pinch'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				'<i>Yeeees, it feels great!</i>'
+
+
+				gs 'pain', rand(0,2), 'nipples', 'pinch'
+				gs 'stat'
+
+			elseif stat['BDSM'] <= 10:
+
+				gs 'pain', rand(4,7), 'nipples', 'pinch'
+				gs 'stat'
+			end
+		end
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+			gs 'pain', rand(4,5), 'clitoris', 'pinch'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			'<i>Yeeees, it feels great!</i>'
+
+
+			gs 'pain', rand(1,4), 'clitoris', 'pinch'
+			gs 'stat'
+
+		elseif stat['BDSM'] <= 10:
+
+			gs 'pain', rand(5,6), 'clitoris', 'pinch'
+			gs 'stat'
+		end
+
+		vurok += 1
+		ztemp = 0
+
+		'"Nice, Betsi, it''s enought for the lesson."'
+
+		pcs_mood += rand(0,20)
+		gs 'stat'
+
+		'"Betsi sit here..."'
+
+		ztemp = rand(1,2)
+		act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+	end
+end
+
+if $ARGS[0] = 'p2':
+	*clr & cla
+	'Vania takes one more pin from his pocket...'
+	temp = rand(1,3)
+	if temp = 1: '"Pain is not so bad, pain is different and pain is intresting"'
+	if temp = 2: '"If you feel the pain - you are alive and can feel pleasure too. You just need to combine it"'
+	if temp = 3: '"Just talk with your body"'
+
+
+	if ztemp = 4001:
+		'Vania push me on my back, I can look only on that pin...'
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/puss/start.jpg"></center>'
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+			'<i>I had some BDSM experience... tongue hurts, but I can handle it</i>'
+			gs 'pain', rand(2,4), 'tongue', 'freeze'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			'<i>Yeeees, it feels great!</i>'
+
+			'"Ow, Betsi I see you are pretty open for the new feelings"'
+			gs 'pain', rand(0,2), 'tongue', 'freeze'
+			gs 'stat'
+			if bdsmurok < 12: bdsmurok = 12
+		elseif stat['BDSM'] <= 10:
+			'<i><b>AAAAAAAAAAAAAA sharp pain! Tongue hurts!</b></i>'
+			gs 'pain', rand(4,7), 'tongue', 'freeze'
+			gs 'stat'
+		end
+	end
+
+
+	act 'wait...':
+		*clr & cla
+		'Vania pins my clitoris!'
+		pin3 = 2
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/puss/1 ('+rand(1,2)+').jpg"></center>'
+
+		'with no pause Vania takes another pin and add it to previous one!'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/puss/2.jpg"></center>'
+
+
+		if ztemp = 4001:
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+				gs 'pain', rand(2,4), 'tongue', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				'<i>Yeeees, it feels great!</i>'
+
+
+				gs 'pain', rand(0,2), 'tongue', 'freeze'
+				gs 'stat'
+				if bdsmurok < 12: bdsmurok = 12
+			elseif stat['BDSM'] <= 10:
+
+				gs 'pain', rand(4,7), 'tongue', 'freeze'
+				gs 'stat'
+			end
+		elseif ztemp = 4002:
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+				gs 'pain', rand(2,4), 'nipples', 'pinch'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				'<i>Yeeees, it feels great!</i>'
+
+
+				gs 'pain', rand(0,2), 'nipples', 'pinch'
+				gs 'stat'
+
+			elseif stat['BDSM'] <= 10:
+
+				gs 'pain', rand(4,7), 'nipples', 'pinch'
+				gs 'stat'
+			end
+		end
+
+		if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+
+			gs 'pain', rand(6,7), 'clitoris', 'pinch'
+			gs 'stat'
+		elseif stat['BDSM'] > 25:
+			'<i>Yeeees, it feels great!</i>'
+
+
+			gs 'pain', rand(3,5), 'clitoris', 'pinch'
+			gs 'stat'
+
+		elseif stat['BDSM'] <= 10:
+
+			gs 'pain', rand(7,8), 'clitoris', 'pinch'
+			gs 'stat'
+		end
+
+		vurok += 1
+		ztemp = 0
+
+		'While I do my best to feel the pain as a good thing, I see Vania took something from his bookcase and turn back to me'
+
+
+		act 'Try to explore the pain': gt 'mod_public_WC_rab_Mayster5', 'tied'
+
+		if bdsmurok >= 24:
+			cla
+			act 'Try to explore the pain': gt 'mod_public_WC_rab_Mayster5_shipka', 'p3'
+		end
+	end
+end
+
+if $ARGS[0] = 'p3':
+	*clr & cla
+	'Vania takes few more pins from his pocket...'
+	'he strats to pin them to my pussy one by one'
+	pin3 = rand(4,7)
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/puss/many.jpg"></center>'
+
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,2)
+	if stat['BDSM'] <= 75 and stat['BDSM'] > 50:
+		'<i>I had some BDSM experience... pussy and tongue hurt, but I can handle it</i>'
+		gs 'pain', rand(6,7), 'clitoris', 'pinch'
+		gs 'stat'
+		gs 'pain', rand(2,4), 'tongue', 'freeze'
+		gs 'stat'
+
+		'I see Vania took something from his bookcase and turn back to me'
+
+		if bdsmurok >= 27:
+			act 'Try to explore the pain': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+		else
+			act 'Try to explore the pain': gt 'mod_public_WC_rab_Mayster5', 'tied'
+		end
+	elseif stat['BDSM'] > 75:
+		'<i>Yeeees, it feels great!!!</i>'
+
+		$orgasm_or = 'custom'
+		$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+		gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+		gs 'stat'
+
+		gs 'pain', rand(7,8), 'clitoris', 'pinch'
+		gs 'stat'
+		gs 'pain', rand(4,7), 'tongue', 'freeze'
+		gs 'stat'
+
+		'I see Vania took something from his bookcase and turn back to me'
+		if bdsmurok >= 27:
+			act 'aaaaahhh, sooo good': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+		else
+			act 'aaaaahhh, sooo good': gt 'mod_public_WC_rab_Mayster5', 'tied'
+		end
+
+	elseif stat['BDSM'] <= rand (30,50):
+		cla
+		'<i><b>AAAAAAAAAAAAAA PAIN! I can''t handle it more!</b></i>'
+		gs 'pain', rand(6,8), 'nipples', 'pinch'
+		gs 'stat'
+		gs 'pain', rand(3,5), 'tongue', 'freeze'
+		gs 'stat'
+
+		'AAA, I take off all the pins!'
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi, you just need to do what I said!'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+end
+
+if $ARGS[0] = 'tya':
+	*clr & cla
+
+	if pierc > 0: 'Vania removes the pircing from my tits'
+	'Vania gently grab breast, stretches both nipples a little ...'
+	'... and pins them!'
+	'He add more and nore pins on my tits!'
+
+	pin2 = 6
+
+
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,1)
+	if stat['BDSM'] <= 55 and stat['BDSM'] > 40:
+		'<i>I had some BDSM experience... nipples hurts, but I can handle it</i>'
+		gs 'pain', rand(4,5), 'nipples', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] > 55:
+		'<i>Yeeees, it feels great!</i>'
+
+		'"Ow, Betsi I see you are pretty open for the new feelings"'
+		gs 'pain', rand(1,3), 'nipples', 'pinch'
+		gs 'stat'
+
+	elseif stat['BDSM'] <= 40:
+		'<i><b>AAAAAAAAAAAAAA sharp pain! nipples hurts!</b></i>'
+		gs 'pain', rand(6,8), 'nipples', 'pinch'
+		gs 'stat'
+	end
+
+
+	if rand (1,3) = 1:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/2/2v.mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/2/2 ('+rand(1,2)+').jpg"></center>'
+	end
+
+
+
+
+	act 'AAA, I take off all the pins!':
+		*clr & cla
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+
+
+
+	if stat['BDSM'] <= 45 and stat['BDSM'] > 30:
+
+		gs 'pain', rand(1,3), 'tongue', 'freeze'
+		gs 'stat'
+
+
+		act 'try to explore the pain!':
+			*clr & cla
+			ztemp = 4002
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'tyap'
+		end
+
+
+
+	elseif stat['BDSM'] > 45:
+		'<i>Yeeees, it feels great!</i>'
+
+
+		gs 'pain', rand(0,1), 'tongue', 'freeze'
+		gs 'stat'
+
+		act 'Find pleasure in the pain':
+			*clr & cla
+			ztemp = 4002
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'tyap'
+		end
+
+	elseif stat['BDSM'] <= 30:
+
+		gs 'pain', rand(3,5), 'tongue', 'freeze'
+		gs 'stat'
+
+		act 'try to ignore the pain!':
+			*clr & cla
+			ztemp = 4002
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'tyap'
+		end
+	end
+end
+
+if $ARGS[0] = 'tyap':
+	*clr & cla
+
+	'"Aaaand the last one" - from the pain wall i hear Vania voice'
+
+	'Vania pins my clitoris...'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/2/3.jpg"></center>'
+
+	if stat['BDSM'] <= 85 and stat['BDSM'] > 70:
+		gs 'pain', rand(4,5), 'clitoris', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] > 85:
+		gs 'pain', rand(1,4), 'clitoris', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] <= 70:
+		gs 'pain', rand(5,6), 'clitoris', 'pinch'
+		gs 'stat'
+	end
+
+	pin3 = 1
+
+	act 'AAA, I take off all the pins!':
+		*clr & cla
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	minut += rand(5,10)
+	stat['BDSM'] += rand(0,2)
+	if stat['BDSM'] <= 75 and stat['BDSM'] > 50:
+		'<i>I had some BDSM experience... nipples and tongue hurt, but I can handle it</i>'
+		gs 'pain', rand(4,5), 'nipples', 'pinch'
+		gs 'stat'
+		gs 'pain', rand(1,3), 'tongue', 'freeze'
+		gs 'stat'
+
+		'I see Vania took something from his bookcase and turn back to me'
+		act 'Try to explore the pain': gt 'mod_public_WC_rab_Mayster5', 'tied'
+
+	elseif stat['BDSM'] > 75:
+		'<i>Yeeees, it feels great!!!</i>'
+
+		$orgasm_or = 'custom'
+		$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+		gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+		gs 'stat'
+
+		gs 'pain', rand(1,3), 'nipples', 'pinch'
+		gs 'stat'
+		gs 'pain', rand(0,1), 'tongue', 'freeze'
+		gs 'stat'
+
+		'I see Vania took something from his bookcase and turn back to me'
+		act 'aaaaahhh, sooo good': gt 'mod_public_WC_rab_Mayster5', 'tied'
+
+	elseif stat['BDSM'] <= rand (30,50):
+		cla
+		'<i><b>AAAAAAAAAAAAAA PAIN! I can''t handle it more!</b></i>'
+		gs 'pain', rand(6,8), 'nipples', 'pinch'
+		gs 'stat'
+		gs 'pain', rand(3,5), 'tongue', 'freeze'
+		gs 'stat'
+
+		'AAA, I take off all the pins!'
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi, you just need to do what I said!'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+end
+
+if $ARGS[0] = 't3':
+	*clr & cla
+	'Vania poured a lot of pins in front of me!..'
+	'...and starts one by one pin it to my tits!'
+
+	act 'AAA, I take off all the pins!':
+		*clr & cla
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	pin2 = rand(6,12)
+	minut += rand(10,15)
+
+	if stat['BDSM'] <= 45 and stat['BDSM'] > 30:
+		'I see Vania took something from his bookcase and turn back to me'
+		act 'Try to explore the pain': gt 'mod_public_WC_rab_Mayster5', 'tied'
+		gs 'pain', rand(4,6), 'nipples', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] > 45:
+		'<i>Yeeees, it feels great!!!</i>'
+		$orgasm_or = 'custom'
+		$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+		gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+		gs 'stat'
+		'I see Vania took something from his bookcase and turn back to me'
+		act 'aaaaahhh, sooo good': gt 'mod_public_WC_rab_Mayster5', 'tied'
+		gs 'pain', rand(0,3), 'nipples', 'pinch'
+		gs 'stat'
+	elseif stat['BDSM'] <= rand (20,30):
+		cla
+		'<i><b>AAAAAAAAAAAAAA PAIN! I can''t handle it more!</b></i>'
+		'AAA, I take off all the pins!'
+		pin1 = 0
+		pin2 = 0
+		pin3 = 0
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi, you just need to do what I said!'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		gs 'pain', rand(6,7), 'nipples', 'pinch'
+		gs 'stat'
+	end
+
+	if rand (1,2) > 1:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/tits/manyv.mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/tits/many.jpg"></center>'
+	end
+end
+
+
+
+if $ARGS[0] = 'ttrain':
+	*clr & cla
+	'Vania fixes pins harder on my nipples'
+	'than he uses a chain to connects two pins from differrent breasts'
+
+	if turok = 0:
+		'This is a top level train, Betsi. It could be hard, but after this your tits will be ready for any mater''s requirment. And you will ready to make happy master with any desires.'
+	end
+
+	if turok <= 3:
+		temp = rand(1,1)
+		if temp = 1:
+			'Vania grabs the chain and pulls it up...'
+
+			'I stood on tiptoe by he is pulling higher and higher...'
+
+			if rand (1,2) > 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_trainv ('+rand(1,3)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_train ('+rand(1,3)+').jpg"></center>'
+			end
+
+			act 'Try to explore the pain':
+				cla
+				'Vania releases the chain and pain go away...'
+				'<i>I feel nothing, there is no pain in the nipples, I feel no pins...just heat</i>'
+				stat['BDSM'] += rand(1,3)
+				gs 'stat'
+
+				if rand (1,2) > 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_trainv ('+rand(1,3)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_train ('+rand(1,3)+').jpg"></center>'
+				end
+
+				'I see Vania took something from his bookcase and turn back to me'
+				'"Betsi, I am impressed, each day you are closer to the perfect woman."'
+				pcs_mood += rand(20,40)
+				gs 'stat'
+				turok += 1
+				act 'wait...': gt 'mod_public_WC_rab_Mayster5', 'tied'
+			end
+
+			minut += rand(10,20)
+			if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+				'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+				gs 'pain', rand(5,8), 'nipples', 'pinch'
+				gs 'stat'
+			elseif stat['BDSM'] > 99:
+				'<i>Yeeees, it feels great!!!</i>'
+				$orgasm_or = 'custom'
+				$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+				gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+				gs 'stat'
+				gs 'pain', rand(0,5), 'nipples', 'pinch'
+				gs 'stat'
+			elseif stat['BDSM'] <= rand (39,69):
+				cla
+				'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+				'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+				'AAA, I take off all the pins!'
+				pin1 = 0
+				pin2 = 0
+				pin3 = 0
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi, you just need to do what I said!'
+				act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+				gs 'pain', rand(6,9), 'nipples', 'pinch'
+				gs 'stat'
+			end
+		end
+	elseif turok <= 5:
+		temp = rand(1,1)
+		if temp = 1:
+			'Vania grabs the chain and pulls it up...'
+
+			'I stood on tiptoe by he is pulling higher and higher...'
+
+			if rand (1,2) > 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_trainv ('+rand(1,3)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_train ('+rand(1,3)+').jpg"></center>'
+			end
+
+			act 'Try to explore the pain':
+				cla
+				'Vania releases the chain and pain go away...'
+				'<i>I feel nothing, there is no pain in the nipples, I feel no pins...just heat</i>'
+				stat['BDSM'] += rand(1,3)
+				gs 'stat'
+
+				if rand (1,2) > 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_trainv ('+rand(1,3)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vania_train ('+rand(1,3)+').jpg"></center>'
+				end
+
+				'"Betsi, now you must do the train by your own."'
+				'"You need to train, and I don''t want to hear any refuses"'
+				'"You can help yourself with hand, leg or mouth, it''s up to you."'
+
+
+				act 'I don''t want it! I take off all the pins!':
+					*clr & cla
+					pin1 = 0
+					pin2 = 0
+					pin3 = 0
+					willpowermax += 2
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi.'
+					act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+				end
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+				end
+
+				if stat['BDSM'] >= 85:
+					act 'help myself with hand':
+						*clr & cla
+						perfecttits = 1
+						turok += 1
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/selfv_hand.mp4"></video></center>'
+
+						'"Perfect!!! Betsi, it''s enought for the lesson."'
+						Vlove += 1
+
+						pcs_mood += rand(10,30)
+						gs 'stat'
+
+						act 'wait': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+						VaniaMayster += 1
+						minut += rand(10,20)
+						stat['BDSM'] += rand(1,2)
+						if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+							'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+							gs 'pain', rand(5,8), 'nipples', 'pinch'
+							gs 'stat'
+						elseif stat['BDSM'] > 99:
+							'<i>Yeeees, it feels great!!!</i>'
+							$orgasm_or = 'custom'
+							$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+							gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+							gs 'stat'
+							gs 'pain', rand(0,5), 'nipples', 'pinch'
+							gs 'stat'
+						elseif stat['BDSM'] <= rand (39,69):
+							cla
+							'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+							'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+							'AAA, I take off all the pins!'
+							pin1 = 0
+							pin2 = 0
+							pin3 = 0
+							VaniaMayster -= 3
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+							'I tierd of this shit, Betsi, you just need to do what I said!'
+							act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+							gs 'pain', rand(6,9), 'nipples', 'pinch'
+							gs 'stat'
+						end
+					end
+
+					act 'help myself with leg':
+						*clr & cla
+						perfecttits = 1
+						turok += 1
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/self_leg.jpg"></center>'
+
+						'"Perfect!!! Betsi, it''s enought for the lesson."'
+						Vlove += 1
+
+						pcs_mood += rand(10,30)
+						gs 'stat'
+
+						act 'wait': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+						VaniaMayster += 1
+						minut += rand(10,20)
+						stat['BDSM'] += rand(1,2)
+						if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+							'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+							gs 'pain', rand(5,8), 'nipples', 'pinch'
+							gs 'stat'
+						elseif stat['BDSM'] > 99:
+							'<i>Yeeees, it feels great!!!</i>'
+							$orgasm_or = 'custom'
+							$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+							gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+							gs 'stat'
+							gs 'pain', rand(0,5), 'nipples', 'pinch'
+							gs 'stat'
+						elseif stat['BDSM'] <= rand (39,69):
+							cla
+							'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+							'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+							'AAA, I take off all the pins!'
+							pin1 = 0
+							pin2 = 0
+							pin3 = 0
+							VaniaMayster -= 3
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+							'I tierd of this shit, Betsi, you just need to do what I said!'
+							act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+							gs 'pain', rand(6,9), 'nipples', 'pinch'
+							gs 'stat'
+						end
+					end
+
+					act 'help myself with mouth':
+						*clr & cla
+						perfecttits = 1
+						turok += 1
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/self_leg.jpg"></center>'
+
+
+
+						if rand (1,3) > 2:
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/selfv.mp4"></video></center>'
+						else
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/self ('+rand(1,2)+').jpg"></center>'
+						end
+
+
+
+						'"Perfect!!! Betsi, it''s enought for the lesson."'
+						Vlove += 1
+
+						pcs_mood += rand(10,30)
+						gs 'stat'
+
+						act 'wait': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+						VaniaMayster += 1
+						minut += rand(10,20)
+						stat['BDSM'] += rand(1,2)
+						if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+							'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+							gs 'pain', rand(5,8), 'nipples', 'pinch'
+							gs 'stat'
+						elseif stat['BDSM'] > 99:
+							'<i>Yeeees, it feels great!!!</i>'
+							$orgasm_or = 'custom'
+							$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+							gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+							gs 'stat'
+							gs 'pain', rand(0,5), 'nipples', 'pinch'
+							gs 'stat'
+						elseif stat['BDSM'] <= rand (39,69):
+							cla
+							'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+							'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+							'AAA, I take off all the pins!'
+							pin1 = 0
+							pin2 = 0
+							pin3 = 0
+							VaniaMayster -= 3
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+							'I tierd of this shit, Betsi, you just need to do what I said!'
+							act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+							gs 'pain', rand(6,9), 'nipples', 'pinch'
+							gs 'stat'
+						end
+					end
+				else
+					temp = stat['BDSM']
+					act 'train myself  (<font color="red"><<temp>> BDSM expirience</font>)': '<br><font color="red">I don''t have enough BDSM expirience to use this action.</font>'
+
+				end
+			end
+
+			minut += rand(10,20)
+			if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+				'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+				gs 'pain', rand(5,8), 'nipples', 'pinch'
+				gs 'stat'
+			elseif stat['BDSM'] > 99:
+				'<i>Yeeees, it feels great!!!</i>'
+				$orgasm_or = 'custom'
+				$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+				gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+				gs 'stat'
+				gs 'pain', rand(0,5), 'nipples', 'pinch'
+				gs 'stat'
+			elseif stat['BDSM'] <= rand (39,69):
+				cla
+				'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+				'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+				'AAA, I take off all the pins!'
+				pin1 = 0
+				pin2 = 0
+				pin3 = 0
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi, you just need to do what I said!'
+				act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+				gs 'pain', rand(6,9), 'nipples', 'pinch'
+				gs 'stat'
+			end
+		end
+	else
+		temp = rand(1,2)
+		if bdsmurok >= 27: temp = 1
+
+		if temp = 1:
+			'"Betsi, now you must do the train by your own."'
+			'"You need to train, and I don''t want to hear any refuses"'
+			'"You can train yourself with hand, leg or mouth, it''s up to you."'
+
+
+			act 'I don''t want it! I take off all the pins!':
+				*clr & cla
+				pin1 = 0
+				pin2 = 0
+				pin3 = 0
+				willpowermax += 2
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+			if stat['BDSM'] >= 85:
+				act 'train myself with hand':
+					*clr & cla
+					perfecttits = 1
+					turok += 1
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/selfv_hand.mp4"></video></center>'
+
+					'"Perfect!!! Betsi, it''s enought for the lesson."'
+					Vlove += 1
+
+					pcs_mood += rand(10,30)
+					gs 'stat'
+
+					if bdsmurok >= 27:
+						act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+					else
+						act 'wait': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+					VaniaMayster += 1
+					minut += rand(10,20)
+					stat['BDSM'] += rand(1,2)
+					if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+						'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+						gs 'pain', rand(5,8), 'nipples', 'pinch'
+						gs 'stat'
+					elseif stat['BDSM'] > 99:
+						'<i>Yeeees, it feels great!!!</i>'
+						$orgasm_or = 'custom'
+						$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+						gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+						gs 'stat'
+						gs 'pain', rand(0,5), 'nipples', 'pinch'
+						gs 'stat'
+					elseif stat['BDSM'] <= rand (39,69):
+						cla
+						'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+						'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+						'AAA, I take off all the pins!'
+						pin1 = 0
+						pin2 = 0
+						pin3 = 0
+						VaniaMayster -= 3
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+						'I tierd of this shit, Betsi, you just need to do what I said!'
+						act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+						gs 'pain', rand(6,9), 'nipples', 'pinch'
+						gs 'stat'
+					end
+				end
+
+				act 'train myself with leg':
+					*clr & cla
+					perfecttits = 1
+					turok += 1
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/self_leg.jpg"></center>'
+
+					'"Perfect!!! Betsi, it''s enought for the lesson."'
+					Vlove += 1
+
+					pcs_mood += rand(10,30)
+					gs 'stat'
+
+					if bdsmurok >= 27:
+						act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+					else
+						act 'wait': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+
+					VaniaMayster += 1
+					minut += rand(10,20)
+					stat['BDSM'] += rand(1,2)
+					if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+						'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+						gs 'pain', rand(5,8), 'nipples', 'pinch'
+						gs 'stat'
+					elseif stat['BDSM'] > 99:
+						'<i>Yeeees, it feels great!!!</i>'
+						$orgasm_or = 'custom'
+						$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+						gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+						gs 'stat'
+						gs 'pain', rand(0,5), 'nipples', 'pinch'
+						gs 'stat'
+					elseif stat['BDSM'] <= rand (39,69):
+						cla
+						'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+						'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+						'AAA, I take off all the pins!'
+						pin1 = 0
+						pin2 = 0
+						pin3 = 0
+						VaniaMayster -= 3
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+						'I tierd of this shit, Betsi, you just need to do what I said!'
+						act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+						gs 'pain', rand(6,9), 'nipples', 'pinch'
+						gs 'stat'
+					end
+				end
+
+				act 'train myself with mouth':
+					*clr & cla
+					perfecttits = 1
+					turok += 1
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/self_leg.jpg"></center>'
+
+
+
+					if rand (1,3) > 2:
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/selfv.mp4"></video></center>'
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/self ('+rand(1,2)+').jpg"></center>'
+					end
+
+
+
+					'"Perfect!!! Betsi, it''s enought for the lesson."'
+					Vlove += 1
+
+					pcs_mood += rand(10,30)
+					gs 'stat'
+
+					if bdsmurok >= 27:
+						act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+					else
+						act 'wait': ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+
+					VaniaMayster += 1
+					minut += rand(10,20)
+					stat['BDSM'] += rand(1,2)
+					if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+						'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+
+						gs 'pain', rand(5,8), 'nipples', 'pinch'
+						gs 'stat'
+					elseif stat['BDSM'] > 99:
+						'<i>Yeeees, it feels great!!!</i>'
+						$orgasm_or = 'custom'
+						$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+						gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+						gs 'stat'
+						gs 'pain', rand(0,5), 'nipples', 'pinch'
+						gs 'stat'
+					elseif stat['BDSM'] <= rand (39,69):
+						cla
+						'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+						'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+						'AAA, I take off all the pins!'
+						pin1 = 0
+						pin2 = 0
+						pin3 = 0
+						VaniaMayster -= 3
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+						'I tierd of this shit, Betsi, you just need to do what I said!'
+						act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+						gs 'pain', rand(6,9), 'nipples', 'pinch'
+						gs 'stat'
+					end
+				end
+			else
+				temp = stat['BDSM']
+				act 'train myself  (<font color="red"><<temp>> BDSM expirience</font>)': '<br><font color="red">I don''t have enough BDSM expirience to use this action.</font>'
+
+			end
+		elseif temp = 2:
+			*clr & cla
+			'Vania fixes pins harder on my nipples...'
+			'than he locked 2 chains: one per each tit'
+			'than he fixes some weight to the end of each chain...'
+
+			ztemp = rand(1,2)
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vaga (<<ztemp>>).jpg"></center>'
+
+			'"Nice pet, let''s go for a walk"'
+
+			act 'I don''t want it! I take off all the pins!':
+				*clr & cla
+				pin1 = 0
+				pin2 = 0
+				pin3 = 0
+				willpowermax += 2
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+
+			act 'go for a walk':
+				*clr & cla
+				minut += 30
+				gs 'stat'
+
+				'<i>It''s so humiliating, I go with Vania like a pet...</i>'
+				'<i>With each step my breasts drag to the bottom!</i>'
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/shipka/tits/train/vaga (<<ztemp>>).jpg"></center>'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/gonaked ('+rand(1,5)+').jpg"></center>'
+
+				wait 1000
+
+
+
+				minut += rand(10,20)
+				stat['BDSM'] += rand(1,2)
+				if stat['BDSM'] <= 99 and stat['BDSM'] > 69:
+					'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+					'We walk like half an hour and vania happly said'
+					'"Perfect!!! Betsi, it''s enought for the lesson, let''s go back"'
+					Vlove += 1
+
+					pcs_mood += rand(10,30)
+					gs 'stat'
+
+					act 'go back': turok += 1 & ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+
+					VaniaMayster += 1
+					gs 'pain', rand(5,8), 'nipples', 'pinch'
+					gs 'stat'
+				elseif stat['BDSM'] > 99:
+					'<i>Yeeees, it feels great!!!</i>'
+					$orgasm_or = 'custom'
+					$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+					'We walk like half an hour and vania happly said'
+					'"Perfect!!! Betsi, it''s enought for the lesson, let''s go back"'
+					Vlove += 1
+
+					pcs_mood += rand(10,30)
+					gs 'stat'
+
+					act 'go back': turok += 1 & ztemp = rand(1,2) & gt 'mod_public_WC_rab_Mayster', 'end'
+
+					VaniaMayster += 1
+					gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+					gs 'stat'
+					gs 'pain', rand(0,5), 'nipples', 'pinch'
+					gs 'stat'
+				elseif stat['BDSM'] <= rand (39,69):
+					cla
+					'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+					'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+					'AAA, I take off all the pins!'
+					pin1 = 0
+					pin2 = 0
+					pin3 = 0
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi, you just need to do what I said!'
+					act 'continue': turok -= 1 & gt 'mod_public_WC_rab_Mayster5', 'kara'
+					gs 'pain', rand(6,9), 'nipples', 'pinch'
+					gs 'stat'
+				end
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster5_shipka ---------------------------------

locations/mod_public_WC_rab_Mayster6.qsrc

@@ -0,0 +1,2266 @@
+# mod_public_WC_rab_Mayster6
+if $ARGS[0] = 'start':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'"You never know what your master like"'
+	'"But anyway the good girl is needed to be good in this!"'
+	'"That is why you need this train."'
+	Vania = 0
+	Artem = 0
+	Tolik = 0
+
+	if bm_hren_setup ! 1: bm_hren_setup = 1 & gs 'mod_public_WC_rab_Mayster6', 'hren_setup'
+	if bm_Razvratnik_setup ! 1: bm_Razvratnik_setup = 1 & gs 'mod_public_WC_rab_Mayster6', 'Razvratnik_setup'
+
+	ztemp = 0
+	ytemp = hour
+
+	if $clothingworntype ! 'nude': '"Undress..."'
+	'"At first, and wear this collar only"'
+
+	act 'No':
+		*clr & cla
+		willpowermax += rand(1,2)
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'Agree':
+		*clr & cla
+		'"I have friends: Hren and Razvratnik, they will help us."'
+		willpowermax -= rand(1,2)
+		VaniaMayster += 5
+
+		minut += 5
+		$lastwornclothingtype['swim'] = $clothingworntype
+		lastwornclothingnumber['swim'] = clothingwornnumber
+		$lastwornpantytype['swim'] = $pantyworntype
+		lastwornpantynumber['swim'] = pantywornnumber
+		$lastwornbratype['swim'] = $braworntype
+		lastwornbranumber['swim'] = brawornnumber
+		gs 'clothing', 'strip_all', 'VillageRiver'
+
+		gs 'stat'
+
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/selfcollar.mp4"></video></center>'
+		'"Who you want to play with?"'
+
+		act 'Hren':
+			gt 'mod_public_WC_rab_Mayster6', 'h'
+		end
+
+		act 'Razvratnik':
+			*clr & cla
+			gt 'mod_public_WC_rab_Mayster6', 'd'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'h':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+
+	'I walk with Vania to the street, where the Horse stands'
+	'"Play with Hren, I''ll come here soon"'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/Hren.jpg"></center>'
+
+	act 'pet Hren':
+		*clr & cla
+		npc_QW['A231'] += 1
+		minut += 15
+		pcs_mood += rand(1,3)
+		gs 'stat'
+		'I pet the Hren for some time, it seems he likes it'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/meandhren ('+rand(1,4)+').jpg"></center>'
+		act 'continue': gt 'mod_public_WC_rab_Mayster6', 'h'
+	end
+
+	act 'ride Hren':
+		if npc_QW['A231'] <= 30:
+			*clr & cla
+			'When I try to mounted it, it gives me no chance to do it and tries to bite me'
+			ztemp += rand(0,1)
+			minut += 5
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/Hren.jpg"></center>'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'h'
+			if ztemp >= 5:
+				*clr
+				'It bites me!'
+				npc_QW['A231'] -= 1
+
+				pcs_mood -= rand(10,30)
+
+				if npc_QW['A231'] < 0: npc_QW['A231'] = 0
+
+				if rand(1,2) = 1:
+					gs 'pain', rand(2,3), 'armL', 'bite'
+				else
+					gs 'pain', rand(2,3), 'armR', 'bite'
+				end
+				gs 'stat'
+				act 'continue': gt 'mod_public_WC_rab_Mayster6', 'h'
+			end
+		else
+			*clr & cla
+			'I spend some time riding  Hren'
+			npc_QW['A231'] += rand(1,2)
+			minut += rand(20,40)
+			gs 'stat'
+			pcs_mood += rand(10,30)
+
+			if month > 4 and month < 10:
+				if rand(1,2) = 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/h/ridehorse.mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/verhy ('+rand(1,3)+').jpg"></center>'
+				end
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/verhyz (1).jpg"></center>'
+			end
+
+			if npc_QW['A231'] >= 65:
+				act 'ride away on Hren':
+					*clr & cla
+					'Hren is very quick and he runs me somewhere into the forest'
+					'I think I recognise this forest...'
+					'In some time Hren stops.'
+					'I get out from Hren'
+					'We are lookng at each other for few minuts... Than Hren nods and runs away'
+					pcs_mood += rand(10,30)
+
+					minut = rand(20,40)
+					if month > 4 and month < 10:
+						if rand(1,2) = 1:
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/h/ridehorse.mp4"></video></center>'
+						else
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/verhy ('+rand(1,3)+').jpg"></center>'
+						end
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/verhyz (1).jpg"></center>'
+					end
+
+					vtecha = 1
+					Artem = 0 & Tolik = 0 & Vania = 0
+					brak += 10
+					gs 'stat'
+					act 'look around': gt 'gadforestlost',  'forest_center'
+				end
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t ride away</i>'
+				end
+			end
+
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'h'
+		end
+	end
+
+	act 'wait (00:30)':
+		minut += 30
+		gs 'stat'
+		gt 'mod_public_WC_rab_Mayster6', 'h'
+	end
+
+	if temper >= 20:
+		act 'wash Hren':
+			*clr & cla
+			minut += rand(10,15)
+			npc_QW['A231'] += rand(1,2)
+			'I wash the Hren, it seems he likes it'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/wash/wash (1).jpg"></center>'
+			pcs_mood += rand(1,3)
+
+			act 'wash myself too':
+				*clr & cla
+				minut += rand(5,10)
+				pcs_mood += rand(10,15)
+				pcs_sweat = 0
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' and '<br>My deodorant gets washed away.</br>'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/wash/washselftoo ('+rand(1,2)+').jpg"></center>'
+
+				act 'continue': gt 'mod_public_WC_rab_Mayster6', 'h'
+			end
+			gs 'stat'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'h'
+		end
+	end
+
+	if hour > ( ytemp + 2 ):
+		*clr & cla
+		killvar 'ytemp'
+		'Vania comes here'
+		'"Good you have such good time together"'
+		'"Let''s continue the training"'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/Hren.jpg"></center>'
+		act 'No':
+			*clr & cla
+			willpowermax += rand(1,2)
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'Agree': gt 'mod_public_WC_rab_Mayster6', 'hpussy'
+	end
+end
+
+if $ARGS[0] = 'hpussy':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'"Betsi lie down... You need to be at least wet, it wood be easier for you"'
+
+	act 'No':
+		*clr & cla
+		willpowermax += rand(1,2)
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"I tierd of this shit, Betsi."'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'Agree':
+		*clr & cla
+		'Vania arouses me with some handle?'
+		gs 'arousal', 'vaginal_vibe', rand(10,20), 'sub', 'rough', 'humiliation'
+		gs 'stat'
+		'"Now you are ready..."'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/pussready.jpg"></center>'
+
+		act 'continue': gt 'mod_public_WC_rab_Mayster6', 'hsex'
+	end
+end
+
+if $ARGS[0] = 'hsex':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	Vurok += 1
+	sexpartkno = 1
+	gs 'boyStat', 'A231'
+	if npc_QW['A231'] <= 10:
+		gt 'mod_public_WC_rab_Mayster6', 'hbj'
+	elseif npc_QW['A231'] <= 30:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster6', 'hbj'
+		else
+			gt 'mod_public_WC_rab_Mayster6', 'hs'
+		end
+	else
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster6', 'hbj'
+		else
+			gt 'mod_public_WC_rab_Mayster6', 'hs'
+		end
+	end
+end
+
+if $ARGS[0] = 'hbj':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	gs 'boyStat', 'A231'
+	'"Betsi, now make this day even better for Hren. Blow him!"'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/Hren.jpg"></center>'
+
+	act 'No':
+		*clr & cla
+		willpowermax += rand(1,2)
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'Starts to suck it':
+		*clr & cla
+		npc_QW['A231'] += 2
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/h/bj/bj ('+rand(1,3)+').jpg"></center>'
+
+		HBJ+=1
+		gs 'stat'
+		gs 'arousal', 'bj', 10, 'sub', 'beast'
+		gs 'arousal', 'end'
+		if HBJ <= 9:
+			temp = 9 - HBJ
+			gs 'pain', rand(temp,9),'mouth', 'pierce'
+		else
+			gs 'pain', rand(1,4),'mouth', 'pierce'
+		end
+		pcs_stam -= 30
+		gs 'stat'
+		act 'Horse cums':
+			*clr & cla
+			gs 'boyStat', 'A231'
+			sexvolume = rand(100,250)
+
+
+			'Hren cums in my mouth, I do my best to swallow everything but it''s to much for me! Cums goes over my mouth to my face and on my tits.'
+
+			temp = rand(1,2)
+			if temp = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/h/cum/bj ('+rand(1,14)+').jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/h/cum/bjv.mp4"></video></center>'
+			end
+
+			spafinloc = 11
+			gs 'cum_manage'
+
+
+			spafinloc = 14
+			gs 'cum_manage'
+			spafinloc = 15
+			gs 'cum_manage'
+			spafinloc = 16
+			gs 'cum_manage'
+
+			gs 'stat'
+			gs 'arousal', 'hj', 5, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			gs 'boyStat', 'A231'
+			spafinloc = 12
+			sexvolume = rand(100,250)
+			gs 'cum_manage'
+			gs 'stat'
+			gs 'arousal', 'bj', 15, 'sub', 'beast'
+			gs 'arousal', 'end'
+			npc_horny['A231'] = 0
+			gs 'stat'
+
+			ztemp = rand(4,4)
+			'"Good, Betsi."'
+			'"The lesson is end."'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			'"Betsi sit here..."'
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+
+		if rand(1,4) = 1:
+			cla
+			'"Ok, Betsi, Razvratnik wants to join!"'
+			act 'Pleasure him too': gt 'mod_public_WC_rab_Mayster6', 'dh'
+		end
+
+	end
+end
+
+if $ARGS[0] = 'hs':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+
+	gs 'boyStat', 'A231'
+	if npc_QW['A231'] <= 30:
+		'"Betsi, now bend over! I will help Hren to fuck you for first few times, cuz you are not very god know each other."'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/Hren.jpg"></center>'
+
+		act 'No':
+			*clr & cla
+			willpowermax += rand(1,2)
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'bend over':
+			*clr & cla
+			npc_QW['A231'] += rand(2,4)
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/train/h/h_Vaniahelp (2).mp4"></video></center>'
+			gs 'arousal', 'foreplay', 15, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'stat'
+			pcs_vag += 4
+			stat['vaginal'] += 1
+			gs 'stat'
+
+			act 'lie down and make horse cum':
+				*clr & cla
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/h/cum/assv.mp4"></video></center>'
+				npc_horny['A231'] = 0
+				if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+				HVag+=1
+
+				if HVag <= 9:
+					temp = 9 - HVag
+					gs 'pain', rand(temp,9),'vaginal', 'pierce'
+				else
+					gs 'pain', rand(1,4),'vaginal', 'pierce'
+				end
+
+				pcs_stam -= 40
+
+				gs 'stat'
+				gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+				gs 'arousal', 'end'
+				gs 'stat'
+				pcs_vag += 4
+				gs 'boyStat', 'A231'
+				sexvolume = rand(100,250)
+				gs 'cum_manage'
+				gs 'stat'
+				gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				ztemp = rand(4,4)
+				'"Good, Betsi."'
+				'"The lesson is end."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+
+				'"Betsi sit here..."'
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+
+	else
+		'"Betsi, now make this day even better for Hren. Fuck him!"'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/h/Hren.jpg"></center>'
+
+		act 'No':
+			*clr & cla
+			willpowermax += rand(1,2)
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'bend over':
+			*clr & cla
+			npc_QW['A231'] += rand(2,4)
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/h/sex/sex ('+rand(1,2)+').mp4"></video></center>'
+			gs 'arousal', 'foreplay', 15, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'stat'
+			pcs_vag += 4
+			stat['vaginal'] += 1
+			gs 'stat'
+
+			act 'lie down and make horse cum':
+				*clr & cla
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/h/cum/assv.mp4"></video></center>'
+				npc_horny['A231'] = 0
+				if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+				HVag+=1
+
+				if HVag <= 9:
+					temp = 9 - HVag
+					gs 'pain', rand(temp,9),'vaginal', 'pierce'
+				else
+					gs 'pain', rand(1,4),'vaginal', 'pierce'
+				end
+
+				pcs_stam -= 40
+
+				gs 'stat'
+				gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+				gs 'arousal', 'end'
+				gs 'stat'
+				pcs_vag += 4
+				gs 'boyStat', 'A231'
+				gs 'boyStat', $npclastgenerated
+				sexvolume = rand(100,250)
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+				gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				ztemp = rand(4,4)
+				'"Good, Betsi."'
+				'"The lesson is end."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+
+				'"Betsi sit here..."'
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+
+			if rand(1,4) = 1:
+				cla
+				'"Ok, Betsi, I want to join!"'
+				act 'Pleasure Vania too': gt 'mod_public_WC_rab_Mayster6', 'vh'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'd':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	'I walk with Vania to the street, where the dog stands'
+	'"I want you to be a dog for the next few hours and get acquainted with Razvratnik."'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/mastif.jpg"></center>'
+
+	act 'No':
+		*clr & cla
+		willpowermax += rand(1,2)
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"I tierd of this shit, Betsi."'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'stand on my four and be like a dog':
+		bimbo += 5
+		willpowermax -= 3
+		VaniaMayster += 2
+		gs 'stat'
+		gt 'mod_public_WC_rab_Mayster6', 'd2'
+	end
+end
+
+if $ARGS[0] = 'd2':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/mastif.jpg"></center>'
+
+	act 'ask to play':
+		*clr & cla
+		bimbo += 2
+		willpowermax -= 1
+		VaniaMayster += 2
+		minut += 5
+		gs 'stat'
+
+		'Vania smiles widely and throws a ball witch he tooks frof his pants pocket'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/ask.mp4"></video></center>'
+
+		act 'play with a ball':
+			*clr & cla
+			minut += 20
+			bimbo += 2
+			pcs_mood += 40
+			VaniaMayster += 1
+			gs 'stat'
+			'I run for the ball, take it and with a little gog play give it to Vania'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/play.mp4"></video></center>'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'd2'
+		end
+	end
+
+	act 'ask to go for a walk':
+		*clr & cla
+		bimbo += 2
+		willpowermax -= 1
+		VaniaMayster += 2
+		minut += 5
+		gs 'stat'
+
+		'I took a leash witch was near Vania and show him my desire to go for a walk.'
+		'"Ok, ok))) Betsi, Razvratnik! KO MNE! GULIAT''!"'
+		'Razvratnik comes to Vania and waits to lock the leash to his collar, I do the same'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/askwalk.jpg"></center>'
+
+		act 'wait':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+
+			'vania locks the leashes on me and Razvratnik'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/willdecrising/colar.mp4"></video></center>'
+			act 'continue':
+				*clr & cla
+
+				if rand(1,2) = 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/walkv.mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/walk ('+rand(1,3)+').jpg"></center>'
+				end
+
+				'We walks some time together in the fealds nearby and then come back'
+				'<i>Razvratnik see how Vania pet me and I think he develope some trust to me.</i>'
+
+
+				bimbo += 5
+				willpowermax -= 5
+				VaniaMayster += 3
+				npc_QW['A230'] += rand(1,3)
+				minut += 50
+				gs 'stat'
+				act 'continue': gt 'mod_public_WC_rab_Mayster6', 'd2'
+			end
+		end
+	end
+
+	act 'pet a dog':
+		*clr & cla
+		npc_QW['A230'] += 1
+		pcs_mood += 5
+		minut += 15
+		pcs_mood += rand(1,3)
+		gs 'stat'
+		'I pet the Razvratnik for some time, it seems he likes it'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/petdog.jpg"></center>'
+		act 'continue': gt 'mod_public_WC_rab_Mayster6', 'd2'
+	end
+
+
+	if rand (1,7) = 1:
+		*clr & cla
+		'Vania calls my name and gives me a treat'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/good girl.mp4"></video></center>'
+		bimbo += 1
+		willpowermax -= 1
+		VaniaMayster += 1
+		pcs_mood += rand(5,15)
+		minut += 5
+		gs 'stat'
+		act 'continue': gt 'mod_public_WC_rab_Mayster6', 'd2'
+	end
+
+
+	if hour > ( ytemp + 2 ):
+		*clr & cla
+		killvar 'ytemp'
+		'Vania calls my name and gives me a treat'
+		'"Let''s give you another treat"'
+
+		bimbo += 1
+		willpowermax -= 1
+		VaniaMayster += 1
+		pcs_mood += rand(5,15)
+		minut += 5
+		gs 'stat'
+
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/good girl.mp4"></video></center>'
+
+		act 'No':
+			*clr & cla
+			willpowermax += rand(1,2)
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'Agree': gt 'mod_public_WC_rab_Mayster6', 'dpussy'
+	end
+end
+
+if $ARGS[0] = 'dpussy':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'"Betsi lie down... You need to be wet, it wood be easier for you"'
+
+	act 'No':
+		*clr & cla
+		willpowermax += rand(1,2)
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'"I tierd of this shit, Betsi."'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'Agree':
+		*clr & cla
+		'Vania arouses me with his dick'
+		gs 'arousal', 'vaginal', rand(10,20), 'sub', 'rough', 'humiliation'
+		gs 'stat'
+		'"Now you are ready..."'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/vania start.jpg"></center>'
+
+		act 'continue': gt 'mod_public_WC_rab_Mayster6', 'dsex'
+	end
+end
+
+if $ARGS[0] = 'dsex':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	ztemp = 0
+	Vurok += 1
+	gs 'boyStat', 'A230'
+	if npc_QW['A230'] <= 10:
+		gt 'mod_public_WC_rab_Mayster6', 'dlick'
+	elseif npc_QW['A231'] <= 30:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster6', 'dbj'
+		else
+			gt 'mod_public_WC_rab_Mayster6', 'ds'
+		end
+	else
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster6', 'dbj'
+		else
+			gt 'mod_public_WC_rab_Mayster6', 'ds'
+		end
+	end
+end
+
+if $ARGS[0] = 'dlick':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	gs 'boyStat', 'A231'
+	'"Come here good boy, come here"'
+
+	'The dog licks my pussy'
+	gs 'arousal', 'cuni', rand(10,30), 'sub', 'beast', 'humiliation'
+	gs 'stat'
+
+	$orgasm_txt = 'The beast tongue rhythm make me soooo good, I blow up in incredible orgasm!'
+	$orgasm_or = 'custom'
+	zoo += 1
+	gs 'stat'
+
+
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/doglick.mp4"></video></center>'
+
+	ztemp = rand(4,4)
+	'"Good, Betsi."'
+	'"The lesson is end."'
+	pcs_mood += rand(0,20)
+	gs 'stat'
+
+	npc_QW['A230'] += rand(1,2)
+
+	'"Betsi sit here..."'
+	act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+end
+
+if $ARGS[0] = 'dbj':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	gs 'boyStat', 'A230'
+	'"Betsi, now make this day even better for Razvratnik. Blow him!"'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/mastif.jpg"></center>'
+
+	if ztemp = 0:
+		act 'No':
+			*clr & cla
+			willpowermax += rand(1,2)
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+
+	if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
+		act 'kiss the dog':
+			*clr & cla
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/kiss.mp4"></video></center>'
+			minut += 5
+			npc_QW['A230'] += rand(0,1)
+			temp = rand(1,4)
+			if temp = 4: zoo += 1
+			ztemp = 1
+			gs 'arousal', 'kiss', rand(5,10), 'beast'
+			gs 'stat'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'dbj'
+		end
+	end
+	if ztemp <= 1 and ( DogBJ >= 15 or ( DogVag + DogAnal ) >= 10 or zoo >= 15) :
+		act 'play with dog''s dick':
+			*clr & cla
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/dickplay.mp4"></video></center>'
+			minut += 5
+			npc_QW['A230'] += rand(0,1)
+			temp = rand(1,4)
+			if temp = 4: zoo += 1
+			ztemp = 2
+			gs 'arousal', 'bj', rand(5,10), 'beast'
+			gs 'stat'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'dbj'
+		end
+	end
+	act 'I started to blow its dong.':
+		*clr & cla
+		gs 'sweat', 'add', 5
+		'I started to blow it.'
+		temp = rand(1,2)
+		if temp = 1:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/bj/bjv ('+rand(1,8)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/bj/bj ('+rand(1,16)+').jpg"></center>'
+		end
+
+		DogBJ+=1
+		gs 'arousal', 'bj', 10, 'sub', 'beast'
+		gs 'arousal', 'end'
+		gs 'stat'
+
+		act 'On me':
+			*clr & cla
+			gs 'boyStat', 'A230'
+			sexvolume = rand(20,50)
+
+			temp = rand(1,2)
+			if temp = 1:
+				'Dog cums on my face'
+				spafinloc = 11
+				gs 'cum_manage'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/f ('+rand(1,2)+').jpg"></center>'
+			else
+				'Dog cums on me'
+				spafinloc = 14
+				gs 'cum_manage'
+				spafinloc = 15
+				gs 'cum_manage'
+				spafinloc = 16
+				gs 'cum_manage'
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/onv ('+rand(1,2)+').mp4"></video></center>'
+			end
+
+			gs 'stat'
+			gs 'arousal', 'hj', 5, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'stat'
+			ztemp = rand(4,4)
+			'"Good, Betsi."'
+			'"The lesson is end."'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			npc_QW['A230'] += rand(2,4)
+
+			'"Betsi sit here..."'
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+
+		act 'In the mouth':
+			*clr & cla
+
+
+			temp = rand(1,2)
+			if temp = 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/inv.mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/in ('+rand(1,3)+').jpg"></center>'
+			end
+
+
+			gs 'boyStat', 'A230'
+			spafinloc = 12
+			sexvolume = rand(20,50)
+			gs 'cum_manage'
+			gs 'stat'
+			gs 'arousal', 'bj', 15, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'stat'
+			ztemp = rand(4,4)
+			'"Good, Betsi."'
+			'"The lesson is end."'
+			pcs_mood += rand(0,20)
+			gs 'stat'
+
+			npc_QW['A230'] += rand(2,4)
+
+			'"Betsi sit here..."'
+			act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+	end
+end
+
+if $ARGS[0] = 'ds':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	gs 'boyStat', 'A230'
+	'"Betsi, now make this day even better for Razvratnik. Stand on your four!"'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/mastif.jpg"></center>'
+
+	if ztemp = 0:
+		act 'No':
+			*clr & cla
+			willpowermax += rand(1,2)
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+
+	if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
+		act 'kiss the dog':
+			*clr & cla
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/kiss.mp4"></video></center>'
+			minut += 5
+			npc_QW['A230'] += rand(0,1)
+			temp = rand(1,4)
+			if temp = 4: zoo += 1
+			ztemp = 1
+			gs 'arousal', 'kiss', rand(5,10), 'beast'
+			gs 'stat'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'ds'
+		end
+	end
+	if ztemp <= 1 and ( DogBJ >= 15 or ( DogVag + DogAnal ) >= 10 or zoo >= 15) :
+		act 'play with dog''s dick':
+			*clr & cla
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/dickplay.mp4"></video></center>'
+			minut += 5
+			npc_QW['A230'] += rand(0,1)
+			temp = rand(1,4)
+			if temp = 4: zoo += 1
+			ztemp = 2
+			gs 'arousal', 'bj', rand(5,10), 'beast'
+			gs 'stat'
+			act 'continue': gt 'mod_public_WC_rab_Mayster6', 'ds'
+		end
+	end
+
+	act 'I stand on my four.':
+		*clr & cla
+		if npc_QW['A230'] <= 30:
+			'Vania guides the Razvratnik dong to help him.'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/start_help.mp4"></video></center>'
+
+			gs 'arousal', 'foreplay', 15, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'stat'
+			pcs_vag += 1
+
+			stat['vaginal'] += 1
+			gs 'stat'
+
+			ztemp = 100
+		end
+		if npc_QW['A230'] <= 50:
+			ztemp = rand(1,2) * 100
+		end
+
+		if ztemp = 100:
+			'The dog starts to penetrates me!'
+			temp = rand (1,2)
+			if temp = 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/pussv ('+rand(1,3)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/puss ('+rand(1,14)+').jpg"></center>'
+			end
+
+			npc_horny['A230'] = 0
+			if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+			DogVag+=1
+
+			npc_QW['A230'] += 1
+			gs 'stat'
+
+			gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Allow to knot me':
+				*clr & cla
+				if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+				gs 'stat'
+
+				temp = rand (1,2)
+
+				if temp = 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,2)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
+				end
+
+				if rand(1,5) = 1:
+					'Vania teases me with Razvratnik''s dick in me'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/zoo/train/d/vania_teasev ('+rand(1,2)+').mp4"></video></center>'
+					gs 'arousal', 'foreplay', 5, 'sub', 'beast', 'rough'
+					gs 'arousal', 'end'
+				end
+
+
+				gs 'arousal', 'vaginal', 15, 'sub', 'beast', 'rough'
+				gs 'arousal', 'end'
+				gs 'stat'
+				banditboggle = RAND(0,5)
+				if banditboggle <= 3:
+					if pcs_vag < 10:
+						pcs_vag += 4
+						vgape = 3
+						pcs_horny = 0
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+						exit
+					elseif pcs_vag < 25:
+						pcs_vag += 3
+						vgape = 2
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,50)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag < 35:
+						pcs_vag += 2
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					else
+						pcs_vag += 1
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				else
+					if pcs_vag < 10:
+						minut += 20
+						pcs_vag += 4
+						vgape = 3
+						pcs_horny = 0
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 10:
+						pcs_vag += 3
+						vgape = 1
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				end
+			end
+
+			act 'Prevent':
+				*clr & cla
+				minut += 2
+				if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+
+
+				temp = rand (1,2)
+				if temp = 1:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/pv ('+rand(1,3)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/p.jpg"></center>'
+				end
+
+				gs 'stat'
+				banditboggle = RAND(0,5)
+				if banditboggle <= 1:
+					if pcs_vag < 15:
+						minut += 10
+						pcs_vag += 1
+						vgape = 1
+						pcs_horny -= RAND(10,20)
+						gs 'boyStat', 'A230'
+						spafinloc = 1
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 15 and pcs_vag < 25:
+						pcs_vag += 1
+						gs 'boyStat', 'A230'
+						gs 'stat'
+						if pcs_horny >= 100:
+							minut += 10
+
+							pcs_mood = 100
+							gs 'stat'
+
+							sexvolume = rand(20,500)
+							gs 'cum_manage'
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+							sexvolume = rand(20,150)
+							gs 'cum_manage'
+							gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 25 and pcs_vag < 35:
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 35:
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						else
+							gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+						end
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				else
+
+					if pcs_vag < 15:
+						minut += 10
+						pcs_vag += 1
+						if vgape <3:vgape += 1
+						pcs_horny -= RAND(10,20)
+						gs 'stat'
+
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 15 and pcs_vag < 25:
+						pcs_vag += 1
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,50)
+						gs 'cum_manage'
+						gs 'stat'
+
+						gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 25 and pcs_vag < 35:
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,300)
+						gs 'cum_manage'
+						gs 'stat'
+
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_vag >= 35:
+						gs 'boyStat', 'A230'
+						sexvolume = rand(20,300)
+						gs 'cum_manage'
+						gs 'stat'
+
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				end
+			end
+
+			if rand(1,6) = 1:
+				cla
+				'"Ok, Betsi, I want to join!"'
+				act 'Pleasure Vania too': gt 'mod_public_WC_rab_Mayster6', 'vd'
+			end
+			if rand(1,4) = 1:
+				cla
+				'"Ok, Betsi, Hren wants to join!"'
+				act 'Pleasure Hren too': gt 'mod_public_WC_rab_Mayster6', 'dh'
+			end
+		else
+			npc_QW['A230'] += 1
+			npc_horny['A230'] = 0
+			if alko < 6 or zoo < 20: pcs_mood = pcs_mood/2
+			DogAnal+=1
+			gs 'stat'
+			temp = rand(1,2)
+			if temp = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/ass/ass.jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/ass/assv'+rand(1,2)+'.mp4"></video></center>'
+			end
+
+			gs 'arousal', 'anal', 15, 'sub', 'beast'
+			gs 'arousal', 'end'
+			gs 'pain', 2, 'asshole', 'stretch'
+			gs 'stat'
+
+			act 'Let the dog knot my ass':
+				*clr & cla
+				if alko < 6 and zoo < 20: pcs_mood = pcs_mood/2
+				gs 'stat'
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/ass/kv.mp4"></video></center>'
+				$orgasm_or = 'yes'
+				gs 'arousal', 'anal', 15, 'sub', 'beast'
+				gs 'arousal', 'end'
+				gs 'pain', 'asshole', 'stretch'
+				gs 'stat'
+				banditboggle = RAND(0,5)
+				if banditboggle <= 4:
+					if pcs_ass < 15:
+						pcs_ass += 4
+						agape = 3
+						pcs_horny = 0
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_ass < 25:
+						pcs_ass += 3
+						agape = 2
+						pcs_horny -= RAND(15,30)
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_ass < 35:
+						pcs_ass += 2
+						agape = 1
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+
+							$orgasm_or = 'yes'
+							gs 'arousal', 'anal', 20, 'sub', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+							ztemp = rand(4,4)
+							'"Good, Betsi."'
+							'"The lesson is end."'
+							pcs_mood += rand(0,20)
+							gs 'stat'
+
+							npc_QW['A230'] += rand(2,4)
+
+							'"Betsi sit here..."'
+							act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+							exit
+						else
+							gs 'arousal', 'anal', 20, 'sub', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+							ztemp = rand(4,4)
+							'"Good, Betsi."'
+							'"The lesson is end."'
+							pcs_mood += rand(0,20)
+							gs 'stat'
+
+							npc_QW['A230'] += rand(2,4)
+
+							'"Betsi sit here..."'
+							act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+							exit
+						end
+					else
+
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						if pcs_horny >= 100:
+
+							pcs_mood = 100
+							gs 'stat'
+							$orgasm_or = 'yes'
+							gs 'arousal', 'anal', 20, 'sub', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+							ztemp = rand(4,4)
+							'"Good, Betsi."'
+							'"The lesson is end."'
+							pcs_mood += rand(0,20)
+							gs 'stat'
+
+							npc_QW['A230'] += rand(2,4)
+
+							'"Betsi sit here..."'
+							act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+							exit
+						else
+							gs 'arousal', 'anal', 20, 'sub', 'beast'
+							gs 'arousal', 'end'
+							gs 'stat'
+							ztemp = rand(4,4)
+							'"Good, Betsi."'
+							'"The lesson is end."'
+							pcs_mood += rand(0,20)
+							gs 'stat'
+
+							npc_QW['A230'] += rand(2,4)
+
+							'"Betsi sit here..."'
+							act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+							exit
+						end
+					end
+				else
+
+					if pcs_ass < 15:
+						pcs_ass += 5
+						agape = 3
+						pcs_horny = 0
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_ass < 25:
+						pcs_ass += 5
+						agape = 3
+						pcs_horny = 0
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					elseif pcs_ass < 35:
+						pcs_ass += 4
+						agape = 2
+						pcs_horny -= RAND(40,60)
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(20,590)
+						gs 'cum_manage'
+						gs 'stat'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					else
+						pcs_ass += 3
+						agape = 1
+						gs 'boyStat', 'A230'
+						spafinloc = 3
+						sexvolume = rand(5,50)
+						gs 'cum_manage'
+						gs 'stat'
+						gs 'arousal', 'anal', 5, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				end
+			end
+
+			act 'Prevent':
+				*clr & cla
+				minut += 2
+				if alko < 6 and zoo < 20: pcs_mood = pcs_mood/2
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/ass/ass.jpg"></center>'
+				if pcs_ass < 15:
+
+					agape = 2
+					pcs_horny -= RAND(15,30)
+					gs 'boyStat', 'A230'
+					spafinloc = 4
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'arousal', 'anal', 10, 'sub', 'beast'
+					gs 'arousal', 'end'
+					gs 'stat'
+					ztemp = rand(4,4)
+					'"Good, Betsi."'
+					'"The lesson is end."'
+					pcs_mood += rand(0,20)
+					gs 'stat'
+
+					npc_QW['A230'] += rand(2,4)
+
+					'"Betsi sit here..."'
+					act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+					exit
+				elseif pcs_ass < 25:
+
+					gs 'boyStat', 'A230'
+					spafinloc = 3
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+						$orgasm_or = 'yes'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					else
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+
+				elseif pcs_ass < 35:
+					gs 'boyStat', 'A230'
+					spafinloc = 3
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+						$orgasm_or = 'yes'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					else
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				else
+					gs 'boyStat', 'A230'
+					spafinloc = 3
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+						$orgasm_or = 'yes'
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					else
+						gs 'arousal', 'anal', 20, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+						ztemp = rand(4,4)
+						'"Good, Betsi."'
+						'"The lesson is end."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+
+						npc_QW['A230'] += rand(2,4)
+
+						'"Betsi sit here..."'
+						act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+						exit
+					end
+				end
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'Razvratnik_setup':
+	npctemp = 230
+	gs 'npcstaticdefaults', 'defaults'
+	$npc_dna['A<<npctemp>>'] = '3769802569 3791421374 3388660135 3670852965 3668879785 3274794120 3877252698'
+	$npc_firstname['A<<npctemp>>'] = 'Razvratnik'
+	$npc_nickname['A<<npctemp>>'] = 'Razvratnik'
+	$npc_lastname['A<<npctemp>>'] = 'The Dog'
+	$npc_usedname['A<<npctemp>>'] = 'Razvratnik'
+	$npc_notes['A<<npctemp>>'] = 'Vania''s dog.'
+	npc_cyc['A<<npctemp>>'] = -1
+	npc_fert['A<<npctemp>>'] = -1
+	$npc_firstpart['A<<npctemp>>'] = 'U'
+	$npc_lastpart['A<<npctemp>>'] = 'U'
+	$npc_kidpater['A<<npctemp>>'] = 'N'
+	npc_gender['A<<npctemp>>'] = 0
+	$npc_thdick['A<<npctemp>>'] = 'knotted'
+	npc_dick['A<<npctemp>>'] = 0
+	npc_spermpot['A<<npctemp>>'] = -1
+	npc_vag['A<<npctemp>>'] = -1
+	npc_hymen['A<<npctemp>>'] = -1
+	npc_nips['A<<npctemp>>'] = 1
+end
+
+if $ARGS[0] = 'hren_setup':
+	npctemp = 231
+	gs 'npcstaticdefaults', 'defaults'
+	$npc_dna['A<<npctemp>>'] = '3769122569 3791404574 3388674525 3673577865 3668437102 32745340210 3877730158'
+	$npc_firstname['A<<npctemp>>'] = 'Hren'
+	$npc_nickname['A<<npctemp>>'] = 'Hren'
+	$npc_lastname['A<<npctemp>>'] = 'The Hren'
+	$npc_usedname['A<<npctemp>>'] = 'Hren'
+	$npc_notes['A<<npctemp>>'] = 'Vania''s horse.'
+	npc_cyc['A<<npctemp>>'] = -1
+	npc_fert['A<<npctemp>>'] = -1
+	$npc_firstpart['A<<npctemp>>'] = 'U'
+	$npc_lastpart['A<<npctemp>>'] = 'U'
+	$npc_kidpater['A<<npctemp>>'] = 'N'
+	npc_gender['A<<npctemp>>'] = 0
+	$npc_thdick['A<<npctemp>>'] = 'knotted'
+	npc_dick['A<<npctemp>>'] = 0
+	npc_spermpot['A<<npctemp>>'] = -1
+	npc_vag['A<<npctemp>>'] = -1
+	npc_hymen['A<<npctemp>>'] = -1
+	npc_nips['A<<npctemp>>'] = 1
+end
+
+if $ARGS[0] = 'dh':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	npc_QW['A230'] += 1
+	npc_QW['A231'] += 1
+
+	'<i>I am the beast whore!!!</i>'
+
+	gs 'boyStat', 'A231'
+	gs 'arousal', 'vaginal', 8, 'sub', 'beast'
+	gs 'stat'
+	pcs_vag += 4
+	stat['vaginal'] += 1
+	gs 'stat'
+
+	gs 'boyStat', 'A230'
+	gs 'sweat', 'add', 5
+	HVag+=1
+	DogBJ+=1
+	gs 'arousal', 'bj', 8, 'sub', 'beast'
+	gs 'stat'
+
+
+	'I feel how the dongs becomes hot as a fire and fill me up from all sides!'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/train/dh/d_h ('+rand(1,2)+').mp4"></video></center>'
+
+	gs 'boyStat', 'A231'
+	npc_horny['A231'] = 0
+	if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+	HVag+=1
+
+	if HVag <= 9:
+		temp = 9 - HVag
+		gs 'pain', rand(temp,9),'vaginal', 'pierce'
+	else
+		gs 'pain', rand(1,4),'vaginal', 'pierce'
+	end
+
+	pcs_stam -= 40
+
+	gs 'stat'
+	gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+	gs 'stat'
+	pcs_vag += 4
+	gs 'boyStat', 'A231'
+	gs 'boyStat', $npclastgenerated
+	spafinloc = 0
+	sexvolume = rand(100,250)
+	gs 'cum_manage'
+	gs 'stat'
+	gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+	gs 'arousal', 'end'
+	gs 'stat'
+
+	gs 'boyStat', 'A230'
+	spafinloc = 12
+	sexvolume = rand(20,50)
+	gs 'cum_manage'
+	gs 'stat'
+	gs 'arousal', 'bj', 15, 'sub', 'beast'
+	gs 'arousal', 'end'
+	gs 'stat'
+	ztemp = rand(1,2)
+
+	'"Fantastic show, Betsi!"'
+
+	pcs_mood += rand(0,20)
+	gs 'stat'
+
+	npc_QW['A230'] += rand(2,4)
+
+	'"sit here..."'
+	vurok += 1
+	act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+end
+
+if $ARGS[0] = 'vh':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	npc_QW['A231'] += 1
+
+	'Hren'' and Vania'' dicks fuck me in the same rhythm'
+
+	gs 'sweat', 'add', 10
+	gs 'stat'
+	pcs_vag += 4
+
+	stat['vaginal'] += 1
+	HVag+=1
+
+
+	gs 'stat'
+
+	gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+	gs 'arousal', 'end'
+	gs 'stat'
+
+	'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/h/man/manbj.mp4"></video></center>'
+
+	act 'continue':
+		*clr & cla
+		$orgasm_or = 'yes'
+		gs 'stat'
+		'I loose my mind in orgasm becaus of the RHYTHM!!'
+
+		temp = rand(1,32)
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
+		swallow  += 1
+		spafinloc = 12
+		sparrvol = 20
+		cumarrcpt = 20
+		gs 'cum_call', 'mouth'
+		gs 'cum_manage'
+		gs 'stat'
+
+		temp = rand (1,2)
+
+		'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/h/cum/assv.mp4"></video></center>'
+
+		npc_horny['A231'] = 0
+		if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+
+
+		if HVag <= 9:
+			temp = 9 - HVag
+			gs 'pain', rand(temp,9),'vaginal', 'pierce'
+		else
+			gs 'pain', rand(1,4),'vaginal', 'pierce'
+		end
+
+		pcs_stam -= 40
+
+		gs 'stat'
+		gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+		gs 'arousal', 'end'
+		gs 'stat'
+		pcs_vag += 4
+		gs 'boyStat', 'A231'
+		sexvolume = rand(100,250)
+		gs 'cum_manage'
+		gs 'stat'
+		gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+		gs 'arousal', 'end'
+		gs 'stat'
+
+		pcs_mood = 100
+		gs 'stat'
+
+		'"Betsi, very good lesson"'
+
+		ztemp = rand(1,2)
+		pcs_mood += rand(0,20)
+		gs 'stat'
+
+		npc_QW['A231'] += rand(2,4)
+
+		'"Betsi sit here..."'
+		act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+	end
+end
+
+if $ARGS[0] = 'vd':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	sexpartkno = 1
+	npc_QW['A230'] += 1
+
+	'Razvratnik'' and Vania'' dicks fuck me in the same rhythm'
+
+	gs 'sweat', 'add', 10
+	gs 'stat'
+	pcs_vag += 1
+
+	stat['vaginal'] += 1
+	DogVag+=1
+
+
+	gs 'stat'
+
+	gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+	gs 'arousal', 'end'
+	gs 'stat'
+
+	'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/man/manbj.mp4"></video></center>'
+
+	act 'continue':
+		*clr & cla
+		$orgasm_or = 'yes'
+		gs 'stat'
+		'I loose my mind in orgasm becaus of the RHYTHM!!'
+
+		temp = rand(1,32)
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
+		swallow  += 1
+		spafinloc = 12
+		sparrvol = 20
+		cumarrcpt = 20
+		gs 'cum_call', 'mouth'
+		gs 'cum_manage'
+		gs 'stat'
+
+		temp = rand (1,2)
+
+		if temp = 1:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,4)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
+		end
+
+
+		pcs_vag += 1
+		gs 'boyStat', 'A220'
+		sexvolume = rand(20,590)
+		gs 'cum_manage'
+		gs 'stat'
+
+
+		pcs_mood = 100
+		gs 'stat'
+
+
+		gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+		gs 'arousal', 'end'
+		gs 'stat'
+
+		'"Betsi, very good lesson"'
+
+		ztemp = rand(1,2)
+		pcs_mood += rand(0,20)
+		gs 'stat'
+
+		npc_QW['A230'] += rand(2,4)
+
+		'"Betsi sit here..."'
+		act 'sit and wait': gt 'mod_public_WC_rab_Mayster', 'end'
+	end
+end
+
+--- mod_public_WC_rab_Mayster6 ---------------------------------

locations/mod_public_WC_rab_Mayster7.qsrc

@@ -0,0 +1,2750 @@
+# mod_public_WC_rab_Mayster7
+if $ARGS[0] = 'start':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'I come with Vania to the Barn where the exercise bike stands...'
+
+	'"Before we will go to the big world, you need to train on this bad boy..."'
+	'Vania fixed the dildo to the bike...'
+	'"Come on, Betsi, ride it!"'
+
+	act 'No!':
+		*clr & cla
+		willpowermax += 1
+		VaniaMayster -= 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'I tierd of this shit, Betsi.'
+		act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t say "no" to Vania anymore</i>'
+	end
+
+	act 'ride the bike':
+		*clr & cla
+		'This ride is amazing!'
+		VaniaMayster += 1
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/trainride ('+rand(1,4)+').mp4"></video></center>'
+		gs 'arousal', 'vaginal_dildo_give', rand(40,70), 'humiliation', 'sub'
+		gs 'stat'
+
+
+		run_exp += rand(0,2)
+		stren_exp += rand(0,2)
+		fat -= 2
+		pcs_mood += 10
+		pcs_sweat += 2
+		gs 'stat'
+
+
+		vbike -= rand(10,15)
+		if vbike < 1: vbike = 1
+
+
+		'in about a hour Vania stops me'
+		'"Ok Betsi, few more trains and we will ride outside"'
+
+		pcs_mood += rand(0,20)
+		gs 'stat'
+		ztemp = rand (1,4)
+		if ztemp = 3: ztemp = 4
+		act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+
+		act 'Please master, can I ride more!':
+			*clr & cla
+			VaniaMayster += 1
+			willpowermax -= 1
+			'"Of course, Betsi, I like the spirit"'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/trainride ('+rand(1,4)+').mp4"></video></center>'
+			gs 'arousal', 'vaginal_dildo_give', rand(40,70), 'humiliation', 'sub'
+			gs 'stat'
+
+
+			run_exp += rand(0,2)
+			stren_exp += rand(0,2)
+			fat -= 2
+			pcs_mood += 10
+			pcs_sweat += 2
+			gs 'stat'
+
+
+			vbike -= rand(10,15)
+			if vbike < 1: vbike = 1
+
+
+			'in about a hour Vania stops me'
+			'"Ok Betsi, few more trains and we will ride outside"'
+
+			pcs_mood += rand(0,20)
+			gs 'stat'
+			ztemp = rand (1,4)
+			if ztemp = 3: ztemp = 4
+			act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+		end
+	end
+
+	if vbike = 1:
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+		'I come with Vania to the Barn where the casual bike stands...'
+
+		'"Today you will go to the big world!.."'
+
+		vbike = 200
+
+		if zashmorg = 2:
+			'Vania locks the collar with a lock'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/items/zashmorg.jpg"></center>'
+			zashmorg = 3
+		elseif zashmorg = 1:
+			'Vania locks the collar around me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+			zashmorg = 3
+		end
+
+		'"Remember Betsi, I trust my pet... don''t disappoint me"'
+
+
+		'"You can ride anywhere you want... cuz we can find you anywhere))"'
+		'"But you need to come back to the meet with Tolik on time."'
+
+
+		'Vania fixed the dildo to the bike...'
+		'"Come on, Betsi, ride it!"'
+
+		if month > 4 and month < 10:
+			''
+			'You can go swim if you turn left on the second turn left.'
+		else
+			'You better dress a coat, it''s cold outside'
+		end
+		'The forest is dangerous place, avoid it.'
+
+
+
+
+		act 'Go ride!':
+			onvelyk = 1
+			gt 'mod_public_WC_rab_Mayster7', 'ridestart'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'start2':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'I come with Vania to the Barn where the casual bike stands...'
+
+	'"Today you will go to the big world!.."'
+
+	if zashmorg = 2:
+		'Vania locks the collar with a lock'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/items/zashmorg.jpg"></center>'
+		zashmorg = 3
+	elseif zashmorg = 1:
+		'Vania locks the collar around me'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start (1).mp4"></video></center>'
+		zashmorg = 3
+	end
+
+	'"Remember Betsi, I trust my pet... don''t disappoint me"'
+
+	'"You can ride anywhere you want... cuz we can find you anywhere))"'
+	'"But you need to come back to the meet with Tolik on time."'
+
+	'Vania fixed the dildo to the bike...'
+	'"Come on, Betsi, ride it!"'
+
+	if month > 4 and month < 10:
+		'You can go swim if you turn left on the second turn left.'
+	else
+		'You better dress a coat, it''s cold outside'
+	end
+	'The west forest is very dangerous place, you must not go there or I would punish you!.'
+
+	act 'Go ride!':
+		onvelyk = 1
+		gt 'mod_public_WC_rab_Mayster7', 'ridestart'
+	end
+end
+
+
+
+if $ARGS[0] = 'ridestart':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	$loc_arg = $ARGS[0]
+
+	coord_x = 0
+	coord_y = 0
+	poshuk = 0
+	killvar 'vogon_x'
+	killvar 'vogon_y'
+	killvar 'vogond'
+	killvar 'vogon'
+	killvar 'phour'
+	killvar 'pday'
+	coord_v_x = 0
+	coord_v_y = 0
+
+	poletan = 0
+	$rope = 0
+
+	$loc = 'mod_public_WC_rab_Mayster7'
+
+	'I start my ride'
+
+	'<i><b>Ok, I am not sure where am I. I will try to use world directions for not to get lost!</b></i>'
+
+	gs 'arousal', 'vaginal_dildo_give', rand(40,70), 'humiliation', 'sub'
+	gs 'stat'
+
+
+	run_exp += rand(0,2)
+	stren_exp += rand(0,2)
+	fat -= 2
+	pcs_mood += 10
+	pcs_sweat += 2
+	gs 'stat'
+
+	if month > 4 and month < 10:
+		if hour >= 6 and hour <= 21:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_d.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_n.jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour <= 17:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_d.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_n.jpg"></center>'
+		end
+	end
+
+	if rand (1,8) <= 2:
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/ride ('+rand(1,2)+').jpg"></center>'
+	else
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/ridev ('+rand(1,6)+').mp4"></video></center>'
+	end
+
+	act '<b>stick to the road</b> (east)': coord_x += 1 & gt 'mod_public_WC_rab_Mayster7', 'ride'
+	act 'go left (north) to the field': coord_y += 1 & gt 'mod_public_WC_rab_Mayster7', 'ride'
+	act 'go right (south) to the forest': coord_y -= 1 & gt 'mod_public_WC_rab_Mayster7', 'ride'
+end
+
+if $ARGS[0] = 'ride':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	$loc_arg = $ARGS[0]
+
+	if coord_x = coord_v_x and coord_y = coord_v_y and onvelyk = 0:
+		'<b>This is my byke!</b>'
+		act '<b>Take my bike</b>':
+			onvelyk = 1
+			'I have taken my bike'
+			killvar 'coord_v_x'
+			killvar 'coord_v_y'
+
+			if coord_x = 11 and coord_y <= 0:
+				act 'I can''t ride west, the river is an obstacle':
+					'I can''t ride west, the river is an obstacle'
+				end
+			elseif coord_x = 5 and coord_y >= 2:
+				act 'I can''t ride west, the river is an obstacle':
+					'I can''t ride west, the river is an obstacle'
+				end
+			else
+				act 'ride a bike on west':
+					coord_x -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+
+
+			if coord_x = 10 and coord_y <= 0:
+				act 'I can''t go east, the river is an obstacle':
+					'I can''t go east, the river is an obstacle'
+				end
+			elseif coord_x = 4 and coord_y >= 2:
+				act 'I can''t ride east, the river is an obstacle':
+					'I can''t ride east, the river is an obstacle'
+				end
+			else
+				act 'ride a bike on east':
+					coord_x += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+
+
+			if coord_x >= 5 and x <= 6 and coord_y = 1:
+				act 'I can''t ride north, the river is an obstacle':
+					'I can''t ride north, the river is an obstacle'
+				end
+			else
+				act 'ride a bike on north':
+					coord_y += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+
+			if coord_x >= 5 and x <= 6 and coord_y = 2:
+				act 'I can''t ride south, the river is an obstacle':
+					'I can''t ride south, the river is an obstacle'
+				end
+			else
+				act 'ride a bike on south':
+					coord_y -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+		end
+	end
+
+	if hour >= 21 and zvit = week and poshuk = 0:
+		poshuk = 1
+		phour = hour
+		pday = daystart
+	elseif zvit + 1 = week and poshuk = 0:
+		poshuk = 1
+		phour = hour
+		pday = daystart
+	elseif zvit - 6 = week and poshuk = 0:
+		poshuk = 1
+		phour = hour
+		pday = daystart
+	end
+
+
+
+	if poshuk > 0:
+		if daystart - pday > 0:
+			if daystart - pday = 1:
+				poshuk = (daystart - pday) * 4 + (24 - phour)
+			elseif daystart - pday <= 2:
+				poshuk = (daystart - pday) * 12 + (24 - phour)
+			else
+				poshuk = (daystart - pday) * 24 + (24 - phour)
+			end
+		else
+			poshuk = hour - phour
+		end
+
+		if zashmorg = 0: poshuk = poshuk / rand(1,10)
+
+		if coord_x < 0: tempx = coord_x * (0 - 1)
+		if coord_y < 0: tempy = coord_y * (0 - 1)
+
+		if poshuk > tempx + tempy:
+			killvar 'tempx'
+			killvar 'tempy'
+			gt 'mod_public_WC_rab_Mayster7', 'Vania'
+		else
+			killvar 'tempx'
+			killvar 'tempy'
+		end
+		if poshuk = 0: poshuk = 1
+	end
+
+	if onvelyk = 1:
+		'I am riding!'
+		gs 'arousal', 'vaginal_dildo_give', 5, 'humiliation', 'sub'
+		gs 'stat'
+
+		temp = rand(1,4)
+		if temp = 1:
+			run_exp += rand(0,1)
+			stren_exp += rand(0,1)
+			fat -= 1
+			pcs_mood += 3
+			gs 'stat'
+		end
+	elseif onvelyk = 0:
+		'I am walking'
+		minut += rand(5,10)
+		gs 'stat'
+	end
+
+	pcs_mood += rand(1,2)
+	pcs_sweat += 1
+	gs 'stat'
+
+	if coord_x < 0:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 2
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			lis = 2
+		elseif coord_y = 1:
+			lis = 2
+		elseif coord_y = 2:
+			lis = 2
+		elseif coord_y = 3:
+			lis = 1
+			'<b>The road goes from the forest''s edge (east) - to deeper in the forest (west)</b>'
+		elseif coord_y = 4:
+			lis = 2
+		elseif coord_y >= 4:
+		lis = 2
+		end
+	elseif coord_x = 0:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 2
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			'home'
+		elseif coord_y = 1:
+			pole = 2
+		elseif coord_y = 2:
+			pole = 2
+		elseif coord_y = 3:
+			pole = 1
+			'<b>The road goes from the field (east) - to the forest (west)</b>'
+		elseif coord_y = 4:
+			pole = 2
+		elseif coord_y >= 4:
+			pole = 2
+		end
+	elseif coord_x = 1:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 2
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			pole = 1
+			'<b>The road goes from the home (west) - to the field (east)</b>'
+		elseif coord_y = 1:
+			pole = 2
+		elseif coord_y = 2:
+			pole = 1
+			'<b>The road goes from the field (east) - to the field (north)</b>'
+		elseif coord_y = 3:
+			pole = 1
+			'<b>The road goes from the field (south) - to the forest (west)</b>'
+		elseif coord_y = 4:
+			pole = 2
+		elseif coord_y >= 4:
+			pole = 2
+		end
+	elseif coord_x = 2:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 2
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			pole = 1
+			'<b>The road goes from the home (west) - to the field (east)</b>'
+			'<b>The road also goes to other the field (north)</b>'
+		elseif coord_y = 1:
+			pole = 1
+			'<b>The road goes from the field (south) - to the field (north)</b>'
+		elseif coord_y = 2:
+			pole = 1
+			'<b>The road goes from the field (south) - to the field (west)</b>'
+		elseif coord_y = 3:
+			lis = 2
+		elseif coord_y = 4:
+			lis = 2
+		elseif coord_y >= 4:
+			lis = 2
+		end
+	elseif coord_x = 3:
+		if coord_y <= -4:
+			lis = 1
+			'<b>The road goes from the forest (south) - to the forest (north)</b>'
+		elseif coord_y = -3:
+			lis = 1
+			'<b>The road goes from the forest (south) - to the forest (east)</b>'
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 1
+			'<b>The road goes from the forest (east) - to the forest (north)</b>'
+		elseif coord_y = 0:
+			pole = 1
+			'<b>The road goes from the home (west) - to the field (east)</b>'
+			'<b>The road also goes from the forest (south)</b>'
+		elseif coord_y = 1:
+			pole = 2
+		elseif coord_y = 2:
+			pole = 2
+		elseif coord_y = 3:
+			pole = 2
+		elseif coord_y = 4:
+			pole = 2
+		elseif coord_y > 4:
+			pole = 2
+		end
+	elseif coord_x = 4:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 1
+			'<b>The road goes from the forest (west) - to the forest (east)</b>'
+			'<b>The road also goes to the forest (north)</b>'
+		elseif coord_y = -2:
+			lis = 1
+			'<b>The road goes from the forest (south) - to the forest (north)</b>'
+		elseif coord_y = -1:
+			lis = 1
+			'<b>The road goes from the forest (south) - to the forest (west)</b>'
+		elseif coord_y = 0:
+			pole = 1
+			'<b>The road goes from the home (west) - to the field (east)</b>'
+		elseif coord_y = 1:
+			rika = 1
+			'<b>The road goes along the river (east) - to the (north)</b>'
+		elseif coord_y = 2:
+			rika = 1
+			'<b>The road goes along the river (south) - to the (north)</b>'
+		elseif coord_y = 3:
+			rika = 1
+			'<b>The road goes along the river (south) - to the (north)</b>'
+		elseif coord_y = 4:
+			'<b>The road goes along the river (south) but ends here</b>'
+			rika = 1
+		elseif coord_y >= 4:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		end
+	elseif coord_x = 5:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 1
+			'<b>The road goes from the forest (west) - to the forest (east)</b>'
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			pole = 1
+			'<b>The road goes from the home (west) - to the river (north)</b>'
+		elseif coord_y = 1:
+			'<b>The road goes from the field (south) along the river (west)</b>'
+		elseif coord_y = 2:
+			rika = 1
+			'<b>The river goes from east to north</b>'
+		elseif coord_y = 3:
+			'<b>The river goes from south to north</b>'
+			rika = 1
+		elseif coord_y = 4:
+			rika = 1
+			'<b>The river goes from south to north</b>'
+		elseif coord_y > 4:
+			rika = 1
+			'<b>The river goes from south to north</b>'
+		end
+	elseif coord_x = 6:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 1
+			'<b>The road goes from the forest (west) - to the forest (east)</b>'
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			lis = 2
+		elseif coord_y = 1:
+			rika = 1
+			'<b>The river goes from west to east</b>'
+			'<b>There is a swamp on the east</b>'
+		elseif coord_y = 2:
+			rika = 1
+			'<b>The river goes from west to east</b>'
+			'<b>There is a swamp on the east</b>'
+		elseif coord_y = 3:
+			lis = 2
+			'<b>There is a swamp on the east</b>'
+		elseif coord_y = 4:
+			lis = 2
+			'<b>There is a swamp on the east</b>'
+		elseif coord_y >= 4:
+			lis = 2
+			'<b>There is a swamp on the east</b>'
+		end
+	elseif coord_x = 7:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 1
+			'<b>The road goes from the forest (west) - to the forest (east)</b>'
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			lis = 2
+		elseif coord_y = 1:
+			boloto = 1
+			'<b>The swamp goes to the east and north</b>'
+			'<b>The river starts from the swamp and goes to the west</b>'
+		elseif coord_y = 2:
+			boloto = 1
+			'<b>The swamp goes to the east</b>'
+			'<b>The river starts from the swamp and goes to the west</b>'
+		elseif coord_y = 3:
+			boloto = 1
+			'<b>The swamp goes to the east</b>'
+		elseif coord_y = 4:
+			boloto = 1
+			'<b>The swamp goes to the east</b>'
+		elseif coord_y > 4:
+			boloto = 1
+			'<b>The swamp goes to the east</b>'
+		end
+	elseif coord_x = 8:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 1
+			'<b>The road goes from the forest (west) - to the forest (north)</b>'
+		elseif coord_y = -2:
+			lis = 1
+			'<b>The road goes from the forest (south) - to the forest (east)</b>'
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			lis = 2
+		elseif coord_y = 1:
+			boloto = 1
+			'<b>The swamp starts here and goes to the north</b>'
+		elseif coord_y = 2:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 3:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y >= 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		end
+	elseif coord_x = 9:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 2
+		elseif coord_y = -2:
+			lis = 1
+			'<b>The road goes from the forest (west) - to the forest (north)</b>'
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			lis = 2
+		elseif coord_y = 1:
+			boloto = 1
+			'<b>The swamp starts here and goes to the north</b>'
+		elseif coord_y = 2:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 3:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y >= 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		end
+	elseif coord_x = 10:
+		if coord_y <= -4:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = -3:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = -2:
+			'<b>the road goes from the west and ends here on the river bank</b>'
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = -1:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = 0:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = 1:
+			boloto = 1
+			'<b>The swamp starts here and goes to the north</b>'
+			'<b>The river starts from the swamp and goes to the south</b>'
+		elseif coord_y = 2:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 3:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y > 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		end
+	elseif coord_x = 11:
+		if coord_y <= -4:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = -3:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = -2:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = -1:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = 0:
+			rika = 1
+			'<b>the river goes from south to north</b>'
+		elseif coord_y = 1:
+			boloto = 1
+			'<b>The swamp starts here and goes to the north</b>'
+			'<b>The river starts from the swamp and goes to the south</b>'
+		elseif coord_y = 2:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 3:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y >= 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		end
+	elseif coord_x > 11:
+		if coord_y <= -4:
+			lis = 2
+		elseif coord_y = -3:
+			lis = 2
+		elseif coord_y = -2:
+			lis = 2
+		elseif coord_y = -1:
+			lis = 2
+		elseif coord_y = 0:
+			lis = 2
+		elseif coord_y = 1:
+			boloto = 1
+			'<b>The swamp starts here and goes to the north</b>'
+		elseif coord_y = 2:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 3:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y = 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		elseif coord_y >= 4:
+			boloto = 2
+			'<b>I am in the middle of the swamp</b>'
+		end
+	end
+
+	if pole = 2 or lis = 2 or rika = 1 and onvelyk = 1:
+		'It''s very hard to ride here without a road'
+		run_exp += rand(0,1)
+		stren_exp += rand(0,1)
+		fat -= 1
+		pcs_mood += 3
+		pcs_sweat += 3
+		minut += 10
+		gs 'stat'
+	end
+
+	if pole = 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_n.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_n.jpg"></center>'
+			end
+		end
+	elseif pole = 2:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/ld.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/ln.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/zd.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/zn.jpg"></center>'
+			end
+		end
+	elseif lis = 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/l_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/l_road_n.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/z_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/z_road_n.jpg"></center>'
+			end
+		end
+	elseif lis = 2:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/ld.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/ln.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/zd.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/zn.jpg"></center>'
+			end
+		end
+	elseif rika = 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/ld ('+rand(1,9)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/ln ('+rand(1,3)+').jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/zd ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/zn (1).jpg"></center>'
+			end
+		end
+	elseif boloto >= 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/ld ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/ln ('+rand(1,2)+').jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/zd ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/zn ('+rand(1,2)+').jpg"></center>'
+			end
+		end
+	end
+
+	if onvelyk = 1:
+		if rand (1,8) <= 2:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/ride ('+rand(1,2)+').jpg"></center>'
+		else
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/ridev ('+rand(1,6)+').mp4"></video></center>'
+		end
+	end
+
+	if onvelyk = 0:
+		if coord_x = 11 and coord_y <= 0:
+			act 'I can''t go west, the river is an obstacle':
+				'I can''t go west, the river is an obstacle'
+			end
+		elseif coord_x = 5 and coord_y >= 2:
+			act 'I can''t go west, the river is an obstacle':
+				'I can''t go west, the river is an obstacle'
+			end
+		else
+			act 'go west':
+				coord_x -= 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+
+		if coord_x = 10 and coord_y <= 0:
+			act 'I can''t go east, the river is an obstacle':
+				'I can''t go east, the river is an obstacle'
+			end
+		elseif coord_x = 4 and coord_y >= 2:
+			act 'I can''t go east, the river is an obstacle':
+				'I can''t go east, the river is an obstacle'
+			end
+		else
+			act 'go east':
+				coord_x += 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+
+		if coord_x >= 5 and x <= 6 and coord_y = 1:
+			act 'I can''t go north, the river is an obstacle':
+				'I can''t go north, the river is an obstacle'
+			end
+		else
+			act 'go north':
+				coord_y += 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+
+		if coord_x >= 5 and x <= 6 and coord_y = 2:
+			act 'I can''t go south, the river is an obstacle':
+				'I can''t go south, the river is an obstacle'
+			end
+		else
+			act 'go south':
+				coord_y -= 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+	elseif onvelyk = 1:
+
+
+		if coord_x = 11 and coord_y <= 0:
+			act 'I can''t ride west, the river is an obstacle':
+				'I can''t ride west, the river is an obstacle'
+			end
+		elseif coord_x = 5 and coord_y >= 2:
+			act 'I can''t ride west, the river is an obstacle':
+				'I can''t ride west, the river is an obstacle'
+			end
+		else
+			act 'ride a bike on west':
+				coord_x -= 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				onvelyk = 1
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+
+
+		if coord_x = 10 and coord_y <= 0:
+			act 'I can''t go east, the river is an obstacle':
+				'I can''t go east, the river is an obstacle'
+			end
+		elseif coord_x = 4 and coord_y >= 2:
+			act 'I can''t ride east, the river is an obstacle':
+				'I can''t ride east, the river is an obstacle'
+			end
+		else
+			act 'ride a bike on east':
+				coord_x += 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				onvelyk = 1
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+
+
+		if coord_x >= 5 and x <= 6 and coord_y = 1:
+			act 'I can''t ride north, the river is an obstacle':
+				'I can''t ride north, the river is an obstacle'
+			end
+		else
+			act 'ride a bike on north':
+				coord_y += 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				onvelyk = 1
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+
+		if coord_x >= 5 and x <= 6 and coord_y = 2:
+			act 'I can''t ride south, the river is an obstacle':
+				'I can''t ride south, the river is an obstacle'
+			end
+		else
+			act 'ride a bike on south':
+				coord_y -= 1
+				pole = 0
+				lis = 0
+				rika = 0
+				boloto = 0
+				onvelyk = 1
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+	end
+
+	if onvelyk = 0 and hmyz >= 5:
+		act 'make a fire':
+			*clr & cla
+			hmyz -= 5
+			'I spent some time to make a fire'
+			minut += rand(5,15)
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/vogon_on.jpg"></center>'
+			vogon = hour
+			vogond = daystart
+			vogon_x = coord_x
+			vogon_y = coord_y
+			act 'continue': gt $loc, $loc_arg
+		end
+	end
+
+	if onvelyk = 1:
+		act 'stop and get off the bike':
+			*clr & cla
+			onvelyk = 0
+
+			coord_v_x = coord_x
+			coord_v_y = coord_y
+
+
+			minut -= 5
+			gs 'stat'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/outv.mp4"></video></center>'
+
+			act 'continue': gt $loc, $loc_arg
+		end
+	end
+
+	if onvelyk = 0:
+		act 'Sit and relax (1:00)':
+			cla
+			minut += 60
+			gs 'stat'
+
+			'I spend half an hour relaxing.'
+
+			act 'Continue': gt $loc, $loc_arg
+		end
+		if pcs_sleep < 40:
+			act 'Nap on the ground (2:00)':
+				*clr & cla
+
+				minut += 120
+				pcs_sleep += 20
+				pcs_health += 5
+				pcs_mood += 10
+				gs'stat'
+
+
+				'I am able to make myself fall asleep for about 2 hours, but that is it.'
+				'Even though I had to sleep on the ground, I do wake up feeling a bit more rested.'
+
+				act 'Continue': gt $loc, $loc_arg
+			end
+		end
+		if boletus_cooked > 0:
+			act 'Eat cooked mushrooms (0:15)':
+				*clr & cla
+
+				minut += 15
+				boletus_cooked -= 1
+				pcs_health += 10
+				pcs_mood += 10
+				fat += 1
+				pcs_energy += 20
+				gs'stat'
+
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/boletuscook.jpg"></center>'
+				*nl
+				'I eat some cooked mushrooms. They are pretty tasty.'
+
+				act 'Continue': gt $loc, $loc_arg
+			end
+		end
+		if ryba_cooked > 0:
+			act 'Eat cooked fish (0:15)':
+				*clr & cla
+
+				minut += 15
+				ryba_cooked -= 1
+				pcs_health += 10
+				pcs_mood += 10
+				fat += 1
+				pcs_energy += 20
+				gs'stat'
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/ryba_gotuyu ('+rand(1,2)+').jpg"></center>'
+				*nl
+				'I eat some cooked fish. They are pretty tasty!'
+
+				act 'Continue': gt $loc, $loc_arg
+			end
+		end
+		if bilberry > 0:
+			act 'Eat berries (0:15)':
+				*clr & cla
+
+				minut += 15
+				bilberry -= 1
+				pcs_health += 10
+				pcs_mood += 10
+				fat += 1
+				pcs_energy += 10
+				pcs_hydra += 10
+				gs'stat'
+
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/bilberry.jpg"></center>'
+				*nl
+				'I eat some berries. These are great.'
+
+				act 'Continue': gt $loc, $loc_arg
+			end
+		end
+	end
+
+	if vogon > 0 and coord_x = vogon_x and coord_y = vogon_y:
+		if daystart - vogond > 0:
+			if hour + 24 - vogon > 4:
+				vogon = 0
+				'the fire went out'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/vogon_off.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/vogon_on.jpg"></center>'
+			end
+		elseif daystart - vogond = 0:
+			if hour - vogon > 4:
+				vogon = 0
+				'the fire went out'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/vogon_off.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/vogon_on.jpg"></center>'
+			end
+		end
+
+		if onvelyk = 0:
+			act 'Warm up by the fire (1:00)':
+				*clr & cla
+
+				minut += 60
+				if frost > 0: frost -= 1
+				gs 'stat'
+
+				if hour >= 6 and hour < 21:
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_bonfire2.jpg"></center>'
+				else
+				   '<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_bonfire3.jpg"></center>'
+				end
+				*nl
+				'I spend half an hour huddled by the flames'
+
+				act 'Continue': gt $loc, $loc_arg
+			end
+			if pcs_sleep < 40:
+				act 'Nap by the fire (2:00)':
+					*clr & cla
+
+					minut += 120
+					pcs_sleep += 20
+					pcs_health += 10
+					pcs_mood += 20
+					frost = 0
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_bonfiresleep.jpg"></center>'
+					*nl
+					'I am able to make myself fall asleep for about 2 hours, but that is it.'
+					'Even though I had to sleep on the ground, I do wake up feeling a bit more rested.'
+
+					act 'Continue': gt $loc, $loc_arg
+				end
+			end
+			if boletus > 0:
+				act 'Cook some mushrooms in the fire (0:15)':
+					*clr & cla
+
+					minut += 15
+					boletus_cooked += 1
+					boletus -= 1
+					frost = 0
+					if pcs_servng < 100:servng_exp += 1
+					gs'stat'
+
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/boletushot.jpg"></center>'
+					*nl
+					'I spend 15 minutes grilling some mushrooms in the fire.'
+
+					act 'Continue': gt $loc, $loc_arg
+				end
+			end
+			if ryba > 0:
+				act 'Cook some fish in the fire (0:15)':
+					*clr & cla
+
+					minut += 15
+					ryba_cooked += 1
+					ryba -= 1
+					frost = 0
+					if pcs_servng < 100:servng_exp += 1
+					gs'stat'
+
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/ryba_gotuyu ('+rand(1,2)+').jpg"></center>'
+					*nl
+					'I spend 15 minutes grilling some fish in the fire.'
+
+					act 'Continue': gt $loc, $loc_arg
+				end
+			end
+		end
+	elseif vogon = 0 and coord_x = vogon_x and coord_y = vogon_y:
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/vogon/vogon_off.jpg"></center>'
+		'I was here'
+	end
+
+	if boloto = 2:
+		pole = 0
+		lis = 0
+		rika = 0
+		gt 'mod_public_WC_rab_Mayster7', 'boloto'
+	end
+
+	if coord_x = 0 and coord_y = 0:
+		pole = 0
+		lis = 0
+		rika = 0
+		boloto = 0
+		gt 'mod_public_WC_rab_Mayster7', 'end'
+	end
+
+
+	gs 'mod_public_WC_rab_Mayster7', 'events'
+
+	gs 'mod_public_WC_rab_Mayster7','actions'
+
+	'<i>Ok, I am not sure where am I. I will try to use world directions for not to get lost!</i>'
+end
+
+if $ARGS[0] = 'actions':
+	if (coord_x = 5 and coord_y = 1) or (coord_x = 10 and coord_y = -2) or (coord_x = 4 and coord_y = 4):
+		rika = 1
+	end
+
+	if pole = 1:
+		if sunWeather = 1: poletan += 1
+		if poletan >= 8:
+			pcs_tan += 1
+			poletan = 0
+			gs 'stat'
+		end
+
+		if onvelyk = 0:
+			act 'rest a little in the grass (1:00)':
+				cla
+				if sunWeather = 1:pcs_tan += 1
+				minut += 60
+				if sunWeather = 1 and pcs_sweat < 35 : gs 'sweat', 'add', 5
+
+				gs 'stat'
+				pcs_sleep += 7
+				pcs_health += 4
+				pcs_mood += 7
+				gs 'stat'
+				act 'stand up': gt $loc, $loc_arg
+			end
+		end
+	elseif pole = 2:
+		if sunWeather = 1: poletan += 1
+		if poletan >= 8:
+			pcs_tan += 1
+			poletan = 0
+			gs 'stat'
+		end
+
+		if onvelyk = 0:
+			act 'rest a little in the grass (1:00)':
+				cla
+				if sunWeather = 1:pcs_tan += 1
+				minut += 60
+				if sunWeather = 1 and pcs_sweat < 35 : gs 'sweat', 'add', 5
+
+				gs 'stat'
+				pcs_sleep += 7
+				pcs_health += 4
+				pcs_mood += 7
+				gs 'stat'
+				act 'stand up': gt $loc, $loc_arg
+			end
+		end
+	elseif lis >= 1:
+		if onvelyk = 0:
+			if hmyz < 15:
+				'<i>I can pick up some firewood around here for a fire.</i>'
+				act 'Collect firewood (0:15)':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/'+iif($clothingworntype ! 'nude','firewood_normal.jpg','firewood_nude.jpg')+'"></center>'
+					'I pick up some dry branches and twigs.'
+					hmyz += rand(2,6)
+					if hmyz < 15:
+						'I have <<firewood>> pieces of firewood.'
+					else
+						'I have <<firewood>> pieces of firewood and I can''t carry more.'
+					end
+					minut += 15
+					gs 'stat'
+					act 'Further': gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+
+			if boletus + boletus_cooked + bilberry + ryba_cooked + ryba < 10:
+				act 'Try to find mushrooms (00:30)':
+					if rand(1,100) + pcs_observ >= rand(50,100):
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/mushroom0.'+rand(1,3)+'.jpg"></center>'
+						*nl
+						'Searching in the forest, I stumble upon a clearing full of mushrooms. How lucky!.'
+
+						observ_exp += 1
+						minut += 30
+						boletus += rand(1,3)
+						gs 'stat'
+
+						gs 'gadforest', 'picking_clothes', 'forest_center', 'mushroom'
+						*nl
+						'I begin collecting mushrooms trying to make everything fit in my basket.'
+
+						act 'Continue':gt 'mod_public_WC_rab_Mayster7','ride'
+					else
+						cla
+						observ_exp += rand(0,1)
+						minut += 30
+						gs 'stat'
+						'I have found no mushrooms'
+						act 'Continue':gt 'mod_public_WC_rab_Mayster7','ride'
+					end
+				end
+			else
+				'My basket is totally full! I cannot carry any more.'
+			end
+
+			if boletus + boletus_cooked + bilberry + ryba_cooked + ryba < 10:
+				act 'Try to find mushrooms (00:30)':
+					if rand(1,100) + pcs_observ >= rand(50,100):
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/bilberry'+rand(3,5)+'.jpg"></center>'
+						*nl
+						'Wandering in the forest, I stumble upon a clearing full of berries. How lucky!.'
+
+						observ_exp += 1
+						minut += 30
+						bilberry += rand(2,4)
+						gs 'stat'
+
+						gs 'gadforest', 'picking_clothes', 'forest_center', 'berry'
+						*nl
+						'I begin collecting berries trying to make everything fit in my basket.'
+
+						act 'Continue':gt 'mod_public_WC_rab_Mayster7','ride'
+					else
+						cla
+						observ_exp += rand(0,1)
+						minut += 30
+						gs 'stat'
+						'I have found no berries'
+						act 'Continue':gt 'mod_public_WC_rab_Mayster7','ride'
+					end
+				end
+			else
+				'My basket is totally full! I cannot carry any more.'
+			end
+		end
+	elseif rika = 1:
+		if onvelyk = 0:
+			if $clothingworntype ! 'nude':
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/odiag/0.jpg"></center>'
+				act 'Strip naked':
+					*clr & cla
+					minut += 5
+					$lastwornclothingtype['swim'] = $clothingworntype
+					lastwornclothingnumber['swim'] = clothingwornnumber
+					$lastwornpantytype['swim'] = $pantyworntype
+					lastwornpantynumber['swim'] = pantywornnumber
+					$lastwornbratype['swim'] = $braworntype
+					lastwornbranumber['swim'] = brawornnumber
+					gs 'clothing', 'strip_all', 'VillageRiver'
+					'Without hesitation, I take off all my clothes and neatly fold them before putting them down on a pile.'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/odiag/1 ('+rand(1,2)+').jpg"></center>'
+
+					act 'Continue': gt $loc, $loc_arg
+				end
+			elseif $clothingworntype = 'nude':
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/odiag/2.jpg"></center>'
+				act 'Get dressed':
+					clothesAtLocation = FUNC('lost_clothes_here','VillageRiver')
+					*clr & cla
+					minut += 5
+					gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
+					gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
+					if clothesAtLocation = 1: gs 'clothing', 'recover_lost_clothes', 'VillageRiver', 1
+					act 'Continue': gt $loc, $loc_arg
+				end
+
+
+				act 'swim to other side (without the bike)':
+					*clr & cla
+					if coord_v_x = coord_v_y = 0:
+						coord_v_x = coord_x
+						coord_v_y = coord_y
+						onvelyk = 0
+					end
+					if coord_x = 4 and coord_y > 1:
+						coord_x += 1
+					elseif coord_x = 4 and coord_y = 1:
+						coord_x += 1
+						coord_y += 1
+					elseif coord_x >= 5 and coord_x <= 7 and coord_y = 1:
+						coord_y += 1
+					elseif coord_x = 5 and coord_y > 1:
+						coord_x -= 1
+					elseif coord_x >= 6 and coord_x <= 7 and coord_y = 2:
+						coord_y -= 1
+					elseif coord_x = 10 and coord_y <= 0:
+						coord_x += 1
+					elseif coord_x = 11 and coord_y <= 0:
+						coord_x -= 1
+					end
+
+					cumspclnt = 4
+					gs 'cum_cleanup'
+					minut += 30
+					gs 'exercise', 'tier1', 1, 'stren_exp'
+					gs 'stat'
+
+					pcs_sweat = 0
+					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.</br>'
+
+					if month > 4 and month < 10:
+						if hour >= 6 and hour <= 21:
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater ('+rand(1,10)+').jpg"></center>'
+						else
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater n ('+rand(1,4)+').jpg"></center>'
+						end
+					else
+						if hour >= 8 and hour <= 17:
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater zyma.jpg"></center>'
+						else
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater zyma n.jpg"></center>'
+						end
+					end
+					act 'continue': gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+
+				act 'Go in water to swim and relax (00:30)':
+					gt 'mod_public_WC_rab_Mayster7', 'swim'
+				end
+
+				act 'make an exercise': gt 'mod_public_WC_rab_Mayster7', 'sport'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'swim':
+	*clr & cla
+	cumspclnt = 4
+	gs 'cum_cleanup'
+	minut += 30
+	gs 'exercise', 'tier1', 1, 'stren_exp'
+
+	pcs_sweat = 0
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.</br>'
+
+	if month > 4 and month < 10:
+		if hour >= 6 and hour <= 21:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater ('+rand(1,10)+').jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater n ('+rand(1,4)+').jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour <= 17:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater zyma.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/gowater zyma n.jpg"></center>'
+		end
+	end
+
+	act 'Swim and relax (00:30)':
+		gt 'mod_public_WC_rab_Mayster7', 'swim'
+	end
+
+	act 'Go skinny dipping (00:15)':
+		*clr & cla
+		temp_gr = rand(0,15)
+		cumspclnt = 4
+		gs 'cum_cleanup'
+		minut += 15
+		pcs_sweat = 0
+		pcs_mood += 5
+
+		if pcs_stren < 30: stren_exp += 1
+
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' and '<br>Your deodorant gets washed away in the water.</br>'
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/plav/nyrayu ('+rand(1,2)+').jpg"></center>'
+
+		act 'Ascend':
+			temp_gr = rand(0,15)
+			minut -= 29
+			gs 'stat'
+			gt 'mod_public_WC_rab_Mayster7', 'swim'
+		end
+
+		act 'Search something on the bottom (0:03)':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/plav/pidvodoyu (2).jpg"></center>'
+			temp_gr = rand(0,15)
+			cumspclnt = 4
+			gs 'cum_cleanup'
+			minut += 3
+			pcs_sweat = 0
+			pcs_mood += rand(0,1)
+
+			temp = rand(1,100)
+			if temp <= 5:
+				'I have found a gold coin!'
+				'It costs a lot!'
+				money += rand(1,10) * 500
+			elseif temp <= 10:
+				'I have found a silver coin!'
+				'It costs a lot!'
+				money += rand(1,10) * 100
+			else
+				'I have found nothing'
+			end
+			gs 'stat'
+
+			act 'Ascend':
+				temp_gr = rand(0,15)
+				minut -= 29
+				gs 'stat'
+				gt 'mod_public_WC_rab_Mayster7', 'swim'
+			end
+		end
+	end
+	act 'Get out from water':
+		gt $loc, $loc_arg
+	end
+end
+
+if $ARGS[0] = 'sport':
+	*clr & cla
+	if pole = 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_n.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_n.jpg"></center>'
+			end
+		end
+	elseif pole = 2:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/ld.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/ln.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/zd.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/zn.jpg"></center>'
+			end
+		end
+	elseif lis = 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/l_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/l_road_n.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/z_road_d.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/z_road_n.jpg"></center>'
+			end
+		end
+	elseif lis = 2:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/ld.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/ln.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/zd.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/lis/zn.jpg"></center>'
+			end
+		end
+	elseif rika = 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/ld ('+rand(1,9)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/ln ('+rand(1,3)+').jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/zd ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/zn (1).jpg"></center>'
+			end
+		end
+	elseif boloto >= 1:
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/ld ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/ln ('+rand(1,2)+').jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/zd ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/zn ('+rand(1,2)+').jpg"></center>'
+			end
+		end
+	end
+
+	act 'Go for a run (00:30)':
+		*clr & cla
+		minut += 30
+		mult = 2
+		pcs_stam -= 10
+		gs 'sweat', 'add', (3*mult)
+		fat -= (4 + mult/2)
+		pcs_energy -= 1*mult
+		pcs_hydra -= 2*mult
+		pcs_mood += (3 + mult)
+		vital_exp += rand(0,1)
+		run_exp += rand(0, 1)
+		gs 'stat'
+		killvar 'mult'
+		'<i>The sport here in the middle of nowhere gives my head more clear...I think about my life decisions and how Vania has control over me.. Is it normal?.. Am I ok with it?</i>'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/sport/run.jpg"></center>'
+		act 'continue': gt $loc, $loc_arg
+	end
+
+	act 'Meditate (00:30)':
+		*clr & cla
+		mult = 2
+		minut += 30
+		pcs_stam -= mult * 10
+		gs 'sweat', 'add', (10*mult)
+		fat -= (3 + mult/2)
+		pcs_energy -= 2*mult
+		pcs_hydra -= 4*mult
+		pcs_mood += (5 + mult)
+		vital_exp += rand(0,1)
+		willpowermax += rand(1,2)
+		VaniaMayster -= rand(1,4)
+		gs 'stat'
+		killvar 'mult'
+		'<i>I deeply think about my life decisions and how Vania has control over me.. Is it normal?.. Am I ok with it?</i>'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/rest/sport/meditate.mp4"></video></center>'
+		act 'continue': gt $loc, $loc_arg
+	end
+
+	act 'Jump on the rope (00:30)':
+		*clr & cla
+		mult = 2
+		minut += 30
+		pcs_stam -= 15*mult
+
+		gs 'sweat', 'add', (15*mult)
+		fat -= (2 + mult/2)
+		pcs_energy -= 3*mult
+		pcs_hydra -= 6*mult
+		pcs_mood += (5 + mult)
+		react_exp += rand(0,1)
+		agil_exp += rand(0,1)
+		gs 'stat'
+		killvar 'mult'
+		'<i>The sport here in the middle of nowhere gives my head more clear...I think about my life decisions and how Vania has control over me.. Is it normal?.. Am I ok with it?</i>'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/sport/skak.jpg"></center>'
+		act 'continue': gt $loc, $loc_arg
+	end
+end
+
+if $ARGS[0] = 'boloto':
+	*clr & cla
+
+	if month > 4 and month < 10:
+		if hour >= 6 and hour <= 21:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/ld ('+rand(1,2)+').jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/ln ('+rand(1,2)+').jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour <= 17:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/zd ('+rand(1,2)+').jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/boloto/zn ('+rand(1,2)+').jpg"></center>'
+		end
+	end
+
+	if onvelyk = 1:
+		if coord_y = 1:
+			act 'ride back from the swamp (south)':
+				coord_y -= 1
+				onvelyk = 1
+				killvar 'coord_v_x'
+				killvar 'coord_v_y'
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		elseif coord_y >= 2:
+			act 'ride back from the swamp (west)':
+				coord_x -= 1
+				onvelyk = 1
+				killvar 'coord_v_x'
+				killvar 'coord_v_y'
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+	end
+
+	if onvelyk = 0:
+		act 'go west':
+			coord_x -= 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 1
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+		act 'go east':
+			coord_x += 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 1
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+		act 'go north':
+			coord_y += 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 1
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+		act 'go south':
+			coord_y -= 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 1
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+	end
+
+	if onvelyk = 1:
+		coord_v_x = coord_x
+		coord_v_y = coord_y
+		onvelyk = 0
+		'<i>The bike is almost stuck, I need to ride out the swamp or to left the bike here.</i>'
+		act 'LEFT the bike and go west':
+			coord_x -= 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 0
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+		act 'LEFT the bike and go east':
+			coord_x += 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 0
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+		act 'LEFT the bike and go north':
+			coord_y += 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 0
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+		act 'LEFT the bike and go south':
+			coord_y -= 1
+			pole = 0
+			lis = 0
+			rika = 0
+			boloto = 0
+			onvelyk = 0
+			gt 'mod_public_WC_rab_Mayster7', 'ride'
+		end
+	end
+
+
+	if coord_x = coord_v_x and coord_y = coord_v_y:
+		'This is my byke!'
+		if coord_y = 1:
+			act 'ride back from the swamp (south)':
+				coord_y -= 1
+				onvelyk = 1
+				killvar 'coord_v_x'
+				killvar 'coord_v_y'
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		elseif coord_y >= 2:
+			act 'ride back from the swamp (west)':
+				coord_x -= 1
+				onvelyk = 1
+				killvar 'coord_v_x'
+				killvar 'coord_v_y'
+				gt 'mod_public_WC_rab_Mayster7', 'ride'
+			end
+		end
+	end
+
+
+	if coord_x >= 11 and coord_y >= 0:
+		temp = rand(1,10)
+		if temp + coord_y - boloto_temp >= 6:
+			boloto_temp = 200
+			*clr & cla
+			'As I walk through the swamp, I feel myself begin to sink into the mud with each step.'
+			if $clothingworntype ! 'nude' and PCloSkirt = 0:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp1.jpg"></center>'
+			elseif $clothingworntype ! 'nude' and PCloSkirt > 0:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski1.jpg"></center>'
+			elseif $clothingworntype = 'nude':
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+rand(4,5)+'.jpg"></center>'
+			end
+
+			act 'Struggle':
+				*clr & cla
+				swamp_stuck += 1
+				minut += 15
+				gs 'sweat', 'add', 15
+				gs 'stat'
+				if swamp_stuck mod 3 = 0:
+					swamp_check = pcs_stren + pcs_agil + pcs_bushcraft
+					swamprand = rand(0,225)
+				elseif swamp_stuck mod 2 = 0:
+					swamp_check = pcs_stren + pcs_agil
+					swamprand = rand(0,150)
+				else
+					swamp_check = pcs_stren
+					swamprand = rand(0,75)
+				end
+				if swamp_stuck = 10 and Enable_nogameover = 0:
+					over = 10
+					gt 'gameover'
+				else
+					if swamp_check > swamprand:
+						'<center><H4>Swamp</H4></center>'
+						if $clothingworntype ! 'nude' and PCloSkirt = 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp.jpg"></center>'
+						elseif $clothingworntype ! 'nude' and PCloSkirt > 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski.jpg"></center>'
+						elseif $clothingworntype = 'nude':
+							swamprand = rand(0,3)
+							if swamprand = 0:
+								'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0... jpg"></center>'
+							else
+								'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+swamprand+'.jpg"></center>'
+							end
+						end
+						*nl
+						'My efforts are not in vain as I begin to feel the mud''s hold loosen. With another burst of strength, I free myself and breathe a sigh of relief.'
+						boloto_temp = -100
+
+						act 'Success!':gt 'mod_public_WC_rab_Mayster7','boloto'
+					else
+						'<center><H4>Swamp</H4></center>'
+						if $clothingworntype ! 'nude' and PCloSkirt = 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp1.jpg"></center>'
+						elseif $clothingworntype ! 'nude' and PCloSkirt > 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski1.jpg"></center>'
+						elseif $clothingworntype = 'nude':
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+rand(4,5)+'.jpg"></center>'
+						end
+						*nl
+						'Your efforts are for nothing. The mud''s hold feels as tight as ever. In fact, you feel yourself sinking even deeper.'
+
+						act 'Failure':gt 'mod_public_WC_rab_Mayster7','boloto'
+					end
+				end
+			end
+			if month >= 4 and month <= 10:
+				act 'Scream for help':
+					*clr & cla
+					minut += 15
+					if ((hour >= 8 and hour < 12) or (hour >= 14 and hour < 18)):
+						swamprand = rand(1,4)
+					elseif (hour >= 7 and hour < 23):
+						swamprand = rand(1,5)
+					else
+						swamprand = rand(1,6)
+					end
+					'<center><H4>Swamp</H4></center>'
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/gadforestlosthelp.jpg"></center>'
+					*nl
+					'I don''t think I am strong enough to break free of the mud and decide my best chance is to simply yell for help. Hopefully someone will hear me.'
+					swamprand = 4
+					if swamprand = 1:
+						act 'Success!':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/handshelp.jpg"></center>'
+							*nl 'I hear men speaking and begin to shout louder. The voices come closer, and finally, I feel strong hands grab me and drag me out to solid ground.'
+							gs 'stat'
+
+							act 'Relax':gt 'swamp_yard','start'
+						end
+					else
+						*nl 'I yell out into the void, but my only response is the howling of the wind and the chirp of some crickets.'
+						gs 'stat'
+
+						act 'Failure': gt 'mod_public_WC_rab_Mayster7','ride'
+					end
+				end
+			end
+		else
+			killvar 'boloto_temp'
+			' '
+		end
+	elseif coord_x >= 7 and coord_y >= 1:
+		temp = rand(1,10)
+		if temp + coord_y - boloto_temp >= 6:
+			boloto_temp = 200
+			*clr & cla
+			'As I walk through the swamp, I feel myself begin to sink into the mud with each step.'
+			if $clothingworntype ! 'nude' and PCloSkirt = 0:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp1.jpg"></center>'
+			elseif $clothingworntype ! 'nude' and PCloSkirt > 0:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski1.jpg"></center>'
+			elseif $clothingworntype = 'nude':
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+rand(4,5)+'.jpg"></center>'
+			end
+
+			act 'Struggle':
+				*clr & cla
+				swamp_stuck += 1
+				minut += 15
+				gs 'sweat', 'add', 15
+				gs 'stat'
+				if swamp_stuck mod 3 = 0:
+					swamp_check = pcs_stren + pcs_agil + pcs_bushcraft
+					swamprand = rand(0,225)
+				elseif swamp_stuck mod 2 = 0:
+					swamp_check = pcs_stren + pcs_agil
+					swamprand = rand(0,150)
+				else
+					swamp_check = pcs_stren
+					swamprand = rand(0,75)
+				end
+				if swamp_stuck = 10 and Enable_nogameover = 0:
+					over = 10
+					gt 'gameover'
+				else
+					if swamp_check > swamprand:
+						'<center><H4>Swamp</H4></center>'
+						if $clothingworntype ! 'nude' and PCloSkirt = 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp.jpg"></center>'
+						elseif $clothingworntype ! 'nude' and PCloSkirt > 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski.jpg"></center>'
+						elseif $clothingworntype = 'nude':
+							swamprand = rand(0,3)
+							if swamprand = 0:
+								'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0... jpg"></center>'
+							else
+								'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+swamprand+'.jpg"></center>'
+							end
+						end
+						*nl
+						'My efforts are not in vain as I begin to feel the mud''s hold loosen. With another burst of strength, I free myself and breathe a sigh of relief.'
+						boloto_temp = -100
+
+						act 'Success!':gt 'mod_public_WC_rab_Mayster7','boloto'
+					else
+						'<center><H4>Swamp</H4></center>'
+						if $clothingworntype ! 'nude' and PCloSkirt = 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp1.jpg"></center>'
+						elseif $clothingworntype ! 'nude' and PCloSkirt > 0:
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski1.jpg"></center>'
+						elseif $clothingworntype = 'nude':
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+rand(4,5)+'.jpg"></center>'
+						end
+						*nl
+						'Your efforts are for nothing. The mud''s hold feels as tight as ever. In fact, you feel yourself sinking even deeper.'
+
+						act 'Failure':gt 'mod_public_WC_rab_Mayster7','boloto'
+					end
+				end
+			end
+			if month >= 4 and month <= 10:
+				act 'Scream for help':
+					*clr & cla
+					minut += 15
+					if ((hour >= 8 and hour < 12) or (hour >= 14 and hour < 18)):
+						swamprand = rand(1,4)
+					elseif (hour >= 7 and hour < 23):
+						swamprand = rand(1,5)
+					else
+						swamprand = rand(1,6)
+					end
+					'<center><H4>Swamp</H4></center>'
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/gadforestlosthelp.jpg"></center>'
+					*nl
+					'I don''t think I am strong enough to break free of the mud and decide my best chance is to simply yell for help. Hopefully someone will hear me.'
+
+					if swamprand = 1:
+						act 'Success!':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/handshelp.jpg"></center>'
+							*nl 'I hear men speaking and begin to shout louder. The voices come closer, and finally, I feel strong hands grab me and drag me out to solid ground.'
+							gs 'stat'
+							b_big = 1
+
+							act 'Relax':gt 'mod_public_WC_rab_Mayster7', 'run'
+						end
+					else
+						*nl 'I yell out into the void, but my only response is the howling of the wind and the chirp of some crickets.'
+						gs 'stat'
+
+						act 'Failure': gt 'mod_public_WC_rab_Mayster7','ride'
+					end
+				end
+			end
+		else
+			killvar 'boloto_temp'
+			' '
+
+			if coord_x = 8 and coord_y = 2:
+				cla
+				'<center><H4>Swamp</H4></center>'
+				if month >= 4 and month <= 10:
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/'+iif(DayStage < 4,'gadforestlostswamp.jpg','gadforestlostswamp_night.jpg')+'"></center>'
+				else
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/'+iif(DayStage < 4,'gadforestlostswamp_winter.jpg','gadforestlostswamp_winter_night.jpg')+'"></center>'
+				end
+				*nl
+				minut += 15
+				'After a few minutes walking through the swamp, I almost at the cabin.'
+
+				gs 'stat'
+				b_big = 1
+				act 'Continue': gt 'mod_public_WC_rab_Mayster7', 'run'
+			elseif coord_x >= 7 and coord_y >= 1 and coord_x <= 9 and coord_y <= 3:
+				'I see not far away a hunters cabin'
+				act 'go there':
+					if coord_x ! 8:
+						coord_x = 8
+						gt 'mod_public_WC_rab_Mayster7','ride'
+					elseif coord_y ! 2:
+						coord_y = 2
+						gt 'mod_public_WC_rab_Mayster7','ride'
+					end
+				end
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'events':
+	if pole = 1:
+		temp = rand(1,100)
+		if temp <= 4:
+			'<font size=10>I hear a guitar melody</font>'
+			act 'Search the source of the melody': gt 'mod_public_WC_rab_Mayster71', 'guitarist'
+		elseif temp <= 8:
+			'<font size=10>I see some gay gathers the haystacks</font>'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/1.jpg"></center>'
+			act 'come to the guy': gt 'mod_public_WC_rab_Mayster71', 'sino'
+		elseif temp <= 14 and onvelyk = 1:
+			cla
+			'<font size=10>Some guy stands on the road try to stops me</font>'
+			act 'turn around': ztemp = 2 & gt 'mod_public_WC_rab_Mayster71', 'jora'
+			act 'stop in front of him': ztemp = 1 & gt 'mod_public_WC_rab_Mayster71', 'jora'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/jora/0.jpg"></center>'
+		elseif temp <= 20:
+			'<font size=10>I see some guy not far away goes in my direction</font>'
+			if onvelyk = 1:
+				act 'tease him with my pussy': ztemp = 1 & gt 'mod_public_WC_rab_Mayster72', 'tease'
+				act 'tease him by showing my blow skills': ztemp = 2 & gt 'mod_public_WC_rab_Mayster72', 'tease'
+			else
+				act 'stay on my four and tease him with my holes': gt 'mod_public_WC_rab_Mayster72', 'tease'
+			end
+		end
+	elseif pole = 2:
+		temp = rand(1,100)
+		if temp <= 4:
+			'<font size=10>I hear a guitar melody</font>'
+			act 'Search the source of the melody': gt 'mod_public_WC_rab_Mayster71', 'guitarist'
+		elseif temp <= 8:
+			'<font size=10>I see some guy gathers the haystacks</font>'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/1.jpg"></center>'
+			act 'come to the guy': gt 'mod_public_WC_rab_Mayster71', 'sino'
+		elseif temp <= 14 and onvelyk = 1:
+			cla
+			'<font size=10>Some guy runs toward me, definitely wants to stop me</font>'
+			act 'turn around': ztemp = 2 & gt 'mod_public_WC_rab_Mayster71', 'jora'
+			act 'stop in front of him': ztemp = 1 & gt 'mod_public_WC_rab_Mayster71', 'jora'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/jora/0.jpg"></center>'
+		end
+	elseif lis = 1:
+		temp = rand(1,100)
+		if temp <= 12:
+			'<font size=10>I see some guy not far away goes in my direction</font>'
+			if onvelyk = 1:
+				act 'tease him with my pussy': ztemp = 1 & gt 'mod_public_WC_rab_Mayster72', 'tease'
+				act 'tease him by showing my blow skills': ztemp = 2 & gt 'mod_public_WC_rab_Mayster72', 'tease'
+			else
+				act 'stay on my four and tease him with my holes': gt 'mod_public_WC_rab_Mayster72', 'tease'
+			end
+		elseif temp <= 37 and onvelyk = 1:
+			gt 'mod_public_WC_rab_Mayster71', 'velorape'
+		end
+	elseif lis = 2:
+		temp = rand(1,100)
+		if temp <= 8 and WCzoo = 1 and pcs_magik > 0:
+			gt 'mod_public_WC_rab_Mayster71', 'beast'
+		elseif temp <= 30 and WCzoo = 1:
+			'<font size=10>A big dog runs to me</font>'
+			if onvelyk = 1:
+				act 'ride away from the dog!': ztemp = 1 & gt 'mod_public_WC_rab_Mayster71', 'mastif'
+				act 'stop and wait the dog': ztemp = 2 & gt 'mod_public_WC_rab_Mayster71', 'mastif'
+			else
+				cla
+				act 'run away': ztemp = 1 & gt 'mod_public_WC_rab_Mayster71', 'mastif'
+				act 'wait': ztemp = 2 & gt 'mod_public_WC_rab_Mayster71', 'mastif'
+				act 'stay on my four and give him my holes': ztemp = 3 & gt 'mod_public_WC_rab_Mayster71', 'mastif'
+			end
+		end
+	elseif rika = 1:
+		temp = rand(1,100)
+		if temp <= 24 and onvelyk = 1:
+			cla
+			'<font size=10>Some guy comes from beiind the tree and stands on my way.</font>'
+			act 'turn around': ztemp = 2 & gt 'mod_public_WC_rab_Mayster71', 'jora'
+			act 'stop in front of him': ztemp = 1 & gt 'mod_public_WC_rab_Mayster71', 'jora'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/jora/0.jpg"></center>'
+		end
+	elseif boloto = 1:
+		' '
+	end
+
+	if (coord_x = 5 and coord_y = 1) or (coord_x = 10 and coord_y = -2) or (coord_x = 4 and coord_y = 4):
+		*clr
+		'<font size=10>It''s looks like a beach</font>'
+		'<font size=10>There is a rod! I can use it for fishing</font>'
+
+
+		if month > 4 and month < 10:
+			if hour >= 6 and hour <= 21:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/pliajd.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/pliajn.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour <= 17:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/zpliajd.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/rika/zpliajn.jpg"></center>'
+			end
+		end
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/rybalka/vudka.jpg"></center>'
+
+		act 'start fishing': gt 'mod_public_WC_rab_Mayster7', 'rybalka'
+	elseif coord_x = 5 and coord_y = 3:
+		'<center><H2>Slavka River</H2></center>'
+
+		if month >= 5 and month <= 9:
+			if hour >= 6 and hour < 22:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_night.jpg"></center>'
+			end
+		else
+			if hour >= 8 and hour < 18:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_winter.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_winter_night.jpg"></center>'
+			end
+		end
+
+		'A large river flows lazily a for a few hundred meters in the northern outskirts of Gadukino.'
+
+		if hour >= 6 and hour < 21 and sunWeather = 1: 'You see the local <a href="exec:gt ''gadriver'', ''fishers''">fishermen</a> fishing with their rods on the riverbank.'
+
+		temp_gr = rand(0,20)
+
+		if temp_gr <= 3 and hour < 5 and month >= 5 and month <= 9 and npc_QW['A60'] >= 20: 'Right next to the path leading to the river, you see <a href="exec: gt ''gadriver'', ''mirapunish'' ">Mira</a> naked, bound with ropes between two trees...'
+
+		if temp_gr = 4 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5:
+			if mitkaguysriver ! daystart:
+				mitkaguysriver = daystart
+				'While going to the river you meet Kolyamba and Vasyan. They first invite you to join them, then insist you go with them.'
+
+				act 'Go with them':
+					*clr & cla
+					menu_off = 1
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex17.jpg"></center>'
+					'The boys take you to Vasyan''s house, where, they rudely keep pushing you until you are bent over the kitchen table. They then take turns fucking you...'
+					gs 'boyStat', 'A61'
+					npc_sex[$boy] += 1
+					pose = 1
+					if mesec = 0:
+						gs 'dinsex', 'boy_puts_condom'
+						gs 'dinsex','vaginal_sex',20,'sub','gangbang'
+						gs 'dinsex','sexcum'
+					else
+						gs 'dinSex','boy_wants_anal','','lubri'
+						gs 'dinsex','analsex',20,'sub','gangbang'
+					end
+					gs 'boyStat', 'A62'
+					npc_sex[$boy] += 1
+					if mesec = 0:
+						gs 'dinsex', 'boy_puts_condom'
+						gs 'dinsex','vaginal_sex',20,'sub','gangbang'
+						gs 'dinsex','sexcum'
+					else
+						gs 'dinSex','boy_wants_anal','','lubri'
+						gs 'dinsex','analsex',20,'sub','gangbang'
+					end
+					gs 'stat'
+
+					act 'Finish':minut += 10 & gt'gadukino'
+				end
+			else
+				act 'Go to Gadukino': minut += 20 & b_big = 7 & gt 'mod_public_WC_rab_Mayster7', 'run'
+			end
+		elseif temp_gr = 5 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5:
+			if mitkaguysriver ! daystart:
+				mitkaguysriver = daystart
+				'While walking towards the river you meet the village boys, whom you''ve been drinking with recently. They ask you to go with them.'
+
+				act 'Go with them':
+					*clr & cla
+					menu_off = 1
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex18.jpg"></center>'
+					'The boys lead you to Vasyan''s house and start undressing, following their lead you strip off too, "We''re going to fuck your ass I hope you can enjoy it but I''m not going to be upset if you don''t."'
+					gs 'arousal', 'auto_lube', 'anal'
+					'They don''t say anything more before they spend the next hour fucking you in the ass...'
+					gs 'arousal', 'anal', 20, 'gangbang', 'sub'
+					gs 'arousal', 'anal', 20, 'gangbang', 'sub'
+					gs 'arousal', 'anal', 20, 'gangbang', 'sub'
+					gs 'arousal', 'end'
+					gs 'boyStat', 'A63'
+					npc_sex[$boy] += 1
+					gs 'cum_call','butt',$boy,1
+					gs 'boyStat', 'A61'
+					npc_sex[$boy] += 1
+					gs 'cum_call','butt',$boy,1
+					gs 'boyStat', 'A62'
+					npc_sex[$boy] += 1
+					gs 'cum_call','butt',$boy,1
+					pcs_ass += 3
+					gs 'stat'
+
+					act 'Leave': gt'gadukino'
+				end
+			else
+				act 'Go to Gadukino': minut += 20 & b_big = 7 & gt 'mod_public_WC_rab_Mayster7', 'run'
+			end
+		elseif temp_gr = 6 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5:
+			if mitkaguysriver ! daystart:
+				mitkaguysriver = daystart
+				'On your way to the river you meet Vasyan, he insists you follow him home...'
+
+				act 'Go with him':
+					*clr & cla
+					menu_off = 1
+					gs 'boyStat', 'A62'
+					npc_sex[$boy] += 1
+					pose = 1
+
+					if mesec = 0:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex20.jpg"></center>'
+						'As soon as you open the door, Vasyan pushes you inside and starts pulling your clothes off crudely. Once you are naked, he pushes you towards the sofa and forces you to your knees...'
+						gs 'arousal', 'vaginal', 20, 'sub'
+						gs 'cum_call','butt',$boy,1
+					else
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex21.jpg"></center>'
+						'As soon as you open the door, Vasyan pushes you inside and starts pulling your clothes off crudely. He then throws you onto his bed. Noticing, that you are slightly bleeding he asks if it is that time of the month. You whimper, "Yes." He curses angrily, turns you over and begins roughly fucking your ass...'
+						gs 'arousal', 'anal', 20, 'sub'
+						gs 'cum_call','butt',$boy,1
+					end
+					gs 'arousal', 'end'
+					gs 'stat'
+
+					act 'Finish': b_big = 7 & gt 'mod_public_WC_rab_Mayster7', 'run'
+				end
+			else
+				act 'Run away from Vania and rednecks! Go to the road home (0:10)':b_big = 2 & minut += 20 & gt 'mod_public_WC_rab_Mayster7', 'run'
+			end
+		else
+			act 'Run away from Vania and rednecks! Go to the road home (0:10)':b_big = 2 & minut += 20 & gt 'mod_public_WC_rab_Mayster7', 'run'
+		end
+	elseif coord_x = 0 and coord_y ! 0:
+		'<b><font size=10>If I go more west I will entered the forbiden forest?!</font></b>'
+	elseif coord_x < 0 and coord_y ! 0:
+		'<font size=10>I can''t see any guides I could lost myself</font>'
+		if rand (1,100) >= 70:
+			cla
+			'<font size=10>I am lost!</font>'
+			act 'continue':
+				b_big = 3
+
+				gt 'mod_public_WC_rab_Mayster7', 'run'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'rybalka':
+	*clr & cla
+
+	if month >= 5 and month <= 9:
+		if hour >= 6 and hour < 22:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_night.jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour < 18:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_winter.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver_winter_night.jpg"></center>'
+		end
+	end
+
+
+	'You caught <<ryba>> fish.'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/rybalka/sitka.jpg"></center>'
+
+	act 'Throw the bait':
+		*clr & cla
+		minut += rand(5,10)
+		if hour < 12:
+			temp_gr = rand(5,20)
+		elseif hour >= 12 and hour < 18:
+			temp_gr = rand(0,20)
+		else
+			temp_gr = rand(10,20)
+		end
+		gs 'stat'
+
+		if $clothingworntype ! 'nude':
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/rybalka/fishing ('+rand(1,3)+').jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/rybalka/fishing_naked.jpg"></center>'
+		end
+
+
+		'I throw out the lure and carefully watch the bobber for signs of nibble.'
+
+		if temp_gr > rand(15,19):
+			cla
+			*clr
+			minut += 1
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/river/nofishingriver.jpg"></center>'
+			'Suddenly the bobber dives under the water dramatically. <b>I got one!</b>'
+
+			act 'Pull':
+				cla
+				*clr
+				minut += 1
+				temp_gr = rand(0,120)
+				if temp_gr < 50:react_exp += 1
+				gs 'stat'
+
+				if pcs_react > temp_gr:
+					pcs_mood += rand(5,10)
+					minut += 1
+					react_exp += 1
+					ryba += 1
+					gs 'stat'
+
+					'I skillfully strike, pulling the rod up sharply. I feel the rod straining slightly, and after a few moments, <b>I excitedly pull a fish out of the water.</b>'
+
+					if $clothingworntype ! 'nude':
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/rybalka/catch ('+rand(1,3)+').jpg"></center>'
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/rybalka/catch_naked ('+rand(1,3)+').jpg"></center>'
+					end
+				else
+					pcs_mood -= rand(5,10)
+					minut += 1
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/river/gadriver.jpg"></center>'
+					'I strike, but the lack of tension makes the <b>fish escape from the hook</b>.'
+
+				end
+				act 'continue': gt 'mod_public_WC_rab_Mayster7', 'rybalka'
+			end
+		else
+			'The bobber remains perfectly still, eventually I decide to try a different lure.'
+			act 'Retrieve bait': gt 'mod_public_WC_rab_Mayster7', 'rybalka'
+		end
+	end
+	act 'Finish': gt $loc, $loc_arg
+end
+
+
+
+if $ARGS[0] = 'end':
+	cla
+	'I see the house in the forest'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/dim.jpg"></center>'
+	if month > 4 and month < 10:
+		if hour >= 6 and hour <= 21:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_d.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/l_road_n.jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour <= 17:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_d.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/road_ride/pole/z_road_n.jpg"></center>'
+		end
+	end
+	act 'Ride home': gt 'mod_public_WC_rab_Mayster7', 'home'
+	act 'Ride more, <b>stick to the road</b> (east)': coord_x += 1 & gt 'mod_public_WC_rab_Mayster7', 'ride'
+	act 'Ride more, go to the field (north)': coord_y += 1 & gt 'mod_public_WC_rab_Mayster7', 'ride'
+	act 'Ride more, go to the forest (south)': coord_y -= 1 & gt 'mod_public_WC_rab_Mayster7', 'ride'
+end
+
+if $ARGS[0] = 'home':
+	Vurok += 1
+	if (hour >= 22 and zvit = week and poshuk > 0) or (zvit + 1 = week and poshuk > 0) or (zvit - 6 = week and poshuk > 0):
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'Vania met me.'
+		if onvelyk = 0 and coord_x ! coord_v_x and coord_y ! coord_v_y:
+			vbike = rand(25,60)
+			'"And where is my bike?"'
+			'"Ow, bitch, luckily for you I don''t care about bike much."'
+			'"But you need to restart your bike trainings to understand how to use a bike!"'
+			brak += 5
+			vbike = rand(25,60)
+		end
+		'"WTF BETSI!!! You missed the meet with Tolik!"'
+		'"I will think twice about your next bike ride."'
+		vbrak += 4
+
+		act 'continue': gt 'mod_public_WC_rab_Task', 'start2'
+	else
+		if hour >= 21:
+			*clr & cla
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+			'"Hello, Betsi, you are playing with fire... go to the Tolik and quick!"'
+			'Vania take off the colar''s lock'
+			zashmorg = 1
+
+			'<i>Hmm, could I  go further next time... maybe he is not my boss?</i>'
+			Vaniamayster -= rand(3,5)
+			willpowermax += rand(1,3)
+			gs 'stat'
+
+			if onvelyk = 0 and coord_x ! coord_v_x and coord_y ! coord_v_y:
+				vbike = rand(25,60)
+				'"And where is my bike?"'
+				'"Ow, bitch, luckily for you I don''t care about bike much."'
+				'"But you need to restart your bike trainings to understand how to use a bike!"'
+				brak += 5
+				vbike = rand(25,60)
+			end
+
+			act 'Go to the Tolik': gt 'mod_public_WC_rab', 'vhid'
+		else
+			*clr & cla
+			'<center><b><font color="maroon">The yard where I''m being held</font></b></center>'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/HATA/dim.jpg"></center>'
+
+			if onvelyk = 1:
+				'I come "home" and left the bike on it''s place'
+			end
+
+			'I come "home"...'
+			ktemp = 3657753
+			vbrak -= 2
+			if vbrak < 0: vbrak = 0
+			act 'continue': gt 'mod_public_WC_rab_DVIR', 'dvir'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'Vania':
+	Vurok += 1
+	if (hour >= 22 and zvit = week and poshuk > 0) or (zvit + 1 = week and poshuk > 0) or (zvit - 6 = week and poshuk > 0):
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'Vania rides to me on the bike'
+
+		'"WTF, BETSI!!! You must be home and not here!"'
+
+		if $rope <= 0:
+			if onvelyk = 1:
+				act 'throw a bike as an obstacle to Vania and run away to off-road':
+					ktemp = 105
+					gt 'mod_public_WC_rab_tryrun', 'run'
+				end
+			elseif onvelyk = 0:
+				act 'Run away to off-road':
+					ktemp = 105
+					gt 'mod_public_WC_rab_tryrun', 'run'
+				end
+			end
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+		end
+
+		if $rope > 0:
+			vbike = 200
+			'"Ow...Well, I see you in troubles... it explains a lot..."'
+			'Vania helps me'
+			act 'Go with Vania':
+				minut += rand(5,20)
+				gs 'stat'
+				gt 'mod_public_WC_rab_DVIR', 'dvir'
+			end
+		elseif onvelyk = 0 and coord_x ! coord_v_x and coord_y ! coord_v_y:
+			'"And where is my bike?"'
+			'"Ow, bitch, luckily for you I don''t care about bike much."'
+			'"But you need to restart your bike trainings to understand how to use a bike!"'
+			brak += 5
+			vbike = rand(25,60)
+		end
+
+		if $rope <= 0:
+			'"It''s very doubt you will ride a bike again!"'
+			vbrak += 9
+			brak += 10
+			act 'Go with Vania':
+				minut += rand(5,20)
+				gs 'stat'
+				gt 'mod_public_WC_kara', 'vtecha'
+			end
+		end
+	elseif hour = 21:
+		*clr & cla
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+		'Vania rides to me on a bike...'
+
+		if $rope > 0:
+			vbike = 200
+			'"Well, I see you in troubles... it explains a lot..."'
+			'Vania helps me'
+		elseif onvelyk = 0 and coord_x ! coord_v_x and coord_y ! coord_v_y:
+			'"Hello Betsi"'
+			'"And where is my bike?"'
+			'"Ow, bitch, luckily for you I don''t care about bike much."'
+			'"But you need to restart your bike trainings to understand how to use a bike!"'
+			'"Ok, doesn''t matter for now, it''s time to go home!"'
+			brak += 5
+			vbike = rand(25,60)
+		else
+			'"Hello Betsi, it''s time to go home!"'
+		end
+
+		if $rope <= 0:
+			if onvelyk = 1:
+				act 'throw a bike as an obstacle to Vania and run away to off-road':
+					ktemp = 105
+					gt 'mod_public_WC_rab_tryrun', 'run'
+				end
+			elseif onvelyk = 0:
+				act 'Run away to off-road':
+					ktemp = 105
+					gt 'mod_public_WC_rab_tryrun', 'run'
+				end
+			end
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+		end
+
+		act 'Go with Vania':
+			minut += rand(5,20)
+			gs 'stat'
+			gt 'mod_public_WC_rab_DVIR', 'dvir'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'run':
+	onvelyk = 0
+	poshuk = 0
+	killvar 'vogon_x'
+	killvar 'vogon_y'
+	killvar 'vogond'
+	killvar 'vogon'
+	killvar 'phour'
+	killvar 'pday'
+	poletan = 0
+	killvar 'coord_v_x'
+	killvar 'coord_v_y'
+	vtecha = 1
+	Artem = 0 & Tolik = 0 & Vania = 0
+	brak += 10
+	vbike = 0
+
+	if b_big = 1:
+		killvar 'b_big'
+		gt 'swamp_yard', 'start'
+	elseif b_big = 2:
+		killvar 'b_big'
+		gt 'gadroad'
+	elseif b_big = 3:
+		killvar 'b_big'
+		Y = 0
+		X = 0
+
+		if hour < 16:
+			endhour = hour + 6
+		else
+			endhour = rand(5,6)
+			if week = 7:
+				endday = 1
+			else
+				endday = week + 1
+			end
+		end
+
+		ztemp = 0
+		vtecha = 1
+		Artem = 0
+		Tolik = 0
+		Vania = 0
+		gt 'mod_public_WC_kara71', 'runrun'
+	elseif b_big = 4:
+		killvar 'b_big'
+		minut += rand(30,60)
+		gs 'stat'
+		gt 'mod_public_WC_rab_DVIR', 'dvir'
+	elseif b_big = 5:
+		killvar 'b_big'
+		gt 'mod_public_WC_kara7', 'maniak'
+	elseif b_big = 6:
+		killvar 'b_big'
+		gt 'mod_public_WC_kara7', 'maniakd'
+	elseif b_big = 7:
+		killvar 'b_big'
+		gt'gadukino'
+	end
+end
+--- mod_public_WC_rab_Mayster7 ---------------------------------

locations/mod_public_WC_rab_Mayster71.qsrc

@@ -0,0 +1,2032 @@
+# mod_public_WC_rab_Mayster71
+if $ARGS[0] = 'guitarist':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	'I see a young man behind the bush, who creates that melody'
+	'I stay and listen the music'
+	'In some time he noticed me.'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/1.jpg"></center>'
+	minut += rand(10,20)
+	pcs_mood += rand(10,30)
+	gs 'npcgeneratec', 0, 'a guitarist', rand(18,22)
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	'"WEll, hello! What such a nice girl doing here in the middle of nowhere" - he said with a bit of surprice in his voice'
+
+	act 'just ride and relax':
+		*clr & cla
+		'"Nice...nice, maybe you can sit here and relax while listening my music..."'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/2.jpg"></center>'
+
+		act 'ok': gt 'mod_public_WC_rab_Mayster71', 'listen'
+
+		act 'nah, and go away': gt $loc, $loc_arg
+	end
+
+	act 'I need some...one to ride on':
+		cla
+		'"That... that.. that is wonderfull, I could be that someone!"'
+		'He starts to undress his pants.'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/5.jpg"></center>'
+
+		act 'ride him':
+			*clr & cla
+			if rand(1,2) = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/7 (3).jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/7 (6).jpg"></center>'
+			end
+
+			gs 'arousal', 'vaginal', rand (10,20)
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'He cums on my belly! and starts to dress up.'
+				'"Wow, Girl, It was great!"'
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/8.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 14
+				gs 'cum_manage'
+
+
+				act 'ask to play a guitar':
+					cla
+					'"Easy! take and play"'
+
+					act 'take a guitar and play':
+						*clr & cla
+
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/play'+rand(1,9)+'.jpg"></center>'
+						instrmusic_exp += rand(0,3)
+						pcs_mood += 5
+						minut += rand(15,35)
+
+						if  pcs_instrmusic >= 100:
+							'Music fascinated me and took me to another world, music conveyed harmony to me and the guy'
+							pcs_mood += 10
+						elseif pcs_instrmusic >= 70:
+							'Music comforted my hearing and pleased my soul'
+							pcs_mood += 5
+						elseif pcs_instrmusic >= 40:
+							'AT least my music is entertaining'
+						elseif pcs_instrmusic >= 20:
+							'I can call it a music'
+						else
+							'The cacophony of sounds is cheered me up a little bit.'
+							pcs_mood -= 3
+						end
+						gs 'stat'
+
+						act 'give a guitar and go away': gt $loc, $loc_arg
+
+					end
+
+					act 'Nah, go away': gt $loc, $loc_arg
+				end
+				act 'go away': gt $loc, $loc_arg
+			end
+		end
+
+		act 'blow him': gt 'mod_public_WC_rab_Mayster71', 'gsex'
+
+		act 'run away':
+			*clr & cla
+			willpowermax += rand(0,1)
+			gs 'stat'
+			VaniaMayster -= rand(1,2)
+			'<i>If I can denieds this guy desires... could I make the same things with Vania''s?...</i>'
+			'I thought about this on my run'
+			act 'continue': gt $loc, $loc_arg
+		end
+	end
+
+	act 'can you teach me to play':
+		cla
+		'Of course, sit here and I''ll show you some acords.'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/2.jpg"></center>'
+		act 'ok': gt 'mod_public_WC_rab_Mayster71', 'listen'
+
+		act 'nah, and go away': gt $loc, $loc_arg
+	end
+end
+
+if $ARGS[0] = 'gsex':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	'I am sucking his dick'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/6 ('+rand(1,2)+').jpg"></center>'
+	gs 'arousal', 'bj', rand(10,15)
+	gs 'stat'
+
+	act 'continue':
+		*clr & cla
+		'He turned me around and starts to fuck my pussy'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/7 ('+rand(1,9)+').jpg"></center>'
+
+		gs 'arousal', 'vaginal', rand (10,20)
+		gs 'stat'
+		act 'continue':
+			*clr & cla
+			'He cums on my belly! and starts to dress up.'
+			'"Wow, Girl, It was great!"'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/8.jpg"></center>'
+
+			gs 'boyStat', $npclastgenerated
+			spafinloc = 14
+			gs 'cum_manage'
+
+
+			act 'ask to play a guitar':
+				cla
+				'"Easy! take and play"'
+
+				act 'take a guitar and play':
+					*clr & cla
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/play'+rand(1,9)+'.jpg"></center>'
+					instrmusic_exp += rand(0,3)
+					pcs_mood += 5
+					minut += rand(15,35)
+
+					if  pcs_instrmusic >= 100:
+						'Music fascinated me and took me to another world, music conveyed harmony to me and the guy'
+						pcs_mood += 10
+					elseif pcs_instrmusic >= 70:
+						'Music comforted my hearing and pleased my soul'
+						pcs_mood += 5
+					elseif pcs_instrmusic >= 40:
+						'AT least my music is entertaining'
+					elseif pcs_instrmusic >= 20:
+						'I can call it a music'
+					else
+						'The cacophony of sounds is cheered me up a little bit.'
+						pcs_mood -= 3
+					end
+					gs 'stat'
+
+					act 'give a guitar and go away': gt $loc, $loc_arg
+
+				end
+
+				act 'Nah, go away': gt $loc, $loc_arg
+			end
+			act 'go away': gt $loc, $loc_arg
+		end
+	end
+end
+
+if $ARGS[0] = 'listen':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	'I listen his music and trully start relaxing...'
+	pcs_mood += 5
+	minut += rand (2,5)
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/3.jpg"></center>'
+
+	act 'relaxing':
+		*clr & cla
+		'I am not noticed the moment when he stops playing and starts to touching me'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/4 (1).jpg"></center>'
+
+		gs 'arousal', 'massage', rand(5,15)
+		gs 'stat'
+
+		pcs_mood += 15
+		minut += rand (10,20)
+		gs 'stat'
+
+		gs 'willpower', 'misc', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Run away (<<will_cost>> Willpower)':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/sport/run.jpg"></center>'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+
+				'I am running and running... stops only when I am shure he is far away'
+				coord_x -= rand (1,2)
+
+				minut += 30
+				mult = 2
+				pcs_stam -= 10
+				gs 'sweat', 'add', (3*mult)
+				fat -= (4 + mult/2)
+				pcs_energy -= 1*mult
+				pcs_hydra -= 2*mult
+				pcs_mood += (3 + mult)
+				vital_exp += rand(0,1)
+				run_exp += rand(0, 1)
+				gs 'stat'
+				killvar 'mult'
+
+				act 'look around': gt $loc, $loc_arg
+			end
+		else
+			act 'Run away  (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+
+		act 'let him':
+			*clr & cla
+			'In a short time he starts to kiss me'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/4 (2).jpg"></center>'
+
+			gs 'arousal', 'kiss', rand(1,7)
+			gs 'stat'
+
+
+
+			gs 'willpower', 'misc', 'self', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Run away (<<will_cost>> Willpower)':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/rest/sport/run.jpg"></center>'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+
+					'I am running and running... stops only when I am shure he is far away'
+					coord_x -= rand (1,2)
+
+					minut += 30
+					mult = 2
+					pcs_stam -= 10
+					gs 'sweat', 'add', (3*mult)
+					fat -= (4 + mult/2)
+					pcs_energy -= 1*mult
+					pcs_hydra -= 2*mult
+					pcs_mood += (3 + mult)
+					vital_exp += rand(0,1)
+					run_exp += rand(0, 1)
+					gs 'stat'
+					killvar 'mult'
+
+					act 'look around': gt $loc, $loc_arg
+				end
+			else
+				act 'Run away  (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+
+
+			act 'let him':
+				*clr & cla
+				'He starts to undress his pants.'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/gytaryst/5.jpg"></center>'
+				gs 'arousal', 'voyeur', 3
+
+				act 'blow him': gt 'mod_public_WC_rab_Mayster71', 'gsex'
+
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'jora':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	if ztemp = 1:
+		'It''s a young guy'
+		'"Hey sweety! Lets have some fun"'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/0.jpg"></center>'
+
+		act 'No!, and go away':
+			*clr & cla
+			'Suddenly he locks the leash to my collar and grabs my hair'
+			'"Listen to me, bitch! You will do what I want!"'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+			gs 'pain', rand(2,3), 'hair', 'stretch'
+			gs 'stat'
+
+			act 'obey ':
+				if rika = 1: gt 'mod_public_WC_rab_Mayster71', 'jrika'
+				gt 'mod_public_WC_rab_Mayster71', 'obey'
+			end
+
+			gs 'willpower', 'misc', 'self', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'try to resist (<<will_cost>> Willpower)':
+					*clr & cla
+					Vaniamayster -= 2
+					willpowermax += 1
+
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+
+					temp = rand(50,105)
+					if pcs_jab > temp or pcs_punch > temp or pcs_kick > temp or pcs_def > temp:
+
+						'My tranings was good enough, my skills is very good'
+						'I am knocked him out!'
+						pcs_mood += 40
+						gs 'exercise', 'tier3', 0, 'jab_exp', 'react_exp'
+						gs 'exercise', 'tier3', 0, 'stren_exp', 'punch_exp'
+						gs 'exercise', 'tier3', 0, 'stren_exp', 'kick_exp'
+						gs 'exercise', 'tier3', 0, 'def_exp', 'agil_exp'
+						gs 'stat'
+
+						gs 'pain', rand(0,2), 'tummy', 'kick'
+						gs 'pain', rand(0,2), 'cheeks', 'hit'
+						gs 'pain', rand(0,2), 'thighs', 'kick'
+						gs 'pain', rand(0,2), 'hair', 'stretch'
+						gs 'pain', rand(0,2), 'armL', 'twist'
+						gs 'pain', rand(0,2), 'armR', 'twist'
+						gs 'pain', rand(0,3), 'head', 'hit'
+						gs 'stat'
+
+						act 'continue': gt $loc, $loc_arg
+					else
+						'He hits me hard few times... I have no choice... I obey him.'
+
+
+						gs 'exercise', 'tier3', 0, 'jab_exp', 'react_exp'
+						gs 'exercise', 'tier3', 0, 'stren_exp', 'punch_exp'
+						gs 'exercise', 'tier3', 0, 'stren_exp', 'kick_exp'
+						gs 'exercise', 'tier3', 0, 'def_exp', 'agil_exp'
+						gs 'stat'
+
+						gs 'pain', rand(2,3), 'tummy', 'kick'
+						gs 'pain', rand(2,2), 'cheeks', 'hit'
+						gs 'pain', rand(2,4), 'thighs', 'kick'
+						gs 'pain', rand(2,3), 'hair', 'stretch'
+						gs 'pain', rand(2,5), 'armL', 'twist'
+						gs 'pain', rand(2,5), 'armR', 'twist'
+						gs 'pain', rand(2,6), 'head', 'hit'
+						gs 'stat'
+						act 'obey':
+							if rika = 1: gt 'mod_public_WC_rab_Mayster71', 'jrika'
+							gt 'mod_public_WC_rab_Mayster71', 'obey'
+						end
+					end
+				end
+			else
+				act 'try to resist  (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		end
+
+		act 'lets do it!':
+			*clr & cla
+			if rika = 1 and temper >= 20 : gt 'mod_public_WC_rab_Mayster71', 'rika1'
+
+			if $clothingworntype ! 'nude':
+				'He rudely undressed my top... and start to suck my tits.'
+			else
+				'He starts to play with my boobies'
+			end
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/1.jpg"></center>'
+
+			gs 'arousal', 'foreplay', 10, 'sub', 'rough'
+			gs 'stat'
+
+			act 'continue':
+				*clr & cla
+				'When he play enought with my tits he starts to fingering me to make me wet.'
+				'He undress his pants, suck this!'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/2.jpg"></center>'
+
+				gs 'arousal', 'vaginal_finger', 10, 'sub', 'rough'
+				gs 'stat'
+
+				act 'suck':
+					*clr & cla
+					'I am sucking his dick'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/3.jpg"></center>'
+
+					gs 'arousal', 'bj', rand(10,15), 'sub', 'rough'
+					gs 'stat'
+
+					act 'continue':
+						*clr & cla
+						'He band me and fuck.'
+
+						'"Ow YES, open your mouth!"'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/4.jpg"></center>'
+
+						gs 'arousal', 'vaginal', rand(10,15), 'sub', 'rough'
+						gs 'stat'
+						act 'Open my mouth':
+							*clr & cla
+							'He tottaly fill my mouth'
+							'he dressed his pants - "Good girl..." - he pets my head, - "...Bue" - and goes away'
+
+							gs 'boyStat', $npclastgenerated
+							spafinloc = 11
+							gs 'cum_manage'
+							gs 'boyStat', $npclastgenerated
+							spafinloc = 12
+							gs 'cum_manage'
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/5.jpg"></center>'
+
+							act 'continue': gt $loc, $loc_arg
+						end
+					end
+				end
+			end
+		end
+	elseif ztemp = 2:
+		'I press the pedal quickly... I afraid that guy!'
+		'Suddenly the bike stops and I fly to the ground'
+		gs 'pain', rand(0,4), 'head', 'kick'
+		gs 'pain', rand(0,4), 'lips', 'kick'
+		gs 'pain', rand(0,4), 'nose', 'kick'
+		gs 'pain', rand(0,4), 'armR', 'kick'
+		gs 'pain', rand(0,4), 'tummy', 'kick'
+		gs 'pain', rand(0,4), 'legL', 'kick'
+		gs 'pain', rand(0,4), 'back', 'kick'
+		gs 'stat'
+
+		'I lie down on the ground... my body hurts... I observe the bike''s wheel with a stick in it... and the guy runs to me...'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/velvpav.jpg"></center>'
+
+
+		gs 'willpower', 'misc', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'left the bike and run away! (<<will_cost>> Willpower)':
+				*clr & cla
+
+				gs 'willpower', 'pay', 'self'
+				minut += rand(5,10)
+				gs 'stat'
+				onvelyk = 0
+				coord_v_x = coord_x
+				coord_v_y = coord_y
+				coord_x -= rand(1,2)
+
+				gt $loc, $loc_arg
+			end
+		else
+			act 'left the bike and run away! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+
+		act 'wait':
+			*clr & cla
+			'He comes to me and locks the leash to my collar...'
+			'"Listen to me, bitch! You will do what I want!"'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+
+			act 'obey':
+				if rika = 1: gt 'mod_public_WC_rab_Mayster71', 'jrika'
+				gt 'mod_public_WC_rab_Mayster71', 'obey'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'obey':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	ztemp = 0
+	if pcs_magik > 0: 'I see something unhuman in thr guy''s eyes...'
+	'we walk in a scilense for some time'
+	temp = rand(1,3)
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/kara/7/go/trip<<temp>>.jpg"></center>'
+	minut += rand(15,25)
+	if lis ! 1 or lis ! 2:
+		'We come to the forest'
+		minut += rand(0,15)
+	end
+	gs 'stat'
+
+	onvelyk = 0
+	coord_v_x = coord_x
+	coord_v_y = coord_y
+	coord_x = rand (1,3)
+	coord_y = rand (3,5) * (-1)
+
+	'He ties me to the tree!'
+	if $clothingworntype ! 'nude':
+		'And undress me'
+		gs 'bras', 'remove'
+		gs 'clothing', 'strip'
+		gs 'panties', 'remove'
+		gs 'stat'
+	end
+
+	temp = rand (1,2)
+	if temp = 1:
+		'Stranger takes some branch and grins'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/stick1.mp4"></video></center>'
+		act 'stare terrified':
+			'He use this branch to rub my pussy...'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/stick2.mp4"></video></center>'
+			if pcs_magik > 0:
+				'Sometimes his disguise disappears and I see his real form...'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/monster.mp4"></video></center>'
+			end
+			gs 'arousal', 'foreplay', 5, 'bound', 'beast', 'rough', 'rape'
+			gs 'arousal', 'BDSM', rand(10,15), 'bound', 'beast', 'rough', 'rape'
+			gs 'pain', 5, 'labia', 'burn'
+			gs 'pain', 5, 'breasts', 'slap'
+			gs 'pain', 5, 'nipples', 'slap'
+			gs 'stat'
+			'At last he put the branch aside'
+			act 'wait': gt 'mod_public_WC_rab_Mayster71', 'maniakd2'
+		end
+	else
+		'Stranger grins and starts to put all his focus on my tits...'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/tits1.mp4"></video></center>'
+		'At last he stops'
+		act 'wait':
+			gt 'mod_public_WC_rab_Mayster71', 'maniakd2'
+		end
+
+		gs 'arousal', 'foreplay', 5, 'bound', 'beast', 'rough', 'rape'
+		gs 'arousal', 'BDSM', rand(10,15), 'bound', 'beast', 'rough', 'rape'
+		gs 'pain', 5, 'breasts', 'burn'
+		gs 'pain', 5, 'nipples', 'burn'
+		gs 'pain', 5, 'breasts', 'slap'
+		gs 'pain', 5, 'nipples', 'slap'
+		gs 'pain', 5, 'breasts', 'pinch'
+		gs 'pain', 5, 'nipples', 'pinch'
+		gs 'pain', 5, 'breasts', 'pull'
+		gs 'pain', 5, 'nipples', 'twist'
+		gs 'pain', 5, 'nipples', 'pull'
+		gs 'stat'
+	end
+end
+
+if $ARGS[0] = 'maniakd2':
+	CLOSE ALL
+	menu_off = 0
+	*clr & cla
+
+	if pcs_magik > 0:
+		ztemp = 'cultist'
+	else
+		ztemp = 'maniak'
+	end
+
+
+	if ztemp = 'cultist' or ztemp = 'maniak':
+		'Then <<ztemp>> pulls me down and retied to a tree...'
+	else
+		'Then man pulls me down and retied to a tree...'
+	end
+	*nl
+	minut += 5
+	'He went somewhere but come back in 5 minutes with another branch with a duct-taped dildo! He starts to fuck me with this tool...'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/Dildo_start.mp4"></video></center>'
+	gs 'arousal', 'foreplay', 5, 'bound', 'beast', 'rough', 'rape'
+	gs 'arousal', 'BDSM', rand(5,10), 'bound', 'beast', 'rough', 'rape'
+	gs 'arousal', 'vaginal_dildo', rand(10,15), 'bound', 'beast', 'rough', 'rape'
+	gs 'pain', 2, 'labia', 'burn'
+	stat['vaginal'] += 1
+	gs 'stat'
+	act 'continue':
+		*clr & cla
+		'When he finished to play with my pussy he forced me to suck that dildo.'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/Dildo_bj.mp4"></video></center>'
+		gs 'arousal', 'bj', 5, 'bound', 'beast', 'rough', 'rape'
+		stat['bj'] += 1
+		gs 'stat'
+		act 'continue':
+			*clr & cla
+			'"Now, you are ready for me..."'
+			*nl
+			'He changes my position, and tied be another way.'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/sex_start.mp4"></video></center>'
+			gs 'arousal', 'vaginal', rand(5,10), 'bound', 'beast', 'rough', 'rape'
+			stat['vaginal'] += 1
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/sex_2.mp4"></video></center>'
+				gs 'arousal', 'vaginal', rand(10,20), 'bound', 'beast', 'rough', 'rape'
+				gs 'stat'
+				if pcs_magik > 0:
+					'Sometimes his disguise disappears and I see his real form...'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/sex_monstr_3.mp4"></video></center>'
+				end
+				act 'continue':
+					*clr & cla
+					'He groans and this is stops...'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/night/maniak/sex_fin.mp4"></video></center>'
+
+					if pcs_magik > 0:
+						gs 'npcgeneratec', 0, 'cultist', 420
+						gs 'boyStat', $npclastgenerated
+					else
+						gs 'npcgeneratec', 0, 'maniak', 42
+						gs 'boyStat', $npclastgenerated
+					end
+
+
+					guy += 1
+					rape += 1
+					pcs_vag += 2
+
+
+					cumarrdel = 0
+					cumarrcon = 0
+					spafinloc = 0
+					sparrvol = 120
+					cumarrcpt = 120
+					gs 'cum_manage'
+
+					if pcs_magik > 0:
+						ztemp = 'cultist'
+						gs 'cuminsidereact', 'cultist'
+
+					else
+						ztemp = 'maniak'
+						gs 'cuminsidereact', 'maniak'
+
+					end
+
+					stat['vaginal'] += 1
+					gs 'stat'
+					'<<ztemp>> wore his pants, slap my ass few times...'
+					'...He was looking at me for few minutes... and untied me... I am exhausted and just falls on the ground.'
+					'He goes away'
+					act 'stand up': ztemp = 0 & gt $loc, $loc_arg
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'jrika':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+
+	ztemp = 0
+	if pcs_magik > 0: 'I see something unhuman in thr guy''s eyes...'
+	'we walk to the river'
+
+	temp = rand(1,3)
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/kara/7/go/trip<<temp>>.jpg"></center>'
+	minut += rand(2,5)
+	gs 'stat'
+
+	act 'wait':
+		*clr & cla
+		'He tied me to some rod'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/3 kara.jpg"></center>'
+
+		act 'continue':
+			*clr & cla
+			'And fuck my mouth'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/kara/3/b2.jpg"></center>'
+			gs 'arousal', 'bj', rand(10,15), 'sub', 'rough'
+			gs 'stat'
+
+			act 'continue':
+				*clr & cla
+				'He totally fill my mouth'
+				'he dressed his pants - "Good girl..." - he pets my head, - "...Bue" - and goes away'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 11
+				gs 'cum_manage'
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 12
+				gs 'cum_manage'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/5.jpg"></center>'
+
+				act 'wait':
+					*clr & cla
+					minut += 15
+					gs 'stat'
+
+					'I have gathered my thoughts... I need to do something'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/3 kara.jpg"></center>'
+					cultistrope = rand(1,3)
+					$rope = 100 * cultistrope
+					act 'continue': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'rika1':
+	menu_off = 0
+	*clr & cla
+
+	'Perfect, he takes my hand and take me to the water'
+	'We quickly undress each other and with nonstop kissing'
+	'When we were waist-deep in water...he said "Now blow me".'
+	gs 'arousal', 'flash', 10
+	gs 'stat'
+	gs 'arousal', 'kiss', rand(5,10)
+	gs 'stat'
+
+	if $clothingworntype ! 'nude':
+		$lastwornclothingtype['swim'] = $clothingworntype
+		lastwornclothingnumber['swim'] = clothingwornnumber
+		$lastwornpantytype['swim'] = $pantyworntype
+		lastwornpantynumber['swim'] = pantywornnumber
+		$lastwornbratype['swim'] = $braworntype
+		lastwornbranumber['swim'] = brawornnumber
+		gs 'clothing', 'strip_all', 'VillageRiver'
+	end
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/underwater/start.jpg"></center>'
+
+	act 'blow him':
+		*clr & cla
+		gs 'arousal', 'bj', rand(5,10)
+		gs 'stat'
+		'I feel how he goes to the dipper water, and at some momet I fully dipped in the water.'
+		'He pulls my face to his dick, like commands to blow more!'
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/underwater/1 ('+rand(1,2)+').jpg"></center>'
+		act 'continue sucking him':
+			*clr & cla
+			'I try do my best in sucking... but the luck of air is felt strongly!'
+			'Time to time I pop up to take a needed breath of air.'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/underwater/2 ('+rand(1,4)+').jpg"></center>'
+			gs 'arousal', 'bj', rand(5,10)
+			gs 'stat'
+
+			act 'continue':
+				*clr & cla
+				'At some point he rotates me and start to fuck me'
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/underwater/3 ('+rand(1,7)+').jpg"></center>'
+				gs 'arousal', 'vaginal', rand(10,15)
+				gs 'stat'
+				act 'continue':
+					*clr & cla
+					'He totally controls my orgasm and my life. He decides when it''s a time to breath'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/underwater/3 ('+rand(1,7)+').jpg"></center>'
+					gs 'arousal', 'vaginal', rand(10,15)
+					gs 'stat'
+					$orgasm_or = 'yes'
+					act 'continue':
+						*clr & cla
+						'He cums deeply in me... and we swims to the beach'
+
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/underwater/3 ('+rand(1,7)+').jpg"></center>'
+						gs 'arousal', 'vaginal', rand(10,15)
+						gs 'stat'
+
+						cumspclnt = 4
+						gs 'cum_cleanup'
+						gs 'exercise', 'tier1', 1, 'stren_exp'
+						pcs_sweat = 0
+						if deodorant_on = 1: gs 'sweat', 'remove_deo' and '<br>Your deodorant gets washed away in the water.</br>'
+						gs 'stat'
+
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 0
+						gs 'cum_manage'
+						gs 'stat'
+
+						'He dressed up - "Good girl..." - he pets my head, - "...Bue" - and goes away'
+						act 'continue': gt $loc, $loc_arg
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'jkara':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/Jora/3 kara.jpg"></center>'
+	minut += rand(5,15)
+	gs 'stat'
+
+
+	if hour >= 21 and zvit = week and poshuk = 0:
+		poshuk = 1
+		phour = hour
+		pday = daystart
+	elseif zvit + 1 = week and poshuk = 0:
+		poshuk = 1
+		phour = hour
+		pday = daystart
+	elseif zvit - 6 = week and poshuk = 0:
+		poshuk = 1
+		phour = hour
+		pday = daystart
+	end
+
+
+
+	if poshuk > 0:
+		if daystart - pday > 0:
+			if daystart - pday = 1:
+				poshuk = (daystart - pday) * 4 + (24 - phour)
+			elseif daystart - pday <= 2:
+				poshuk = (daystart - pday) * 12 + (24 - phour)
+			else
+				poshuk = (daystart - pday) * 24 + (24 - phour)
+			end
+		else
+			poshuk = hour - phour
+		end
+
+		if zashmorg = 0: poshuk = poshuk / rand(1,10)
+
+		if coord_x < 0: tempx = coord_x * (0 - 1)
+		if coord_y < 0: tempy = coord_y * (0 - 1)
+
+		if poshuk > tempx + tempy:
+			killvar 'tempx'
+			killvar 'tempy'
+			gt 'mod_public_WC_rab_Mayster7', 'Vania'
+		else
+			killvar 'tempx'
+			killvar 'tempy'
+		end
+		if poshuk = 0: poshuk = 1
+	end
+
+	act 'Try to break the ropes':
+		if pcs_stren >= 90:
+			*clr & cla
+			'I hear the rope crackle, but the rope does not lend itself.'
+			$rope -= pcs_stren * 8 / 10 + 2
+			gs 'mod_public_WC_rab_Mayster71', 'motuzka'
+			if $rope > 0:
+				act 'rest a bit': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+			else
+				*clr & cla
+				'With the loud sound of the rope, it finally bursts.'
+				act 'look around':
+					 gt $loc, $loc_arg
+				end
+			end
+		elseif pcs_stren >= 50:
+			*clr & cla
+			'I hear the rope crackle, but the rope does not lend itself.'
+			$rope -= pcs_stren * 3 / 10 + 2
+			gs 'mod_public_WC_rab_Mayster71', 'motuzka'
+			if $rope > 0:
+				act 'rest a bit': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+			else
+				*clr & cla
+				'With the loud sound of the rope, it finally bursts.'
+				act 'look around':
+					 gt $loc, $loc_arg
+				end
+			end
+		else
+			*clr & cla
+			'I can hear the rope barely cracking, I''m not sure if I have enough strength.'
+			$rope -= 15
+			gs 'mod_public_WC_rab_Mayster71', 'motuzka'
+			if $rope > 0:
+				act 'rest a bit': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+			else
+				*clr & cla
+				'With the loud sound of the rope, it finally bursts.'
+				act 'look around':
+					 gt $loc, $loc_arg
+				end
+			end
+		end
+	end
+	act 'Try to get out of the ropes':
+		if pcs_agil >= 80:
+			*clr & cla
+			'I move my hands, looking for a way to slip out of the shackles.'
+			$rope -= pcs_agil * 8 / 10 + 5
+			gs 'mod_public_WC_rab_Mayster71', 'motuzka'
+			if $rope > 0:
+				act 'rest a bit': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+			else
+				*clr & cla
+				'With the loud sound of the rope, it finally bursts.'
+				act 'look around':
+					 gt $loc, $loc_arg
+				end
+			end
+		elseif pcs_agil >= 50 and pcs_agil < 80:
+			*clr & cla
+			'I move my hands, looking for a way to slip out of the shackles.'
+			$rope -= pcs_agil * 3 / 10 + 5
+			gs 'mod_public_WC_rab_Mayster71', 'motuzka'
+			if $rope > 0:
+				act 'rest a bit': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+			else
+				*clr & cla
+				'With the loud sound of the rope, it finally bursts.'
+				act 'look around':
+					 gt $loc, $loc_arg
+				end
+			end
+		else
+			*clr & cla
+			'I move my hands awkwardly, looking for a way to slip out of the shackles, I''m not sure what I''m doing right.'
+			$rope -= 15
+			gs 'mod_public_WC_rab_Mayster71', 'motuzka'
+			if $rope > 0:
+				act 'rest a bit': gt 'mod_public_WC_rab_Mayster71', 'jkara'
+			else
+				*clr & cla
+				'With the loud sound of the rope, it finally bursts.'
+				act 'look around':
+					 gt $loc, $loc_arg
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'motuzka':
+	if $rope >= 100 * cultistrope: $sylamotuzky = '<font color = green	> █████ </font> '
+	if $rope >= 80 * cultistrope and $rope < 100 * cultistrope: $sylamotuzky = '<font color = blue	> ████_ </font> '
+	if $rope >= 60 * cultistrope and $rope < 80 * cultistrope: $sylamotuzky = '<font color = blue	> ███__ </font> '
+	if $rope >= 40 * cultistrope and $rope < 60 * cultistrope: $sylamotuzky = '<font color = red	> ██___ </font> '
+	if $rope >= 20 * cultistrope and $rope < 40 * cultistrope: $sylamotuzky = '<font color = red	> █____ </font> '
+	if $rope < 20 * cultistrope: $sylamotuzky = '<font color = red	> I am free! </font> '
+	'<center>The rope shackles me by: <<$sylamotuzky>></center>'
+end
+
+
+
+if $ARGS[0] = 'sino':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	'He continue the work but look at me lateral vision'
+	'"Wanna fuck, girl?"'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/1.jpg"></center>'
+	gs 'npcgeneratec', 0, 'a guitarist', rand(25,35)
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	minut += 5
+	gs 'stat'
+
+
+	act 'no!':
+		cla
+		'Then, went to hell out from here!!!'
+		pcs_mood -= rand(5,10)
+		gs 'stat'
+		act 'go away': gt $loc, $loc_arg
+	end
+
+	act 'yes':
+		*clr & cla
+		minut += rand(3,10)
+		gs 'stat'
+
+		'"Nice, come on."'
+		'He grabs my hand and we go to some sort of a shed nearby'
+		'He puts me on the hay and starts to kiss me'
+
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/2.jpg"></center>'
+		gs 'arousal', 'kiss', rand(5,12)
+		gs 'stat'
+
+		act 'continue':
+			*clr & cla
+			'He starts to lick my clitoris'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/3.jpg"></center>'
+			gs 'arousal', 'cuni', rand(10,15)
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				'He is a gentleman, when I become wet enought he starts to fuck me'
+
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/4 ('+rand(1,3)+').jpg"></center>'
+				gs 'arousal', 'vaginal', rand(10,15)
+				gs 'stat'
+				act 'continue':
+					*clr & cla
+					'He wealthy cums on my breasts!'
+
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/sino/5.jpg"></center>'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 15
+					gs 'cum_manage'
+
+					'"It was fun, I need to work" - he dress up and go away'
+					'I have nothing to do but go away too'
+					act 'Go away': gt $loc, $loc_arg
+				end
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'tsex':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	gs 'npcgeneratec', 0, 'a guitarist', rand(22,50)
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	if ztemp = 1:
+		'I suck him'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/bj.jpg"></center>'
+		gs 'arousal', 'bj', rand(10,20)
+		gs 'stat'
+
+		act 'continue':
+			*clr & cla
+			temp = rand(1,32)
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
+			'He cums in my throat'
+			swallow  += 1
+
+			spafinloc = 12
+
+			gs 'sweat', 'add', 5
+
+			gs 'cum_manage'
+			gs 'stat'
+			act 'Freshen up' : gt $loc, $loc_arg
+		end
+	elseif ztemp = 2:
+		gs 'arousal', 'vaginal', rand(10,20)
+		gs 'stat'
+		if rand(1,2) = 1:
+			'He fucks me'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/sex ('+rand(1,3)+').jpg"></center>'
+		else
+			'We use my bike as a support for our sex'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/sex_velo.mp4"></video></center>'
+		end
+		act 'continue':
+			*clr & cla
+			'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
+			'He ends up in me'
+			gs 'sweat', 'add', 15
+			gs 'stat'
+			spafinloc = 0
+			gs 'cuminsidereact', 'Guy'
+			gs 'cum_manage'
+			gs 'stat'
+			act 'Freshen up' : gt $loc, $loc_arg
+		end
+	elseif ztemp = 3:
+		'He spit few times on my anus and starts to fuck it'
+		gs 'arousal', 'anal', rand(10,20)
+		gs 'stat'
+		if rand(1,2) = 1:
+			'He puts me on himself and fucks me '
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/anal.mp4"></video></center>'
+		else
+			'We use my bike as a support for our sex'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/sex_velo.mp4"></video></center>'
+		end
+		act 'continue':
+			*clr & cla
+			'He ends up in me'
+			if rand(1,2) = 1:
+				'He puts me on himself and fucks me '
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/anal.mp4"></video></center>'
+			else
+				'We use my bike as a support for our sex'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/randsex/sex_velo.mp4"></video></center>'
+			end
+			gs 'sweat', 'add', 15
+			gs 'stat'
+			spafinloc = 3
+			gs 'cum_manage'
+			gs 'stat'
+			act 'Freshen up' : gt $loc, $loc_arg
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'velorape':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	gs 'npcgeneratec', 0, 'rapist', rand(18,55)
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	'On my way through the forest...'
+	minut += rand(0,3)
+	gs 'stat'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/start.mp4"></video></center>'
+
+	act 'continue':
+		*clr & cla
+		'they are undressing me on the way to somewhere?!'
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/startrape 1.mp4"></video></center>'
+		gs 'arousal', 'porn', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+		gs 'stat'
+		gs 'arousal', 'foreplay', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+		gs 'stat'
+
+		act 'continue':
+			*clr & cla
+			'the rapist push their dicks to my face, in my mouth, try to penetrate me'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/startrape 2.mp4"></video></center>'
+			gs 'arousal', 'porn', rand(5,10), 'bound', 'sub'
+			gs 'stat'
+			gs 'arousal', 'foreplay', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+			gs 'stat'
+			gs 'arousal', 'bj', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+			minut -= 10
+			gs 'stat'
+
+			act 'continue':
+				*clr & cla
+				'Two of them hold me and one starts to fuck me...'
+				pcs_mood -= rand(10,30)
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/startrape 3 ('+rand(1,2)+').mp4"></video></center>'
+
+				gs 'arousal', 'vaginal', rand(10,15), 'sub', 'rough', 'group', 'gangbang', 'rape'
+
+				gs 'stat'
+				act 'continue':
+					*clr & cla
+					'They rotate me as they want'
+					'I suck one dick while other is fucking my pussy'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/pm '+rand(1,4)+'.mp4"></video></center>'
+
+					gs 'arousal', 'vaginal', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+					gs 'arousal', 'bj', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+					gs 'stat'
+					act 'continue':
+						*clr & cla
+						'They decides to fuck me all at onec'
+
+						if rand(1,2) = 1:
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/3.mp4"></video></center>'
+						else
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/3 m.mp4"></video></center>'
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/3 ap.mp4"></video></center>'
+						end
+
+						gs 'arousal', 'vaginal', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+						gs 'arousal', 'bj', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+						gs 'arousal', 'anal', rand(5,10), 'sub', 'rough', 'group', 'gangbang', 'rape'
+						minut -= 8
+						gs 'stat'
+						act 'continue':
+							*clr & cla
+							'They are finished with me'
+
+							temp = rand(1,3)
+							if temp = 1:
+								'One of them cums on my face'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 11
+								gs 'cum_manage'
+								spafinloc = 12
+								gs 'cum_manage'
+								spafinloc = 16
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/cumonface 2.mp4"></video></center>'
+							elseif temp = 2:
+								'One of them cums on my back'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 8
+								gs 'cum_manage'
+								spafinloc = 4
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/cumonass 3.mp4"></video></center>'
+							elseif temp = 3:
+								'One of them cums in me!'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 0
+								gs 'cum_manage'
+								gs 'cuminsidereact', 'forest rapist'
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Tolik/2/Tolik22.mp4"></video></center>'
+							end
+							gs 'stat'
+							temp = rand(1,3)
+							if temp = 1:
+								'One of them cums on my face'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 11
+								gs 'cum_manage'
+								spafinloc = 12
+								gs 'cum_manage'
+								spafinloc = 16
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/cumonface 2.mp4"></video></center>'
+							elseif temp = 2:
+								'One of them cums on my back'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 8
+								gs 'cum_manage'
+								spafinloc = 4
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/cumonass 3.mp4"></video></center>'
+							elseif temp = 3:
+								'One of them cums in me!'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 0
+								gs 'cum_manage'
+								gs 'cuminsidereact', 'forest rapist'
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Tolik/2/Tolik22.mp4"></video></center>'
+							end
+							gs 'stat'
+							temp = rand(1,3)
+							if temp = 1:
+								'One of them cums on my face'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 11
+								gs 'cum_manage'
+								spafinloc = 12
+								gs 'cum_manage'
+								spafinloc = 16
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/cumonface 2.mp4"></video></center>'
+							elseif temp = 2:
+								'One of them cums on my back'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 8
+								gs 'cum_manage'
+								spafinloc = 4
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/cumonass 3.mp4"></video></center>'
+							elseif temp = 3:
+								'One of them cums in me!'
+								gs 'npcgeneratec', 0, 'a forest rapist', rand(20,55)
+								gs 'boyStat', $npclastgenerated
+								spafinloc = 0
+								gs 'cum_manage'
+								gs 'cuminsidereact', 'forest rapist'
+								gs 'cum_manage'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Tolik/2/Tolik22.mp4"></video></center>'
+							end
+							gs 'stat'
+
+							act 'continue':
+								*clr & cla
+								'They go away...'
+								'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/velyk/event/velo_rape/end.mp4"></video></center>'
+								act 'stand up and look around': gt $loc, $loc_arg
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'mastif':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	if bm_bobik_setup ! 1: bm_bobik_setup = 1 & gs 'mod_public_WC_rab_work_zoo', 'bobik_setup'
+
+	if onvelyk = 1:
+		if ztemp = 1:
+			if onvelyk = 1:
+				act 'ride a bike on west':
+					coord_x -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'ride a bike on east':
+					coord_x += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'ride a bike on north':
+					coord_y += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'ride a bike on south':
+					coord_y -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+		elseif ztemp = 2:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/mastif.jpg"></center>'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/ride_start.jpg"></center>'
+			'The dog comes to me and start barking and puts his muzzle to my pussy'
+
+			ztemp = 0
+			if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
+				act 'go to the dog and kiss it':
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/kiss.mp4"></video></center>'
+					minut += 1
+					npc_QW['A220'] += rand(0,1)
+					temp = rand(1,4)
+					if temp = 4: zoo += 1
+					ztemp = 1
+					gs 'arousal', 'kiss', rand(5,10), 'beast'
+					temp = rand (1,20)
+					if temp = 1: zoo += 1
+					gs 'stat'
+				end
+			end
+			if ztemp <= 1 and ( DogBJ >= 15 or ( DogVag + DogAnal ) >= 10 or zoo >= 15):
+				act 'play with dog''s dick':
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/dickplay.mp4"></video></center>'
+					minut += 1
+					npc_QW['A220'] += rand(0,1)
+					temp = rand(1,4)
+					if temp = 4: zoo += 1
+					ztemp = 2
+					gs 'arousal', 'bj', rand(5,10), 'beast'
+					temp = rand (1,20)
+					if temp = 1: zoo += 1
+					gs 'stat'
+				end
+			end
+
+			act 'I stand on my four':
+				*clr & cla
+				gs 'sweat', 'add', 10
+				zoo += 1
+				'I stand on my four'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/wait dog.mp4"></video></center>'
+				act 'wait': gt 'mod_public_WC_rab_Mayster71', 'ds'
+			end
+
+			if onvelyk = 1:
+				act 'ride a bike on west':
+					coord_x -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'ride a bike on east':
+					coord_x += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'ride a bike on north':
+					coord_y += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'ride a bike on south':
+					coord_y -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					onvelyk = 1
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+		end
+	else
+		if ztemp = 1:
+			if onvelyk = 0:
+				act 'go west':
+					coord_x -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'go east':
+					coord_x += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'go north':
+					coord_y += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'go south':
+					coord_y -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+		elseif ztemp = 2:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/mastif.jpg"></center>'
+			'The dog comes to me and start barking and puts his muzzle to my pussy'
+
+			ztemp = 0
+			if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
+				act 'go to the dog and kiss it':
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/kiss.mp4"></video></center>'
+					minut += 1
+					npc_QW['A220'] += rand(0,1)
+					temp = rand(1,4)
+					if temp = 4: zoo += 1
+					ztemp = 1
+					gs 'arousal', 'kiss', rand(5,10), 'beast'
+					temp = rand (1,20)
+					if temp = 1: zoo += 1
+					gs 'stat'
+				end
+			end
+			if ztemp <= 1 and ( DogBJ >= 15 or ( DogVag + DogAnal ) >= 10 or zoo >= 15):
+				act 'play with dog''s dick':
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/dickplay.mp4"></video></center>'
+					minut += 1
+					npc_QW['A220'] += rand(0,1)
+					temp = rand(1,4)
+					if temp = 4: zoo += 1
+					ztemp = 2
+					gs 'arousal', 'bj', rand(5,10), 'beast'
+					temp = rand (1,20)
+					if temp = 1: zoo += 1
+					gs 'stat'
+				end
+			end
+
+			act 'I stand on my four':
+				*clr & cla
+				gs 'sweat', 'add', 10
+				zoo += 1
+				'I stand on my four'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/wait dog.mp4"></video></center>'
+				act 'wait': gt'mod_public_WC_rab_Mayster71', 'ds'
+			end
+
+			if onvelyk = 0:
+				act 'go west':
+					coord_x -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'go east':
+					coord_x += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'go north':
+					coord_y += 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+				act 'go south':
+					coord_y -= 1
+					pole = 0
+					lis = 0
+					rika = 0
+					boloto = 0
+					gt 'mod_public_WC_rab_Mayster7', 'ride'
+				end
+			end
+		elseif ztemp = 3:
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/tease_rakom ('+rand(1,2)+').jpg"></center>'
+			act 'wait': gt'mod_public_WC_rab_Mayster71', 'ds'
+		end
+	end
+end
+
+if $ARGS[0] = 'ds':
+	*clr & cla
+	'The dogs comes to me and perfectly know what to do... what?!'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/start.jpg"></center>'
+
+	gs 'arousal', 'foreplay', 15, 'sub', 'beast'
+	gs 'arousal', 'end'
+	gs 'stat'
+	pcs_vag += 1
+
+	stat['vaginal'] += 1
+	gs 'stat'
+
+	act 'continue':
+		*clr & cla
+		'The dog starts to penetrates me!'
+		temp = rand (1,2)
+		if temp = 1:
+			'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/pussv ('+rand(1,3)+').mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/puss ('+rand(1,14)+').jpg"></center>'
+		end
+
+		npc_horny['A220'] = 0
+		if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+		DogVag+=1
+
+		npc_QW['A220'] += 1
+		gs 'stat'
+
+		gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Allow to knot me':
+			*clr & cla
+			if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+			gs 'stat'
+
+			temp = rand (1,2)
+
+			if temp = 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,2)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
+			end
+
+
+			gs 'arousal', 'vaginal', 15, 'sub', 'beast', 'rough'
+			gs 'arousal', 'end'
+			gs 'stat'
+			banditboggle = RAND(0,5)
+			if banditboggle <= 3:
+				if pcs_vag < 10:
+					pcs_vag += 4
+					vgape = 3
+					pcs_horny = 0
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'arousal', 'vaginal', 20, 'sub', 'beast'
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag < 25:
+					pcs_vag += 3
+					vgape = 2
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,50)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag < 35:
+					pcs_vag += 2
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				else
+					pcs_vag += 1
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				end
+			else
+				if pcs_vag < 10:
+					minut += 20
+					pcs_vag += 4
+					vgape = 3
+					pcs_horny = 0
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 10:
+					pcs_vag += 3
+					vgape = 1
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				end
+			end
+		end
+
+
+		act 'Prevent':
+			*clr & cla
+			minut += 2
+			if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
+
+			temp = rand (1,2)
+			if temp = 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/pv ('+rand(1,3)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/p.jpg"></center>'
+			end
+
+			gs 'stat'
+			banditboggle = RAND(0,5)
+			if banditboggle <= 1:
+				if pcs_vag < 15:
+					minut += 10
+					pcs_vag += 1
+					vgape = 1
+					pcs_horny -= RAND(10,20)
+					gs 'boyStat', 'A220'
+					spafinloc = 1
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 15 and pcs_vag < 25:
+					pcs_vag += 1
+					gs 'boyStat', 'A220'
+					gs 'stat'
+					if pcs_horny >= 100:
+						minut += 10
+
+						pcs_mood = 100
+						gs 'stat'
+
+						sexvolume = rand(20,500)
+						gs 'cum_manage'
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+						sexvolume = rand(20,150)
+						gs 'cum_manage'
+						gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 25 and pcs_vag < 35:
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 35:
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,590)
+					gs 'cum_manage'
+					gs 'stat'
+					if pcs_horny >= 100:
+
+						pcs_mood = 100
+						gs 'stat'
+
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					else
+						gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+						gs 'arousal', 'end'
+						gs 'stat'
+					end
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				end
+			else
+
+				if pcs_vag < 15:
+					minut += 10
+					pcs_vag += 1
+					if vgape <3:vgape += 1
+					pcs_horny -= RAND(10,20)
+					gs 'stat'
+
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 15 and pcs_vag < 25:
+					pcs_vag += 1
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,50)
+					gs 'cum_manage'
+					gs 'stat'
+
+					gs 'arousal', 'vaginal', 10, 'sub', 'beast'
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 25 and pcs_vag < 35:
+					gs 'boyStat', 'A800'
+					sexvolume = rand(20,300)
+					gs 'cum_manage'
+					gs 'stat'
+
+					gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				elseif pcs_vag >= 35:
+					gs 'boyStat', 'A220'
+					sexvolume = rand(20,300)
+					gs 'cum_manage'
+					gs 'stat'
+
+					gs 'arousal', 'vaginal', 20, 'rough', 'beast'
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+					exit
+				end
+			end
+		end
+	end
+end
+
+
+
+
+if $ARGS[0] = 'beast':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	if onvelyk = 1:
+		'Something... some Beast grabs the bike and I jump out of it in the last moment!!!'
+		'I start to run from it!!!'
+	else
+		'I saw Something... some Beast! I start to run from it!!!'
+	end
+	coord_v_x = coord_x
+	coord_v_y = coord_y
+
+	minut += rand (5,15)
+	gs 'stat'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/tryrun/RUNRUN3.mp4"></video></center>'
+	'Beast runs after me! I am not shure if I can run from it!'
+
+	act 'climb a tree':
+		cla
+		'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/beast/derevo.mp4"></video></center>'
+		'I tried to climb a tree, but it appears to hard for me... And I hanging on a branch...'
+		act 'Try to find something with my feet to push myself':
+			*clr & cla
+			'I feel something hard with my feet and try to use it as a support for climbing...'
+			wait 1500
+			'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/beast/derevo_fin.mp4"></video></center>'
+			'I Hear beast''s moaning. Look down... The beast lie on the ground'
+			gs 'arousal', 'footjob', 5, 'beast', 'feet', 'unknown'
+			stat['footjob'] += 1
+
+			gs 'npcgeneratec', 0, 'le beast', 113
+			gs 'boyStat', $npclastgenerated
+
+			spafinloc = 9
+			sparrvol = 300
+			gs 'cum_manage'
+			gs 'stat'
+			if coord_x <= 0:
+				act 'Jump and run!': b_big = 3 & gt 'mod_public_WC_rab_Mayster7', 'run'
+			else
+				coord_x -= rand(1,3)
+				coord_y -= rand(0,2)
+				act 'Jump and run!': gt $loc, $loc_arg
+			end
+		end
+	end
+
+	act 'continue running':
+		if pcs_agil >= 90 or pcs_run >= 70:
+			*clr & cla
+			'I have run away'
+			minut += 15
+			gs 'sweat', 'add', 15
+			gs 'stat'
+			'I ran away!'
+			act 'take a breath':
+				coord_x -= rand(1,3)
+				coord_y -= rand(0,2)
+				gt $loc, $loc_arg
+			end
+		else
+			*clr & cla
+			'Beast caught me and knocked me down! It growls and rub his dick over my tits... It''s beter to help him'
+			'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/beast/titjob.mp4"></video></center>'
+			gs 'arousal', 'titjob', 20, 'beast', 'rape', 'rough'
+
+			gs 'npcgeneratec', 0, 'le beast', 113
+			gs 'boyStat', $npclastgenerated
+
+			spafinloc = 13
+			sparrvol = 300
+			gs 'cum_manage'
+
+			spafinloc = 14
+			sparrvol = 300
+			gs 'cum_manage'
+
+			spafinloc = 15
+			sparrvol = 300
+			gs 'cum_manage'
+
+			'The beast cums all over my body, and lie down with pleasure on muzzle.'
+			if pcs_sleep <= 20:
+				act 'go to sleep with beast':
+					*clr & cla
+					wait 500
+					temp = rand(45,120)
+					minut += temp
+					if temp > 60:
+						pcs_sleep += 20
+					else
+						pcs_sleep += 8
+					end
+					'I wake up, beast is still sleeping.'
+					act 'run away':
+						if coord_x <= 0:
+							b_big = 3 & gt 'mod_public_WC_rab_Mayster7', 'run'
+						else
+							coord_x -= rand(1,3)
+							coord_y -= rand(0,2)
+							gt $loc, $loc_arg
+						end
+					end
+
+					act 'go to sleep with beast':
+						*clr & cla
+						*nl
+						'...Zzz...'
+						wait 500
+						temp = rand(45,120)
+						minut += temp
+						if temp > 60:
+							pcs_sleep += 20
+						else
+							pcs_sleep += 8
+						end
+						if hour >= endhour:
+							*clr & cla
+							temp = rand(1,3)
+							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/kara/7/go/trip<<temp>>.jpg"></center>'
+							'I woke up because Rednecks tide me up, there is no beast around...'
+							*nl
+							'They put bag on my had and we starts to go somewhere (home, I suppose).'
+							act 'continue': b_big = 4 & gt 'mod_public_WC_rab_Mayster7', 'run'
+						else
+							*clr & cla
+							'I wake up, because some maniak catchs and  carries me somewhere.'
+							'<center><video autoplay loop src="mod/public_WC/lisrab/kara/7/maniakd/unis.mp4"></video></center>'
+							if hour <= 5 or hour >= 22:
+								act 'continue': b_big = 5 & gt 'mod_public_WC_rab_Mayster7', 'run'
+							else
+								act 'continue': b_big = 6 & gt 'mod_public_WC_rab_Mayster7', 'run'
+							end
+						end
+					end
+				end
+			end
+			act 'run away':
+				if coord_x <= 0:
+					b_big = 3 & gt 'mod_public_WC_rab_Mayster7', 'run'
+				else
+					coord_x -= rand(1,3)
+					coord_y -= rand(0,2)
+					gt $loc, $loc_arg
+				end
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster71 ---------------------------------

locations/mod_public_WC_rab_Mayster72.qsrc

@@ -0,0 +1,82 @@
+# mod_public_WC_rab_Mayster72
+if $ARGS[0] = 'tease':
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	if onvelyk = 1:
+		if ztemp = 1:
+			'I stoped in front of a man... I am sure he see my pussy'
+			'I look at him with a seductive look.'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/pussy_show.jpg"></center>'
+			gs 'arousal', 'flash', 10
+			gs 'stat'
+
+			act 'wait':
+				cla
+				temp = rand(1,10)
+				if temp <= 5:
+					'The guy just ignored me...'
+					pcs_mood -= rand(20,30)
+					minut += rand(0,3)
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+				elseif temp <= 8:
+					ztemp = 2
+					gt 'mod_public_WC_rab_Mayster71', 'tsex'
+				elseif temp <= 9:
+					ztemp = 1
+					gt 'mod_public_WC_rab_Mayster71', 'tsex'
+				elseif temp <= 10:
+					ztemp = 3
+					gt 'mod_public_WC_rab_Mayster71', 'tsex'
+				end
+			end
+		elseif ztemp = 2:
+			'I stoped in some 50 meters from the guy'
+			'I am showing him my blow skills'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/velo_bj.jpg"></center>'
+			gs 'arousal', 'bj', 10
+			gs 'stat'
+
+			act 'wait':
+				cla
+				temp = rand(1,10)
+				if temp <= 3:
+					'The guy just ignored me...'
+					pcs_mood -= rand(20,30)
+					minut += rand(0,3)
+					gs 'stat'
+					act 'continue': gt $loc, $loc_arg
+				elseif temp <= 10:
+					ztemp = 2
+					gt 'mod_public_WC_rab_Mayster71', 'tsex'
+				end
+			end
+		end
+	else
+		'I stoped in some 50 meters from the guy'
+		'I stay on my four and tease him with my holes'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/velyk/event/tease/tease_rakom ('+rand(1,2)+').jpg"></center>'
+		gs 'arousal', 'flash', 10
+		gs 'stat'
+
+		act 'wait':
+			cla
+			temp = rand(1,10)
+			if temp <= 4:
+				'The guy just ignored me...'
+				pcs_mood -= rand(20,30)
+				minut += rand(0,3)
+				gs 'stat'
+				act 'continue': gt $loc, $loc_arg
+			elseif temp <= 7:
+				ztemp = 2
+				gt 'mod_public_WC_rab_Mayster71', 'tsex'
+			elseif temp <= 10:
+				ztemp = 3
+				gt 'mod_public_WC_rab_Mayster71', 'tsex'
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster72 ---------------------------------

locations/mod_public_WC_rab_Mayster_cycle.qsrc

@@ -0,0 +1,1221 @@
+# mod_public_WC_rab_Mayster_cycle
+if $ARGS[0] = 'start':
+	*clr & cla
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+
+	'"Betsi, you are my favorite pet, and BDSM lessons with you are very good for my mood)))."'
+
+	'Let''s start'
+
+	vcycle = rand(1,4)
+
+	if vcycle = 1:
+		act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '1'
+	elseif vcycle = 2:
+		act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '2'
+	elseif vcycle = 3:
+		act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+	elseif vcycle = 4:
+		act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+	end
+end
+
+
+
+if $ARGS[0] = '1':
+	*clr & cla
+	'Vania gives me a ball gag'
+	'"I wear the ball gag"'
+
+
+	if rand (1,7) > 3:
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+	end
+	'Nice, Betsi...'
+
+
+	minut += 15
+	if stat['BDSM'] <= 15 and stat['BDSM'] ! 0:
+		'<i>I had some BDSM experience... It start to hurt in 15 minutes, but I can handle it</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(1,3), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] > 15:
+		'<i>With my BDSM experience it was casual waiting, even boring!</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(0,1), 'mouth', 'freeze'
+		gs 'stat'
+	elseif stat['BDSM'] = 0:
+		'<i>In few minutes it starts to hurt, it''s very unpleasant feel</i>'
+		stat['BDSM'] += 1
+		gs 'pain', rand(3,5), 'mouth', 'freeze'
+		gs 'stat'
+	end
+
+	if rand(1,2) = 1:
+		act 'wait':
+			*clr & cla
+			minut += 5
+
+
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				gs 'pain', rand(0,1), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] <= 10:
+				'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+				gs 'pain', rand(3,5), 'mouth', 'freeze'
+				gs 'stat'
+			end
+
+
+			if zashmorg = 3 or zashmorg  = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+			else
+				'Vania takes the collar and locks it on me'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start ('+rand(1,2)+').mp4"></video></center>'
+				stat['BDSM'] += rand(0,1)
+				gs 'stat'
+			end
+			zashmorg = 3
+
+			'Vania takes a leash and lock it to the collar.'
+
+			'"Now, Betsi, sit like a dog"'
+
+			if rand (1,7) > 3:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+			end
+
+
+			act 'Mghght (try to protest)':
+				*clr & cla
+				willpowermax += 1
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+
+
+			act 'sit like a dog':
+				*clr & cla
+				stat['BDSM'] += rand(0,1)
+				vurok += rand(0,1)
+				bdsmurok += 1
+				gs 'stat'
+
+				minut += 30
+				if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+					'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+					gs 'pain', rand(1,3), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] > 25:
+					gs 'pain', rand(0,1), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] <= 10:
+					'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+					gs 'pain', rand(3,5), 'mouth', 'freeze'
+					gs 'stat'
+				end
+
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitv (1).mp4"></video></center>'
+
+				if rand (1,7) > 3:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+				end
+
+				'"Nice pet, let''s go for a walk"'
+
+
+				act 'Mghght (try to protest)':
+					*clr & cla
+					willpowermax += 1
+					VaniaMayster -= 3
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+					'I tierd of this shit, Betsi.'
+					act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+				end
+
+
+				if VaniaMayster >= 100:
+					cla
+					'<i>I obey Vania for so long...</i>'
+					'<i>I can''t say "no" to Vania anymore</i>'
+				end
+
+
+
+				act 'go for a walk':
+					*clr & cla
+
+					minut += 30
+					if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+						'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+						gs 'pain', rand(1,3), 'mouth', 'freeze'
+						gs 'stat'
+					elseif stat['BDSM'] > 25:
+						gs 'pain', rand(0,1), 'mouth', 'freeze'
+						gs 'stat'
+					elseif stat['BDSM'] <= 10:
+						'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+						gs 'pain', rand(3,5), 'mouth', 'freeze'
+						gs 'stat'
+					end
+
+					'It''s so humiliating, I go with Vania like a pet...'
+
+					if rand (1,5) > 4:
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/gov.mp4"></video></center>'
+					else
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/go ('+rand(1,3)+').jpg"></center>'
+					end
+
+					'"My doggy, ask! ask!"'
+
+					act 'Mghght (try to protest)':
+						*clr & cla
+						willpowermax += 1
+						VaniaMayster -= 3
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+						'I tierd of this shit, Betsi.'
+						act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+					end
+
+
+					if VaniaMayster >= 100:
+						cla
+						'<i>I obey Vania for so long...</i>'
+						'<i>I can''t say "no" to Vania anymore</i>'
+					end
+
+					act 'ask like a dog':
+						*clr & cla
+
+
+						'"Good girl, Vania pets me..."'
+						"Very good! let''s go back"
+
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/waitv (1).mp4"></video></center>'
+
+						minut += 30
+						if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+							'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+							gs 'pain', rand(1,3), 'mouth', 'freeze'
+							gs 'stat'
+						elseif stat['BDSM'] > 25:
+							gs 'pain', rand(0,1), 'mouth', 'freeze'
+							gs 'stat'
+						elseif stat['BDSM'] <= 10:
+							'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+							gs 'pain', rand(3,5), 'mouth', 'freeze'
+							gs 'stat'
+						end
+
+						act 'go with Vania':
+							*clr & cla
+							stat['BDSM'] += rand(0,1)
+							minut += 30
+							bdsmurok += 1
+							gs 'stat'
+
+							if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+								'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+								gs 'pain', rand(1,3), 'mouth', 'freeze'
+								gs 'stat'
+							elseif stat['BDSM'] > 25:
+								gs 'pain', rand(0,1), 'mouth', 'freeze'
+								gs 'stat'
+							elseif stat['BDSM'] <= 10:
+								'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+								gs 'pain', rand(3,5), 'mouth', 'freeze'
+								gs 'stat'
+							end
+
+
+							'"Ok, Betsi, good. It''s enought for now"'
+							'"Show me your saliva!"'
+							'"perfect! XD"'
+							'He unlocks the collar'
+							zashmorg = 2
+
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/openmv ('+rand(1,2)+').mp4"></video></center>'
+
+							pcs_mood += rand(0,20)
+							gs 'stat'
+
+
+
+							act 'sit and wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+						end
+					end
+				end
+			end
+		end
+	else
+		act 'undress':
+			*clr & cla
+			inhib_exp += rand(0,1)
+
+			minut += 5
+			willpowermax -= rand(0,1)
+
+			gs 'clothing', 'strip'
+			gs 'underwear', 'remove'
+			gs 'stat'
+
+			if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+				'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+				gs 'pain', rand(1,3), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] > 25:
+				gs 'pain', rand(0,1), 'mouth', 'freeze'
+				gs 'stat'
+			elseif stat['BDSM'] <= 10:
+				'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+				gs 'pain', rand(3,5), 'mouth', 'freeze'
+				gs 'stat'
+			end
+
+
+			if zashmorg = 3 or zashmorg  = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/leash.jpg"></center>'
+			else
+				'Vania takes the collar and locks it on me'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/start ('+rand(1,2)+').mp4"></video></center>'
+				stat['BDSM'] += rand(0,1)
+				gs 'stat'
+			end
+			zashmorg = 3
+
+			'Vania takes a leash and lock it to the collar while I was undressing.'
+
+			'"Now, Betsi, sit like a dog"'
+
+			if rand (1,7) > 3:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+			end
+
+
+			act 'Mghght (try to protest)':
+				*clr & cla
+				willpowermax += 1
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+
+
+
+			act 'sit like a dog':
+				*clr & cla
+				stat['BDSM'] += rand(0,1)
+				vurok += rand(0,1)
+				bdsmurok += 1
+				gs 'stat'
+
+				minut += 30
+				if stat['BDSM'] <= 25 and stat['BDSM'] > 10:
+					'<i>I had some BDSM experience... Mouth hurts, but I can handle it</i>'
+					gs 'pain', rand(1,3), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] > 25:
+					gs 'pain', rand(0,1), 'mouth', 'freeze'
+					gs 'stat'
+				elseif stat['BDSM'] <= 10:
+					'<i><b>Mouth hurts! Mouth hurts! Mouth hurts!</b></i>'
+					gs 'pain', rand(3,5), 'mouth', 'freeze'
+					gs 'stat'
+				end
+
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/povidok/waitnakedv ('+rand(1,2)+').mp4"></video></center>'
+
+				if rand (1,7) > 3:
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrainv ('+rand(1,4)+').mp4"></video></center>'
+				else
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/mouth/mtrain ('+rand(1,3)+').jpg"></center>'
+				end
+
+				act 'sit and wait': gt 'mod_public_WC_rab_Mayster_cycle', 'tied'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = '2':
+	if pirsf = 0:
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_shipka', 't2'
+		else
+			gt 'mod_public_WC_rab_Mayster5_shipka', 'ya2'
+		end
+	else
+		if rand(1,2) = 1:
+			gt 'mod_public_WC_rab_Mayster5_piercetrain', 'ttrain'
+		else
+			if pirsg ! 0:
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'piercwalk'
+			else
+				gt 'mod_public_WC_rab_Mayster5_piercetrain', 'ttrain'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'tied':
+	*clr & cla
+	'"Now lets play with restrains!"'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	vurok += 1
+	bdsmurok += 1
+
+	temp = rand(1,3)
+	if temp = 1:
+		'Vania takes a handcuff - "Show me your hands"'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'stretch out my hands':
+			*clr & cla
+			'Vania locks the handcuff on my hands.'
+			miut += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/naruchi/naruchi ('+rand(1,5)+').jpg"></center>'
+
+
+			vtide = 1
+
+			if vcycle = 3:
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '3'
+			elseif vcycle = 4:
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '4'
+			else
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '7'
+			end
+		end
+	elseif temp = 2:
+		'Vania takes a rope - "turn around"'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'turn around':
+			*clr & cla
+			'I feel how Vania tied my hands behind my back.'
+			miut += 5
+			gs 'stat'
+
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/hands behind/hb ('+rand(1,7)+').jpg"></center>'
+
+			vtide = 2
+
+			if vcycle = 3:
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '3'
+			elseif vcycle = 4:
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '4'
+			else
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '7'
+			end
+		end
+	elseif temp = 3:
+		'Vania takes a rope - "lie down"'
+
+		act 'No!':
+			*clr & cla
+			willpowermax += 1
+			VaniaMayster -= 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+			'I tierd of this shit, Betsi.'
+			act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+		end
+
+		if VaniaMayster >= 100:
+			cla
+			'<i>I obey Vania for so long...</i>'
+			'<i>I can''t say "no" to Vania anymore</i>'
+		end
+
+		act 'lie down':
+			*clr & cla
+			'I feel how Vania tied my hands, legs, everything!..'
+			miut += 5
+			gs 'stat'
+
+			if rand(1,16) <= 5:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/all/allv ('+rand(1,5)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/tide/all/all ('+rand(1,11)+').jpg"></center>'
+			end
+
+
+			vtide = 3
+
+			if vcycle = 3:
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '3'
+			elseif vcycle = 4:
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '4'
+			else
+				act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '7'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = '3':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+	if vtide = 1:
+		'Vania grab some extra ropes and tied me more carrefull to the furniture.'
+	elseif vtide = 2:
+		'Vania grab some extra ropes and tied me more carrefullto the furniture.'
+	elseif vtide = 3:
+		'Vania grab a rope and tied me more carrefull to the furniture.'
+	end
+
+	if pirsf = 0:
+		'Vania locks the chained pins to my nipples'
+	else
+		'Vania locks the chains to my pirced nipples'
+	end
+
+	'<i>I can do nothing, only wait</i>'
+
+	act 'wait':
+		*clr & cla
+
+		'Vania strts to pull the chains... increasing the tension with each moment!'
+
+		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/3/titsv_tension ('+rand(1,3)+').mp4"></video></center>'
+
+		minut += rand(10,20)
+		stat['BDSM'] += rand(1,3)
+
+		if stat['BDSM'] <= 109 and stat['BDSM'] > 79:
+			'<i>I try to explore the pain and opens to it but it''s so damn hard!</i>'
+			gs 'pain', rand(5,8), 'nipples', 'stretch'
+			gs 'stat'
+		elseif stat['BDSM'] > 109:
+			'<i>Yeeees, it feels great!!!</i>'
+			$orgasm_or = 'custom'
+			$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with pleasure...I realize I am about to have an orgasm... I moan loudly as my whole body begins to tremble'
+			gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+			gs 'stat'
+			gs 'pain', rand(0,5), 'nipples', 'stretch'
+			gs 'stat'
+		elseif stat['BDSM'] <= rand (49,79):
+			cla
+			'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+			'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+			'AAA, I am screaming from the isnside of my soul!!!'
+
+			'"Your scream is a honey for my soul, but Betsi, don''t pretend..."'
+
+			gs 'stat'
+			gs 'pain', rand(6,9), 'nipples', 'stretch'
+			gs 'stat'
+		end
+
+		'"Betsi, I am very turnd on about all of this!"'
+
+		act 'wait': gt 'mod_public_WC_rab_Mayster_cycle', '7'
+	end
+end
+
+
+
+if $ARGS[0] = '7':
+	*clr & cla
+	if ( pin1 + pin2 + pin3 > 0 ):
+		pin1 = 0 and pin2 = 0 and pin3 = 0
+		'Vania removes all the pins from me'
+	end
+
+	dick = 17
+	npc_dick[$npclastgenerated] = dick
+	gs 'npcgeneratec', 0, 'Vania', 33
+	$boy[0] = $npclastgenerated
+	$boydesc[0] = $npc_usedname[$npclastgenerated]
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+
+	if vtide = 1:
+		temp = rand(1,3)
+		if temp = 1:
+			'Vania undressed his pants, he stands in between my face and the handcuffs'
+			'I start to blow him'
+			'I can''t control the process, vania uses my hands to controlls me'
+
+			if rand(1,5) <= 2:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bj_n ('+rand(1,2)+').jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bjv_n ('+rand(1,3)+').mp4"></video></center>'
+			end
+
+			gs 'arousal', 'bj', 15, 'rough', 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue sucking':
+				*clr & cla
+				gs 'arousal', 'bj', 10, 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'I feel Vanias'' dick becomes hotter and hotter, Vania pulled my hands and cums deeply in my throat, I can do nothing in this position except swallow everything!'
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/facein/faceinv ('+rand(6,7)+').mp4"></video></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 12
+				gs 'cum_manage'
+				gs 'stat'
+
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 2:
+			'Vania pulls the handcuffs and stands me in the comfy pose for him...'
+			'Vania is fucking me'
+			if rand(1,3) = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag_n (1).jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv_n ('+rand(1,2)+').mp4"></video></center>'
+			end
+			gs 'arousal', 'vaginal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'vaginal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/vag/vag.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 3:
+			'Vania pulls the handcuffs and stands me in the comfy pose for him...'
+			'Vania is fucking my ass'
+
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/assv_n ('+rand(1,3)+').mp4"></video></center>'
+
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/ass_n.jpg"></center>'
+
+			gs 'arousal', 'anal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/ass/tied/ass.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 3
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	elseif vtide = 2:
+		temp = rand(1,3)
+		if temp = 1:
+			'Vania undressed his pants, grab my head and penetrates it'
+			'My hands tied behind me and I can''t push him when he is too deep'
+
+			if rand(1,3) <= 2:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bjv_b ('+rand(1,5)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bj_b (1).jpg"></center>'
+			end
+
+			gs 'arousal', 'bj', 15, 'rough', 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue sucking':
+				*clr & cla
+				gs 'arousal', 'bj', 10, 'rough', 'sub', 'humiliation'
+				gs 'stat'
+
+				if rand (1,2) = 1:
+					'Vania fills my whole mouth with his hot cum'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/facein/faceinv ('+rand(1,7)+').mp4"></video></center>'
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+				else
+					'When Vania starts to cum he pulls out his dick and sprays over me'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/faceon/faceon ('+rand(1,3)+').jpg"></center>'
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 11
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 14
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 15
+					gs 'cum_manage'
+					gs 'stat'
+				end
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 2:
+			'Vania use me as a sex doll...'
+
+			if rand(1,2) = 1:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag_b (1).jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv_b ('+rand(1,2)+').mp4"></video></center>'
+			end
+
+			gs 'arousal', 'vaginal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'vaginal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/vag/vag.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 3:
+			'Vania push me to the floor and starts to fuck my ass'
+
+			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/assv_b ('+rand(1,2)+').mp4"></video></center>'
+
+			gs 'arousal', 'anal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/ass/tied/ass.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 3
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	elseif vtide = 3:
+		temp = rand(1,3)
+		if temp = 1:
+			'I tottaly tied and can do no resistance '
+			'Vania is fucking my head'
+			if rand (1,9) <= 3:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bj ('+rand(1,3)+').jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/bj/bjv ('+rand(1,6)+').mp4"></video></center>'
+			end
+			gs 'arousal', 'bj', 15, 'rough', 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue sucking':
+				*clr & cla
+				gs 'arousal', 'bj', 10, 'rough', 'sub', 'humiliation'
+				gs 'stat'
+
+				if rand (1,2) = 1:
+					'Vania fills my whole mouth with his hot cum'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/facein/faceinv ('+rand(1,7)+').mp4"></video></center>'
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+				else
+					'When Vania starts to cum he pulls out his dick and sprays over me'
+
+					if rand (1,5) <= 3:
+						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/faceon/tied/facon ('+rand(1,3)+').jpg"></center>'
+					else
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/faceon/tied/faceonv ('+rand(1,2)+').mp4"></video></center>'
+					end
+
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 11
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 12
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 14
+					gs 'cum_manage'
+					gs 'stat'
+					gs 'boyStat', $npclastgenerated
+					spafinloc = 15
+					gs 'cum_manage'
+					gs 'stat'
+				end
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 2:
+			'Vania use me as a sex doll...'
+
+			if rand(1,11) <= 4:
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag ('+rand(1,4)+').jpg"></center>'
+			else
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv ('+rand(1,7)+').mp4"></video></center>'
+			end
+			gs 'arousal', 'vaginal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'vaginal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/vag/tied/vag.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 0
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		elseif temp = 3:
+			'Vania push me to the floor and starts to fuck my ass'
+
+			if rand (1,4) ! 1:
+				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/assv ('+rand(1,3)+').mp4"></video></center>'
+			else
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/ass/ass.jpg"></center>'
+			end
+
+			gs 'arousal', 'anal', rand(10,15), 'sub', 'humiliation'
+			gs 'stat'
+			act 'continue':
+				*clr & cla
+				gs 'arousal', 'anal', rand(10,15), 'rough', 'sub', 'humiliation'
+				gs 'stat'
+				'Vania generously cumms in me'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/cum/ass/tied/ass.jpg"></center>'
+
+				gs 'boyStat', $npclastgenerated
+				spafinloc = 3
+				gs 'cum_manage'
+				gs 'stat'
+
+				'"Nice, Betsi, it''s enought for the lesson."'
+				pcs_mood += rand(0,20)
+				gs 'stat'
+				ztemp = 4
+				act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+			end
+		end
+	end
+end
+
+
+
+if $ARGS[0] = '4':
+	*clr & cla
+	if vtide = 1:
+		temp = rand(1,2)
+		if temp = 1:
+			'Vania locks the chain which connects my breasts'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/odiagnuv ('+rand(1,3)+').jpg"></center>'
+		else
+			'Vania tied me with a rope and starts to lift me up'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/start3.jpg"></center>'
+		end
+	elseif vtide = 2:
+		temp = rand(1,2)
+		if temp = 1:
+			'Vania locks the chain which connects my breasts'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/pirsing/tits/odiagnuv ('+rand(1,3)+').jpg"></center>'
+		else
+			'Vania tied me with a rope and starts to lift me up'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/start'+rand(1,3)+'.jpg"></center>'
+		end
+	elseif vtide = 3:
+		temp = 2
+		'Vania starts to lift me up'
+		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/start'+rand(1,3)+'.jpg"></center>'
+	end
+
+
+	act 'wait':
+		if temp = 1:
+			cla
+			'Vania undress his pants and swing his dick in front of me'
+
+			act 'No, crawl away from Vania':
+				*clr & cla
+				willpowermax += 1
+				VaniaMayster -= 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				'I tierd of this shit, Betsi.'
+				act 'continue': gt 'mod_public_WC_rab_Mayster5', 'kara'
+			end
+
+
+			if VaniaMayster >= 100:
+				cla
+				'<i>I obey Vania for so long...</i>'
+				'<i>I can''t say "no" to Vania anymore</i>'
+			end
+
+			act 'open my mouth':
+				*clr & cla
+				'Vania starts to deepfuck my mouth...'
+
+				if stat['bj'] <= 50:
+					*clr & cla
+					'I started to throw up in the exact same second as his dick meet my throat.'
+					'He pulls out his dick, but I throw up few more times.'
+
+					'"You are not ready for this. You need more practice!"'
+
+					'I throw up even few times more.'
+					pcs_mood -= rand(30,70)
+					'"For today the lesson is over"'
+
+					gs 'arousal', 'bj', 1, 'sub'
+					gs 'stat'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/deep/sex/ryg.mp4"></video></center>'
+					ztemp = 4
+					vurok -= 1
+					act 'continue': gt 'mod_public_WC_rab_Mayster', 'end'
+				elseif stat['bj'] <= 100:
+					'Vania quickly and roughtly starts to fuck my mouth.'
+					'<i>He goes very deep... to deep... I was on the edge to throw up</i>'
+
+					gs 'arousal', 'bj', rand(10,29), 'sub'
+					gs 'stat'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/tits_train_bj/1 bj.mp4"></video></center>'
+				else
+					gs 'arousal', 'bj', rand(10,29), 'sub'
+					gs 'stat'
+
+					'Vania quickly and roughtly starts to fuck my mouth.'
+					'<i>He goes very deep'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/tits_train_bj/1 bj.mp4"></video></center>'
+
+					'Sometimes he stops on a moment to ckeck his dick through my neck... and then continue'
+					'"Impressive, Betsi, very good!"'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/holestrain/m/deep/sex/check.mp4"></video></center>'
+				end
+
+				act 'continue sucking':
+					*clr & cla
+					'Vania takes the chain and hooked it on his dick'
+					'My nipples are stretching with each his thrust to my throat'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/tits_train_bj/2 bj.mp4"></video></center>'
+
+					if stat['bj'] <= 100:
+						gs 'arousal', 'bj', rand(10,29), 'sub'
+						gs 'stat'
+					else
+						gs 'arousal', 'bj', rand(10,29), 'sub'
+						gs 'stat'
+						'"Impressive, Betsi, very good!"'
+					end
+
+					stat['BDSM'] += rand(1,3)
+
+					if stat['BDSM'] <= 89 and stat['BDSM'] > 59:
+						'<i>I try to combine the pain with the arousal from blow job!</i>'
+						gs 'pain', rand(5,8), 'nipples', 'stretch'
+						gs 'stat'
+					elseif stat['BDSM'] > 89:
+						'<i>Yeeees, it feels great the mix of pain and pleasure is awesome!!!</i>'
+						$orgasm_or = 'custom'
+						$orgasm_txt = 'I am incredibly turned on! I am overwhelmed with all the feelings...I realize I am about to have an orgasm... I moan as loud as I can with Vania dick in my throat... my whole body begins to tremble'
+						gs 'arousal', 'BDSM', 15, 'sub', 'unknown'
+						gs 'stat'
+						gs 'pain', rand(0,5), 'nipples', 'stretch'
+						gs 'stat'
+					elseif stat['BDSM'] <= rand (39,59):
+						cla
+						'<i><b>AAAAAAAAAAAAAA PAIN! I can''t stand it!!!</b></i>'
+						'<i><b>PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN! PAIN!!!</b></i>'
+						'AA-ghhhhtgh-AAAAA-ggGhh-AAA, I am screaming from the isnside of my soul!'
+
+						'"Your scream is a honey for my soul, but Betsi, don''t pretend..."'
+
+						gs 'stat'
+						gs 'pain', rand(6,9), 'nipples', 'stretch'
+						gs 'stat'
+					end
+
+					act 'continue sucking':
+						*clr & cla
+						'Vania cums on my face'
+						minut += rand (5,15)
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/tits_train_bj/3 cum.mp4"></video></center>'
+
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 12
+						gs 'cum_manage'
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 11
+						gs 'cum_manage'
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 16
+						gs 'cum_manage'
+
+						'"Nice, Betsi, it''s enought for the lesson."'
+						pcs_mood += rand(0,20)
+						gs 'stat'
+						ztemp = rand(1,2)
+						act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				end
+			end
+		elseif temp = 2:
+			*clr & cla
+			'I hang like a chandelier while Vania decides what to do with me...'
+			minut += rand(5,15)
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/povisyv.jpg"></center>'
+
+			act 'wait':
+				*clr & cla
+				temp = rand(1,3)
+
+				if temp = 1:
+					'Vania changes the centre of knots on my body and I sagged upside down'
+					'Vania lies down and aims my mouth to his dick'
+					'I start to suck it'
+
+					gs 'arousal', 'bj', rand(10,29), 'sub'
+					gs 'stat'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/bj/bjv ('+rand(1,3)+').mp4"></video></center>'
+					act 'continue sucking':
+						cla
+
+						'Vania cums as a geyser all over me'
+						'"Nice, Betsi, it''s enought for the lesson."'
+
+						gs 'arousal', 'bj', rand(10,29), 'sub'
+
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 11
+						gs 'cum_manage'
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 12
+						gs 'cum_manage'
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 16
+						gs 'cum_manage'
+						gs 'stat'
+
+						pcs_mood += rand(0,20)
+						gs 'stat'
+						ztemp = rand(1,2)
+						act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				elseif temp = 2:
+					'Vania changes the centre of knots on my body and I hang ass to bottom '
+					'Vania lies down and put his dick in my pussy'
+
+
+					gs 'arousal', 'vaginal', rand(10,29), 'sub'
+					gs 'stat'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/vag/vagv (1).mp4"></video></center>'
+					act 'continue':
+						cla
+
+						'Vania cums as a geyser all over me'
+						'"Nice, Betsi, it''s enought for the lesson."'
+
+						gs 'arousal', 'vaginal', rand(10,29), 'sub'
+
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 11
+						gs 'cum_manage'
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 12
+						gs 'cum_manage'
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 16
+						gs 'cum_manage'
+						gs 'stat'
+
+						pcs_mood += rand(0,20)
+						gs 'stat'
+						ztemp = rand(1,2)
+						act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+					end
+				elseif temp = 3:
+					'Vania changes the centre of knots on my body and I hang ass to bottom '
+					'Vania lies down and aims with his finger'
+
+					gs 'arousal', 'anal_finger', rand(3,5), 'sub'
+					gs 'stat'
+
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/ass/ass_aim.mp4"></video></center>'
+					act 'continue':
+						*clr & cla
+						gs 'arousal', 'anal', rand(10,29), 'sub'
+						gs 'stat'
+
+						'Vania start to fuck my ass'
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/4/verhnyz_sex/ass/assv ('+rand(1,5)+').mp4"></video></center>'
+
+						act 'continue':
+							cla
+							'Vania cums as a geyser all over me'
+							'"Nice, Betsi, it''s enought for the lesson."'
+
+							gs 'arousal', 'anal', rand(10,29), 'sub'
+
+							gs 'boyStat', $npclastgenerated
+							spafinloc = 11
+							gs 'cum_manage'
+							gs 'boyStat', $npclastgenerated
+							spafinloc = 12
+							gs 'cum_manage'
+							gs 'boyStat', $npclastgenerated
+							spafinloc = 16
+							gs 'cum_manage'
+							gs 'stat'
+
+							pcs_mood += rand(0,20)
+							gs 'stat'
+							ztemp = rand(1,2)
+							act 'wait': gt 'mod_public_WC_rab_Mayster', 'end'
+						end
+					end
+				end
+			end
+		end
+	end
+end
+--- mod_public_WC_rab_Mayster_cycle ---------------------------------

locations/mod_public_WC_rab_Task.qsrc

@@ -16,6 +16,8 @@ if $ARGS[0] = 'start2':
 	gs 'stat'
 end
 
+
+
 if $ARGS[0] = 'start':
 	$loc_arg = $ARGS[0]
 	CLOSE ALL
@@ -26,6 +28,9 @@ if $ARGS[0] = 'start':
 	vana = 0
 	minut += 60
 	*clr & cla
+	Vania = 0
+	Artem = 1
+	Tolik = 1
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
 	'Every day at this time we will speak. You are not confined to words during this hour. Now you have <<slova>> words.'
 	'if you help us, I will give you some words'
@@ -106,6 +111,7 @@ if $ARGS[0] = 'start':
 				temp = rand(1,3)
 				'<center><video autoplay loop src="mod/public_WC/lisrab/tolik_zvit/tolik_trah (<<temp>>).mp4"></video></center>'
 				dick = 25
+				npc_dick[$npclastgenerated] = dick
 				stat['vaginal'] += 1
 
 				guy += 1
@@ -281,6 +287,7 @@ if $ARGS[0] = 'start':
 				temp = rand (1,3)
 				'<center><video autoplay loop src="mod/public_WC/lisrab/tolik_zvit/tolik_trah (<<temp>>).mp4"></video></center>'
 				dick = 25
+				npc_dick[$npclastgenerated] = dick
 				gs 'npcgeneratec', 0, 'Tolik', 58
 				stat['vaginal'] += 1
 
@@ -307,6 +314,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
+
 	if week ! finishcumgame and cumgame = 1:
 		if finishcumgame = 1:  'Also remember cumgame will end on  Monday'
 		if finishcumgame = 2:  'Also remember cumgame will end on  Tuesday'
@@ -434,6 +442,7 @@ if $ARGS[0] = 'Tolik_task':
 	end
 end
 
+
 if $ARGS[0] = 'taskdo':
 	CLOSE ALL
 	$menu_loc = 'rabtabir'

locations/mod_public_WC_rab_Tolik.qsrc

@@ -3,6 +3,7 @@ if $ARGS[0] = 'start':
 	if week <= 5 and Tolik ! 2:
 		Tolik = 0
 
+
 		if hour = 6 and $metka = 'dvir':
 			*nl
 			 'Tolik makes sports in the yard'

locations/mod_public_WC_rab_Vania.qsrc

@@ -72,6 +72,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
+
 	if week = 6 and Vania ! 2:
 		Vania = 0
 
@@ -125,6 +126,7 @@ if $ARGS[0] = 'start':
 			end
 		end
 
+
 		if $metka = 'lisnyk_dim':
 			if hour = 6:
 
@@ -134,6 +136,7 @@ if $ARGS[0] = 'start':
 			end
 		end
 
+
 		if $metka = 'spat1':
 			if hour >= 7 and hour <= 12:
 				*nl
@@ -157,6 +160,7 @@ if $ARGS[0] = 'start':
 				Vania = 3
 			end
 
+
 			if hour >= 7 and hour <= 12:
 				*nl
 				'Vania is sleeping'
@@ -178,6 +182,7 @@ if $ARGS[0] = 'start':
 			end
 		end
 
+
 		if $metka = 'dvir':
 
 			if hour = 13:
@@ -190,6 +195,7 @@ if $ARGS[0] = 'start':
 				Vania = 1
 			end
 
+
 			if hour = 20:
 				Vania = 1
 			end

locations/mod_public_WC_rab_gun.qsrc

@@ -56,6 +56,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
+
 	if Vania = 1 or Vania = 3 and ammo > 0:
 		gs 'willpower', 'crime', 'self', 'hard'
 		if will_cost <= pcs_willpwr:
@@ -309,12 +310,19 @@ if $ARGS[0] = 'start':
 	act 'go back': gt $loc, $loc_arg
 end
 
+
 if $ARGS[0] = 'run':
 	gt 'mod_public_WC_rab_gun_run', 'run'
 end
 
 if $ARGS[0] = 'damage':
-	if hour >= 7 and hour <= 20:
+	if ktemp = 105:
+		'I hear Vania voice full of pain...'
+		temp = rand(2,8)
+		Vania = temp
+		if Vania = 2: '...and scilens'
+		killvar 'ktemp'
+	elseif hour >= 7 and hour <= 20:
 		'I hear Artem voice full of pain...'
 		temp = rand(2,8)
 		Artem = temp
@@ -327,6 +335,8 @@ if $ARGS[0] = 'damage':
 	end
 end
 
+
+
 if $ARGS[0] = 'kill':
 	If Vania > 2:
 		'It looks like Vania will survive'
@@ -456,6 +466,7 @@ if $ARGS[0] = 'killall':
 	act 'continue': gt 'mod_public_WC_rab_DVIR','dvir'
 end
 
+
 if $ARGS[0] = 'fightshoot':
 	shoot_exp += 1
 	ammo -= 1
@@ -507,6 +518,7 @@ if $ARGS[0] = 'fightshoot':
 	end
 end
 
+
 if $ARGS[0] = 'tolik':
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/11/aim.jpg"></center>'
 	minut += rand(3,45)
@@ -561,6 +573,7 @@ if $ARGS[0] = 'tolik':
 	end
 end
 
+
 if $ARGS[0] = 'artem':
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/11/aim.jpg"></center>'
 	minut += rand(3,45)

locations/mod_public_WC_rab_gun_rob.qsrc

@@ -61,6 +61,7 @@ if $ARGS[0] = 'start':
 		if bcil <= 0: bcil = 10
 		ztemp = 0
 
+
 		act 'Show him my tits':
 			*clr & cla
 			inhib_exp += rand(1,2)
@@ -100,6 +101,8 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
+
 if $ARGS[0] = 'rob':
 	*clr & cla
 	crime += 1
@@ -541,14 +544,17 @@ if $ARGS[0] = 'rob':
 	end
 end
 
+
 if $ARGS[0] = 'hit':
 	gt 'mod_public_WC_rab_gun_rob2', 'hit'
 end
 
+
 if $ARGS[0] = 'surrender':
 	gt 'mod_public_WC_rab_gun_rob2', 'surrender'
 end
 
+
 if $ARGS[0] = 'fight':
 	*clr & cla
 	gun = 3
@@ -560,18 +566,27 @@ if $ARGS[0] = 'fight':
 	gt 'fight', 'start'
 end
 
+
 if $ARGS[0] = 'runaway':
 	gt 'mod_public_WC_rab_gun_rob2', 'runaway'
 end
 
+
+
 if $ARGS[0] = 'runtogun':
 	gt 'mod_public_WC_rab_gun_rob2', 'runtogun'
 end
 
+
+
 if $ARGS[0] = 'rape':
 	gt 'mod_public_WC_rab_gun_rob2', 'rape'
 end
 
+
+
+
+
 if $ARGS[0] = 'sex':
 	cla
 	ztemp = 214
@@ -710,6 +725,7 @@ if $ARGS[0] = 'vaginal':
 		act 'Suck his dick':
 			*clr & cla
 			dick = rand(14,30)
+			npc_dick[$npclastgenerated] = dick
 			gs 'arousal', 'bj', rand(5, 15)
 			stat['bj'] += 1
 			gs 'sweat', 'add', 5
@@ -720,6 +736,7 @@ if $ARGS[0] = 'vaginal':
 			act 'Let him fuck you':
 				*clr & cla
 
+
 				gs 'arousal', 'vaginal', rand(20,40)
 				stat['vaginal'] += 1
 				guy += 1
@@ -764,6 +781,7 @@ if $ARGS[0] = 'vaginal':
 			gs 'stat'
 			temp =rand(1,7)
 			dick = rand(14,30)
+			npc_dick[$npclastgenerated] = dick
 
 			gs 'arousal', 'vaginal', rand(20,40)
 			stat['vaginal'] += 1
@@ -830,6 +848,7 @@ if $ARGS[0] = 'anal':
 				act 'Suck his dick':
 					*clr & cla
 					dick = rand(14,30)
+					npc_dick[$npclastgenerated] = dick
 					gs 'arousal', 'bj', rand(5, 15)
 					stat['bj'] += 1
 					gs 'sweat', 'add', 5
@@ -840,6 +859,7 @@ if $ARGS[0] = 'anal':
 					act 'Get fucked':
 						*clr & cla
 
+
 						gs 'arousal', 'vaginal', rand(20,40)
 						stat['vaginal'] += 1
 						guy += 1
@@ -905,6 +925,7 @@ if $ARGS[0] = 'anal':
 					act 'Suck his dick':
 						*clr & cla
 						dick = rand(14,30)
+						npc_dick[$npclastgenerated] = dick
 						gs 'arousal', 'bj', rand(5, 15)
 						stat['bj'] += 1
 						gs 'sweat', 'add', 5
@@ -915,6 +936,7 @@ if $ARGS[0] = 'anal':
 						act 'Get fucked':
 							*clr & cla
 
+
 							gs 'arousal', 'vaginal', rand(20,40)
 							stat['vaginal'] += 1
 							guy += 1
@@ -972,6 +994,7 @@ if $ARGS[0] = 'anal':
 			gs 'stat'
 			temp =rand(1,7)
 			dick = rand(14,30)
+			npc_dick[$npclastgenerated] = dick
 
 			gs 'arousal', 'vaginal', rand(20,40)
 			stat['vaginal'] += 1

locations/mod_public_WC_rab_gun_rob2.qsrc

@@ -68,6 +68,7 @@ if $ARGS[0] = 'hit':
 	end
 end
 
+
 if $ARGS[0] = 'surrender':
 	cla
 	'I just give up'
@@ -111,6 +112,7 @@ if $ARGS[0] = 'surrender':
 	end
 end
 
+
 if $ARGS[0] = 'fight':
 	*clr & cla
 	gun = 3
@@ -122,6 +124,7 @@ if $ARGS[0] = 'fight':
 	gt 'fight', 'start'
 end
 
+
 if $ARGS[0] = 'runaway':
 	*clr & cla
 	agil_exp += rand(0, 2)
@@ -216,6 +219,8 @@ if $ARGS[0] = 'runaway':
 	end
 end
 
+
+
 if $ARGS[0] = 'runtogun':
 	cla
 	'I ran with all my speed to the gun!'
@@ -269,6 +274,8 @@ if $ARGS[0] = 'runtogun':
 	end
 end
 
+
+
 if $ARGS[0] = 'rape':
 	*clr & cla
 	crime -= 2

locations/mod_public_WC_rab_gun_run.qsrc

@@ -18,7 +18,12 @@ if $ARGS[0] = 'run':
 			if pcs_shoot >= 95:
 				*clr & cla
 				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/11/aim.jpg"></center>'
-				if hour >= 7 and hour <= 20:
+				if ktemp = 105:
+					'I see Vania'
+					Vania = 3
+					killvar 'ktemp'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				elseif hour >= 7 and hour <= 20:
 					'I see Artem'
 					Artem = 3
 					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Artem/Artem.jpg"></center>'
@@ -27,7 +32,6 @@ if $ARGS[0] = 'run':
 					Vania = 3
 					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
 				end
-
 				act	'try to kill':
 					*clr & cla
 					'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/11/gunshoot_main.mp4"></video></center>'
@@ -194,7 +198,12 @@ if $ARGS[0] = 'run':
 			if pcs_shoot >= 80:
 				*clr & cla
 				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/11/aim.jpg"></center>'
-				if hour >= 7 and hour <= 20:
+				if ktemp = 105:
+					'I see Vania'
+					Vania = 3
+					killvar 'ktemp'
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
+				elseif hour >= 7 and hour <= 20:
 					'I see Artem'
 					Artem = 3
 					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Artem/Artem.jpg"></center>'

locations/mod_public_WC_rab_livesklad.qsrc

@@ -4,19 +4,24 @@ if $ARGS[0] = 'start':
 	menu_off = 1
 	$location_type = 'secluded'
 
+
 	$loc = 'mod_public_WC_rab_livesklad'
 	$metka = 'start'
 	$menu_loc = 'mod_public_WC_rab_livesklad'
 	$menu_arg = 'start'
 	$loc_arg = $ARGS[0]
 
+
 	dick = 17
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Vania', 33
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
 	gs 'boyStat', $npclastgenerated
 	gs 'stat'
 
+
+
 	*clr & cla
 	gs 'stat'
 	if slova <= 0: slova = 0
@@ -30,11 +35,119 @@ if $ARGS[0] = 'start':
 	task7 = 0
 	if cumgame ! 0: cumgame = 0
 
+
+
 	'<center><b><font color="maroon">My prison room</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/live_sklad/live_sklad'+rand(1,6)+'.jpg"></center>'
 
+
+
+	if ropeslack = 2:
+		'Vania made a mistake! There is a slack in a rope.'
+		gs 'mod_public_WC_cabine', 'motuzka'
+		gs 'stat'
+
+		act 'Try to break the ropes':
+			cla
+			minut += rand(45,90)
+			gs 'stat'
+			if pcs_stren >= 90:
+				cla
+				'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
+				$rope = 0
+				gs 'mod_public_WC_cabine', 'motuzka'
+				act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
+			elseif pcs_stren >= 50:
+				cla
+				'I hear the rope crackle, but the rope does not brake.'
+				$rope -= pcs_stren * 3 / 10 + 2
+				gs 'mod_public_WC_cabine', 'motuzka'
+				if $rope > 0:
+					act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+				else
+					cla
+					'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
+
+					act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
+				end
+			else
+				cla
+				'I can hear the rope barely cracking, I''m not sure if I have enough strength.'
+				$rope -= rand(10,20)
+				gs 'mod_public_WC_cabine', 'motuzka'
+				if $rope > 0:
+					act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+				else
+					cla
+					'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
+
+					act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
+				end
+			end
+		end
+	end
+
+	if ropeslack = 1:
+		act 'search slack in the belts which tides me':
+			cla
+			minut += rand(30,100)
+			gs 'stat'
+			if rand(1,100) >= 20:
+				ropeslack = 1
+				'I have found no slack'
+				act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+			else
+				cla
+				ropeslack = 2
+				$rope = 100
+				'Yes, Vania made a mistake! There is a slack.'
+
+
+				act 'Try to break the ropes':
+					cla
+					if pcs_stren >= 90:
+						cla
+						'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
+						$rope = 0
+						gs 'mod_public_WC_cabine', 'motuzka'
+
+						act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
+					elseif pcs_stren >= 50:
+						cla
+						'I hear the rope crackle, but the rope does not brake.'
+						$rope -= pcs_stren * 3 / 10 + 2
+						gs 'mod_public_WC_cabine', 'motuzka'
+						if $rope > 0:
+							act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+						else
+							cla
+							'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
+
+							act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
+						end
+					else
+						cla
+						'I can hear the rope barely cracking, I''m not sure if I have enough strength.'
+						$rope -= rand(10,20)
+						gs 'mod_public_WC_cabine', 'motuzka'
+						if $rope > 0:
+							act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+						else
+							cla
+							'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
+
+							act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
+						end
+					end
+				end
+			end
+		end
+	end
+
+
+
 	if ganeat > 0:
-		if ganeat >= 3: 'there is a line with condoms full of cum'
+		if ganeat >= 3: 'there is a line with <<ganeat>> condoms full of smelly cum'
 		if ganeat = 2: 'there are 2 condoms full of cum'
 		if ganeat = 1: 'there is a condom full of cum'
 
@@ -59,7 +172,8 @@ if $ARGS[0] = 'start':
 			gs 'cum_manage'
 			swallow += 1
 			gs 'stat'
-			pcs_health += 10
+			pcs_health -= rand(0,30)
+			pcs_health += rand(0,10)
 			fat += 3
 			pcs_energy += 40
 			if pcs_hydra >= 100:
@@ -71,6 +185,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
+
 	act 'do push-ups':
 		cla
 		*clr
@@ -92,6 +207,7 @@ if $ARGS[0] = 'start':
 		act 'Finish': gt $loc, $loc_arg
 	end
 
+
 	act 'wait 1 hour':
 		*clr & cla
 		if rand (1,2) = 1:
@@ -112,114 +228,152 @@ if $ARGS[0] = 'start':
 	end
 
 	act 'Get ready for Vania (0:30)':
-		cla
+		*clr & cla
 		willpowermax -= rand(0,1)
 		minut += 30
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/Svetaready/readyvag (2).jpg"></center>'
-		if week ! 6 and hour >= 16 and hour <= 18:
-			*clr & cla
-			zgoda += 5
-			'Vania enters the room'
-			'I hear how Vania makes happy noices'
-			zgoda += 1
-			consent -= 1
-			if consent < 0: consent = 0
-			if rand(1,2) = 1:
+		if rand(1,15) = 1: willdec -= 1
+
+		if willdec ! daystart:
+			if (hour >= 16 and hour <= 18) or hour <= 5 or hour >= 20:
 				*clr & cla
-				'Wihout any words he starts to fucks me'
-				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/sex_sklad'+rand(1,6)+'.mp4"></video></center>'
-				gs 'arousal', 'vaginal', rand(10,15)
-				gs 'pain', rand(1,2), 'vaginal', 'stretch'
-				gs 'pain', rand(1,2), 'vaginal', 'tear'
-				gs 'stat'
-				act 'he cums':
+				zgoda += 5
+				'Vania enters the room'
+				'I hear how Vania makes happy noices'
+				zgoda += 1
+				if rand(1,3) = 1: consent -= 1
+				if consent < 0: consent = 0
+				if rand(1,2) = 1:
 					*clr & cla
-					temp = rand(1,24)
-					'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
-					gs 'sweat', 'add', 15
-					spafinloc = 0
-					gs 'cum_manage'
-					gs 'cuminsidereact', 'Vania'
-					'"I am very happy, that you starts to wait for me!"'
-					'"Lets work on your consent"'
-					act 'continue': gt 'mod_public_WC_rab_livesklad_willdecrising', 'start'
-				end
-			else
-				*clr & cla
-				'Wihout any words he rolled me and put it in my ass'
-				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/anal/anal_enter.mp4"></video></center>'
-				gs 'arousal', 'anal', rand(2,5)
-				gs 'pain', rand(2,4), 'asshole', 'stretch'
-				gs 'pain', rand(2,4), 'asshole', 'tear'
-				gs 'stat'
-				act 'He fucks me':
+					'Wihout any words he starts to fucks me'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/sex_sklad'+rand(1,6)+'.mp4"></video></center>'
+					gs 'arousal', 'vaginal', rand(10,15)
+					gs 'pain', rand(1,2), 'vaginal', 'stretch'
+					gs 'pain', rand(1,2), 'vaginal', 'tear'
+					gs 'stat'
+					act 'he cums':
+						*clr & cla
+						temp = rand(1,24)
+						'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
+						gs 'sweat', 'add', 15
+						spafinloc = 0
+						gs 'cum_manage'
+						gs 'cuminsidereact', 'Vania'
+						'"I am very happy, that you starts to wait for me!"'
+						'"Lets work on your consent"'
+						act 'continue': gt 'mod_public_WC_rab_livesklad_willdecrising', 'start'
+					end
+				else
 					*clr & cla
-					'He is rought and it''s painfull'
-					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/anal/anal_sklad.mp4"></video></center>'
-					gs 'arousal', 'anal', rand(10,15)
+					'Wihout any words he rolled me and put it in my ass'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/anal/anal_enter.mp4"></video></center>'
+					gs 'arousal', 'anal', rand(2,5)
 					gs 'pain', rand(2,4), 'asshole', 'stretch'
 					gs 'pain', rand(2,4), 'asshole', 'tear'
 					gs 'stat'
-					act 'He filled my ass':
+					act 'He fucks me':
 						*clr & cla
-						gs 'arousal', 'anal', rand(2,7)
+						'He is rought and it''s painfull'
+						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/anal/anal_sklad.mp4"></video></center>'
+						gs 'arousal', 'anal', rand(10,15)
 						gs 'pain', rand(2,4), 'asshole', 'stretch'
 						gs 'pain', rand(2,4), 'asshole', 'tear'
 						gs 'stat'
-						'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/anal/cum_ass.mp4"></video></center>'
-						gs 'sweat', 'add', 15
-						spafinloc = 3
-						gs 'cum_manage'
-						gs 'stat'
-					'"I am very happy, that you starts to wait for me!"'
-					'"Lets work on your consent"'
-					act 'continue': gt 'mod_public_WC_rab_livesklad_willdecrising', 'start'
+						act 'He filled my ass':
+							*clr & cla
+							gs 'arousal', 'anal', rand(2,7)
+							gs 'pain', rand(2,4), 'asshole', 'stretch'
+							gs 'pain', rand(2,4), 'asshole', 'tear'
+							gs 'stat'
+							'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/anal/cum_ass.mp4"></video></center>'
+							gs 'sweat', 'add', 15
+							spafinloc = 3
+							gs 'cum_manage'
+							gs 'stat'
+						'"I am very happy, that you starts to wait for me!"'
+						'"Lets work on your consent"'
+						act 'continue': gt 'mod_public_WC_rab_livesklad_willdecrising', 'start'
+						end
 					end
 				end
-			end
-		elseif daystart - skladlive = 1 and hour = 7 and Vcumglass ! 1 and Vcumglass ! 2:
-			*clr & cla
-			'Vania enters with the erect cock and empty glass.'
-			'"Wow, good girl!"'
-			zgoda += 6
-			gs 'arousal', 'vaginal', rand(1,10), 'bound', 'sub', 'rape', 'humiliation'
-			gs 'stat'
-			'He fucks me not too long'
-			if rand(1,2) >= 1:
-				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag ('+rand(2,4)+').jpg"></center>'
+			elseif daystart - skladlive >= 1 and hour >= 7 and hour <= 8 and Vcumglass ! 1 and Vcumglass ! 2:
+				*clr & cla
+				'Vania enters with the erect cock and empty glass.'
+				'"Wow, good girl!"'
+				zgoda += 6
+				gs 'arousal', 'vaginal', rand(1,10), 'bound', 'sub', 'rape', 'humiliation'
+				gs 'stat'
+				'He fucks me not too long'
+				if rand(1,2) >= 1:
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag ('+rand(2,4)+').jpg"></center>'
+				else
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv ('+rand(8,9)+').mp4"></video></center>'
+				end
+				act 'I feel his cum in me!':
+					*clr & cla
+					spafinloc = 0
+					gs 'cum_manage'
+					gs 'cuminsidereact', 'Vania'
+					'"Good girl, now push!"'
+					'I push the cum from my vagina.'
+					'"Nice, your breakdast is ready"'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/cumplay/fromvagtodrink.mp4"></video></center>'
+					Vcumglass = 2
+					act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+				end
 			else
-				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv ('+rand(8,9)+').mp4"></video></center>'
+				'nothing happens'
+				act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
 			end
-			act 'I feel his cum in me!':
+		elseif willdec = daystart:
+			if daystart - skladlive >= 1 and hour >= 7 and hour <= 8 and Vcumglass ! 1 and Vcumglass ! 2:
 				*clr & cla
-				spafinloc = 0
-				gs 'cum_manage'
-				gs 'cuminsidereact', 'Vania'
-				'"Good girl, now push!"'
-				'I push the cum from my vagina.'
-				'"Nice, your breakdast is ready"'
-				'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/cumplay/fromvagtodrink.mp4"></video></center>'
-				Vcumglass = 2
+				'Vania enters with the erect cock and empty glass.'
+				'"Wow, good girl!"'
+				zgoda += 6
+				gs 'arousal', 'vaginal', rand(1,10), 'bound', 'sub', 'rape', 'humiliation'
+				gs 'stat'
+				'He fucks me not too long'
+				if rand(1,2) >= 1:
+					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vag ('+rand(2,4)+').jpg"></center>'
+				else
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/bdsm/bdsm_sex/vag/vagv ('+rand(8,9)+').mp4"></video></center>'
+				end
+				act 'I feel his cum in me!':
+					*clr & cla
+					spafinloc = 0
+					gs 'cum_manage'
+					gs 'cuminsidereact', 'Vania'
+					'"Good girl, now push!"'
+					'I push the cum from my vagina.'
+					'"Nice, your breakdast is ready"'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/cumplay/fromvagtodrink.mp4"></video></center>'
+					Vcumglass = 2
+					act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
+				end
+			else
+				'nothing happens'
 				act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
 			end
-		else
-			'nothing happens'
-			act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
 		end
 	end
 
 	if week ! 6:
-		if hour >= 16 and hour <= 18:
-			cla
-			'Vania enters the room'
-			'"Hello, Betsi"'
-			'"Lets work on your consent"'
-			act 'continue': gt 'mod_public_WC_rab_livesklad_willdecrising', 'start'
+		if rand(1,10) = 1: willdec -= 1
+		if willdec ! daystart:
+			if (hour >= 16 and hour <= 18) or hour <= 5 or hour >= 20:
+				cla
+				'Vania enters the room'
+				'"Hello, Betsi"'
+				'"Lets work on your consent"'
+				act 'continue': gt 'mod_public_WC_rab_livesklad_willdecrising', 'start'
+			end
 		end
 	end
 
-	if daystart - skladlive = 1 and hour = 7 and Vcumglass ! 1 and Vcumglass ! 2:
+
+	if daystart - skladlive >= 1 and hour = 7 and Vcumglass ! 1 and Vcumglass ! 2:
 		'Vania enters with the erect cock and empty glass.'
 		'In a few strokes he fills the glass'
 		'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/full glass.mp4"></video></center>'
@@ -237,6 +391,7 @@ if $ARGS[0] = 'start':
 		act 'drink the glass of warm cum':
 			*clr & cla
 			Vcumglass = 0
+			minut += 20
 			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/cumplay/untied/cumglass/3v.mp4"></video></center>'
 			'salty warm sperm goes down my belly...'
 			'Warm is better...'
@@ -252,7 +407,7 @@ if $ARGS[0] = 'start':
 			gs 'stat'
 			pcs_health += 10
 			fat += 3
-			pcs_energy += 50
+			pcs_energy += 40
 			if pcs_hydra >= 100:
 				pcs_hydra += 30
 			else
@@ -266,6 +421,7 @@ if $ARGS[0] = 'start':
 			Vcumglass = 0
 			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/cumplay/untied/cumglass/3v.mp4"></video></center>'
 			'salty cold sperm goes down my belly...'
+			minut += 20
 
 			if bimbolevel >= 2:
 				pcs_mood += 40
@@ -278,7 +434,7 @@ if $ARGS[0] = 'start':
 			gs 'stat'
 			pcs_health += 10
 			fat += 3
-			pcs_energy += 40
+			pcs_energy += 35
 			if pcs_hydra >= 100:
 				pcs_hydra += 20
 			else
@@ -292,6 +448,7 @@ if $ARGS[0] = 'start':
 			Vcumglass = 0
 			'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/cum/cumplay/untied/cumglass/3v.mp4"></video></center>'
 			'salty cold sperm goes down my belly...'
+			minut += 20
 
 			if bimbolevel >= 2:
 				pcs_mood += 40
@@ -304,7 +461,7 @@ if $ARGS[0] = 'start':
 			gs 'stat'
 			pcs_health += 10
 			fat += 3
-			pcs_energy += 40
+			pcs_energy += 30
 			if pcs_hydra >= 100:
 				pcs_hydra += 20
 			else
@@ -324,10 +481,11 @@ if $ARGS[0] = 'start':
 	end
 
 	if zgoda >= 80 and week ! 6 and hour >= 20 and hour <= 21:
+		'Vania enters the room'
 		act 'Please untie me':
 			cla
 			'I can but... you''ll need to be pig'
-			'"And a pig is a helpless cattle, even more than tou now XD"'
+			'"And a pig is a helpless cattle, even more than you now XD"'
 			act 'agree':
 				*clr & cla
 				zgoda += 8
@@ -468,105 +626,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-	if ropeslack = 2:
-		'Vania made a mistake! There is a slack in a rope.'
-		gs 'mod_public_WC_cabine', 'motuzka'
-		gs 'stat'
-
-		act 'Try to break the ropes':
-			minut += rand(45,90)
-			gs 'stat'
-			if pcs_stren >= 90:
-				cla
-				'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
-				$rope = 0
-				gs 'mod_public_WC_cabine', 'motuzka'
-				act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
-			elseif pcs_stren >= 50:
-				cla
-				'I hear the rope crackle, but the rope does not brake.'
-				$rope -= pcs_stren * 3 / 10 + 2
-				gs 'mod_public_WC_cabine', 'motuzka'
-				if $rope > 0:
-					act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
-				else
-					cla
-					'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
-
-					act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
-				end
-			else
-				cla
-				'I can hear the rope barely cracking, I''m not sure if I have enough strength.'
-				$rope -= rand(10,20)
-				gs 'mod_public_WC_cabine', 'motuzka'
-				if $rope > 0:
-					act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
-				else
-					cla
-					'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
-
-					act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
-				end
-			end
-		end
-	end
-
-	if ropeslack = 1:
-		act 'search slack in the belts which tides me':
-			cla
-			minut += rand(30,100)
-			gs 'stat'
-			if rand(1,100) >= 20:
-				ropeslack = 1
-				'I have found no slack'
-				act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
-			else
-				cla
-				ropeslack = 2
-				$rope = 100
-				'Yes, Vania made a mistake! There is a slack.'
-
-				act 'Try to break the ropes':
-					if pcs_stren >= 90:
-						cla
-						'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
-						$rope = 0
-						gs 'mod_public_WC_cabine', 'motuzka'
 
-						act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
-
-					elseif pcs_stren >= 50:
-						cla
-						'I hear the rope crackle, but the rope does not brake.'
-						$rope -= pcs_stren * 3 / 10 + 2
-						gs 'mod_public_WC_cabine', 'motuzka'
-						if $rope > 0:
-							act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
-						else
-							cla
-							'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
-
-							act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
-						end
-					else
-						cla
-						'I can hear the rope barely cracking, I''m not sure if I have enough strength.'
-						$rope -= rand(10,20)
-						gs 'mod_public_WC_cabine', 'motuzka'
-						if $rope > 0:
-							act 'continue': gt 'mod_public_WC_rab_livesklad', 'start'
-						else
-							cla
-							'Under my power, all the ropes broke through with a loud sound. I wait a moment and...'
-
-							act 'continue': gt 'mod_public_WC_rab_livesklad_run', 'start'
-						end
-					end
-				end
-			end
-		end
-	end
 
 	if day - lsday >= rand(3,8) and rand(1,100) <= 20:
 		act 'search slack in the belts which tides me':
@@ -579,9 +639,11 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-	if zgoda >= 100 and week ! 6 and hour >= 16 and hour <= 18:
+
+	if zgoda >= 100 and week ! 6 and hour >= 16:
 		*clr & cla
 		dick = 17
+		npc_dick[$npclastgenerated] = dick
 		gs 'npcgeneratec', 0, 'Vania', 33
 		$boy[0] = $npclastgenerated
 		$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -598,6 +660,7 @@ if $ARGS[0] = 'start':
 		'Ow, Also I give you 10 words'
 		'He unchained me.'
 		slova += 10
+		vday = daystart + 1
 		zvit = week
 		consent = 0
 		$loc = 'mod_public_WC_rab'
@@ -608,11 +671,14 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'unt2':
 
 	*clr & cla
 	'Vania come closer and starts to fuck me with his leg '
-	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/untied_sex/2/legvag2'+rand(1,2)+'.mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/lisrab/Vania/trener/live_sklad/untied_sex/2/legvag'+rand(1,2)+'.mp4"></video></center>'
 	gs 'arousal', 'vaginal_vibe', 10, 'rough', 'sub', 'humiliation'
 	gs 'stat'
 	if rand(1,5) = 1:
@@ -703,6 +769,8 @@ if $ARGS[0] = 'unt22':
 	end
 end
 
+
+
 if $ARGS[0] = 'unt3':
 	*clr & cla
 	'I am sucking Vania'
@@ -763,6 +831,8 @@ if $ARGS[0] = 'unt3':
 	end
 end
 
+
+
 if $ARGS[0] = 'unt4':
 	*clr & cla
 	'Vania jumps on my pussy'
@@ -823,6 +893,8 @@ if $ARGS[0] = 'unt4':
 	end
 end
 
+
+
 if $ARGS[0] = 'unt5':
 	*clr & cla
 	'Vania fucks my ass'
@@ -854,6 +926,7 @@ if $ARGS[0] = 'unt5':
 				spafinloc = 15
 				gs 'cum_manage'
 
+
 				gs 'stat'
 				'Vania cums on me'
 
@@ -908,6 +981,7 @@ if $ARGS[0] = 'unt5':
 			spafinloc = 15
 			gs 'cum_manage'
 
+
 			gs 'stat'
 			'Vania cums on me'
 

locations/mod_public_WC_rab_random event.qsrc

@@ -8,6 +8,7 @@ if $ARGS[0] = 'event1T':
 	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
 	gs 'arousal', 'voyeur', 3, 'sub'
 
+
 	if pcs_humint <= 80 or pcs_intel <= 90:
 		act 'Ok':
 			slova -= 1
@@ -111,6 +112,7 @@ if $ARGS[0] = 'event1A':
 	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
 	gs 'arousal', 'voyeur', 3, 'sub'
 
+
 	if pcs_humint <= 80 or pcs_intel <= 90:
 		act 'Ok':
 			slova -= 1
@@ -153,6 +155,9 @@ if $ARGS[0] = 'event1A':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'event2V':
 	CLOSE ALL
 	*clr & cla
@@ -182,6 +187,10 @@ if $ARGS[0] = 'event2V':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'event3V':
 	CLOSE ALL
 	*clr & cla
@@ -250,6 +259,10 @@ if $ARGS[0] = 'event3T':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'event5T':
 	CLOSE ALL
 	*clr & cla
@@ -673,12 +686,14 @@ if $ARGS[0] = 'event5A':
 	end
 end
 
+
 if $ARGS[0] = 'event5Tsex':
 	CLOSE ALL
 	*clr & cla
 	temp = rand(1,2)
 	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
 	dick = 25
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Tolik', 58
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -728,6 +743,7 @@ if $ARGS[0] = 'event5Vsex':
 	CLOSE ALL
 	*clr & cla
 	dick = 17
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Vania', 33
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -767,6 +783,7 @@ if $ARGS[0] = 'event5Asex':
 	CLOSE ALL
 	*clr & cla
 	dick = 18
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Artem', 26
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -802,6 +819,7 @@ if $ARGS[0] = 'event5Asex':
 	end
 end
 
+
 if $ARGS[0] = 'event7':
 	CLOSE ALL
 	*clr & cla
@@ -815,6 +833,7 @@ if $ARGS[0] = 'event7':
 		'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/cumread1.mp4"></video></center>'
 		mood -= 5
 		dick = 17
+		npc_dick[$npclastgenerated] = dick
 		gs 'arousal', 'voyeur', rand(2,5), 'sub', 'humiliation'
 		gs 'stat'
 		gs 'npcgeneratec', 0, 'Vania', 33
@@ -843,6 +862,7 @@ if $ARGS[0] = 'event7':
 		'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/blowread1.mp4"></video></center>'
 		mood -= 5
 		dick = 17
+		npc_dick[$npclastgenerated] = dick
 		pcs_throat += rand(0,1)
 		stat['bj'] += rand(0,1)
 		stat['hj'] += rand(0,1)
@@ -876,6 +896,7 @@ if $ARGS[0] = 'event7':
 
 				gs 'cum_manage'
 
+
 				spafinloc = 16
 				gs 'cum_manage'
 
@@ -893,6 +914,7 @@ if $ARGS[0] = 'event7':
 		guy += 1
 		mood -= 5
 		dick = 17
+		npc_dick[$npclastgenerated] = dick
 
 		gs 'arousal', 'vaginal', rand(20,40)
 		act 'Continue "reading"':
@@ -1019,6 +1041,9 @@ if $ARGS[0] = 'event8':
 								gs 'cum_manage'
 								gs 'stat'
 								dick = 25
+								npc_dick[$npclastgenerated] = dick
+
+
 
 								swallow  += 1
 								facial += 1
@@ -1063,6 +1088,7 @@ if $ARGS[0] = 'event8':
 							temp = rand(1,2)
 							'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
 							dick = 25
+							npc_dick[$npclastgenerated] = dick
 							gs 'npcgeneratec', 0, 'Tolik', 58
 							$boy[0] = $npclastgenerated
 							$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -1126,6 +1152,7 @@ if $ARGS[0] = 'event8':
 						temp = rand(1,2)
 						'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
 						dick = 25
+						npc_dick[$npclastgenerated] = dick
 						gs 'npcgeneratec', 0, 'Tolik', 58
 						$boy[0] = $npclastgenerated
 						$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -1258,6 +1285,9 @@ if $ARGS[0] = 'event8':
 					gs 'cum_manage'
 					gs 'stat'
 					dick = 25
+					npc_dick[$npclastgenerated] = dick
+
+
 
 					swallow  += 1
 					facial += 1
@@ -1396,6 +1426,9 @@ if $ARGS[0] = 'event8':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'teaseread':
 	CLOSE ALL
 	*clr & cla
@@ -1405,6 +1438,7 @@ if $ARGS[0] = 'teaseread':
 	gs 'stat'
 	'Obviously he wants more'
 
+
 	If Alove >= 10 and Vania = 0 and Tolik = 0:
 		act 'Honey, better use your toungue.':
 			minut += 10
@@ -1444,6 +1478,7 @@ if $ARGS[0] = 'teaseread':
 				Alove += rand(4,7)
 				*clr & cla
 				dick = 18
+				npc_dick[$npclastgenerated] = dick
 				gs 'npcgeneratec', 0, 'Artem', 26
 				$boy[0] = $npclastgenerated
 				$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -1455,6 +1490,7 @@ if $ARGS[0] = 'teaseread':
 
 				guy += 1
 				dick = 18
+				npc_dick[$npclastgenerated] = dick
 
 				gs 'arousal', 'vaginal', rand(10,20)
 				gs 'stat'
@@ -1487,6 +1523,7 @@ if $ARGS[0] = 'event10':
 	*clr & cla
 	'Artem knocks me down and rushes at me. He starts to fuck my mouth'
 	dick = 18
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Artem', 26
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]

locations/mod_public_WC_rab_sex.qsrc

@@ -29,11 +29,13 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
 if $ARGS[0] = 'Artemsex':
 	CLOSE ALL
 	$menu_loc = 'mod_public_WC_rab_sex'
 	*clr & cla
 	dick = 18
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Artem', 26
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -70,6 +72,7 @@ if $ARGS[0] = 'Artemsecretcuni':
 	$menu_loc = 'mod_public_WC_rab_sex'
 	*clr & cla
 	dick = 18
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Artem', 26
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -102,6 +105,7 @@ if $ARGS[0] = 'Artemsecret69':
 	$menu_loc = 'mod_public_WC_rab_sex'
 	*clr & cla
 	dick = 18
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Artem', 26
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -140,6 +144,7 @@ if $ARGS[0] = 'Artemsecretsex':
 	$menu_loc = 'mod_public_WC_rab_sex'
 	*clr & cla
 	dick = 18
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Artem', 26
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -180,11 +185,13 @@ if $ARGS[0] = 'Artemsecretsex':
 	end
 end
 
+
 if $ARGS[0] = 'Toliksex':
 	CLOSE ALL
 	$menu_loc = 'mod_public_WC_rab_sex'
 	*clr & cla
 	dick = 25
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Tolik', 58
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -233,6 +240,7 @@ end
 if $ARGS[0] = 'Vaniasex':
 	*clr & cla
 	dick = 17
+	npc_dick[$npclastgenerated] = dick
 	gs 'npcgeneratec', 0, 'Vania', 33
 	$boy[0] = $npclastgenerated
 	$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -276,9 +284,11 @@ if $ARGS[0] = 'Vaniasex':
 
 					gs 'cum_manage'
 
+
 					spafinloc = 16
 					gs 'cum_manage'
 
+
 					spafinloc = 15
 					gs 'cum_manage'
 					gs 'stat'
@@ -336,6 +346,9 @@ if $ARGS[0] = 'TV':
 
 	guy += 2
 	dick = 25
+	npc_dick[$npclastgenerated] = dick
+
+
 
 	gang += 1
 	gs 'arousal', 'vaginal', rand(20,40), 'rough', 'sub', 'group', 'gangbang', 'humiliation', 'deepthroat'
@@ -368,6 +381,7 @@ if $ARGS[0] = 'TV':
 		gs 'cum_manage'
 		gs 'stat'
 
+
 		gs 'npcgeneratec', 0, 'Vania', 33
 		$boy[0] = $npclastgenerated
 		$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -378,10 +392,13 @@ if $ARGS[0] = 'TV':
 		gs 'cum_manage'
 		gs 'stat'
 
+
 		act 'Freshen up' : gt $loc, $loc_arg
 	end
 end
 
+
+
 if $ARGS[0] = 'TA':
 	CLOSE ALL
 	$menu_loc = 'mod_public_WC_rab_sex'
@@ -394,6 +411,8 @@ if $ARGS[0] = 'TA':
 
 	guy += 2
 	dick = 25
+	npc_dick[$npclastgenerated] = dick
+
 
 	gang += 1
 	gs 'arousal', 'vaginal', rand(20,40), 'rough', 'sub', 'group', 'gangbang', 'humiliation', 'deepthroat'
@@ -450,6 +469,8 @@ if $ARGS[0] = 'TA':
 	end
 end
 
+
+
 if $ARGS[0] = 'VA':
 	CLOSE ALL
 	$menu_loc = 'mod_public_WC_rab_sex'
@@ -463,6 +484,9 @@ if $ARGS[0] = 'VA':
 
 	guy += 3
 	dick = 17
+	npc_dick[$npclastgenerated] = dick
+
+
 
 	gang += 1
 	gs 'arousal', 'anal', 1, 'rough', 'sub', 'group', 'gangbang', 'humiliation', 'deepthroat'
@@ -506,6 +530,8 @@ if $ARGS[0] = 'VA':
 	end
 end
 
+
+
 if $ARGS[0] = '3sex':
 	CLOSE ALL
 	$menu_loc = 'mod_public_WC_rab_sex'
@@ -520,6 +546,9 @@ if $ARGS[0] = '3sex':
 	guy += 3
 	dick = 25
 
+	npc_dick[$npclastgenerated] = dick
+
+
 	gang += 1
 	gs 'arousal', 'vaginal', rand(20,40), 'rough', 'sub', 'group', 'gangbang', 'humiliation', 'deepthroat'
 	gs 'arousal', 'anal', 1, 'rough', 'sub', 'group', 'gangbang', 'humiliation', 'deepthroat'
@@ -605,11 +634,13 @@ if $ARGS[0] = 'vanaT':
 		gs 'stat'
 		'At last Tolik wealthy cums on my hands.'
 		dick = 25
+		npc_dick[$npclastgenerated] = dick
 		gs 'npcgeneratec', 0, 'Tolik', 58
 		$boy[0] = $npclastgenerated
 		$boydesc[0] = $npc_usedname[$npclastgenerated]
 		gs 'boyStat', $npclastgenerated
 
+
 		spafinloc = 10
 		gs 'cum_manage'
 
@@ -642,11 +673,13 @@ if $ARGS[0] = 'vanaT':
 			stat['hj'] += 1
 			gs 'stat'
 			dick = 25
+			npc_dick[$npclastgenerated] = dick
 			gs 'npcgeneratec', 0, 'Tolik', 58
 			$boy[0] = $npclastgenerated
 			$boydesc[0] = $npc_usedname[$npclastgenerated]
 			gs 'boyStat', $npclastgenerated
 
+
 			spafinloc = 10
 			gs 'cum_manage'
 

locations/mod_public_WC_rab_talk.qsrc

@@ -103,6 +103,7 @@ if $ARGS[0] = 'Artem':
 				Alove += rand(4,7)
 				*clr & cla
 				dick = 18
+				npc_dick[$npclastgenerated] = dick
 				gs 'npcgeneratec', 0, 'Artem', 26
 				$boy[0] = $npclastgenerated
 				$boydesc[0] = $npc_usedname[$npclastgenerated]
@@ -279,7 +280,7 @@ if $ARGS[0] = 'Vania':
 			end
 		end
 	end
-	if siga < 0:
+	if siga <= 0:
 		act 'Ask Vanya for a cigarette':
 			cla
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/vania.jpg"></center>'
@@ -338,6 +339,24 @@ if $ARGS[0] = 'Vania':
 			act 'continue': gt 'mod_public_WC_rab_sex', 'Vaniasex'
 		end
 	end
+
+	if vurok = 0:
+		gs 'willpower', 'humiliation', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'I want you to be my master Master (<<will_cost>> Willpower)':
+				cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+
+				'Vania greens and I see some evil flame in his eyes'
+				'"Betsi, I am going to make you a perfect woman!"'
+
+				act 'Go with Vania': gt 'mod_public_WC_rab_Mayster', 'start'
+			end
+		else
+			act 'I want you to be my master Master (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
 end
 
 if $ARGS[0] = 'Tolik':
@@ -455,6 +474,7 @@ if $ARGS[0] = 'Artem_task':
 			'I have no tasks for you'
 		end
 
+
 		if pcs_humint <= 40 or pcs_intel <= 50 and temp ! 5:
 			act 'Ok, I will do':
 				slova -= 3
@@ -588,6 +608,7 @@ if $ARGS[0] = 'Tolik_task':
 		if temp = 6: temp = 7
 		if firstclean = 2: temp = rand (1,7)
 
+
 		if temp = 1:
 			if task1 >= 1: temp += 1
 		end
@@ -614,6 +635,7 @@ if $ARGS[0] = 'Tolik_task':
 			if task7 >= 1: temp += 1
 		end
 
+
 		if temp = 1:
 			'Chopp some woods'
 			task1 = 1

locations/mod_public_WC_rab_tryrun.qsrc

@@ -25,8 +25,23 @@ if $ARGS[0] = 'start':
 			gt 'mod_public_WC_rab', 'dvir'
 		end
 	end
+
+	if VaniaMayster >= 100:
+		cla
+		'<i>I obey Vania for so long...</i>'
+		'<i>I can''t run from Vania anymore</i>'
+
+		act 'Go back!':
+			if $metka = 'viranda':
+				gt 'mod_public_WC_rab', 'viranda'
+			else
+				gt 'mod_public_WC_rab', 'dvir'
+			end
+		end
+	end
 end
 
+
 if $ARGS[0] = 'run':
 	CLOSE ALL
 	menu_off = 0
@@ -35,6 +50,8 @@ if $ARGS[0] = 'run':
 	minut += 5
 	gs 'stat'
 	'I hear someone running after me!!!'
+	if ktemp = 105: 'Obviously it''s Vania'
+	killvar 'ktemp'
 	if month <= 4 or month >= 10:
 		'<center><video autoplay loop src="mod/public_WC/lisrab/tryrun/runrun10.mp4"></video></center>'
 	else
@@ -46,6 +63,10 @@ if $ARGS[0] = 'run':
 		act 'use gun': gt 'mod_public_WC_rab_gun_run', 'run'
 	end
 	act 'Run with all my strength!':
+		if ktemp = 105:
+			killvar 'ktemp'
+			gt 'mod_public_WC_rab_tryrun', 'k100'
+		end
 		if week <= 5:
 			gt 'mod_public_WC_rab_tryrun', 'runweek15'
 		end
@@ -58,6 +79,7 @@ if $ARGS[0] = 'run':
 	end
 end
 
+
 if $ARGS[0] = 'runweek15':
 	CLOSE ALL
 	menu_off = 0
@@ -407,4 +429,24 @@ if $ARGS[0] = 'runweek7':
 	end
 end
 
+if $ARGS[0] = 'k100':
+	CLOSE ALL
+	menu_off = 0
+	$location_type = 'secluded'
+	*clr & cla
+	gs 'stat'
+	if pcs_run >= rand (65, 91):
+		'I was able to break away!'
+		minut += rand (10, 40)
+		vtecha = 1
+		Artem = 0 & Tolik = 0 & Vania = 0
+		brak += 10
+		act 'Continue': gt 'gadforestlost',  'forest_center'
+	else
+		'I was caught and broke'
+		brak += 5
+		act 'Continue': gt 'mod_public_WC_kara', 'vtecha'
+	end
+end
+
 --- mod_public_WC_rab_tryrun ---------------------------------

locations/mod_public_WC_rab_work.qsrc

@@ -20,6 +20,8 @@ if $ARGS[0] = 'wstart':
 	'I bring him girls and get thanks for it ... Finally you have confidence, and I think you can help us all. So now I''m taking you ... Behave with dignity, do not engage in nonsense, do not dare to refuse guests.'
 	'I''ll pick you up in the morning, and God forbid, they''ll complain about you.'
 
+
+
 	act 'continue':
 		cla
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Yana.jpg"></center>'
@@ -29,6 +31,7 @@ if $ARGS[0] = 'wstart':
 		'- New, as if nothing, well Tolich, I''ll do it. Betsy let''s go ...
 '
 
+
 		act 'Go with her': gt 'mod_public_WC_rab_work', 'start'
 		act 'Tolik, I don''t want to do this':
 			cla
@@ -38,6 +41,7 @@ if $ARGS[0] = 'wstart':
 			act 'continue': gt 'mod_public_WC_rab_work', 'niroboti'
 		end
 
+
 		gs 'willpower', 'misc', 'self', 'easy'
 		if will_cost <= pcs_willpwr:
 			act 'I am not Betsi. (<<will_cost>> Willpower)':
@@ -63,6 +67,7 @@ if $ARGS[0] = 'wstart':
 	end
 end
 
+
 if $ARGS[0] = 'niroboti':
 	$loc_arg = $ARGS[0]
 	CLOSE ALL
@@ -71,6 +76,7 @@ if $ARGS[0] = 'niroboti':
 	act 'continue': gt 'mod_public_WC_kara', 'vtecha'
 end
 
+
 if $ARGS[0] = 'start':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -112,15 +118,21 @@ if $ARGS[0] = 'start':
 		act'I risk to work in blowbox': blowbox = 1 & gt 'mod_public_WC_rab_work', 'room'
 	end
 
+
 	if vlada >= 30 and ryska >= 10:
 		act 'Go to the guests -=WIP=-': shloha = 1 & gt 'mod_public_WC_rab_work', 'room'
 	end
 	if WCzoo > 0: act 'Zootheatre': zt = 1 & gt 'mod_public_WC_rab_work', 'room'
+	if WCzoo = 0: '<u>the beast content option disabled, therefore the beast job is disabled too.</u>'
 	if vlada >= 45 and ryska >= 20:
 		act 'I want to entertain meetings. -=WIP=-': vecheria = 1 & gt 'mod_public_WC_rab_work', 'room'
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'room':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -135,6 +147,7 @@ if $ARGS[0] = 'room':
 	'Girls rummage around, getting ready for work.'
 	'She gave me the key to the locker.'
 
+
 	act 'Prepare myself to work (0:25)':
 		*clr & cla
 		minut += 25
@@ -277,6 +290,7 @@ if $ARGS[0] = 'room':
 	end
 end
 
+
 if $ARGS[0] = 'napoi':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -322,7 +336,8 @@ if $ARGS[0] = 'napoi':
 		'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/napoi/hils.mp4"></video></center>'
 		act'Stare on Toha':
 			minut += 3
-			gt 'mod_public_WC_rab_work', 'Toha'
+			gs 'stat'
+			gt 'mod_public_WC_rab_work_TOHA', 'Tohanapoi'
 		end
 		act'Go to the tables': minut += 1 & gt 'mod_public_WC_rab_work', 'tables'
 		act'Go to billiard': minut += 5 & gt 'mod_public_WC_rab_work', 'billiard'
@@ -332,10 +347,15 @@ if $ARGS[0] = 'napoi':
 	end
 end
 
+
+
 if $ARGS[0] = 'Toha':
 	gt 'mod_public_WC_rab_work_TOHA', 'Tohanapoi'
 end
 
+
+
+
 if $ARGS[0] = 'tables':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -357,7 +377,7 @@ if $ARGS[0] = 'tables':
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bw (<<temp>>).jpg"></center>'
 	end
 
-	act'Go to the toha': minut += 1 & gt 'mod_public_WC_rab_work', 'Toha'
+	act'Go to the Toha': minut += 1 & gt 'mod_public_WC_rab_work', 'Toha'
 	act'Go to billiard': minut += 5 & gt 'mod_public_WC_rab_work', 'billiard'
 	act'Go to balcony': minut += 3 & gt 'mod_public_WC_rab_work', 'balcony'
 	act'Go to office': minut += 8 & gt 'mod_public_WC_rab_work', 'office'
@@ -372,6 +392,10 @@ if $ARGS[0] = 'tables':
 		end
 	end
 
+
+
+
+
 	if hour >= 10 and hour < 21:
 		*clr & cla
 		temp = ( hour - bhour ) * 60 + ( minut - bminut )
@@ -400,12 +424,14 @@ if $ARGS[0] = 'tables':
 
 						guy += 1
 						dick = 18
+						npc_dick[$npclastgenerated] = dick
 
 						stat['vaginal'] += 1
 						gs 'sweat', 'add', 5
 						gs 'arousal', 'vaginal', 15, 'bound', 'sub', 'prostitution'
 						gs 'stat'
 
+
 						act 'Continue':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/tohacum.jpg"></center>'
@@ -429,6 +455,8 @@ if $ARGS[0] = 'tables':
 	end
 end
 
+
+
 if $ARGS[0] = 'billiard':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -456,6 +484,8 @@ if $ARGS[0] = 'billiard':
 	act'Go to dancefloor': minut += 8 & gt 'mod_public_WC_rab_work', 'dancefloor'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
 	act 'Slovly walk around to show your order number':
 		if broom = 2 and bglass > 0:
 			gt 'mod_public_WC_rab_work', 'SWA'
@@ -466,6 +496,7 @@ if $ARGS[0] = 'billiard':
 
 end
 
+
 if $ARGS[0] = 'balcony':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -493,6 +524,9 @@ if $ARGS[0] = 'balcony':
 	act'Go to dancefloor': minut += 11 & gt 'mod_public_WC_rab_work', 'dancefloor'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
+
 	act 'Slovly walk around to show your order number':
 		if broom = 3 and bglass > 0:
 			gt 'mod_public_WC_rab_work', 'SWA'
@@ -503,6 +537,7 @@ if $ARGS[0] = 'balcony':
 
 end
 
+
 if $ARGS[0] = 'office':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -530,6 +565,9 @@ if $ARGS[0] = 'office':
 	act'Go to dancefloor': minut += 11 & gt 'mod_public_WC_rab_work', 'dancefloor'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
+
 	act 'Slovly walk around to show your order number':
 		if broom = 4 and bglass > 0:
 			gt 'mod_public_WC_rab_work', 'SWA'
@@ -540,6 +578,7 @@ if $ARGS[0] = 'office':
 
 end
 
+
 if $ARGS[0] = 'dancefloor':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -567,6 +606,8 @@ if $ARGS[0] = 'dancefloor':
 	act'Go to office': minut += 11 & gt 'mod_public_WC_rab_work', 'office'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
 	act 'Slovly walk around to show your order number':
 		if broom = 5 and bglass > 0:
 			gt 'mod_public_WC_rab_work', 'SWA'
@@ -576,6 +617,11 @@ if $ARGS[0] = 'dancefloor':
 	end
 end
 
+
+
+
+
+
 if $ARGS[0] = 'SWA':
 	minut += rand(3,10)
 	cla
@@ -602,6 +648,7 @@ if $ARGS[0] = 'SWA':
 			bcil = temp
 		end
 
+
 		'Hey, that''s not the whole order! Where''s my drink! '
 		bglass = 0
 		act'Go to the Toha': minut += 1 & gt 'mod_public_WC_rab_work', 'toha'
@@ -715,6 +762,7 @@ if $ARGS[0] = 'SWA':
 					bcil = 0
 					bcilg = 0
 
+
 				else
 					minut += rand(0,5)
 					'Oh, get out of here, you''re a little whipped if you work like that!'
@@ -729,6 +777,7 @@ if $ARGS[0] = 'SWA':
 			act 'Get on your knees (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
+
 	else
 		temp = ( hour - bhour ) * 60 + ( minut - bminut )
 		if temp <= 30:
@@ -746,80 +795,96 @@ if $ARGS[0] = 'SWA':
 	act 'wait': gs 'obj_din', 'wait'
 end
 
+
+
 if $ARGS[0] = 'heels':
-	if pcs_heels - 75 < 0:
-		temp = rand(pcs_heels,100)
-		if temp <= 75:
-			if 75 - temp >= 60:
-				'I feel like a cow on ice with heels like that, '
-				'I awkwardly put my foot and fell to the floor'
-				if bglass > 0:
-					bglass = 0 & 'All glasses are broken'
-					temp = rand(1,2)
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
-				else
-					'Good thing I didn''t have glasses'
-				end
-			elseif 75 - temp >= 50:
-				'I feel like a cow on ice with heels like that, '
-				'I tripped on my feet and fell to the floor'
-				if bglass > 1:
-					bglass = 1 & 'All but one of the glasses shattered'
-					temp = rand(1,2)
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
-				elseif bglass = 1:
-					bglass = 0 & 'The last glass broke'
-					temp = rand(1,2)
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
-				else
-					'Good thing I didn''t have glasses'
-				end
-			elseif 75 - temp >= 30:
-				'I feel like I''m on a tightrope with heels like that,'
-				'I put my foot awkwardly and began to shake me, barely regaining my balance'
+	ztemp = pcs_heels - rand(0,35)
+	if ztemp < 0: ztemp = 0
+	ytemp = rand(ztemp,100)
+	if ytemp <= 75:
+		if 75 - ytemp >= 60:
+			'I feel like a cow on ice with heels like that, '
+			'I awkwardly put my foot and fell to the floor'
+			if bglass > 0:
+				bglass = 0 & 'All glasses are broken'
+				temp = rand(1,2)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
+			else
+				'Good thing I didn''t have glasses'
+			end
+		elseif 75 - ytemp >= 50:
+			'I feel like a cow on ice with heels like that, '
+			'I tripped on my feet and fell to the floor'
+			if bglass > 1:
+				bglass = 1 & 'All but one of the glasses shattered'
+				temp = rand(1,2)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
+			elseif bglass = 1:
+				bglass = 0 & 'The last glass broke'
+				temp = rand(1,2)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
+			else
+				'Good thing I didn''t have glasses'
+			end
+		elseif 75 - ytemp >= 30:
+			'I feel like I''m on a tightrope with heels like that,'
+			'I put my foot awkwardly and began to shake me, barely regaining my balance'
+			if bglass > 1:
+				bglass -= 1 & 'But one glass still fell'
+				temp = rand(1,2)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
+			elseif bglass = 1:
+				'The last glass shook for a long time, but still stayed on the tray'
+			else
+				'Nothing can fall from an empty tray'
+			end
+		elseif 75 - ytemp >= 15:
+			'It''s hard for me to walk, but somehow I keep my balance'
+			temp = rand (1,3)
+			if temp = 1:
 				if bglass > 1:
-					bglass -= 1 & 'But one glass still fell'
-					temp = rand(1,2)
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
+					bglass -= 1 & 'I almost fell and broke one glass'
+				temp = rand(1,2)
+				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
 				elseif bglass = 1:
 					'The last glass shook for a long time, but still stayed on the tray'
-				else
-					'Nothing can fall from an empty tray'
-				end
-			elseif 75 - temp >= 15:
-				'It''s hard for me to walk, but somehow I keep my balance'
-				temp = rand (1,3)
-				if temp = 1:
-					if bglass > 1:
-						bglass -= 1 & 'I almost fell and broke one glass'
-					temp = rand(1,2)
-					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bglass<<temp>>.jpg"></center>'
-					elseif bglass = 1:
-						'The last glass shook for a long time, but still stayed on the tray'
-					else
-						'I think even if the tray was full, I wouldn''t drop anything'
-					end
-				end
-			elseif 75 - temp >= 0:
-				'I walk on such heels uncertainly'
-				'I tripped over something, but I persevered'
-				if bglass > 1:
-					'The glasses rattled menacingly, but nothing happened'
-				elseif bglass = 1:
-					'The last glass traveled a bit on the tray, but it all worked out'
 				else
 					'I think even if the tray was full, I wouldn''t drop anything'
 				end
+			end
+		elseif 75 - ytemp >= 0:
+			'I walk on such heels uncertainly'
+			'I tripped over something, but I persevered'
+			if bglass > 1:
+				'The glasses rattled menacingly, but nothing happened'
+			elseif bglass = 1:
+				'The last glass traveled a bit on the tray, but it all worked out'
 			else
-				'I walk good on this heels'
+				'I think even if the tray was full, I wouldn''t drop anything'
 			end
+		else
+			'I walk good on this heels'
 		end
+	else
+		'I walk good on this heels'
 	end
 end
 
+
+
+
+
+
+
+
+
+
+
+
 if $ARGS[0] = 'chystota':
 	gt 'mod_public_WC_rab_work_chystota', 'start'
 
+
 end
 
 if $ARGS[0] = 'stil':

locations/mod_public_WC_rab_work_TOHA.qsrc

@@ -51,7 +51,11 @@ if $ARGS[0] = 'Tohanapoi':
 			bminut = minut
 			temp = rand(1,8)
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
-			act'Stare on Toha': minut += 3 & gt 'mod_public_WC_rab_work', 'toha'
+			act 'Stare on Toha':
+				minut += 3
+				gs 'stat'
+				gt 'mod_public_WC_rab_work_TOHA', 'Tohanapoi'
+			end
 			act'Go to the tables': minut += 1 & gt 'mod_public_WC_rab_work', 'tables'
 			act'Go to billiard': minut += 5 & gt 'mod_public_WC_rab_work', 'billiard'
 			act'Go to balcony': minut += 3 & gt 'mod_public_WC_rab_work', 'balcony'
@@ -97,7 +101,11 @@ if $ARGS[0] = 'Tohanapoi':
 			bminut = minut
 			temp = rand(1,8)
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
-			act'Stare on Toha': minut += 3 & gt 'mod_public_WC_rab_work', 'toha'
+			act 'Stare on Toha':
+				minut += 3
+				gs 'stat'
+				gt 'mod_public_WC_rab_work_TOHA', 'Tohanapoi'
+			end
 			act'Go to the tables': minut += 1 & gt 'mod_public_WC_rab_work', 'tables'
 			act'Go to billiard': minut += 5 & gt 'mod_public_WC_rab_work', 'billiard'
 			act'Go to balcony': minut += 3 & gt 'mod_public_WC_rab_work', 'balcony'
@@ -140,6 +148,7 @@ if $ARGS[0] = 'Tohanapoi':
 
 								guy += 1
 								dick = 18
+								npc_dick[$npclastgenerated] = dick
 
 								stat['vaginal'] += 1
 								gs 'sweat', 'add', 5
@@ -203,6 +212,7 @@ if $ARGS[0] = 'Tohanapoi':
 
 								guy += 1
 								dick = 18
+								npc_dick[$npclastgenerated] = dick
 
 								stat['vaginal'] += 1
 								gs 'sweat', 'add', 5
@@ -270,6 +280,15 @@ if $ARGS[0] = 'Tohanapoi':
 	end
 end
 
+
+
+
+
+
+
+
+
+
 if $ARGS[0] = 'tohachystota':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -360,6 +379,9 @@ if $ARGS[0] = 'tohachystota':
 	act'Go to office': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'office'
 	act'Go to dancefloor': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'dancefloor'
 
+
+
+
 	if hour >= 9 and hour < 21:
 		*clr & cla
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/toha.jpg"></center>'
@@ -384,6 +406,7 @@ if $ARGS[0] = 'tohachystota':
 
 						guy += 1
 						dick = 18
+						npc_dick[$npclastgenerated] = dick
 
 						stat['vaginal'] += 1
 						gs 'sweat', 'add', 5

locations/mod_public_WC_rab_work_blowbox.qsrc

@@ -88,6 +88,8 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
+
 if $ARGS[0] = 'bb_skuta':
 	$location_type = 'indoors'
 	$loc = 'mod_public_WC_rab_work_blowbox'
@@ -96,6 +98,7 @@ if $ARGS[0] = 'bb_skuta':
 	*clr & cla
 
 	dick = rand(14,30)
+	npc_dick[$npclastgenerated] = dick
 
 	if temp = 12456:
 		'Big guy bring me to some hall with box.'
@@ -117,6 +120,7 @@ if $ARGS[0] = 'bb_skuta':
 		end
 	end
 
+
 	if hour >= bhour:
 		'Because of the awkward posture the body hurts'
 		gs 'pain', rand(0,1), 'back', 'labor'
@@ -157,6 +161,7 @@ if $ARGS[0] = 'bb_skuta':
 		'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/bb/bind/bind_wait'+rand(1,2)+'.mp4"></video></center>'
 	end
 
+
 	if temp < 3:
 		'The noise is moving away, it''s not up to me.'
 		minut += rand(5,15)
@@ -192,6 +197,7 @@ if $ARGS[0] = 'bb_skuta':
 		'I was implanted in the vagina'
 		'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/bb/bind/bind_sex_sart'+rand(1,2)+'.mp4"></video></center>'
 
+
 		guy += 1
 		stat['vaginal'] += 1
 		gs 'arousal', 'vaginal', rand(5,15), 'bound', 'sub', 'gloryhole'
@@ -212,6 +218,7 @@ if $ARGS[0] = 'bb_skuta':
 		'I was inserted in the ass'
 		'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/bb/bind/bind_sex1.mp4"></video></center>'
 
+
 		guy += 1
 		stat['anal'] += 1
 		gs 'arousal', 'anal', rand(5,15), 'bound', 'sub', 'gloryhole'
@@ -246,6 +253,7 @@ if $ARGS[0] = 'bb_skuta':
 		stat['bj'] += 1
 		gs 'arousal', 'bj', rand(2,8), 'bound', 'sub', 'gloryhole'
 
+
 		guy += 1
 		stat['vaginal'] += 1
 		gs 'arousal', 'vaginal', rand(3,7), 'bound', 'sub', 'gloryhole'
@@ -280,6 +288,8 @@ if $ARGS[0] = 'bb_skuta':
 	end
 end
 
+
+
 if $ARGS[0] = 'bb':
 	$location_type = 'indoors'
 	$loc = 'mod_public_WC_rab_work_blowbox'
@@ -287,9 +297,12 @@ if $ARGS[0] = 'bb':
 	gs 'stat'
 	*clr & cla
 
+
+
 	bcilg = 0
 	bglass = 0
 
+
 	temp = bhour + 2
 	if hour >= temp:
 		act 'stretch muscles by changing posture':
@@ -317,6 +330,7 @@ if $ARGS[0] = 'bb':
 	if temp = 1: 'Dead silence in the hall'
 	if temp = 2: 'I hear someone come into the hall.'
 
+
 	if temp = 1:
 		act 'stretch muscles by changing posture':
 			'It became a little easier to grind muscles and if possible stretching'
@@ -434,6 +448,8 @@ if $ARGS[0] = 'bb':
 	end
 end
 
+
+
 if $ARGS[0] = 'bj':
 	$location_type = 'indoors'
 	$loc = 'mod_public_WC_rab_work_blowbox'
@@ -588,6 +604,8 @@ if $ARGS[0] = 'bj':
 	end
 end
 
+
+
 if $ARGS[0] = 'sex':
 	$location_type = 'indoors'
 	$loc = 'mod_public_WC_rab_work_blowbox'
@@ -603,6 +621,7 @@ if $ARGS[0] = 'sex':
 			*clr & cla
 			'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/bb/v/sex1.mp4"></video></center>'
 
+
 			guy += 1
 			stat['anal'] += 1
 			gs 'arousal', 'anal', rand(5,15), 'sub', 'gloryhole'
@@ -663,6 +682,7 @@ if $ARGS[0] = 'sex':
 		*clr & cla
 		'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/bb/v/sex1.mp4"></video></center>'
 
+
 		guy += 1
 		stat['vaginal'] += 1
 		gs 'arousal', 'vaginal', rand(5,15), 'bound', 'sub', 'gloryhole'

locations/mod_public_WC_rab_work_chystota.qsrc

@@ -41,10 +41,18 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'Toha':
 	gt 'mod_public_WC_rab_work_TOHA', 'tohachystota'
 end
 
+
+
+
+
+
 if $ARGS[0] = 'tables':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -55,13 +63,15 @@ if $ARGS[0] = 'tables':
 	'<center><b><font color="maroon">"Tables"</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/tables.jpg"></center>'
 
+
 	if bcil > 0: act 'Go to the hotel': minut += 4 & gt 'mod_public_WC_rab_work_chystota', 'hotel'
 	act'Go to the Toha': minut += 1 & gt 'mod_public_WC_rab_work_chystota', 'Toha'
 	act'Go to billiard': minut += 5 & gt 'mod_public_WC_rab_work_chystota', 'billiard'
 	act'Go to balcony': minut += 3 & gt 'mod_public_WC_rab_work_chystota', 'balcony'
 	act'Go to office': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'office'
 	act'Go to dancefloor': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'dancefloor'
-	act 'wait': 'Я не можу тут чекати, впевнена Тоха зверне на це увагу.'
+	act 'wait': 'I can''t wait here, I''m sure Toha will pay attention to it. '
+
 
 	if broom = 1: 'The puddle hasn''t disappeared yet, probably the other girls haven''t noticed it yet.'
 
@@ -102,6 +112,7 @@ if $ARGS[0] = 'tables':
 
 						guy += 1
 						dick = 18
+						npc_dick[$npclastgenerated] = dick
 
 						stat['vaginal'] += 1
 						shtraf = 0
@@ -109,6 +120,8 @@ if $ARGS[0] = 'tables':
 						gs 'arousal', 'vaginal', 15, 'bound', 'sub', 'prostitution'
 						gs 'stat'
 
+
+
 						act 'Continue':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/tohacum.jpg"></center>'
@@ -137,6 +150,12 @@ if $ARGS[0] = 'tables':
 	end
 end
 
+
+
+
+
+
+
 if $ARGS[0] = 'billiard':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -164,6 +183,10 @@ if $ARGS[0] = 'billiard':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'balcony':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -174,12 +197,16 @@ if $ARGS[0] = 'balcony':
 	'<center><b><font color="maroon">Balcony</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/balcony.jpg"></center>'
 
+
+
 	act'Go to the tables': minut += 3 & gt 'mod_public_WC_rab_work_chystota', 'tables'
 	act'Go to billiard': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'billiard'
 	act'Go to office': minut += 11 & gt 'mod_public_WC_rab_work_chystota', 'office'
 	act'Go to dancefloor': minut += 11 & gt 'mod_public_WC_rab_work_chystota', 'dancefloor'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
 	if broom = 3: 'The puddle hasn''t disappeared yet, probably the other girls haven''t noticed it yet.'
 
 	temp = rand (1,5)
@@ -229,6 +256,9 @@ if $ARGS[0] = 'balcony':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'office':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -239,12 +269,17 @@ if $ARGS[0] = 'office':
 	'<center><b><font color="maroon">Office</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/office.jpg"></center>'
 
+
+
+
 	act'Go to the tables': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'tables'
 	act'Go to billiard': minut += 3 & gt 'mod_public_WC_rab_work_chystota', 'billiard'
 	act'Go to balcony': minut += 11 & gt 'mod_public_WC_rab_work_chystota', 'balcony'
 	act'Go to dancefloor': minut += 11 & gt 'mod_public_WC_rab_work_chystota', 'dancefloor'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
 	if broom = 4: 'The puddle hasn''t disappeared yet, probably the other girls haven''t noticed it yet.'
 
 	temp = rand (1,5)
@@ -338,6 +373,10 @@ if $ARGS[0] = 'office':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'dancefloor':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -348,12 +387,17 @@ if $ARGS[0] = 'dancefloor':
 	'<center><b><font color="maroon">Dancefloor</font></b></center>'
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/party.jpg"></center>'
 
+
+
+
 	act'Go to the tables': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'tables'
 	act'Go to billiard': minut += 8 & gt 'mod_public_WC_rab_work_chystota', 'billiard'
 	act'Go to balcony': minut += 11 & gt 'mod_public_WC_rab_work_chystota', 'balcony'
 	act'Go to office': minut += 11 & gt 'mod_public_WC_rab_work_chystota', 'office'
 	act 'wait': gs 'obj_din', 'wait'
 
+
+
 	if broom = 5: 'The puddle hasn''t disappeared yet, probably the other girls haven''t noticed it yet.'
 
 	temp = rand (1,5)
@@ -423,6 +467,8 @@ if $ARGS[0] = 'dancefloor':
 	end
 end
 
+
+
 if $ARGS[0] = 'hotel':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -440,6 +486,10 @@ if $ARGS[0] = 'hotel':
 	act 'I press on the floor 4': minut += 3 & gt 'mod_public_WC_rab_work_chystota_hotel', '4'
 end
 
+
+
+
+
 if $ARGS[0] = 'RP':
 	*clr & cla
 	act 'Dancing with a mop':
@@ -499,6 +549,7 @@ if $ARGS[0] = 'RP':
 			guy += 1
 			stat['vaginal'] += 1
 			dick = rand(14,30)
+			npc_dick[$npclastgenerated] = dick
 
 			gs 'arousal', 'vaginal', rand(5,20), 'sub', 'rough'
 			gs 'stat'

locations/mod_public_WC_rab_work_chystota_hotel.qsrc

@@ -37,6 +37,8 @@ if $ARGS[0] = '2':
 	act 'Get in the elevator': gt 'mod_public_WC_rab_work_chystota', 'hotel'
 end
 
+
+
 if $ARGS[0] = '3':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -75,6 +77,9 @@ if $ARGS[0] = '3':
 	act 'Get in the elevator': gt 'mod_public_WC_rab_work_chystota', 'hotel'
 end
 
+
+
+
 if $ARGS[0] = '4':
 	$loc_arg = $ARGS[0]
 	$location_type = 'indoors'
@@ -113,6 +118,8 @@ if $ARGS[0] = '4':
 	act 'Get in the elevator': gt 'mod_public_WC_rab_work_chystota', 'hotel'
 end
 
+
+
 if $ARGS[0] = 'nomer':
 	$location_type = 'indoors'
 	$loc = 'mod_public_WC_rab_work_chystota_hotel'

locations/mod_public_WC_rab_work_stil.qsrc

@@ -29,6 +29,8 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
+
 if $ARGS[0] = 'stil':
 	$location_type = 'indoors'
 	$loc = 'mod_public_WC_rab_work_stil'
@@ -43,6 +45,7 @@ if $ARGS[0] = 'stil':
 	gs 'stat'
 
 	dick = rand(14,30)
+	npc_dick[$npclastgenerated] = dick
 
 	if hour >= 9 and hour < 21:
 		temp = rand(1,4)
@@ -172,6 +175,7 @@ if $ARGS[0] = 'stil':
 					'One guy put out his dick and go around mee.'
 					'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/stil/start 2 sex.mp4"></video></center>'
 
+
 					guy += 1
 					stat['vaginal'] += 1
 					gs 'arousal', 'vaginal', rand(5,15), 'bound', 'sub', 'gloryhole'

locations/mod_public_WC_rab_work_zoo.qsrc

@@ -46,6 +46,7 @@ if $ARGS[0] = 'start':
 	end
 end
 
+
 if $ARGS[0] = 'torgy':
 	*clr & cla
 	$groshi = 0
@@ -73,6 +74,7 @@ if $ARGS[0] = 'torgy':
 	if	temp = 5: '"КС"'
 	if	temp = 6: '"КМ"'
 
+
 	if ztemp = 1: '"П2"'
 	if	ztemp = 2: '"ПС"'
 	if	ztemp = 3: '"ПМ"'
@@ -80,6 +82,7 @@ if $ARGS[0] = 'torgy':
 	if	ztemp = 5: '"КС"'
 	if	ztemp = 6: '"КМ"'
 
+
 	if ytemp = 1: '"П2"'
 	if	ytemp = 2: '"ПС"'
 	if	ytemp = 3: '"ПМ"'
@@ -87,6 +90,7 @@ if $ARGS[0] = 'torgy':
 	if	ytemp = 5: '"КС"'
 	if	ytemp = 6: '"КМ"'
 
+
 	minut += rand(5,10)
 	gs 'stat'
 	bglass = rand(1,3)
@@ -299,7 +303,7 @@ if $ARGS[0] = 'show':
 			end
 		end
 	end
-	if pcs_stam <= 110: 'I feal too tired...'
+	if pcs_stam <= 110: 'I feel too tired...'
 	if pcs_stam <= 50: 'with the last effort I stand on my feet'
 
 	'There are big letters on my cage:'
@@ -316,31 +320,37 @@ if $ARGS[0] = 'show':
 	if bcil = 1:
 		act 'continue':
 			dick = rand(20, 30)
+			npc_dick[$npclastgenerated] = dick
 			gt 'mod_public_WC_rab_work_zoo', '2d'
 		end
 	elseif bcil = 2:
 		act 'continue':
 			dick = rand(20, 30)
+			npc_dick[$npclastgenerated] = dick
 			gt 'mod_public_WC_rab_work_zoo', 'dsex'
 		end
 	elseif bcil = 3:
 		act 'continue':
 			dick = rand(20, 30)
+			npc_dick[$npclastgenerated] = dick
 			gt 'mod_public_WC_rab_work_zoo', 'dbj'
 		end
 	elseif bcil = 4:
 		act 'continue':
 			dick = rand(20, 30)
+			npc_dick[$npclastgenerated] = dick
 			gt 'mod_public_WC_rab_work_zoo', 'dass'
 		end
 	elseif bcil = 5:
 		act 'continue':
 			dick = rand(40, 50)
+			npc_dick[$npclastgenerated] = dick
 			gt 'mod_public_WC_rab_work_zoo', 'hsex'
 		end
 	elseif bcil = 6:
 		act 'continue':
 			dick = rand(40, 50)
+			npc_dick[$npclastgenerated] = dick
 			gt 'mod_public_WC_rab_work_zoo', 'hbj'
 		end
 	end
@@ -369,10 +379,13 @@ if $ARGS[0] = 'show':
 			ryska += 1
 		end
 
+
 		act 'Go to girls room': gt 'mod_public_WC_rab_work', 'room'
 	end
 end
 
+
+
 if $ARGS[0] = '2d':
 	*clr & cla
 	'There are two dogs on the stage'
@@ -380,6 +393,7 @@ if $ARGS[0] = '2d':
 
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/2dbj.jpg"></center>'
 
+
 	gs 'sweat', 'add', 10
 	DogBJ+=2
 	zoo += 2
@@ -484,10 +498,14 @@ if $ARGS[0] = '2d':
 	end
 end
 
+
+
 if $ARGS[0] = 'dsex':
 	*clr & cla
 	'There is a dog on the stage'
 	'"come on girl, he awaits you" - the guy said'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/dog.jpg"></center>'
+
 	zoo += 1
 	ztemp = 0
 	if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
@@ -515,6 +533,10 @@ if $ARGS[0] = 'dsex':
 		end
 	end
 
+
+
+
+
 	act 'I stand on my four':
 		*clr & cla
 		gs 'sweat', 'add', 10
@@ -539,7 +561,7 @@ if $ARGS[0] = 'dsex':
 				'The dog starts to penetrates me!'
 				temp = rand (1,2)
 				if temp = 1:
-					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/pussV.mp4"></video></center>'
+					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/pussv ('+rand(1,3)+').mp4"></video></center>'
 				else
 					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/sex/puss ('+rand(1,14)+').jpg"></center>'
 				end
@@ -567,6 +589,7 @@ if $ARGS[0] = 'dsex':
 						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
 					end
 
+
 					gs 'arousal', 'vaginal', 15, 'sub', 'beast', 'rough'
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -701,11 +724,13 @@ if $ARGS[0] = 'dsex':
 					end
 				end
 
+
 				act 'Prevent':
 					*clr & cla
 					minut += 2
 					if alko < 6 or zoo < 20: pcs_mood = pcs_mood*3/4
 
+
 					temp = rand (1,2)
 					if temp = 1:
 						'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/pv ('+rand(1,3)+').mp4"></video></center>'
@@ -713,6 +738,10 @@ if $ARGS[0] = 'dsex':
 						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/p.jpg"></center>'
 					end
 
+
+
+
+
 					gs 'stat'
 					banditboggle = RAND(0,5)
 					if banditboggle <= 1:
@@ -853,10 +882,13 @@ if $ARGS[0] = 'dsex':
 	end
 end
 
+
+
 if $ARGS[0] = 'dbj':
 	*clr & cla
 	zoo += 1
 	'There is a dog on the stage'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/dog.jpg"></center>'
 	ztemp = 0
 	if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
 		act 'go to the dog and kiss it':
@@ -883,6 +915,11 @@ if $ARGS[0] = 'dbj':
 		end
 	end
 
+
+
+
+
+
 	act 'I started to blow it.':
 		*clr & cla
 		gs 'sweat', 'add', 5
@@ -899,6 +936,7 @@ if $ARGS[0] = 'dbj':
 		gs 'arousal', 'end'
 		gs 'stat'
 
+
 		if pcs_apprnc >= rand(130,250) and ( zoo >= 30 or pcs_horny >= 100 ):
 			'Client unzip his fly and say "Girl, wow! I need your help too"'
 			act 'I ignore the client':
@@ -943,6 +981,7 @@ if $ARGS[0] = 'dbj':
 						'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/in ('+rand(1,3)+').jpg"></center>'
 					end
 
+
 					gs 'boyStat', 'A220'
 					spafinloc = 12
 					sexvolume = rand(20,50)
@@ -955,6 +994,7 @@ if $ARGS[0] = 'dbj':
 				end
 			end
 
+
 			gs 'willpower', 'prostitution', 'self'
 			if will_cost <= pcs_willpwr:
 				act 'ask for a tip (<<will_cost>> Willpower)':
@@ -973,6 +1013,11 @@ if $ARGS[0] = 'dbj':
 						$dodatkovi = rand(150,600)
 					end
 
+
+
+
+
+
 					act 'come closer, darling (wink)':
 						*clr & cla
 						temp = stat['bj']
@@ -1002,6 +1047,7 @@ if $ARGS[0] = 'dbj':
 								gs 'cum_manage'
 								gs 'stat'
 
+
 								temp = rand(1,3)
 								$groshi += $dodatkovi
 								if temp = 1:
@@ -1018,11 +1064,13 @@ if $ARGS[0] = 'dbj':
 											'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/bj/bj ('+rand(1,16)+').jpg"></center>'
 										end
 
+
 										gs 'stat'
 										gs 'arousal', 'bj', 10, 'sub', 'beast'
 										gs 'arousal', 'end'
 										gs 'stat'
 
+
 										act 'continue':
 											cla
 											act 'On me':
@@ -1058,6 +1106,7 @@ if $ARGS[0] = 'dbj':
 											act 'In the mouth':
 												*clr & cla
 
+
 												temp = rand(1,2)
 												if temp = 1:
 													'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/inv.mp4"></video></center>'
@@ -1065,6 +1114,7 @@ if $ARGS[0] = 'dbj':
 													'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/in ('+rand(1,3)+').jpg"></center>'
 												end
 
+
 												gs 'boyStat', 'A220'
 												spafinloc = 12
 												sexvolume = rand(20,50)
@@ -1121,23 +1171,28 @@ if $ARGS[0] = 'dbj':
 										gs 'cum_manage'
 										gs 'stat'
 
+
+
 										temp = rand (1,2)
 
 										if temp = 1:
-											'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').mp4"></video></center>'
+											'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,4)+').mp4"></video></center>'
 										else
-											'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,2)+').jpg"></center>'
+											'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
 										end
 
+
 										pcs_vag += 1
 										gs 'boyStat', 'A220'
 										sexvolume = rand(20,590)
 										gs 'cum_manage'
 										gs 'stat'
 
+
 										pcs_mood = 100
 										gs 'stat'
 
+
 										gs 'arousal', 'vaginal', 20, 'rough', 'beast'
 										gs 'arousal', 'end'
 										gs 'stat'
@@ -1195,6 +1250,7 @@ if $ARGS[0] = 'dbj':
 						act 'In the mouth':
 							*clr & cla
 
+
 							temp = rand(1,2)
 							if temp = 1:
 								'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/inv.mp4"></video></center>'
@@ -1202,6 +1258,7 @@ if $ARGS[0] = 'dbj':
 								'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/in ('+rand(1,3)+').jpg"></center>'
 							end
 
+
 							gs 'boyStat', 'A220'
 							spafinloc = 12
 							sexvolume = rand(20,50)
@@ -1247,6 +1304,7 @@ if $ARGS[0] = 'dbj':
 						gs 'cum_manage'
 						gs 'stat'
 
+
 						temp = rand(1,3)
 						$groshi += $dodatkovi
 						if temp = 1:
@@ -1263,11 +1321,13 @@ if $ARGS[0] = 'dbj':
 									'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/bj/bj ('+rand(1,16)+').jpg"></center>'
 								end
 
+
 								gs 'stat'
 								gs 'arousal', 'bj', 10, 'sub', 'beast'
 								gs 'arousal', 'end'
 								gs 'stat'
 
+
 								act 'continue':
 									cla
 									act 'On me':
@@ -1303,6 +1363,7 @@ if $ARGS[0] = 'dbj':
 									act 'In the mouth':
 										*clr & cla
 
+
 										temp = rand(1,2)
 										if temp = 1:
 											'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/inv.mp4"></video></center>'
@@ -1310,6 +1371,7 @@ if $ARGS[0] = 'dbj':
 											'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/in ('+rand(1,3)+').jpg"></center>'
 										end
 
+
 										gs 'boyStat', 'A220'
 										spafinloc = 12
 										sexvolume = rand(20,50)
@@ -1366,23 +1428,28 @@ if $ARGS[0] = 'dbj':
 								gs 'cum_manage'
 								gs 'stat'
 
+
+
 								temp = rand (1,2)
 
 								if temp = 1:
-									'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').mp4"></video></center>'
+									'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,4)+').mp4"></video></center>'
 								else
-									'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/kv ('+rand(1,2)+').jpg"></center>'
+									'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/p/k ('+rand(1,4)+').jpg"></center>'
 								end
 
+
 								pcs_vag += 1
 								gs 'boyStat', 'A220'
 								sexvolume = rand(20,590)
 								gs 'cum_manage'
 								gs 'stat'
 
+
 								pcs_mood = 100
 								gs 'stat'
 
+
 								gs 'arousal', 'vaginal', 20, 'rough', 'beast'
 								gs 'arousal', 'end'
 								gs 'stat'
@@ -1439,6 +1506,7 @@ if $ARGS[0] = 'dbj':
 			act 'In the mouth':
 				*clr & cla
 
+
 				temp = rand(1,2)
 				if temp = 1:
 					'<center><video autoplay loop src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/inv.mp4"></video></center>'
@@ -1446,6 +1514,7 @@ if $ARGS[0] = 'dbj':
 					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/cum/m/in ('+rand(1,3)+').jpg"></center>'
 				end
 
+
 				gs 'boyStat', 'A220'
 				spafinloc = 12
 				sexvolume = rand(20,50)
@@ -1460,10 +1529,14 @@ if $ARGS[0] = 'dbj':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'dass':
 	*clr & cla
 	zoo += 1
 	'There is a dog on the stage'
+	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/d/dog.jpg"></center>'
 	ztemp = 0
 	if ztemp = 0 and ( DogBJ >= 10 or ( DogVag + DogAnal ) >= 5 or zoo >= 10 ):
 		act 'go to the dog and kiss it':
@@ -1491,6 +1564,7 @@ if $ARGS[0] = 'dass':
 		end
 	end
 
+
 	act 'wait for the dog':
 		*clr & cla
 		gs 'sweat', 'add', 12
@@ -1501,6 +1575,8 @@ if $ARGS[0] = 'dass':
 		gs 'arousal', 'end'
 		gs 'stat'
 
+
+
 		act 'continue':
 			*clr & cla
 			npc_QW['A220'] += 1
@@ -1521,6 +1597,9 @@ if $ARGS[0] = 'dass':
 			gs 'pain', 2, 'asshole', 'stretch'
 			gs 'stat'
 
+
+
+
 			act 'Let the dog knot my ass':
 				*clr & cla
 				if alko < 6 and zoo < 20: pcs_mood = pcs_mood/2
@@ -1674,6 +1753,12 @@ if $ARGS[0] = 'dass':
 				end
 			end
 
+
+
+
+
+
+
 			act 'Prevent':
 				*clr & cla
 				minut += 2
@@ -1770,6 +1855,8 @@ if $ARGS[0] = 'dass':
 	end
 end
 
+
+
 if $ARGS[0] = 'bobik_setup':
 	npctemp = 220
 	gs 'npcstaticdefaults', 'defaults'
@@ -1793,6 +1880,8 @@ if $ARGS[0] = 'bobik_setup':
 	npc_nips['A<<npctemp>>'] = 1
 end
 
+
+
 if $ARGS[0] = 'Mujyk_setup':
 	npctemp = 221
 	gs 'npcstaticdefaults', 'defaults'
@@ -1816,6 +1905,8 @@ if $ARGS[0] = 'Mujyk_setup':
 	npc_nips['A<<npctemp>>'] = 1
 end
 
+
+
 if $ARGS[0] = 'hsex':
 	*clr & cla
 	'There is a horse on the stage'
@@ -1830,6 +1921,8 @@ if $ARGS[0] = 'hsex':
 
 		stat['vaginal'] += 1
 
+
+
 		gs 'stat'
 		act 'lie down and make horse cum':
 			*clr & cla
@@ -1865,12 +1958,16 @@ if $ARGS[0] = 'hsex':
 	end
 end
 
+
+
 if $ARGS[0] = 'hbj':
 	*clr & cla
 	'There is a horse on the stage'
 
+
 	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/h/h.jpg"></center>'
 
+
 	act 'Starts to suck it':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/vania/trener/zoo/h/bj/bj ('+rand(1,3)+').jpg"></center>'
@@ -1892,6 +1989,7 @@ if $ARGS[0] = 'hbj':
 			gs 'boyStat', 'A221'
 			sexvolume = rand(100,250)
 
+
 			'Horse cums in my mouth, I do my best to swallow everything but it''s to much for me! Cums goes over my mouth to my face and on my tits.'
 
 			temp = rand(1,2)
@@ -1904,6 +2002,7 @@ if $ARGS[0] = 'hbj':
 			spafinloc = 11
 			gs 'cum_manage'
 
+
 			spafinloc = 14
 			gs 'cum_manage'
 			spafinloc = 15
@@ -1929,6 +2028,10 @@ if $ARGS[0] = 'hbj':
 	end
 end
 
+
+
+
+
 if $ARGS[0] = 'end':
 	*clr & cla
 	killvar '$dodatkovi'
@@ -1940,6 +2043,7 @@ if $ARGS[0] = 'end':
 		pcs_stam = 0
 		'I''m very tired, everything floats before my eyes ... I plunge into the dark nothing...'
 
+
 		act 'continue': gt 'mod_public_WC_rab_work_zoo', 'tired'
 	else
 		pcs_stam += stammax/100
@@ -1949,6 +2053,7 @@ if $ARGS[0] = 'end':
 	end
 end
 
+
 if $ARGS[0] = 'tired':
 	*clr & cla
 	killvar '$dodatkovi'

locations/mod_public_WC_rab_zashmorg.qsrc

@@ -81,12 +81,14 @@ if $ARGS[0] = 'gola':
 		act 'No! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 
+
 	act 'shamefully run away':
 		willpowermax -= rand(1,2)
 		gs 'stat'
 		gt 'mod_public_WC_rab', 'spat2'
 	end
 
+
 	if pcs_humint <= 40 or pcs_intel <= 50:
 		act 'Ok, I will dress':
 			slova -= 3
@@ -129,6 +131,7 @@ if $ARGS[0] = 'gola':
 	end
 end
 
+
 if $ARGS[0] = 'zucchini':
 	*clr & cla
 	if zucchinilong >= 15 and zucchinilong <= 20:
@@ -143,6 +146,8 @@ if $ARGS[0] = 'zucchini':
 		gs 'boyStat', 'D7'
 	end
 
+
+
 	act 'Use the zucchini on your pussy':
 		cls
 		selfplaytime += 15
@@ -154,6 +159,7 @@ if $ARGS[0] = 'zucchini':
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/fooddildo/baklajan/puss (<<temp>>).jpg"></center>'
 		end
 
+
 		frost = 0
 
 		if pcs_vag = 0 and dick >= 20:
@@ -181,6 +187,7 @@ if $ARGS[0] = 'zucchini':
 	end
 end
 
+
 if $ARGS[0] = 'ogirok':
 	*clr & cla
 	if ogiroklong >= 15 and ogiroklong <= 20:
@@ -195,6 +202,8 @@ if $ARGS[0] = 'ogirok':
 		gs 'boyStat', 'D7'
 	end
 
+
+
 	act 'Use the cucumber on your pussy':
 		cls
 		if ytemp = 2: '<center><video autoplay loop src="mod/public_WC/lisrab/r_events/fooddildo/ogirok/2dv.mp4"></video></center>'
@@ -209,6 +218,7 @@ if $ARGS[0] = 'ogirok':
 			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/fooddildo/ogirok/puss (<<temp>>).jpg"></center>'
 		end
 
+
 		frost = 0
 
 		if pcs_vag = 0 and dick >= 20:
@@ -245,8 +255,10 @@ if $ARGS[0] = 'ogirok':
 
 		selfplaytime += 15
 
+
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/fooddildo/ogirok/ass ('+rand(1,2)+').jpg"></center>'
 
+
 		frost = 0
 		if analplugin = 1:
 			'You pull the plug out of your narrow and tight ass.'
@@ -374,6 +386,7 @@ if $ARGS[0] = '2o':
 		end
 		gs 'arousal','anal_dildo', 10
 
+
 		selfplaytime += 10
 		frost = 0
 		if pcs_vag = 0 and dick >= 20:
@@ -400,10 +413,16 @@ if $ARGS[0] = '2o':
 	end
 end
 
+
+
+
 if $ARGS[0] = 'apple':
 	*clr & cla
 	gs 'boyStat', 'D7'
 
+
+
+
 	act 'Use the apple on your pussy':
 		cls
 		selfplaytime += 15
@@ -441,6 +460,7 @@ if $ARGS[0] = 'apple':
 		selfplaytime += 15
 		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/fooddildo/apple/apple_ass ('+rand(1,3)+').jpg"></center>'
 
+
 		frost = 0
 		if analplugin = 1:
 			'You pull the plug out of your narrow and tight ass.'
@@ -462,6 +482,7 @@ if $ARGS[0] = 'apple':
 
 		'You pull your fingers out of your ass and place the apple near your hole.'
 
+
 		if (agrdif + altdif) >= 10:'You scream and bite your lip after a sharp pain when the apple enters your ass.'
 		if (agrdif + altdif) <  10:'You moan when the apple enters your ass.'
 

locations/pierce.qsrc

@@ -0,0 +1,814 @@
+# pierce
+if $ARGS[0] = '1':
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ad/ad_befor_start.mp4"></video></center>'
+
+	'39 vnyz vag v'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (39).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (38).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (37).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (36).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (35).mp4"></video></center>'
+	'35 vag'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (34).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (33).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (32).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (31).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (30).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (29).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (28).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (27).mp4"></video></center>'
+	'27'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (26).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (25).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (24).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (23).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (22).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (21).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (20).mp4"></video></center>'
+	'20'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (19).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (18).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (17).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (16).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (15).mp4"></video></center>'
+	'15'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (14).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (13).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (12).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (11).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (10).mp4"></video></center>'
+	'10'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (9).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (8).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (7).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (6).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (5).mp4"></video></center>'
+	'5m'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (4).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (3).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (2).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vagv (1).mp4"></video></center>'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (22).jpg"></center>'
+	'22p vag'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (21).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (20).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (19).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (18).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (17).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (16).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (15).jpg"></center>'
+	'15p'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (14).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (13).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (12).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (11).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (10).jpg"></center>'
+	'10'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (9).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (8).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (7).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (6).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (5).jpg"></center>'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/ass (1).jpg"></center>'
+	'5'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (4).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (3).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (2).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/vag (1).jpg"></center>'
+	'1'
+
+
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/assv (6).mp4"></video></center>'
+	'6v ass'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/assv (5).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/assv (4).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/assv (3).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/assv (2).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/assv (1).mp4"></video></center>'
+
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/ass (1).jpg"></center>'
+	'1p ass'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/ass (2).jpg"></center>'
+	'<center><img <<$set_imgh>> src="mod/public_WC/WC/events/90/5carsoldevent/work/free/ass/ass (3).jpg"></center>'
+
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/bj/bjv (1).mp4"></video></center>'
+	'1v bj'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/bj/bjv (2).mp4"></video></center>'
+	'<center><video autoplay loop src="mod/public_WC/WC/events/90/5carsoldevent/work/free/bj/bjv (3).mp4"></video></center>'
+
+
+
+
+end
+
+
+	pierWearCount = 0
+
+	if pirsA > 0 and pirsA ! 10000:	pierWearCount += 1
+	if pirsB > 0 and pirsB ! 10000:	pierWearCount += 1
+	if pirsC > 0 and pirsC ! 10000:	pierWearCount += 1
+	if pirsD > 0 and pirsD ! 10000:	pierWearCount += 1
+	if pirsE > 0 and pirsE ! 10000:	pierWearCount += 1
+	if pirsF > 0 and pirsF ! 10000:	pierWearCount += 1
+	if pirsG > 0 and pirsG ! 10000:	pierWearCount += 1
+	if pirsN > 0 and pirsN ! 10000:	pierWearCount += 1
+end
+
+if $ARGS[0] = 'pirsyaz':
+	*clr
+	cla
+
+	i = 1
+	:looptongue_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''tongue_pir'', <<i>>"><img src="images/pc/body/piercings/a<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 4:jump 'looptongue_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'tongue_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/a<<i>>.jpg"></center>'
+
+	if pirsA > 0:
+		if dyneval('RESULT = PirsA<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirsyaz'
+		else
+			if money >= 3000:
+				act 'Buy this piercing for 3000 <b>₽</b> (cash)':
+					'You buy the piercing.'
+					cla
+					money -= 3000
+					dynamic 'pirsA<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsyaz'
+				end
+			else
+				'You don''t have enough cash for this piercing.'
+			end
+			if karta + bankDebtLimit >= 3000:
+				act 'Buy this piercing for 3000 <b>₽</b> (card)':
+					'You buy the piercing.'
+					cla
+					karta -= 3000
+					dynamic 'pirsA<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsyaz'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 5000) or (karta + bankDebtLimit >= 5000):
+		if money >= 5000:
+			act 'Get your tongue pierced with this piercing for 5000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 5000
+				pirsA = i
+				dynamic 'pirsA<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 5, 'tongue', 'pierce'
+				'<center><img src="images/locations/city/industrial/salon/pirsing.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your tongue and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 5000:
+			act 'Get your tongue pierced with this piercing for 5000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 5000
+				pirsA = i
+				dynamic 'pirsA<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 5, 'tongue', 'pierce'
+				'<center><img src="images/locations/city/industrial/salon/pirsing.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your tongue and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your tongue pierced with this piercing.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirsyaz'
+end
+
+if $ARGS[0] = 'pirsgub':
+	*clr
+	cla
+
+	i = 1
+	:looplip_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''lip_pir'', <<i>>"><img src="images/pc/body/piercings/b<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 7:jump 'looplip_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'lip_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/b<<i>>.jpg"></center>'
+
+	if pirsB > 0:
+		if dyneval('RESULT = PirsB<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirsgub'
+		else
+			if money >= 4000:
+				act 'Buy this piercing for 4000 <b>₽</b> (cash)':
+					'You buy the piercing.'
+					cla
+					money -= 4000
+					dynamic 'pirsB<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsgub'
+				end
+			else
+				'You don''t have enough cash for this piercing.'
+			end
+			if karta + bankDebtLimit >= 4000:
+				act 'Buy this piercing for 4000 <b>₽</b> (card)':
+					'You buy the piercing.'
+					cla
+					karta -= 4000
+					dynamic 'pirsB<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsgub'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 6000) or (karta + bankDebtLimit >= 6000):
+		if money >= 6000:
+			act 'Get your lip pierced with this piercing for 6000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 6000
+				pirsB = i
+				dynamic 'pirsB<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 2, 'lips', 'pierce'
+				'<center><img src="images/locations/city/industrial/salon/pirsing2.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your lip and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 6000:
+			act 'Get your lip pierced with this piercing for 6000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 6000
+				pirsB = i
+				dynamic 'pirsB<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 2, 'lips', 'pierce'
+				'<center><img src="images/locations/city/industrial/salon/pirsing2.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your lip and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your lip pierced with this piercing.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirsgub'
+end
+
+if $ARGS[0] = 'pirsysh':
+	*clr
+	cla
+
+	i = 1
+	:loopears_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''ears_pir'', <<i>>"><img src="images/pc/body/piercings/c<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 24:jump 'loopears_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'ears_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/c<<i>>.jpg"></center>'
+
+	if pirsC > 0:
+		if dyneval('RESULT = PirsC<<i>>_owned') = 1:
+			'You already own these earrings.'
+			act 'Return':gt 'pirsingsalon', 'pirsysh'
+		else
+			if money >= 1000:
+				act 'Buy this piercing for 1000 <b>₽</b> (cash)':
+					'You buy the earrings.'
+					cla
+					money -= 1000
+					dynamic 'pirsC<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsysh'
+				end
+			else
+				'You don''t have enough cash for these earrings.'
+			end
+			if karta + bankDebtLimit >= 1000:
+				act 'Buy these earrings for 1000 <b>₽</b> (card)':
+					'You buy the earrings.'
+					cla
+					karta -= 1000
+					dynamic 'pirsC<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsysh'
+				end
+			else
+				'You don''t have enough money in your bank for these earrings.'
+			end
+		end
+	elseif (money >= 3000) or (karta + bankDebtLimit >= 3000):
+		if money >= 3000:
+			act 'Get your ears pierced with these earrings for 3000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 3000
+				pirsC = i
+				dynamic 'pirsC<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 1, 'ears', 'pierce'
+				'<center><img src="images/pc/body/piercings/c<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your ears and inserts your chosen earrings.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 3000:
+			act 'Get your ears pierced with these earrings for 3000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 3000
+				pirsC = i
+				dynamic 'pirsC<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 1, 'ears', 'pierce'
+				'<center><img src="images/pc/body/piercings/c<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your ears and inserts your chosen earrings.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your ears pierced with this earrings.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirsysh'
+end
+
+if $ARGS[0] = 'pirsnos':
+	*clr
+	cla
+
+	i = 1
+	:loopnose_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''nose_pir'', <<i>>"><img src="images/pc/body/piercings/d<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 7:jump 'loopnose_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'nose_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/d<<i>>.jpg"></center>'
+
+	if pirsD > 0:
+		if dyneval('RESULT = PirsD<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirsnos'
+		else
+			if money >= 2000:
+				act 'Buy this piercing for 2000 <b>₽</b> (cash)':
+					'You buy the piercing.'
+					cla
+					money -= 2000
+					dynamic 'pirsD<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsnos'
+				end
+			else
+				'You don''t have enough cash for this piercing.'
+			end
+			if karta + bankDebtLimit >= 2000:
+				act 'Buy this piercing for 2000 <b>₽</b> (card)':
+					'You buy the piercing.'
+					cla
+					karta -= 2000
+					dynamic 'pirsD<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsnos'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 5000) or (karta + bankDebtLimit >= 5000):
+		if money >= 5000:
+			act 'Get your nose pierced with this piercing for 5000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 5000
+				pirsD = i
+				dynamic 'pirsD<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 2, 'nose', 'pierce'
+				'<center><img src="images/pc/body/piercings/d<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your nose and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 5000:
+			act 'Get your nose pierced with this piercing for 5000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 5000
+				pirsD = i
+				dynamic 'pirsD<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 2, 'nose', 'pierce'
+				'<center><img src="images/pc/body/piercings/d<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your nose and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your lip pierced with this piercing.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirsnos'
+end
+
+if $ARGS[0] = 'pirsbro':
+	*clr
+	cla
+
+	i = 1
+	:loopbrow_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''brow_pir'', <<i>>"><img src="images/pc/body/piercings/e<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 2:jump 'loopbrow_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'brow_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/e<<i>>.jpg"></center>'
+
+	if pirsE > 0:
+		if dyneval('RESULT = PirsE<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirsbro'
+		else
+			if money >= 2000:
+				act 'Buy this piercing for 2000 <b>₽</b> (cash)':
+					'You buy the piercing.'
+					cla
+					money -= 2000
+					dynamic 'PirsE<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsbro'
+				end
+			else
+				'You don''t have enough cash for this piercing.'
+			end
+			if karta + bankDebtLimit >= 2000:
+				act 'Buy this piercing for 2000 <b>₽</b> (card)':
+					'You buy the piercing.'
+					cla
+					karta -= 2000
+					dynamic 'PirsE<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsbro'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 5000) or (karta + bankDebtLimit >= 5000):
+		if money >= 5000:
+			act 'Get your brow pierced with this piercing for 5000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 5000
+				PirsE = i
+				dynamic 'PirsE<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 3, 'eyebrows', 'pierce'
+				'<center><img src="images/pc/body/piercings/e<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your brow and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 5000:
+			act 'Get your brow pierced with this piercing for 5000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 5000
+				PirsE = i
+				dynamic 'PirsE<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 3, 'eyebrows', 'pierce'
+				'<center><img src="images/pc/body/piercings/e<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your brow and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your brow pierced with this piercing.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirsbro'
+end
+
+if $ARGS[0] = 'pirssos':
+	*clr
+	cla
+
+	i = 1
+	:loopnip_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''nip_pir'', <<i>>"><img src="images/pc/body/piercings/f<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 7:jump 'loopnip_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'nip_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/f<<i>>.jpg"></center>'
+
+	if pirsF > 0:
+		if dyneval('RESULT = PirsF<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirssos'
+		else
+			if money >= 6000:
+				act 'Buy these piercings for 6000 <b>₽</b> (cash)':
+					'You buy the piercings.'
+					cla
+					money -= 6000
+					dynamic 'pirsF<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirssos'
+				end
+			else
+				'You don''t have enough cash for these piercings.'
+			end
+			if karta + bankDebtLimit >= 6000:
+				act 'Buy these piercings for 6000 <b>₽</b> (card)':
+					'You buy the piercings.'
+					cla
+					karta -= 6000
+					dynamic 'pirsF<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirssos'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 10000) or (karta + bankDebtLimit >= 10000):
+		if money >= 10000:
+			act 'Get your nipples pierced with these piercings for 10,000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 10000
+				pirsF = i
+				dynamic 'pirsF<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 7, 'nipples', 'pierce'
+				'<center><img src="images/pc/body/piercings/f<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your nipples and inserts your chosen piercings.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 10000:
+			act 'Get your nipples pierced with these piercings for 10,000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 10000
+				pirsF = i
+				dynamic 'pirsF<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 7, 'nipples', 'pierce'
+				'<center><img src="images/pc/body/piercings/f<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your nipples and inserts your chosen piercings.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your lip pierced with these piercings.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirssos'
+end
+
+if $ARGS[0] = 'pirspyp':
+	*clr
+	cla
+
+	i = 1
+	:loopbelly_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''belly_pir'', <<i>>"><img src="images/pc/body/piercings/n<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 4:jump 'loopbelly_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'belly_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/n<<i>>.jpg"></center>'
+
+	if pirsN > 0:
+		if dyneval('RESULT = PirsN<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirspyp'
+		else
+			if money >= 7000:
+				act 'Buy this piercing for 7000 <b>₽</b> (cash)':
+					'You buy the piercing.'
+					cla
+					money -= 7000
+					dynamic 'PirsN<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirspyp'
+				end
+			else
+				'You don''t have enough cash for this piercing.'
+			end
+			if karta + bankDebtLimit >= 7000:
+				act 'Buy this piercing for 7000 <b>₽</b> (card)':
+					'You buy the piercing.'
+					cla
+					karta -= 7000
+					dynamic 'PirsN<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirspyp'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 10000) or (karta + bankDebtLimit >= 10000):
+		if money >= 10000:
+			act 'Get your belly button pierced with this piercing for 10,000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 10000
+				PirsN = i
+				dynamic 'PirsN<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 1, 'tummy', 'pierce'
+				'<center><img src="images/pc/body/piercings/n<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your belly button and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 10000:
+			act 'Get your belly button pierced with this piercing for 10,000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 10000
+				PirsN = i
+				dynamic 'PirsN<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 1, 'tummy', 'pierce'
+				'<center><img src="images/pc/body/piercings/n<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your belly button and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your belly button pierced with this piercing.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirspyp'
+end
+
+if $ARGS[0] = 'pirsvla':
+	*clr
+	cla
+
+	i = 1
+	:looppubic_pir
+		*p '<a href="exec:gt ''pirsingsalon'', ''pubic_pir'', <<i>>"><img src="images/pc/body/piercings/g<<i>>.jpg" 	height="250" /></a>'
+		i += 1
+	if i <= 10:jump 'looppubic_pir'
+
+	act 'Return':gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'pubic_pir':
+	*clr
+	cla
+	i = ARGS[1]
+	'<center><img src="images/pc/body/piercings/g<<i>>.jpg"></center>'
+
+	if pirsG > 0:
+		if dyneval('RESULT = PirsG<<i>>_owned') = 1:
+			'You already own this piercing.'
+			act 'Return':gt 'pirsingsalon', 'pirsvla'
+		else
+			if money >= 10000:
+				act 'Buy this piercing for 10,000 <b>₽</b> (cash)':
+					'You buy the piercing.'
+					cla
+					money -= 10000
+					dynamic 'pirsG<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsvla'
+				end
+			else
+				'You don''t have enough cash for this piercing.'
+			end
+			if karta + bankDebtLimit >= 10000:
+				act 'Buy this piercing for 10,000 <b>₽</b> (card)':
+					'You buy the piercing.'
+					cla
+					karta -= 10000
+					dynamic 'pirsG<<i>>_owned = 1'
+					act 'Return':gt 'pirsingsalon', 'pirsvla'
+				end
+			else
+				'You don''t have enough money in your bank for this piercing.'
+			end
+		end
+	elseif (money >= 25000) or (karta + bankDebtLimit >= 25000):
+		if money >= 25000:
+			act 'Get your pussy pierced with this piercing for 25,000 <b>₽</b> (cash)':
+				cls
+				minut += 30
+				money -= 25000
+				pirsG = i
+				dynamic 'pirsG<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 9, 'pubic', 'pierce'
+				'<center><img src="images/pc/body/piercings/g<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your pussy and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 25000:
+			act 'Get your pussy pierced with this piercing for 25,000 <b>₽</b> (card)':
+				cls
+				minut += 30
+				karta -= 25000
+				pirsG = i
+				dynamic 'pirsG<<i>>_owned = 1'
+				pierWearCount += 1
+				gs 'pain', 9, 'pubic', 'pierce'
+				'<center><img src="images/pc/body/piercings/g<<i>>.jpg"></center>'
+				gs 'stat'
+				'The tattooist disinfects the area, pierces your pussy and inserts your chosen piercing.'
+
+				act 'Leave':gt 'pirsingsalon', 'start'
+			end
+		end
+	else
+		'You cannot afford to get your pussy pierced with this piercing.'
+	end
+
+	act 'Return':gt 'pirsingsalon', 'pirsvla'
+end
+--- pierce ---------------------------------

mod_public_WC.qproj

@@ -41,6 +41,17 @@
 	<Location name="mod_public_WC_rab_livesklad_willdecrising"/>
 	<Location name="mod_public_WC_rab_Mayster"/>
 	<Location name="mod_public_WC_rab_Mayster2"/>
+	<Location name="mod_public_WC_rab_Mayster_cycle"/>
+	<Location name="mod_public_WC_rab_Mayster3"/>
+	<Location name="mod_public_WC_rab_Mayster4"/>
+	<Location name="mod_public_WC_rab_Mayster5"/>
+	<Location name="mod_public_WC_rab_Mayster51"/>
+	<Location name="mod_public_WC_rab_Mayster6"/>
+	<Location name="mod_public_WC_rab_Mayster7"/>
+	<Location name="mod_public_WC_rab_Mayster5_piercetrain"/>
+	<Location name="mod_public_WC_rab_Mayster5_shipka"/>
+	<Location name="mod_public_WC_rab_Mayster71"/>
+	<Location name="mod_public_WC_rab_Mayster72"/>
 	<Location name="mod_public_WC_rab_random event"/>
 	<Location name="mod_public_WC_rab_sex"/>
 	<Location name="mod_public_WC_rab_talk"/>