parks.qsrc 2.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  1. # parks
  2. if $ARGS[0] = 'start':
  3. cls
  4. $location_type = 'public_outdoors'
  5. $metka = 'start'
  6. $loc = 'parks'
  7. gs'stat'
  8. '<center><B>Old Town Park</B></center>'
  9. '<center><img <<$set_imgh>> src="images/locations/oldtown/park/parkus.jpg" ></center>'
  10. 'These gardens of the old palace have been sculpted over many years into wonderful, landscaped gardens with a tranquil atmosphere.'
  11. 'The old park is a favorite vacation spot for tourists and the main feature of old town.'
  12. 'Wander deeper into the <a href="exec:GT ''lug'',''start''">park</a> .'
  13. act 'Go to the high street': minut += 10 & gt 'liames'
  14. act 'Go to the town center': minut += 10 & gt 'liam'
  15. act 'Walk around the park (1 hour)':
  16. if pcs_exhibition >= 50 and exhibitionQW = 0: gt 'kseniyaQW', 'event1', 1
  17. cla
  18. minut += 60
  19. pcs_mood += 10
  20. pcs_willpwr += 10
  21. gs'stat'
  22. 'You leisurely stroll through the park of the Old Town. Breathe in the fresh air, reflecting on the vicissitudes of fate.'
  23. act 'Complete outing':gt 'parks','start'
  24. end
  25. gs 'parkivent', 'run'
  26. if month = 5 or month = 6 or month = 7 or month = 8 or month = 9:
  27. if hour > 6 and hour < 23:
  28. act 'Rest on the bench':
  29. cla
  30. *clr
  31. '<center><img <<$set_imgh>> src="images/locations/shared/park/bench_6.jpg"></center>'
  32. waiting = input ("How many minutes of sitting? (Not more 120 minutes)")
  33. if waiting > 120:
  34. minut = minut + 15
  35. elseif waiting > 0:
  36. minut = minut + waiting
  37. pcs_mood += 10
  38. pcs_willpwr = pcs_willpwr + 10
  39. if pcs_sleep < 90:pcs_sleep += 10
  40. else
  41. 'Invalid time.'
  42. end
  43. act 'Consult a watch': gt 'parks', 'start'
  44. end
  45. end
  46. end
  47. if pcs_inhib >= 35:
  48. act 'Flash your tits':
  49. if pcs_exhibition >= 50 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
  50. cls
  51. exhibition_exp += rand(1,5)
  52. inhib_exp += rand(1,3)
  53. gs 'events', 'flash_tits', 'outdoors', 5
  54. gs 'stat'
  55. act 'Continue': gt 'parks', 'start'
  56. end
  57. end
  58. if pcs_exhibition >= 40:
  59. act 'Flash your pussy':
  60. if pcs_exhibition >= 50 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
  61. cls
  62. exhibition_exp += rand(9,12)
  63. gs 'events', 'flash_pussy', 'outdoors', 5
  64. gs 'stat'
  65. act 'Continue': gt 'parks', 'start'
  66. end
  67. end
  68. end
  69. --- parks ---------------------------------