1
0

road 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566
  1. # road
  2. CLOSE ALL
  3. $polustanok = {
  4. cls
  5. gs 'stat'
  6. 'Ordinary railway platform.'
  7. act 'Leave':minut += 10 & nroad = 5 & gt 'road'
  8. if money >= 150:
  9. act 'Buy a ticket to the town (150 <b>₽</b>)':
  10. cls
  11. money -= 150
  12. minut += 15
  13. gs 'stat'
  14. '<center><img src="images/etogame/electri.jpg"></center>'
  15. 'You paid for the ticket and boarded the train going in the town.'
  16. 'After 15 minutes the train stopped at the station.'
  17. act 'To go further':
  18. cls
  19. minut += 15
  20. gs 'stat'
  21. '<center><img src="images/etogame/electri.jpg"></center>'
  22. 'After 15 minutes the train stopped at the station.'
  23. act 'To go further':
  24. cls
  25. minut += 15
  26. gs 'stat'
  27. '<center><img src="images/etogame/electri.jpg"></center>'
  28. 'After 15 minutes the train stopped in the Township.'
  29. act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalperG'
  30. end
  31. act 'Leave':minut += 15 & nroad = 15 & gt 'road'
  32. end
  33. act 'Leave':minut += 10 & nroad = 10 & gt 'road'
  34. end
  35. end
  36. if money >= 50:
  37. act 'Buy a ticket to the Centre (50 <b>₽</b>)':
  38. cls
  39. money -= 50
  40. minut += 15
  41. gs 'stat'
  42. '<center><img src="images/etogame/electri.jpg"></center>'
  43. 'You paid for the ticket and boarded the train going in the town.'
  44. 'After 15 minutes the train stopped at the Centre.'
  45. act 'Leave':minut += 5 & nroad = 0 & gt 'vokzalper'
  46. end
  47. end
  48. }
  49. $polustanok2 = {
  50. cls
  51. gs 'stat'
  52. 'Ordinary railway platform.'
  53. act 'Leave':minut += 10 & nroad = 10 & gt 'road'
  54. if money >= 100:
  55. act 'Buy a ticket to the town (100 <b>₽</b>)':
  56. cls
  57. money -= 100
  58. minut += 15
  59. gs 'stat'
  60. '<center><img src="images/etogame/electri.jpg"></center>'
  61. 'You paid for the ticket and boarded the train going in the town.'
  62. 'After 15 minutes the train stopped at the station.'
  63. act 'To go further':
  64. cls
  65. minut += 15
  66. gs 'stat'
  67. '<center><img src="images/etogame/electri.jpg"></center>'
  68. 'After 15 minutes the train stopped in the Township.'
  69. act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalperG'
  70. end
  71. act 'Leave':minut += 10 & nroad = 15 & gt 'road'
  72. end
  73. end
  74. if money >= 100:
  75. act 'Buy a ticket to the Center (100 <b>₽</b>)':
  76. cls
  77. money -= 100
  78. minut += 15
  79. gs 'stat'
  80. '<center><img src="images/etogame/electri.jpg"></center>'
  81. 'You paid for the ticket and boarded the train going in the town.'
  82. act 'To go further':
  83. cls
  84. minut += 15
  85. gs 'stat'
  86. '<center><img src="images/etogame/electri.jpg"></center>'
  87. 'After 15 minutes the train stopped at the Centre.'
  88. act 'Leave':minut += 5 & nroad = 0 & gt 'vokzalper'
  89. end
  90. act 'Leave':minut += 20 & nroad = 5 & gt 'road'
  91. end
  92. end
  93. }
  94. $polustanok3 = {
  95. cls
  96. gs 'stat'
  97. 'Ordinary railway platform.'
  98. act 'Leave':minut += 15 & nroad = 15 & gt 'road'
  99. if money >= 50:
  100. act 'Buy a ticket to the town (50 <b>₽</b>)':
  101. cls
  102. money -= 100
  103. minut += 15
  104. gs 'stat'
  105. '<center><img src="images/etogame/electri.jpg"></center>'
  106. 'You paid for the ticket and boarded the train going in the town.'
  107. 'After 15 minutes the train stopped in the Township.'
  108. act 'Leave':minut += 20 & nroad = 20 & gt 'vokzalperG'
  109. end
  110. end
  111. if money >= 150:
  112. act 'Buy a ticket to the Center (150 <b>₽</b>)':
  113. cls
  114. money -= 150
  115. minut += 15
  116. gs 'stat'
  117. '<center><img src="images/etogame/electri.jpg"></center>'
  118. 'You paid for the ticket and boarded the train going in the town.'
  119. act 'To go further':
  120. cls
  121. minut += 15
  122. gs 'stat'
  123. '<center><img src="images/etogame/electri.jpg"></center>'
  124. 'After 15 minutes the train stopped at the station.'
  125. act 'To go further':
  126. cls
  127. minut += 15
  128. gs 'stat'
  129. '<center><img src="images/etogame/electri.jpg"></center>'
  130. 'After 15 minutes the train stopped at the Centre.'
  131. act 'Leave':minut += 5 & nroad = 0 & gt 'vokzalper'
  132. end
  133. act 'Leave':minut += 5 & nroad = 5 & gt 'road'
  134. end
  135. act 'Leave':minut += 20 & nroad = 10 & gt 'road'
  136. end
  137. end
  138. }
  139. $drive_sex[1] = {
  140. cla
  141. cls
  142. gs'stat'
  143. horny += RAND(20,30)
  144. guy += 1
  145. bj += 1
  146. hja += 1
  147. swallow += 1
  148. spafinloc = 12
  149. gs 'cum_manage'
  150. if $road_textrand0 = 'Gadyukino':
  151. minut+=15
  152. nroad=15
  153. elseif $road_textrand0 = 'Pavlovsky':
  154. minut+=15
  155. nroad=20
  156. elseif $road_textrand0 = 'Cities':
  157. minut+=15
  158. nroad=0
  159. end
  160. '<center><B>Highway M-7</B></center>'
  161. '<center><img src="images/pic/city/road/bj (1).gif" width="1000" height="562"></center>'
  162. 'Once you get in the car, silently without waiting for the Invitation are starting to unbutton his pants and pulled out a member.'
  163. dick = RAND(14,22)
  164. if throat < dick: throat += 1
  165. if dick >= 14 and dick < 16: $raod_text_sex = 'not very big'
  166. if dick >= 16 and dick < 18: $raod_text_sex = 'normal size'
  167. if dick >= 18 and dick < 20: $raod_text_sex = 'quite large'
  168. if dick >= 20: $raod_text_sex = 'just huge'
  169. 'His cock was <<$raod_text_sex>>, centimeters <<dick>>. With a little work handles, You brought him in a standing position, He lowered his head and around his lips.'
  170. '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.'
  171. 'Shortly, your efforts come to fruition and a member began erupting right in your mouth with warm sperm, you regularly swallowed whole.'
  172. act'To go further': dynamic $autospot_drive
  173. }
  174. $drive_sex[2] = {
  175. cla
  176. cls
  177. gs'stat'
  178. horny += RAND(20,30)
  179. guy += 1
  180. hja += 1
  181. spafinloc = 7
  182. gs 'cum_manage'
  183. if $road_textrand0 = 'Gadyukino':
  184. minut+=15
  185. nroad=15
  186. elseif $road_textrand0 = 'Pavlovsky':
  187. minut+=15
  188. nroad=20
  189. elseif $road_textrand0 = 'Cities':
  190. minut+=15
  191. nroad=0
  192. end
  193. '<center><B>Highway M-7</B></center>'
  194. '<center><img src="images/pic/city/road/HJ (1).gif" width="800" height="448"></center>'
  195. 'Once you get in the car, silently without waiting for the Invitation are starting to unbutton his pants and pulled out a member.'
  196. dick = RAND(14,22)
  197. if dick >= 14 and dick < 16: $raod_text_sex = 'not very big'
  198. if dick >= 16 and dick < 18: $raod_text_sex = 'normal size'
  199. if dick >= 18 and dick < 20: $raod_text_sex = 'quite large'
  200. if dick >= 20: $raod_text_sex = 'just huge'
  201. 'His cock was <<$raod_text_sex>>, centimeters <<dick>>. With a little work handles, You brought him in a standing position.'
  202. '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.'
  203. 'Shortly, your efforts come to fruition and a member began erupting right at you, getting on clothes.'
  204. act'To go further': dynamic $autospot_drive
  205. }
  206. $autospot_drive = {
  207. cla
  208. cls
  209. gs'stat'
  210. money -= autostop_price*100
  211. if $road_textrand0 = 'Gadyukino':
  212. minut+=15
  213. nroad=15
  214. elseif $road_textrand0 = 'Pavlovsky':
  215. minut+=15
  216. nroad=20
  217. elseif $road_textrand0 = 'Cities':
  218. minut+=15
  219. nroad=0
  220. end
  221. picrand = RAND(1,2)
  222. if truck_drive = 1:
  223. '<center><B>Highway M-7</B></center>'
  224. '<center><img src="images/pic/city/road/truck_drive (<<picrand>>).jpg" ></center>'
  225. elseif bandit_drive = 1:
  226. '<center><B>Highway M-7</B></center>'
  227. '<center><img src="images/pic/city/road/drive (<<picrand>>).jpg" ></center>'
  228. else
  229. '<center><B>Highway M-7</B></center>'
  230. '<center><img src="images/pic/city/road/drive (<<picrand>>).jpg" ></center>'
  231. end
  232. act'Get out of the car':gt $curloc
  233. }
  234. $autostpo_money = {
  235. cla
  236. gs'stat'
  237. autostop_price = RAND(3,6)
  238. textrand = RAND(1,5)
  239. if textrand = 1:$road_textrand4 = 'For <<autostop_price*100>> I`ll take.'
  240. if textrand = 2:$road_textrand4 = '<<autostop_price*100>> and went.'
  241. if textrand = 3:$road_textrand4 = '<<autostop_price*100>>.'
  242. if textrand = 4:$road_textrand4 = 'Come for <<autostop_price*100>>.'
  243. if textrand = 5:$road_textrand4 = '<<autostop_price*100>> <b>₽</b> and drove.'
  244. if truck_drive = 1:
  245. '<center><B>Highway M-7</B></center>'
  246. '<center><img src="images/pic/city/road/truck_guy (<<picrand>>).jpg" ></center>'
  247. elseif bandit_drive = 1:
  248. '<center><B>Highway M-7</B></center>'
  249. '<center><img src="images/pic/city/road/guy (1).jpg" ></center>'
  250. else
  251. '<center><B>Highway M-7</B></center>'
  252. '<center><img src="images/pic/city/road/guy (<<picrand>>).jpg" ></center>'
  253. end
  254. 'You have to ask for a ride <<$road_textrand0>>'
  255. 'The driver looks you an appraising look and said,:'
  256. vnerand = RAND(0,1200)
  257. if vnerand <= vnesh:
  258. cla
  259. '- I can free, but only if the exhaust.'
  260. '- How? - you ask.'
  261. '- You know yourself, an adult girl.'
  262. act'Can mouth work':
  263. cla
  264. drive_sex[1] = 1
  265. 'After much thought, you are responsible:'
  266. '- Good, I can work out the mouth'
  267. '- Come on, out to be.'
  268. act'Sit in the car':dynamic $drive_sex[1]
  269. end
  270. act'Can, but only handles':
  271. cla
  272. drive_sex[2] = 1
  273. 'After much thought, you are responsible:'
  274. '- Good, but only handles.'
  275. '- This is what? Brezguesh?'
  276. '- No... - not knowing, the answer you squeeze.'
  277. 'After some hesitation he responds:'
  278. '- Okay, out to be.'
  279. act'Sit in the car':dynamic $drive_sex[2]
  280. end
  281. exit
  282. else
  283. '- <<$road_textrand4>>'
  284. end
  285. if money > autostop_price*100:
  286. act'Agree': dynamic $autospot_drive
  287. end
  288. act'Takeout':
  289. cla
  290. '- Sorry, but it`s too expensive for me - you say , and leave your car.'
  291. act 'Further':gt $curloc
  292. end
  293. act'Ask for lower price':
  294. cla
  295. textrand = RAND(1,4)
  296. if textrand = 1:$road_textrand5 = '- Bley-and-Ying, so expensive... and maybe you can like-the cheaper?'
  297. if textrand = 2:$road_textrand5 = '- Man, I completely broke... You can just-slightly cheaper?'
  298. if textrand = 3:$road_textrand5 = '- Maybe both-some agree?'
  299. if textrand = 4:$road_textrand5 = '- It can reduce the price a little bit for me?'
  300. 'You coyly playing hair and eyes shooting to reduce the asking price:'
  301. '<<$road_textrand5>>'
  302. 'He once again appreciatively examining you and says,:'
  303. vnerand = RAND(0,400)
  304. if vnerand <= vnesh:
  305. cla
  306. '- Can all free, but only if the exhaust.'
  307. '- How? - you ask.'
  308. '- You know yourself, an adult girl.'
  309. act'Can mouth work':
  310. cla
  311. drive_sex[1] = 1
  312. 'After much thought, you are responsible:'
  313. '- Good, I can work out the mouth'
  314. '- Come on, out to be.'
  315. act'Sit in the car':dynamic $drive_sex[1]
  316. end
  317. act'Can, but only handles':
  318. cla
  319. drive_sex[2] = 1
  320. 'After much thought, you are responsible:'
  321. '- Good, but only handles.'
  322. '- This is what? Brezguesh?'
  323. '- No... - not knowing, the answer you squeeze.'
  324. 'After some hesitation he responds:'
  325. '- Okay, out to be.'
  326. act'Sit in the car':dynamic $drive_sex[2]
  327. end
  328. else
  329. ivrand = RAND(1,2)
  330. autostop_price -= ivrand
  331. '- Okay, Fine. you throw off <<ivrand*100>> <b>₽</b>. For <<autostop_price*100>> I`ll take.'
  332. if money > autostop_price*100:
  333. act'Agree':
  334. !trip
  335. dynamic $autospot_drive
  336. end
  337. end
  338. act'Takeout':
  339. cla
  340. '- Sorry, it`s still too expensive for me.'
  341. act 'Further':gt $curloc
  342. end
  343. act'Offer him a blowjob':
  344. cla
  345. drive_sex[1] = 1
  346. '- Or maybe I`m with you-then by-another burst into tears? - you say licking your lips.'
  347. '- Huh... Come on, then get in the car.'
  348. act'Sit in the car':dynamic $drive_sex[1]
  349. end
  350. end
  351. end
  352. }
  353. $autostop_d = {
  354. cls
  355. cla
  356. gs'stat'
  357. truck_drive = 0
  358. bandit_drive = 0
  359. drive_sex[1] = 0
  360. drive_sex[2] = 0
  361. textrand = RAND(1,5)
  362. if textrand = 1:$road_textrand1 = '- Girl, Where are you keeping?'
  363. if textrand = 2:$road_textrand1 = '- Hey, beauty, let `ll drop?'
  364. if textrand = 3:$road_textrand1 = '- Girl, you ride?'
  365. if textrand = 4:$road_textrand1 = '- Where are you?'
  366. if textrand = 5:$road_textrand1 = '- Girl, You know how dangerous it is one that`s so middle of the road stand?'
  367. textrand = RAND(1,5)
  368. if textrand = 1:$road_textrand2 = 'perfectly clean and shiny'
  369. if textrand = 2:$road_textrand2 = 'dirty'
  370. if textrand = 3:$road_textrand2 = 'dusty'
  371. if textrand = 4:$road_textrand2 = 'slightly dusty'
  372. if textrand = 5:$road_textrand2 = 'very dirty'
  373. textrand = RAND(1,5)
  374. if textrand = 1:$road_textrand3 = 'black'
  375. if textrand = 2:$road_textrand3 = 'white'
  376. if textrand = 3:$road_textrand3 = 'red'
  377. if textrand = 4:$road_textrand3 = 'blue'
  378. if textrand = 5:$road_textrand3 = 'gray'
  379. !wagon and sedan
  380. ivrand = RAND(1,2)
  381. if ivrand = 1:
  382. !gangsters or not
  383. ivrand = RAND(1,4)
  384. if ivrand > 1:
  385. picrand = RAND(2,4)
  386. bandit_drive = 1
  387. '<center><B>Highway M-7</B></center>'
  388. '<center><img src="images/pic/city/road/guy (<<picrand>>).jpg" ></center>'
  389. 'Near you stopped <<$road_textrand3>>, <<$road_textrand2>> car and the window looked out on you man:'
  390. if vnesh < 60:'- Woman, where you?'
  391. if vnesh >= 60:'<<$road_textrand1>>'
  392. elseif ivrand = 1:
  393. '<center><B>Highway M-7</B></center>'
  394. '<center><img src="images/pic/city/road/guy (1).jpg" ></center>'
  395. 'Near you stopped black, tinted windows of the car and looked out at you 2 like the bandits man, dressed in leather:'
  396. '- Listen, Malykha, zachalivay Us - We drove to the right place!'
  397. end
  398. elseif ivrand = 2:
  399. picrand = RAND(1,3)
  400. truck_drive = 1
  401. '<center><B>Highway M-7</B></center>'
  402. '<center><img src="images/pic/city/road/truck_guy (<<picrand>>).jpg" ></center>'
  403. 'Near You stopped a huge <<$road_textrand3>>, <<$road_textrand2>> furans and from the window you looked out of the man:'
  404. if vnesh < 60:'- Woman, where you?'
  405. if vnesh >= 60:'<<$road_textrand>>'
  406. end
  407. }
  408. $metka = $ARGS[0]
  409. $loc = $CURLOC
  410. clr
  411. gs 'stat'
  412. gs 'outdoors'
  413. '<center><h4>Northern Highway</h4></center>'
  414. '<center><img src="images/etogame/road.jpg"></center>'
  415. '<center><<nroad>> km</center>'
  416. 'Highway which carried cars at high speed, with the hum of the wind enveloping sweep wagon.'
  417. if car > 0 and cardrive = 19 and ncarroad = nroad:'Standing on the sidelines <a href="exec:gs ''carF'', ''start''">your <<$car>></a>.'
  418. if nroad = 0:act 'Go to town':minut += 60 & gt 'nord'
  419. if nroad = 16:act 'Go to object':minut += 60 & gt 'obekt'
  420. if nroad = 20:act 'Go to town':minut += 60 & gt 'pavCommercial'
  421. if nroad < 20:act 'Go north':minut += 60 & nroad += 1 & gt $curloc
  422. if nroad > 0:act 'Go south':minut += 60 & nroad -= 1 & gt $curloc
  423. if nroad>0 and nroad<20:
  424. act'Vote toward Pavlovsk':
  425. cls
  426. minut+=15
  427. gs'stat'
  428. gorand=rand(1,100)
  429. if gorand<=60:
  430. picrand = RAND(1,3)
  431. '<center><B>Highway M-7</B></center>'
  432. '<center><img src="images/pic/city/road/autostop (<<picrand>>).jpg" ></center>'
  433. 'You vote but the cars rush by simply not paying any attention to you.'
  434. act 'Further':gt $curloc
  435. elseif gorand>60:
  436. dynamic $autostop_d
  437. if nroad<15:
  438. act 'Ask to take you to Gadyukino':
  439. cls
  440. $road_textrand0 = 'Gadyukino'
  441. dynamic $autostpo_money
  442. end
  443. end
  444. act 'Ask to take you to Pavlovsky':
  445. cls
  446. $road_textrand0 = 'Pavlovsky'
  447. dynamic $autostpo_money
  448. end
  449. end
  450. end
  451. act'Vote in the direction of the city':
  452. cls
  453. minut+=15
  454. gs'stat'
  455. gorand=rand(1,100)
  456. if gorand<=60:
  457. picrand = RAND(1,3)
  458. '<center><B>Highway M-7</B></center>'
  459. '<center><img src="images/pic/city/road/autostop (<<picrand>>).jpg" ></center>'
  460. 'You vote but the cars rush by simply not paying any attention to you.'
  461. act 'Further':gt $curloc
  462. elseif gorand>60:
  463. dynamic $autostop_d
  464. if nroad>15:
  465. act 'Ask to take you to Gadyukino':
  466. cls
  467. $road_textrand0 = 'Gadyukino'
  468. dynamic $autostpo_money
  469. end
  470. end
  471. act 'Ask to take you to the City':
  472. cls
  473. $road_textrand0 = 'Cities'
  474. dynamic $autostpo_money
  475. end
  476. end
  477. end
  478. end
  479. if nroad = 0:
  480. 'Outskirts of the town which brought sad ramshackle huts of kryazhestyh trees.'
  481. 'At a roadside stand <a href="exec:minut+=5&GT ''furi''">Lorry</a>'
  482. elseif nroad = 1:
  483. 'Not podaleku from the city could be seen <a href="exec:minut += 15 & gt ''locmansion''">houses</a>.'
  484. elseif nroad = 2:
  485. ''
  486. elseif nroad = 3:
  487. 'Podaleku not seen from the road <a href="exec:minut += 15 & gt ''graveyard''">cemetery</a>.'
  488. elseif nroad = 4:
  489. ''
  490. elseif nroad = 5:
  491. 'Not podaleku from the road is <a href="exec:dynamic $polustanok">railway stop</a> next to which is <a href="exec:minut += 15 & gt ''dachi''">cottage cooperative</a>.'
  492. elseif nroad = 6:
  493. ''
  494. elseif nroad = 7:
  495. ''
  496. elseif nroad = 8:
  497. ''
  498. elseif nroad = 9:
  499. ''
  500. elseif nroad = 10:
  501. 'Not podaleku from the road is <a href="exec:dynamic $polustanok2">railway stop</a>.'
  502. elseif nroad = 11:
  503. ''
  504. elseif nroad = 12:
  505. ''
  506. elseif nroad = 13:
  507. ''
  508. elseif nroad = 14:
  509. 'Near the road is <a href="exec:minut += 15 & gt ''motel''">motel</a>'
  510. elseif nroad = 15:
  511. 'Not podaleku from the road is <a href="exec:dynamic $polustanok3">railway stop</a>. From the little station leads to a dirt road <a href="exec:minut += 30 & gt ''gadukino''">Village Gadyukino</a>'
  512. elseif nroad = 16:
  513. 'Not podaleku is seen from the road abandoned building.'
  514. elseif nroad = 17:
  515. ''
  516. elseif nroad = 18:
  517. ''
  518. elseif nroad = 19:
  519. ''
  520. elseif nroad = 20:
  521. 'Highway abuts the old provincial town.'
  522. 'At a roadside stand <a href="exec:minut+=5&GT ''furi''">Lorry</a>'
  523. end
  524. --- road ---------------------------------