# kiosk
!!WD:"SUB >= 15" for act - Will need balancing / playtesting
if $ARGS[0] = 'start':
$kioskloc = ''
if hour >= 14 and hour <= 16:
cls
gs 'stat'
'
'
'It is currently very busy and looks like you''ll have to wait to get to the counter.'
act 'Wait in line (20 Minutes)':
minut += 20
$kioskloc = 'counter' & gt 'kiosk'
end
act 'Leave':gt $locM
if pcs_exhibition >= 45:
act 'Flash both your tits and your pussy':
cls
exhibition_exp += rand(12,15)
'> src="images/shared/sex/exhibitionism/flash_tits_pus.jpg">'
'The people in front of you are shocked, as they see you flashing your tits and your pussy. As a small thank you, some of them let you move further up the line.'
gs 'arousal', 'flash_breasts', 5, 'exhibition'
gs 'arousal', 'flash_pussy', 5, 'exhibition'
minut -= 5
gs 'arousal', 'end'
gs 'stat'
act 'Go to the counter':$kioskloc = 'counter' & gt 'kiosk'
end
end
if pcs_exhibition >= 40:
act 'Flash your pussy':
cls
exhibition_exp += rand(9,12)
if pcs_pubes >= 10:
'> src="images/shared/sex/exhibitionism/flash_hairy.jpg">'
else
'> src="images/shared/sex/exhibitionism/flash_nohairy.jpg">'
end
'The people in front of you are shocked, as they see you flashing your pussy. As a small thank you, some of them let you move further up the line.'
gs 'arousal', 'flash_pussy', 5, 'exhibition'
gs 'arousal', 'end'
gs 'stat'
act 'Go to the counter':$kioskloc = 'counter' & gt 'kiosk'
end
end
if pcs_exhibition >= 35:
act 'Flash your tits':
cls
exhibition_exp += rand(5,8)
'> src="images/shared/sex/exhibitionism/flash_tits.jpg">'
'The people in front of you are shocked, as they see you flashing your tits. As a small thank you, some of them let you move further up the line.'
gs 'arousal', 'flash_breasts', 5, 'exhibition'
gs 'arousal', 'end'
gs 'stat'
act 'Go to the counter':$kioskloc = 'counter' & gt 'kiosk'
end
end
if SUB >= 15:
act 'Suggest a blowjob in exchange for jumping the queue':
if cumloc[12] = 0 and cumloc[11] = 0:
cls
pcs_throat += 1
gs 'npcgeneratec', 0, 'stranger from the post office', rand(19,45)
gs 'boyStat', $npclastgenerated
exhibition_exp += rand(5,8)
'> src="images/shared/sex/blowjob/kiosk_blowjob.jpg">'
'A man agrees to your suggestion and lets you move in front of him.'
gs 'arousal', 'bj', 10, 'sub'
gs 'stat'
act 'Cum on your face':
cls
'> src="images/pc/body/cum/cumface/cumface' + rand(1,23) + '.jpg">'
'The man cums on your face.'
spafinloc = 11
gs 'cum_manage'
gs 'arousal', 'end'
gs 'stat'
act 'Go to the counter':$kioskloc = 'counter' & gt 'kiosk'
end
act 'Cum on your mouth':
cls
'> src="images/locations/shared/postoffice/sex/cumlip.jpg">'
'The man cums inside your mouth.'
spafinloc = 12
gs 'cum_manage'
gs 'arousal', 'end'
gs 'stat'
act 'Go to the counter':$kioskloc = 'counter' & gt 'kiosk'
end
else
'> src="images/locations/shared/postoffice/punch.gif">'
'The Man punches you in the gut and says, "Go away bitch, your mouth is full of sperm." You stagger away from the kiosk and spend 2 hours curled up in a ball.'
minut += 120
gs 'pain', 4, 'tummy', 'hit'
act 'Recover':gt $locM
end
end
end
else
$kioskloc = 'counter' & gt 'kiosk'
end
end
if $kioskloc = 'counter':
cls
gs 'stat'
''
'> src="images/locations/city/shared/kiosk/ruch.jpg">'
if $message ! '':
''+$message+''
killvar '$message'
else
''
end
*pl ''
*pl ''
*P FUNC ('$stock_item', 20, 'Cigarettes', 50, 'siga', 'kiosk')
*P FUNC ('$single_stock_item', 1, 'Fashion magazine', 50, 'fashmag', 'kiosk')
*P FUNC ('$single_stock_item', 1, 'Computer magazine', 50, 'compmag', 'kiosk')
*P FUNC ('$single_stock_item', 1, 'Biographical magazine', 50, 'biomag', 'kiosk')
*P FUNC ('$single_stock_item', 1, 'Cooking magazine', 50, 'cookmag', 'kiosk')
*P FUNC ('$single_stock_item', 1, 'Knitting magazine', 50, 'knitmag', 'kiosk')
*P FUNC ('$single_stock_item', 1, 'Fitness magazine', 50, 'fitmag', 'kiosk')
'
'
*pl
if money >= 50:
act 'Eat snack (50 ₽)':
money -= 50
gs 'food', 'snack'
end
end
act 'Leave':minut += 5 & gt $locM
end
--- kiosk ---------------------------------