nichBedroomTanja.qsrc 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125
  1. # nichBedroomTanja
  2. CLOSE ALL
  3. $metka = ''
  4. $loc = 'nichBedroomTanja'
  5. $location_type = 'private'
  6. $menu_loc = 'nichBedroomTanja'
  7. $nichLoc = 'bedroomTanya'
  8. $menu_arg = ''
  9. menu_off = 0
  10. $sexloc = $CURLOC
  11. gs 'stat'
  12. !! Argument return: PC has been in the room before, dont perform actions meant to be executed before or as she enters the room.
  13. if $ARGS[0] = '' or $ARGS[0] = 'start' or $ARGS[0] = 'return':
  14. '<center><b>Tanya''s Room</b></center>'
  15. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/nichApartment/bedroomTanja.jpg"></center>'
  16. *nl
  17. 'This room belongs to <a href="exec: gt ''nichTanya'', ''desc''">Tanya</a>, Nicholas'' stepdaughter. While she is a little bit selfish, quick-tempered and spoiled, her heart seems to be in the right place.'
  18. 'Her room is usually in a state of chaos - typical for somebody who''s gotten used to others cleaning up after them - but otherwise displays the warmth and mix of colors you would expect of a woman who is still trying to figure herself out and doesn''t worry too much about the future.'
  19. $nichNichAct = func('nichUtil','npcActivity','nicholas')
  20. $nichTanyAct = func('nichUtil','npcActivity','tanya')
  21. nichNichPresent = FUNC('nichUtil','isPresent','nicholas','bedroomTanya')
  22. nichTanyPresent = FUNC('nichUtil','isPresent','tanya','bedroomTanya')
  23. nichCleanAppropriate = 1
  24. if $nichNichAct = 'tanya' and $nichTanyAct = 'nicholas' and nichNTRelation < 10:
  25. *clr & cla
  26. if nichNTRelation > 0:
  27. 'The door to Tanyas room seems to be locked. You assume that Nicholas is in there with her now. You could spy through the the keyhole.'
  28. else
  29. 'The door to Tanyas room seems to be locked. You could spy through the keyhole.'
  30. end
  31. act 'Spy':
  32. nichRand = rand(0,3)
  33. $nichTempPic = func('nichUtil','tanyaPic','sexH','spy','nicholas')
  34. if nichRand = 0 or nichTanyaSpyLast = daystart or nichTanyaSpyCounter = 0:
  35. 'The view is obscured by something. You can''t see anything.'
  36. elseif nichTanyaSpyCounter < 2:
  37. '<center><img <<$set_imgh>> src="<<$nichTempPic>>"></center>'
  38. 'You can see Tanya having sex with a man. You can''t see his face. From your location you can''t figure out who he is. Afraid of getting caught spying through the keyhole you turn away.'
  39. gs 'arousal', 'voyeur', -5
  40. else
  41. nichNTRelation = 1
  42. '<center><img <<$set_imgh>> src="<<$nichTempPic>>"></center>'
  43. 'You can see Tanya having sex with a man. You can''t see his face but from the clothes lieing around, the body statue and the muffled sounds there is no doubt that Tanya is fucking her stepfather.'
  44. gs 'arousal', 'voyeur', -5, 'incest'
  45. end
  46. nichTanyaSpyLast = daystart
  47. nichTanyaSpyCounter += 1
  48. cla
  49. act 'Walk away':
  50. gt 'nichApartment', 'return'
  51. end
  52. end
  53. act 'Walk away':
  54. gt 'nichApartment', 'return'
  55. end
  56. exit
  57. elseif $nichTanyAct = 'boyfriend':
  58. *clr & cla
  59. 'The door to Tanyas room seems to be locked. You assume that her boyfriend is in there with her now. You could spy through the the keyhole.'
  60. act 'Spy':
  61. *clr & cla
  62. $nichTempPic = func('nichUtil','tanyaPic','sexH','spy','bf<<nichTanyaBF>>')
  63. '<center><img <<$set_imgh>> src="<<$nichTempPic>>"></center>'
  64. '"Through the keyhole you can see Tanya and her boyfriend. They are obviously in the act of doing it."'
  65. act 'Walk away':
  66. gt 'nichApartment', 'return'
  67. end
  68. end
  69. act 'Walk away':
  70. gt 'nichApartment', 'return'
  71. end
  72. exit
  73. elseif $nichTanyAct = 'sleep':
  74. 'Tanya is sleeping in her bed.'
  75. nichCleanAppropriate = 0
  76. elseif $nichTanyAct = 'tanya':
  77. nichRand = rand(0,3)
  78. if nichRand = 0:
  79. '<a href="exec: gt ''nichTanya'', ''bedroomTanya''">Tanya</a> is lieing on her bed listening to music.'
  80. elseif nichRand = 1:
  81. '<a href="exec: gt ''nichTanya'', ''bedroomTanya''">Tanya</a> is lieing on her bed watching tv.'
  82. elseif nichRand = 2:
  83. '<a href="exec: gt ''nichTanya'', ''bedroomTanya''">Tanya</a> is in her walk-in closet trying on some outfits.'
  84. else
  85. '<a href="exec: gt ''nichTanya'', ''bedroomTanya''">Tanya</a> is sitting at her desk surfing the internet.'
  86. end
  87. else
  88. 'Tanya is not here at the moment.'
  89. end
  90. act '<b>Return to the hallway</b>':
  91. minut += 1
  92. gt 'nichApartment'
  93. end
  94. act 'Go to the master bathroom':
  95. minut += 1
  96. gt 'nichBathMaster'
  97. end
  98. if nichWork = 2:
  99. if nichCleanAppropriate = 0:
  100. 'It wouldn''t be appropriate to clean this room now.'
  101. else
  102. gs 'nichChore','inspect','tanya'
  103. end
  104. end
  105. end
  106. --- nichBedroomTanja ---------------------------------