1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054 |
- # food
- !2021/05/06
- ! Snacks: +20 pcs_energy, +7 fat (most cases has water available separately)
- ! Fast Food: +70 pcs_energy +70 pcs_hydra, +14 fat (hamburgers, fried food, like the downtown diner)
- ! Small Meal: +40 pcs_energy +40 pcs_hydra, +4 fat (soup and sandwiches, cafe light lunches, etc)
- ! Medium Meal and Hotel Food: +60 pcs_energy +60 pcs_hydra, +7 fat (home cooked dinners and room service equivalent)
- ! Large Meal: +100 pcs_energy +100 pcs_hydra, +14 fat (steak dinners, new years party dinner, etc)
- ! Bagged Lunch: +40 pcs_energy +40 pcs_hydra, +5 fat (sandwich, cold leftovers, etc)
- ! Health Meal: +50 pcs_energy +50 pcs_hydra, +1 fat (Diet food, Salads, rice cakes with peanut butter)
- ! 16/10/2022 - Added watercooler - HS
- menu_off = 1
- if $ARGS[0] = 'pirosh':
- *clr & cla
- frost = 0
- minut += 15
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += pcs_health/10
- pcs_mood += 5
- fat += 4
- pcs_energy += 40
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/pirozhki.jpg"></center>'
- if $loc = 'uni_cafe':
- uni_lunch_bought = 1
- 'You buy some vegetarian Piroshki.'
- gs 'uni_cafe', 'sitting_choice'
- else
- 'You enjoy some vegetarian Piroshki, and <<$mtxt>>'
- gs 'stat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- killvar '$_eat'
- end
- if $ARGS[0] = 'golub':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 5
- fat += 8
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra += 10
- else
- pcs_hydra += 20
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/golubtsy.jpg"></center>'
- if $loc = 'uni_cafe':
- uni_lunch_bought = 1
- 'You buy some well made Golubtsy in a tomato sauce. The portions is of moderate size.'
- gs 'uni_cafe', 'sitting_choice'
- else
- 'You enjoy some well made Golubtsy in a tomato sauce. The portions were moderate and<<$mtxt>>'
- gs 'stat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- killvar '$_eat'
- end
- if $ARGS[0] = 'pozhar':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 15
- pcs_mood += 10
- fat += 6
- pcs_energy += 70
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/pozharsky.jpg"></center>'
- if $loc = 'uni_cafe':
- uni_lunch_bought = 1
- 'You buy a Pozharsky Cutlets. The portions is of moderate size.'
- gs 'uni_cafe', 'sitting_choice'
- else
- 'You thoroughly enjoy the nicely cooked Pozharsky Cutlets. The portions were moderate and<<$mtxt>>'
- gs 'stat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- killvar '$_eat'
- end
- if $ARGS[0] = 'reuben':
- *clr & cla
- frost = 0
- minut += 25
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 20
- pcs_mood += 25
- fat += 12
- pcs_energy += 110
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/reuben.jpg"></center>'
- if $loc = 'uni_cafe':
- uni_lunch_bought = 1
- 'You buy a Rueben Sandwich. It is quit large.'
- gs 'uni_cafe', 'sitting_choice'
- else
- 'You had trouble finishing the Rueben Sandwich, but you enjoyed it immensely. The portion was fairly large and<<$mtxt>>'
- gs 'stat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- killvar '$_eat'
- end
- if $ARGS[0] = 'bliny':
- *clr & cla
- frost = 0
- minut += 15
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 5
- fat += 8
- pcs_energy += 50
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/blini.jpg"></center>'
- if $loc = 'uni_cafe':
- uni_lunch_bought = 1
- 'You buy some bliny. The portions are fairly small.'
- gs 'uni_cafe', 'sitting_choice'
- else
- '<center><img <<$set_imgh>> src="images/shared/food/blini.jpg"></center>'
- 'You eat some bliny. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- killvar '$_eat'
- end
- if $ARGS[0] = 'varenfan':
- *clr & cla
- frost = 0
- minut += 25
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 15
- pcs_mood += 15
- fat += 10
- pcs_energy += 40
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- '<center><img <<$set_imgh>> src="images/shared/food/varenikifancy.jpg"></center>'
- 'You sit and eat a plate of yummy Vareniki with potatoes. The portions are fairly moderate and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'salfan':
- *clr & cla
- frost = 0
- minut += 40
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 20
- pcs_mood += 20
- fat += 12
- pcs_energy += 80
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/salmonfancy.jpg"></center>'
- 'You thoroughly enjoy the massive fresh salmon steak. The meal was simply colossal and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'strofan':
- *clr & cla
- frost = 0
- minut += 35
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 20
- pcs_mood += 30
- fat += 6
- pcs_energy += 120
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/stroganofffancy.jpg"></center>'
- 'You are loving the delicious Beef Stroganoff. You enjoy it immensely. The portion was fairly moderate and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'borfan':
- *clr & cla
- frost = 0
- minut += 25
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 25
- fat += 4
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra += 20
- else
- pcs_hydra += 40
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/borschtfancy.jpg"></center>'
- 'You a steaming hot bowel of Borscht. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'blifan':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 30
- pcs_mood += 40
- fat += 6
- pcs_energy += 50
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/blinifancy.jpg"></center>'
- 'You eat a petite caviar bliny appetiser. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'ryesna':
- *clr & cla
- frost = 0
- minut += 10
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += pcs_health/10
- pcs_mood += 10
- fat += 4
- pcs_energy += 20
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/ryesnack.jpg"></center>'
- 'You have a tasty bowel of toasted rye snacks. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'crisps':
- *clr & cla
- frost = 0
- minut += 10
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += pcs_health/10
- pcs_mood += 20
- fat += 16
- pcs_energy += 20
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/crisps.jpg"></center>'
- 'You enjoy the salty flavour of a bowl of crisps. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'onring':
- *clr & cla
- frost = 0
- minut += 10
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 5
- fat += 16
- pcs_energy += 40
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/onionrings.jpg"></center>'
- 'You push yourself to eat the dry fatty onion rings. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'vegburg':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 20
- pcs_mood += 10
- fat += 8
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/vegieburger.jpg"></center>'
- 'You eat the delicious vegieburger. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'turburg':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 10
- fat += 10
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/turkeyburger.jpg"></center>'
- 'You enjoy the turkey burger. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'batfish':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 15
- pcs_mood += 15
- fat += 11
- pcs_energy += 80
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/batteredfish.jpg"></center>'
- 'You eat the fish, but it has little flavour. The portions were moderate and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'cheburg':
- *clr & cla
- frost = 0
- minut += 25
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 20
- pcs_mood += 20
- fat += 14
- pcs_energy += 120
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/cheeseburger.jpg"></center>'
- 'You are a little sickened by the greasy looking cheeseburger and fries in front of you. The meal was simply colossal and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'snack':
- *clr & cla
- gs 'stat'
- minut += 5
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 20
- fat += 6
- pcs_energy += 20
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- '<center><img <<$set_imgh>> src="images/shared/food/snack_1.jpg"></center>'
- 'You enjoy a small tasty, but somewhat fattening, snack. It wasn''t very much food, and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'f_food':
- *clr & cla
- frost = 0
- minut += 10
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 14
- pcs_energy += 70
- if pcs_hydra >= 100:
- pcs_hydra += 35
- else
- pcs_hydra += 70
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/fast_food.jpg"></center>'
- 'You happily eat some fast food. The portions are quite generous and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 's_meal':
- *clr & cla
- frost = 0
- minut += 10
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 4
- pcs_energy += 40
- if pcs_hydra >= 100:
- pcs_hydra += 20
- else
- pcs_hydra += 40
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/food_'+rand(1, 4)+'.jpg"></center>'
- 'You happily eat your meal. The portions are fairly small and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'm_meal':
- *clr & cla
- frost = 0
- minut += 15
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 8
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra += 30
- else
- pcs_hydra += 60
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/food_'+rand(1, 4)+'.jpg"></center>'
- 'You thoroughly enjoy the nicely cooked meal. The portions were moderate and<<$mtxt>>'
- 'You accompany it with a mug of tea.'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'l_meal':
- *clr & cla
- frost = 0
- minut += 20
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 14
- pcs_energy += 100
- if pcs_hydra >= 100:
- pcs_hydra += 50
- else
- pcs_hydra += 100
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/food_'+rand(1, 4)+'.jpg"></center>'
- 'You are almost overwhelmed by the delicious meal laid before you and enjoy it immensely. The meal was simply colossal and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'bag_lunch':
- *clr & cla
- frost = 0
- minut += 15
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 5
- pcs_energy += 40
- if pcs_hydra >= 100:
- pcs_hydra += 30
- else
- pcs_hydra += 60
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/bagged_lunch.jpg"></center>'
- 'You eat the lunch you packed from home. There was nothing fancy about it and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- end
- if $ARGS[0] = 'h_food':
- *clr & cla
- frost = 0
- minut += 25
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 7
- money -= 100
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra += 30
- else
- pcs_hydra += 60
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/roomservice.jpg"></center>'
- 'The maid brings you a decent meal,<<$mtxt>>'
- 'You accompany it with a mug of tea.'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'h_meal':
- *clr & cla
- frost = 0
- minut += 25
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 20
- fat += 1
- pcs_energy += 50
- if pcs_hydra >= 100:
- pcs_hydra += 25
- else
- pcs_hydra += 50
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/shared/food/eating-salad.jpg"></center>'
- 'You enjoy a crisp salad of fresh greens and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'jerky':
- *clr & cla
- frost = 0
- minut += 10
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 1
- pcs_hydra -= 15
- pcs_energy += 20
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/jerky_mix.jpg"></center>'
- 'You munch on some dried meat and trail mix. Not a full hot meal by any means but it''s better than nothing, and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'meat_stew':
- *clr & cla
- frost = 0
- minut += 30
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 3
- pcs_energy += 50
- if pcs_hydra >= 100:
- pcs_hydra += 10
- else
- pcs_hydra += 20
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/soup.jpg"></center>'
- 'You thoroughly enjoy the nicely cooked meat stew, and <<$mtxt>>'
- 'You accompany it with a mug of tea.'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'mush_soup':
- *clr & cla
- frost = 0
- minut += 30
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- fat += 3
- pcs_energy += 40
- if pcs_hydra >= 100:
- pcs_hydra += 20
- else
- pcs_hydra += 30
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- gs 'food', 'aftermeal'
- '<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/soup.jpg"></center>'
- 'You thoroughly enjoy some warm mushroom soup, and <<$mtxt>>'
- 'You accompany it with a mug of tea.'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'bilberry':
- *clr & cla
- gs 'stat'
- minut += 15
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += pcs_health/10
- pcs_mood += 10
- fat += 1
- pcs_energy += 10
- pcs_hydra += 10
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- '<center><img <<$set_imgh>> src="images/locations/gadukino/forest/bilberry.jpg"></center>'
- 'You ate a few berries, and<<$mtxt>>'
- gs 'stat'
- killvar '$_eat'
- if food_loc = 1:
- act 'Finish': gt 'food_menu'
- else
- act 'Finish':gt $loc, $loc_arg
- end
- end
- if $ARGS[0] = 'family_meals':
- frost = 0
- minut += 20
- pcs_health += 10
- pcs_mood += 10
- fat += iif($ARGS[1] = 'dinner', 8, 6)
- pcs_energy += 60
- if pcs_hydra >= 100:
- pcs_hydra += 30
- elseif pcs_hydra < 20:
- pcs_hydra += 80
- else
- pcs_hydra += 60
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- if $ARGS[0] = 'aftermeal':
- if pcs_energy > 100:
- $mtxt = ' you had to force yourself to finish and now you feel stuffed.'
- elseif pcs_energy >= 80:
- $mtxt = ' it was enough to leave you feeling full and satisfied.'
- elseif pcs_energy >= 60:
- $mtxt = ' while you no longer feel especially hungry, you don''t feel all that satisfied either.'
- elseif pcs_energy >= 40:
- $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.'
- else
- $mtxt = ' did nothing to appease your hunger, in fact, it only amde you want more.'
- end
- end
- if $ARGS[0] = 'watercooler':
- *clr & cla
- frost = 0
- if alko > 0: alko -= 1
- minut += 2
- pcs_health += 10
- pcs_energy += 4
- if pcs_hydra >= 100:
- pcs_hydra += 25
- else
- pcs_hydra += 50
- end
- cumspclnt = 2
- gs 'cum_cleanup'
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/waterfountain.jpg"></center>'
- 'You drink some water and feel refreshed.'
- act 'Finish':gt $loc, $loc_arg
- end
- !! ------------ just the stats, no descriptions or extra stuff with cost -----------------------
- if $ARGS[0] = 'only_cost_snack':
- *clr & cla
- gs 'stat'
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += 10
- pcs_mood += 20
- fat += 6
- pcs_energy += 20
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- killvar '$_eat'
- *nl
- 'Added to your order'
- gt 'food_menu'
- end
- if $ARGS[0] = 'only_cost_light_snack':
- *clr & cla
- money -= val($_eat['<<args[1]>>,price'])
- pcs_health += pcs_health/10
- pcs_mood += 20
- fat += 3
- pcs_energy += 20
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- killvar '$_eat'
- *nl
- 'Added to your order'
- gt 'food_menu'
- end
- if $ARGS[0] = 'only_stats_fast_food':
- *clr & cla
- pcs_health += pcs_health/10
- pcs_mood += 20
- fat += 14
- pcs_energy += 70
- pcs_hydra += 70
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- if $ARGS[0] = 'only_stats_small_meal':
- *clr & cla
- pcs_health += pcs_health/5
- pcs_mood += 10
- fat += 4
- pcs_energy += 40
- pcs_hydra += 40
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- if $ARGS[0] = 'only_stats_medium_meal':
- *clr & cla
- pcs_health += pcs_health/10
- pcs_mood += 15
- fat += 7
- pcs_energy += 70
- pcs_hydra += 70
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- if $ARGS[0] = 'only_stats_large_meal':
- *clr & cla
- pcs_health += pcs_health/15
- pcs_mood += 20
- fat += 14
- pcs_energy += 100
- pcs_hydra += 100
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- if $ARGS[0] = 'only_stats_bagged_meal':
- *clr & cla
- pcs_health += pcs_health/8
- pcs_mood += 5
- fat += 5
- pcs_energy += 40
- pcs_hydra += 40
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- if $ARGS[0] = 'only_stats_healthy_meal':
- *clr & cla
- pcs_health += pcs_health/5
- pcs_mood += 5
- fat += 1
- pcs_energy += 50
- pcs_hydra += 50
- cumspclnt = 2
- gs 'cum_cleanup'
- pcs_breath = 0
- end
- --- food ---------------------------------
|