Terminal 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335
  1. # Terminal
  2. CLOSE ALL
  3. minut += 5
  4. clr
  5. gs 'stat'
  6. !'
  7. fcolor = rgb(0, 0, 0)
  8. bcolor = rgb(255, 255, 255)
  9. lcolor = rgb(106, 90, 205)
  10. '!
  11. '<center><b><font color="maroon">Storage terminal</font></b></center>'
  12. '<center><img src="images/etogame/terminal.jpg"></center>'
  13. 'A plurality of storage buildings to which drive up truck for loading and unloading.'
  14. if trfatherQW = 4 and week >= 6 and hour >= 12 and hour < 14:'Near dirty digging your truck <a href="exec:GT ''trFatherMisha''">father</a>'
  15. act 'Leave':
  16. cla
  17. minut += 5
  18. gt 'nord'
  19. end
  20. $askfather = {
  21. act 'Ask about his father':
  22. cls
  23. minut += 5
  24. gs'stat'
  25. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_9.jpg"></center>'
  26. '- I want to ask you, Do you know where can I find a trucker named Mikhail Kuznetsov?'
  27. '- Of course we know a girl, great guy by the way, right there around the corner you will find the Blacksmith, it odd there with potters wheel.'
  28. '- Thank you very much, and jumped for joy, you ran to meet her father.'
  29. act 'Go to his father':
  30. cls
  31. minut += 5
  32. gs'stat'
  33. if spdirtyv > 0:
  34. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_13.jpg"></center>'
  35. 'You came to his father with a face smeared with semen.'
  36. '- Fu fucking, ebannaya whore, Go fuck out of here, Well your mother, go here any slut...'
  37. 'You felt very ashamed of his father, and you decide not to come over here and forget about my father forever.'
  38. trfatherQW = -1
  39. act 'Escape':minut += 5 & gt $curloc
  40. else
  41. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_14.jpg"></center>'
  42. '- Hello, You Mikhail Kuznetsov?'
  43. '- Yes, Hello, it`s me, that-Something happened? Are you from the control room? If anything, tell it again, I`m the fucking crystal on such roads will not be transported...'
  44. '- No no, I was not there, I <<$name>> <<$surname>>...'
  45. '- <<$name>>? Hell, daughter....? This.... you?'
  46. 'Your father broke down in tears, looking in your eyes, and recognizing the facial features, quickly wiped his oily hands and you hugged, together crying from happiness.'
  47. act 'Hug':
  48. cls
  49. minut += 5
  50. gs'stat'
  51. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_15.jpg"></center>'
  52. 'You hugged his father and said to him,: "Lastly-I found you, Now just I never lose."'
  53. 'Your father hugged and looked at you, as if not believing new happiness: "What I have a big and beautiful little girl has grown"...'
  54. 'And prompts you to go to lunch and talk...'
  55. act 'Go to the kebab':
  56. cls
  57. minut += 5
  58. gs'stat'
  59. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_17.jpg"></center>'
  60. 'Sitting at the table, You order food and drinks, and dad started asking you about everything.'
  61. 'You started with enthusiasm and a lot of talk about themselves, what do you do, where learning, than moonlighting on life. Told about sister, that she was not admitted to the university, and worked as a salesgirl in the supermarket..'
  62. 'To tell you about my mother, she married, and you now have a stepfather and brother Kolya..'
  63. 'Designed by talking, but do not learn more about the life of Pope, He began to say goodbye to you.'
  64. '- <<$name>> I have to go, schedule purses, I am here on weekends 12 00 to 14 00, I will be glad if you will visit me sometimes, - and kissed her on the cheek goodbye.'
  65. trfatherQW = 4
  66. act 'Escape':minut += 5 & gt 'nord'
  67. end
  68. act 'Swear':
  69. cls
  70. minut += 5
  71. gs'stat'
  72. '<center><img src="images/qwest/alter/sisterQW/sisboyQW_37.jpg"></center>'
  73. '- Drunk fucking, He left us and now?...You become easier to live?.. You have no idea what it`s like to live with someone else, and a man called his father. Whip to the devil, fucking freak...'
  74. 'You will become much easier that poured all the anger in his face, and decided not to come over here and forget about my father forever.'
  75. trfatherQW = -1
  76. act 'Escape':minut += 5 & gt $curloc
  77. end
  78. end
  79. end
  80. end
  81. end
  82. }
  83. if trfatherQW = 2:
  84. act 'Search for father':
  85. cls
  86. minut += 5
  87. gs'stat'
  88. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_2.jpg"></center>'
  89. 'You are trapped inside a large storage terminal, full of cars, trucks and wagons.'
  90. 'You find it difficult to navigate here, better than anyone-then find and ask about his father.'
  91. 'You can find drivers, sure that they-the know, or ask the Manager.'
  92. act 'Ask the Manager':
  93. cls
  94. minut += 5
  95. trfatherQW = 3
  96. gs'stat'
  97. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_3.jpg"></center>'
  98. '- Good afternoon! What I can help you? -kindly appeals to you girl.'
  99. '- Hello, I want you to know, whether there have some Mikhail Kuznetsov?'
  100. '- I`ll check in our database, yes, we have a driver, Once he is on the road and only on Saturday 12:00.'
  101. '- Thank you very much, You helped me a lot. - Well, you get closer and closer to its goal. '
  102. act 'Escape':minut += 5 & gt $curloc
  103. end
  104. act 'To approach the truckers':
  105. cls
  106. minut += 5
  107. gs'stat'
  108. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_4.jpg"></center>'
  109. 'You came to the two adult men, They will see you much revived.'
  110. '- Hello Little, what can I walk alone? You want to earn quick?'
  111. '- No, thank you, I`m here looking for a man, I need your help...'
  112. '- Well us your help does not hurt, we have just the way, and you can help us, and we`ll, if you know what we...'
  113. act 'Send':
  114. cls
  115. minut += 5
  116. gs'stat'
  117. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_5.jpg"></center>'
  118. '- Go fuck, suck each other,concerned assholes.'
  119. 'You sent them, there may be another way that-learn something.'
  120. act 'Escape':minut += 5 & gt $curloc
  121. end
  122. act 'Suck':
  123. cls
  124. minut += 5
  125. horny += 5
  126. bj += 1
  127. guy += 1
  128. spafinloc = 12
  129. gs 'cum_manage'
  130. swallow += 1
  131. gs'stat'
  132. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_6.jpg"></center>'
  133. 'Probably no other way, and you agree to suck them.'
  134. 'The first man invited you into the cockpit, comfortable waiting for your actions Russell.'
  135. 'You are not delaying unbuttoned his pants and began to suck and the man quickly finished your mouth.'
  136. 'Ordered you to wait here a man came out satisfied, beckoning second.'
  137. act 'Wait':
  138. cls
  139. minut += 5
  140. horny += 5
  141. bj += 1
  142. guy += 1
  143. spafinloc = 12
  144. gs 'cum_manage'
  145. spafinloc = 11
  146. gs 'cum_manage'
  147. swallow += 1
  148. gs'stat'
  149. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_7.jpg"></center>'
  150. 'In the cabin quickly became the second, and you that it did not last long set about their work.'
  151. 'You carefully licked the head, and hand podrachivaya trunk quickly aspirated.'
  152. 'This guy is too long and could not stand poured liters of semen in your mouth.'
  153. act 'Get out of the cab':
  154. cls
  155. minut += 5
  156. trfatherQW = 3
  157. gs'stat'
  158. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_8.jpg"></center>'
  159. 'You got out of the cab truck with a smeared face.'
  160. '- So, What are you talking about there we wanted to know? - I addressed to you the first of the men.'
  161. '- I wanted you to know, whether there have some Mikhail Kuznetsov?'
  162. '- Aaa, Micah, Blacksmith something? Sure, running, great guy. Only it is not available, It is only on Saturday 12:00.'
  163. '- You Th? His daughter? Heh, Hochma here is if he finds out, that we`re vytvorili...'
  164. act 'Escape':minut += 5 & gt $curloc
  165. end
  166. end
  167. end
  168. end
  169. end
  170. elseif trfatherQW = 3 and week = 6 and hour = 12:
  171. act 'Search for father':
  172. cls
  173. minut += 5
  174. gs'stat'
  175. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_9.jpg"></center>'
  176. 'You go to a group of men, drinkers, cackling and that-then vigorously debated.'
  177. 'Approaching them, their eyes were immediately sent to you.'
  178. '-Hello, beauty, then go here one, You want to have a drink with us?'
  179. act 'Drink':
  180. cls
  181. alko += 1
  182. cumspclnt = 2
  183. gs 'cum_cleanup'
  184. fbreath = 0
  185. minut += 5
  186. gs'stat'
  187. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_10.jpg"></center>'
  188. 'Did you decide, why not have a drink with men, and sat down next to you immediately given a bottle of beer.'
  189. 'Truckers were told different stories, gradually more and more openly and frankly.'
  190. 'They shared stories as fuck whores and married women on the road in the cockpits of their trucks, you were very interesting.'
  191. act 'Drink':
  192. cls
  193. alko += 3
  194. minut += 5
  195. gs'stat'
  196. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_11.jpg"></center>'
  197. 'You continue to drink fun killing time.'
  198. 'Drivers warmed up and got vodka, - "Well, of course without vodka?" - He shouted half-drunk guy and offered you a bottle.'
  199. 'Cups were not you were drinking from the bottle, passing the bottle next.'
  200. 'After a moment, you are completely intoxicated and heard: "Well, slut ready, let her otzharim", and where you-then dragged.'
  201. act 'Bellowed':
  202. cls
  203. minut += 30
  204. spafinloc = 12
  205. gs 'cum_manage'
  206. swallow += 1
  207. spafinloc = 11
  208. gs 'cum_manage'
  209. spafinloc = 3
  210. gs 'cum_manage'
  211. gs 'cum_manage'
  212. spafinloc = 14
  213. gs 'cum_manage'
  214. spafinloc = 4
  215. gs 'cum_manage'
  216. gang += 1
  217. gs'stat'
  218. '<center><img src="images/qwest/alter/trfatherQW/trfatherQW_12.jpg"></center>'
  219. 'Mumbled-incoherently, you do not pay any attention, and dragged as a thing of the warehouse building.'
  220. 'You quickly stripped, also undressed and truckers, They laid on his stomach and began to fuck one of two trunk.'
  221. 'Not long tormented, men finishing and filled your hole, trusting your body to others.'
  222. 'The next time you choked with sperm, and did not have time to swallow it, portions of shoots in your mouth.'
  223. 'You all were stained in semen, Facial, inside priests and recording it, too, had a lot of...'
  224. act 'Escape':minut += 5 & gt $curloc
  225. end
  226. end
  227. dynamic $askfather
  228. act 'Escape':minut += 5 & gt $curloc
  229. end
  230. dynamic $askfather
  231. act 'Escape':minut += 5 & gt $curloc
  232. end
  233. end
  234. if TerminalPapper = 1 and DayTerminalPapper = daystart:
  235. act 'Classified documents':
  236. cls
  237. minut += 15
  238. TerminalPapper = 2
  239. gs 'stat'
  240. fcolor = rgb(0, 0, 0)
  241. bcolor = rgb(255, 255, 255)
  242. lcolor = rgb(106, 90, 205)
  243. 'You went to the office and gave the documents to the manager.'
  244. act 'Leave':minut += 5 & gt 'nord'
  245. end
  246. end
  247. if money >= 100:
  248. act 'Buy small items (100 <b>₽</b>)':
  249. cls
  250. minut += 15
  251. gs 'stat'
  252. 'You went to the office and spoke with the manager about buying small things.'
  253. ! WD: Uninitialised ~ 'tovarskladlevel' allways true
  254. if tovarskladlevel = 0:
  255. if tovarL >= 30:
  256. 'Thinking a bit you realize, you just have nowhere to store the goods and decide to unsubscribe from the purchase.'
  257. elseif tovarL < 30:
  258. maxtov = 30 - tovarL
  259. 'Do you have a place for storage <<maxtov>> One unit of product.'
  260. act 'Buy':
  261. cls
  262. gs 'stat'
  263. 'Do you have a place for storage <<maxtov>> One unit of product.'
  264. tovarpokup = input("How much product you want to buy at a price 100 <b>₽</b> apiece?")
  265. if tovarpokup > maxtov or tovarpokup * 100 > money:
  266. 'Manager shakes his head "No, so it will not work"'
  267. else
  268. tovarL += tovarpokup
  269. money -= tovarpokup * 100
  270. gs 'stat'
  271. 'You bought <<tovarpokup>> One unit of small goods and now you have stored <<tovarL>> One unit of product.'
  272. end
  273. act 'Leave':minut+=5&gt $curloc
  274. end
  275. end
  276. end
  277. act 'Leave':minut += 5 & gt 'nord'
  278. end
  279. if YouCanGar > 0:
  280. act 'Buy small items for the car storage (100 <b>₽</b>)':
  281. cls
  282. minut += 15
  283. gs 'stat'
  284. 'You went to the office and spoke with the manager about buying small things.'
  285. ! WD: Uninitialised ~ 'tovarskladlevel' allways true
  286. if tovarskladlevel = 0:
  287. if GarTorgItem >= 100:
  288. 'Thinking a bit you realize, you just have nowhere to store the goods and decide to unsubscribe from the purchase.'
  289. elseif GarTorgItem < 100:
  290. maxtov = 100 - GarTorgItem
  291. 'Do you have a place for storage <<maxtov>> One unit of product.'
  292. act 'Buy':
  293. cls
  294. gs 'stat'
  295. 'Do you have a place for storage <<maxtov>> One unit of product.'
  296. tovarpokup = input("How much product you want to buy at a price 100 <b>₽</b> apiece?")
  297. if tovarpokup > maxtov or tovarpokup * 100 > money:
  298. 'Manager shakes his head "No, so it will not work"'
  299. else
  300. GarTorgItem += tovarpokup
  301. money -= tovarpokup * 100
  302. gs 'stat'
  303. 'You bought <<tovarpokup>> One unit of small goods in the garage and now you have stored <<GarTorgItem>> One unit of product.'
  304. end
  305. act 'Leave':minut += 5 & gt $curloc
  306. end
  307. end
  308. end
  309. act 'Leave':minut += 5 & gt 'nord'
  310. end
  311. end
  312. end
  313. --- Terminal ---------------------------------