171_brother 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162
  1. # brother
  2. brotherAge = age - 2
  3. gs 'stat'
  4. '<center><B><font color = maroon>Colca</font></B></center>'
  5. '<center><img src="images\qwest\alter\brother.jpg"></center>'
  6. 'Your brother Kolka younger than you and he <<brotherAge>> years. Kolka born unlike you and your sister already from his stepfather. He goes to the same school as you and enjoys football.'
  7. if brother < 20: 'You and your brother scandal.'
  8. if brother >= 20 and brother < 40: 'You and your brother tensions.'
  9. if brother >= 40 and brother < 60: 'You and your brother normal relations.'
  10. if brother >= 60 and brother < 80: 'You and your brother good relationship.'
  11. if brother >= 80: 'You and your brother a great relationship.'
  12. if cumface > 0 or cumfrot > 0 or cumlip > 1:
  13. if GorSlut > 0:
  14. 'Kolka looks at you "Slysh <<$gnikname>>. After service cocks should be washed away, but not to run in struhne."'
  15. end
  16. if GorSlut = 0:
  17. if motherKnowSpravka >= 1 or motherKnowWhore >= 1:
  18. 'Kolka looks at you, "Look, I understand that the mother aware that you´re a whore. Struhne But going to run the whole town knows you´re a whore."'
  19. end
  20. if motherKnowSpravka = 0 and motherKnowWhore = 0:
  21. 'Kolka looks at you, "What´s that?" His eyes rounded "Yes, it´s sprma. Here is the number, my sister exemplary slut."'
  22. end
  23. end
  24. act 'Move away': gt $loc, $metka
  25. exit
  26. end
  27. act 'Move away': gt $loc, $metka
  28. if GorSlut > 0:
  29. 'Kolka frowned "What do you want <<$gnikname>>."'
  30. end
  31. if motherKnowSpravka >= 1 or motherKnowWhore >= 1:
  32. 'You came to my brother. He laughed and began to poke a finger in you "whore. Whore. Whore."'
  33. else
  34. if $loc = 'gschool':
  35. if brother < 40:
  36. 'Brother frowns "Get off me pridurochnaya!"'
  37. else
  38. 'Brother grins "Hi <<$name>>. Play football?"'
  39. act 'Play football':
  40. cls
  41. minut += 60
  42. brother += 5
  43. agil += RAND(0,2)
  44. speed += RAND(0,2)
  45. set sweat += 3
  46. set beg += RAND(2,5)
  47. gs 'stat'
  48. 'You ran for an hour on the field chasing a ball with my brother and his friends.'
  49. act 'Move away': gt $loc, $metka
  50. end
  51. end
  52. end
  53. end
  54. --- brother ---------------------------------