393_road 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483
  1. # road
  2. <<<<<<< 393_road
  3. $polustanok = {
  4. cls
  5. gs 'stat'
  6. 'Ordinary railway platform.'
  7. act 'Exit': minut += 10 & nroad = 5 & gt 'road'
  8. if money >= 150:
  9. act 'Buy a ticket to the town (150 rubles)':
  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 'Exit': minut += 20 & nroad = 20 & gt 'vokzalG'
  30. end
  31. act 'Exit': minut += 15 & nroad = 15 & gt 'road'
  32. end
  33. act 'Exit': minut += 10 & nroad = 10 & gt 'road'
  34. end
  35. end
  36. if money >= 50:
  37. act 'Buy a ticket to the Centre (50 rubles)':
  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 'Exit': minut += 5 & nroad = 0 & gt 'Vokzal'
  46. end
  47. =======
  48. $polustanok={
  49. cls
  50. gs'stat'
  51. 'Ordinary railway platform.'
  52. act 'Go_Out':minut+=10&nroad=5&gt'road'
  53. if money>=150:
  54. act 'Buy a ticket to town (150 RUB)':
  55. cls
  56. money-=150
  57. minut+=15
  58. gs'stat'
  59. '<center><img src="pic/electri.jpg" ></center>'
  60. 'You paid for a ticket and boarded the train going into town.'
  61. 'through 15 minute train stopped at the station.'
  62. act 'go further':
  63. cls
  64. minut+=15
  65. gs'stat'
  66. '<center><img src="pic/electri.jpg" ></center>'
  67. 'through 15 minute train stopped at the station Gadyukino.'
  68. act 'go further':
  69. cls
  70. minut+=15
  71. gs'stat'
  72. '<center><img src="pic/electri.jpg" ></center>'
  73. 'through 15 minute train stopped in town.'
  74. act 'Go_Out':minut+=20&nroad=20&gt'vokzalG'
  75. end
  76. act 'Go_Out':minut+=15&nroad=15&gt'road'
  77. end
  78. act 'Go_Out':minut+=10&nroad=10&gt'road'
  79. end
  80. end
  81. if money>=50:
  82. act 'Buy a ticket to the Center (50 RUB)':
  83. cls
  84. money-=50
  85. minut+=15
  86. gs'stat'
  87. '<center><img src="pic/electri.jpg" ></center>'
  88. 'You paid for a ticket and boarded the train going into town.'
  89. 'through 15 minute train stopped in the center.'
  90. act 'Go_Out':minut+=5&nroad=0&gt'Vokzal'
  91. end
  92. >>>>>>> 393_road
  93. end
  94. }
  95. <<<<<<< 393_road
  96. $polustanok2 = {
  97. cls
  98. gs 'stat'
  99. 'Ordinary railway platform.'
  100. act 'Exit': minut += 10 & nroad = 10 & gt 'road'
  101. if money >= 100:
  102. act 'Buy a ticket to the town (100 rubles)':
  103. cls
  104. money -= 100
  105. minut += 15
  106. gs 'stat'
  107. '<center><img src="images\etogame\electri.jpg"></center>'
  108. 'You paid for the ticket and boarded the train going in the town.'
  109. 'After 15 minutes the train stopped at the station.'
  110. act 'To go further':
  111. cls
  112. minut += 15
  113. gs 'stat'
  114. '<center><img src="images\etogame\electri.jpg"></center>'
  115. 'After 15 minutes the train stopped in the Township.'
  116. act 'Exit': minut += 20 & nroad = 20 & gt 'vokzalG'
  117. end
  118. act 'Exit': minut += 10 & nroad = 15 & gt 'road'
  119. end
  120. end
  121. if money >= 100:
  122. act 'Buy a ticket to the Center (100 rubles)':
  123. cls
  124. money -= 100
  125. minut += 15
  126. gs 'stat'
  127. '<center><img src="images\etogame\electri.jpg"></center>'
  128. 'You paid for the ticket and boarded the train going in the town.'
  129. act 'To go further':
  130. cls
  131. minut += 15
  132. gs 'stat'
  133. '<center><img src="images\etogame\electri.jpg"></center>'
  134. 'After 15 minutes the train stopped at the Centre.'
  135. act 'Exit': minut += 5 & nroad = 0 & gt 'Vokzal'
  136. end
  137. act 'Exit': minut += 20 & nroad = 5 & gt 'road'
  138. end
  139. =======
  140. $polustanok2={
  141. cls
  142. gs'stat'
  143. 'Ordinary railway platform.'
  144. act 'Go_Out':minut+=10&nroad=10&gt'road'
  145. if money>=100:
  146. act 'Buy a ticket to town (100 RUB)':
  147. cls
  148. money-=100
  149. minut+=15
  150. gs'stat'
  151. '<center><img src="pic/electri.jpg" ></center>'
  152. 'You paid for a ticket and boarded the train going into town.'
  153. 'through 15 minute train stopped at the station Gadyukino.'
  154. act 'go further':
  155. cls
  156. minut+=15
  157. gs'stat'
  158. '<center><img src="pic/electri.jpg" ></center>'
  159. 'through 15 minute train stopped in town.'
  160. act 'Go_Out':minut+=20&nroad=20&gt'vokzalG'
  161. end
  162. act 'Go_Out':minut+=10&nroad=15&gt'road'
  163. end
  164. end
  165. if money>=100:
  166. act 'Buy a ticket to the Center (100 RUB)':
  167. cls
  168. money-=100
  169. minut+=15
  170. gs'stat'
  171. '<center><img src="pic/electri.jpg" ></center>'
  172. 'You paid for a ticket and boarded the train going into town.'
  173. act 'go further':
  174. cls
  175. minut+=15
  176. gs'stat'
  177. '<center><img src="pic/electri.jpg" ></center>'
  178. 'through 15 minute train stopped in the center.'
  179. act 'Go_Out':minut+=5&nroad=0&gt'Vokzal'
  180. end
  181. act 'Go_Out':minut+=20&nroad=5&gt'road'
  182. end
  183. >>>>>>> 393_road
  184. end
  185. }
  186. <<<<<<< 393_road
  187. $polustanok3 = {
  188. cls
  189. gs 'stat'
  190. 'Ordinary railway platform.'
  191. act 'Exit': minut += 15 & nroad = 15 & gt 'road'
  192. if money >= 50:
  193. act 'Buy a ticket to the town (50 rubles)':
  194. cls
  195. money -= 100
  196. minut += 15
  197. gs 'stat'
  198. '<center><img src="images\etogame\electri.jpg"></center>'
  199. 'You paid for the ticket and boarded the train going in the town.'
  200. 'After 15 minutes the train stopped in the Township.'
  201. act 'Exit': minut += 20 & nroad = 20 & gt 'vokzalG'
  202. end
  203. end
  204. if money >= 150:
  205. act 'Buy a ticket to the Center (150 rubles)':
  206. cls
  207. money -= 150
  208. minut += 15
  209. gs 'stat'
  210. '<center><img src="images\etogame\electri.jpg"></center>'
  211. 'You paid for the ticket and boarded the train going in the town.'
  212. act 'To go further':
  213. cls
  214. minut += 15
  215. gs 'stat'
  216. '<center><img src="images\etogame\electri.jpg"></center>'
  217. 'After 15 minutes the train stopped at the station.'
  218. act 'To go further':
  219. cls
  220. minut += 15
  221. gs 'stat'
  222. '<center><img src="images\etogame\electri.jpg"></center>'
  223. 'After 15 minutes the train stopped at the Centre.'
  224. act 'Exit': minut += 5 & nroad = 0 & gt 'Vokzal'
  225. end
  226. act 'Exit': minut += 5 & nroad = 5 & gt 'road'
  227. end
  228. act 'Exit': minut += 20 & nroad = 10 & gt 'road'
  229. end
  230. =======
  231. $polustanok3={
  232. cls
  233. gs'stat'
  234. 'Ordinary railway platform.'
  235. act 'Go_Out':minut+=15&nroad=15&gt'road'
  236. if money>=50:
  237. act 'Buy a ticket to town (50 RUB)':
  238. cls
  239. money-=100
  240. minut+=15
  241. gs'stat'
  242. '<center><img src="pic/electri.jpg" ></center>'
  243. 'You paid for a ticket and boarded the train going into town.'
  244. 'through 15 minute train stopped in town.'
  245. act 'Go_Out':minut+=20&nroad=20&gt'vokzalG'
  246. end
  247. end
  248. if money>=150:
  249. act 'Buy a ticket to the Center (150 RUB)':
  250. cls
  251. money-=150
  252. minut+=15
  253. gs'stat'
  254. '<center><img src="pic/electri.jpg" ></center>'
  255. 'You paid for a ticket and boarded the train going into town.'
  256. act 'go further':
  257. cls
  258. minut+=15
  259. gs'stat'
  260. '<center><img src="pic/electri.jpg" ></center>'
  261. 'through 15 minute train stopped at the station.'
  262. act 'go further':
  263. cls
  264. minut+=15
  265. gs'stat'
  266. '<center><img src="pic/electri.jpg" ></center>'
  267. 'through 15 minute train stopped in the center.'
  268. act 'Go_Out':minut+=5&nroad=0&gt'Vokzal'
  269. end
  270. act 'Go_Out':minut+=5&nroad=5&gt'road'
  271. end
  272. act 'Go_Out':minut+=20&nroad=10&gt'road'
  273. end
  274. >>>>>>> 393_road
  275. end
  276. }
  277. $metka = $ARGS[0]
  278. $loc = $CURLOC
  279. '<center><H4>Northern Highway</H4></center>'
  280. <<<<<<< 393_road
  281. '<center><img src="images\etogame\road.jpg"></center>'
  282. '<center><<nroad>> km</center>'
  283. 'Highway which carried cars at high speed, with the hum of the wind enveloping sweep wagon.'
  284. clr
  285. gs 'stat'
  286. gs 'time'
  287. if car > 0 and cardrive = 19 and ncarroad = nroad:
  288. =======
  289. '<center><img src="pic/road.jpg" ></center>'
  290. '<center><<nroad>> kilometer</center>'
  291. 'Highway vehicles that fly at high speed, with sweeping trucks rumble enveloping wind.'
  292. clr
  293. gs'stat'
  294. gs'time'
  295. if car > 0 and cardrive = 19 and ncarroad=nroad:
  296. >>>>>>> 393_road
  297. 'Standing on the sidelines <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
  298. end
  299. <<<<<<< 393_road
  300. if nroad = 0: act 'Go to town': minut += 60 & gt 'nord'
  301. if nroad = 16: act 'Go to object': minut += 60 & gt 'obekt'
  302. if nroad = 20: act 'Go to town': minut += 60 & gt 'gorodok'
  303. if nroad < 20: act 'Go north': minut += 60 & nroad += 1 & gt $curloc
  304. if nroad > 0: act 'Go south': minut += 60 & nroad -= 1 & gt $curloc
  305. if nroad = 0:
  306. 'Outskirts of the town which brought sad ramshackle huts of kryazhestyh trees.'
  307. end
  308. if nroad = 1:
  309. 'Not podaleku from the city could be seen <a href="exec:minut += 15 & GT ''locmansion''">houses</a>.'
  310. end
  311. if nroad = 2:
  312. =======
  313. if nroad=0:act 'Go to town':minut+=60&gt'nord'
  314. if nroad=16:act 'Go to the object':minut+=60&gt'obekt'
  315. if nroad=20:act 'Go into town':minut+=60&gt'gorodok'
  316. if nroad<20:act 'Go north':minut+=60&nroad+=1&gt $curloc
  317. if nroad>0:act 'Go south':minut+=60&nroad-=1&gt $curloc
  318. if nroad=0:
  319. 'Outskirts of the town which brought sad dilapidated huts among the trees kryazhestyh.'
  320. 'At a roadside stand <a href="exec:minut+=5&GT ''furi''">Lorry</a>'
  321. end
  322. if nroad=1:
  323. 'Not podaleku of the city are seen <a href="exec:minut+=15&GT ''locmansion''">mansions</a>.'
  324. end
  325. if nroad=2:
  326. >>>>>>> 393_road
  327. ''
  328. end
  329. <<<<<<< 393_road
  330. if nroad = 3:
  331. 'Podaleku not seen from the road <a href="exec:minut += 15 & GT ''graveyard''">cemetery</a>.'
  332. end
  333. if nroad = 4:
  334. =======
  335. if nroad=3:
  336. 'Podaleku not seen from the road <a href="exec:minut+=15&GT ''graveyard''">cemetery</a>.'
  337. end
  338. if nroad=4:
  339. >>>>>>> 393_road
  340. ''
  341. end
  342. <<<<<<< 393_road
  343. if nroad = 5:
  344. '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>.'
  345. end
  346. if nroad = 6:
  347. =======
  348. if nroad=5:
  349. 'Not podaleku from the road is <a href="exec:dynamic $polustanok">train whistle-stop</a> next to which is <a href="exec:minut+=15&GT ''dachi''">dacha cooperative</a>.'
  350. end
  351. if nroad=6:
  352. >>>>>>> 393_road
  353. ''
  354. end
  355. <<<<<<< 393_road
  356. if nroad = 7:
  357. =======
  358. if nroad=7:
  359. >>>>>>> 393_road
  360. ''
  361. end
  362. <<<<<<< 393_road
  363. if nroad = 8:
  364. =======
  365. if nroad=8:
  366. >>>>>>> 393_road
  367. ''
  368. end
  369. <<<<<<< 393_road
  370. if nroad = 9:
  371. =======
  372. if nroad=9:
  373. >>>>>>> 393_road
  374. ''
  375. end
  376. <<<<<<< 393_road
  377. if nroad = 10:
  378. 'Not podaleku from the road is <a href="exec:dynamic $polustanok2">railway stop</a>.'
  379. end
  380. if nroad = 11:
  381. =======
  382. if nroad=10:
  383. 'Not podaleku from the road is <a href="exec:dynamic $polustanok2">train whistle-stop</a>.'
  384. end
  385. if nroad=11:
  386. >>>>>>> 393_road
  387. ''
  388. end
  389. <<<<<<< 393_road
  390. if nroad = 12:
  391. =======
  392. if nroad=12:
  393. >>>>>>> 393_road
  394. ''
  395. end
  396. <<<<<<< 393_road
  397. if nroad = 13:
  398. =======
  399. if nroad=13:
  400. >>>>>>> 393_road
  401. ''
  402. end
  403. <<<<<<< 393_road
  404. if nroad = 14:
  405. 'Near the road is <a href="exec:minut += 15 & GT ''motel''">motel</a>'
  406. end
  407. if nroad = 15:
  408. 'Not podaleku from the road is <a href="exec:dynamic $polustanok3">railway stop</a>.'
  409. end
  410. if nroad = 16:
  411. 'Not podaleku is seen from the road abandoned building.'
  412. end
  413. if nroad = 17:
  414. =======
  415. if nroad=14:
  416. 'Near the road is <a href="exec:minut+=15&GT ''motel''">motel</a>'
  417. end
  418. if nroad=15:
  419. 'Not podaleku from the road is <a href="exec:dynamic $polustanok3">train whistle-stop</a>. From the little station leads to a dirt road <a href="exec:minut+=30&GT ''gadukino''">village Gadyukino</a>'
  420. end
  421. if nroad=16:
  422. 'Not podaleku from the road you can see the abandoned building.'
  423. end
  424. if nroad=17:
  425. >>>>>>> 393_road
  426. ''
  427. end
  428. <<<<<<< 393_road
  429. if nroad = 18:
  430. =======
  431. if nroad=18:
  432. >>>>>>> 393_road
  433. ''
  434. end
  435. <<<<<<< 393_road
  436. if nroad = 19:
  437. =======
  438. if nroad=19:
  439. >>>>>>> 393_road
  440. ''
  441. end
  442. <<<<<<< 393_road
  443. if nroad = 20:
  444. 'Highway abuts the old provincial town.'
  445. =======
  446. if nroad=20:
  447. 'Track rests on the old provincial town.'
  448. 'At a roadside stand <a href="exec:minut+=5&GT ''furi''">Lorry</a>'
  449. >>>>>>> 393_road
  450. end
  451. --- road ---------------------------------