artemhome2 2.3 KB

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