restoranM.qsrc 1.6 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
  1. # restoranM
  2. $location_type = 'public_indoors'
  3. menu_off = 1
  4. if $ARGS[0] = 'start':
  5. minut += 30
  6. 'You arrive at the restaurant and sit at a table. <<$loverdesc[lover_number]>> orders a meal and good wine. You have to wait a little until the food arrives.'
  7. '<<$loverdesc[lover_number]>> tells you an anecdote:<br>'
  8. gs 'anekdot'
  9. *nl
  10. if loverdays[lover_number] > 15 and haraklover[lover_number] = 2:gs 'boylove', 'tits'
  11. if loverdays[lover_number] > 20 and haraklover[lover_number] = 1:gs 'boylove', 'tits'
  12. if loverdays[lover_number] > 25 and haraklover[lover_number] = 0:gs 'boylove', 'tits'
  13. if loverdays[lover_number] > 20 and haraklover[lover_number] = 2:gs 'boylove', 'figure'
  14. if loverdays[lover_number] > 25 and haraklover[lover_number] = 1:gs 'boylove', 'figure'
  15. if loverdays[lover_number] > 30 and haraklover[lover_number] = 0:gs 'boylove', 'figure'
  16. act 'Laugh':
  17. cla
  18. loverrelation[lover_number] += 1
  19. xgt 'restoranM', 'a'
  20. end
  21. act 'Smile':
  22. cla
  23. xgt 'restoranM', 'a'
  24. end
  25. act 'Its not funny':
  26. cla
  27. loverrelation[lover_number] -= 1
  28. xgt 'restoranM', 'a'
  29. end
  30. end
  31. if $ARGS[0] = 'a':
  32. minut += 30
  33. gs 'drugs', 'alcohol', 'wine'
  34. 'When your food arrives, <<$loverdesc[lover_number]>> pours you a glass of wine and proposes a toast to love.'
  35. act 'Eat': xgt 'restoranM', 'b'
  36. end
  37. if $ARGS[0] = 'b':
  38. $metka = 'b'
  39. $loc = 'restoranM'
  40. gs 'food', 'm_meal'
  41. gs 'drugs', 'alcohol', 'wine'
  42. gs 'stat'
  43. 'After you finish your meal and empty the wine, <<$loverdesc[lover_number]>> offers to take you to his home.'
  44. act 'Go Home':gt 'sexm', 'start'
  45. end
  46. --- restoranM ---------------------------------