glife/locations/gskino.qsrc

# gskino
gs 'stat'
if night_mode = 1:
	fcolor = rgb(255, 255, 255)
	bcolor = rgb(0, 0, 0)
	lcolor = rgb(106, 90, 205)
else
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
end
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/theater/kinoteatr.jpg"></center>'
'Small cinema in which there is just one small screen. A movie ticket costs 100 <b>₽</b>.'

$kinoevent = {
	act 'Turn around and look':
		cls
		pcs_horny += 3
		gs'stat'
		'<center><img src="images/locations/pavlovsk/park/theater/sex/kino.mp4"></center>'
		'You see on the back row a girl sucking a guy, nobody reacts to the loud smacking sound that can be heard by the whole cinema.'
		'You turn back and watch the rest of the film.'
		act 'Leave the cinema':gt'gskver'		
	end
}

if money >= 100:
	act 'Go to the movies':
		cla
		*clr
		money -= 100
		minut += 120
		pcs_mood += rand(30, 50)
		if pav_slut >= 50 and rand(0,2) > 0:
			cla
			'As you are watching the film a guy sits next to you and whispers in your ear, "Everyone knows you like to suck cock, I''ll pay you if you have a go on this."'
			'Its dark, but you can just about see well enough to see that he is pointing at his dick.'
			act 'Agree':gt 'gevent', '2'
			act 'Reject':
				cla
				'You tell him you''d rather watch the film, he mutters something that sounded like bitch and leaves you to watch the rest of the movie in peace.'
				act 'Leave the cinema':gt 'gskver'
			end
			
			exit
		end
		if rand(1,100) > 10:
			'You quietly watch the film.'
		else
			'You quietly watch the movie, but suddenly behind you there is a strange sound.' & dynamic $kinoevent
		end

		act 'Leave the cinema':gt 'gskver'
	end
end

act 'Leave the cinema':minut += 5 & gt 'gskver'

--- gskino ---------------------------------