245_restoranM 1.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182
  1. # restoranM
  2. if $ARGS[0] = 'start':
  3. set minut += 30
  4. 'You came to the restaurant and sat at a table. <<$boyA>> ordered the waiter food and good wine. You have to wait when you bring the food.'
  5. if dayA > 15 and harakBoyA = 2: gs 'boylove','tits'
  6. if dayA > 20 and harakBoyA = 1: gs 'boylove','tits'
  7. if dayA > 25 and harakBoyA = 0: gs 'boylove','tits'
  8. if dayA > 20 and harakBoyA = 2: gs 'boylove','figure'
  9. if dayA > 25 and harakBoyA = 1: gs 'boylove','figure'
  10. if dayA > 30 and harakBoyA = 0: gs 'boylove','figure'
  11. gs 'anekdot'
  12. '<<$boyA>> anecdote tells you "<<$anek>>."'
  13. act 'Laugh.':
  14. cla
  15. set SUB += 1
  16. set bfa += 1
  17. xgt 'restoranM','a'
  18. end
  19. act 'Smile.':
  20. cla
  21. !set bfa -= 1
  22. xgt 'restoranM','a'
  23. end
  24. act 'Not funny.':
  25. cla
  26. set DOM += 1
  27. set bfa -= 1
  28. xgt 'restoranM','a'
  29. end
  30. end
  31. if $ARGS[0] = 'a':
  32. set minut += 30
  33. set fat += 1
  34. 'Finally you brought food. <<$boyA>> pour you wine and proposed a toast to love.'
  35. act 'There.':
  36. cla
  37. xgt 'restoranM','b'
  38. end
  39. end
  40. if $ARGS[0] = 'b':
  41. set minut += 30
  42. set fat += 1
  43. if energy >= 30:
  44. set fat += 5
  45. 'You can no longer have.'
  46. end
  47. if energy >= 20 and energy < 30:
  48. set fat += 3
  49. set energy += 10
  50. 'You pushed through the power of a meal.'
  51. end
  52. if energy < 20:
  53. set energy += 20
  54. set fat += 1
  55. 'You gladly ate the food.'
  56. end
  57. if water >= 20:
  58. 'Tea in you no longer climbs.'
  59. end
  60. if water < 20:
  61. 'You gladly drank a mug of tea.'
  62. set water += 20
  63. end
  64. alko += 2
  65. gs 'stat'
  66. 'After some time with food and wine, and was done with <<$boyA>> proposed to hold you.'
  67. act 'Home.': gt 'sexm','start'
  68. end
  69. --- restoranM ---------------------------------