obkitchen 1.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566
  1. # obkitchen
  2. if $args[0] = '':
  3. $metka = ''
  4. $loc = 'obkitchen'
  5. $metkaM = ''
  6. $locM = 'obkitchen'
  7. $location_type = 'private'
  8. gs 'stat'
  9. '<center><b>in the dorm kitchen</b></center>'
  10. '<center><img src="images/locations/city/island/university/dorm/obkitchen.jpg"></center>'
  11. act 'Return to the corridor':gt 'dorm', 'korr'
  12. if eda > 0:
  13. 'Your shelf in the refrigerator holds <b><<eda>></b> servings of food.'
  14. if edahot = 0:
  15. act 'Cook food (0:25)':
  16. cla
  17. *clr
  18. minut += 25
  19. edahot += 1
  20. eda -= 1
  21. pcs_mood -= 5
  22. gs 'stat'
  23. '<center><img src="images/shared/home/kitchen/cook.jpg"></center>'
  24. 'You prepare a meal.'
  25. gs 'obkitchen', 'food'
  26. end
  27. end
  28. end
  29. if edaD = 0 and eda = 0:'<b><font color = red>Your shelf in the refrigerator is bare, there is nothing left for you to eat.</font></b>'
  30. if edahot > 0:
  31. 'A cooked meal is on the table.'
  32. gs 'obkitchen', 'food'
  33. end
  34. if pranik > 0:
  35. if pranik = 1:
  36. 'You only have one more portion of cookies.'
  37. else
  38. 'You have enough cookies for <b><<pranik>></b> more snacks.'
  39. end
  40. dynamic $pranik
  41. end
  42. dynamic $edaD
  43. dynamic $fatdel
  44. dynamic $driwater
  45. dynamic $lekarstvo
  46. dynamic $vitamin
  47. end
  48. if $args[0] = 'food':
  49. act 'Eat cooked food':
  50. edahot = 0
  51. gt 'food', 'm_meal'
  52. end
  53. end
  54. --- obkitchen ---------------------------------