1
0

obroom 6.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155
  1. # obroom
  2. if $ARGS[0] = 'start':
  3. $sexloc = 'obroom'
  4. CLOSE ALL
  5. $metka = 'start'
  6. $loc = 'obroom'
  7. $metkaM = 'start'
  8. $locM = 'obroom'
  9. $location_type = 'private'
  10. cla
  11. *clr
  12. odkomp = 1
  13. gs 'stat'
  14. '<center><b>Your room</b></center>'
  15. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/obroom.jpg"></center>'
  16. 'This is your room, with you in it lives another girl Vika'
  17. 'Right next to the door is an old wardrobe (where you can <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">organize your clothes</a> or <a href="exec:gt ''clothing_QV'', ''list''">pick something to wear</a>), on top of it there''s a <a href="exec:gt ''clothing'', ''view_clothing_list'', ''store''">suitcase</a> you can store some clothes in.'
  18. 'On the wall, near the hanging cabinet <a href="exec:GT ''mirror'',''start''">mirror</a>.'
  19. 'Near the wall is your <a href="exec:GT ''bed'',''start''">bed</a>.'
  20. if komp = 1:'On your bed lying <a href="exec:GT ''Komp'',''start''">notebook</a>.'
  21. ''
  22. if hour > 14 and hour < 20 and vika>=60 and birthday = day and birthmonth = month and vikaslut = 1 and bordel = 1 and slutty > 0 and b_vika_present_Day!day:
  23. vika_sleep = 0
  24. 'Near the little white stockings cabinet puts your neighbor <a href="exec:gt''Vika''">Vika</a>.'
  25. elseif hour > 14 and hour < 20:
  26. vika_sleep = 0
  27. 'It is lying on his bed your neighbor <a href="exec:gt''Vika''">Vika</a>.'
  28. end
  29. if hour > 3 and hour < 8 and vikaslut = 0:
  30. vika_sleep = 1
  31. '<a href="exec:gt''Vika''">Vika</a> She is sleeping in her bed after a night of adventures. You wonder where she lost in the night.'
  32. end
  33. if hour > 3 and hour < 8 and vikaslut = 1:
  34. vika_sleep = 1
  35. '<a href="exec:gt''Vika''">Vika</a> She is sleeping in her bed after working in a brothel.'
  36. end
  37. act 'In the corridor':
  38. if $clothingworntype ! 'nude':
  39. odkomp = 0
  40. minut += 5
  41. gt 'dorm', 'korr'
  42. else
  43. 'You need to get dressed.'
  44. end
  45. end
  46. act 'Learn lesson (2:00)':
  47. cla
  48. minut += 120
  49. intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  50. 'You prozanimavshis two hours seems something in your head postponed'
  51. act 'Finish':gt 'obroom', 'start'
  52. end
  53. if student > 0 and kursovik < 100:
  54. act 'Write kursovik (1:00)':
  55. cla
  56. *clr
  57. minut += 60
  58. pcs_mood -= 10
  59. kursovik += rand(pcs_intel / 20, pcs_intel / 10)
  60. if kursovik > 100:kursovik = 100
  61. '<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
  62. 'You sat on the course work and prepared her <<kursovik>> percent.'
  63. act 'Finish':gt 'obroom', 'start'
  64. end
  65. end
  66. dynamic $wearpan
  67. dynamic $removepan
  68. end
  69. if $ARGS[0] = 'vika':
  70. cla
  71. gs 'stat'
  72. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/kat.jpg"></center>'
  73. act 'Leave':gt 'obroom', 'start'
  74. if hour < 20:
  75. act 'Chat with Vika (1:00)':
  76. cla
  77. minut += 60
  78. vika += 1
  79. talkrand = rand(0, 10)
  80. if talkrand = 0:'You started talking with Vika, she tells you about the boys she met, about parties, about cosmetics.'
  81. if talkrand = 1:'Wick says she was in a cafe and invited her to dance even then the guy who paid her bill.'
  82. if talkrand = 2:'Wick says she worked at a strip club dancer, quite lucrative job for students, although customers are very pristavuchi.'
  83. if talkrand = 3:'Vic tells you that several sections of beautiful girls running at the university entered the European level sports competitions and earn big money, but of course that Vick priznaetsya her laziness so they plow.'
  84. if talkrand = 4:'Vick says that one of her friends flew from a guy who did not have time to pull out of it. But Vick smarter, she buys in a pharmacy contraceptives, 100% satisfaction guarantee.'
  85. if talkrand = 5:'Vick says in the park, she accidentally went to the panel and she was offered sex for money.'
  86. if talkrand = 6:'Vic tells how she acted naked in studio, not a dusty job, but reputation suffers.'
  87. if talkrand = 7:'Vic tells a horror story about how one pretty girl did not wash his feet and did not shave, then became so terrible to her for all obbegat kilometer.'
  88. if talkrand = 8:'Vic says that she buys tampons always with a reserve, and then if they go without a monthly then quickly prevratishsya in slut.'
  89. if talkrand = 9:'Vic tells how one of her guys wanted anal sex, but she was not in possession of Vaseline.'
  90. if talkrand = 10:'Vick says the summer sunning herself on the beach, for this truth had her buy a swimsuit, but it came in handy in the winter and go to the pool. The pool is not a bad tool to maintain a healthy body.'
  91. act 'Finish':gt 'obroom', 'vika'
  92. end
  93. act 'Engage with Vika (1:00)':
  94. cla
  95. minut += 60
  96. intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  97. vika += 1
  98. 'You overlaid textbooks and become engaged with Vika, reviews all absorbed twice as fast.'
  99. act 'Finish':gt 'obroom', 'vika'
  100. end
  101. if vikasex > 0 and vika > 20:
  102. act 'Offer fun':
  103. minut += 60
  104. gt 'lezbsex', 'start'
  105. end
  106. end
  107. if vika > 70 and vikaslut = 0:
  108. act 'Ask where it is at night':
  109. cla
  110. minut += 30
  111. vikaslut = 1
  112. 'Vick hesitated and blushed, "I just walk."'
  113. '"Yeah, she walks at night in the street, and I''ll believe it, kolis friend where you are wearing." neunimalis you.'
  114. '"I work at the" Vic mumbled unsure.'
  115. '"Many times I was in the club and you were not vidila, enough already lie." you misbehaved, and a little later added, "Do not want to not say it is not very much and wanted." and turned away from her.'
  116. '"Well do not be mad, I''ll show you just promise me that you then at least you will talk to me"'
  117. 'You were taken aback by these words than she can do, that you stop talking to her, not with the same dogs publicly fucked. "Yes, of course I''m going to talk to you, what a stupid question."'
  118. '"Good show went"'
  119. act 'Go with Vika':gt 'bordelv', 'start'
  120. end
  121. elseif vika > 70 and vikaslut = 1 and bordel = 0:
  122. act 'Ask about work':
  123. cla
  124. vika += 5
  125. bordel = 1
  126. odkomp = 0
  127. '"And I have arranged to work in a brothel, I know how much." you asked.'
  128. '"Well I''ll tell the administrator, but I can not guarantee it can not take."'
  129. act 'Finish':gt 'obroom', 'vika'
  130. end
  131. end
  132. end
  133. end
  134. --- obroom ---------------------------------