# kuhrPar CLOSE ALL act 'Return to the hallway':gt 'korrPar' $metkaM = $ARGS[0] $locM = $CURLOC $metka = $ARGS[0] $loc = $CURLOC clr minut += 1 gs 'stat' fcolor = rgb(0, 0, 0) bcolor = rgb(255, 255, 255) lcolor = rgb(106, 90, 205) '
Kitchen
' '
' if hour = 7 and indorf = 0: !r125 *nl 'Stepfather and Kolka Sit around the table eating Breakfast. Mother, as always, revolves around the plate.' ! on weekdays Anka here too if week <= 5: *P ' Anya, though says anything against diets, but in the morning only cauet.' else 'The kitchen is not very impressive, but it has everything your family needs. Since everyone has the habit of eating at different times, Mom usually pre-cooks the meals and stores them in the fridge. Of course, you could also just have a snack if you''re not that hungry.' end gs 'family' act 'Eat a meal (0:30)':gs 'food', 'm_meal' act 'Have a snack (0:15)':gs 'food', 'snack' act 'Have a cup of tea (0:05)': cls minut += 5 if water >= 100: 'You don''t need any more tea.' else water += 80 cumspclnt = 2 gs 'cum_cleanup' fbreath = 0 'You have a cup of tea, quenching your thirst.' end gs 'stat' act 'Get up from the table':gt $locM, $metkaM end if pranik > 0: 'You have <> cookies.' act 'Drink tea with cookies (0:05)': cla *clr minut += 5 pranik -= 1 health += 30 manna += 100 energy += 80 water += 80 cumspclnt = 2 gs 'cum_cleanup' fbreath = 0 fat += 4 frost = 0 gs 'stat' '
' 'You drank tea and enjoyed the cookies. You know they''re too sweet and can''t be good for your figure, but they taste so good!' act 'Get up from the table':gt $curloc end end if edaD > 0: act 'Eat diet food (0:30)': cla *clr frost = 0 minut += 30 health += 10 manna += 20 edaD -= 1 '
' if energy >= 100: 'You prepare a diet meal and try to eat it, but you''re really not hungry at all. You can''t finish the meal.' elseif energy >= 80: energy += 40 'You try to enjoy the diet meal, but half-way in you realize you weren''t all that hungry yet. You manage to finish the meal, but feel like it was kind of wasted.' else energy += 80 'The diet meal is tasty, and you enjoy eating it.' end if water >= 80: 'You don''t need any more tea.' else water = 100 cumspclnt = 2 gs 'cum_cleanup' fbreath = 0 'You have a cup of tea, quenching your thirst.' end act 'Get up from the table':gt $curloc end end if fatdel > 0: act 'Consume fat burners': cla *clr if fat > salo:fat = salo fatdel -= 1 fat -= 25 if fat < 11: fat = 11 gs 'body_shape', 'softreset' 'You throw the capsule of fat burners in a glass, add some water and drink it. You''re amazed at how fast the capsule works, feeling your body slim down almost immediately.' act 'Get up from the table':gt $curloc end end if lekarstvo > 0: 'You have <> tablet(s).' if sick > 0 and lekarday ! daystart: act 'Take a pill (0:05)': cla *clr minut += 5 lekarday = daystart lekarstvo -= 1 sick -= sick * 20 / 100 if water < 50 : water += 30 else water +=15 if water > 100: water = 100 '
' 'You swallow the pill, and shortly after you feel a bit better.' act 'Continue':gt $curloc end end end if vitamin > 0: 'You have <> vitamin pills.' if vitaminday ! daystart: act 'Take vitamins (0:05)': cla *clr if fat > salo:fat = salo minut += 5 vitaminday = daystart vitamin -= 1 frost = 0 if water < 50 : water += 30 else water +=15 if water > 100: water = 100 if KandidozOnce = 1:Kandidoz -= 2 if GerpesOnce = 1:Gerpes -= 2 if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1) skinvan += 1 'You take some vitamins to stay healthy.' act 'Continue':gt $curloc end end end --- kuhrPar ---------------------------------