TigorCat/locations/mod_public_WC_rab_work.qsrc

# mod_public_WC_rab_work
if $ARGS[0] = 'wstart':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'wstart'
	gs 'stat'
	*clr & cla
	vladajob11 = 1
	vladajob12 = 1
	vladajob13 = 1
	vladajob14 = 1
	vladajob2 = 1
	vladajob3 = 1
	vladajob4 = 1
	'I sit in the car and we go somewhere'
	'During the road Tolik explaine me something in general'
	*nl
	'My friend owns a place to meet very serious people and he needs girls who are able to take care of important guests.'
	'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>'
		'Very soon we arrived at the back entrance of the house somewhere in the cottage town, Tolik took me to a room where different girls were painting, dressing ...'
		'- Yana, let''s meet, it''s Betsy!'
		'A 30-year-old woman of stern appearance approached us.'
		'- 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
			brak += 3
			'Tolik, changed in the face.'
			'All right, Betsy, let''s go home'
			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)':
				cla
				gs 'willpower', 'pay', 'self'
				gs 'stat'
				brak += 1
				'Tolik''s eyes filled with anger'
				'- Tolik, goodbye, I''ll figure it out.'

				act 'Go with her': gt 'mod_public_WC_rab_work', 'start'
				act 'Tolik, I don''t want to do this':
					cla
					brak += 3
					'Tolik, changed in the face.'
					'All right, Betsy, let''s go home'
					act 'continue': gt 'mod_public_WC_rab_work', 'niroboti'
				end
			end
		else
			act 'I am not Betsi (<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] = 'niroboti':
	$loc_arg = $ARGS[0]
	CLOSE ALL
	'You disappointed me very much. I''m ashamed of Yana!'
	'You will be punished!'
	act 'continue': gt 'mod_public_WC_kara', 'vtecha'
end


if $ARGS[0] = 'start':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'start'
	gs 'stat'
	*clr & cla

	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/room.jpg"></center>'

	if askTolik = 1:
		ryska = 0
		'All right, girl. I''m not interested in your relationship with Tolik, Betsy, keep in mind, we appreciate quality girls ... If you are popular you will have our support ... If you create problems ... well, you better not create them.'
		'We have several works. But Tolik is responsible for you, so I will admit you to them, only with his consent.'
	end

	if askTolik = 2:
		'Very soon we arrived at the back entrance of the house somewhere in the cottage town, Tolik took me to a room where different girls were painting and getting dressed. And he called Yana'
		'I''ll pick you up in the morning, and God forbid, Jana will complain about you'
	end
	askTolik = 2

	'Hi Betsy, today there are vacancies:'
	'Serve'
	if vlada >= 30 and ryska >= 10: 'Entertain guests.'
	if WCzoo > 0: 'Perform at the zootheater.'
	if vlada >= 45 and ryska >= 20: 'Make a company at meetings.'
	'What will you do?'

	act 'Maid':
		cla
		'Well, there is always a lot of work here. Will you deliver drinks, keep clean? Or you can work with table decoration. there is also an option to work in blowbox'
		act'I will deliver drinks': napoi = 1 & gt 'mod_public_WC_rab_work', 'room'

		act'I will keep it clean': chystota = 1 & gt 'mod_public_WC_rab_work', 'room'

		act'Being a table decoration is for me': stil = 1 & gt 'mod_public_WC_rab_work', 'room'

		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'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'room'
	gs 'stat'
	*clr & cla
	'She sent me to prepare'

	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/room.jpg"></center>'

	'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
		'<center><video autoplay loop src="mod/public_WC/lisrab/work/meeting/ready.mp4"></video></center>'

		makupskl_exp += rand(1,3)
		vidageday -= 1
		pcs_makeup = 4
		pcs_lipbalm += 8
		'<<$makeupHeavy>>'

		if napoi = 1 or chystota = 1:
			gs 'bras', 'remove'
			gs 'clothing', 'strip'
			gs 'panties', 'remove'
			gs 'shoes', 'strip'
			gs 'purses', 'remove'
			defaultcoat = 0

			gs 'clothing', 'wear', 'uniform', 43
			gs 'shoes', 'wear', 'fetish', 18
			gs 'stat'
		end
		if stil = 1 or zt = 1:
			gs 'bras', 'remove'
			gs 'clothing', 'strip'
			gs 'panties', 'remove'
			gs 'shoes', 'strip'
			gs 'purses', 'remove'
			defaultcoat = 0
			$clothingworntype = 'nude'
		end
		act 'Continue': gt 'mod_public_WC_rab_work', 'room'
	end
	act 'go to the bathroom':
		cla
		*nl
		'There is a '+iif(stanok < 1,'<a href="exec: stanok += 5 & gt ''mod_public_WC_rab'', ''tub1''">razor</a>','razors')+' on a shelf, that I can use to shave with. '+iif(stanok > 0, '<a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>','')+''
		dynamic $brit
		act 'Take a shower (0:15)':
			cla
			*clr
			minut += 15
			dynamic $showerdin

			pcs_sweat = 0
			pcs_hairbsh = 1
			pcs_breath = 1
			face_write = 0
			body_write = 0
			lubonus = 0
			pcs_mood += 5
			gs 'stat'
			'<center><video autoplay loop src="mod/public_WC/lisrab/wash.mp4"></video></center>'
			act 'Move away': minut += 1 & gt 'mod_public_WC_rab_work', 'room'
		end
		act 'Move away': minut += 1 & gt 'mod_public_WC_rab_work', 'room'
	end

	act 'go to work':
		minut += 3
		gs 'stat'
		if napoi = 1:
			if pcs_makeup < 3:
				'Yana stopped me. Betsy, makeup is not enough, go draw.'
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Yana.jpg"></center>'
			elseif pcs_sweat > 10:
				'She stopped. Betsy, weren''t you taught to wash?'
			else
				napoi = 0 & gt 'mod_public_WC_rab_work', 'napoi'
			end
		end
		if chystota = 1:
			if pcs_makeup < 3:
				'Yana stopped me. Betsy, makeup is not enough, go draw.'
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Yana.jpg"></center>'
			else
				chystota = 0 & gt 'mod_public_WC_rab_work', 'chystota'
			end
		end
		if stil = 1:
			if pcs_sweat > 1:
				'Yana stopped me. Betsy, you have to be perfectly clean!'
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Yana.jpg"></center>'
			elseif $clothingworntype ! 'nude':
				'You need to be naked! Go prepare yourself'
			else
				stil = 0 & gt 'mod_public_WC_rab_work', 'stil'
			end
		end
		if blowbox = 1: blowbox = 0 & gt 'mod_public_WC_rab_work', 'blowbox'
		if zt = 1:
			if $clothingworntype ! 'nude':
				'You need to be naked! Go prepare yourself'
			else
				zt = 0
				gt 'mod_public_WC_rab_work', 'zoo'
			end
		end
	end
	act 'talk with girls':
		'Знайомство з новою дівчиною і іншими -=WIP=-'
	end
	if hour >= 9 and hour < 21:
		*clr & cla
		'Tolik comes to me after quick chat with Yana'
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Yana.jpg"></center>' & '<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
		if shtraf > 5:
			'Can you do something without problems?'
			brak += shtraf
			shtraf = 0
		else
			'Well done, let''s go home.'
			brak -= 5
			shtraf = 0
			vlada += 1 + ryska
		end
		if ryska > 0:
			act 'Ask her about the symbol drawn on me':
				*clr
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/symbol.jpg"></center>'
				'Well, well... this means that our client liked you very much and he recommends your service to others. If you collect 10 lines, we will be able to entrust you with the best work, of course with the consent of Anatoly.'
			end
		end
		act 'Go to Tolik''s car':
			minut += rand(20,40)
			gs 'stat'

			gs 'bras', 'remove'
			gs 'clothing', 'strip'
			gs 'panties', 'remove'
			gs 'shoes', 'strip'
			gs 'purses', 'remove'
			defaultcoat = 0

			gs 'stat'

			gt 'mod_public_WC_rab_DVIR', 'dvir'
		end
	end
end


if $ARGS[0] = 'napoi':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'napoi'
	gs 'stat'
	*clr & cla
	'Yana looked at me: "Fine, now, let me fasten the jewelry.'
	'With a few quick movements, she fastened the chains to her arms and lifted them to the front.'
	temp = rand(1,5)
	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bw (<<temp>>).jpg"></center>'
	'Go to the bar, Toha will explain everything to you.'
	'Oh, and I remind you: "If you can remember something to customers, the better for you."'
	pain['hands'] += 3
	gs 'arousal', 'flash', 5, 'sub', 'bound', 'humiliation'
	gs 'flash', 'exhibitionism', 2
	gs 'stat'
	act 'Go to the bar':
		cla
		'I went to the bar, a handsome young boy immediately began to command'
		if vladajob13 = 1 and vladajob11 = 1:
			'Hi, Yana said you''re new to Betsy. Here you need to do everything clearly and quickly. If your tray is empty, you immediately go to me, if it is full, then I have already told you where and to whom to take drinks. I hope there will be no problems. At 9 o''clock your shift ends, you will come to me.'
			vladajob11 = 0
		elseif vladajob11 = 1 and vladajob13 = 0:
			'Hi, Betsy. Here you need to do everything clearly and quickly. If your tray is empty, you immediately go to me, if it is full, then I have already told you where and to whom to take drinks. I hope there will be no problems. At 9 o''clock your shift ends, you will come to me.'
			vladajob11 = 0
		else
			'Hi Betsy, let''s get to work soon. At 9 o''clock your shift ends.'
		end
		temp = rand(1,5)
		if temp = 1: broom = 1
		if temp = 2: broom = 2
		if temp = 3: broom = 3
		if temp = 4: broom = 4
		if temp = 5: broom = 5
		bglass = rand(1,6)
		bcil = bglass
		'Here are the drinks, go to <<broom>>, after reading this stand, the guys will understand that it is them'
		bhour = hour
		bminut = minut
		temp = rand(1,8)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
		'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/napoi/hils.mp4"></video></center>'
		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'
		act'Go to office': minut += 8 & gt 'mod_public_WC_rab_work', 'office'
		act'Go to dancefloor': minut += 8 & gt 'mod_public_WC_rab_work', 'dancefloor'
	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'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'tables'
	gs 'stat'
	*clr & cla
	'<center><b><font color="maroon">"Tables"</font></b></center>'
	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/tables.jpg"></center>'
	pain['hands'] += 2
	gs 'arousal', 'flash', 0, 'sub', 'bound', 'humiliation'
	gs 'flash', 'exhibitionism', 3
	gs 'mod_public_WC_rab_work', 'heels'
	if bglass >0:
		temp = rand(1,8)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
	else
		temp = rand(1,5)
		'<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 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'
	act'Go to dancefloor': minut += 8 & gt 'mod_public_WC_rab_work', 'dancefloor'
	act 'wait': 'I can''t wait here, I''m sure Toha will pay attention to that.'

	act 'Slovly walk around to show your order number':
		if broom = 1 and bglass > 0:
			gt 'mod_public_WC_rab_work', 'SWA'
		else
			'Nobody pays attention to me'
		end
	end





	if hour >= 10 and hour < 21:
		*clr & cla
		temp = ( hour - bhour ) * 60 + ( minut - bminut )
		if temp <= 15: bcil = 0
		if bcil ! 0: shtraf += rand(0,3)
		'Toha approached me'
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/TOHA.jpg"></center>'
		'Did you enjoy working so much? Why don''t you come to me? Your shift is over, you can go to the room '
		'Toha quickly freed me from the BDSM gear.'
		if temp <= 15: 'Don''t worry about the last order.'
		act 'Go to the room': gt 'mod_public_WC_rab_work', 'room'
		if shtraf >= 5:
			act 'Ask if I can make up for my guilt today.':
				cla
				'Of course you can, let''s go to the subsoil. Toha smiles greedily'

				gs 'willpower', 'prostitution', 'self', 'medium'
				if will_cost <= pcs_willpwr:
					act 'Go to the utility room (<<will_cost>> Willpower)':
						*clr & cla
						gs 'willpower', 'pay', 'self'
						gs 'stat'

						'Going into the utility room, Toh bent me by force and began to have'
						'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/ursex.mp4"></video></center>'

						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>'
							'Toha finished on me.'
							'"It was good, your sins are forgiven." - finally Toha slapped me on the buttocks. '
							cumarrnam = 'Toha'
							spafinloc = 11
							spafinloc = 15
							shtraf = 0
							gs 'cum_manage'
							gs 'stat'
							act 'Go to the room': gt 'mod_public_WC_rab_work', 'room'

						end
					end
				else
					act 'Go to the utility room (<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
	end
end



if $ARGS[0] = 'billiard':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'billiard'
	gs 'stat'
	*clr & cla
	'<center><b><font color="maroon">Billiard</font></b></center>'
	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/billiard.jpg"></center>'
	pain['hands'] += 2
	gs 'arousal', 'flash', 0, 'sub', 'bound', 'humiliation'
	gs 'flash', 'exhibitionism', 1
	gs 'mod_public_WC_rab_work', 'heels'
	if bglass >0:
		temp = rand(1,8)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
	else
		temp = rand(1,5)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bw (<<temp>>).jpg"></center>'
	end

	act'Go to the tables': minut += 5 & gt 'mod_public_WC_rab_work', 'tables'
	act'Go to balcony': minut += 8 & gt 'mod_public_WC_rab_work', 'balcony'
	act'Go to office': minut += 3 & gt 'mod_public_WC_rab_work', 'office'
	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'
		else
			'Nobody pays attention to me'
		end
	end

end


if $ARGS[0] = 'balcony':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'balcony'
	gs 'stat'
	*clr & cla
	'<center><b><font color="maroon">Balcony</font></b></center>'
	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/balcony.jpg"></center>'
	pain['hands'] += 2
	gs 'arousal', 'flash', 0, 'sub', 'bound', 'humiliation'
	gs 'flash', 'exhibitionism', 2
	gs 'mod_public_WC_rab_work', 'heels'
	if bglass >0:
		temp = rand(1,8)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
	else
		temp = rand(1,5)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bw (<<temp>>).jpg"></center>'
	end

	act'Go to the tables': minut += 3 & gt 'mod_public_WC_rab_work', 'tables'
	act'Go to billiard': minut += 8 & gt 'mod_public_WC_rab_work', 'billiard'
	act'Go to office': minut += 11 & gt 'mod_public_WC_rab_work', '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 = 3 and bglass > 0:
			gt 'mod_public_WC_rab_work', 'SWA'
		else
			'Nobody pays attention to me'
		end
	end

end


if $ARGS[0] = 'office':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'office'
	gs 'stat'
	*clr & cla
	'<center><b><font color="maroon">Office</font></b></center>'
	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/office.jpg"></center>'
	pain['hands'] += 2
	gs 'arousal', 'flash', 0, 'sub', 'bound', 'humiliation'
	gs 'flash', 'exhibitionism', 2
	gs 'mod_public_WC_rab_work', 'heels'
	if bglass > 0:
		temp = rand(1,8)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
	else
		temp = rand(1,5)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bw (<<temp>>).jpg"></center>'
	end

	act'Go to the tables': minut += 8 & gt 'mod_public_WC_rab_work', 'tables'
	act'Go to billiard': minut += 3 & gt 'mod_public_WC_rab_work', 'billiard'
	act'Go to balcony': minut += 11 & gt 'mod_public_WC_rab_work', '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 = 4 and bglass > 0:
			gt 'mod_public_WC_rab_work', 'SWA'
		else
			'Nobody pays attention to me'
		end
	end

end


if $ARGS[0] = 'dancefloor':
	$loc_arg = $ARGS[0]
	$location_type = 'indoors'
	$loc = 'mod_public_WC_rab_work'
	$metka = 'dancefloor'
	gs 'stat'
	*clr & cla
	'<center><b><font color="maroon">Dancefloor</font></b></center>'
	'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/party.jpg"></center>'
	pain['hands'] += 2
	gs 'arousal', 'flash', 0, 'sub', 'bound', 'humiliation'
	gs 'flash', 'exhibitionism', 3
	gs 'mod_public_WC_rab_work', 'heels'
	if bglass >0:
		temp = rand(1,8)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bwfull (<<temp>>).jpg"></center>'
	else
		temp = rand(1,5)
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/bw (<<temp>>).jpg"></center>'
	end

	act'Go to the tables': minut += 8 & gt 'mod_public_WC_rab_work', 'tables'
	act'Go to billiard': minut += 8 & gt 'mod_public_WC_rab_work', 'billiard'
	act'Go to balcony': minut += 11 & gt 'mod_public_WC_rab_work', 'balcony'
	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'
		else
			'Nobody pays attention to me'
		end
	end
end






if $ARGS[0] = 'SWA':
	minut += rand(3,10)
	cla
	gs 'stat'
	if bcil > 1: temp = 1
	if bcil = 1: temp = 2
	if temp = 1: 'men waved at me. I approached.'
	if temp = 2: 'man waved at me. I approached.'

	temp = ( hour - bhour ) * 60 + ( minut - bminut )
	if temp <= 30:
		'girl, you''re just in time'
	else
		'where have you been?'
	end
	'All the glasses from the tray were taken'
	if bcil ! bglass:
		bcilg = bcil - bglass

		temp = ( hour - bhour ) * 60 + ( minut - bminut )
		if temp <= 30:
			bcil = 0
		else
			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'
		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'
		act'Go to dancefloor': minut += 8 & gt 'mod_public_WC_rab_work', 'dancefloor'

		act 'Turn around and bend over':
			*clr & cla
			temp = rand(1,3)
			if temp = 1:
				'And that''s all you can offer? - I felt a strong blow to the ass'
				gs 'pain', rand(1,3), 'asscheeks', 'slap'
				'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/napoi/smakass.mp4"></video></center>'
				'Everyone, get out of here'
				temp = rand(1, bcilg)
				if temp <= 2: bcilg = 0
				minut += 3
				gs 'stat'
				act 'go away': gt 'mod_public_WC_rab_work', 'tables'
			else
				'Well, uh-uh, maybe I''ll forgive you. - a stranger began to take off my panties ... '
				'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/napoi/tease.mp4"></video></center>'
				gs 'arousal', 'flash', 10, 'bound', 'sub'
				if analplug = 1 : 'Wow, you''re packed here too!'
				act 'continue':
					*clr & cla
					minut += rand(10,15)
					if analplug = 1:
						'The man pulled out the cork and fucked me'
						'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/napoi/bwsex.mp4"></video></center>'
						'oh you are forgiven'
						temp = rand (1,3)
						if temp = 1: analplug = 0
						bcil = 0
						bcilg = 0
						if pcs_ass <= 10:
							'"You''re so tight, it was unbelievable, but let me recommend you to friends ..." - He took a marker and made a line on me, adding a number next to it. '
							ryska += 1
						end
						gs 'arousal', 'anal', rand(5,15), 'bound', 'sub'

						guy += 1
						stat['anal'] += 1
						temp = rand(1,4)
						if temp = 1: spafinloc = 3
						if temp = 2: spafinloc = 4
						if temp = 3: spafinloc = 5
						if temp = 4: spafinloc = 8
						gs 'stat'

					else
						'The guy fucked me'
						'<center><video autoplay loop src="mod/public_WC/lisrab/work/serving/napoi/bwsex.mp4"></video></center>'
						if pcs_vag <= 10:
							'"You''re so tight, it was unbelievable, but let me recommend you to friends ..." - He took a marker and made a line on me, adding a number next to it. - "... Wow, you are unquestionably forgiven." '
							ryska += 1
							bcil = 0
							bcilg = 0
						else
							temp = rand(1,3)
							if temp = 3:
								'It wasn''t bad, but I''m not sorry.'
							else
								'Excuse me, leave my semen on tip.'
							bcil = 0
							bcilg = 0
							end
						end
						gs 'arousal', 'vaginal', rand(5,15), 'bound', 'sub'

						guy += 1
						stat['vaginal'] += 1
						temp = rand(1,4)
						if temp = 1: spafinloc = 0
						if temp = 2: spafinloc = 1
						if temp = 3: spafinloc = 2
						if temp = 4: spafinloc = 17
						gs 'stat'
					end
					gs 'stat'
					act 'go away': gt 'mod_public_WC_rab_work', 'tables'
				end
				act 'try to run away':
					*clr & cla
					'Leaping from the man, I ran to the exit, accompanied by my escape loud laughter'
					minut += rand(3,8)
					if pcs_heels <= rand(20,45): 'Unable to keep my balance, I fall to the floor, raising a new wave of laughter'
					temp = rand(1,10)
					if temp <= 2: bcil = 0 & bcilg = 0
					gs 'pain', rand(2,7), 'back', 'hit'
					gs 'stat'
					act 'Stand up': gt 'mod_public_WC_rab_work', 'tables'
				end
			end
		end
		gs 'willpower', 'humiliation', 'self', 'medium'
		if will_cost <= pcs_willpwr:
			act 'Get on your knees (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'self'
				gs 'stat'
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/work/serving/napoi/knee.jpg"></center>'
				temp = rand (1,2)
				if temp = 1:
					minut += rand(5,10)
					'A man pokes his finger at me and calls the men next to me to look at such a bimbo'
					willpowermax -= rand(3,5)
					'The men buzzed approvingly looking at me. "Don''t be afraid, bitch, I won''t complain about you ..." '
					bcil = 0
					bcilg = 0


				else
					minut += rand(0,5)
					'Oh, get out of here, you''re a little whipped if you work like that!'
					willpowermax -= rand(0,1)

				end

				gs 'stat'
				act 'go away': gt 'mod_public_WC_rab_work', 'tables'
			end
		else
			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:
			bcil = 0
		else
			bcil = temp
		end
		bglass = 0
	end

	act'Go to the tables': minut += 8 & gt 'mod_public_WC_rab_work', 'tables'
	act'Go to billiard': minut += 8 & gt 'mod_public_WC_rab_work', 'billiard'
	act'Go to balcony': minut += 11 & gt 'mod_public_WC_rab_work', 'balcony'
	act'Go to office': minut += 11 & gt 'mod_public_WC_rab_work', 'office'
	act 'wait': gs 'obj_din', 'wait'
end



if $ARGS[0] = 'heels':
	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 & '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 - 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 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':
	gt 'mod_public_WC_rab_work_stil', 'start'

end

if $ARGS[0] = 'blowbox':
	gt 'mod_public_WC_rab_work_blowbox', 'start'

end

if $ARGS[0] = 'zoo':
	gt 'mod_public_WC_rab_work_zoo', 'start'

end

--- mod_public_WC_rab_work ---------------------------------