1
0

food.qsrc 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667
  1. # food
  2. ! Snacks: +20 pcs_energy, +7 fat (most cases has water available separately)
  3. ! Fast Food: +70 pcs_energy +70 pcs_hydra, +14 fat (hamburgers, fried food, like the downtown diner)
  4. ! Small Meal: +40 pcs_energy +40 pcs_hydra, +4 fat (soup and sandwiches, cafe light lunches, etc)
  5. ! Medium Meal and Hotel Food: +60 pcs_energy +60 pcs_hydra, +7 fat (home cooked dinners and room service equivalent)
  6. ! Large Meal: +100 pcs_energy +100 pcs_hydra, +14 fat (steak dinners, new years party dinner, etc)
  7. ! Bagged Lunch: +40 pcs_energy +40 pcs_hydra, +5 fat (sandwich, cold leftovers, etc)
  8. ! Health Meal: +50 pcs_energy +50 pcs_hydra, +1 fat (Diet food, Salads, rice cakes with peanut butter)
  9. if $ARGS[0] = 'pirosh':
  10. *clr & cla
  11. frost = 0
  12. minut += 15
  13. money -= val($_eat['<<args[1]>>,price'])
  14. pcs_health += 5
  15. mood += 5
  16. fat += 4
  17. pcs_energy += 40
  18. if pcs_hydra >= 100:
  19. pcs_hydra -= 5
  20. else
  21. pcs_hydra -= 10
  22. end
  23. cumspclnt = 2
  24. gs 'cum_cleanup'
  25. pcs_breath = 0
  26. gs 'food', 'aftermeal'
  27. '<center><img <<$set_imgh>> src="images/shared/food/pirozhki.jpg"></center>'
  28. 'You enjoy some vegatarian Piroshki, and <<$mtxt>>'
  29. gs 'stat'
  30. killvar '$_eat'
  31. act 'Finish': gt $loc, $metka
  32. end
  33. if $ARGS[0] = 'golub':
  34. *clr & cla
  35. frost = 0
  36. minut += 20
  37. money -= val($_eat['<<args[1]>>,price'])
  38. pcs_health += 10
  39. mood += 5
  40. fat += 8
  41. pcs_energy += 60
  42. if pcs_hydra >= 100:
  43. pcs_hydra += 10
  44. else
  45. pcs_hydra += 20
  46. end
  47. cumspclnt = 2
  48. gs 'cum_cleanup'
  49. pcs_breath = 0
  50. gs 'food', 'aftermeal'
  51. '<center><img <<$set_imgh>> src="images/shared/food/golubtsy.jpg"></center>'
  52. 'You enjoy some well made Golubtsy in a tomato sauce. The portions were moderate and<<$mtxt>>'
  53. gs 'stat'
  54. killvar '$_eat'
  55. act 'Finish': gt $loc, $metka
  56. end
  57. if $ARGS[0] = 'pozhar':
  58. *clr & cla
  59. frost = 0
  60. minut += 20
  61. money -= val($_eat['<<args[1]>>,price'])
  62. pcs_health += 15
  63. mood += 10
  64. fat += 6
  65. pcs_energy += 70
  66. if pcs_hydra >= 100:
  67. pcs_hydra -= 5
  68. else
  69. pcs_hydra -= 10
  70. end
  71. cumspclnt = 2
  72. gs 'cum_cleanup'
  73. pcs_breath = 0
  74. gs 'food', 'aftermeal'
  75. '<center><img <<$set_imgh>> src="images/shared/food/pozharsky.jpg"></center>'
  76. 'You thoroughly enjoy the nicely cooked Pozharsky Cutlets. The portions were moderate and<<$mtxt>>'
  77. gs 'stat'
  78. killvar '$_eat'
  79. act 'Finish': gt $loc, $metka
  80. end
  81. if $ARGS[0] = 'reuben':
  82. *clr & cla
  83. frost = 0
  84. minut += 25
  85. money -= val($_eat['<<args[1]>>,price'])
  86. pcs_health += 20
  87. mood += 25
  88. fat += 12
  89. pcs_energy += 110
  90. if pcs_hydra >= 100:
  91. pcs_hydra -= 5
  92. else
  93. pcs_hydra -= 10
  94. end
  95. cumspclnt = 2
  96. gs 'cum_cleanup'
  97. pcs_breath = 0
  98. gs 'food', 'aftermeal'
  99. '<center><img <<$set_imgh>> src="images/shared/food/reuben.jpg"></center>'
  100. 'You had trouble finishing the Rueben Sandwich, but you enjoyed it immensely. The portion was fairly large and<<$mtxt>>'
  101. gs 'stat'
  102. killvar '$_eat'
  103. act 'Finish': gt $loc, $metka
  104. end
  105. if $ARGS[0] = 'blini':
  106. *clr & cla
  107. frost = 0
  108. minut += 15
  109. money -= val($_eat['<<args[1]>>,price'])
  110. pcs_health += 10
  111. mood += 5
  112. fat += 8
  113. pcs_energy += 50
  114. if pcs_hydra >= 100:
  115. pcs_hydra -= 5
  116. else
  117. pcs_hydra -= 10
  118. end
  119. cumspclnt = 2
  120. gs 'cum_cleanup'
  121. pcs_breath = 0
  122. gs 'food', 'aftermeal'
  123. '<center><img <<$set_imgh>> src="images/shared/food/blini.jpg"></center>'
  124. 'You eat some blini. The portions are fairly small and<<$mtxt>>'
  125. gs 'stat'
  126. killvar '$_eat'
  127. act 'Finish': gt $loc, $metka
  128. end
  129. if $ARGS[0] = 'varenfan':
  130. *clr & cla
  131. frost = 0
  132. minut += 25
  133. money -= val($_eat['<<args[1]>>,price'])
  134. pcs_health += 15
  135. mood += 15
  136. fat += 10
  137. pcs_energy += 40
  138. if pcs_hydra >= 100:
  139. pcs_hydra -= 5
  140. else
  141. pcs_hydra -= 10
  142. end
  143. cumspclnt = 2
  144. gs 'cum_cleanup'
  145. pcs_breath = 0
  146. '<center><img <<$set_imgh>> src="images/shared/food/varenikifancy.jpg"></center>'
  147. 'You sit and eat a plate of yummy Vareniki with potatoes. The portions are fairly moderate and<<$mtxt>>'
  148. gs 'stat'
  149. killvar '$_eat'
  150. act 'Finish': gt $loc, $metka
  151. end
  152. if $ARGS[0] = 'salfan':
  153. *clr & cla
  154. frost = 0
  155. minut += 40
  156. money -= val($_eat['<<args[1]>>,price'])
  157. pcs_health += 20
  158. mood += 20
  159. fat += 12
  160. pcs_energy += 80
  161. if pcs_hydra >= 100:
  162. pcs_hydra -= 5
  163. else
  164. pcs_hydra -= 10
  165. end
  166. cumspclnt = 2
  167. gs 'cum_cleanup'
  168. pcs_breath = 0
  169. gs 'food', 'aftermeal'
  170. '<center><img <<$set_imgh>> src="images/shared/food/salmonfancy.jpg"></center>'
  171. 'You thoroughly enjoy the massive fresh salmon steak. The meal was simply colossal and<<$mtxt>>'
  172. gs 'stat'
  173. killvar '$_eat'
  174. act 'Finish':gt $loc, $metka
  175. end
  176. if $ARGS[0] = 'strofan':
  177. *clr & cla
  178. frost = 0
  179. minut += 35
  180. money -= val($_eat['<<args[1]>>,price'])
  181. pcs_health += 20
  182. mood += 30
  183. fat += 6
  184. pcs_energy += 120
  185. if pcs_hydra >= 100:
  186. pcs_hydra -= 5
  187. else
  188. pcs_hydra -= 10
  189. end
  190. cumspclnt = 2
  191. gs 'cum_cleanup'
  192. pcs_breath = 0
  193. gs 'food', 'aftermeal'
  194. '<center><img <<$set_imgh>> src="images/shared/food/stroganofffancy.jpg"></center>'
  195. 'You are loving the delicious Beef Stroganoff. You enjoy it immensely. The portion was fairly moderate and<<$mtxt>>'
  196. gs 'stat'
  197. killvar '$_eat'
  198. act 'Finish': gt $loc, $metka
  199. end
  200. if $ARGS[0] = 'borfan':
  201. *clr & cla
  202. frost = 0
  203. minut += 25
  204. money -= val($_eat['<<args[1]>>,price'])
  205. pcs_health += 10
  206. mood += 25
  207. fat += 4
  208. pcs_energy += 60
  209. if pcs_hydra >= 100:
  210. pcs_hydra += 20
  211. else
  212. pcs_hydra += 40
  213. end
  214. cumspclnt = 2
  215. gs 'cum_cleanup'
  216. pcs_breath = 0
  217. gs 'food', 'aftermeal'
  218. '<center><img <<$set_imgh>> src="images/shared/food/borschtfancy.jpg"></center>'
  219. 'You a steaming hot bowel of Borscht. The portions are fairly small and<<$mtxt>>'
  220. gs 'stat'
  221. killvar '$_eat'
  222. act 'Finish': gt $loc, $metka
  223. end
  224. if $ARGS[0] = 'blifan':
  225. *clr & cla
  226. frost = 0
  227. minut += 20
  228. money -= val($_eat['<<args[1]>>,price'])
  229. pcs_health += 30
  230. mood += 40
  231. fat += 6
  232. pcs_energy += 50
  233. if pcs_hydra >= 100:
  234. pcs_hydra -= 5
  235. else
  236. pcs_hydra -= 10
  237. end
  238. cumspclnt = 2
  239. gs 'cum_cleanup'
  240. pcs_breath = 0
  241. gs 'food', 'aftermeal'
  242. '<center><img <<$set_imgh>> src="images/shared/food/blinifancy.jpg"></center>'
  243. 'You eat a petite caviar blini appetiser. The portions are fairly small and<<$mtxt>>'
  244. gs 'stat'
  245. killvar '$_eat'
  246. act 'Finish': gt $loc, $metka
  247. end
  248. if $ARGS[0] = 'ryesna':
  249. *clr & cla
  250. frost = 0
  251. minut += 10
  252. money -= val($_eat['<<args[1]>>,price'])
  253. pcs_health += 5
  254. mood += 10
  255. fat += 4
  256. pcs_energy += 20
  257. if pcs_hydra >= 100:
  258. pcs_hydra -= 5
  259. else
  260. pcs_hydra -= 10
  261. end
  262. cumspclnt = 2
  263. gs 'cum_cleanup'
  264. pcs_breath = 0
  265. gs 'food', 'aftermeal'
  266. '<center><img <<$set_imgh>> src="images/shared/food/ryesnack.jpg"></center>'
  267. 'You have a tasty bowel of toasted rye snacks. The portions are fairly small and<<$mtxt>>'
  268. gs 'stat'
  269. killvar '$_eat'
  270. act 'Finish': gt $loc, $metka
  271. end
  272. if $ARGS[0] = 'crisps':
  273. *clr & cla
  274. frost = 0
  275. minut += 10
  276. money -= val($_eat['<<args[1]>>,price'])
  277. pcs_health += 5
  278. mood += 20
  279. fat += 16
  280. pcs_energy += 20
  281. if pcs_hydra >= 100:
  282. pcs_hydra -= 5
  283. else
  284. pcs_hydra -= 10
  285. end
  286. cumspclnt = 2
  287. gs 'cum_cleanup'
  288. pcs_breath = 0
  289. gs 'food', 'aftermeal'
  290. '<center><img <<$set_imgh>> src="images/shared/food/crisps.jpg"></center>'
  291. 'You enjoy the salty flavour of a bowl of crisps. The portions are fairly small and<<$mtxt>>'
  292. gs 'stat'
  293. killvar '$_eat'
  294. act 'Finish': gt $loc, $metka
  295. end
  296. if $ARGS[0] = 'onring':
  297. *clr & cla
  298. frost = 0
  299. minut += 10
  300. money -= val($_eat['<<args[1]>>,price'])
  301. pcs_health += 10
  302. mood += 5
  303. fat += 16
  304. pcs_energy += 40
  305. if pcs_hydra >= 100:
  306. pcs_hydra -= 5
  307. else
  308. pcs_hydra -= 10
  309. end
  310. cumspclnt = 2
  311. gs 'cum_cleanup'
  312. pcs_breath = 0
  313. gs 'food', 'aftermeal'
  314. '<center><img <<$set_imgh>> src="images/shared/food/onionrings.jpg"></center>'
  315. 'You push yourself to eat the dry fatty onion rings. The portions are fairly small and<<$mtxt>>'
  316. gs 'stat'
  317. killvar '$_eat'
  318. act 'Finish': gt $loc, $metka
  319. end
  320. if $ARGS[0] = 'vegburg':
  321. *clr & cla
  322. frost = 0
  323. minut += 20
  324. money -= val($_eat['<<args[1]>>,price'])
  325. pcs_health += 20
  326. mood += 10
  327. fat += 8
  328. pcs_energy += 60
  329. if pcs_hydra >= 100:
  330. pcs_hydra -= 5
  331. else
  332. pcs_hydra -= 10
  333. end
  334. cumspclnt = 2
  335. gs 'cum_cleanup'
  336. pcs_breath = 0
  337. gs 'food', 'aftermeal'
  338. '<center><img <<$set_imgh>> src="images/shared/food/vegieburger.jpg"></center>'
  339. 'You eat the delicious vegieburger. The portions are fairly small and<<$mtxt>>'
  340. gs 'stat'
  341. killvar '$_eat'
  342. act 'Finish': gt $loc, $metka
  343. end
  344. if $ARGS[0] = 'turburg':
  345. *clr & cla
  346. frost = 0
  347. minut += 20
  348. money -= val($_eat['<<args[1]>>,price'])
  349. pcs_health += 10
  350. mood += 10
  351. fat += 10
  352. pcs_energy += 60
  353. if pcs_hydra >= 100:
  354. pcs_hydra -= 5
  355. else
  356. pcs_hydra -= 10
  357. end
  358. cumspclnt = 2
  359. gs 'cum_cleanup'
  360. pcs_breath = 0
  361. gs 'food', 'aftermeal'
  362. '<center><img <<$set_imgh>> src="images/shared/food/turkeyburger.jpg"></center>'
  363. 'You enjoy the turkey burger. The portions are fairly small and<<$mtxt>>'
  364. gs 'stat'
  365. killvar '$_eat'
  366. act 'Finish': gt $loc, $metka
  367. end
  368. if $ARGS[0] = 'batfish':
  369. *clr & cla
  370. frost = 0
  371. minut += 20
  372. money -= val($_eat['<<args[1]>>,price'])
  373. pcs_health += 15
  374. mood += 15
  375. fat += 11
  376. pcs_energy += 80
  377. if pcs_hydra >= 100:
  378. pcs_hydra -= 5
  379. else
  380. pcs_hydra -= 10
  381. end
  382. cumspclnt = 2
  383. gs 'cum_cleanup'
  384. pcs_breath = 0
  385. gs 'food', 'aftermeal'
  386. '<center><img <<$set_imgh>> src="images/shared/food/batteredfish.jpg"></center>'
  387. 'You eat the fish, but it has little flavour. The portions were moderate and<<$mtxt>>'
  388. gs 'stat'
  389. killvar '$_eat'
  390. act 'Finish': gt $loc, $metka
  391. end
  392. if $ARGS[0] = 'cheburg':
  393. *clr & cla
  394. frost = 0
  395. minut += 25
  396. money -= val($_eat['<<args[1]>>,price'])
  397. pcs_health += 20
  398. mood += 20
  399. fat += 14
  400. pcs_energy += 120
  401. if pcs_hydra >= 100:
  402. pcs_hydra -= 5
  403. else
  404. pcs_hydra -= 10
  405. end
  406. cumspclnt = 2
  407. gs 'cum_cleanup'
  408. pcs_breath = 0
  409. gs 'food', 'aftermeal'
  410. '<center><img <<$set_imgh>> src="images/shared/food/cheeseburger.jpg"></center>'
  411. 'You are a little sickened by the greasy looking cheeseburger and fries in front of you. The meal was simply colossal and<<$mtxt>>'
  412. gs 'stat'
  413. killvar '$_eat'
  414. act 'Finish': gt $loc, $metka
  415. end
  416. if $ARGS[0] = 'snack':
  417. *clr & cla
  418. gs 'stat'
  419. minut += 15
  420. money -= val($_eat['<<args[1]>>,price'])
  421. pcs_health += 10
  422. pcs_mood += 20
  423. fat += 6
  424. pcs_energy += 20
  425. cumspclnt = 2
  426. gs 'cum_cleanup'
  427. pcs_breath = 0
  428. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  429. 'You enjoy a small tasty, but somewhat fattening, snack. It wasn''t very much food, and<<$mtxt>>'
  430. gs 'stat'
  431. killvar '$_eat'
  432. act 'Return':gt $loc, $metka
  433. end
  434. if $ARGS[0] = 'f_food':
  435. *clr & cla
  436. frost = 0
  437. minut += 20
  438. money -= val($_eat['<<args[1]>>,price'])
  439. pcs_health += 10
  440. fat += 14
  441. pcs_energy += 70
  442. if pcs_hydra >= 100:
  443. pcs_hydra += 35
  444. else
  445. pcs_hydra += 70
  446. end
  447. cumspclnt = 2
  448. gs 'cum_cleanup'
  449. pcs_breath = 0
  450. gs 'food', 'aftermeal'
  451. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  452. 'You happily eat some fast food. The portions are quite generous and<<$mtxt>>'
  453. gs 'stat'
  454. killvar '$_eat'
  455. act 'Finish':gt $loc, $metka
  456. end
  457. if $ARGS[0] = 's_meal':
  458. *clr & cla
  459. frost = 0
  460. minut += 25
  461. money -= val($_eat['<<args[1]>>,price'])
  462. pcs_health += 10
  463. fat += 4
  464. pcs_energy += 40
  465. if pcs_hydra >= 100:
  466. pcs_hydra += 20
  467. else
  468. pcs_hydra += 40
  469. end
  470. cumspclnt = 2
  471. gs 'cum_cleanup'
  472. pcs_breath = 0
  473. gs 'food', 'aftermeal'
  474. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  475. 'You happily eat your meal. The portions are fairly small and<<$mtxt>>'
  476. gs 'stat'
  477. killvar '$_eat'
  478. act 'Finish':gt $loc, $metka
  479. end
  480. if $ARGS[0] = 'm_meal':
  481. *clr & cla
  482. frost = 0
  483. minut += 30
  484. money -= val($_eat['<<args[1]>>,price'])
  485. pcs_health += 10
  486. fat += 8
  487. pcs_energy += 60
  488. if pcs_hydra >= 100:
  489. pcs_hydra += 30
  490. else
  491. pcs_hydra += 60
  492. end
  493. cumspclnt = 2
  494. gs 'cum_cleanup'
  495. pcs_breath = 0
  496. gs 'food', 'aftermeal'
  497. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  498. 'You thoroughly enjoy the nicely cooked meal. The portions were moderate and<<$mtxt>>'
  499. 'You accompany it with a mug of tea.'
  500. gs 'stat'
  501. killvar '$_eat'
  502. act 'Finish':gt $loc, $metka
  503. end
  504. if $ARGS[0] = 'l_meal':
  505. *clr & cla
  506. frost = 0
  507. minut += 35
  508. money -= val($_eat['<<args[1]>>,price'])
  509. pcs_health += 10
  510. fat += 14
  511. pcs_energy += 100
  512. if pcs_hydra >= 100:
  513. pcs_hydra += 50
  514. else
  515. pcs_hydra += 100
  516. end
  517. cumspclnt = 2
  518. gs 'cum_cleanup'
  519. pcs_breath = 0
  520. gs 'food', 'aftermeal'
  521. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  522. 'You are almost overwhelmed by the delicious meal laid before you and enjoy it immensely. The meal was simply colossal and<<$mtxt>>'
  523. gs 'stat'
  524. killvar '$_eat'
  525. if plcooked = 1: killvar 'plcooked'
  526. act 'Finish': gt $loc, $metka
  527. end
  528. if $ARGS[0] = 'bag_lunch':
  529. *clr & cla
  530. frost = 0
  531. minut += 15
  532. money -= val($_eat['<<args[1]>>,price'])
  533. pcs_health += 10
  534. fat += 5
  535. pcs_energy += 40
  536. if pcs_hydra >= 100:
  537. pcs_hydra += 15
  538. else
  539. pcs_hydra += 40
  540. end
  541. cumspclnt = 2
  542. gs 'cum_cleanup'
  543. pcs_breath = 0
  544. gs 'food', 'aftermeal'
  545. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  546. 'You eat the lunch you packed from home. There was nothing fancy about it and<<$mtxt>>'
  547. gs 'stat'
  548. killvar '$_eat'
  549. act 'Finish': gt $loc, $metka
  550. end
  551. if $ARGS[0] = 'h_food':
  552. *clr & cla
  553. frost = 0
  554. minut += 25
  555. money -= val($_eat['<<args[1]>>,price'])
  556. pcs_health += 10
  557. fat += 7
  558. money -= 100
  559. pcs_energy += 60
  560. if pcs_hydra >= 100:
  561. pcs_hydra += 30
  562. else
  563. pcs_hydra += 60
  564. end
  565. cumspclnt = 2
  566. gs 'cum_cleanup'
  567. pcs_breath = 0
  568. gs 'food', 'aftermeal'
  569. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/roomservice.jpg"></center>'
  570. 'The maid brings you a decent meal,<<$mtxt>>'
  571. 'You accompany it with a mug of tea.'
  572. gs 'stat'
  573. killvar '$_eat'
  574. act 'Finish':gt $loc, $metka
  575. end
  576. if $ARGS[0] = 'h_meal':
  577. *clr & cla
  578. frost = 0
  579. minut += 25
  580. money -= val($_eat['<<args[1]>>,price'])
  581. pcs_health += 20
  582. fat += 1
  583. pcs_energy += 50
  584. if pcs_hydra >= 100:
  585. pcs_hydra += 25
  586. else
  587. pcs_hydra += 50
  588. end
  589. cumspclnt = 2
  590. gs 'cum_cleanup'
  591. pcs_breath = 0
  592. gs 'food', 'aftermeal'
  593. '<center><img <<$set_imgh>> src="images/shared/food/eating-salad.jpg"></center>'
  594. 'You enjoy a crisp salad of fresh greens and<<$mtxt>>'
  595. gs 'stat'
  596. killvar '$_eat'
  597. act 'Finish': gt $loc, $metka
  598. end
  599. if $ARGS[0] = 'aftermeal':
  600. if pcs_energy > 100:
  601. $mtxt = ' you had to force yourself to finish and now you feel stuffed.'
  602. elseif pcs_energy >= 80:
  603. $mtxt = ' it was enough to leave you feeling full and satisfied.'
  604. elseif pcs_energy >= 60:
  605. $mtxt = ' while you no longer feel especially hungry, you don''t feel all that satisfied either.'
  606. elseif pcs_energy >= 40:
  607. $mtxt = ' while you no longer feel like you are starving, you are still quite hungry - in fact, you could probably eat the same amount again and still have room for dessert.'
  608. else
  609. $mtxt = ' did nothing to appease your hunger, in fact, it only amde you want more.'
  610. end
  611. end
  612. --- food ---------------------------------