# gskino
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'
'
'Small cinema in which there is just one small screen. A movie ticket costs 100 ₽.'
$kinoevent = {
act 'Turn around and look':
cls
pcs_horny += 3
gs'stat'
''
'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
manna += rand(60, 90)
if gorslut >= 2 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 ---------------------------------