1
0

098_torgpred 4.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152
  1. # torgpred
  2. gs 'stat'
  3. '<center><b><font color="maroon">Trade Representative</font></b></center>'
  4. '<center><img src="images/etogame/clener.jpg"></center>'
  5. 'Not a big cabinet in which are office desks and office equipment. In the office there is a door that says "Director"'
  6. 'One of the tables sits Stas, after another Vitali, for the third table sits a woman chief accountant.'
  7. act 'Leave':gt 'clener', 'start'
  8. if SVqw = 2:
  9. if TorgPredDay ! day:
  10. if TorgPredZ = 0 and TorgPredZV = 0:
  11. act 'Take the job':
  12. cls
  13. TorgPredZ = 3
  14. minut += 5
  15. TorgPredDay = day
  16. gs 'stat'
  17. '<center><img src="images/etogame/clener.jpg"></center>'
  18. 'You came to Stas for the job. He smiled and handed you the paper. "Do not forget. Supermarkets three pieces. You need to arrange the items in all the supermarkets."'
  19. act 'Leave':gt 'clener', 'start'
  20. end
  21. end
  22. end
  23. if TorgPredZ = 0 and TorgPredZV = 3:
  24. act 'Get Money':
  25. cls
  26. TorgPredZV = 0
  27. minut += 5
  28. money += 500
  29. TPworkTimes += 1
  30. gs 'stat'
  31. '<center><img src="images/etogame/clener.jpg"></center>'
  32. 'You came to Stas for money. He smiled and handed you 500 rubles'
  33. if StasikSex = 0:
  34. if TPworkTimes >= 3 and TPmainQW = 0 and mesec = 0:
  35. if ski > 0 or glamur > 0:
  36. 'Stas interest asks "Well, how do you work?"'
  37. act 'Excellent!':
  38. cls
  39. TPmainQW = 1
  40. minut += 5
  41. gs 'stat'
  42. '<center><img src="images/etogame/clener.jpg"></center>'
  43. 'You answered Stas that everything is fine and he smiled. "Our company is developing, and intelligent man there will be a place better. Way, let´s go to the cafe, you have not stamped for work."'
  44. act 'Agree':
  45. cls
  46. minut += 15
  47. gs 'stat'
  48. '<center><img src="images/etogame/clener.jpg"></center>'
  49. 'You had to agree, as all your new job and prospects depend on Stas. Stas was delighted and made you in a cafe on the way talking about work. Café Stas gallantly pulled chair for you.'
  50. act 'Take':gt 'StasQW'
  51. end
  52. end
  53. act 'So-so.':
  54. cls
  55. TPmainQW = 1
  56. minut += 5
  57. gs 'stat'
  58. '<center><img src="images/etogame/clener.jpg"></center>'
  59. 'You answered that Stas so-so and he grinned. "Our company is developing, and intelligent man there will be a place better. Way, let´s go to the cafe, you have not stamped for work."'
  60. act 'Agree':
  61. cls
  62. minut += 15
  63. gs 'stat'
  64. '<center><img src="images/etogame/clener.jpg"></center>'
  65. 'You had to agree, as all your new job and prospects depend on Stas. Stas was delighted and made you in a cafe on the way talking about work. Café Stas gallantly pulled chair for you.'
  66. act 'Take':gt 'StasQW'
  67. end
  68. end
  69. end
  70. exit
  71. end
  72. end
  73. if TPmainQW = 1:
  74. if StasikSex > 0 and StVaGang = 0:''
  75. if StasikSex = 0:''
  76. end
  77. if StVaGang > 0:''
  78. act 'Leave':gt 'clener', 'start'
  79. end
  80. end
  81. if TPmainQW = 1 and StasikSex > 0 and StVaGang = 0:
  82. 'In view of Stas clearly glimpsed joy, when he sees you. in_a_low_voice, to not hear his colleagues are busy, it offers you to continue your relationship and start dating.'
  83. if bfa >= 1: 'you think, that your current boyfriend is unlikely to please, you accept this offer. Stas, of_course, very nice, but you first need to understand their current relationship.'
  84. if bfa < 1:
  85. act 'agree':
  86. 'You answered Stas consent, to which he beamed and promised to call you back shortly.'
  87. TPmainQW = 2
  88. $boy = 'Stas'
  89. boybodyrand = 1
  90. $boybody = 'high'
  91. boybodrand = 1
  92. $boybod = 'thin'
  93. boyfacerand = 3
  94. $boyface = 'blond'
  95. dick = 15
  96. silavag = 1
  97. harakBoy = 1
  98. finance = 1
  99. vneshBoy = 1
  100. $boyClo = 'dressed in jeans and a sweater.'
  101. set figurBoy = rand(0, 2)
  102. set titBoy = rand(0, 2)
  103. set haerBoy = rand(0, 3)
  104. izvrat = 0
  105. gs'boyfrend','start'
  106. stopboy = 0
  107. bfa = 70
  108. boyonceA = 1
  109. cla
  110. gs 'stat'
  111. act 'Leave':gt 'clener', 'start'
  112. end
  113. end
  114. act 'I need to think':
  115. 'You answered Stas, you will find it very much, but you are not ready to give an answer, and ask him a little-just wait. Stas frowns, but accepts your answer.'
  116. cla
  117. act 'Leave':gt'clener','start'
  118. end
  119. act 'Contribute':
  120. TPmainQW = 2
  121. 'You quite sharply denied Stas, what he is offended: "Oh well! I-thought, we have that-something more, than an occasional census."'
  122. cla
  123. gs 'stat'
  124. act 'Leave':gt'clener','start'
  125. end
  126. end
  127. end
  128. --- torgpred ---------------------------------