# bouling
if $ARGS[0] = 'start' or $ARGS[0] = '':
$sexloc = 'bouling'
*clr & cla
$loc = 'bouling'
$metka = 'start'
$menu_loc = 'bouling'
$menu_arg = 'start'
menu_off = 0
$location_type = 'public_indoors'
gs 'stat'
'
Bowling'
'
> src="images/locations/city/citycenter/mall/bowling/boul.jpg">'
act 'Leave':gt 'torgcentr'
if hour >= 8 and hour <= 20 and money >= 300:
act 'Play (300 ₽) (1:00)':
menu_off = 1
minut += 60
boulvar = 0
boulingnav += rand(0, 3)
boulrand = rand(0, 9)
gs 'npcgeneratec', 0, 'Bowling Player', rand(18,40)
$boy[0] = $npclastgenerated
$boydesc[0] = $npc_usedname[$npclastgenerated]
gs 'npcgeneratec', 0, 'Bowling Player', rand(18,40)
$boy[1] = $npclastgenerated
$boydesc[1] = $npc_usedname[$npclastgenerated]
gs 'stat'
act 'Leave': gt 'bouling'
if boulrand = 0:
'You see two guys and they challenge you to a game.'
act 'Gamble (2000 ₽)':boulvar = 1 & gt 'bouling', 'randwin'
elseif boulrand = 1:
'You meet two girls and they suggest challenging two guys to a game: Prize 5000 ₽, lose and they have sex with you.'
act 'Play':boulvar = 2 & gt 'bouling', 'randwin'
elseif boulrand > 1:
gt 'bouling', 'randwin'
end
end
end
end
if $ARGS[0] = 'randwin':
cla
if boulingnav < 10:boulwin = rand(0, 10)
if boulingnav >= 10 and boulingnav < 20:boulwin = rand(0, 12)
if boulingnav >= 20 and boulingnav < 30:boulwin = rand(0, 14)
if boulingnav >= 30 and boulingnav < 40:boulwin = rand(0, 16)
if boulingnav >= 40 and boulingnav < 50:boulwin = rand(0, 18)
if boulingnav >= 50 and boulingnav < 60:boulwin = rand(0, 20)
if boulingnav >= 60 and boulingnav < 70:boulwin = rand(0, 22)
if boulingnav >= 70 and boulingnav < 80:boulwin = rand(0, 24)
if boulingnav >= 80 and boulingnav < 90:boulwin = rand(0, 26)
if boulingnav >= 90:boulwin = rand(0, 28)
if boulwin > 10 and boulvar = 0:
money += 300
'You won and received 300 ₽.'
act 'Leave': gt 'bouling'
elseif boulwin > 10 and boulvar = 1:
money += 2000
'You won and received 2,000 ₽.'
act 'Leave': gt 'bouling'
elseif boulwin > 10 and boulvar = 2:
money += 5000
'You won and received 5,000 ₽.'
act 'Leave': gt 'bouling'
elseif boulwin <= 10 and boulvar = 0:
money -= 300
'You lost and paid 300 ₽.'
act 'Leave': gt 'bouling'
elseif boulwin <= 10 and boulvar = 1:
picrand = 14
if money >= 2000:
'You lose and have to pay 2,000 ₽.'
act 'Offer sex instead':xgt 'sexdvoe', 'var'
act 'Pay': money -= 2000 & gt 'bouling'
else
'You lost, but you do not have money to pay, only one thing for it.'
act 'Offer sex instead':xgt 'sexdvoe', 'var'
end
elseif boulwin <= 10 and boulvar = 2:
picrand = 11
'You lose, open those legs.'
act 'Pay':gt 'sexorg', 'var'
end
end
--- bouling ---------------------------------