1
0

Gaddvor 4.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121
  1. # Gaddvor
  2. if $ARGS[0]='':
  3. $metka = ''
  4. $loc = 'Gaddvor'
  5. $location_type = 'public_outdoors'
  6. gs 'stat'
  7. CLOSE ALL
  8. gs 'gadukino_event', 'sound'
  9. clothesAtLocation = FUNC('lost_clothes_here',$CURLOC)
  10. if clothesAtLocation = 1:
  11. if $clothingworntype = 'nude':
  12. act 'Get dressed':
  13. gs 'clothing', 'recover_lost_clothes', 'Gaddvor', 1
  14. gs 'underwear', 'wear'
  15. gt 'Gaddvor'
  16. end
  17. else
  18. act 'Pick up your clothes':
  19. gs 'clothing', 'recover_lost_clothes', 'Gaddvor'
  20. 'You picked up your clothes.'
  21. gt 'Gaddvor'
  22. end
  23. end
  24. end
  25. if StoryLine = 1:
  26. '<center><h4>Your grandparents'' yard</h4></center>'
  27. else
  28. '<center><h4>Old Couple''s yard</h4></center>'
  29. end
  30. if month >= 4 and month <= 10:
  31. if hour >= 6 and hour < 22:
  32. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/dvor.jpg"></center>'
  33. else
  34. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/dvor_night.jpg"></center>'
  35. end
  36. else
  37. if hour >= 8 and hour < 18:
  38. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/dvor_winter.jpg"></center>'
  39. else
  40. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/dvor_winter_night.jpg"></center>'
  41. end
  42. end
  43. if StoryLine = 1:
  44. 'A fenced yard behind your grandparents'' house. The yard is surrounded by a small barn packed with junk and a separate building that is used as a banya where you can take a bath. On the back porch there are a few chairs to sit in.'
  45. else
  46. 'A fenced yard behind the house. The yard is surrounded by a small barn packed with junk and a separate building that is used as a banya where people take a bath. On the back porch there are a few chairs to sit in.'
  47. end
  48. if StoryLine = 1:
  49. act 'Enter your grandparents'' house':minut += 5 & gt 'Gadhouse'
  50. act 'Enter the banya':minut += 5 & gt 'Gadbana'
  51. end
  52. if $wornclothingtype = 'nude':
  53. *nl
  54. 'You are naked and can only go to your grandparents to get dressed or go to the banya.'
  55. else
  56. if hour >= 6 and hour < 20 and month >= 4 and month <= 10:'In the yard there are <a href="exec:gt ''Gaddvor'',''chickens''">chickens</a> running around.'
  57. if mira_guest = 1: Miraloc = 7 & 'Your friend <a href="exec: gt ''Miroslava'', ''Start''">Mira</a> stands next to you.'
  58. act 'Enter the barn':minut += 5 & gt 'Gadsarai'
  59. act 'Enter garden':minut += 5 & gt'Gadgarden','garden'
  60. if meadow > 0 and hour >= 6 and hour < 20 and month >= 4 and month <= 10:act 'Go to the meadow':minut += 20 & gt 'Meadow', 'start'
  61. act '<b>Go to the village</b>':minut += 5 & gt 'gadukino'
  62. !removed from 1.2.5
  63. if hour >= 17 and hour < 20:
  64. if mitkaday!daystart:'<a href="exec:gt ''mitka''">Mitka</a> is hanging out near the barn in your grandparents'' backyard, he is following you while taking a smoke.'
  65. elseif hour >= 20 and mitkadaybuh ! daystart:
  66. 'Several <a href="exec:gt ''mitkabuh''">young men</a> are sitting near your grandparents'' backyard, drinking moonshine and talking loudly.'
  67. end
  68. !125s
  69. mira_temp = rand(1,5)
  70. if mira_temp = 3 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 1 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
  71. *clr & cla
  72. gs 'Miroslava', 'miraclothes'
  73. 'You went out into the yard and noticed Mira standing there.'
  74. '"Oh, <<$pcs_nickname>> hi, hope you don’’t mind me visiting. I was bored being home alone." she said smiling.'
  75. mira_guestday = daystart
  76. minut += 5
  77. mira_guest = 1
  78. gs 'stat'
  79. act 'Further':gt'Gaddvor'
  80. end
  81. end
  82. end
  83. if $ARGS[0]='chickens':
  84. *clr & cla
  85. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/chickens1.jpg"></center>'
  86. 'Ordinary chickens clucking about their pen.'
  87. minut += 5
  88. gs 'stat'
  89. !job Granny
  90. if feed_chickens = 1:
  91. act 'Feed the chickens':
  92. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/chickens2.jpg"></center>'
  93. 'You decide to feed the chickens. You pick up a bucket full of bird''s seed and grain mix and toss it on the ground. They immediately rush over and start to greedily eat. You watch them for a bit before you go about your business.'
  94. *clr & cla
  95. minut += 30
  96. grandmahelp += 1
  97. feed_chickens = 0
  98. hndiwrk_exp += rand(0,3)
  99. gs 'stat'
  100. act 'Finish':gt'Gaddvor'
  101. end
  102. end
  103. act 'Go': gt'Gaddvor'
  104. end
  105. !!125e
  106. --- Gaddvor ---------------------------------