obkitchen 3.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202
  1. # obkitchen
  2. gs 'stat'
  3. $metkaM = $ARGS[0]
  4. $locM = $CURLOC
  5. '<center><b>in the dorm kitchen</b></center>'
  6. '<center><img src="images/img/centr/obkitchen.jpg"></center>'
  7. act 'In the corridor':gt 'dorm', 'korr'
  8. if eda > 0:
  9. act 'Cook food (1:00)':
  10. cla
  11. *clr
  12. set minut += 60
  13. gs 'stat'
  14. set edahot += 1
  15. set eda -= 1
  16. set manna -= 5
  17. '<center><img src="images/pics/cook.jpg"></center>'
  18. 'You prepare the meal.'
  19. act 'Leave the meal':gt 'obkitchen'
  20. end
  21. end
  22. if edahot > 0:
  23. act 'Eat cooked food (0:30)':
  24. cla
  25. *clr
  26. gs 'stat'
  27. frost = 0
  28. '<center><img src="images/pics/food.jpg"></center>'
  29. set minut += 30
  30. set edahot -= 1
  31. set health += 10
  32. set manna += 20
  33. if energy >= 30:
  34. set fat += 5
  35. 'You can no longer have.'
  36. end
  37. if energy >= 20 and energy < 30:
  38. set fat += 3
  39. set energy += 10
  40. 'You pushed through the power of a meal.'
  41. end
  42. if energy < 20:
  43. set energy += 20
  44. !!set fat += 1
  45. 'You gladly ate cooked food.'
  46. end
  47. if water >= 20:'Tea in you no longer climbs.'
  48. if water < 20:
  49. 'You gladly drank a mug of tea.'
  50. set water += 20
  51. end
  52. act 'Get up from the table':gt 'obkitchen'
  53. end
  54. end
  55. if pranik > 0:
  56. act 'Drink tea with cookies (0:05)':
  57. cla
  58. *clr
  59. minut += 5
  60. pranik -= 1
  61. set health += 30
  62. set manna += 100
  63. energy += 20
  64. water += 20
  65. fat += 50
  66. frost = 0
  67. gs 'stat'
  68. '<center><img src="images/pics/food.jpg"></center>'
  69. 'You drank tea with cookies, sweet and very bad for the figure, but so nice.'
  70. act 'Get up from the table':gt 'obkitchen'
  71. end
  72. end
  73. if edaD > 0:
  74. act 'Eat diet meal (0:30)':
  75. cla
  76. *clr
  77. frost = 0
  78. '<center><img src="images/pics/food.jpg"></center>'
  79. set minut += 30
  80. set health += 10
  81. set manna += 20
  82. set edaD -= 1
  83. if energy >= 30:'You can no longer have.'
  84. if energy >= 20 and energy < 30:
  85. set energy += 10
  86. 'You pushed through the power of a meal.'
  87. end
  88. if energy < 20:
  89. set energy += 20
  90. 'You gladly ate cooked food.'
  91. end
  92. if water >= 20:'Tea in you no longer climbs.'
  93. if water < 20:
  94. 'You gladly drank a mug of tea.'
  95. set water += 20
  96. end
  97. act 'Get up from the table':gt 'obkitchen'
  98. end
  99. end
  100. if fatdel > 0:
  101. act 'Consume fat burners':
  102. cla
  103. *clr
  104. set fatdel -= 1
  105. set fat -= 25
  106. if fat < 0:fat = 0
  107. 'You drank fat burning capsule. These capsules are gradually and results will be seen immediately.'
  108. act 'Get up from the table':gt 'obkitchen'
  109. end
  110. end
  111. act 'Drink':
  112. cla
  113. set minut += 5
  114. if water >= 20:'Water in you no longer climbs.'
  115. if water < 20:
  116. 'You gladly drank a glass of water.'
  117. set water += 20
  118. end
  119. act 'Get up from the table':gt 'obkitchen'
  120. end
  121. if lekarstvo > 0:
  122. 'You have <<lekarstvo>> tablets.'
  123. if sick > 0 and lekarday ! day:
  124. act 'Take a pill':
  125. cla
  126. *clr
  127. set minut += 5
  128. lekarday = day
  129. lekarstvo -= 1
  130. sick -= sick * 20/100
  131. set lekrand = rand(0, 8)
  132. if lekrand = 0:'<center><img src="images/inBed/lekr1.jpg"></center>'
  133. if lekrand = 1:'<center><img src="images/inBed/lekr2.jpg"></center>'
  134. if lekrand = 2:'<center><img src="images/inBed/lekr3.jpg"></center>'
  135. if lekrand = 3:'<center><img src="images/inBed/lekr4.jpg"></center>'
  136. if lekrand = 4:'<center><img src="images/inBed/lekr5.jpg"></center>'
  137. if lekrand = 5:'<center><img src="images/inBed/lekr6.jpg"></center>'
  138. if lekrand = 6:'<center><img src="images/inBed/lekr7.jpg"></center>'
  139. if lekrand = 7:'<center><img src="images/inBed/lekr8.jpg"></center>'
  140. if lekrand = 8:'<center><img src="images/inBed/lekr9.jpg"></center>'
  141. 'You drank the pill'
  142. act 'Move away':gt 'obkitchen'
  143. end
  144. end
  145. end
  146. if vitamin > 0:
  147. 'You have <<vitamin>> vitaminok.'
  148. if vitaminday ! day:
  149. act 'Drink Vitamins':
  150. cla
  151. *clr
  152. set minut += 5
  153. vitaminday = day
  154. vitamin -= 1
  155. frost = 0
  156. set skinvan += 1
  157. if skinvan = 20:set skinvan = 0 & set skin += 1
  158. 'You drank Vitaminki'
  159. act 'Move away':gt 'obkitchen'
  160. end
  161. end
  162. end
  163. --- obkitchen ---------------------------------