# road
CLOSE ALL
$polustanok = {
cls
gs 'stat'
'Ordinary railway platform.'
act 'Leave':minut += 10 & nroad = 5 & gt 'road'
if money >= 150:
act 'Buy a ticket to the town (150 ₽)':
cls
money -= 150
minut += 15
gs 'stat'
'
'
'You paid for the ticket and boarded the train going in the town.'
'After 15 minutes the train stopped at the station.'
act 'To go further':
cls
minut += 15
gs 'stat'
''
'After 15 minutes the train stopped at the station.'
act 'To go further':
cls
minut += 15
gs 'stat'
''
'After 15 minutes the train stopped in the Township.'
act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalperG'
end
act 'Leave':minut += 15 & nroad = 15 & gt 'road'
end
act 'Leave':minut += 10 & nroad = 10 & gt 'road'
end
end
if money >= 50:
act 'Buy a ticket to the Centre (50 ₽)':
cls
money -= 50
minut += 15
gs 'stat'
''
'You paid for the ticket and boarded the train going in the town.'
'After 15 minutes the train stopped at the Centre.'
act 'Leave':minut += 5 & nroad = 0 & gt 'vokzalper'
end
end
}
$polustanok2 = {
cls
gs 'stat'
'Ordinary railway platform.'
act 'Leave':minut += 10 & nroad = 10 & gt 'road'
if money >= 100:
act 'Buy a ticket to the town (100 ₽)':
cls
money -= 100
minut += 15
gs 'stat'
''
'You paid for the ticket and boarded the train going in the town.'
'After 15 minutes the train stopped at the station.'
act 'To go further':
cls
minut += 15
gs 'stat'
''
'After 15 minutes the train stopped in the Township.'
act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalperG'
end
act 'Leave':minut += 10 & nroad = 15 & gt 'road'
end
end
if money >= 100:
act 'Buy a ticket to the Center (100 ₽)':
cls
money -= 100
minut += 15
gs 'stat'
''
'You paid for the ticket and boarded the train going in the town.'
act 'To go further':
cls
minut += 15
gs 'stat'
''
'After 15 minutes the train stopped at the Centre.'
act 'Leave':minut += 5 & nroad = 0 & gt 'vokzalper'
end
act 'Leave':minut += 20 & nroad = 5 & gt 'road'
end
end
}
$polustanok3 = {
cls
gs 'stat'
'Ordinary railway platform.'
act 'Leave':minut += 15 & nroad = 15 & gt 'road'
if money >= 50:
act 'Buy a ticket to the town (50 ₽)':
cls
money -= 100
minut += 15
gs 'stat'
''
'You paid for the ticket and boarded the train going in the town.'
'After 15 minutes the train stopped in the Township.'
act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalperG'
end
end
if money >= 150:
act 'Buy a ticket to the Center (150 ₽)':
cls
money -= 150
minut += 15
gs 'stat'
''
'You paid for the ticket and boarded the train going in the town.'
act 'To go further':
cls
minut += 15
gs 'stat'
''
'After 15 minutes the train stopped at the station.'
act 'To go further':
cls
minut += 15
gs 'stat'
''
'After 15 minutes the train stopped at the Centre.'
act 'Leave':minut += 5 & nroad = 0 & gt 'vokzalper'
end
act 'Leave':minut += 5 & nroad = 5 & gt 'road'
end
act 'Leave':minut += 20 & nroad = 10 & gt 'road'
end
end
}
$drive_sex[1] = {
cla
cls
gs'stat'
horny += RAND(20,30)
guy += 1
bj += 1
hja += 1
swallow += 1
spafinloc = 12
gs 'cum_manage'
if $road_textrand0 = 'Gadyukino':
minut+=15
nroad=15
elseif $road_textrand0 = 'Pavlovsky':
minut+=15
nroad=20
elseif $road_textrand0 = 'Cities':
minut+=15
nroad=0
end
'Highway M-7'
''
'Once you get in the car, silently without waiting for the Invitation are starting to unbutton his pants and pulled out a member.'
dick = RAND(14,22)
if throat < dick: throat += 1
if dick >= 14 and dick < 16: $raod_text_sex = 'not very big'
if dick >= 16 and dick < 18: $raod_text_sex = 'normal size'
if dick >= 18 and dick < 20: $raod_text_sex = 'quite large'
if dick >= 20: $raod_text_sex = 'just huge'
'His cock was <<$raod_text_sex>>, centimeters <>. With a little work handles, You brought him in a standing position, He lowered his head and around his lips.'
'You admitted assiduously sucking, swallowing and caress his tongue. The piquancy of the suction stranger you are not a joke and you filed with undisguised pleasure began to swallow it as deep as possible.'
'Shortly, your efforts come to fruition and a member began erupting right in your mouth with warm sperm, you regularly swallowed whole.'
act'To go further': dynamic $autospot_drive
}
$drive_sex[2] = {
cla
cls
gs'stat'
horny += RAND(20,30)
guy += 1
hja += 1
spafinloc = 7
gs 'cum_manage'
if $road_textrand0 = 'Gadyukino':
minut+=15
nroad=15
elseif $road_textrand0 = 'Pavlovsky':
minut+=15
nroad=20
elseif $road_textrand0 = 'Cities':
minut+=15
nroad=0
end
'Highway M-7'
''
'Once you get in the car, silently without waiting for the Invitation are starting to unbutton his pants and pulled out a member.'
dick = RAND(14,22)
if dick >= 14 and dick < 16: $raod_text_sex = 'not very big'
if dick >= 16 and dick < 18: $raod_text_sex = 'normal size'
if dick >= 18 and dick < 20: $raod_text_sex = 'quite large'
if dick >= 20: $raod_text_sex = 'just huge'
'His cock was <<$raod_text_sex>>, centimeters <>. With a little work handles, You brought him in a standing position.'
'You took it hard nadrachivat and a little crush palm. The piquancy of the situation, you are not a joke and you filed with undisguised diligence he began nadrachivat.'
'Shortly, your efforts come to fruition and a member began erupting right at you, getting on clothes.'
act'To go further': dynamic $autospot_drive
}
$autospot_drive = {
cla
cls
gs'stat'
money -= autostop_price*100
if $road_textrand0 = 'Gadyukino':
minut+=15
nroad=15
elseif $road_textrand0 = 'Pavlovsky':
minut+=15
nroad=20
elseif $road_textrand0 = 'Cities':
minut+=15
nroad=0
end
picrand = RAND(1,2)
if truck_drive = 1:
'Highway M-7'
''
elseif bandit_drive = 1:
'Highway M-7'
''
else
'Highway M-7'
''
end
act'Get out of the car':gt $curloc
}
$autostpo_money = {
cla
gs'stat'
autostop_price = RAND(3,6)
textrand = RAND(1,5)
if textrand = 1:$road_textrand4 = 'For <> I`ll take.'
if textrand = 2:$road_textrand4 = '<> and went.'
if textrand = 3:$road_textrand4 = '<>.'
if textrand = 4:$road_textrand4 = 'Come for <>.'
if textrand = 5:$road_textrand4 = '<> ₽ and drove.'
if truck_drive = 1:
'Highway M-7'
''
elseif bandit_drive = 1:
'Highway M-7'
''
else
'Highway M-7'
''
end
'You have to ask for a ride <<$road_textrand0>>'
'The driver looks you an appraising look and said,:'
vnerand = RAND(0,1200)
if vnerand <= vnesh:
cla
'- I can free, but only if the exhaust.'
'- How? - you ask.'
'- You know yourself, an adult girl.'
act'Can mouth work':
cla
drive_sex[1] = 1
'After much thought, you are responsible:'
'- Good, I can work out the mouth'
'- Come on, out to be.'
act'Sit in the car':dynamic $drive_sex[1]
end
act'Can, but only handles':
cla
drive_sex[2] = 1
'After much thought, you are responsible:'
'- Good, but only handles.'
'- This is what? Brezguesh?'
'- No... - not knowing, the answer you squeeze.'
'After some hesitation he responds:'
'- Okay, out to be.'
act'Sit in the car':dynamic $drive_sex[2]
end
exit
else
'- <<$road_textrand4>>'
end
if money > autostop_price*100:
act'Agree': dynamic $autospot_drive
end
act'Takeout':
cla
'- Sorry, but it`s too expensive for me - you say , and leave your car.'
act 'Further':gt $curloc
end
act'Ask for lower price':
cla
textrand = RAND(1,4)
if textrand = 1:$road_textrand5 = '- Bley-and-Ying, so expensive... and maybe you can like-the cheaper?'
if textrand = 2:$road_textrand5 = '- Man, I completely broke... You can just-slightly cheaper?'
if textrand = 3:$road_textrand5 = '- Maybe both-some agree?'
if textrand = 4:$road_textrand5 = '- It can reduce the price a little bit for me?'
'You coyly playing hair and eyes shooting to reduce the asking price:'
'<<$road_textrand5>>'
'He once again appreciatively examining you and says,:'
vnerand = RAND(0,400)
if vnerand <= vnesh:
cla
'- Can all free, but only if the exhaust.'
'- How? - you ask.'
'- You know yourself, an adult girl.'
act'Can mouth work':
cla
drive_sex[1] = 1
'After much thought, you are responsible:'
'- Good, I can work out the mouth'
'- Come on, out to be.'
act'Sit in the car':dynamic $drive_sex[1]
end
act'Can, but only handles':
cla
drive_sex[2] = 1
'After much thought, you are responsible:'
'- Good, but only handles.'
'- This is what? Brezguesh?'
'- No... - not knowing, the answer you squeeze.'
'After some hesitation he responds:'
'- Okay, out to be.'
act'Sit in the car':dynamic $drive_sex[2]
end
else
ivrand = RAND(1,2)
autostop_price -= ivrand
'- Okay, Fine. you throw off <> ₽. For <> I`ll take.'
if money > autostop_price*100:
act'Agree':
!trip
dynamic $autospot_drive
end
end
act'Takeout':
cla
'- Sorry, it`s still too expensive for me.'
act 'Further':gt $curloc
end
act'Offer him a blowjob':
cla
drive_sex[1] = 1
'- Or maybe I`m with you-then by-another burst into tears? - you say licking your lips.'
'- Huh... Come on, then get in the car.'
act'Sit in the car':dynamic $drive_sex[1]
end
end
end
}
$autostop_d = {
cls
cla
gs'stat'
truck_drive = 0
bandit_drive = 0
drive_sex[1] = 0
drive_sex[2] = 0
textrand = RAND(1,5)
if textrand = 1:$road_textrand1 = '- Girl, Where are you keeping?'
if textrand = 2:$road_textrand1 = '- Hey, beauty, let `ll drop?'
if textrand = 3:$road_textrand1 = '- Girl, you ride?'
if textrand = 4:$road_textrand1 = '- Where are you?'
if textrand = 5:$road_textrand1 = '- Girl, You know how dangerous it is one that`s so middle of the road stand?'
textrand = RAND(1,5)
if textrand = 1:$road_textrand2 = 'perfectly clean and shiny'
if textrand = 2:$road_textrand2 = 'dirty'
if textrand = 3:$road_textrand2 = 'dusty'
if textrand = 4:$road_textrand2 = 'slightly dusty'
if textrand = 5:$road_textrand2 = 'very dirty'
textrand = RAND(1,5)
if textrand = 1:$road_textrand3 = 'black'
if textrand = 2:$road_textrand3 = 'white'
if textrand = 3:$road_textrand3 = 'red'
if textrand = 4:$road_textrand3 = 'blue'
if textrand = 5:$road_textrand3 = 'gray'
!wagon and sedan
ivrand = RAND(1,2)
if ivrand = 1:
!gangsters or not
ivrand = RAND(1,4)
if ivrand > 1:
picrand = RAND(2,4)
bandit_drive = 1
'Highway M-7'
''
'Near you stopped <<$road_textrand3>>, <<$road_textrand2>> car and the window looked out on you man:'
if vnesh < 60:'- Woman, where you?'
if vnesh >= 60:'<<$road_textrand1>>'
elseif ivrand = 1:
'Highway M-7'
''
'Near you stopped black, tinted windows of the car and looked out at you 2 like the bandits man, dressed in leather:'
'- Listen, Malykha, zachalivay Us - We drove to the right place!'
end
elseif ivrand = 2:
picrand = RAND(1,3)
truck_drive = 1
'Highway M-7'
''
'Near You stopped a huge <<$road_textrand3>>, <<$road_textrand2>> furans and from the window you looked out of the man:'
if vnesh < 60:'- Woman, where you?'
if vnesh >= 60:'<<$road_textrand>>'
end
}
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'outdoors'
'Northern Highway
'
''
'<> km'
'Highway which carried cars at high speed, with the hum of the wind enveloping sweep wagon.'
if car > 0 and cardrive = 19 and ncarroad = nroad:'Standing on the sidelines your <<$car>>.'
if nroad = 0:act 'Go to town':minut += 60 & gt 'nord'
if nroad = 16:act 'Go to object':minut += 60 & gt 'obekt'
if nroad = 20:act 'Go to town':minut += 60 & gt 'pavCommercial'
if nroad < 20:act 'Go north':minut += 60 & nroad += 1 & gt $curloc
if nroad > 0:act 'Go south':minut += 60 & nroad -= 1 & gt $curloc
if nroad>0 and nroad<20:
act'Vote toward Pavlovsk':
cls
minut+=15
gs'stat'
gorand=rand(1,100)
if gorand<=60:
picrand = RAND(1,3)
'Highway M-7'
''
'You vote but the cars rush by simply not paying any attention to you.'
act 'Further':gt $curloc
elseif gorand>60:
dynamic $autostop_d
if nroad<15:
act 'Ask to take you to Gadyukino':
cls
$road_textrand0 = 'Gadyukino'
dynamic $autostpo_money
end
end
act 'Ask to take you to Pavlovsky':
cls
$road_textrand0 = 'Pavlovsky'
dynamic $autostpo_money
end
end
end
act'Vote in the direction of the city':
cls
minut+=15
gs'stat'
gorand=rand(1,100)
if gorand<=60:
picrand = RAND(1,3)
'Highway M-7'
''
'You vote but the cars rush by simply not paying any attention to you.'
act 'Further':gt $curloc
elseif gorand>60:
dynamic $autostop_d
if nroad>15:
act 'Ask to take you to Gadyukino':
cls
$road_textrand0 = 'Gadyukino'
dynamic $autostpo_money
end
end
act 'Ask to take you to the City':
cls
$road_textrand0 = 'Cities'
dynamic $autostpo_money
end
end
end
end
if nroad = 0:
'Outskirts of the town which brought sad ramshackle huts of kryazhestyh trees.'
'At a roadside stand Lorry'
elseif nroad = 1:
'Not podaleku from the city could be seen houses.'
elseif nroad = 2:
''
elseif nroad = 3:
'Podaleku not seen from the road cemetery.'
elseif nroad = 4:
''
elseif nroad = 5:
'Not podaleku from the road is railway stop next to which is cottage cooperative.'
elseif nroad = 6:
''
elseif nroad = 7:
''
elseif nroad = 8:
''
elseif nroad = 9:
''
elseif nroad = 10:
'Not podaleku from the road is railway stop.'
elseif nroad = 11:
''
elseif nroad = 12:
''
elseif nroad = 13:
''
elseif nroad = 14:
'Near the road is motel'
elseif nroad = 15:
'Not podaleku from the road is railway stop. From the little station leads to a dirt road Village Gadyukino'
elseif nroad = 16:
'Not podaleku is seen from the road abandoned building.'
elseif nroad = 17:
''
elseif nroad = 18:
''
elseif nroad = 19:
''
elseif nroad = 20:
'Highway abuts the old provincial town.'
'At a roadside stand Lorry'
end
--- road ---------------------------------