1
0

obroom 2.8 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879
  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 which you share with another girl named Vika Zhurova.'
  17. 'At the right of the entrance you find an old <a href="exec:GT ''wardrobe''">wardrobe</a> (where you can <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">organize your clothes</a>), on top of the wardrobe there''s a <a href="exec:gt ''clothing'', ''view_clothing_list'', ''store''">suitcase,</a> in which you can store some clothes in.'
  18. 'There''s a <a href="exec:GT ''mirror'',''start''">mirror</a> hanging on the wall.'
  19. 'Your <a href="exec:GT ''bed'',''start''">bed</a> is positioned in one of the corners of the room.'
  20. if komp = 1:'There''s a <a href="exec:GT ''Komp'',''start''">laptop</a> laying on your bed.'
  21. ''
  22. if hour > 14 and hour < 20 and npc_rel['A220']>=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. '<a href="exec:gt''Vika''">Vika</a> seems excited when she notices you, trying to hide a box behind her back.'
  25. elseif hour > 14 and hour < 20:
  26. vika_sleep = 0
  27. '<a href="exec:gt''Vika''">Vika</a> is laying on her bed.'
  28. end
  29. if hour > 3 and hour < 8 and vikaslut = 0:
  30. vika_sleep = 1
  31. '<a href="exec:gt''Vika''">Vika</a> is sleeping in her bed after being out the whole 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> is sleeping in her bed after working hard in the brothel all night.'
  36. end
  37. act 'Walk out 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 'Read the course literature (2:00)':
  47. cla
  48. minut += 120
  49. intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  50. 'You spend two hours reading the course literature. You feel like you''ve picked up some stuff from the book that will come in handy in time for the examination.'
  51. act 'Finish':gt 'obroom', 'start'
  52. end
  53. if student > 0 and kursovik < 100:
  54. act 'Do some coursework (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 sit for an hour and prepare your work for the class. You''ve finish <<kursovik>> percent of the work.'
  63. act 'Finish':gt 'obroom', 'start'
  64. end
  65. end
  66. dynamic $wearpan
  67. dynamic $removepan
  68. end
  69. --- obroom ---------------------------------