ykuh.qsrc 2.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586
  1. # ykuh
  2. $loc_arg = ''
  3. $loc = 'ykuh'
  4. $locclass = 'kitr'
  5. $menu_loc = 'ykuh'
  6. $menu_arg = ''
  7. menu_off = 0
  8. *clr & cla
  9. gs 'stat'
  10. '<center><b><font color="maroon">Kitchen</font></b></center>'
  11. '<center>A well stocked kitchen containing all the necessities to make whatever meal you please.</center>'
  12. if ymanrem[6] = 0:'<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/ynill.jpg"></center>'
  13. if ymanrem[6] = 1:'<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/yrem.jpg"></center>'
  14. if ymanrem[6] = 2:'<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/ykun.jpg"></center>'
  15. if ymanrem[6] = 2:''
  16. if dirttarelka > 0 and fairy >= dirttarelka:
  17. cltarelka += dirttarelka
  18. fairy -= dirttarelka
  19. dirttarelka = 0
  20. 'You wash the dirty dishes in the dishwasher.'
  21. elseif fairy < dirttarelka:
  22. 'You can''t use the dishwasher. You have no detergent.'
  23. end
  24. if cltarelka > 0:
  25. 'You have <b><<cltarelka>></b> clean plates left.'
  26. else
  27. '<b><font color="red">You don''t have any clean plates left.</font></b>'
  28. end
  29. if dirttarelka > 0:'There are <b><<dirttarelka>></b> dirty dishes in the sink. <a href="exec:dynamic $dirtarm">Wash the dishes</a>.'
  30. if fairy > 0:
  31. 'Under the sink is some dishwashing detergent, which is enough for <b><<fairy>></b> ' + iif(fairy = 1, 'time.', 'times.')
  32. else
  33. '<b><font color="red">You have nothing to wash dishes with. You should buy some detergent.</font></b>'
  34. end
  35. if eda > 0:
  36. if cltarelka = 0 or edahot > 0:$edagot = ''
  37. if cltarelka > 0 and edahot = 0:$edagot = '<a href="exec:dynamic $edagotd">Cook a meal (0:30)</a>'
  38. 'There''s enough food for <b><<eda>></b> ' + iif(eda = 1, 'serving', 'servings') + '. <<$edagot>>'
  39. elseif edaD = 0 and eda = 0:
  40. '<b><font color="red">The fridge is empty. You have nothing to eat.</font></b>'
  41. end
  42. act 'Leave the room':minut += 1 & gt 'ymans'
  43. if edahot > 0:'<a href="exec:dynamic $edahotd">There''s a warm meal on the table.</a>'
  44. if husband > 0 and husbanday > 0 and huseatday ! daystart and eda >= 2:
  45. act 'Cook a meal for your husband, 2 servings (1:00)':
  46. cla
  47. *clr
  48. husband += 5
  49. eda -= 2
  50. minut += 60
  51. huseatday = daystart
  52. pcs_mood -= 15
  53. '<center><img <<$set_imgh>> src="images/shared/home/kitchen/cook.jpg"></center>'
  54. 'You make some delicious food for your husband.'
  55. act 'Put the food on the table':gt $curloc
  56. end
  57. end
  58. act 'Have a snack (0:15)':gs 'food', 'snack'
  59. dynamic $sandwich
  60. dynamic $driwater
  61. dynamic $dritea
  62. dynamic $fill_bottle
  63. dynamic $edaD
  64. dynamic $pranik
  65. dynamic $fatdel
  66. dynamic $lekarstvo
  67. dynamic $vitamin
  68. --- ykuh ---------------------------------