artemhome2 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384
  1. # artemhome2
  2. gs 'stat'
  3. if artemhomemark = 0:
  4. 'You came to the house Artem Chebotarev.'
  5. act 'Leave':minut += 15 & gt 'gorodok'
  6. if week < 6:
  7. if hour < 16 and hour >= 7:
  8. 'Artem not at home.'
  9. elseif hour >= 16 and hour < 20:
  10. 'The door you opened Artem and invited to enter.'
  11. act 'Enter':artemhomemark = 1 & gt $curloc
  12. elseif hour >= 20 or hour < 7:
  13. 'Too late, that would go to visit.'
  14. end
  15. end
  16. if week >= 6:
  17. if hour < 10:
  18. 'Too early time, that would go to visit.'
  19. elseif hour >= 10 and hour < 20:
  20. 'The door you opened Artem and invited to enter.'
  21. act 'Enter':artemhomemark = 1 & gt $curloc
  22. elseif hour >= 20 or hour < 5:
  23. 'Too late, that would go to visit.'
  24. end
  25. end
  26. elseif artemhomemark = 1:
  27. 'Artem sits in his room on the bed.'
  28. if artempower > 0:
  29. 'Artem smiling at you "<<$name>>, you are so beautiful!"'
  30. act 'Kiss':
  31. cls
  32. horny += 10
  33. gs 'stat'
  34. '<center><img src="images/qwest/alter/Ev/kiss.jpg"></center>'
  35. 'You smiled Artem and his face a little closer to him. Artem approached you and kissed you. You started kissing.'
  36. if artempower = 3:'During a kiss Artem rubs against your thigh his crotch and you feel his hard cock through clothes. Do you feel that Artem took dick out of his pants and rubs them on your hip.'
  37. if artempower = 2:'During a kiss Artem rubs against your thigh his crotch and you feel his hard cock through clothes.'
  38. if artempower = 1:'Finally ending the kiss shyly said Artem. "<<$name>>, I like you very nravishsya."'
  39. dynamic $din_artrm_leghump
  40. dynamic $din_artem_leghump2
  41. end
  42. elseif artempower = 0:
  43. 'Artem with a smile looking at you "Oh <<$nickname>>, you milked me dry, I need a vacation."'
  44. end
  45. if lernHome > 0:act 'Do homework with Artem':artemhomemark = 2 & gt $curloc
  46. act 'Leave':artemhomemark = 0 & minut += 15 & gt 'gorodok'
  47. elseif artemhomemark = 2:
  48. minut += 60
  49. grupNPC[2] += 10
  50. lernHome = 0
  51. lern += rand(3, 6)
  52. intel += rand(1, 2)
  53. gs 'stat'
  54. '<center><img src="images/qwest/alter/npc/<<2>>.jpg"></center>'
  55. 'Did you do with Artem in under an hour, During this time he helped you with homework and explained something of the studied material.'
  56. act 'Rest':artemhomemark = 1 & gt $curloc
  57. end
  58. !'
  59. act '':
  60. cls
  61. minut += 5
  62. gs 'stat'
  63. '<center><img src="images/qwest/alter/artom/2.jpg"></center>'
  64. ''
  65. act '':
  66. end
  67. '!
  68. --- artemhome2 ---------------------------------